/ The Datafile PD-CD 5 / DATAFILE_PDCD5.iso / utilities / c / customise / !Customise / !RunImage

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 44 10 9f e5 3c 20 9f e5 | 34 30 9f e5 04 00 12 e4 |D...< ..|40......|
|00000010| 04 00 03 e4 04 10 51 e2 | fb ff ff 5a 00 00 8f e2 |......Q.|...Z....|
|00000020| 05 00 00 ef 42 41 53 49 | 43 20 2d 51 75 69 74 20 |....BASI|C -Quit |
|00000030| 40 30 30 30 30 39 30 30 | 30 2c 30 30 30 30 42 34 |@0000900|0,0000B4|
|00000040| 32 34 00 00 24 b4 00 00 | 80 a4 00 00 24 24 00 00 |24..$...|....$$..|
|00000050| 4c 6f 66 74 79 20 26 20 | 53 74 75 65 0d 00 0a 0f |Lofty & |Stue....|
|00000060| f4 3e 21 52 75 6e 49 6d | 61 67 65 0d 00 14 29 62 |.>!RunIm|age...)b|
|00000070| 6c 6f 63 6b 5f 6d 65 6d | 6f 72 79 25 3d 26 31 30 |lock_mem|ory%=&10|
|00000080| 30 30 3a 69 63 6f 6e 5f | 6d 65 6d 6f 72 79 25 3d |00:icon_|memory%=|
|00000090| 31 32 30 30 0d 00 1e 22 | 54 61 73 6b 24 3d a4 57 |1200..."|Task$=.W|
|000000a0| 69 6d 70 5f 53 74 61 72 | 74 28 22 43 75 73 74 6f |imp_Star|t("Custo|
|000000b0| 6d 69 73 65 22 29 0d 00 | 28 0c 66 69 6c 65 72 25 |mise")..|(.filer%|
|000000c0| 3d 31 0d 00 32 0c 72 61 | 64 69 6f 25 3d 31 0d 00 |=1..2.ra|dio%=1..|
|000000d0| 3c 0c 74 6f 6f 6c 73 25 | 3d 31 0d 00 46 4b 49 6e |<.tools%|=1..FKIn|
|000000e0| 66 6f 5f 57 69 6e 64 6f | 77 25 3d a4 57 69 6d 70 |fo_Windo|w%=.Wimp|
|000000f0| 5f 57 69 6e 64 6f 77 4c | 6f 61 64 46 72 6f 6d 54 |_WindowL|oadFromT|
|00000100| 65 6d 70 6c 61 74 65 28 | 22 49 6e 66 6f 22 2c 22 |emplate(|"Info","|
|00000110| 3c 52 65 73 24 44 69 72 | 3e 2e 54 65 6d 70 6c 61 |<Res$Dir|>.Templa|
|00000120| 74 65 73 22 29 0d 00 50 | 4d 52 61 64 69 6f 5f 57 |tes")..P|MRadio_W|
|00000130| 69 6e 64 6f 77 25 3d a4 | 57 69 6d 70 5f 57 69 6e |indow%=.|Wimp_Win|
|00000140| 64 6f 77 4c 6f 61 64 46 | 72 6f 6d 54 65 6d 70 6c |dowLoadF|romTempl|
|00000150| 61 74 65 28 22 52 61 64 | 69 6f 22 2c 22 3c 52 65 |ate("Rad|io","<Re|
|00000160| 73 24 44 69 72 3e 2e 54 | 65 6d 70 6c 61 74 65 73 |s$Dir>.T|emplates|
|00000170| 22 29 0d 00 5a 49 57 69 | 6e 5f 57 69 6e 64 6f 77 |")..ZIWi|n_Window|
|00000180| 25 3d a4 57 69 6d 70 5f | 57 69 6e 64 6f 77 4c 6f |%=.Wimp_|WindowLo|
|00000190| 61 64 46 72 6f 6d 54 65 | 6d 70 6c 61 74 65 28 22 |adFromTe|mplate("|
|000001a0| 57 69 6e 22 2c 22 3c 52 | 65 73 24 44 69 72 3e 2e |Win","<R|es$Dir>.|
|000001b0| 54 65 6d 70 6c 61 74 65 | 73 22 29 0d 00 64 4d 46 |Template|s")..dMF|
|000001c0| 69 6c 65 72 5f 57 69 6e | 64 6f 77 25 3d a4 57 69 |iler_Win|dow%=.Wi|
|000001d0| 6d 70 5f 57 69 6e 64 6f | 77 4c 6f 61 64 46 72 6f |mp_Windo|wLoadFro|
|000001e0| 6d 54 65 6d 70 6c 61 74 | 65 28 22 46 69 6c 65 72 |mTemplat|e("Filer|
|000001f0| 22 2c 22 3c 52 65 73 24 | 44 69 72 3e 2e 54 65 6d |","<Res$|Dir>.Tem|
|00000200| 70 6c 61 74 65 73 22 29 | 0d 00 6e 4b 53 61 76 65 |plates")|..nKSave|
|00000210| 5f 57 69 6e 64 6f 77 25 | 3d a4 57 69 6d 70 5f 57 |_Window%|=.Wimp_W|
|00000220| 69 6e 64 6f 77 4c 6f 61 | 64 46 72 6f 6d 54 65 6d |indowLoa|dFromTem|
|00000230| 70 6c 61 74 65 28 22 53 | 61 76 65 22 2c 22 3c 52 |plate("S|ave","<R|
|00000240| 65 73 24 44 69 72 3e 2e | 54 65 6d 70 6c 61 74 65 |es$Dir>.|Template|
|00000250| 73 22 29 0d 00 78 45 42 | 61 72 5f 49 63 6f 6e 25 |s")..xEB|ar_Icon%|
|00000260| 3d a4 57 69 6d 70 5f 49 | 63 6f 6e 43 72 65 61 74 |=.Wimp_I|conCreat|
|00000270| 65 28 2d 31 2c 30 2c 30 | 2c 36 38 2c 36 38 2c 26 |e(-1,0,0|,68,68,&|
|00000280| 33 30 30 32 2c 22 21 43 | 75 73 74 6f 6d 69 73 65 |3002,"!C|ustomise|
|00000290| 22 2c 30 2c 30 2c 30 29 | 0d 00 82 5b 42 61 72 5f |",0,0,0)|...[Bar_|
|000002a0| 4d 65 6e 75 25 3d a4 57 | 69 6d 70 5f 4d 65 6e 75 |Menu%=.W|imp_Menu|
|000002b0| 43 72 65 61 74 65 28 22 | 43 75 73 74 6f 6d 69 73 |Create("|Customis|
|000002c0| 65 5c 49 6e 66 6f 3e 49 | 6e 66 6f 5f 57 69 6e 64 |e\Info>I|nfo_Wind|
|000002d0| 6f 77 25 5c 57 69 6e 64 | 6f 77 73 5c 46 69 6c 65 |ow%\Wind|ows\File|
|000002e0| 72 5c 52 61 64 69 6f 5c | 53 61 76 65 5c 51 75 69 |r\Radio\|Save\Qui|
|000002f0| 74 22 29 0d 00 8c 44 52 | 61 64 69 6f 5f 4d 65 6e |t")...DR|adio_Men|
|00000300| 75 25 3d a4 57 69 6d 70 | 5f 4d 65 6e 75 43 72 65 |u%=.Wimp|_MenuCre|
|00000310| 61 74 65 28 22 43 75 73 | 74 6f 6d 69 73 65 5c 49 |ate("Cus|tomise\I|
|00000320| 6e 66 6f 3e 49 6e 66 6f | 5f 57 69 6e 64 6f 77 25 |nfo>Info|_Window%|
|00000330| 5c 51 75 69 74 22 29 0d | 00 96 42 57 69 6e 5f 4d |\Quit").|..BWin_M|
|00000340| 65 6e 75 25 3d a4 57 69 | 6d 70 5f 4d 65 6e 75 43 |enu%=.Wi|mp_MenuC|
|00000350| 72 65 61 74 65 28 22 43 | 75 73 74 6f 6d 69 73 65 |reate("C|ustomise|
|00000360| 5c 49 6e 66 6f 3e 49 6e | 66 6f 5f 57 69 6e 64 6f |\Info>In|fo_Windo|
|00000370| 77 25 5c 51 75 69 74 22 | 29 0d 00 a0 44 46 69 6c |w%\Quit"|)...DFil|
|00000380| 65 72 5f 4d 65 6e 75 25 | 3d a4 57 69 6d 70 5f 4d |er_Menu%|=.Wimp_M|
|00000390| 65 6e 75 43 72 65 61 74 | 65 28 22 43 75 73 74 6f |enuCreat|e("Custo|
|000003a0| 6d 69 73 65 5c 49 6e 66 | 6f 3e 49 6e 66 6f 5f 57 |mise\Inf|o>Info_W|
|000003b0| 69 6e 64 6f 77 25 5c 51 | 75 69 74 22 29 0d 00 aa |indow%\Q|uit")...|
|000003c0| 43 53 61 76 65 5f 4d 65 | 6e 75 25 3d a4 57 69 6d |CSave_Me|nu%=.Wim|
|000003d0| 70 5f 4d 65 6e 75 43 72 | 65 61 74 65 28 22 43 75 |p_MenuCr|eate("Cu|
|000003e0| 73 74 6f 6d 69 73 65 5c | 49 6e 66 6f 3e 49 6e 66 |stomise\|Info>Inf|
|000003f0| 6f 5f 57 69 6e 64 6f 77 | 25 5c 51 75 69 74 22 29 |o_Window|%\Quit")|
|00000400| 0d 00 b4 16 f2 57 69 6d | 70 5f 57 61 69 74 46 6f |.....Wim|p_WaitFo|
|00000410| 72 45 76 65 6e 74 0d 00 | be 13 f2 57 69 6d 70 5f |rEvent..|...Wimp_|
|00000420| 43 6c 6f 73 65 44 6f 77 | 6e 0d 00 c8 05 e0 0d 00 |CloseDow|n.......|
|00000430| d2 05 3a 0d 00 dc 25 dd | 20 f2 45 76 65 6e 74 5f |..:...%.| .Event_|
|00000440| 4d 65 6e 75 50 6f 70 55 | 70 28 77 69 6e 64 6f 77 |MenuPopU|p(window|
|00000450| 25 2c 78 25 2c 79 25 29 | 0d 00 e6 10 c8 8e 20 77 |%,x%,y%)|...... w|
|00000460| 69 6e 64 6f 77 25 20 ca | 0d 00 f0 31 c9 20 42 61 |indow% .|...1. Ba|
|00000470| 72 5f 57 69 6e 64 6f 77 | 25 20 20 20 20 20 3a 20 |r_Window|%     : |
|00000480| f2 57 69 6d 70 5f 4d 65 | 6e 75 50 6f 70 55 70 42 |.Wimp_Me|nuPopUpB|
|00000490| 61 72 28 78 25 2c 79 25 | 29 0d 00 fa 3a c9 20 52 |ar(x%,y%|)...:. R|
|000004a0| 61 64 69 6f 5f 57 69 6e | 64 6f 77 25 20 20 20 3a |adio_Win|dow%   :|
|000004b0| 20 f2 57 69 6d 70 5f 4d | 65 6e 75 50 6f 70 55 70 | .Wimp_M|enuPopUp|
|000004c0| 28 52 61 64 69 6f 5f 4d | 65 6e 75 25 2c 78 25 2c |(Radio_M|enu%,x%,|
|000004d0| 79 25 29 0d 01 04 38 c9 | 20 57 69 6e 5f 57 69 6e |y%)...8.| Win_Win|
|000004e0| 64 6f 77 25 20 20 20 20 | 20 3a 20 f2 57 69 6d 70 |dow%    | : .Wimp|
|000004f0| 5f 4d 65 6e 75 50 6f 70 | 55 70 28 57 69 6e 5f 4d |_MenuPop|Up(Win_M|
|00000500| 65 6e 75 25 2c 78 25 2c | 79 25 29 0d 01 0e 3a c9 |enu%,x%,|y%)...:.|
|00000510| 20 46 69 6c 65 72 5f 57 | 69 6e 64 6f 77 25 20 20 | Filer_W|indow%  |
|00000520| 20 3a 20 f2 57 69 6d 70 | 5f 4d 65 6e 75 50 6f 70 | : .Wimp|_MenuPop|
|00000530| 55 70 28 46 69 6c 65 72 | 5f 4d 65 6e 75 25 2c 78 |Up(Filer|_Menu%,x|
|00000540| 25 2c 79 25 29 0d 01 18 | 39 c9 20 53 61 76 65 5f |%,y%)...|9. Save_|
|00000550| 57 69 6e 64 6f 77 25 20 | 20 20 20 3a 20 f2 57 69 |Window% |   : .Wi|
|00000560| 6d 70 5f 4d 65 6e 75 50 | 6f 70 55 70 28 53 61 76 |mp_MenuP|opUp(Sav|
|00000570| 65 5f 4d 65 6e 75 25 2c | 78 25 2c 79 25 29 0d 01 |e_Menu%,|x%,y%)..|
|00000580| 22 05 cb 0d 01 2c 05 e1 | 0d 01 36 05 3a 0d 01 40 |"....,..|..6.:..@|
|00000590| 34 dd 20 f2 45 76 65 6e | 74 5f 4d 6f 75 73 65 43 |4. .Even|t_MouseC|
|000005a0| 6c 69 63 6b 28 62 75 74 | 74 6f 6e 25 2c 77 69 6e |lick(but|ton%,win|
|000005b0| 64 6f 77 25 2c 69 63 6f | 6e 25 2c 78 25 2c 79 25 |dow%,ico|n%,x%,y%|
|000005c0| 29 0d 01 4a 10 c8 8e 20 | 77 69 6e 64 6f 77 25 20 |)..J... |window% |
|000005d0| ca 0d 01 54 26 c9 20 42 | 61 72 5f 57 69 6e 64 6f |...T&. B|ar_Windo|
|000005e0| 77 25 20 20 20 20 20 3a | 20 f2 55 73 65 72 5f 4d |w%     :| .User_M|
|000005f0| 6f 75 73 65 42 61 72 0d | 01 5e 37 c9 20 52 61 64 |ouseBar.|.^7. Rad|
|00000600| 69 6f 5f 57 69 6e 64 6f | 77 25 20 20 20 3a 20 f2 |io_Windo|w%   : .|
|00000610| 55 73 65 72 5f 52 61 64 | 69 6f 4d 6f 75 73 65 28 |User_Rad|ioMouse(|
|00000620| 62 75 74 74 6f 6e 25 2c | 69 63 6f 6e 25 29 0d 01 |button%,|icon%)..|
|00000630| 68 35 c9 20 57 69 6e 5f | 57 69 6e 64 6f 77 25 20 |h5. Win_|Window% |
|00000640| 20 20 20 20 3a 20 f2 55 | 73 65 72 5f 57 69 6e 4d |    : .U|ser_WinM|
|00000650| 6f 75 73 65 28 62 75 74 | 74 6f 6e 25 2c 69 63 6f |ouse(but|ton%,ico|
|00000660| 6e 25 29 0d 01 72 37 c9 | 20 46 69 6c 65 72 5f 57 |n%)..r7.| Filer_W|
|00000670| 69 6e 64 6f 77 25 20 20 | 20 3a 20 f2 55 73 65 72 |indow%  | : .User|
|00000680| 5f 46 69 6c 65 72 4d 6f | 75 73 65 28 62 75 74 74 |_FilerMo|use(butt|
|00000690| 6f 6e 25 2c 69 63 6f 6e | 25 29 0d 01 7c 36 c9 20 |on%,icon|%)..|6. |
|000006a0| 53 61 76 65 5f 57 69 6e | 64 6f 77 25 20 20 20 20 |Save_Win|dow%    |
|000006b0| 3a 20 f2 55 73 65 72 5f | 53 61 76 65 4d 6f 75 73 |: .User_|SaveMous|
|000006c0| 65 28 62 75 74 74 6f 6e | 25 2c 69 63 6f 6e 25 29 |e(button|%,icon%)|
|000006d0| 0d 01 86 05 cb 0d 01 90 | 05 e1 0d 01 9a 05 3a 0d |........|......:.|
|000006e0| 01 a4 14 dd 20 f2 55 73 | 65 72 5f 4d 6f 75 73 65 |.... .Us|er_Mouse|
|000006f0| 42 61 72 0d 01 ae 27 f2 | 57 69 6d 70 5f 57 69 6e |Bar...'.|Wimp_Win|
|00000700| 64 6f 77 42 72 69 6e 67 | 54 6f 54 6f 70 28 57 69 |dowBring|ToTop(Wi|
|00000710| 6e 5f 57 69 6e 64 6f 77 | 25 29 0d 01 b8 05 e1 0d |n_Window|%)......|
|00000720| 01 c2 05 3a 0d 01 cc 25 | dd 20 f2 55 73 65 72 5f |...:...%|. .User_|
|00000730| 52 61 64 69 6f 4d 6f 75 | 73 65 28 62 75 74 74 6f |RadioMou|se(butto|
|00000740| 6e 25 2c 69 63 6f 6e 25 | 29 0d 01 d6 0e c8 8e 20 |n%,icon%|)...... |
|00000750| 69 63 6f 6e 25 20 ca 0d | 01 e0 13 c9 20 33 20 20 |icon% ..|.... 3  |
|00000760| 3a 20 72 61 64 69 6f 25 | 3d 31 0d 01 ea 13 c9 20 |: radio%|=1..... |
|00000770| 34 20 20 3a 20 72 61 64 | 69 6f 25 3d 32 0d 01 f4 |4  : rad|io%=2...|
|00000780| 13 c9 20 35 20 20 3a 20 | 72 61 64 69 6f 25 3d 33 |.. 5  : |radio%=3|
|00000790| 0d 01 fe 33 c9 20 39 20 | 20 3a 20 f2 75 70 64 61 |...3. 9 | : .upda|
|000007a0| 74 65 3a f2 57 69 6d 70 | 5f 57 69 6e 64 6f 77 43 |te:.Wimp|_WindowC|
|000007b0| 6c 6f 73 65 28 52 61 64 | 69 6f 5f 57 69 6e 64 6f |lose(Rad|io_Windo|
|000007c0| 77 25 29 0d 02 08 05 cb | 0d 02 12 05 e1 0d 02 1c |w%).....|........|
|000007d0| 05 3a 0d 02 26 22 dd f2 | 55 73 65 72 5f 57 69 6e |.:..&"..|User_Win|
|000007e0| 4d 6f 75 73 65 28 62 75 | 74 74 6f 6e 25 2c 69 63 |Mouse(bu|tton%,ic|
|000007f0| 6f 6e 25 29 0d 02 30 0e | c8 8e 20 69 63 6f 6e 25 |on%)..0.|.. icon%|
|00000800| 20 ca 0d 02 3a 13 c9 20 | 33 20 20 3a 20 74 6f 6f | ...:.. |3  : too|
|00000810| 6c 73 25 3d 31 0d 02 44 | 13 c9 20 34 20 20 3a 20 |ls%=1..D|.. 4  : |
|00000820| 74 6f 6f 6c 73 25 3d 32 | 0d 02 4e 13 c9 20 35 20 |tools%=2|..N.. 5 |
|00000830| 20 3a 20 74 6f 6f 6c 73 | 25 3d 33 0d 02 58 31 c9 | : tools|%=3..X1.|
|00000840| 20 36 20 20 3a 20 f2 75 | 70 64 61 74 65 3a f2 57 | 6  : .u|pdate:.W|
|00000850| 69 6d 70 5f 57 69 6e 64 | 6f 77 43 6c 6f 73 65 28 |imp_Wind|owClose(|
|00000860| 57 69 6e 5f 57 69 6e 64 | 6f 77 25 29 0d 02 62 05 |Win_Wind|ow%)..b.|
|00000870| cb 0d 02 6c 05 e1 0d 02 | 76 05 3a 0d 02 80 24 dd |...l....|v.:...$.|
|00000880| f2 55 73 65 72 5f 46 69 | 6c 65 72 4d 6f 75 73 65 |.User_Fi|lerMouse|
|00000890| 28 62 75 74 74 6f 6e 25 | 2c 69 63 6f 6e 25 29 0d |(button%|,icon%).|
|000008a0| 02 8a 0e c8 8e 20 69 63 | 6f 6e 25 20 ca 0d 02 94 |..... ic|on% ....|
|000008b0| 13 c9 20 33 20 20 3a 20 | 66 69 6c 65 72 25 3d 31 |.. 3  : |filer%=1|
|000008c0| 0d 02 9e 13 c9 20 36 20 | 20 3a 20 66 69 6c 65 72 |..... 6 | : filer|
|000008d0| 25 3d 32 0d 02 a8 33 c9 | 20 35 20 20 3a 20 f2 75 |%=2...3.| 5  : .u|
|000008e0| 70 64 61 74 65 3a f2 57 | 69 6d 70 5f 57 69 6e 64 |pdate:.W|imp_Wind|
|000008f0| 6f 77 43 6c 6f 73 65 28 | 46 69 6c 65 72 5f 57 69 |owClose(|Filer_Wi|
|00000900| 6e 64 6f 77 25 29 0d 02 | b2 05 cb 0d 02 bc 05 e1 |ndow%)..|........|
|00000910| 0d 02 c6 05 3a 0d 02 d0 | 23 dd f2 55 73 65 72 5f |....:...|#..User_|
|00000920| 53 61 76 65 4d 6f 75 73 | 65 28 62 75 74 74 6f 6e |SaveMous|e(button|
|00000930| 25 2c 69 63 6f 6e 25 29 | 0d 02 da 0e c8 8e 20 69 |%,icon%)|...... i|
|00000940| 63 6f 6e 25 20 ca 0d 02 | e4 33 c9 20 35 20 20 3a |con% ...|.3. 5  :|
|00000950| f2 73 61 76 65 62 6f 6f | 74 3a f2 57 69 6d 70 5f |.saveboo|t:.Wimp_|
|00000960| 57 69 6e 64 6f 77 43 6c | 6f 73 65 28 53 61 76 65 |WindowCl|ose(Save|
|00000970| 5f 57 69 6e 64 6f 77 25 | 29 0d 02 ee 29 c9 20 36 |_Window%|)...). 6|
|00000980| 20 20 3a f2 57 69 6d 70 | 5f 57 69 6e 64 6f 77 43 |  :.Wimp|_WindowC|
|00000990| 6c 6f 73 65 28 53 61 76 | 65 5f 57 69 6e 64 6f 77 |lose(Sav|e_Window|
|000009a0| 25 29 0d 02 f8 05 cb 0d | 03 02 05 e1 0d 03 0c 05 |%)......|........|
|000009b0| 3a 0d 03 16 0c dd f2 75 | 70 64 61 74 65 0d 03 20 |:......u|pdate.. |
|000009c0| 0f c8 8e 20 66 69 6c 65 | 72 25 20 ca 0d 03 2a 2c |... file|r% ...*,|
|000009d0| c9 20 31 20 3a 20 ff 22 | 49 63 6f 6e 53 70 72 69 |. 1 : ."|IconSpri|
|000009e0| 74 65 73 20 3c 52 65 73 | 24 44 69 72 3e 2e 46 69 |tes <Res|$Dir>.Fi|
|000009f0| 6c 65 72 4e 6f 72 6d 22 | 0d 03 34 2b c9 20 32 20 |lerNorm"|..4+. 2 |
|00000a00| 3a 20 ff 22 49 63 6f 6e | 53 70 72 69 74 65 73 20 |: ."Icon|Sprites |
|00000a10| 3c 52 65 73 24 44 69 72 | 3e 2e 46 69 6c 65 72 4e |<Res$Dir|>.FilerN|
|00000a20| 65 77 22 0d 03 3e 05 cb | 0d 03 48 0f c8 8e 20 72 |ew"..>..|..H... r|
|00000a30| 61 64 69 6f 25 20 ca 0d | 03 52 2b c9 20 31 20 3a |adio% ..|.R+. 1 :|
|00000a40| ff 22 49 63 6f 6e 53 70 | 72 69 74 65 73 20 3c 52 |."IconSp|rites <R|
|00000a50| 65 73 24 44 69 72 3e 2e | 52 61 64 69 6f 4e 6f 72 |es$Dir>.|RadioNor|
|00000a60| 6d 22 0d 03 5c 2b c9 20 | 32 20 3a ff 22 49 63 6f |m"..\+. |2 :."Ico|
|00000a70| 6e 53 70 72 69 74 65 73 | 20 3c 52 65 73 24 44 69 |nSprites| <Res$Di|
|00000a80| 72 3e 2e 52 61 64 69 6f | 4e 65 77 31 22 0d 03 66 |r>.Radio|New1"..f|
|00000a90| 2b c9 20 33 20 3a ff 22 | 49 63 6f 6e 53 70 72 69 |+. 3 :."|IconSpri|
|00000aa0| 74 65 73 20 3c 52 65 73 | 24 44 69 72 3e 2e 52 61 |tes <Res|$Dir>.Ra|
|00000ab0| 64 69 6f 4e 65 77 32 22 | 0d 03 70 05 cb 0d 03 7a |dioNew2"|..p....z|
|00000ac0| 0f c8 8e 20 74 6f 6f 6c | 73 25 20 ca 0d 03 84 39 |... tool|s% ....9|
|00000ad0| c9 20 31 20 3a 20 ff 22 | 54 6f 6f 6c 53 70 72 69 |. 1 : ."|ToolSpri|
|00000ae0| 74 65 73 20 52 65 73 6f | 75 72 63 65 73 3a 24 2e |tes Reso|urces:$.|
|00000af0| 52 65 73 6f 75 72 63 65 | 73 2e 57 69 6d 70 2e 54 |Resource|s.Wimp.T|
|00000b00| 6f 6f 6c 73 22 0d 03 8e | 29 c9 20 32 20 3a 20 ff |ools"...|). 2 : .|
|00000b10| 22 54 6f 6f 6c 53 70 72 | 69 74 65 73 20 3c 52 65 |"ToolSpr|ites <Re|
|00000b20| 73 24 44 69 72 3e 2e 54 | 6f 6f 6c 73 31 22 0d 03 |s$Dir>.T|ools1"..|
|00000b30| 98 29 c9 20 33 20 3a 20 | ff 22 54 6f 6f 6c 53 70 |.). 3 : |."ToolSp|
|00000b40| 72 69 74 65 73 20 3c 52 | 65 73 24 44 69 72 3e 2e |rites <R|es$Dir>.|
|00000b50| 54 6f 6f 6c 73 32 22 0d | 03 a2 05 cb 0d 03 ac 0b |Tools2".|........|
|00000b60| f2 72 65 64 72 61 77 0d | 03 b6 05 e1 0d 03 c0 05 |.redraw.|........|
|00000b70| 3a 0d 03 ca 0e dd f2 73 | 61 76 65 62 6f 6f 74 0d |:......s|aveboot.|
|00000b80| 03 d4 1c 48 25 3d ae 22 | 3c 43 75 73 74 6f 6d 24 |...H%=."|<Custom$|
|00000b90| 44 69 72 3e 2e 21 42 6f | 6f 74 22 0d 03 de 24 d5 |Dir>.!Bo|ot"...$.|
|00000ba0| 23 48 25 2c 22 53 45 54 | 20 43 75 73 74 6f 6d 24 |#H%,"SET| Custom$|
|00000bb0| 44 69 72 20 3c 4f 62 65 | 79 24 44 69 72 3e 22 0d |Dir <Obe|y$Dir>".|
|00000bc0| 03 e8 2b d5 23 48 25 2c | 22 53 45 54 20 52 65 73 |..+.#H%,|"SET Res|
|00000bd0| 24 44 69 72 20 3c 4f 62 | 65 79 24 44 69 72 3e 2e |$Dir <Ob|ey$Dir>.|
|00000be0| 52 65 73 6f 75 72 63 65 | 73 22 0d 03 f2 2c d5 23 |Resource|s"...,.#|
|00000bf0| 48 25 2c 22 49 63 6f 6e | 53 70 72 69 74 65 73 20 |H%,"Icon|Sprites |
|00000c00| 3c 43 75 73 74 6f 6d 24 | 44 69 72 3e 2e 21 53 70 |<Custom$|Dir>.!Sp|
|00000c10| 72 69 74 65 73 22 0d 03 | fc 34 e7 20 66 69 6c 65 |rites"..|.4. file|
|00000c20| 72 25 3d 32 20 d5 23 48 | 25 2c 22 49 63 6f 6e 53 |r%=2 .#H|%,"IconS|
|00000c30| 70 72 69 74 65 73 20 3c | 52 65 73 24 44 69 72 3e |prites <|Res$Dir>|
|00000c40| 2e 46 69 6c 65 72 4e 65 | 77 22 0d 04 06 0f c8 8e |.FilerNe|w"......|
|00000c50| 20 72 61 64 69 6f 25 20 | ca 0d 04 10 30 c9 20 32 | radio% |....0. 2|
|00000c60| 20 3a 20 d5 23 48 25 2c | 22 49 63 6f 6e 53 70 72 | : .#H%,|"IconSpr|
|00000c70| 69 74 65 73 20 3c 52 65 | 73 24 44 69 72 3e 2e 52 |ites <Re|s$Dir>.R|
|00000c80| 61 64 69 6f 4e 65 77 31 | 22 0d 04 1a 30 c9 20 33 |adioNew1|"...0. 3|
|00000c90| 20 3a 20 d5 23 48 25 2c | 22 49 63 6f 6e 53 70 72 | : .#H%,|"IconSpr|
|00000ca0| 69 74 65 73 20 3c 52 65 | 73 24 44 69 72 3e 2e 52 |ites <Re|s$Dir>.R|
|00000cb0| 61 64 69 6f 4e 65 77 32 | 22 0d 04 24 05 cb 0d 04 |adioNew2|"..$....|
|00000cc0| 2e 0f c8 8e 20 74 6f 6f | 6c 73 25 20 ca 0d 04 38 |.... too|ls% ...8|
|00000cd0| 2d c9 20 32 20 3a 20 d5 | 23 48 25 2c 22 54 6f 6f |-. 2 : .|#H%,"Too|
|00000ce0| 6c 53 70 72 69 74 65 73 | 20 3c 52 65 73 24 44 69 |lSprites| <Res$Di|
|00000cf0| 72 3e 2e 54 6f 6f 6c 73 | 31 22 0d 04 42 2d c9 20 |r>.Tools|1"..B-. |
|00000d00| 33 20 3a 20 d5 23 48 25 | 2c 22 54 6f 6f 6c 53 70 |3 : .#H%|,"ToolSp|
|00000d10| 72 69 74 65 73 20 3c 52 | 65 73 24 44 69 72 3e 2e |rites <R|es$Dir>.|
|00000d20| 54 6f 6f 6c 73 32 22 0d | 04 4c 05 cb 0d 04 56 40 |Tools2".|.L....V@|
|00000d30| e7 20 72 61 64 69 6f 25 | 3e 31 20 84 20 66 69 6c |. radio%|>1 . fil|
|00000d40| 65 72 25 3e 31 20 84 20 | 74 6f 6f 6c 73 25 3e 31 |er%>1 . |tools%>1|
|00000d50| 20 d5 23 48 25 2c 22 52 | 75 6e 20 3c 52 65 73 24 | .#H%,"R|un <Res$|
|00000d60| 44 69 72 3e 2e 52 65 64 | 72 61 77 22 0d 04 60 08 |Dir>.Red|raw"..`.|
|00000d70| d9 23 48 25 0d 04 6a 26 | ff 22 53 65 74 54 79 70 |.#H%..j&|."SetTyp|
|00000d80| 65 20 3c 43 75 73 74 6f | 6d 24 44 69 72 3e 2e 21 |e <Custo|m$Dir>.!|
|00000d90| 42 6f 6f 74 20 26 46 45 | 42 22 0d 04 74 05 e1 0d |Boot &FE|B"..t...|
|00000da0| 04 7e 05 3a 0d 04 88 0c | dd f2 72 65 64 72 61 77 |.~.:....|..redraw|
|00000db0| 0d 04 92 17 c8 99 20 22 | 57 69 6d 70 5f 53 65 74 |...... "|Wimp_Set|
|00000dc0| 4d 6f 64 65 22 2c eb 0d | 04 9c 05 e1 0d 04 a6 05 |Mode",..|........|
|00000dd0| 3a 0d 04 b0 1e dd 20 f2 | 45 76 65 6e 74 5f 4d 65 |:..... .|Event_Me|
|00000de0| 6e 75 43 68 6f 69 63 65 | 28 6d 65 6e 75 25 29 0d |nuChoice|(menu%).|
|00000df0| 04 ba 0e c8 8e 20 6d 65 | 6e 75 25 20 ca 0d 04 c4 |..... me|nu% ....|
|00000e00| 2b c9 20 42 61 72 5f 4d | 65 6e 75 25 20 20 20 20 |+. Bar_M|enu%    |
|00000e10| 20 20 20 3a 20 f2 55 73 | 65 72 5f 4d 65 6e 75 43 |   : .Us|er_MenuC|
|00000e20| 68 6f 69 63 65 42 61 72 | 0d 04 ce 31 c9 20 52 61 |hoiceBar|...1. Ra|
|00000e30| 64 69 6f 5f 4d 65 6e 75 | 25 20 20 20 20 20 3a 20 |dio_Menu|%     : |
|00000e40| f2 55 73 65 72 5f 4d 65 | 6e 75 43 68 6f 69 63 65 |.User_Me|nuChoice|
|00000e50| 55 6e 69 76 65 72 73 61 | 6c 0d 04 d8 31 c9 20 57 |Universa|l...1. W|
|00000e60| 69 6e 5f 4d 65 6e 75 25 | 20 20 20 20 20 20 20 3a |in_Menu%|       :|
|00000e70| 20 f2 55 73 65 72 5f 4d | 65 6e 75 43 68 6f 69 63 | .User_M|enuChoic|
|00000e80| 65 55 6e 69 76 65 72 73 | 61 6c 0d 04 e2 31 c9 20 |eUnivers|al...1. |
|00000e90| 46 69 6c 65 72 5f 4d 65 | 6e 75 25 20 20 20 20 20 |Filer_Me|nu%     |
|00000ea0| 3a 20 f2 55 73 65 72 5f | 4d 65 6e 75 43 68 6f 69 |: .User_|MenuChoi|
|00000eb0| 63 65 55 6e 69 76 65 72 | 73 61 6c 0d 04 ec 31 c9 |ceUniver|sal...1.|
|00000ec0| 20 53 61 76 65 5f 4d 65 | 6e 75 25 20 20 20 20 20 | Save_Me|nu%     |
|00000ed0| 20 3a 20 f2 55 73 65 72 | 5f 4d 65 6e 75 43 68 6f | : .User|_MenuCho|
|00000ee0| 69 63 65 55 6e 69 76 65 | 72 73 61 6c 0d 04 f6 05 |iceUnive|rsal....|
|00000ef0| cb 0d 05 00 05 e1 0d 05 | 0a 05 3a 0d 05 14 19 dd |........|..:.....|
|00000f00| 20 f2 55 73 65 72 5f 4d | 65 6e 75 43 68 6f 69 63 | .User_M|enuChoic|
|00000f10| 65 42 61 72 0d 05 1e 1c | c8 8e 20 a4 57 69 6d 70 |eBar....|.. .Wimp|
|00000f20| 5f 4d 65 6e 75 43 68 6f | 69 63 65 28 30 29 20 ca |_MenuCho|ice(0) .|
|00000f30| 0d 05 28 2d c9 20 32 20 | 3a 20 f2 57 69 6d 70 5f |..(-. 2 |: .Wimp_|
|00000f40| 57 69 6e 64 6f 77 42 72 | 69 6e 67 54 6f 54 6f 70 |WindowBr|ingToTop|
|00000f50| 28 57 69 6e 5f 57 69 6e | 64 6f 77 25 29 0d 05 32 |(Win_Win|dow%)..2|
|00000f60| 2f c9 20 33 20 3a 20 f2 | 57 69 6d 70 5f 57 69 6e |/. 3 : .|Wimp_Win|
|00000f70| 64 6f 77 42 72 69 6e 67 | 54 6f 54 6f 70 28 46 69 |dowBring|ToTop(Fi|
|00000f80| 6c 65 72 5f 57 69 6e 64 | 6f 77 25 29 0d 05 3c 2f |ler_Wind|ow%)..</|
|00000f90| c9 20 34 20 3a 20 f2 57 | 69 6d 70 5f 57 69 6e 64 |. 4 : .W|imp_Wind|
|00000fa0| 6f 77 42 72 69 6e 67 54 | 6f 54 6f 70 28 52 61 64 |owBringT|oTop(Rad|
|00000fb0| 69 6f 5f 57 69 6e 64 6f | 77 25 29 0d 05 46 2e c9 |io_Windo|w%)..F..|
|00000fc0| 20 35 20 3a 20 f2 57 69 | 6d 70 5f 57 69 6e 64 6f | 5 : .Wi|mp_Windo|
|00000fd0| 77 42 72 69 6e 67 54 6f | 54 6f 70 28 53 61 76 65 |wBringTo|Top(Save|
|00000fe0| 5f 57 69 6e 64 6f 77 25 | 29 0d 05 50 15 c9 20 36 |_Window%|)..P.. 6|
|00000ff0| 20 3a 20 66 69 6e 69 73 | 68 65 64 25 3d b9 0d 05 | : finis|hed%=...|
|00001000| 5a 05 cb 0d 05 64 05 e1 | 0d 05 6e 05 3a 0d 05 78 |Z....d..|..n.:..x|
|00001010| 1f dd 20 f2 55 73 65 72 | 5f 4d 65 6e 75 43 68 6f |.. .User|_MenuCho|
|00001020| 69 63 65 55 6e 69 76 65 | 72 73 61 6c 0d 05 82 1c |iceUnive|rsal....|
|00001030| c8 8e 20 a4 57 69 6d 70 | 5f 4d 65 6e 75 43 68 6f |.. .Wimp|_MenuCho|
|00001040| 69 63 65 28 30 29 20 ca | 0d 05 8c 15 c9 20 32 20 |ice(0) .|..... 2 |
|00001050| 3a 20 66 69 6e 69 73 68 | 65 64 25 3d b9 0d 05 96 |: finish|ed%=....|
|00001060| 05 cb 0d 05 a0 05 e1 0d | 05 aa 05 3a 0d 05 b4 18 |........|...:....|
|00001070| dd 20 f2 57 69 6d 70 5f | 57 61 69 74 46 6f 72 45 |. .Wimp_|WaitForE|
|00001080| 76 65 6e 74 0d 05 be 0f | 66 69 6e 69 73 68 65 64 |vent....|finished|
|00001090| 25 3d a3 0d 05 c8 46 6d | 61 73 6b 25 3d 25 31 31 |%=....Fm|ask%=%11|
|000010a0| 31 30 30 30 30 31 31 30 | 30 31 20 20 3a 20 f4 20 |10000110|01  : . |
|000010b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 6d 61 73 6b |        |    mask|
|000010c0| 69 6e 67 20 65 76 65 6e | 74 73 20 30 2c 34 2c 35 |ing even|ts 0,4,5|
|000010d0| 2c 31 30 2c 31 31 2c 31 | 32 0d 05 d2 05 f5 0d 05 |,10,11,1|2.......|
|000010e0| dc 28 c8 99 20 22 57 69 | 6d 70 5f 50 6f 6c 6c 22 |.(.. "Wi|mp_Poll"|
|000010f0| 2c 6d 61 73 6b 25 2c 62 | 6c 6f 63 6b 25 20 b8 20 |,mask%,b|lock% . |
|00001100| 65 76 65 6e 74 25 0d 05 | e6 0f c8 8e 20 65 76 65 |event%..|.... eve|
|00001110| 6e 74 25 20 ca 0d 05 f0 | 30 c9 20 31 20 3a 20 c8 |nt% ....|0. 1 : .|
|00001120| 99 20 22 57 69 6d 70 5f | 52 65 64 72 61 77 57 69 |. "Wimp_|RedrawWi|
|00001130| 6e 64 6f 77 22 2c 2c 62 | 6c 6f 63 6b 25 20 b8 20 |ndow",,b|lock% . |
|00001140| 6d 6f 72 65 25 0d 05 fa | 20 78 5f 6f 72 69 67 69 |more%...| x_origi|
|00001150| 6e 25 3d 62 6c 6f 63 6b | 25 21 34 2d 62 6c 6f 63 |n%=block|%!4-bloc|
|00001160| 6b 25 21 32 30 0d 06 04 | 21 79 5f 6f 72 69 67 69 |k%!20...|!y_origi|
|00001170| 6e 25 3d 62 6c 6f 63 6b | 25 21 31 36 2d 62 6c 6f |n%=block|%!16-blo|
|00001180| 63 6b 25 21 32 34 0d 06 | 0e 0c c8 95 20 6d 6f 72 |ck%!24..|.... mor|
|00001190| 65 25 0d 06 18 23 c8 99 | 20 22 57 69 6d 70 5f 42 |e%...#..| "Wimp_B|
|000011a0| 6f 72 64 65 72 57 69 6e | 64 6f 77 22 2c 2c 20 62 |orderWin|dow",, b|
|000011b0| 6c 6f 63 6b 25 0d 06 22 | 2a c8 99 20 22 57 69 6d |lock%.."|*.. "Wim|
|000011c0| 70 5f 47 65 74 52 65 63 | 74 61 6e 67 6c 65 22 2c |p_GetRec|tangle",|
|000011d0| 2c 62 6c 6f 63 6b 25 20 | b8 20 6d 6f 72 65 25 0d |,block% |. more%.|
|000011e0| 06 2c 05 ce 0d 06 36 19 | c9 20 32 20 3a 20 77 69 |.,....6.|. 2 : wi|
|000011f0| 6e 64 6f 77 25 3d 21 62 | 6c 6f 63 6b 25 0d 06 40 |ndow%=!b|lock%..@|
|00001200| 1f f2 57 69 6d 70 5f 57 | 69 6e 64 6f 77 4f 70 65 |..Wimp_W|indowOpe|
|00001210| 6e 28 77 69 6e 64 6f 77 | 25 2c 31 29 0d 06 4a 19 |n(window|%,1)..J.|
|00001220| c9 20 33 20 3a 20 77 69 | 6e 64 6f 77 25 3d 21 62 |. 3 : wi|ndow%=!b|
|00001230| 6c 6f 63 6b 25 0d 06 54 | 1e f2 57 69 6d 70 5f 57 |lock%..T|..Wimp_W|
|00001240| 69 6e 64 6f 77 43 6c 6f | 73 65 28 77 69 6e 64 6f |indowClo|se(windo|
|00001250| 77 25 29 0d 06 5e 09 c9 | 20 34 20 3a 0d 06 68 09 |w%)..^..| 4 :..h.|
|00001260| c9 20 35 20 3a 0d 06 72 | 40 c9 20 36 20 3a 20 62 |. 5 :..r|@. 6 : b|
|00001270| 75 74 74 6f 6e 25 3d 62 | 6c 6f 63 6b 25 21 38 20 |utton%=b|lock%!8 |
|00001280| 3a 20 77 69 6e 64 6f 77 | 25 3d 62 6c 6f 63 6b 25 |: window|%=block%|
|00001290| 21 31 32 20 3a 20 69 63 | 6f 6e 25 3d 62 6c 6f 63 |!12 : ic|on%=bloc|
|000012a0| 6b 25 21 31 36 0d 06 7c | 1d 78 25 3d 62 6c 6f 63 |k%!16..||.x%=bloc|
|000012b0| 6b 25 21 30 20 3a 20 79 | 25 3d 62 6c 6f 63 6b 25 |k%!0 : y|%=block%|
|000012c0| 21 34 0d 06 86 10 c8 8e | 20 62 75 74 74 6f 6e 25 |!4......| button%|
|000012d0| 20 ca 0d 06 90 0c c9 20 | 20 32 20 20 20 3a 0d 06 | ...... | 2   :..|
|000012e0| 9a 23 f2 45 76 65 6e 74 | 5f 4d 65 6e 75 50 6f 70 |.#.Event|_MenuPop|
|000012f0| 55 70 28 77 69 6e 64 6f | 77 25 2c 78 25 2c 79 25 |Up(windo|w%,x%,y%|
|00001300| 29 0d 06 a4 07 7f 20 3a | 0d 06 ae 04 0d 06 b8 32 |)..... :|.......2|
|00001310| f2 45 76 65 6e 74 5f 4d | 6f 75 73 65 43 6c 69 63 |.Event_M|ouseClic|
|00001320| 6b 28 62 75 74 74 6f 6e | 25 2c 77 69 6e 64 6f 77 |k(button|%,window|
|00001330| 25 2c 69 63 6f 6e 25 2c | 78 25 2c 79 25 29 0d 06 |%,icon%,|x%,y%)..|
|00001340| c2 34 62 6c 6f 63 6b 25 | 21 38 3d 30 20 3a 20 62 |.4block%|!8=0 : b|
|00001350| 6c 6f 63 6b 25 21 31 32 | 3d 77 69 6e 64 6f 77 25 |lock%!12|=window%|
|00001360| 20 3a 20 62 6c 6f 63 6b | 25 21 31 36 3d 69 63 6f | : block|%!16=ico|
|00001370| 6e 25 0d 06 cc 04 0d 06 | d6 05 cb 0d 06 e0 3c c9 |n%......|......<.|
|00001380| 20 38 20 3a 20 77 69 6e | 64 6f 77 25 3d 62 6c 6f | 8 : win|dow%=blo|
|00001390| 63 6b 25 21 30 20 3a 20 | 69 63 6f 6e 25 3d 62 6c |ck%!0 : |icon%=bl|
|000013a0| 6f 63 6b 25 21 34 20 3a | 20 6b 65 79 25 3d 62 6c |ock%!4 :| key%=bl|
|000013b0| 6f 63 6b 25 21 32 34 0d | 06 ea 27 f2 45 76 65 6e |ock%!24.|..'.Even|
|000013c0| 74 5f 4b 65 79 50 72 65 | 73 73 28 77 69 6e 64 6f |t_KeyPre|ss(windo|
|000013d0| 77 25 2c 69 63 6f 6e 25 | 2c 6b 65 79 25 29 0d 06 |w%,icon%|,key%)..|
|000013e0| f4 22 c9 20 39 20 3a 20 | f2 45 76 65 6e 74 5f 4d |.". 9 : |.Event_M|
|000013f0| 65 6e 75 43 68 6f 69 63 | 65 28 6d 65 6e 75 25 29 |enuChoic|e(menu%)|
|00001400| 0d 06 fe 0d c9 20 31 37 | 2c 31 38 20 3a 0d 07 08 |..... 17|,18 :...|
|00001410| 16 6d 65 73 73 61 67 65 | 25 3d 62 6c 6f 63 6b 25 |.message|%=block%|
|00001420| 21 31 36 0d 07 12 11 c8 | 8e 20 6d 65 73 73 61 67 |!16.....|. messag|
|00001430| 65 25 20 ca 0d 07 1c 21 | c9 20 6d 65 73 73 61 67 |e% ....!|. messag|
|00001440| 65 5f 71 75 69 74 25 20 | 3a 20 66 69 6e 69 73 68 |e_quit% |: finish|
|00001450| 65 64 25 3d b9 0d 07 26 | 15 c9 20 6d 65 73 73 61 |ed%=...&|.. messa|
|00001460| 67 65 5f 6c 6f 61 64 25 | 20 3a 0d 07 30 05 cb 0d |ge_load%| :..0...|
|00001470| 07 3a 0a c9 20 31 39 20 | 3a 0d 07 44 04 0d 07 4e |.:.. 19 |:..D...N|
|00001480| 2d f2 57 69 6d 70 5f 41 | 6c 65 72 74 28 54 61 73 |-.Wimp_A|lert(Tas|
|00001490| 6b 4e 61 6d 65 24 2c f6 | 24 2b 22 61 74 20 6c 69 |kName$,.|$+"at li|
|000014a0| 6e 65 20 22 2b c3 9e 2c | 32 29 0d 07 58 05 cb 0d |ne "+..,|2)..X...|
|000014b0| 07 62 0f fd 20 66 69 6e | 69 73 68 65 64 25 0d 07 |.b.. fin|ished%..|
|000014c0| 6c 05 e1 0d 07 76 05 3a | 0d 07 80 1d dd 20 a4 57 |l....v.:|..... .W|
|000014d0| 69 6d 70 5f 53 74 61 72 | 74 28 20 54 61 73 6b 4e |imp_Star|t( TaskN|
|000014e0| 61 6d 65 24 29 0d 07 8a | 1f f2 49 6e 74 65 72 6e |ame$)...|..Intern|
|000014f0| 61 6c 5f 53 65 74 45 76 | 65 6e 74 56 61 72 69 61 |al_SetEv|entVaria|
|00001500| 62 6c 65 73 0d 07 94 2b | ee 20 85 20 f2 49 6e 74 |bles...+|. . .Int|
|00001510| 65 72 6e 61 6c 5f 45 72 | 72 6f 72 28 20 74 61 73 |ernal_Er|ror( tas|
|00001520| 6b 25 2c 54 61 73 6b 4e | 61 6d 65 24 29 3a e0 0d |k%,TaskN|ame$):..|
|00001530| 07 9e 12 24 62 6c 6f 63 | 6b 25 3d 22 54 41 53 4b |...$bloc|k%="TASK|
|00001540| 22 0d 07 a8 3f c8 99 20 | 22 57 69 6d 70 5f 49 6e |"...?.. |"Wimp_In|
|00001550| 69 74 69 61 6c 69 73 65 | 22 2c 32 30 30 2c 21 62 |itialise|",200,!b|
|00001560| 6c 6f 63 6b 25 2c 54 61 | 73 6b 4e 61 6d 65 24 20 |lock%,Ta|skName$ |
|00001570| b8 20 76 65 72 73 69 6f | 6e 25 2c 74 61 73 6b 25 |. versio|n%,task%|
|00001580| 0d 07 b2 0e 3d 54 61 73 | 6b 4e 61 6d 65 24 0d 07 |....=Tas|kName$..|
|00001590| bc 21 dd 20 f2 49 6e 74 | 65 72 6e 61 6c 5f 53 65 |.!. .Int|ernal_Se|
|000015a0| 74 45 76 65 6e 74 56 61 | 72 69 61 62 6c 65 73 0d |tEventVa|riables.|
|000015b0| 07 c6 2e de 20 62 6c 6f | 63 6b 25 20 62 6c 6f 63 |.... blo|ck% bloc|
|000015c0| 6b 5f 6d 65 6d 6f 72 79 | 25 2c 69 63 6f 6e 73 25 |k_memory|%,icons%|
|000015d0| 20 69 63 6f 6e 5f 6d 65 | 6d 6f 72 79 25 0d 07 d0 | icon_me|mory%...|
|000015e0| 21 69 63 6f 6e 5f 65 6e | 64 25 3d 69 63 6f 6e 73 |!icon_en|d%=icons|
|000015f0| 25 2b 69 63 6f 6e 5f 6d | 65 6d 6f 72 79 25 0d 07 |%+icon_m|emory%..|
|00001600| da 46 6e 75 6c 6c 25 3d | 31 20 20 20 20 20 20 20 |.Fnull%=|1       |
|00001610| 20 20 20 20 20 20 20 20 | 20 3a 20 64 72 61 77 25 |        | : draw%|
|00001620| 3d 32 20 20 20 20 20 20 | 20 20 20 20 20 3a 20 70 |=2      |     : p|
|00001630| 6f 69 6e 74 65 72 5f 6c | 65 61 76 69 6e 67 25 3d |ointer_l|eaving%=|
|00001640| 31 3c 3c 34 0d 07 e4 3b | 70 6f 69 6e 74 65 72 5f |1<<4...;|pointer_|
|00001650| 65 6e 74 65 72 69 6e 67 | 25 3d 31 3c 3c 35 20 3a |entering|%=1<<5 :|
|00001660| 20 6d 6f 75 73 65 25 3d | 31 3c 3c 36 20 20 20 20 | mouse%=|1<<6    |
|00001670| 20 20 20 3a 20 64 72 61 | 67 25 3d 31 3c 3c 37 0d |   : dra|g%=1<<7.|
|00001680| 07 ee 3e 6b 65 79 25 3d | 31 3c 3c 38 20 20 20 20 |..>key%=|1<<8    |
|00001690| 20 20 20 20 20 20 20 20 | 20 20 3a 20 6d 65 6e 75 |        |  : menu|
|000016a0| 25 3d 31 3c 3c 39 20 20 | 20 20 20 20 20 20 3a 20 |%=1<<9  |      : |
|000016b0| 73 63 72 6f 6c 6c 25 3d | 31 3c 3c 31 30 0d 07 f8 |scroll%=|1<<10...|
|000016c0| 49 6c 6f 73 65 5f 63 61 | 72 65 74 25 3d 31 3c 3c |Ilose_ca|ret%=1<<|
|000016d0| 31 31 20 20 20 20 20 20 | 3a 20 67 61 69 6e 5f 63 |11      |: gain_c|
|000016e0| 61 72 65 74 25 3d 31 3c | 3c 31 32 20 3a 20 6d 65 |aret%=1<|<12 : me|
|000016f0| 73 73 61 67 65 25 3d 28 | 31 3c 3c 31 37 29 2b 28 |ssage%=(|1<<17)+(|
|00001700| 31 3c 3c 31 38 29 0d 08 | 02 3a 72 65 63 6f 72 64 |1<<18)..|.:record|
|00001710| 65 72 25 3d 31 3c 3c 31 | 38 20 20 20 20 20 20 20 |er%=1<<1|8       |
|00001720| 20 3a 20 61 63 6b 6e 6f | 77 6c 65 64 67 65 25 3d | : ackno|wledge%=|
|00001730| 31 3c 3c 31 39 3a 20 77 | 69 6e 64 6f 77 25 3d 30 |1<<19: w|indow%=0|
|00001740| 0d 08 0c 38 73 70 72 69 | 74 65 73 25 3d 30 20 20 |...8spri|tes%=0  |
|00001750| 20 20 20 20 20 20 20 20 | 20 20 20 3a 20 76 65 72 |        |   : ver|
|00001760| 73 69 6f 6e 25 3d 30 20 | 20 20 20 20 20 20 20 3a |sion%=0 |       :|
|00001770| 20 74 61 73 6b 25 3d 30 | 0d 08 16 3c 42 61 72 5f | task%=0|...<Bar_|
|00001780| 57 69 6e 64 6f 77 25 3d | 2d 32 20 20 20 20 20 20 |Window%=|-2      |
|00001790| 20 20 20 3a 20 42 61 72 | 5f 49 63 6f 6e 25 3d 30 |   : Bar|_Icon%=0|
|000017a0| 20 20 20 20 20 20 20 3a | 20 42 61 72 5f 4d 65 6e |       :| Bar_Men|
|000017b0| 75 25 3d 30 0d 08 20 28 | 78 5f 6f 72 69 67 69 6e |u%=0.. (|x_origin|
|000017c0| 25 3d 30 20 20 20 20 20 | 20 20 20 20 20 20 20 3a |%=0     |       :|
|000017d0| 20 79 5f 6f 72 69 67 69 | 6e 25 3d 30 0d 08 2a 2c | y_origi|n%=0..*,|
|000017e0| 6d 65 73 73 61 67 65 5f | 71 75 69 74 25 3d 30 20 |message_|quit%=0 |
|000017f0| 20 20 20 20 20 20 20 3a | 20 6d 65 73 73 61 67 65 |       :| message|
|00001800| 5f 6c 6f 61 64 25 3d 33 | 0d 08 34 13 6d 6f 75 73 |_load%=3|..4.mous|
|00001810| 65 5f 62 75 74 74 6f 6e | 25 3d 32 0d 08 3e 05 e1 |e_button|%=2..>..|
|00001820| 0d 08 48 27 dd 20 f2 49 | 6e 74 65 72 6e 61 6c 5f |..H'. .I|nternal_|
|00001830| 45 72 72 6f 72 28 20 74 | 61 73 6b 25 2c 54 61 73 |Error( t|ask%,Tas|
|00001840| 6b 4e 61 6d 65 24 29 0d | 08 52 0b ea 20 58 24 2c |kName$).|.R.. X$,|
|00001850| 78 25 0d 08 5c 09 ee 20 | 85 20 87 0d 08 66 08 78 |x%..\.. |. ...f.x|
|00001860| 25 3d 9e 0d 08 70 18 58 | 24 3d f6 24 2b 22 61 74 |%=...p.X|$=.$+"at|
|00001870| 20 6c 69 6e 65 20 22 2b | c3 78 25 0d 08 7a 12 de | line "+|.x%..z..|
|00001880| 20 45 72 72 6f 72 4d 73 | 67 25 20 33 36 0d 08 84 | ErrorMs|g% 36...|
|00001890| 35 45 72 72 6f 72 4d 73 | 67 25 21 30 3d 33 36 3a |5ErrorMs|g%!0=36:|
|000018a0| 45 72 72 6f 72 4d 73 67 | 25 21 31 32 3d 30 3a 45 |ErrorMsg|%!12=0:E|
|000018b0| 72 72 6f 72 4d 73 67 25 | 21 31 36 3d 26 38 31 30 |rrorMsg%|!16=&810|
|000018c0| 38 30 0d 08 8e 32 45 72 | 72 6f 72 4d 73 67 25 21 |80...2Er|rorMsg%!|
|000018d0| 32 30 3d 78 25 3a 24 28 | 45 72 72 6f 72 4d 73 67 |20=x%:$(|ErrorMsg|
|000018e0| 25 2b 32 34 29 3d 22 21 | 52 75 6e 49 6d 61 67 65 |%+24)="!|RunImage|
|000018f0| 20 20 20 22 0d 08 98 26 | c8 99 20 22 57 69 6d 70 |   "...&|.. "Wimp|
|00001900| 5f 53 65 6e 64 4d 65 73 | 73 61 67 65 22 2c 31 37 |_SendMes|sage",17|
|00001910| 2c 45 72 72 6f 72 4d 73 | 67 25 0d 08 a2 1d f2 57 |,ErrorMs|g%.....W|
|00001920| 69 6d 70 5f 41 6c 65 72 | 74 28 54 61 73 6b 4e 61 |imp_Aler|t(TaskNa|
|00001930| 6d 65 24 2c 58 24 29 0d | 08 ac 13 f2 57 69 6d 70 |me$,X$).|....Wimp|
|00001940| 5f 43 6c 6f 73 65 44 6f | 77 6e 0d 08 b6 05 e1 0d |_CloseDo|wn......|
|00001950| 08 c0 15 dd 20 f2 57 69 | 6d 70 5f 43 6c 6f 73 65 |.... .Wi|mp_Close|
|00001960| 44 6f 77 6e 0d 08 ca 24 | c8 99 20 22 57 69 6d 70 |Down...$|.. "Wimp|
|00001970| 5f 43 6c 6f 73 65 44 6f | 77 6e 22 2c 74 61 73 6b |_CloseDo|wn",task|
|00001980| 25 2c 22 54 41 53 4b 22 | 0d 08 d4 05 e1 0d 08 de |%,"TASK"|........|
|00001990| 30 dd 20 a4 57 69 6d 70 | 5f 57 69 6e 64 6f 77 4c |0. .Wimp|_WindowL|
|000019a0| 6f 61 64 46 72 6f 6d 54 | 65 6d 70 6c 61 74 65 28 |oadFromT|emplate(|
|000019b0| 77 24 2c 74 65 6d 70 6c | 61 74 65 24 29 0d 08 e8 |w$,templ|ate$)...|
|000019c0| 08 ea 20 63 25 0d 08 f2 | 25 c8 99 20 22 57 69 6d |.. c%...|%.. "Wim|
|000019d0| 70 5f 4f 70 65 6e 54 65 | 6d 70 6c 61 74 65 22 2c |p_OpenTe|mplate",|
|000019e0| 2c 74 65 6d 70 6c 61 74 | 65 24 0d 08 fc 46 c8 99 |,templat|e$...F..|
|000019f0| 20 22 57 69 6d 70 5f 4c | 6f 61 64 54 65 6d 70 6c | "Wimp_L|oadTempl|
|00001a00| 61 74 65 22 2c 2c 62 6c | 6f 63 6b 25 2c 69 63 6f |ate",,bl|ock%,ico|
|00001a10| 6e 73 25 2c 69 63 6f 6e | 5f 65 6e 64 25 2c 2d 31 |ns%,icon|_end%,-1|
|00001a20| 2c 77 24 2c 30 20 b8 20 | 2c 2c 69 63 6f 6e 73 25 |,w$,0 . |,,icons%|
|00001a30| 0d 09 06 26 e7 20 73 70 | 72 69 74 65 73 25 3c 3e |...&. sp|rites%<>|
|00001a40| 30 20 8c 20 62 6c 6f 63 | 6b 25 21 36 34 3d 73 70 |0 . bloc|k%!64=sp|
|00001a50| 72 69 74 65 73 25 0d 09 | 10 27 c8 99 20 22 57 69 |rites%..|.'.. "Wi|
|00001a60| 6d 70 5f 43 72 65 61 74 | 65 57 69 6e 64 6f 77 22 |mp_Creat|eWindow"|
|00001a70| 2c 2c 62 6c 6f 63 6b 25 | 20 b8 20 63 25 0d 09 1a |,,block%| . c%...|
|00001a80| 1b c8 99 20 22 57 69 6d | 70 5f 43 6c 6f 73 65 54 |... "Wim|p_CloseT|
|00001a90| 65 6d 70 6c 61 74 65 22 | 0d 09 24 07 3d 63 25 0d |emplate"|..$.=c%.|
|00001aa0| 09 2e 26 dd 20 f2 57 69 | 6d 70 5f 57 69 6e 64 6f |..&. .Wi|mp_Windo|
|00001ab0| 77 4f 70 65 6e 28 77 69 | 6e 64 6f 77 25 2c 73 74 |wOpen(wi|ndow%,st|
|00001ac0| 61 74 65 25 29 0d 09 38 | 13 21 62 6c 6f 63 6b 25 |ate%)..8|.!block%|
|00001ad0| 3d 77 69 6e 64 6f 77 25 | 0d 09 42 31 e7 20 73 74 |=window%|..B1. st|
|00001ae0| 61 74 65 25 3d 30 20 8c | 20 c8 99 20 22 57 69 6d |ate%=0 .| .. "Wim|
|00001af0| 70 5f 47 65 74 57 69 6e | 64 6f 77 53 74 61 74 65 |p_GetWin|dowState|
|00001b00| 22 2c 2c 62 6c 6f 63 6b | 25 0d 09 4c 20 c8 99 20 |",,block|%..L .. |
|00001b10| 22 57 69 6d 70 5f 4f 70 | 65 6e 57 69 6e 64 6f 77 |"Wimp_Op|enWindow|
|00001b20| 22 2c 2c 62 6c 6f 63 6b | 25 0d 09 56 05 e1 0d 09 |",,block|%..V....|
|00001b30| 60 25 dd 20 f2 57 69 6d | 70 5f 57 69 6e 64 6f 77 |`%. .Wim|p_Window|
|00001b40| 42 72 69 6e 67 54 6f 54 | 6f 70 28 77 69 6e 64 6f |BringToT|op(windo|
|00001b50| 77 25 29 0d 09 6a 13 21 | 62 6c 6f 63 6b 25 3d 77 |w%)..j.!|block%=w|
|00001b60| 69 6e 64 6f 77 25 0d 09 | 74 24 c8 99 20 22 57 69 |indow%..|t$.. "Wi|
|00001b70| 6d 70 5f 47 65 74 57 69 | 6e 64 6f 77 53 74 61 74 |mp_GetWi|ndowStat|
|00001b80| 65 22 2c 2c 62 6c 6f 63 | 6b 25 0d 09 7e 10 62 6c |e",,bloc|k%..~.bl|
|00001b90| 6f 63 6b 25 21 32 38 3d | 2d 31 0d 09 88 20 c8 99 |ock%!28=|-1... ..|
|00001ba0| 20 22 57 69 6d 70 5f 4f | 70 65 6e 57 69 6e 64 6f | "Wimp_O|penWindo|
|00001bb0| 77 22 2c 2c 62 6c 6f 63 | 6b 25 0d 09 92 05 e1 0d |w",,bloc|k%......|
|00001bc0| 09 9c 21 dd 20 20 f2 57 | 69 6d 70 5f 57 69 6e 64 |..!.  .W|imp_Wind|
|00001bd0| 6f 77 43 6c 6f 73 65 28 | 77 69 6e 64 6f 77 25 29 |owClose(|window%)|
|00001be0| 0d 09 a6 13 21 62 6c 6f | 63 6b 25 3d 77 69 6e 64 |....!blo|ck%=wind|
|00001bf0| 6f 77 25 0d 09 b0 21 c8 | 99 20 22 57 69 6d 70 5f |ow%...!.|. "Wimp_|
|00001c00| 43 6c 6f 73 65 57 69 6e | 64 6f 77 22 2c 2c 62 6c |CloseWin|dow",,bl|
|00001c10| 6f 63 6b 25 0d 09 ba 05 | e1 0d 09 c4 47 dd 20 a4 |ock%....|....G. .|
|00001c20| 57 69 6d 70 5f 49 63 6f | 6e 43 72 65 61 74 65 28 |Wimp_Ico|nCreate(|
|00001c30| 77 69 6e 64 6f 77 25 2c | 69 78 25 2c 69 79 25 2c |window%,|ix%,iy%,|
|00001c40| 69 77 25 2c 69 68 25 2c | 66 6c 61 67 25 2c 74 65 |iw%,ih%,|flag%,te|
|00001c50| 78 74 24 2c 64 31 25 2c | 64 32 25 2c 64 33 25 29 |xt$,d1%,|d2%,d3%)|
|00001c60| 0d 09 ce 14 62 6c 6f 63 | 6b 25 21 30 3d 77 69 6e |....bloc|k%!0=win|
|00001c70| 64 6f 77 25 0d 09 d8 24 | 62 6c 6f 63 6b 25 21 34 |dow%...$|block%!4|
|00001c80| 3d 69 78 25 20 20 20 20 | 20 20 3a 20 62 6c 6f 63 |=ix%    |  : bloc|
|00001c90| 6b 25 21 38 3d 69 79 25 | 0d 09 e2 29 62 6c 6f 63 |k%!8=iy%|...)bloc|
|00001ca0| 6b 25 21 31 32 3d 69 78 | 25 2b 69 77 25 20 3a 20 |k%!12=ix|%+iw% : |
|00001cb0| 62 6c 6f 63 6b 25 21 31 | 36 3d 69 79 25 2b 69 68 |block%!1|6=iy%+ih|
|00001cc0| 25 0d 09 ec 13 62 6c 6f | 63 6b 25 21 32 30 3d 66 |%....blo|ck%!20=f|
|00001cd0| 6c 61 67 25 0d 09 f6 0d | e7 20 64 31 25 3d 30 20 |lag%....|. d1%=0 |
|00001ce0| 8c 0d 0a 00 16 24 28 62 | 6c 6f 63 6b 25 2b 32 34 |.....$(b|lock%+24|
|00001cf0| 29 3d 74 65 78 74 24 0d | 0a 0a 05 cc 0d 0a 14 31 |)=text$.|.......1|
|00001d00| 62 6c 6f 63 6b 25 21 32 | 34 3d 64 31 25 20 3a 20 |block%!2|4=d1% : |
|00001d10| 62 6c 6f 63 6b 25 21 32 | 38 3d 64 32 25 20 3a 20 |block%!2|8=d2% : |
|00001d20| 62 6c 6f 63 6b 25 21 33 | 32 3d 64 33 25 0d 0a 1e |block%!3|2=d3%...|
|00001d30| 05 cd 0d 0a 28 28 c8 99 | 20 22 57 69 6d 70 5f 43 |....((..| "Wimp_C|
|00001d40| 72 65 61 74 65 49 63 6f | 6e 22 2c 2c 62 6c 6f 63 |reateIco|n",,bloc|
|00001d50| 6b 25 20 b8 20 69 63 6f | 6e 25 0d 0a 32 0a 3d 69 |k% . ico|n%..2.=i|
|00001d60| 63 6f 6e 25 0d 0a 3c 1d | dd 20 a4 57 69 6d 70 5f |con%..<.|. .Wimp_|
|00001d70| 4d 65 6e 75 43 72 65 61 | 74 65 28 6d 65 6e 75 24 |MenuCrea|te(menu$|
|00001d80| 29 0d 0a 46 0b ea 20 6d | 65 6e 75 25 0d 0a 50 32 |)..F.. m|enu%..P2|
|00001d90| de 20 6d 65 6e 75 25 20 | 32 38 2b a4 49 6e 74 65 |. menu% |28+.Inte|
|00001da0| 72 6e 61 6c 5f 4d 65 6e | 75 4e 6f 4f 66 45 6e 74 |rnal_Men|uNoOfEnt|
|00001db0| 72 69 65 73 28 6d 65 6e | 75 24 29 2a 32 34 0d 0a |ries(men|u$)*24..|
|00001dc0| 5a 21 3d a4 57 69 6d 70 | 5f 4d 65 6e 75 42 75 69 |Z!=.Wimp|_MenuBui|
|00001dd0| 6c 64 28 6d 65 6e 75 25 | 2c 6d 65 6e 75 24 29 0d |ld(menu%|,menu$).|
|00001de0| 0a 64 26 dd 20 a4 49 6e | 74 65 72 6e 61 6c 5f 4d |.d&. .In|ternal_M|
|00001df0| 65 6e 75 4e 6f 4f 66 45 | 6e 74 72 69 65 73 28 6d |enuNoOfE|ntries(m|
|00001e00| 65 6e 75 24 29 0d 0a 6e | 1a ea 20 6e 25 20 2c 6a |enu$)..n|.. n% ,j|
|00001e10| 25 20 3a 20 6e 25 3d 30 | 20 3a 20 6a 25 3d 30 0d |% : n%=0| : j%=0.|
|00001e20| 0a 78 05 f5 0d 0a 82 17 | 6a 25 3d a7 6d 65 6e 75 |.x......|j%=.menu|
|00001e30| 24 2c 22 5c 22 2c 6a 25 | 2b 31 29 0d 0a 8c 13 e7 |$,"\",j%|+1).....|
|00001e40| 20 6a 25 3c 3e 30 20 8c | 20 6e 25 2b 3d 31 0d 0a | j%<>0 .| n%+=1..|
|00001e50| 96 0a fd 20 6a 25 3d 30 | 0d 0a a0 07 3d 6e 25 0d |... j%=0|....=n%.|
|00001e60| 0a aa 22 dd 20 a4 57 69 | 6d 70 5f 4d 65 6e 75 42 |..". .Wi|mp_MenuB|
|00001e70| 75 69 6c 64 28 6d 65 6e | 75 25 2c 6d 65 6e 75 24 |uild(men|u%,menu$|
|00001e80| 29 0d 0a b4 1d ea 20 79 | 70 6f 73 25 2c 77 69 64 |)..... y|pos%,wid|
|00001e90| 74 68 25 2c 6c 65 6e 67 | 74 68 25 2c 6b 25 0d 0a |th%,leng|th%,k%..|
|00001ea0| be 37 6d 65 6e 75 25 3f | 31 32 3d 37 20 20 20 3a |.7menu%?|12=7   :|
|00001eb0| 20 6d 65 6e 75 25 3f 31 | 33 3d 32 20 20 3a 20 6d | menu%?1|3=2  : m|
|00001ec0| 65 6e 75 25 3f 31 34 3d | 37 20 3a 6d 65 6e 75 25 |enu%?14=|7 :menu%|
|00001ed0| 3f 31 35 3d 30 0d 0a c8 | 2b 6d 65 6e 75 25 21 31 |?15=0...|+menu%!1|
|00001ee0| 36 3d 31 34 30 20 3a 20 | 6d 65 6e 75 25 21 32 30 |6=140 : |menu%!20|
|00001ef0| 3d 34 34 20 3a 20 6d 65 | 6e 75 25 21 32 34 3d 30 |=44 : me|nu%!24=0|
|00001f00| 0d 0a d2 11 70 74 72 25 | 3d 6d 65 6e 75 25 2b 32 |....ptr%|=menu%+2|
|00001f10| 38 0d 0a dc 20 24 6d 65 | 6e 75 25 3d c0 6d 65 6e |8... $me|nu%=.men|
|00001f20| 75 24 2c a7 6d 65 6e 75 | 24 2c 22 5c 22 29 2d 31 |u$,.menu|$,"\")-1|
|00001f30| 29 0d 0a e6 23 77 69 64 | 74 68 25 3d a9 28 c0 6d |)...#wid|th%=.(.m|
|00001f40| 65 6e 75 24 2c a7 6d 65 | 6e 75 24 2c 22 5c 22 29 |enu$,.me|nu$,"\")|
|00001f50| 2d 31 29 29 0d 0a f0 24 | 6d 65 6e 75 24 2b 3d 22 |-1))...$|menu$+="|
|00001f60| 5c 22 20 3a 20 4d 65 6e | 75 5f 4e 6f 4f 66 45 6e |\" : Men|u_NoOfEn|
|00001f70| 74 72 69 65 73 25 3d 30 | 0d 0a fa 10 c8 95 20 6d |tries%=0|...... m|
|00001f80| 65 6e 75 24 3c 3e 22 22 | 0d 0b 04 1f 6d 65 6e 75 |enu$<>""|....menu|
|00001f90| 24 3d c1 6d 65 6e 75 24 | 2c a7 6d 65 6e 75 24 2c |$=.menu$|,.menu$,|
|00001fa0| 22 5c 22 29 2b 31 29 0d | 0b 0e 11 e7 20 6d 65 6e |"\")+1).|.... men|
|00001fb0| 75 24 3c 3e 22 22 20 8c | 0d 0b 18 29 21 70 74 72 |u$<>"" .|...)!ptr|
|00001fc0| 25 3d 30 20 3a 20 70 74 | 72 25 21 34 3d 2d 31 20 |%=0 : pt|r%!4=-1 |
|00001fd0| 3a 20 70 74 72 25 21 38 | 3d 26 37 30 30 30 30 32 |: ptr%!8|=&700002|
|00001fe0| 31 0d 0b 22 19 6c 65 6e | 67 74 68 25 3d a7 6d 65 |1..".len|gth%=.me|
|00001ff0| 6e 75 24 2c 22 5c 22 29 | 2d 31 0d 0b 2c 1c 6b 25 |nu$,"\")|-1..,.k%|
|00002000| 3d a7 c0 6d 65 6e 75 24 | 2c 6c 65 6e 67 74 68 25 |=..menu$|,length%|
|00002010| 29 2c 22 3e 22 29 0d 0b | 36 0d e7 20 6b 25 3c 3e |),">")..|6.. k%<>|
|00002020| 30 20 8c 0d 0b 40 21 73 | 25 3d a0 28 c1 6d 65 6e |0 ...@!s|%=.(.men|
|00002030| 75 24 2c 6b 25 2b 31 2c | 6c 65 6e 67 74 68 25 2d |u$,k%+1,|length%-|
|00002040| 6b 25 29 29 0d 0b 4a 0d | 70 74 72 25 21 34 3d 73 |k%))..J.|ptr%!4=s|
|00002050| 25 0d 0b 54 10 6c 65 6e | 67 74 68 25 3d 6b 25 2d |%..T.len|gth%=k%-|
|00002060| 31 0d 0b 5e 05 cd 0d 0b | 68 1e 24 28 70 74 72 25 |1..^....|h.$(ptr%|
|00002070| 2b 31 32 29 3d c0 6d 65 | 6e 75 24 2c 6c 65 6e 67 |+12)=.me|nu$,leng|
|00002080| 74 68 25 29 0d 0b 72 25 | e7 20 6c 65 6e 67 74 68 |th%)..r%|. length|
|00002090| 25 3e 77 69 64 74 68 25 | 20 8c 20 77 69 64 74 68 |%>width%| . width|
|000020a0| 25 3d 6c 65 6e 67 74 68 | 25 0d 0b 7c 0c 70 74 72 |%=length|%..|.ptr|
|000020b0| 25 2b 3d 32 34 0d 0b 86 | 18 4d 65 6e 75 5f 4e 6f |%+=24...|.Menu_No|
|000020c0| 4f 66 45 6e 74 72 69 65 | 73 25 2b 3d 31 0d 0b 90 |OfEntrie|s%+=1...|
|000020d0| 05 cd 0d 0b 9a 05 ce 0d | 0b a4 1a 6d 65 6e 75 25 |........|...menu%|
|000020e0| 21 31 36 3d 31 36 2a 28 | 77 69 64 74 68 25 2b 31 |!16=16*(|width%+1|
|000020f0| 29 0d 0b ae 1b 70 74 72 | 25 21 2d 32 34 3d 70 74 |)....ptr|%!-24=pt|
|00002100| 72 25 21 2d 32 34 20 84 | 20 26 38 30 0d 0b b8 0a |r%!-24 .| &80....|
|00002110| 3d 6d 65 6e 75 25 0d 0b | c2 34 dd 20 a4 57 69 6d |=menu%..|.4. .Wim|
|00002120| 70 5f 4d 65 6e 75 43 68 | 6f 69 63 65 28 6c 65 76 |p_MenuCh|oice(lev|
|00002130| 65 6c 25 29 3d 28 62 6c | 6f 63 6b 25 21 28 34 2a |el%)=(bl|ock%!(4*|
|00002140| 6c 65 76 65 6c 25 29 29 | 2b 31 0d 0b cc 1f dd 20 |level%))|+1..... |
|00002150| f2 57 69 6d 70 5f 4d 65 | 6e 75 50 6f 70 55 70 42 |.Wimp_Me|nuPopUpB|
|00002160| 61 72 28 78 25 2c 79 25 | 29 0d 0b d6 0f ea 20 6e |ar(x%,y%|)..... n|
|00002170| 25 20 3a 20 6e 25 3d 30 | 0d 0b e0 2b c8 95 20 28 |% : n%=0|...+.. (|
|00002180| 28 42 61 72 5f 4d 65 6e | 75 25 21 28 32 38 2b 6e |(Bar_Men|u%!(28+n|
|00002190| 25 2a 32 34 29 29 80 25 | 31 30 30 30 30 30 30 30 |%*24)).%|10000000|
|000021a0| 29 3d 30 0d 0b ea 09 6e | 25 2b 3d 31 0d 0b f4 05 |)=0....n|%+=1....|
|000021b0| ce 0d 0b fe 33 c8 99 20 | 22 57 69 6d 70 5f 43 72 |....3.. |"Wimp_Cr|
|000021c0| 65 61 74 65 4d 65 6e 75 | 22 2c 2c 42 61 72 5f 4d |eateMenu|",,Bar_M|
|000021d0| 65 6e 75 25 2c 78 25 2d | 36 34 2c 31 34 30 2b 6e |enu%,x%-|64,140+n|
|000021e0| 25 2a 34 34 0d 0c 08 13 | 6d 65 6e 75 25 3d 42 61 |%*44....|menu%=Ba|
|000021f0| 72 5f 4d 65 6e 75 25 0d | 0c 12 05 e1 0d 0c 1c 22 |r_Menu%.|......."|
|00002200| dd 20 f2 57 69 6d 70 5f | 4d 65 6e 75 50 6f 70 55 |. .Wimp_|MenuPopU|
|00002210| 70 28 4d 65 6e 75 25 2c | 78 25 2c 79 25 29 0d 0c |p(Menu%,|x%,y%)..|
|00002220| 26 0f 6d 65 6e 75 25 3d | 4d 65 6e 75 25 0d 0c 30 |&.menu%=|Menu%..0|
|00002230| 2b c8 99 20 22 57 69 6d | 70 5f 43 72 65 61 74 65 |+.. "Wim|p_Create|
|00002240| 4d 65 6e 75 22 2c 2c 6d | 65 6e 75 25 2c 78 25 2d |Menu",,m|enu%,x%-|
|00002250| 36 34 2c 79 25 2b 32 30 | 0d 0c 3a 05 e1 0d 0c 44 |64,y%+20|..:....D|
|00002260| 06 f4 7c 0d 0c 4e 2d dd | 20 f2 57 69 6d 70 5f 41 |..|..N-.| .Wimp_A|
|00002270| 6c 65 72 74 42 6f 78 28 | 74 69 74 6c 65 24 2c 6d |lertBox(|title$,m|
|00002280| 65 73 73 61 67 65 24 2c | 62 75 74 74 6f 6e 25 29 |essage$,|button%)|
|00002290| 0d 0c 58 0f ea 20 72 65 | 73 70 6f 6e 73 65 25 0d |..X.. re|sponse%.|
|000022a0| 0c 62 18 24 28 62 6c 6f | 63 6b 25 2b 34 29 3d 6d |.b.$(blo|ck%+4)=m|
|000022b0| 65 73 73 61 67 65 24 0d | 0c 6c 10 c8 8e 20 62 75 |essage$.|.l... bu|
|000022c0| 74 74 6f 6e 25 20 ca 0d | 0c 76 2d c9 20 32 20 20 |tton% ..|.v-. 2  |
|000022d0| 20 20 3a 20 72 65 73 70 | 6f 6e 73 65 25 3d 31 20 |  : resp|onse%=1 |
|000022e0| 20 20 20 20 3a 20 f4 7c | 2e 2e 2e 45 72 72 6f 72 |    : .||...Error|
|000022f0| 20 42 6f 78 0d 0c 80 38 | c9 20 31 20 20 20 20 3a | Box...8|. 1    :|
|00002300| 20 72 65 73 70 6f 6e 73 | 65 25 3d 31 35 20 20 20 | respons|e%=15   |
|00002310| 20 3a 20 f4 7c 2e 2e 2e | 4f 4b 20 61 6e 64 20 43 | : .|...|OK and C|
|00002320| 41 4e 43 45 4c 20 62 75 | 74 6f 6e 73 0d 0c 8a 20 |ANCEL bu|tons... |
|00002330| c9 20 33 20 20 20 20 3a | 20 72 65 73 70 6f 6e 73 |. 3    :| respons|
|00002340| 65 25 3d 28 31 3c 3c 35 | 29 2b 31 36 0d 0c 94 20 |e%=(1<<5|)+16... |
|00002350| c9 20 34 20 20 20 20 3a | 20 72 65 73 70 6f 6e 73 |. 4    :| respons|
|00002360| 65 25 3d 28 31 3c 3c 36 | 29 2b 31 36 0d 0c 9e 2d |e%=(1<<6|)+16...-|
|00002370| 7f 20 3a 20 72 65 73 70 | 6f 6e 73 65 25 3d 31 36 |. : resp|onse%=16|
|00002380| 20 20 20 20 3a 20 f4 7c | 2e 2e 2e 4f 4b 20 62 75 |    : .||...OK bu|
|00002390| 74 74 6f 6e 20 6f 6e 6c | 79 0d 0c a8 05 cb 0d 0c |tton onl|y.......|
|000023a0| b2 3e c8 99 20 22 57 69 | 6d 70 5f 52 65 70 6f 72 |.>.. "Wi|mp_Repor|
|000023b0| 74 45 72 72 6f 72 22 2c | 62 6c 6f 63 6b 25 2c 72 |tError",|block%,r|
|000023c0| 65 73 70 6f 6e 73 65 25 | 2c 74 69 74 6c 65 24 20 |esponse%|,title$ |
|000023d0| b8 20 2c 72 65 73 70 6f | 6e 73 65 25 0d 0c bc 05 |. ,respo|nse%....|
|000023e0| e1 0d 0c c6 25 dd 20 f2 | 57 69 6d 70 5f 45 72 72 |....%. .|Wimp_Err|
|000023f0| 6f 72 42 6f 78 28 74 69 | 74 6c 65 24 2c 6d 65 73 |orBox(ti|tle$,mes|
|00002400| 73 61 67 65 24 29 0d 0c | d0 25 f2 57 69 6d 70 5f |sage$)..|.%.Wimp_|
|00002410| 41 6c 65 72 74 42 6f 78 | 28 74 69 74 6c 65 24 2c |AlertBox|(title$,|
|00002420| 6d 65 73 73 61 67 65 24 | 2c 32 29 0d 0c da 05 e1 |message$|,2).....|
|00002430| 0d 0c e4 22 dd 20 f2 57 | 69 6d 70 5f 41 6c 65 72 |...". .W|imp_Aler|
|00002440| 74 28 74 69 74 6c 65 24 | 2c 6d 65 73 73 61 67 65 |t(title$|,message|
|00002450| 24 29 0d 0c ee 25 f2 57 | 69 6d 70 5f 41 6c 65 72 |$)...%.W|imp_Aler|
|00002460| 74 42 6f 78 28 74 69 74 | 6c 65 24 2c 6d 65 73 73 |tBox(tit|le$,mess|
|00002470| 61 67 65 24 2c 30 29 0d | 0c f8 05 e1 0d ff       |age$,0).|......  |
+--------+-------------------------+-------------------------+--------+--------+