Advertisement
Guest User

Untitled

a guest
Aug 18th, 2017
50
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. .model small
  2. .stack 100h
  3. .data    
  4. .code
  5.  
  6. print proc near     ;процедура выводит цифру из CL
  7.                    
  8.     add CL, 30h     ;добавляем код нуля
  9.     mov AH, 02h     ;функция 02h вывода на экраз символа
  10.     mov DL, CL      ;загружаем в DL выводимый символ
  11.     int 21h         ;прерывание запускает функцию 02h
  12.     ret             ;выход из процедуры
  13.  
  14. print endp        
  15.  
  16. start:  
  17.     mov AX, @data  
  18.     mov DS, AX
  19.                    
  20.     mov AL, 9       ;заносим цифры в регистры
  21.     mov BL, 0
  22.  
  23.     mov CL, AL      ;переносим в CL цифру
  24.     call print      ;выводим цифру
  25.  
  26.     mov AH, 02h     ;выводим пробел
  27.     mov DL, ' '
  28.     int 21h
  29.  
  30.     mov CL, BL      ;переносим в CL цифру
  31.     call print      ;выводим цифру
  32.  
  33.     mov AX, 4C00h
  34.     int 21h
  35. end start
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement