Subversion Repositories Kolibri OS

Rev

Rev 5149 | Rev 5428 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
4042 leency 1
//Leency 2008-2013
2
 
3
#define EDITOR_PATH     "/sys/tinypad"
4
#define BROWSER_PATH    "/sys/htmlv"
5
#define BROWSER_LINK    "http://kolibri-n.org/index.php"
6
 
7
#ifdef LANG_RUS
8
	?define INTRO_TEXT_1 "О Eolite"
9
	?define INTRO_TEXT_2 "Разработчики:"
10
	?define INTRO_TEXT_3 "Посетите"
11
	?define INTRO_TEXT_4 "Закрыть"
12
#elif LANG_EST
13
	?define INTRO_TEXT_1 "Programmis Eolite"
14
	?define INTRO_TEXT_2 "Arendajad:"
15
	?define INTRO_TEXT_3 "K№lasta"
16
	?define INTRO_TEXT_4 "Sulge"
17
#else
18
	?define INTRO_TEXT_1 "About Eolite"
19
	?define INTRO_TEXT_2 "Developers:"
20
	?define INTRO_TEXT_3 "Visit"
21
	?define INTRO_TEXT_4 "Close"
22
#endif
23
 
24
void about_dialog()
25
{
26
	byte id;
27
	IF (active_about) ExitProcess();
28
	active_about=1;
29
	loop() switch(WaitEvent())
30
	{
31
		case evButton:
32
				id=GetButtonID();
33
				IF (id==1) || (id==10)
34
				{
35
					active_about=0;
36
					ExitProcess();
37
				}
38
				IF (id==23) RunProgram(BROWSER_PATH, BROWSER_LINK);
39
				break;
40
 
41
		case evKey:
42
				IF (GetKey()==27)
43
				{
44
					active_about=0;
45
					ExitProcess();
46
				}
47
				break;
48
 
49
		case evReDraw:
4076 leency 50
				DefineAndDrawWindow(600,150,181,228+GetSkinHeight(),0x34,sc.work,INTRO_TEXT_1);
4042 leency 51
				DrawBar(0,0,172,50,0x8494C4);
52
				PutPaletteImage(#logo,85,85,43,7,8,#logo_pal);
53
				WriteTextB(46,100,0x90,0xBF40BF,ABOUT_TITLE);
54
				#ifdef LANG_RUS
55
				WriteText(50,120,0x80,0,INTRO_TEXT_2);
56
				#else
57
				WriteText(55,120,0x80,0,INTRO_TEXT_2);
58
				#endif
59
				WriteText(39,130,0x80,0,"Leency & Veliant");
60
				WriteText(45,140,0x80,0,"KolibriOS Team");
5401 leency 61
				WriteText(61,150,0x80,0,"2008-2015");
4042 leency 62
				#ifdef LANG_RUS
63
				WriteText(19,170,0x80,0,INTRO_TEXT_3);
64
				#else
65
				WriteText(29,170,0x80,0,INTRO_TEXT_3);
66
				#endif
67
				DrawLink(71,170,0x80,23, "kolibri-n.org");
68
				DrawFlatButton(85,190,70,22,10,0xE4DFE1, INTRO_TEXT_4);
69
	}
70
}