Tinypad: numpad support

git-svn-id: svn://kolibrios.org@826 a494cfbc-eb01-0410-851d-a64ba20cac60
2008-07-17 21:41:30 +00:00
parent a59b895ca6
commit 4def1db832
6 changed files with 110 additions and 38 deletions
--- a/programs/develop/tinypad/trunk/tp-tbox.asm
+++ b/programs/develop/tinypad/trunk/tp-tbox.asm
@@ -211,12 +211,12 @@ proc textbox.key
 	cmp	byte[esi],0
 	jne	.acc

-	test	byte[shi+2],0x06
+	test	[chr],KM_CTRLALT
 	jnz	.exit
 	cmp	[tbox.length],255
 	je	.exit

-	movzx	eax,[chr]
+	movzx	eax,byte[chr]
 	movzx	eax,[eax+key0]
 	or	al,al
 	jz	.exit