Subversion Repositories Kolibri OS

Rev

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

Rev 935 Rev 937
Line 10... Line 10...
10 
			CASE evKey: IF (GetKey()==27) ExitProcess(); break;
 10 
			CASE evKey: IF (GetKey()==27) ExitProcess(); break;
11 
			CASE evReDraw:
 11 
			CASE evReDraw:
12 
				WindowRedrawStatus(1);
 12 
				WindowRedrawStatus(1);
13 
				DefineAndDrawWindow(500,200,181,256,0x04,0x10EFEBEF,0,0,"About Eolite");
 13 
				DefineAndDrawWindow(500,200,181,256,0x04,0x10EFEBEF,0,0,"About Eolite");
14 
				DrawBar(5,0,172,50,0x8494C4); //ãîëóáîå ñçàäè
 14 
				DrawBar(5,0,172,50,0x8494C4); //ãîëóáîå ñçàäè
15 
				//PutImage(#logo,85,85,48,7);
 - 
 
16 
				PutPaletteImage(#logo,85,85,48,7,#logo_pal);
 15 
				PutPaletteImage(#logo,85,85,48,7,#logo_pal);
17 
				WriteText(38,100,0x80,0xBF40BF,"Eolite v0.97 beta7",0);
 16 
				WriteText(32,100,0x80,0xBF40BF,"Eolite v0.97.1 beta7",0);
18 
				WriteText(68,120,0x80,0,"Authors:",0);
17 
				WriteText(60,120,0x80,0,"Developers:",0);
19 
				WriteText(44,130,0x80,0,"Leency & Veliant",0);
18 
				WriteText(44,130,0x80,0,"Leency & Veliant",0);
20 
				WriteText(50,140,0x80,0,"KolibriOS Team",0);
19 
				WriteText(35,140,0x80,0,"Lrz, Diamond, Nable",0);
21 
				WriteText(26,160,0x80,0,"Made using C-- in 2008",0);
 20 
				WriteText(26,160,0x80,0,"Made using C-- in 2008",0);
22 
				WriteText(23,170,0x80,0,"Visit www.kolibrios.org",0);
 21 
				WriteText(23,170,0x80,0,"Visit www.kolibrios.org",0);
23 
				DrawFlatButton(90,190,70,22,2,0xE4DFE1, "Close");
 22 
				DrawFlatButton(90,190,70,22,2,0xE4DFE1, "Close");
24 
				WindowRedrawStatus(2);
 23 
				WindowRedrawStatus(2);
25 
		}
 24 
		}
Line 27... Line 26...
27 
}
 26 
}
Line 28... Line 27...
28 
 
 27 
 
29 
 
 28 
 
30 
dword ConvertSize(dword bytes)
 29 
dword ConvertSize(dword bytes)
31 
{
 30 
{
32 
	byte size_prefix[7], temp[3];
 31 
	char size_prefix[7], temp[3];
33 
	IF (bytes>=1073741824) copystr(" Gb",#temp);
 32 
	IF (bytes>=1073741824) copystr(" Gb",#temp);
34 
	ELSE IF (bytes>=1048576) copystr(" Mb",#temp);
 33 
	ELSE IF (bytes>=1048576) copystr(" Mb",#temp);
35 
	ELSE IF (bytes>=1024) copystr(" Kb",#temp);
 34 
	ELSE IF (bytes>=1024) copystr(" Kb",#temp);