Details | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
3363 | leency | 1 | #define MEMSIZE 0x3E80 |
3225 | leency | 2 | |
5640 | pavelyakov | 3 | #include "../lib/io.h" |
4 | |||
3225 | leency | 5 | void main() |
6 | { |
||
5641 | pavelyakov | 7 | int id, key, i; |
8 | dword file; |
||
5651 | pavelyakov | 9 | |
5648 | pavelyakov | 10 | io.dir.load(0,DIR_ONLYREAL); |
3225 | leency | 11 | loop() |
12 | { |
||
13 | switch(WaitEvent()) |
||
14 | { |
||
15 | case evButton: |
||
16 | id=GetButtonID(); |
||
17 | if (id==1) ExitProcess(); |
||
18 | break; |
||
19 | |||
20 | case evKey: |
||
21 | key = GetKey(); |
||
5598 | pavelyakov | 22 | if (key==013){ //Enter |
5641 | pavelyakov | 23 | draw_window(); |
5646 | pavelyakov | 24 | |
3225 | leency | 25 | } |
26 | break; |
||
27 | |||
28 | case evReDraw: |
||
29 | draw_window(); |
||
30 | break; |
||
31 | } |
||
32 | } |
||
33 | } |
||
34 | void draw_window() |
||
35 | { |
||
3363 | leency | 36 | proc_info Form; |
5646 | pavelyakov | 37 | int i; |
38 | i=0; |
||
3225 | leency | 39 | DefineAndDrawWindow(215,100,250,200,0x34,0xFFFFFF,"Window header"); |
3363 | leency | 40 | GetProcessInfo(#Form, SelfInfo); |
5646 | pavelyakov | 41 | while(i |
42 | { |
||
43 | WriteText(5,i*8+3,0x80,0xFF00FF,io.dir.position(i)); |
||
44 | i++; |
||
45 | } |
||
4718 | leency | 46 | WriteText(10,110,0x80,0,#param); |
5648 | pavelyakov | 47 | } |