Программирование на Ассемблере для персональных компьютеров. Садовой Н.Н - 74 стр.

UptoLike

Составители: 

74
inc si
inc si
loop CL1
pop si
pop ax
pop cx
ret
CLS endp
; Подпрограмма задержки
DELAY proc near
push cx
mov cx, 100
d12: push cx
xor cx,cx
d11: nop
loop d11
pop cx
loop d12
pop cx
ret
DELAY endp
; Подпрограмма вывода символа с заданным атрибутом
OUT_SYMBOL proc near
push ax
push bx
mov al, SYM
mov ah, ATRIBUT1
mov bx, POS
           inc    si
           inc    si
           loop CL1
           pop si
           pop ax
           pop cx
           ret
CLS endp
   ; Подпрограмма задержки
DELAY      proc           near
           push cx
           mov cx, 100
d12:       push cx
           xor    cx,cx
d11:       nop
           loop d11
           pop cx
           loop d12
           pop cx
           ret
DELAY      endp
   ; Подпрограмма вывода символа с заданным атрибутом
OUT_SYMBOL proc near
           push ax
           push bx
           mov al, SYM
           mov ah, ATRIBUT1
           mov bx, POS
                                                        74