Не могу выйти из собственного прерывания клавиатуры

;*************************************************************
    delay   macro time
    local   ext, iter
        push    cx
        mov cx,time         ;число итераций внешнего цикла
    ext:
        push    cx
        mov cx, 5000        ;число итераций внутреннего цикла
    iter:
        loop    iter
        pop cx
        loop    ext
        pop cx
        
     endm                   ;конец макроса
    ;***************************************************************
 
    .286
    dseg    segment                     ; заголовок сегмента данных
    msg db  20,?,20 dup(?)
    s   db  20 dup (?)      ;введенная строка
    cur_row db  ?            ;текущая строка курсора
    cur_col db  ?            ;текущий столбец курсора
    old_09h dw  ?,?          ;4 байта для хранения старого вектора
    exitf   db  ?            ; флаг досрочного завершения
    per db  ?
    s1  db  'pause $'
        ends                     ; конец сегмента данных
        ;------------------------------
       cseg segment                  ; заголовок сегмента команд
        assume  ds:dseg,cs:cseg      ; объявление pег. сегментов
       ;
       main proc                     ; начало командных стpок
    
        mov ax, seg dseg         ; инициализация pег сегм ds
        mov ds, ax
        xor     ax, ax
        
        ;инизиализация видеорежима, очистка экрана и создание фона
        mov ax,0003h
        int 10h
 
        
        mov bx, 00020h      ;формирование синего фона на экране
        mov     cx, 07d0h       ;2000 символов пробела
        mov     ax, 0920h
        int     10h
 
        ;сохранение параметров курсора и его скрытие
        mov ah, 03h         ;функция считывания параметров курсора
        xor     bh, bh          ;на 0 видеостранице
        int 10h
        mov cur_row, dh     ;в dh сохранили текущую строку курсора
        mov cur_col, dl     ;в dl сохранили текущую строку курсора
        mov ah, 01h         ;функция задания параметров курсора
        mov cx, 2000h       ;скрыть курсор
        int 10h
        
        ;вводим строку  символов
        lea dx, msg
        mov ah, 0ah
        int 21h
 
        ;введенную строку поместим в s
        mov cl,msg[1]           ;n[1] реальное количество введенных символов
        mov ch,0
        mov bx,0
        mov bp,2
    c:
        mov dh,msg[bp]
        mov s[bx],dh
        inc bx
        inc bp
        loop c
 
        mov s[bx],'$'
    
        ;очистка экрана
        mov ax,0003h
        int 10h
    da:
        ;установка параметров для вывода в центре экрана
        mov ah, 02h         ;функция установки позиции курсора
        mov dx, 0c23h
        int 10h
        
        ;вывод строки в центре
        lea dx, s           ;смещение строки в сегменте DS
        mov ah, 9
        int 21h
        
        
        ;перевод курсора
                                                                   
                mov ah,02h                       ; функция 02h установка позиции курсора
                mov bh,0                         ; BH номер видеостраницы(0 - основная)
                mov dh,2                        ; DH строка курсора
                mov dl,1                         ; DL столбец курсора
                int 10h                          ; номер прерывания 
 
        mov per,3
        
        ;************************************************************************
        ;программа будет выполняться, пока не нажата Esc(выход) или SpaceBar(пауза)
    
    dal:
        
        ;замена векторов ТВП
        cli             ;запрет прерываний
        push    es          ;сохранение значения регистра ES
        mov ax,3509h        ;функция DOS, получающая вектор int09h из ТВП
        int 21h
 
        mov old_09h[0], bx      ;сохранение старого смещения
        mov old_09h[2], es      ;сохранение старого сегмента
        pop es
 
        mov dx,offset new_09h   ;получение в DX нового смещения
        push    ds          ;сохранение значения в DS
        mov ax,cs           ;получение в DS нового сегмента
        mov ds,ax           
        mov ax,2509h        ;функция DOS, устанавливающая новый вектор int09h 
        int 21h
 
        pop ds
        sti
 
        ;выполнение программы (пустые вложенные циклы)
        ;здесь буду вызывать генератор сч и тамер и выводить
 
        mov cx,0ffffh
    cycle_out:
        push    cx
        mov cx,0ffffh
    cycle_in:
        loop    cycle_in
        pop cx
        loop    cycle_out
 
    
        lea dx,s
        mov ah,9
        int     21h
            
    
        ;перевод курсора
                                                                   
                mov ah,02h                       ; функция 02h установка позиции курсора
                mov bh,0                         ; BH номер видеостраницы(0 - основная)
                mov dh,per                        ; DH строка курсора
                mov dl,per                         ; DL столбец курсора
                int 10h                          ; номер прерывания 
 
        inc per
 
        
        jmp dal
        
        ;завершение программы
    finish:
        cli
        mov dx, old_09h[0]
        mov ds, old_09h[2]  
        mov ax, 2509h
        int 21h
        sti
        mov ah, 4ch          ; выход в DOS
        int 21h
 
 
    main endp
 
 
 
 
 
 
        ;************************************************************************
        ;новый обработчик аппаратного прерывания
 
    new_09h proc
        sti             ;разрешение прерываний
        pushf               ;сохранение регистра флагов
        pusha               ;сохранение регистров общего назначения
        mov exitf,00h       ;обнуление флага
        in  al,60h          ;чтение скан-кода
        cmp al,39h          ;клавиша SpaceBar ?
        je  my_code         ;да реализовать задержку
        cmp al, 01h         ;клавиша esc
        jnz old_int         ;нет вызвать системный обработчик
        or  exitf,01h       ;установка флага
        jmp my_code     
    old_int:
        popa                ;воссстановление РОН
        popf                ;восстановление регистра флага
        jmp dword ptr old_09h   ;переход к системному обработчику
    my_code:
        in  al,61h          ;извлечение содержимого из порта
        or  al,80h          ;установка бита 7
        jmp $+2         ;задежка для аппаратуры
        out 61h,al          ;сброс сигнала "клава занята"
        and al,80h          ;сброс бита 7
        jmp $+2         ;задержка для аппаратуры
        out 61h,al          ;восстановление содержимого порта
        cli             ;запрет прерываний
        mov al,20h          ;сигнал "конец прерываний"
        out 20h,al          ;в управляющий порт контроллера
        sti             ;разрешение прерываний  
        
 
        ;отработка клавиши esc
        cmp exitf,01h       ;проверка флага выхода
        je  finish          ;завершение программы
        ;отработка клавиши SpaceBar
        mov ah, 01h         ;функция задания параметров курсора
        mov cx, 2000h       ;скрыть курсор
        int 10h
        jmp old_int
        delay   76
        
        popa
        popf
        sti
        
        iret
        
    new_09h endp
 
        
 
        ends                 ; конец сегм команд
        end main             ; физический конец пpогpаммы