Subversion Repositories Kolibri OS

Rev

Rev 6285 | Rev 6735 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 6285 Rev 6640
Line 68... Line 68...
68
GETKEYII:
68
GETKEYII:
69
		$pop edx
69
		$pop edx
70
		$shr eax,8
70
		$shr eax,8
71
}
71
}
Line 72... Line -...
72
 
-
 
73
 
72
 
74
unsigned char key_ascii;
73
unsigned char key_ascii;
75
dword key_scancode, key_modifier;
74
dword key_scancode, key_modifier, key_editbox;
76
int GetKeys()
75
int GetKeys()
77
{
76
{
78
		$push edx
77
		$push edx
79
GETKEY:
78
GETKEY:
Line 86... Line 85...
86
GETKEYI:
85
GETKEYI:
87
		$mov edx,eax
86
		$mov edx,eax
88
		$jmp GETKEY
87
		$jmp GETKEY
89
GETKEYII:
88
GETKEYII:
90
		$pop edx
89
		$pop edx
-
 
90
	key_editbox = EAX;
91
	key_ascii = AH;
91
	key_ascii = AH;
92
	$shr  eax,16
92
	$shr  eax,16
93
	key_scancode = AL;
93
	key_scancode = AL;
94
	//get alt/shift/ctrl key status
94
	//get alt/shift/ctrl key status
95
	$mov eax,66
95
	$mov eax,66
96
	$mov ebx,3
96
	$mov ebx,3
97
	$int 0x40
97
	$int 0x40
98
	key_modifier = EAX;
98
	key_modifier = EAX;
-
 
99
	EAX = key_editbox;
99
}
100
}
Line 100... Line 101...
100
 
101
 
101
#endif
102
#endif