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

UptoLike

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

75
call DELAY
mov es:[bx], ax
pop bx
pop ax
ret
OUT_SYMBOL endp
; Основная программа
START: mov ax, DATA
mov ds, ax
; чтение вектора прерывания
mov ah, 35h
mov al, 1Ch
int 21h
mov OLD_IP, bx
mov OLD_CS, es
; установка вектора прерывания
push ds
mov dx, offset NEW_1C
mov ax, seg NEW_1C
mov ds, ax
mov ah, 25h
mov al, 1Ch
int 21h
pop ds
mov ax, 0B800h
mov es, ax
call CLS
call DELAY
         call   DELAY
         mov es:[bx], ax
         pop bx
         pop ax
         ret
OUT_SYMBOL endp
   ; Основная программа
START:   mov ax, DATA
         mov ds, ax
   ; чтение вектора прерывания
         mov ah, 35h
         mov al, 1Ch
         int    21h
         mov OLD_IP, bx
         mov OLD_CS, es
   ; установка вектора прерывания
         push ds
         mov dx, offset NEW_1C
         mov ax, seg NEW_1C
         mov ds, ax
         mov ah, 25h
         mov al, 1Ch
         int    21h
         pop ds
         mov ax, 0B800h
         mov es, ax
         call   CLS
         call   DELAY
                                    75