Rev 5648 | Go to most recent revision | Details | Compare with Previous | 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 | } |