ț "<Obey$Dir>.Wimp"
�Wimp_Start("Task",306,58)
�User_SetInitialData
(�Create_Windows
2�Wimp_WaitForEvent
<�Wimp_CloseDown
F�
P:
Z� �User_SetInitialData
d�
n:
x� �Create_Windows
��Wimp_SpritesLoad
�)Main_Window%=�Wimp_WindowLoad("Main")
�(�Wimp_WindowBringToTop(Main_Window%)
��
�:
�� �Event_Save(window%)=�
�:
�&� �Event_Sprites(window%)=sprites%
�:
�� �Event_Menu(window%)=�
�:
�*� �Event_WindowClose(window%,buttons%)
� Ȏ window% �

"  � Main_Window% : finished%=�

 �

�

":

,.� �Event_Draw(window%,x_origin%,y_origin%)

6 Ȏ window% �

@+  � Main_Window% : �User_DrawMainWindow

J  �

T�

^:

h� �User_DrawMainWindow

r�

|:

�4� �Event_MouseClick(window%,icon%,button%,x%,y%)

��

�:

�)� �Event_KeyPress(window%,icon%,key%)

��

�:

�� �Event_MenuChoice(menu%)

��

�:

�"� �Event_LoadFile(file$,type$)

��

�:

�$� �Event_SaveFile(file$,window%)
�

�

