Rev 5651 | 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; |
||
| 5648 | pavelyakov | 9 | io.dir.load(0,DIR_ONLYREAL); |
| 3225 | leency | 10 | loop() |
| 11 | { |
||
| 12 | switch(WaitEvent()) |
||
| 13 | { |
||
| 14 | case evButton: |
||
| 15 | id=GetButtonID(); |
||
| 16 | if (id==1) ExitProcess(); |
||
| 17 | break; |
||
| 18 | |||
| 19 | case evKey: |
||
| 20 | key = GetKey(); |
||
| 5598 | pavelyakov | 21 | if (key==013){ //Enter |
| 5641 | pavelyakov | 22 | draw_window(); |
| 5646 | pavelyakov | 23 | |
| 3225 | leency | 24 | } |
| 25 | break; |
||
| 26 | |||
| 27 | case evReDraw: |
||
| 28 | draw_window(); |
||
| 29 | break; |
||
| 30 | } |
||
| 31 | } |
||
| 32 | } |
||
| 33 | void draw_window() |
||
| 34 | { |
||
| 3363 | leency | 35 | proc_info Form; |
| 5646 | pavelyakov | 36 | int i; |
| 37 | i=0; |
||
| 3225 | leency | 38 | DefineAndDrawWindow(215,100,250,200,0x34,0xFFFFFF,"Window header"); |
| 3363 | leency | 39 | GetProcessInfo(#Form, SelfInfo); |
| 5646 | pavelyakov | 40 | while(i |
| 41 | { |
||
| 42 | WriteText(5,i*8+3,0x80,0xFF00FF,io.dir.position(i)); |
||
| 43 | i++; |
||
| 44 | } |
||
| 4718 | leency | 45 | WriteText(10,110,0x80,0,#param); |
| 5648 | pavelyakov | 46 | } |