Subversion Repositories Kolibri OS

Rev

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

Rev 3458 Rev 3467
Line 414... Line 414...
414
	EBX = x<<16+y;
414
	EBX = x<<16+y;
415
	ECX = fontType<<24+color;
415
	ECX = fontType<<24+color;
416
	$int 0x40;
416
	$int 0x40;
417
}
417
}
Line -... Line 418...
-
 
418
 
-
 
419
dword WriteBufText(dword x,y,byte fontType, dword color, EDX, EDI)
-
 
420
{
-
 
421
	EAX = 4;
-
 
422
	EBX = x<<16+y;
-
 
423
	ECX = fontType<<24+color;
-
 
424
	$int 0x40;
-
 
425
}
418
 
426
 
419
void WriteNumber(dword x,y,byte fontType, dword color, count, ECX)
427
void WriteNumber(dword x,y,byte fontType, dword color, count, ECX)
420
{
428
{
421
	EAX = 47;
429
	EAX = 47;
422
	EBX = count<<16;
430
	EBX = count<<16;
Line 431... Line 439...
431
  ECX = w << 16 + h;
439
  ECX = w << 16 + h;
432
  EDX = x << 16 + y;
440
  EDX = x << 16 + y;
433
  $int  0x40;
441
  $int  0x40;
434
}
442
}
Line 435... Line 443...
435
 
443
 
436
dword GetPixelColor(dword x, x_size, y)
444
:dword GetPixelColor(dword x, x_size, y)
437
{
445
{
438
	$mov eax, 35
446
	$mov eax, 35
439
	EBX= y*x_size+x;
447
	EBX= y*x_size+x;
440
	$int 0x40
448
	$int 0x40