00000000  0d 00 0a 18 c8 9b 20 22  3c 4f 62 65 79 24 44 69  |...... "<Obey$Di|
00000010  72 3e 2e 57 69 6d 70 22  0d 00 14 1e f2 57 69 6d  |r>.Wimp".....Wim|
00000020  70 5f 53 74 61 72 74 28  22 54 61 73 6b 22 2c 33  |p_Start("Task",3|
00000030  30 36 2c 35 38 29 0d 00  1e 18 f2 55 73 65 72 5f  |06,58).....User_|
00000040  53 65 74 49 6e 69 74 69  61 6c 44 61 74 61 0d 00  |SetInitialData..|
00000050  28 13 f2 43 72 65 61 74  65 5f 57 69 6e 64 6f 77  |(..Create_Window|
00000060  73 0d 00 32 16 f2 57 69  6d 70 5f 57 61 69 74 46  |s..2..Wimp_WaitF|
00000070  6f 72 45 76 65 6e 74 0d  00 3c 13 f2 57 69 6d 70  |orEvent..<..Wimp|
00000080  5f 43 6c 6f 73 65 44 6f  77 6e 0d 00 46 05 e0 0d  |_CloseDown..F...|
00000090  00 50 05 3a 0d 00 5a 1a  dd 20 f2 55 73 65 72 5f  |.P.:..Z.. .User_|
000000a0  53 65 74 49 6e 69 74 69  61 6c 44 61 74 61 0d 00  |SetInitialData..|
000000b0  64 05 e1 0d 00 6e 05 3a  0d 00 78 15 dd 20 f2 43  |d....n.:..x.. .C|
000000c0  72 65 61 74 65 5f 57 69  6e 64 6f 77 73 0d 00 82  |reate_Windows...|
000000d0  15 f2 57 69 6d 70 5f 53  70 72 69 74 65 73 4c 6f  |..Wimp_SpritesLo|
000000e0  61 64 0d 00 8c 29 4d 61  69 6e 5f 57 69 6e 64 6f  |ad...)Main_Windo|
000000f0  77 25 3d a4 57 69 6d 70  5f 57 69 6e 64 6f 77 4c  |w%=.Wimp_WindowL|
00000100  6f 61 64 28 22 4d 61 69  6e 22 29 0d 00 96 28 f2  |oad("Main")...(.|
00000110  57 69 6d 70 5f 57 69 6e  64 6f 77 42 72 69 6e 67  |Wimp_WindowBring|
00000120  54 6f 54 6f 70 28 4d 61  69 6e 5f 57 69 6e 64 6f  |ToTop(Main_Windo|
00000130  77 25 29 0d 00 a0 05 e1  0d 00 aa 05 3a 0d 00 b4  |w%).........:...|
00000140  1c dd 20 a4 45 76 65 6e  74 5f 53 61 76 65 28 77  |.. .Event_Save(w|
00000150  69 6e 64 6f 77 25 29 3d  a3 0d 00 be 05 3a 0d 00  |indow%)=.....:..|
00000160  c8 26 dd 20 a4 45 76 65  6e 74 5f 53 70 72 69 74  |.&. .Event_Sprit|
00000170  65 73 28 77 69 6e 64 6f  77 25 29 3d 73 70 72 69  |es(window%)=spri|
00000180  74 65 73 25 0d 00 d2 05  3a 0d 00 dc 1c dd 20 a4  |tes%....:..... .|
00000190  45 76 65 6e 74 5f 4d 65  6e 75 28 77 69 6e 64 6f  |Event_Menu(windo|
000001a0  77 25 29 3d a3 0d 00 e6  05 3a 0d 00 f0 2a dd 20  |w%)=.....:...*. |
000001b0  f2 45 76 65 6e 74 5f 57  69 6e 64 6f 77 43 6c 6f  |.Event_WindowClo|
000001c0  73 65 28 77 69 6e 64 6f  77 25 2c 62 75 74 74 6f  |se(window%,butto|
000001d0  6e 73 25 29 0d 00 fa 11  20 c8 8e 20 77 69 6e 64  |ns%).... .. wind|
000001e0  6f 77 25 20 ca 0d 01 04  22 20 20 c9 20 4d 61 69  |ow% ...."  . Mai|
000001f0  6e 5f 57 69 6e 64 6f 77  25 20 3a 20 66 69 6e 69  |n_Window% : fini|
00000200  73 68 65 64 25 3d b9 0d  01 0e 06 20 cb 0d 01 18  |shed%=..... ....|
00000210  05 e1 0d 01 22 05 3a 0d  01 2c 2e dd 20 f2 45 76  |....".:..,.. .Ev|
00000220  65 6e 74 5f 44 72 61 77  28 77 69 6e 64 6f 77 25  |ent_Draw(window%|
00000230  2c 78 5f 6f 72 69 67 69  6e 25 2c 79 5f 6f 72 69  |,x_origin%,y_ori|
00000240  67 69 6e 25 29 0d 01 36  11 20 c8 8e 20 77 69 6e  |gin%)..6. .. win|
00000250  64 6f 77 25 20 ca 0d 01  40 2b 20 20 c9 20 4d 61  |dow% ...@+  . Ma|
00000260  69 6e 5f 57 69 6e 64 6f  77 25 20 3a 20 f2 55 73  |in_Window% : .Us|
00000270  65 72 5f 44 72 61 77 4d  61 69 6e 57 69 6e 64 6f  |er_DrawMainWindo|
00000280  77 0d 01 4a 07 20 20 cb  0d 01 54 05 e1 0d 01 5e  |w..J.  ...T....^|
00000290  05 3a 0d 01 68 1a dd 20  f2 55 73 65 72 5f 44 72  |.:..h.. .User_Dr|
000002a0  61 77 4d 61 69 6e 57 69  6e 64 6f 77 0d 01 72 05  |awMainWindow..r.|
000002b0  e1 0d 01 7c 05 3a 0d 01  86 34 dd 20 f2 45 76 65  |...|.:...4. .Eve|
000002c0  6e 74 5f 4d 6f 75 73 65  43 6c 69 63 6b 28 77 69  |nt_MouseClick(wi|
000002d0  6e 64 6f 77 25 2c 69 63  6f 6e 25 2c 62 75 74 74  |ndow%,icon%,butt|
000002e0  6f 6e 25 2c 78 25 2c 79  25 29 0d 01 90 05 e1 0d  |on%,x%,y%)......|
000002f0  01 9a 05 3a 0d 01 a4 29  dd 20 f2 45 76 65 6e 74  |...:...). .Event|
00000300  5f 4b 65 79 50 72 65 73  73 28 77 69 6e 64 6f 77  |_KeyPress(window|
00000310  25 2c 69 63 6f 6e 25 2c  6b 65 79 25 29 0d 01 ae  |%,icon%,key%)...|
00000320  05 e1 0d 01 b8 05 3a 0d  01 c2 1e dd 20 f2 45 76  |......:..... .Ev|
00000330  65 6e 74 5f 4d 65 6e 75  43 68 6f 69 63 65 28 6d  |ent_MenuChoice(m|
00000340  65 6e 75 25 29 0d 01 cc  05 e1 0d 01 d6 05 3a 0d  |enu%).........:.|
00000350  01 e0 22 dd 20 f2 45 76  65 6e 74 5f 4c 6f 61 64  |..". .Event_Load|
00000360  46 69 6c 65 28 66 69 6c  65 24 2c 74 79 70 65 24  |File(file$,type$|
00000370  29 0d 01 ea 05 e1 0d 01  f4 05 3a 0d 01 fe 24 dd  |).........:...$.|
00000380  20 f2 45 76 65 6e 74 5f  53 61 76 65 46 69 6c 65  | .Event_SaveFile|
00000390  28 66 69 6c 65 24 2c 77  69 6e 64 6f 77 25 29 0d  |(file$,window%).|
000003a0  02 08 05 e1 0d 02 12 04  0d ff                    |..........|
000003aa