Subversion Repositories Kolibri OS

Rev

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

Rev 7814 Rev 7981
Line 131... Line 131...
131
	key_scancode = AL;
131
	key_scancode = AL;
132
	key_modifier = GetKeyModifier();
132
	key_modifier = GetKeyModifier();
133
	EAX = key_editbox;
133
	EAX = key_editbox;
134
}
134
}
Line -... Line 135...
-
 
135
 
-
 
136
inline fastcall byte GetKeyScancode()
-
 
137
{
-
 
138
	$mov  eax,2
-
 
139
	$int  0x40
-
 
140
	$shr  eax,16
-
 
141
	return AL;
-
 
142
}
135
 
143
 
136
// ECX is a mode: 1 - scancodes, 0 - ascii
144
// ECX is a mode: 1 - scancodes, 0 - ascii
137
inline fastcall SetKeyboardMode(ECX) 
145
inline fastcall SetKeyboardMode(ECX) 
138
{
146
{
139
	$mov  eax,66
147
	$mov  eax,66