Subversion Repositories Kolibri OS

Compare Revisions

Regard whitespace Rev 7770 → Rev 7771

/programs/cmm/lib/keyboard.h
128,12 → 128,26
key_ascii = AH;
$shr eax,16
key_scancode = AL;
key_modifier = GetKeyModifier();
EAX = key_editbox;
}
 
// ECX is a mode: 1 - scancodes, 0 - ascii
inline fastcall SetKeyboardMode(ECX)
{
$mov eax,66
$mov ebx,1
//$mov ecx,?
$int 0x40
}
 
//get alt/shift/ctrl key status
inline fastcall dword GetKeyModifier()
{
$mov eax,66
$mov ebx,3
$int 0x40
key_modifier = EAX;
EAX = key_editbox;
}
 
#endif