Ошибка с флагами в резиденте

[zhuk99]

Требуется написать резидент - драйвер преобразования русских букв к верхнему регистру. По нажатию F5 включать и выключать резидент.

Написано все и все работает пока нажимаешь клавиши медленно. Если зажать кнопку, то иногда проскакивает тот регистр, который не нужен. Тоже самое, если нажать ф5, то флаг как-то скачет.

main proc
    jmp 	init
  
  ; Поля данных резидентной секции
  old_2fh dd 0              ; Ячейка для сохранения системного вектора 2Fh
  old_09h dd 0              ; Ячейка для сохранения системного вектора 09h
	flag	dw	1		;
	flag2	db 	0
  ; Обработчик прерываний от клавиатуры
new_09h proc
	
	pushf	;сохраняем для команды iret
	call	CS:old_09h 	;вызываем старое прерывание,оно читает из порта сканкод
				;нажатой клавиши,переводит в ASKII и записывает 
				;в кольцевой буффер клавиатуры
	
	;jmp		notunload
	cli
notunload:
	push	ax
	push	bx
	push	cx
	push	dx
	push	bp
	push	ds
	push	es
	
	mov		ax,cx	;настройка ds на сегмент
	mov		ds,ax	
	mov		ax,40h	;настройка es на область данных BIOS
	mov		es,ax	
	
	;копируем, но не изымаем из буфера 
	mov 	bx,es:1Ah	;адрес головы буфера
    cmp 	bx,es:1Ch	;если он равен адресу хвоста,
    je  	exit    	        ;значит буфер пуст,на выход 
	mov		cx,es:1ch
	mov 	ax,es:[bx]    	;иначе считываем символ из головы буфера
	;проверка введенного символа   
	
	mov		es:1ch,bx		;;;;;;;;;;;;
	
	cmp 	ah,3Fh		; код f5
	je		f5
	
	
	;jmp 	exit
	cmp 	flag,0
	je		return
	
	
	cmp 	al,0A0h		;'а'=160
    jb 		return        	;<160
	cmp 	al,0B0h		;'п'=175
    jb 		sub1         	;160<=al<=175		
	cmp 	al,0E0h		;'р'=224
    jb 		return        	;175<al<224       
	cmp 	al,0F0h     	;'я'=239
    jb 		sub2   		;>239
	jmp		return

sub1:			;введена буква от 'а' до 'п'
	sub 	al,20h			;изменяем регистр символа(-32) и
	;mov 	byte ptr es:[bx],al	;записываем в буфер новое значение
	
	jmp		print
sub2:			;введена буква от 'р' до 'я'
	sub 	al,50h		  	;изменяем регистр символа(-80) и
	;mov 	byte ptr es:[bx],al	;записываем в буфер новое значение
	jmp		print

print:
;;;;;;;;;;;;;;;;;;;;
	xor		bh, bh
	mov		ah, 03h			; ЮЙФБЕН РПЪ. ЛХТУПТБ 
	int		10h

	mov 	bx, 0002h		; УФБЧЙН ТЕЦЙН ЧЩЧПДБ
	mov		cx, 0001h
	
	;sub		al,20h	
	mov 	ah, 09h
	int 	10h

	inc		dx
	
	mov 	ah, 02h
	int 	10h
	;;;;;;;;;;;;;;;;;;;;;;;;;
	jmp		exit
f5:
	;mov		es:1ch,bx
	
	cmp		flag,0		
	je		flag_is_0
	
	
	mov		al,'1'
	mov 	ah,02h
	mov 	word ptr es:[bx],ax
	
	mov		flag,0
	jmp 	return
flag_is_0:				
	
	mov		al,'0'
	mov 	ah,0bh
	mov 	word ptr es:[bx],ax
	mov		flag,1
	jmp		return

return:
	mov		es:1ch,cx
	
exit:                    
	pop		es
	pop 	ds
	pop		bp
	pop		dx
	pop		cx
	pop 	bx
	pop		ax
	
	sti
	iret

new_09h	endp

Во вложении все необходимое для запуска:
запускаем rkm, нажимаем ctrl , запускаем 88.
ну и экспериментируем с f5 на русском.

Заранее благодарен!

[Tronix]

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

[zhuk99]

Сообщение от zhuk99

	flag	dw	1		;
	flag2	db 	0
  ; Обработчик прерываний от клавиатуры
new_09h proc
	
	.........
        .........
	
	mov		es:1ch,bx		;;;;;;;;;;;;
	
	cmp 	ah,3Fh		; код f5
	je		f5
	
	
	;jmp 	exit
	cmp 	flag,0
	je		return
	............................................
.................................................
....................................................
......................................................
	
	
f5:
	;mov		es:1ch,bx
	
	cmp		flag,0		
	je		flag_is_0
	
	
	mov		al,'1'
	mov 	ah,02h
	mov 	word ptr es:[bx],ax
	
	mov		flag,0
	jmp 	return
flag_is_0:				
	
	mov		al,'0'
	mov 	ah,0bh
	mov 	word ptr es:[bx],ax
	mov		flag,1
	jmp		return

return:
	mov		es:1ch,cx

Да с задачей резидента я всяко справлялся. И очищал буфер и заменял там букву. Проблема в том что флаг не корректно себя ведет. То есть:
запускаем программу - флаг равен 1, требуется преобразовывать к верхнему регистру. Нажимаем f5. флаг равен 0. на строках
cmp flag,0
je return
он должен пропускать преобразование, и при медленных нажатиях он это делает. Если начать нажимать клавиши быстро, то он повидимому иногда затирается и становиться равным 1. И вылетают большие буквы.

Еще интересно получается если зажать f5 - прога выводит предыдущее значение флага по нажатию. Так вот если зажать f5 то должна быть последовательность 0101010101010 и тд а вываливается 01011110101101011110001011 - как видно не то что нужно!
cli sti вроде стоят - в чем же проблема!?

[Tronix]

А, сорри, не увидел что там еще по F5 включается-отключается замена. Мммм.. А можно полный код программы, а то мне так не удобно дебажить..

[zhuk99]

или вот тут взять можно.