contar_tecla_presionada

format binary as 'img'
org 7C00h

    mov ax, 3h
    int 10h

    push es

    cli

    xor ax, ax
    xor di, di
    mov es, ax

    mov ax, timer
    mov [es:8*4], ax
    mov [es:8*4+2], cs

    mov ax, teclado
    mov [es:9*4], ax
    mov [es:9*4+2], cs

    sti
    pop es

    mov ax, B800h
    mov es, ax


    jmp $

    timer:
        cmp [inicio_key], 0
        je salir_timer
        dec [time]
        jnz salir_timer
        mov [time], 20

        salir_timer:
            mov al, 20H
            out 20h, al
    iret

    teclado:
        in al, 60H
        cmp al, 127
        jbe salir_teclado

        salir_teclado:
        mov al, 20h
        out 20h, al
    iret

count   db 0
time    db 18

times 510-($-$$) db 0
    dw 0xAA55