Subversion Repositories Kolibri OS

Rev

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

Rev 2250 Rev 2252
Line 157... Line 157...
157 
	$int 0x40
 157 
	$int 0x40
158 
}
 158 
}
Line 159... Line 159...
159 
 
 159 
 
Line -... Line 160...
- 
 
 160 
//------------------------------------------------------------------------------
- 
 
 161 
 
- 
 
 162 
//eax = ÿçûê ñèñòåìû (1=eng, 2=fi, 3=ger, 4=rus)
- 
 
 163 
inline fastcall int GetSystemLanguage(){
- 
 
 164 
 EAX = 26;
- 
 
 165 
 EBX = 5;
- 
 
 166 
 $int 0x40
- 
 
 167 
 RETURN EAX;
160 
//------------------------------------------------------------------------------
 168 
}
161 
 
 169 
 
162 
inline fastcall void DrawTitle(dword ECX)
 170 
inline fastcall void DrawTitle(dword ECX)
163 
{
 171 
{
164 
	EAX = 71;
 172 
	EAX = 71;
Line 217... Line 225...
217 
	$stosb
 225 
	$stosb
218 
	$test al,al
 226 
	$test al,al
219 
	$jnz l1
 227 
	$jnz l1
220 
}
 228 
}
Line -... Line 229...
- 
 
 229 
 
221 
 
 230 
 
222 
byte fastcall TestBit(EAX, CL)
 231 
byte fastcall TestBit(EAX, CL)
223 
{
 232 
{
224 
	$shr eax,cl
 233 
	$shr eax,cl
225 
	$and eax,1
 234 
	$and eax,1
Line 370... Line 379...
370 
  }
 379 
  }
371 
  wintodos(#symbol);
 380 
  wintodos(#symbol);
372 
  AL=symbol;
 381 
  AL=symbol;
373 
}
 382 
}
Line -... Line 383...
- 
 
 383 
 
- 
 
 384 
/*int hex2char(char c)
- 
 
 385 
{
- 
 
 386 
  if (c <=9)
- 
 
 387 
    return (c+48);
- 
 
 388 
 
- 
 
 389 
  return (c - 10 + 'a');
- 
 
 390 
}
- 
 
 391 
 
- 
 
 392 
int hex2char(dword c)
- 
 
 393 
{
- 
 
 394 
  if (c <=9)
- 
 
 395 
    return (c+48);
- 
 
 396 
 
- 
 
 397 
  return (c - 10 + 'a');
- 
 
 398 
}*/
374 
 
 399 
 
375 
byte mas[66] = "椥ä£å¨©ª«¬­®¯ïàáâ㦢ìë§èíéçꞀ–„…”ƒ•ˆ‰Š‹ŒŽŸ‘’“†‚œ›‡˜™—š";
 400 
byte mas[66] = "椥ä£å¨©ª«¬­®¯ïàáâ㦢ìë§èíéçꞀ–„…”ƒ•ˆ‰Š‹ŒŽŸ‘’“†‚œ›‡˜™—š";
376 
inline fastcall void koitodos(dword EDI)
 401 
inline fastcall void koitodos(dword EDI)
377 
{
 402 
{
378 
	WHILE (BL=ESBYTE[EDI])
 403 
	WHILE (BL=ESBYTE[EDI])
Line 530... Line 555...
530 
	EAX = 8;
 555 
	EAX = 8;
531 
	EDX += BT_DEL;
 556 
	EDX += BT_DEL;
532 
	$int 0x40;
 557 
	$int 0x40;
533 
}
 558 
}
Line 534... Line 559...
534 
 
 559 
 
535 
void DrawRegion(dword x,y,width,height,color1)
 560 
:void DrawRegion(dword x,y,width,height,color1)
536 
{
 561 
{
537 
	DrawBar(x,y,width,1,color1); //¯®«®á  £®à ᢥàåã
 562 
	DrawBar(x,y,width,1,color1); //¯®«®á  £®à ᢥàåã
538 
	DrawBar(x,y+height,width,1,color1); //¯®«®á  £®à á­¨§ã
 563 
	DrawBar(x,y+height,width,1,color1); //¯®«®á  £®à á­¨§ã
539 
	DrawBar(x,y,1,height,color1); //¯®«®á  ¢¥àåã á«¥¢ 
 564 
	DrawBar(x,y,1,height,color1); //¯®«®á  ¢¥àåã á«¥¢ 
540 
	DrawBar(x+width,y,1,height+1,color1); //¯®«®á  ¢¥àåã á¯à ¢ 
 565 
	DrawBar(x+width,y,1,height+1,color1); //¯®«®á  ¢¥àåã á¯à ¢ 
Line 541... Line 566...
541 
}
 566 
}
542 
 
 567 
 
543 
void DrawRegion_3D(dword x,y,width,height,color1,color2)
 568 
:void DrawRegion_3D(dword x,y,width,height,color1,color2)
544 
{
 569 
{
545 
	DrawBar(x,y,width+1,1,color1); //¯®«®á  £®à ᢥàåã
 570 
	DrawBar(x,y,width+1,1,color1); //¯®«®á  £®à ᢥàåã
546 
	DrawBar(x,y+1,1,height-1,color1); //¯®«®á  á«¥¢ 
 571 
	DrawBar(x,y+1,1,height-1,color1); //¯®«®á  á«¥¢ 
Line 555... Line 580...
555 
	DrawBar(x+2,y+2,width-3,height-3,color); //§ «¨¢ª 
 580 
	DrawBar(x+2,y+2,width-3,height-3,color); //§ «¨¢ª 
556 
	IF (id<>0)	DefineButton(x,y,width,height,id+BT_HIDE,0xEFEBEF); //ª­®¯ª 
 581 
	IF (id<>0)	DefineButton(x,y,width,height,id+BT_HIDE,0xEFEBEF); //ª­®¯ª 
557 
	WriteText(-strlen(text)*6+width/2+x+1,height/2-3+y,0x80,0,text,0);
 582 
	WriteText(-strlen(text)*6+width/2+x+1,height/2-3+y,0x80,0,text,0);
558 
}
 583 
}
Line 559... Line 584...
559 
 
 584 
 
560 
void DrawCircle(int x, y, r)
 585 
:void DrawCircle(int x, y, r)
561 
{
 586 
{
562 
	int i; float px=0, py=r, ii = r * 3.1415926 * 2;
 587 
	int i; float px=0, py=r, ii = r * 3.1415926 * 2;
563 
	FOR (i = 0; i < ii; i++)
 588 
	FOR (i = 0; i < ii; i++)
564 
	{
 589 
	{