forked from KolibriOS/kolibrios
Tinypad - correct work with CAPS LOCK
git-svn-id: svn://kolibrios.org@2172 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
parent
213f39d0cd
commit
594b462f7d
@ -60,7 +60,20 @@ key:
|
||||
|
||||
.lp0: test al,0x80
|
||||
jnz still.skip_write
|
||||
|
||||
;--------------------------------------
|
||||
; it is CAPS LOCK correct processing for chars
|
||||
test [shi], 0x00000040 ; CAPS LOCK is on?
|
||||
jz .no_caps_lock
|
||||
cmp ecx,1
|
||||
jnz @f
|
||||
inc ecx
|
||||
jmp .no_caps_lock
|
||||
@@:
|
||||
cmp ecx,2
|
||||
jnz .no_caps_lock
|
||||
dec ecx
|
||||
.no_caps_lock:
|
||||
;--------------------------------------
|
||||
push eax
|
||||
mcall 26,2,,key1
|
||||
pop eax
|
||||
|
Loading…
Reference in New Issue
Block a user