Как сделать выход по ESC

org 100h
old dw 0
jmp start
number dw 0
c dw 0
start:    
xor ax,ax
mov es,ax
 
    cli
    mov ax,[es:1ch*4] ;сохраняем старый вектор
    mov word [cs:old],ax
    mov ax,[es:1ch*4+2]
    mov word [cs:old+2],ax
 
    mov ax,invert ;устанавливаем свой вектор
    mov word  [es:1ch*4],ax
    mov word  [es:1ch*4+2],cs
    sti
 
m1:   ;проверка на выход
mov ah, 00h
int 16h
cmp al,27
jnz exit
 
 
exit:
 
    mov ax,word [cs:old] ; восстанавливаем старый вектор
    mov word [es:1ch*4],ax
    mov ax, word [cs:old+2]
    mov word [es:old+2],ax
 
mov ax, 4C00h
int 21h
ret
 
 
invert:  ; процедура инвертирования
    pusha
    r:
    mov ax,0B800h
    mov ES,ax
    mov di,2000
    mov ax,[number]
    mov BX, 10
    mov si,[c]
    perevod:
    xor DX, DX
    div BX
    add DL, '0'
 
    sub DI, 2
    test AX, AX
    jnz perevod
    inc [number]
    cmp [number],65535
    jnz r
    inc [c]
 
     mov [ES:DI], dl
 
     cmp [c],72
     jz r
     ;mov [ES:DI],ax
     popa
    jmp dword [CS:old]
    ret

m1:   ;проверка на выход
mov ah, 00h
int 16h
cmp al,27
jnz m1

@@:
In al,0x60 ;Читаем из порта клавиатуры
Cmp al,1 ;Если ESC
Jz exit
Jmp @b