Программа, которая через заданный промежуток времени с консоли выдает сообщение на экран

; это установка 4ah на процедуру таймер
mov ah,25h
mov al,4Ah
mov dx,offset timer
push ds
push cs
pop ds
int 21h
pop ds
 
;а это вычисление времени и допустим прибавление некоторого промежутка времени, допустим 5 сек
mov ah,02h
int 1Ah
mov ah,06h
add dh,5
int 1Ah
 
;ожидание сообщения
mov ah,01h
int 21h
 
 
;сама процедура таймер 
timer proc
push AX
mov AH,0Eh
mov AL,'@'
int 10h
mov al,20h
out 20h,al
pop ax
iret
timer endp

               org  100h
start:         jmp  main
 
_int1C:         pushf
        inc byte ptr cs:flag
        cmp byte ptr cs:flag,18*5   ; got 5 sec. signal?
        jz  @@1         ; yes, processing
@@0:        popf
        jmp dword ptr cs:old_int1C      ; go back
@@1:        mov byte ptr cs:flag, 0
        push    ax
;       push    cx
;       mov ah, 05h
;       mov cx, 07h ;'a'
;       int 16h
;       pop cx
        mov al, 7           ; send BEEP to console
        int 29h
        pop ax
        jmp     @@0
old_int1C:  dd  ?
flag:       db  0
 
main:
        push    cs
        push    cs
        pop ds
        pop es
                mov     ax, 351Ch                                     ; получить в ES:BX адрес прерывания 8h
            int     21h
            mov     word ptr cs:old_int1C, bx     ; запомним старый адрес 08
            mov     word ptr cs:old_int1C+2, es    ; прерывания
                mov     ax, 251Ch                                             ; установим вектор на 08
            mov     dx, _int1C        ; прерывание
            int     21h
; ввод строки. каждые ~5 сек. пищим //появляется буква "а"
            mov ah, 0Ah
        mov dx, inpbuf
        int 21h
 
remove: 
            mov dx, word ptr cs:old_int1C     ; возвращаем вектор прерывания
            mov ds, word ptr cs:old_int1C+2    ; на место
            mov ax, 251Ch
                int 21h
exit:                                   ; выход
            int 20h
inpbuf: db  255         ; наибольшая длина строки
len:    db  ?                       ; сюда вернется настоящая длина
buf:    db  255 dup(?)              ; тут будет то, что ввели