Subversion Repositories Kolibri OS

Rev

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

Rev 969 Rev 1012
Line 408... Line 408...
408 
bool kos_GetKey( Byte &keyCode )
 408 
bool kos_GetKey( Byte &keyCode )
409 
{
 409 
{
410 
	Dword result;
 410 
	Dword result;
Line 411... Line 411...
411 
 
 411 
 
412 
	//
 412 
	//
- 
 
 413 
	__asm
- 
 
 414 
	{
- 
 
 415 
		push edx
413 
	__asm{
 416 
getkey:
414 
		mov eax, 2
 417 
		mov  eax,2 ; Gluk
- 
 
 418 
		int  0x40
- 
 
 419 
		cmp eax,1
- 
 
 420 
		jne getkeyi
- 
 
 421 
		mov ah,dh
- 
 
 422 
		jmp getkeyii
- 
 
 423 
getkeyi:
- 
 
 424 
		mov dh,ah ; Gluk
- 
 
 425 
		jmp getkey
- 
 
 426 
getkeyii:
415 
		int 0x40
 427 
		pop edx
416 
		mov result, eax
 428 
		mov result, eax
417 
	}
 429 
	}
418 
	//
 430 
	//
419 
	keyCode = result >> 8;
 431 
	keyCode = result >> 8;