Rev 720 | Go to most recent revision | Details | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
719 | jacekm | 1 | #asm |
2 | use32 |
||
3 | org 0x0 |
||
4 | |||
5 | db 'MENUET01' |
||
6 | dd 0x01 |
||
7 | dd _main |
||
8 | dd I_END |
||
9 | dd 0x100000 |
||
10 | dd 0x7fff0 |
||
11 | dd 0x0,0x0 |
||
12 | |||
13 | include 'INTRINS.ASM' |
||
14 | #endasm |
||
15 | |||
16 | #include "klib.h" |
||
17 | |||
18 | void main() |
||
19 | {int event; |
||
20 | int button_id; |
||
21 | |||
22 | draw_window(); |
||
23 | while(1) |
||
24 | { |
||
25 | event=s_get_event(); |
||
26 | switch(event) |
||
27 | { |
||
28 | case 1: draw_window(); break; |
||
29 | case 2: get_button(); break; |
||
30 | case 3: button_id=get_button(); |
||
31 | if(button_id==1) s_quit(); |
||
32 | break; |
||
33 | } |
||
34 | } |
||
35 | } |
||
36 | |||
37 | char text1[50]="THIS IS AN EXAMPLE OF C"; |
||
38 | char text2[50]="PROGRAM IN KOLIBRIOS"; |
||
39 | char text3[50]=""; |
||
40 | char text4[50]="SUCCESS"; |
||
41 | int p_text[4]; |
||
42 | |||
43 | draw_window() |
||
44 | {int i; /* for index */ |
||
45 | int y;y=25; |
||
46 | |||
47 | p_text[0]=&text1[0]; |
||
48 | p_text[1]=&text2[0]; |
||
49 | p_text[2]=&text3[0]; |
||
50 | p_text[3]=&text4[0]; |
||
51 | |||
52 | begin_draw(); |
||
53 | |||
54 | window(100,100,320,150,0x03ffffff,0x805080d0,0x005080d0); |
||
55 | label(8,8,0x10ddeeff,"Example application"); |
||
56 | buttonT(50,35,60,12,0x111111,1, "Click Me!", 0xFFFFFF); |
||
57 | |||
58 | for(i=0;i<4;i++) |
||
59 | label(20,40+(y+=10),0x000000,p_text[i]); |
||
60 | |||
61 | end_draw(); |
||
62 | } |
||
63 | |||
64 | #asm |
||
65 | I_END: |
||
66 | #endasm4;i++) |
||
67 |