Rev 5674 | Rev 5723 | 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 | |||
5581 | leency | 3 | #define BROWSER_PATH "/sys/network/webview" |
4042 | leency | 4 | #define BROWSER_LINK "http://kolibri-n.org/index.php" |
5 | |||
6 | #ifdef LANG_RUS |
||
7 | ?define INTRO_TEXT_1 "О Eolite" |
||
8 | ?define INTRO_TEXT_2 "Разработчики:" |
||
9 | ?define INTRO_TEXT_3 "Посетите" |
||
10 | ?define INTRO_TEXT_4 "Закрыть" |
||
11 | #elif LANG_EST |
||
12 | ?define INTRO_TEXT_1 "Programmis Eolite" |
||
13 | ?define INTRO_TEXT_2 "Arendajad:" |
||
14 | ?define INTRO_TEXT_3 "K№lasta" |
||
15 | ?define INTRO_TEXT_4 "Sulge" |
||
16 | #else |
||
17 | ?define INTRO_TEXT_1 "About Eolite" |
||
18 | ?define INTRO_TEXT_2 "Developers:" |
||
19 | ?define INTRO_TEXT_3 "Visit" |
||
20 | ?define INTRO_TEXT_4 "Close" |
||
21 | #endif |
||
22 | |||
23 | void about_dialog() |
||
24 | { |
||
25 | byte id; |
||
5481 | leency | 26 | proc_info about_form; |
27 | |||
5576 | pavelyakov | 28 | IF (active_about){cmd_free = 2;ExitProcess();} |
4042 | leency | 29 | active_about=1; |
30 | loop() switch(WaitEvent()) |
||
31 | { |
||
32 | case evButton: |
||
33 | id=GetButtonID(); |
||
34 | IF (id==1) || (id==10) |
||
35 | { |
||
36 | active_about=0; |
||
5576 | pavelyakov | 37 | cmd_free = 2; |
4042 | leency | 38 | ExitProcess(); |
39 | } |
||
40 | IF (id==23) RunProgram(BROWSER_PATH, BROWSER_LINK); |
||
41 | break; |
||
42 | |||
43 | case evKey: |
||
44 | IF (GetKey()==27) |
||
45 | { |
||
46 | active_about=0; |
||
5576 | pavelyakov | 47 | cmd_free = 2; |
4042 | leency | 48 | ExitProcess(); |
49 | } |
||
50 | break; |
||
51 | |||
52 | case evReDraw: |
||
5685 | leency | 53 | DefineAndDrawWindow(Form.left+Form.width/2,Form.top+Form.height/2-114,300,248+GetSkinHeight(),0x34,system.color.work,INTRO_TEXT_1); |
5481 | leency | 54 | GetProcessInfo(#about_form, SelfInfo); |
55 | if (Form.status_window>2) break; |
||
56 | DrawBar(0,0,about_form.cwidth,50,0x8494C4); |
||
5685 | leency | 57 | PutPaletteImage(#logo,85,85,about_form.cwidth/2-43,7,8,#logo_pal); |
58 | WriteTextB(about_form.cwidth/2-66,100,0x81,0xBF40BF,ABOUT_TITLE); |
||
59 | WriteTextCenter(0,130,about_form.cwidth,0,INTRO_TEXT_2); |
||
60 | WriteTextCenter(0,143,about_form.cwidth,0,"Leency Veliant PunkJoker Pavelyakov"); |
||
61 | WriteTextCenter(0,156,about_form.cwidth,0,"KolibriOS Team"); |
||
62 | WriteTextCenter(0,169,about_form.cwidth,0,"2008-2015"); |
||
63 | WriteTextCenter(10,182,about_form.width-125,0,INTRO_TEXT_3); |
||
64 | DrawLink(about_form.cwidth/2-15,182,0x80,23, "kolibri-n.org"); |
||
65 | DrawFlatButton(about_form.cwidth/2-35,about_form.cheight-35,70,22,10,0xE4DFE1, INTRO_TEXT_4); |
||
4042 | leency | 66 | } |
5685 | leency | 67 | } |