Subversion Repositories Kolibri OS

Rev

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

Rev 5760 Rev 5779
Line 101... Line 101...
101 
GETKEYII:
 101 
GETKEYII:
102 
		$pop edx
 102 
		$pop edx
103 
		$shr eax,8
 103 
		$shr eax,8
104 
}
 104 
}
Line -... Line 105...
- 
 
 105 
 
105 
 
 106 
 
106 
unsigned char key_ascii;
 107 
unsigned char key_ascii;
107 
dword key_scancode, key_modifier;
 108 
dword key_scancode, key_modifier;
108 
int GetKeys()
 109 
int GetKeys()
- 
 
 110 
{
- 
 
 111 
		$push edx
109 
{
 112 
GETKEY:
110 
	$mov  eax,2
 113 
		$mov  eax,2
- 
 
 114 
		$int  0x40
- 
 
 115 
		$cmp eax,1
- 
 
 116 
		$jne GETKEYI
- 
 
 117 
		$mov eax,edx
- 
 
 118 
		$jmp GETKEYII
- 
 
 119 
GETKEYI:
- 
 
 120 
		$mov edx,eax
- 
 
 121 
		$jmp GETKEY
- 
 
 122 
GETKEYII:
111 
	$int  0x40
 123 
		$pop edx
112 
	key_ascii = AH;
 124 
	key_ascii = AH;
113 
	$shr  eax,16
 125 
	$shr  eax,16
114 
	key_scancode = AL;
 126 
	key_scancode = AL;
115 
	//get alt/shift/ctrl key status
 127 
	//get alt/shift/ctrl key status