Обработчик клавиатуры

[danekne]

Вот такая проблема: нужно написать обработчик клавиатуры с подменой прерываний стандартных. Вот что накалякал:

.286
model Tiny
stack 100h
_txt segment public 'code'
assume cs:_txt
assume ds:_txt
old_09h dw ?,?
exitf db ?
main:
	mov ax, @data
	mov ds,ax
    xor ax,ax	
	cli
	push es
	mov ax,3509h
	int 21h
	mov old_09h[0],bx
	mov old_09h[2],es
	pop es
	mov dx,offset new_09h
	push ds
	mov ax,cs
	mov ds,ax
	mov ax,2509h
	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
finish:
	cli
	mov dx,old_09h[0]
	mov ds,old_09h[2]
	mov ax,2509h
	int 21h
	sti
	mov ax,4c00h
	int 21h
endp
new_09h proc
	sti
	pushf
	pusha
	mov exitf,00h
	in al,60h
	cmp al,39h
	jz my_code
	cmp al,01h
	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
	jmp $+2
	out 61h,al
	and al,80h
	jmp $+2
	out 61h,al
	cli
	mov al,20h
	out 20h,al
	sti
	cmp exitf,01h
	jz finish
	mov ah,02h
	xor bh,bh
	mov dx,0000h
	int 10h
	mov ah,09h
	mov al,'*'
	mov bl,00011100b
	mov cx,01h
	int 10h
	popa
	popf
    iret
new_09h endp
ends
end main

Внимание вопрос: какого лешего, эта программа не выполняется до ввода ескейпа и перехода на метку finish, а закрывается почти сразу

[Goodwin98]

Может из-за того, что вы запрещаете прерывания перед вызовом int 21h ? Его использование подразумевает безопасную установку своего обработчика.

Да и отладчиком кто мешает воспользоваться?

[danekne]

Гудвин! Гениальный совет "воспользоваться отладчиком"! Не был бы таким жадым - аж два плюса в репу бы поставил!

Ммм... Проблема решена - перепутал

;pop cx
	loop cycle_out
	pop cx

[Stilet]

danekne

А Гудвин то прав - такие весчи именно с помошью отладчика выявить легко, а не гадать на кофейной гуще.
Это я тебе на собственном опыте говорю.