home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1995-05-06 | 12.6 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| file
| data
| default
| |
| 100%
| xdgMime
| image/x-tga
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 10 f4 20 3e 21 | 52 75 6e 49 6d 61 67 65 |..... >!|RunImage|
|00000010| 0d 00 14 04 0d 00 1e 17 | 74 61 73 6b 6e 61 6d 65 |........|taskname|
|00000020| 24 3d 22 56 4d 45 43 74 | 72 6c 22 0d 00 28 1c 64 |$="VMECt|rl"..(.d|
|00000030| 69 72 6e 61 6d 65 24 3d | 22 3c 56 4d 45 43 74 72 |irname$=|"<VMECtr|
|00000040| 6c 24 64 69 72 3e 22 0d | 00 32 18 69 63 6f 6e 6e |l$dir>".|.2.iconn|
|00000050| 61 6d 65 24 3d 22 21 56 | 4d 45 43 74 72 6c 22 0d |ame$="!V|MECtrl".|
|00000060| 00 3c 17 6d 65 6e 75 6e | 61 6d 65 24 3d 22 56 4d |.<.menun|ame$="VM|
|00000070| 45 43 74 72 6c 22 0d 00 | 46 30 76 6d 65 66 69 6c |ECtrl"..|F0vmefil|
|00000080| 65 74 79 70 65 25 3d 26 | 39 61 35 3a 73 61 76 65 |etype%=&|9a5:save|
|00000090| 66 69 6c 65 74 79 70 65 | 25 3d 76 6d 65 66 69 6c |filetype|%=vmefil|
|000000a0| 65 74 79 70 65 25 0d 00 | 50 0f 70 61 69 6e 66 6c |etype%..|P.painfl|
|000000b0| 61 67 25 3d a3 0d 00 5a | 1c 6f 73 33 25 3d a4 6f |ag%=...Z|.os3%=.o|
|000000c0| 73 33 3a 73 6f 6c 69 64 | 64 72 61 67 6f 6e 25 3d |s3:solid|dragon%=|
|000000d0| 30 0d 00 64 0e 69 6e 71 | 75 69 72 65 25 3d a3 0d |0..d.inq|uire%=..|
|000000e0| 00 6e 10 64 69 65 6f 6e | 73 61 76 65 25 3d a3 0d |.n.dieon|save%=..|
|000000f0| 00 78 13 64 61 74 61 6d | 6f 64 69 66 69 65 64 25 |.x.datam|odified%|
|00000100| 3d a3 0d 00 82 04 0d 00 | 8c 27 ee 20 85 20 f2 6e |=.......|.'. . .n|
|00000110| 61 67 67 28 f6 24 2b 22 | 20 61 74 20 6c 69 6e 65 |agg(.$+"| at line|
|00000120| 20 22 2b c3 28 9e 29 29 | 3a f2 64 69 65 0d 00 96 | "+.(.))|:.die...|
|00000130| 1f de 20 74 61 73 6b 69 | 64 25 20 38 3a 24 74 61 |.. taski|d% 8:$ta|
|00000140| 73 6b 69 64 25 3d 22 54 | 41 53 4b 22 0d 00 a0 43 |skid%="T|ASK"...C|
|00000150| c8 99 22 57 69 6d 70 5f | 49 6e 69 74 69 61 6c 69 |.."Wimp_|Initiali|
|00000160| 73 65 22 2c 32 30 30 2c | 21 74 61 73 6b 69 64 25 |se",200,|!taskid%|
|00000170| 2c 74 61 73 6b 6e 61 6d | 65 24 20 b8 20 76 65 72 |,tasknam|e$ . ver|
|00000180| 73 69 6f 6e 25 2c 74 61 | 73 6b 68 61 6e 64 25 0d |sion%,ta|skhand%.|
|00000190| 00 aa 04 0d 00 b4 3e de | 20 62 6c 6f 63 6b 25 20 |......>.| block% |
|000001a0| 31 30 32 34 2c 69 62 6d | 25 20 31 30 32 34 2c 77 |1024,ibm|% 1024,w|
|000001b0| 69 6e 6d 25 20 31 30 32 | 34 2c 77 62 6c 6b 25 20 |inm% 102|4,wblk% |
|000001c0| 31 30 32 34 2c 6d 6f 64 | 75 6c 65 25 20 34 30 39 |1024,mod|ule% 409|
|000001d0| 36 0d 00 be 48 c8 99 22 | 4f 53 5f 46 69 6c 65 22 |6...H.."|OS_File"|
|000001e0| 2c 32 35 35 2c 64 69 72 | 6e 61 6d 65 24 2b 22 2e |,255,dir|name$+".|
|000001f0| 56 4d 45 63 6f 6e 74 72 | 6f 6c 22 2c 6d 6f 64 75 |VMEcontr|ol",modu|
|00000200| 6c 65 25 2c 30 20 b8 20 | 2c 2c 2c 2c 6d 6f 64 75 |le%,0 . |,,,,modu|
|00000210| 6c 65 6c 65 6e 67 74 68 | 25 0d 00 c8 14 c8 99 22 |lelength|%......"|
|00000220| 48 6f 75 72 67 6c 61 73 | 73 5f 4f 6e 22 0d 00 d2 |Hourglas|s_On"...|
|00000230| 0c f2 73 70 72 69 74 65 | 73 0d 00 dc 0e f2 74 65 |..sprite|s.....te|
|00000240| 6d 70 6c 61 74 65 73 0d | 00 e6 0e f2 69 6e 69 74 |mplates.|....init|
|00000250| 6d 65 6e 75 73 0d 00 f0 | 10 f2 69 6e 69 74 77 69 |menus...|..initwi|
|00000260| 6e 64 6f 77 73 0d 00 fa | 11 69 63 6f 6e 69 64 25 |ndows...|.iconid%|
|00000270| 3d a4 69 63 6f 6e 0d 01 | 04 15 c8 99 22 48 6f 75 |=.icon..|...."Hou|
|00000280| 72 67 6c 61 73 73 5f 4f | 66 66 22 0d 01 0e 04 0d |rglass_O|ff".....|
|00000290| 01 18 05 f5 0d 01 22 0f | 20 20 f2 70 6f 6c 6c 6c |......".| .polll|
|000002a0| 6f 6f 70 0d 01 2c 16 20 | 20 f2 75 70 64 61 74 65 |oop..,. | .update|
|000002b0| 76 6d 65 77 69 6e 64 6f | 77 0d 01 36 07 fd 20 a3 |vmewindo|w..6.. .|
|000002c0| 0d 01 40 05 e0 0d 01 4a | 04 0d 01 54 0f dd 20 f2 |..@....J|...T.. .|
|000002d0| 70 6f 6c 6c 6c 6f 6f 70 | 0d 01 5e 24 c8 99 22 57 |pollloop|..^$.."W|
|000002e0| 69 6d 70 5f 50 6f 6c 6c | 22 2c 31 2c 62 6c 6f 63 |imp_Poll|",1,bloc|
|000002f0| 6b 25 20 b8 20 72 65 61 | 73 6f 6e 25 0d 01 68 10 |k% . rea|son%..h.|
|00000300| c8 8e 20 72 65 61 73 6f | 6e 25 20 ca 0d 01 72 25 |.. reaso|n% ...r%|
|00000310| c9 20 32 20 3a 20 c8 99 | 22 57 69 6d 70 5f 4f 70 |. 2 : ..|"Wimp_Op|
|00000320| 65 6e 57 69 6e 64 6f 77 | 22 2c 2c 62 6c 6f 63 6b |enWindow|",,block|
|00000330| 25 0d 01 7c 27 c9 20 33 | 20 3a 20 c8 99 20 22 57 |%..|'. 3| : .. "W|
|00000340| 69 6d 70 5f 43 6c 6f 73 | 65 57 69 6e 64 6f 77 22 |imp_Clos|eWindow"|
|00000350| 2c 2c 62 6c 6f 63 6b 25 | 0d 01 86 1c c9 20 39 20 |,,block%|..... 9 |
|00000360| 3a 20 f2 6d 65 6e 75 63 | 6c 69 63 6b 28 62 6c 6f |: .menuc|lick(blo|
|00000370| 63 6b 25 29 0d 01 90 2b | c9 20 36 20 3a 20 f2 69 |ck%)...+|. 6 : .i|
|00000380| 63 6f 6e 63 6c 69 63 6b | 65 64 28 62 6c 6f 63 6b |conclick|ed(block|
|00000390| 25 21 31 32 2c 62 6c 6f | 63 6b 25 21 31 36 29 0d |%!12,blo|ck%!16).|
|000003a0| 01 9a 20 c9 20 38 20 3a | 20 f2 6b 65 79 70 72 65 |.. . 8 :| .keypre|
|000003b0| 73 73 65 64 28 62 6c 6f | 63 6b 25 21 32 34 29 0d |ssed(blo|ck%!24).|
|000003c0| 01 a4 11 c9 20 31 37 2c | 31 38 3a f2 6d 65 6e 75 |.... 17,|18:.menu|
|000003d0| 0d 01 ae 0f c9 20 37 20 | 3a 20 f2 64 72 61 67 0d |..... 7 |: .drag.|
|000003e0| 01 b8 05 cb 0d 01 c2 05 | e1 0d 01 cc 04 0d 01 d6 |........|........|
|000003f0| 18 dd 20 f2 6b 65 79 70 | 72 65 73 73 65 64 28 63 |.. .keyp|ressed(c|
|00000400| 6f 64 65 25 29 0d 01 e0 | 2f 20 20 e7 20 63 6f 64 |ode%)...|/ . cod|
|00000410| 65 25 3c 3e 31 33 20 8c | 20 c8 99 22 57 69 6d 70 |e%<>13 .| .."Wimp|
|00000420| 5f 50 72 6f 63 65 73 73 | 4b 65 79 22 2c 63 6f 64 |_Process|Key",cod|
|00000430| 65 25 3a e1 0d 01 ea 26 | 20 20 c8 99 22 57 69 6d |e%:....&| .."Wim|
|00000440| 70 5f 47 65 74 43 61 72 | 65 74 50 6f 73 69 74 69 |p_GetCar|etPositi|
|00000450| 6f 6e 22 2c 2c 77 62 6c | 6b 25 0d 01 f4 22 20 20 |on",,wbl|k%..." |
|00000460| 77 69 6e 64 6f 77 25 3d | 21 77 62 6c 6b 25 3a 69 |window%=|!wblk%:i|
|00000470| 63 6f 6e 25 3d 77 62 6c | 6b 25 21 34 0d 01 fe 2e |con%=wbl|k%!4....|
|00000480| 20 20 62 75 74 74 6f 6e | 73 25 3d 34 3a f4 20 73 | button|s%=4:. s|
|00000490| 69 6d 75 6c 61 74 65 20 | 73 65 6c 65 63 74 20 62 |imulate |select b|
|000004a0| 79 20 64 65 66 61 75 6c | 74 21 0d 02 08 12 20 20 |y defaul|t!.... |
|000004b0| c8 8e 20 77 69 6e 64 6f | 77 25 20 ca 0d 02 12 44 |.. windo|w% ....D|
|000004c0| 20 20 20 20 c9 20 73 61 | 76 65 25 20 3a 20 f2 73 | . sa|ve% : .s|
|000004d0| 65 6c 65 63 74 65 64 28 | 73 61 76 65 25 2c 30 2c |elected(|save%,0,|
|000004e0| 2d 31 29 3a f2 73 61 76 | 65 6f 6b 3a f2 73 65 6c |-1):.sav|eok:.sel|
|000004f0| 65 63 74 65 64 28 73 61 | 76 65 25 2c 30 2c 30 29 |ected(sa|ve%,0,0)|
|00000500| 0d 02 1c 24 20 20 20 20 | 7f 3a 20 c8 99 22 57 69 |...$ |.: .."Wi|
|00000510| 6d 70 5f 50 72 6f 63 65 | 73 73 4b 65 79 22 2c 63 |mp_Proce|ssKey",c|
|00000520| 6f 64 65 25 0d 02 26 07 | 20 20 cb 0d 02 30 05 e1 |ode%..&.| ...0..|
|00000530| 0d 02 3a 04 0d 02 44 12 | dd 20 f2 6e 61 67 67 28 |..:...D.|. .nagg(|
|00000540| 6e 61 67 67 24 29 0d 02 | 4e 34 c8 99 22 57 69 6d |nagg$)..|N4.."Wim|
|00000550| 70 5f 52 65 70 6f 72 74 | 45 72 72 6f 72 22 2c 22 |p_Report|Error","|
|00000560| 20 20 20 20 22 2b 6e 61 | 67 67 24 2c 31 3c 3c 34 | "+na|gg$,1<<4|
|00000570| 2c 74 61 73 6b 6e 61 6d | 65 24 0d 02 58 05 e1 0d |,tasknam|e$..X...|
|00000580| 02 62 04 0d 02 6c 0b dd | 20 a4 69 63 6f 6e 0d 02 |.b...l..| .icon..|
|00000590| 76 0f 62 6c 6f 63 6b 25 | 21 30 3d 2d 31 0d 02 80 |v.block%|!0=-1...|
|000005a0| 0e 62 6c 6f 63 6b 25 21 | 34 3d 30 0d 02 8a 1e 62 |.block%!|4=0....b|
|000005b0| 6c 6f 63 6b 25 21 38 3d | 30 20 3a 20 f4 20 59 20 |lock%!8=|0 : . Y |
|000005c0| 44 49 52 45 43 54 49 4f | 4e 0d 02 94 20 62 6c 6f |DIRECTIO|N... blo|
|000005d0| 63 6b 25 21 31 32 3d 37 | 36 20 3a 20 f4 20 58 20 |ck%!12=7|6 : . X |
|000005e0| 44 49 52 45 43 54 49 4f | 4e 0d 02 9e 10 62 6c 6f |DIRECTIO|N....blo|
|000005f0| 63 6b 25 21 31 36 3d 37 | 36 0d 02 a8 13 62 6c 6f |ck%!16=7|6....blo|
|00000600| 63 6b 25 21 32 30 3d 26 | 32 30 30 32 0d 02 b2 1a |ck%!20=&|2002....|
|00000610| 24 28 62 6c 6f 63 6b 25 | 2b 32 34 29 3d 69 63 6f |$(block%|+24)=ico|
|00000620| 6e 6e 61 6d 65 24 0d 02 | bc 28 c8 99 20 22 57 69 |nname$..|.(.. "Wi|
|00000630| 6d 70 5f 43 72 65 61 74 | 65 49 63 6f 6e 22 2c 2c |mp_Creat|eIcon",,|
|00000640| 62 6c 6f 63 6b 25 20 b8 | 20 69 63 6f 6e 25 0d 02 |block% .| icon%..|
|00000650| c6 0a 3d 69 63 6f 6e 25 | 0d 02 d0 04 0d 02 da 0a |..=icon%|........|
|00000660| dd 20 f2 64 69 65 0d 02 | e4 29 ee 20 85 20 f2 6e |. .die..|.). . .n|
|00000670| 61 67 67 28 22 45 72 72 | 6f 72 20 69 6e 20 64 65 |agg("Err|or in de|
|00000680| 61 74 68 20 74 68 72 6f | 65 73 21 22 29 3a e0 0d |ath thro|es!"):..|
|00000690| 02 ee 10 e3 20 62 25 3d | 31 20 b8 20 32 35 35 0d |.... b%=|1 . 255.|
|000006a0| 02 f8 1b 20 20 e7 20 28 | 62 25 3f 66 6f 6e 74 61 |... . (|b%?fonta|
|000006b0| 72 72 61 79 25 29 3e 30 | 20 8c 0d 03 02 20 20 20 |rray%)>0| .... |
|000006c0| 20 20 e3 20 69 25 3d 31 | 20 b8 20 28 62 25 3f 66 | . i%=1| . (b%?f|
|000006d0| 6f 6e 74 61 72 72 61 79 | 25 29 0d 03 0c 1e 20 20 |ontarray|%).... |
|000006e0| 20 20 20 20 c8 99 22 46 | 6f 6e 74 5f 4c 6f 73 65 | .."F|ont_Lose|
|000006f0| 46 6f 6e 74 22 2c 62 25 | 0d 03 16 09 20 20 20 20 |Font",b%|.... |
|00000700| ed 0d 03 20 07 20 20 cd | 0d 03 2a 05 ed 0d 03 34 |... . .|..*....4|
|00000710| 29 c8 99 22 57 69 6d 70 | 5f 43 6c 6f 73 65 44 6f |).."Wimp|_CloseDo|
|00000720| 77 6e 22 2c 74 61 73 6b | 68 61 6e 64 25 2c 21 74 |wn",task|hand%,!t|
|00000730| 61 73 6b 69 64 25 0d 03 | 3e 05 e0 0d 03 48 05 e1 |askid%..|>....H..|
|00000740| 0d 03 52 04 0d 03 5c 11 | dd 20 f2 63 6c 69 63 6b |..R...\.|. .click|
|00000750| 5f 74 79 70 65 0d 03 66 | 0f 63 25 3d 62 6c 6f 63 |_type..f|.c%=bloc|
|00000760| 6b 25 21 38 0d 03 70 12 | e7 20 63 25 3d 34 20 f2 |k%!8..p.|. c%=4 .|
|00000770| 73 65 6c 65 63 74 0d 03 | 7a 18 e7 20 63 25 3d 32 |select..|z.. c%=2|
|00000780| 20 f2 70 6f 70 75 70 6d | 65 6e 75 28 b9 29 0d 03 | .popupm|enu(.)..|
|00000790| 84 12 e7 20 63 25 3d 31 | 20 f2 61 64 6a 75 73 74 |... c%=1| .adjust|
|000007a0| 0d 03 8e 05 e1 0d 03 98 | 04 0d 03 a2 0b dd 20 f2 |........|...... .|
|000007b0| 6d 65 6e 75 0d 03 ac 12 | c8 8e 20 62 6c 6f 63 6b |menu....|.. block|
|000007c0| 25 21 31 36 20 ca 0d 03 | b6 0c c9 20 30 3a f2 64 |%!16 ...|... 0:.d|
|000007d0| 69 65 0d 03 c0 10 c9 20 | 32 3a f2 73 61 76 65 61 |ie..... |2:.savea|
|000007e0| 63 6b 0d 03 ca 11 c9 20 | 33 3a f2 66 69 6c 65 64 |ck..... |3:.filed|
|000007f0| 72 6f 70 0d 03 d4 10 c9 | 20 34 3a f2 6c 6f 61 64 |rop.....| 4:.load|
|00000800| 61 63 6b 0d 03 de 11 c9 | 20 35 3a f2 64 61 74 61 |ack.....| 5:.data|
|00000810| 6f 70 65 6e 0d 03 e8 05 | cb 0d 03 f2 05 e1 0d 03 |open....|........|
|00000820| fc 04 0d 04 06 0f dd 20 | f2 66 69 6c 65 64 72 6f |....... |.filedro|
|00000830| 70 0d 04 10 6c 20 20 e7 | 20 28 62 6c 6f 63 6b 25 |p...l .| (block%|
|00000840| 21 32 30 3d 6d 61 69 6e | 25 20 84 20 62 6c 6f 63 |!20=main|% . bloc|
|00000850| 6b 25 21 32 30 3d 2d 32 | 29 20 80 20 28 62 6c 6f |k%!20=-2|) . (blo|
|00000860| 63 6b 25 21 34 30 3d 76 | 6d 65 66 69 6c 65 74 79 |ck%!40=v|mefilety|
|00000870| 70 65 25 29 20 8c 20 f2 | 63 68 65 63 6b 6c 6f 61 |pe%) . .|checkloa|
|00000880| 64 28 a4 66 69 6c 65 28 | 62 6c 6f 63 6b 25 2b 34 |d(.file(|block%+4|
|00000890| 34 29 2c 62 6c 6f 63 6b | 25 21 34 30 29 0d 04 1a |4),block|%!40)...|
|000008a0| 05 e1 0d 04 24 04 0d 04 | 2e 13 dd 20 a4 66 69 6c |....$...|... .fil|
|000008b0| 65 28 77 68 65 72 65 25 | 29 0d 04 38 0c 66 69 6c |e(where%|)..8.fil|
|000008c0| 65 24 3d 22 22 0d 04 42 | 0e c8 95 20 3f 77 68 65 |e$=""..B|... ?whe|
|000008d0| 72 65 25 0d 04 4c 15 66 | 69 6c 65 24 2b 3d bd 28 |re%..L.f|ile$+=.(|
|000008e0| 3f 77 68 65 72 65 25 29 | 0d 04 56 0d 77 68 65 72 |?where%)|..V.wher|
|000008f0| 65 25 2b 3d 31 0d 04 60 | 05 ce 0d 04 6a 0a 3d 66 |e%+=1..`|....j.=f|
|00000900| 69 6c 65 24 0d 04 74 04 | 0d 04 7e 10 dd 20 f2 69 |ile$..t.|..~.. .i|
|00000910| 6e 69 74 6d 65 6e 75 73 | 0d 04 88 22 20 20 69 25 |nitmenus|..." i%|
|00000920| 3d a4 69 6e 69 74 6d 65 | 6e 75 28 69 62 6d 25 2c |=.initme|nu(ibm%,|
|00000930| 6d 65 6e 75 6e 61 6d 65 | 24 29 0d 04 92 27 20 20 |menuname|$)...' |
|00000940| 69 25 3d a4 61 64 64 69 | 74 65 6d 28 69 25 2c 22 |i%=.addi|tem(i%,"|
|00000950| 49 6e 66 6f 22 2c 30 2c | 69 6e 66 5f 77 69 6e 25 |Info",0,|inf_win%|
|00000960| 29 0d 04 9c 24 20 20 69 | 25 3d a4 61 64 64 69 74 |)...$ i|%=.addit|
|00000970| 65 6d 28 69 25 2c 22 53 | 61 76 65 22 2c 30 2c 73 |em(i%,"S|ave",0,s|
|00000980| 61 76 65 25 29 0d 04 a6 | 22 20 20 69 25 3d a4 61 |ave%)...|" i%=.a|
|00000990| 64 64 69 74 65 6d 28 69 | 25 2c 22 51 75 69 74 22 |dditem(i|%,"Quit"|
|000009a0| 2c 2d 31 2c 2d 31 29 0d | 04 b0 07 20 20 f4 0d 04 |,-1,-1).|... ...|
|000009b0| ba 23 20 20 69 25 3d a4 | 69 6e 69 74 6d 65 6e 75 |.# i%=.|initmenu|
|000009c0| 28 77 69 6e 6d 25 2c 6d | 65 6e 75 6e 61 6d 65 24 |(winm%,m|enuname$|
|000009d0| 29 0d 04 c4 27 20 20 69 | 25 3d a4 61 64 64 69 74 |)...' i|%=.addit|
|000009e0| 65 6d 28 69 25 2c 22 49 | 6e 66 6f 22 2c 30 2c 69 |em(i%,"I|nfo",0,i|
|000009f0| 6e 66 5f 77 69 6e 25 29 | 0d 04 ce 24 20 20 69 25 |nf_win%)|...$ i%|
|00000a00| 3d a4 61 64 64 69 74 65 | 6d 28 69 25 2c 22 53 61 |=.addite|m(i%,"Sa|
|00000a10| 76 65 22 2c 30 2c 73 61 | 76 65 25 29 0d 04 d8 22 |ve",0,sa|ve%)..."|
|00000a20| 20 20 69 25 3d a4 61 64 | 64 69 74 65 6d 28 69 25 | i%=.ad|ditem(i%|
|00000a30| 2c 22 51 75 69 74 22 2c | 2d 31 2c 2d 31 29 0d 04 |,"Quit",|-1,-1)..|
|00000a40| e2 05 e1 0d 04 ec 04 0d | 04 f6 16 dd 20 f2 70 6f |........|.... .po|
|00000a50| 70 75 70 6d 65 6e 75 28 | 62 61 72 25 29 0d 05 00 |pupmenu(|bar%)...|
|00000a60| 12 e7 20 69 6e 71 75 69 | 72 65 25 20 8c 20 e1 0d |.. inqui|re% . ..|
|00000a70| 05 0a 24 c8 99 20 22 57 | 69 6d 70 5f 47 65 74 50 |..$.. "W|imp_GetP|
|00000a80| 6f 69 6e 74 65 72 49 6e | 66 6f 22 2c 2c 62 6c 6f |ointerIn|fo",,blo|
|00000a90| 63 6b 25 0d 05 14 32 71 | 3d 21 62 6c 6f 63 6b 25 |ck%...2q|=!block%|
|00000aa0| 3a 77 3d 62 6c 6f 63 6b | 25 21 34 3a 77 25 3d 62 |:w=block|%!4:w%=b|
|00000ab0| 6c 6f 63 6b 25 21 31 32 | 3a 69 25 3d 62 6c 6f 63 |lock%!12|:i%=bloc|
|00000ac0| 6b 25 21 31 36 0d 05 1e | 1e e7 20 62 61 72 25 20 |k%!16...|.. bar% |
|00000ad0| 8c 20 77 3d 39 36 2b 34 | 34 2a 33 20 8b 20 77 2b |. w=96+4|4*3 . w+|
|00000ae0| 3d 32 32 0d 05 28 25 e7 | 20 62 61 72 25 20 8c 20 |=22..(%.| bar% . |
|00000af0| 6d 65 6e 75 25 3d 69 62 | 6d 25 20 8b 20 6d 65 6e |menu%=ib|m% . men|
|00000b00| 75 25 3d 77 69 6e 6d 25 | 0d 05 32 26 c8 99 20 22 |u%=winm%|..2&.. "|
|00000b10| 57 69 6d 70 5f 43 72 65 | 61 74 65 4d 65 6e 75 22 |Wimp_Cre|ateMenu"|
|00000b20| 2c 2c 6d 65 6e 75 25 2c | 71 2d 36 34 2c 77 0d 05 |,,menu%,|q-64,w..|
|00000b30| 3c 26 6c 61 73 74 6d 65 | 6e 75 25 3d 6d 65 6e 75 |<&lastme|nu%=menu|
|00000b40| 25 3a 6d 65 6e 78 25 3d | 71 2d 36 34 3a 6d 65 6e |%:menx%=|q-64:men|
|00000b50| 79 25 3d 77 0d 05 46 05 | e1 0d 05 50 04 0d 05 5a |y%=w..F.|...P...Z|
|00000b60| 10 dd 20 f2 74 65 6d 70 | 6c 61 74 65 73 0d 05 64 |.. .temp|lates..d|
|00000b70| 14 de 20 66 6f 6e 74 61 | 72 72 61 79 25 20 32 35 |.. fonta|rray% 25|
|00000b80| 36 0d 05 6e 14 e3 20 62 | 25 3d 30 20 b8 20 32 35 |6..n.. b|%=0 . 25|
|00000b90| 32 20 88 20 34 0d 05 78 | 13 62 25 21 66 6f 6e 74 |2 . 4..x|.b%!font|
|00000ba0| 61 72 72 61 79 25 3d 30 | 0d 05 82 05 ed 0d 05 8c |array%=0|........|
|00000bb0| 19 de 20 69 6e 66 62 25 | 20 35 30 30 2c 69 6e 66 |.. infb%| 500,inf|
|00000bc0| 69 25 20 31 32 38 0d 05 | 96 19 de 20 61 75 74 62 |i% 128..|... autb|
|00000bd0| 25 20 38 36 34 2c 61 75 | 74 69 25 20 32 30 34 0d |% 864,au|ti% 204.|
|00000be0| 05 a0 19 de 20 73 61 76 | 62 25 20 36 30 30 2c 73 |.... sav|b% 600,s|
|00000bf0| 61 76 69 25 20 33 32 38 | 0d 05 aa 1a de 20 6d 61 |avi% 328|..... ma|
|00000c00| 69 62 25 20 31 30 32 34 | 2c 6d 61 69 69 25 20 33 |ib% 1024|,maii% 3|
|00000c10| 30 30 0d 05 b4 30 c8 99 | 22 57 69 6d 70 5f 4f 70 |00...0..|"Wimp_Op|
|00000c20| 65 6e 54 65 6d 70 6c 61 | 74 65 22 2c 2c 64 69 72 |enTempla|te",,dir|
|00000c30| 6e 61 6d 65 24 2b 22 2e | 74 65 6d 70 6c 61 74 65 |name$+".|template|
|00000c40| 73 22 0d 05 be 42 69 6e | 66 5f 77 69 6e 25 3d a4 |s"...Bin|f_win%=.|
|00000c50| 74 65 6d 70 6c 61 74 65 | 28 22 69 6e 66 6f 22 2c |template|("info",|
|00000c60| 69 6e 66 62 25 2c 69 6e | 66 69 25 2c 32 30 30 2c |infb%,in|fi%,200,|
|00000c70| 66 6f 6e 74 61 72 72 61 | 79 25 2c 73 70 72 69 74 |fontarra|y%,sprit|
|00000c80| 65 73 25 29 0d 05 c8 44 | 61 75 74 5f 77 69 6e 25 |es%)...D|aut_win%|
|00000c90| 3d a4 74 65 6d 70 6c 61 | 74 65 28 22 61 75 74 68 |=.templa|te("auth|
|00000ca0| 6f 72 22 2c 61 75 74 62 | 25 2c 61 75 74 69 25 2c |or",autb|%,auti%,|
|00000cb0| 33 30 30 2c 66 6f 6e 74 | 61 72 72 61 79 25 2c 73 |300,font|array%,s|
|00000cc0| 70 72 69 74 65 73 25 29 | 0d 05 d2 3f 73 61 76 65 |prites%)|...?save|
|00000cd0| 25 3d a4 74 65 6d 70 6c | 61 74 65 28 22 73 61 76 |%=.templ|ate("sav|
|00000ce0| 65 22 2c 73 61 76 62 25 | 2c 73 61 76 69 25 2c 34 |e",savb%|,savi%,4|
|00000cf0| 30 30 2c 66 6f 6e 74 61 | 72 72 61 79 25 2c 73 70 |00,fonta|rray%,sp|
|00000d00| 72 69 74 65 73 25 29 0d | 05 dc 43 6d 61 69 6e 25 |rites%).|..Cmain%|
|00000d10| 3d a4 74 65 6d 70 6c 61 | 74 65 28 22 76 6d 65 63 |=.templa|te("vmec|
|00000d20| 74 72 6c 22 2c 6d 61 69 | 62 25 2c 6d 61 69 69 25 |trl",mai|b%,maii%|
|00000d30| 2c 31 30 32 34 2c 66 6f | 6e 74 61 72 72 61 79 25 |,1024,fo|ntarray%|
|00000d40| 2c 73 70 72 69 74 65 73 | 25 29 0d 05 e6 1a c8 99 |,sprites|%)......|
|00000d50| 22 57 69 6d 70 5f 43 6c | 6f 73 65 54 65 6d 70 6c |"Wimp_Cl|oseTempl|
|00000d60| 61 74 65 22 0d 05 f0 05 | e1 0d 05 fa 04 0d 06 04 |ate"....|........|
|00000d70| 32 dd 20 a4 74 65 6d 70 | 6c 61 74 65 28 6e 61 6d |2. .temp|late(nam|
|00000d80| 65 24 2c 62 75 66 25 2c | 69 6e 64 25 2c 6c 65 6e |e$,buf%,|ind%,len|
|00000d90| 25 2c 66 6f 6e 74 73 25 | 2c 73 70 72 73 25 29 0d |%,fonts%|,sprs%).|
|00000da0| 06 0e 3d c8 99 22 57 69 | 6d 70 5f 4c 6f 61 64 54 |..=.."Wi|mp_LoadT|
|00000db0| 65 6d 70 6c 61 74 65 22 | 2c 2c 62 75 66 25 2c 69 |emplate"|,,buf%,i|
|00000dc0| 6e 64 25 2c 69 6e 64 25 | 2b 6c 65 6e 25 2c 66 6f |nd%,ind%|+len%,fo|
|00000dd0| 6e 74 73 25 2c 6e 61 6d | 65 24 2c 30 0d 06 18 11 |nts%,nam|e$,0....|
|00000de0| 62 75 66 25 21 36 34 3d | 73 70 72 73 25 0d 06 22 |buf%!64=|sprs%.."|
|00000df0| 29 c8 99 22 57 69 6d 70 | 5f 43 72 65 61 74 65 57 |).."Wimp|_CreateW|
|00000e00| 69 6e 64 6f 77 22 2c 2c | 62 75 66 25 20 b8 20 68 |indow",,|buf% . h|
|00000e10| 61 6e 64 6c 65 25 0d 06 | 2c 0c 3d 68 61 6e 64 6c |andle%..|,.=handl|
|00000e20| 65 25 0d 06 36 04 0d 06 | 40 0e dd 20 f2 73 70 72 |e%..6...|@.. .spr|
|00000e30| 69 74 65 73 0d 06 4a 23 | 66 69 6c 65 25 3d 8e 28 |ites..J#|file%=.(|
|00000e40| 64 69 72 6e 61 6d 65 24 | 2b 22 2e 53 70 72 69 74 |dirname$|+".Sprit|
|00000e50| 65 46 69 6c 65 22 29 0d | 06 54 34 e7 20 66 69 6c |eFile").|.T4. fil|
|00000e60| 65 25 3d 30 20 8c 20 f2 | 6e 61 67 67 28 22 43 61 |e%=0 . .|nagg("Ca|
|00000e70| 6e 27 74 20 66 69 6e 64 | 20 73 70 72 69 74 65 66 |n't find| spritef|
|00000e80| 69 6c 65 21 22 29 3a f2 | 64 69 65 0d 06 5e 14 53 |ile!"):.|die..^.S|
|00000e90| 25 3d 28 a2 23 66 69 6c | 65 25 29 2b 31 32 38 0d |%=(.#fil|e%)+128.|
|00000ea0| 06 68 0b d9 23 66 69 6c | 65 25 0d 06 72 11 de 20 |.h..#fil|e%..r.. |
|00000eb0| 73 70 72 69 74 65 73 25 | 20 53 25 0d 06 7c 11 73 |sprites%| S%..|.s|
|00000ec0| 70 72 69 74 65 73 25 21 | 30 3d 53 25 0d 06 86 11 |prites%!|0=S%....|
|00000ed0| 73 70 72 69 74 65 73 25 | 21 38 3d 31 36 0d 06 90 |sprites%|!8=16...|
|00000ee0| 22 c8 99 22 4f 53 5f 53 | 70 72 69 74 65 4f 70 22 |".."OS_S|priteOp"|
|00000ef0| 2c 39 2b 32 35 36 2c 73 | 70 72 69 74 65 73 25 0d |,9+256,s|prites%.|
|00000f00| 06 9a 3a c8 99 22 4f 53 | 5f 53 70 72 69 74 65 4f |..:.."OS|_SpriteO|
|00000f10| 70 22 2c 31 30 2b 32 35 | 36 2c 73 70 72 69 74 65 |p",10+25|6,sprite|
|00000f20| 73 25 2c 64 69 72 6e 61 | 6d 65 24 2b 22 2e 53 50 |s%,dirna|me$+".SP|
|00000f30| 52 49 54 45 46 49 4c 45 | 22 0d 06 a4 05 e1 0d 06 |RITEFILE|".......|
|00000f40| ae 04 0d 06 b8 0d dd 20 | f2 73 65 6c 65 63 74 0d |....... |.select.|
|00000f50| 06 c2 18 20 20 f2 6f 70 | 65 6e 77 69 6e 64 6f 77 |... .op|enwindow|
|00000f60| 28 6d 61 69 6e 25 29 0d | 06 cc 05 e1 0d 06 d6 0d |(main%).|........|
|00000f70| dd 20 f2 61 64 6a 75 73 | 74 0d 06 e0 1b 20 20 f2 |. .adjus|t.... .|
|00000f80| 6f 70 65 6e 77 69 6e 64 | 6f 77 28 61 75 74 5f 77 |openwind|ow(aut_w|
|00000f90| 69 6e 25 29 0d 06 ea 05 | e1 0d 06 f4 04 0d 06 fe |in%)....|........|
|00000fa0| 1a dd 20 f2 6f 70 65 6e | 77 69 6e 64 6f 77 28 77 |.. .open|window(w|
|00000fb0| 69 6e 64 6f 77 25 29 0d | 07 08 12 21 77 62 6c 6b |indow%).|...!wblk|
|00000fc0| 25 3d 77 69 6e 64 6f 77 | 25 0d 07 12 22 c8 99 22 |%=window|%...".."|
|00000fd0| 57 69 6d 70 5f 47 65 74 | 57 69 6e 64 6f 77 53 74 |Wimp_Get|WindowSt|
|00000fe0| 61 74 65 22 2c 2c 77 62 | 6c 6b 25 0d 07 1c 0f 77 |ate",,wb|lk%....w|
|00000ff0| 62 6c 6b 25 21 32 38 3d | 2d 31 0d 07 26 13 66 6c |blk%!28=|-1..&.fl|
|00001000| 61 67 73 25 3d 77 62 6c | 6b 25 21 33 32 0d 07 30 |ags%=wbl|k%!32..0|
|00001010| 1a e7 20 28 66 6c 61 67 | 73 25 20 80 20 31 3c 3c |.. (flag|s% . 1<<|
|00001020| 31 36 29 3d 30 20 8c 0d | 07 3a 14 20 20 21 77 62 |16)=0 ..|.:. !wb|
|00001030| 6c 6b 25 3d 77 69 6e 64 | 6f 77 25 0d 07 44 23 20 |lk%=wind|ow%..D# |
|00001040| 20 c8 99 22 57 69 6d 70 | 5f 47 65 74 57 69 6e 64 | .."Wimp|_GetWind|
|00001050| 6f 77 49 6e 66 6f 22 2c | 2c 77 62 6c 6b 25 0d 07 |owInfo",|,wblk%..|
|00001060| 4e 2f 20 20 6d 77 69 64 | 25 3d a4 72 65 61 64 5f |N/ mwid|%=.read_|
|00001070| 6d 6f 64 65 28 2d 31 2c | 31 31 29 3c 3c a4 72 65 |mode(-1,|11)<<.re|
|00001080| 61 64 5f 6d 6f 64 65 28 | 2d 31 2c 34 29 0d 07 58 |ad_mode(|-1,4)..X|
|00001090| 2f 20 20 6d 68 69 67 25 | 3d a4 72 65 61 64 5f 6d |/ mhig%|=.read_m|
|000010a0| 6f 64 65 28 2d 31 2c 31 | 32 29 3c 3c a4 72 65 61 |ode(-1,1|2)<<.rea|
|000010b0| 64 5f 6d 6f 64 65 28 2d | 31 2c 35 29 0d 07 62 21 |d_mode(-|1,5)..b!|
|000010c0| 20 20 77 69 64 74 68 25 | 3d 28 77 62 6c 6b 25 21 | width%|=(wblk%!|
|000010d0| 31 32 29 2d 28 77 62 6c | 6b 25 21 34 29 0d 07 6c |12)-(wbl|k%!4)..l|
|000010e0| 22 20 20 68 65 69 67 68 | 74 25 3d 28 77 62 6c 6b |" heigh|t%=(wblk|
|000010f0| 25 21 31 36 29 2d 28 77 | 62 6c 6b 25 21 38 29 0d |%!16)-(w|blk%!8).|
|00001100| 07 76 22 20 20 77 62 6c | 6b 25 21 34 3d 6d 77 69 |.v" wbl|k%!4=mwi|
|00001110| 64 25 20 81 32 20 2d 20 | 77 69 64 74 68 25 20 81 |d% .2 - |width% .|
|00001120| 32 0d 07 80 1f 20 20 77 | 62 6c 6b 25 21 31 32 3d |2.... w|blk%!12=|
|00001130| 28 77 62 6c 6b 25 21 34 | 29 2b 77 69 64 74 68 25 |(wblk%!4|)+width%|
|00001140| 0d 07 8a 24 20 20 77 62 | 6c 6b 25 21 38 3d 6d 68 |...$ wb|lk%!8=mh|
|00001150| 69 67 25 20 81 32 20 2d | 20 68 65 69 67 68 74 25 |ig% .2 -| height%|
|00001160| 20 81 20 32 0d 07 94 1e | 20 20 77 62 6c 6b 25 21 | . 2....| wblk%!|
|00001170| 31 36 3d 77 62 6c 6b 25 | 21 38 2b 68 65 69 67 68 |16=wblk%|!8+heigh|
|00001180| 74 25 0d 07 9e 11 20 20 | 77 62 6c 6b 25 21 32 38 |t%.... |wblk%!28|
|00001190| 3d 2d 31 0d 07 a8 05 cd | 0d 07 b2 1e c8 99 22 57 |=-1.....|......"W|
|000011a0| 69 6d 70 5f 4f 70 65 6e | 57 69 6e 64 6f 77 22 2c |imp_Open|Window",|
|000011b0| 2c 77 62 6c 6b 25 0d 07 | bc 05 e1 0d 07 c6 04 0d |,wblk%..|........|
|000011c0| 07 d0 1f dd 20 f2 70 69 | 69 28 77 69 6e 64 6f 77 |.... .pi|i(window|
|000011d0| 25 2c 69 63 6f 6e 25 2c | 74 65 78 74 24 29 0d 07 |%,icon%,|text$)..|
|000011e0| da 12 21 77 62 6c 6b 25 | 3d 77 69 6e 64 6f 77 25 |..!wblk%|=window%|
|000011f0| 0d 07 e4 11 77 62 6c 6b | 25 21 34 3d 69 63 6f 6e |....wblk|%!4=icon|
|00001200| 25 0d 07 ee 20 c8 99 22 | 57 69 6d 70 5f 47 65 74 |%... .."|Wimp_Get|
|00001210| 49 63 6f 6e 53 74 61 74 | 65 22 2c 2c 77 62 6c 6b |IconStat|e",,wblk|
|00001220| 25 0d 07 f8 25 6f 74 24 | 3d 24 28 77 62 6c 6b 25 |%...%ot$|=$(wblk%|
|00001230| 21 32 38 29 3a 24 28 77 | 62 6c 6b 25 21 32 38 29 |!28):$(w|blk%!28)|
|00001240| 3d 74 65 78 74 24 0d 08 | 02 0d 77 62 6c 6b 25 21 |=text$..|..wblk%!|
|00001250| 38 3d 30 0d 08 0c 0e 77 | 62 6c 6b 25 21 31 32 3d |8=0....w|blk%!12=|
|00001260| 30 0d 08 16 2f e7 20 6f | 74 24 3c 3e 74 65 78 74 |0.../. o|t$<>text|
|00001270| 24 20 8c 20 c8 99 22 57 | 69 6d 70 5f 53 65 74 49 |$ . .."W|imp_SetI|
|00001280| 63 6f 6e 53 74 61 74 65 | 22 2c 2c 77 62 6c 6b 25 |conState|",,wblk%|
|00001290| 0d 08 20 05 e1 0d 08 2a | 04 0d 08 34 1e dd 20 a4 |.. ....*|...4.. .|
|000012a0| 63 6f 6e 74 65 6e 74 73 | 28 77 69 6e 64 6f 77 25 |contents|(window%|
|000012b0| 2c 69 63 6f 6e 25 29 0d | 08 3e 12 21 77 62 6c 6b |,icon%).|.>.!wblk|
|000012c0| 25 3d 77 69 6e 64 6f 77 | 25 0d 08 48 11 77 62 6c |%=window|%..H.wbl|
|000012d0| 6b 25 21 34 3d 69 63 6f | 6e 25 0d 08 52 20 c8 99 |k%!4=ico|n%..R ..|
|000012e0| 22 57 69 6d 70 5f 47 65 | 74 49 63 6f 6e 53 74 61 |"Wimp_Ge|tIconSta|
|000012f0| 74 65 22 2c 2c 77 62 6c | 6b 25 0d 08 5c 10 3d 24 |te",,wbl|k%..\.=$|
|00001300| 28 77 62 6c 6b 25 21 32 | 38 29 0d 08 66 04 0d 08 |(wblk%!2|8)..f...|
|00001310| 70 1b dd 20 f2 63 6c 6f | 73 65 77 69 6e 64 6f 77 |p.. .clo|sewindow|
|00001320| 28 77 69 6e 64 6f 77 25 | 29 0d 08 7a 12 21 77 62 |(window%|)..z.!wb|
|00001330| 6c 6b 25 3d 77 69 6e 64 | 6f 77 25 0d 08 84 1f c8 |lk%=wind|ow%.....|
|00001340| 99 22 57 69 6d 70 5f 43 | 6c 6f 73 65 57 69 6e 64 |."Wimp_C|loseWind|
|00001350| 6f 77 22 2c 2c 77 62 6c | 6b 25 0d 08 8e 05 e1 0d |ow",,wbl|k%......|
|00001360| 08 98 04 0d 08 a2 23 dd | 20 f2 63 68 61 6e 67 65 |......#.| .change|
|00001370| 76 61 6c 28 77 69 6e 64 | 6f 77 25 2c 69 63 6f 6e |val(wind|ow%,icon|
|00001380| 25 2c 74 6f 24 29 0d 08 | ac 12 21 77 62 6c 6b 25 |%,to$)..|..!wblk%|
|00001390| 3d 77 69 6e 64 6f 77 25 | 0d 08 b6 11 77 62 6c 6b |=window%|....wblk|
|000013a0| 25 21 34 3d 69 63 6f 6e | 25 0d 08 c0 20 c8 99 22 |%!4=icon|%... .."|
|000013b0| 57 69 6d 70 5f 47 65 74 | 49 63 6f 6e 53 74 61 74 |Wimp_Get|IconStat|
|000013c0| 65 22 2c 2c 77 62 6c 6b | 25 0d 08 ca 13 24 28 77 |e",,wblk|%....$(w|
|000013d0| 62 6c 6b 25 21 33 32 29 | 3d 74 6f 24 0d 08 d4 0d |blk%!32)|=to$....|
|000013e0| 77 62 6c 6b 25 21 38 3d | 30 0d 08 de 0e 77 62 6c |wblk%!8=|0....wbl|
|000013f0| 6b 25 21 31 32 3d 30 0d | 08 e8 20 c8 99 22 57 69 |k%!12=0.|.. .."Wi|
|00001400| 6d 70 5f 53 65 74 49 63 | 6f 6e 53 74 61 74 65 22 |mp_SetIc|onState"|
|00001410| 2c 2c 77 62 6c 6b 25 0d | 08 f2 05 e1 0d 08 fc 04 |,,wblk%.|........|
|00001420| 0d 09 06 24 dd 20 f2 73 | 65 6c 65 63 74 65 64 28 |...$. .s|elected(|
|00001430| 77 69 6e 64 6f 77 25 2c | 69 63 6f 6e 25 2c 77 65 |window%,|icon%,we|
|00001440| 6c 6c 25 29 0d 09 10 12 | 21 77 62 6c 6b 25 3d 77 |ll%)....|!wblk%=w|
|00001450| 69 6e 64 6f 77 25 0d 09 | 1a 11 77 62 6c 6b 25 21 |indow%..|..wblk%!|
|00001460| 34 3d 69 63 6f 6e 25 0d | 09 24 12 77 62 6c 6b 25 |4=icon%.|.$.wblk%|
|00001470| 21 31 32 3d 31 3c 3c 32 | 31 0d 09 2e 18 77 62 6c |!12=1<<2|1....wbl|
|00001480| 6b 25 21 38 3d 28 2d 77 | 65 6c 6c 25 29 3c 3c 32 |k%!8=(-w|ell%)<<2|
|00001490| 31 0d 09 38 20 c8 99 22 | 57 69 6d 70 5f 53 65 74 |1..8 .."|Wimp_Set|
|000014a0| 49 63 6f 6e 53 74 61 74 | 65 22 2c 2c 77 62 6c 6b |IconStat|e",,wblk|
|000014b0| 25 0d 09 42 05 e1 0d 09 | 4c 04 0d 09 56 1d dd 20 |%..B....|L...V.. |
|000014c0| a4 69 73 73 65 6c 65 63 | 74 65 64 28 77 69 6e 25 |.isselec|ted(win%|
|000014d0| 2c 69 63 6f 6e 25 29 0d | 09 60 1d 21 77 62 6c 6b |,icon%).|.`.!wblk|
|000014e0| 25 3d 77 69 6e 25 3a 77 | 62 6c 6b 25 21 34 3d 69 |%=win%:w|blk%!4=i|
|000014f0| 63 6f 6e 25 0d 09 6a 20 | c8 99 22 57 69 6d 70 5f |con%..j |.."Wimp_|
|00001500| 47 65 74 49 63 6f 6e 53 | 74 61 74 65 22 2c 2c 77 |GetIconS|tate",,w|
|00001510| 62 6c 6b 25 0d 09 74 1c | 3d 28 28 77 62 6c 6b 25 |blk%..t.|=((wblk%|
|00001520| 21 32 34 29 20 80 20 31 | 3c 3c 32 31 29 3c 3e 30 |!24) . 1|<<21)<>0|
|00001530| 0d 09 7e 04 0d 09 88 20 | dd 20 a4 6d 65 6e 75 73 |..~.... |. .menus|
|00001540| 65 6c 65 63 74 69 6f 6e | 28 62 6c 6b 25 2c 6d 65 |election|(blk%,me|
|00001550| 6e 75 25 29 0d 09 92 2e | 20 20 c8 99 22 57 69 6d |nu%)....| .."Wim|
|00001560| 70 5f 44 65 63 6f 64 65 | 4d 65 6e 75 22 2c 2c 6d |p_Decode|Menu",,m|
|00001570| 65 6e 75 25 2c 62 6c 6b | 25 2c 77 62 6c 6b 25 2b |enu%,blk|%,wblk%+|
|00001580| 36 34 0d 09 9c 10 3d 24 | 28 77 62 6c 6b 25 2b 36 |64....=$|(wblk%+6|
|00001590| 34 29 0d 09 a6 04 0d 09 | b0 18 dd 20 f2 6d 65 6e |4)......|... .men|
|000015a0| 75 63 6c 69 63 6b 28 62 | 72 74 6e 64 25 29 0d 09 |uclick(b|rtnd%)..|
|000015b0| ba 2c 20 20 69 74 65 6d | 24 3d a4 6d 65 6e 75 73 |., item|$=.menus|
|000015c0| 65 6c 65 63 74 69 6f 6e | 28 62 72 74 6e 64 25 2c |election|(brtnd%,|
|000015d0| 6c 61 73 74 6d 65 6e 75 | 25 29 0d 09 c4 17 20 20 |lastmenu|%).... |
|000015e0| f4 20 50 52 4f 43 6e 61 | 67 67 28 69 74 65 6d 24 |. PROCna|gg(item$|
|000015f0| 29 0d 09 ce 10 20 20 c8 | 8e 20 69 74 65 6d 24 20 |).... .|. item$ |
|00001600| ca 0d 09 d8 18 20 20 20 | 20 c9 20 22 51 75 69 74 |..... | . "Quit|
|00001610| 22 20 3a 20 f2 71 75 69 | 74 0d 09 e2 40 20 20 20 |" : .qui|t...@ |
|00001620| 20 c9 20 22 49 6e 66 6f | 22 20 3a 20 c8 99 22 57 | . "Info|" : .."W|
|00001630| 69 6d 70 5f 43 72 65 61 | 74 65 4d 65 6e 75 22 2c |imp_Crea|teMenu",|
|00001640| 2c 2d 31 3a f2 6f 70 65 | 6e 77 69 6e 64 6f 77 28 |,-1:.ope|nwindow(|
|00001650| 61 75 74 5f 77 69 6e 25 | 29 0d 09 ec 1a 20 20 20 |aut_win%|).... |
|00001660| 20 c9 20 22 53 61 76 65 | 22 20 3a 20 f2 73 61 76 | . "Save|" : .sav|
|00001670| 65 6f 6b 0d 09 f6 07 20 | 20 cb 0d 0a 00 05 e1 0d |eok.... | .......|
|00001680| 0a 0a 04 0d 0a 14 22 dd | 20 f2 6f 70 65 6e 77 69 |......".| .openwi|
|00001690| 6e 64 6f 77 78 79 28 77 | 69 6e 64 6f 77 25 2c 78 |ndowxy(w|indow%,x|
|000016a0| 25 2c 79 25 29 0d 0a 1e | 12 21 77 62 6c 6b 25 3d |%,y%)...|.!wblk%=|
|000016b0| 77 69 6e 64 6f 77 25 0d | 0a 28 22 c8 99 22 57 69 |window%.|.(".."Wi|
|000016c0| 6d 70 5f 47 65 74 57 69 | 6e 64 6f 77 53 74 61 74 |mp_GetWi|ndowStat|
|000016d0| 65 22 2c 2c 77 62 6c 6b | 25 0d 0a 32 14 20 20 21 |e",,wblk|%..2. !|
|000016e0| 77 62 6c 6b 25 3d 77 69 | 6e 64 6f 77 25 0d 0a 3c |wblk%=wi|ndow%..<|
|000016f0| 23 20 20 c8 99 22 57 69 | 6d 70 5f 47 65 74 57 69 |# .."Wi|mp_GetWi|
|00001700| 6e 64 6f 77 49 6e 66 6f | 22 2c 2c 77 62 6c 6b 25 |ndowInfo|",,wblk%|
|00001710| 0d 0a 46 21 20 20 77 69 | 64 74 68 25 3d 28 77 62 |..F! wi|dth%=(wb|
|00001720| 6c 6b 25 21 31 32 29 2d | 28 77 62 6c 6b 25 21 34 |lk%!12)-|(wblk%!4|
|00001730| 29 0d 0a 50 20 20 20 68 | 69 74 65 25 3d 28 77 62 |)..P h|ite%=(wb|
|00001740| 6c 6b 25 21 31 36 29 2d | 28 77 62 6c 6b 25 21 38 |lk%!16)-|(wblk%!8|
|00001750| 29 0d 0a 5a 10 20 20 77 | 62 6c 6b 25 21 34 3d 78 |)..Z. w|blk%!4=x|
|00001760| 25 0d 0a 64 1f 20 20 77 | 62 6c 6b 25 21 31 32 3d |%..d. w|blk%!12=|
|00001770| 28 77 62 6c 6b 25 21 34 | 29 2b 77 69 64 74 68 25 |(wblk%!4|)+width%|
|00001780| 0d 0a 6e 11 20 20 77 62 | 6c 6b 25 21 31 36 3d 79 |..n. wb|lk%!16=y|
|00001790| 25 0d 0a 78 1e 20 20 77 | 62 6c 6b 25 21 38 3d 28 |%..x. w|blk%!8=(|
|000017a0| 77 62 6c 6b 25 21 31 36 | 29 2d 68 69 74 65 25 0d |wblk%!16|)-hite%.|
|000017b0| 0a 82 11 20 20 77 62 6c | 6b 25 21 32 38 3d 2d 31 |... wbl|k%!28=-1|
|000017c0| 0d 0a 8c 1e c8 99 22 57 | 69 6d 70 5f 4f 70 65 6e |......"W|imp_Open|
|000017d0| 57 69 6e 64 6f 77 22 2c | 2c 77 62 6c 6b 25 0d 0a |Window",|,wblk%..|
|000017e0| 96 05 e1 0d 0a a0 04 0d | 0a aa 1b dd 20 f2 73 61 |........|.... .sa|
|000017f0| 76 65 63 6c 69 63 6b 65 | 64 28 78 78 25 2c 79 79 |veclicke|d(xx%,yy|
|00001800| 25 29 0d 0a b4 22 20 20 | f2 6f 70 65 6e 77 69 6e |%)..." |.openwin|
|00001810| 64 6f 77 78 79 28 73 61 | 76 65 25 2c 78 78 25 2c |dowxy(sa|ve%,xx%,|
|00001820| 79 79 25 29 0d 0a be 05 | e1 0d 0a c8 04 0d 0a d2 |yy%)....|........|
|00001830| 12 dd 20 f2 69 6e 69 74 | 77 69 6e 64 6f 77 73 0d |.. .init|windows.|
|00001840| 0a dc 33 20 20 f2 63 68 | 61 6e 67 65 76 61 6c 28 |..3 .ch|angeval(|
|00001850| 73 61 76 65 25 2c 32 2c | 22 53 66 69 6c 65 5f 22 |save%,2,|"Sfile_"|
|00001860| 2b c3 7e 28 76 6d 65 66 | 69 6c 65 74 79 70 65 25 |+.~(vmef|iletype%|
|00001870| 29 29 0d 0a e6 18 20 20 | f2 70 69 69 28 6d 61 69 |)).... |.pii(mai|
|00001880| 6e 25 2c 33 2c c3 28 eb | 29 29 0d 0a f0 19 20 20 |n%,3,.(.|)).... |
|00001890| f2 70 69 69 28 73 61 76 | 65 25 2c 31 2c 22 56 4d |.pii(sav|e%,1,"VM|
|000018a0| 45 22 29 0d 0a fa 1a 20 | 20 f2 73 65 6c 65 63 74 |E").... | .select|
|000018b0| 65 64 28 73 61 76 65 25 | 2c 34 2c a3 29 0d 0b 04 |ed(save%|,4,.)...|
|000018c0| 16 20 20 f2 75 70 64 61 | 74 65 76 6d 65 77 69 6e |. .upda|tevmewin|
|000018d0| 64 6f 77 0d 0b 0e 05 e1 | 0d 0b 18 04 0d 0b 22 0e |dow.....|......".|
|000018e0| dd 20 f2 6c 6f 61 64 61 | 63 6b 0d 0b 2c 16 62 6c |. .loada|ck..,.bl|
|000018f0| 6f 63 6b 25 21 31 32 3d | 62 6c 6f 63 6b 25 21 38 |ock%!12=|block%!8|
|00001900| 0d 0b 36 0f 62 6c 6f 63 | 6b 25 21 31 36 3d 34 0d |..6.bloc|k%!16=4.|
|00001910| 0b 40 2c c8 99 20 22 57 | 69 6d 70 5f 53 65 6e 64 |.@,.. "W|imp_Send|
|00001920| 4d 65 73 73 61 67 65 22 | 2c 31 39 2c 62 6c 6f 63 |Message"|,19,bloc|
|00001930| 6b 25 2c 62 6c 6f 63 6b | 25 21 34 0d 0b 4a 05 e1 |k%,block|%!4..J..|
|00001940| 0d 0b 54 04 0d 0b 5e 0e | dd 20 f2 73 61 76 65 61 |..T...^.|. .savea|
|00001950| 63 6b 0d 0b 68 1a 6e 61 | 6d 65 24 3d a4 66 69 6c |ck..h.na|me$=.fil|
|00001960| 65 28 62 6c 6f 63 6b 25 | 2b 34 34 29 0d 0b 72 2d |e(block%|+44)..r-|
|00001970| e7 20 a4 6c 65 61 66 6e | 61 6d 65 28 6e 61 6d 65 |. .leafn|ame(name|
|00001980| 24 29 3d 22 22 20 8c 20 | e1 3a f4 20 4e 4f 20 46 |$)="" . |.:. NO F|
|00001990| 49 4c 45 20 4e 41 4d 45 | 21 0d 0b 7c 0f 62 6c 6f |ILE NAME|!..|.blo|
|000019a0| 63 6b 25 21 31 36 3d 33 | 0d 0b 86 2b c8 99 22 57 |ck%!16=3|...+.."W|
|000019b0| 69 6d 70 5f 53 65 6e 64 | 4d 65 73 73 61 67 65 22 |imp_Send|Message"|
|000019c0| 2c 31 37 2c 62 6c 6f 63 | 6b 25 2c 62 6c 6f 63 6b |,17,bloc|k%,block|
|000019d0| 25 21 34 0d 0b 90 17 f2 | 70 69 69 28 73 61 76 65 |%!4.....|pii(save|
|000019e0| 25 2c 31 2c 6e 61 6d 65 | 24 29 0d 0b 9a 0b f2 73 |%,1,name|$).....s|
|000019f0| 61 76 65 6f 6b 0d 0b a4 | 05 e1 0d 0b ae 04 0d 0b |aveok...|........|
|00001a00| b8 0d dd 20 f2 73 61 76 | 65 6f 6b 0d 0b c2 17 f2 |... .sav|eok.....|
|00001a10| 63 6c 6f 73 65 77 69 6e | 64 6f 77 28 73 61 76 65 |closewin|dow(save|
|00001a20| 25 29 0d 0b cc 1b c8 99 | 22 57 69 6d 70 5f 43 72 |%)......|"Wimp_Cr|
|00001a30| 65 61 74 65 4d 65 6e 75 | 22 2c 2c 2d 31 0d 0b d6 |eateMenu|",,-1...|
|00001a40| 20 66 69 6c 65 6e 61 6d | 65 24 3d a4 63 6f 6e 74 | filenam|e$=.cont|
|00001a50| 65 6e 74 73 28 73 61 76 | 65 25 2c 31 29 0d 0b e0 |ents(sav|e%,1)...|
|00001a60| 18 f2 73 61 76 65 66 69 | 6c 65 28 66 69 6c 65 6e |..savefi|le(filen|
|00001a70| 61 6d 65 24 29 0d 0b ea | 17 e7 20 64 69 65 6f 6e |ame$)...|.. dieon|
|00001a80| 73 61 76 65 25 20 8c 20 | f2 64 69 65 0d 0b f4 05 |save% . |.die....|
|00001a90| e1 0d 0b fe 04 0d 0c 08 | 1f dd 20 f2 73 74 61 72 |........|.. .star|
|00001aa0| 74 64 72 61 67 28 77 69 | 6e 64 6f 77 25 2c 69 63 |tdrag(wi|ndow%,ic|
|00001ab0| 6f 6e 25 29 0d 0c 12 1a | 73 6f 6c 69 64 25 3d a4 |on%)....|solid%=.|
|00001ac0| 75 73 65 64 72 61 67 61 | 73 70 72 69 74 65 0d 0c |usedraga|sprite..|
|00001ad0| 1c 14 62 6c 6f 63 6b 25 | 21 30 3d 77 69 6e 64 6f |..block%|!0=windo|
|00001ae0| 77 25 0d 0c 26 24 c8 99 | 20 22 57 69 6d 70 5f 47 |w%..&$..| "Wimp_G|
|00001af0| 65 74 57 69 6e 64 6f 77 | 53 74 61 74 65 22 2c 2c |etWindow|State",,|
|00001b00| 62 6c 6f 63 6b 25 0d 0c | 30 1a 77 78 25 3d 62 6c |block%..|0.wx%=bl|
|00001b10| 6f 63 6b 25 21 34 2d 62 | 6c 6f 63 6b 25 21 32 30 |ock%!4-b|lock%!20|
|00001b20| 0d 0c 3a 1b 77 79 25 3d | 62 6c 6f 63 6b 25 21 31 |..:.wy%=|block%!1|
|00001b30| 36 2d 62 6c 6f 63 6b 25 | 21 32 34 0d 0c 44 12 62 |6-block%|!24..D.b|
|00001b40| 6c 6f 63 6b 25 21 34 3d | 69 63 6f 6e 25 0d 0c 4e |lock%!4=|icon%..N|
|00001b50| 22 c8 99 20 22 57 69 6d | 70 5f 47 65 74 49 63 6f |".. "Wim|p_GetIco|
|00001b60| 6e 53 74 61 74 65 22 2c | 2c 62 6c 6f 63 6b 25 0d |nState",|,block%.|
|00001b70| 0c 58 14 62 6c 6f 63 6b | 25 21 30 3d 77 69 6e 64 |.X.block|%!0=wind|
|00001b80| 6f 77 25 0d 0c 62 0e 62 | 6c 6f 63 6b 25 21 34 3d |ow%..b.b|lock%!4=|
|00001b90| 35 0d 0c 6c 11 62 6c 6f | 63 6b 25 21 38 2b 3d 77 |5..l.blo|ck%!8+=w|
|00001ba0| 78 25 0d 0c 76 12 62 6c | 6f 63 6b 25 21 31 32 2b |x%..v.bl|ock%!12+|
|00001bb0| 3d 77 79 25 0d 0c 80 12 | 62 6c 6f 63 6b 25 21 31 |=wy%....|block%!1|
|00001bc0| 36 2b 3d 77 78 25 0d 0c | 8a 14 62 6c 6f 63 6b 25 |6+=wx%..|..block%|
|00001bd0| 21 32 30 2b 3d 77 79 25 | 2d 32 0d 0c 94 0f 62 6c |!20+=wy%|-2....bl|
|00001be0| 6f 63 6b 25 21 32 34 3d | 30 0d 0c 9e 0f 62 6c 6f |ock%!24=|0....blo|
|00001bf0| 63 6b 25 21 32 38 3d 30 | 0d 0c a8 36 62 6c 6f 63 |ck%!28=0|...6bloc|
|00001c00| 6b 25 21 33 32 3d 28 a4 | 72 65 61 64 5f 6d 6f 64 |k%!32=(.|read_mod|
|00001c10| 65 28 2d 31 2c 31 31 29 | 2b 31 29 2a 32 5e a4 72 |e(-1,11)|+1)*2^.r|
|00001c20| 65 61 64 5f 6d 6f 64 65 | 28 2d 31 2c 34 29 0d 0c |ead_mode|(-1,4)..|
|00001c30| b2 36 62 6c 6f 63 6b 25 | 21 33 36 3d 28 a4 72 65 |.6block%|!36=(.re|
|00001c40| 61 64 5f 6d 6f 64 65 28 | 2d 31 2c 31 32 29 2b 31 |ad_mode(|-1,12)+1|
|00001c50| 29 2a 32 5e a4 72 65 61 | 64 5f 6d 6f 64 65 28 2d |)*2^.rea|d_mode(-|
|00001c60| 31 2c 35 29 0d 0c bc 0e | e7 20 73 6f 6c 69 64 25 |1,5)....|. solid%|
|00001c70| 20 8c 0d 0c c6 22 20 20 | 73 70 72 24 3d 22 66 69 | ...." |spr$="fi|
|00001c80| 6c 65 5f 22 2b c3 7e 73 | 61 76 65 66 69 6c 65 74 |le_"+.~s|avefilet|
|00001c90| 79 70 65 25 0d 0c d0 35 | 20 20 c8 99 22 44 72 61 |ype%...5| .."Dra|
|00001ca0| 67 41 53 70 72 69 74 65 | 5f 53 74 61 72 74 22 2c |gASprite|_Start",|
|00001cb0| 25 31 30 30 30 31 30 31 | 30 2c 31 2c 73 70 72 24 |%1000101|0,1,spr$|
|00001cc0| 2c 62 6c 6f 63 6b 25 2b | 38 0d 0c da 14 20 20 73 |,block%+|8.... s|
|00001cd0| 6f 6c 69 64 64 72 61 67 | 6f 6e 25 3d b9 0d 0c e4 |oliddrag|on%=....|
|00001ce0| 05 cc 0d 0c ee 1f 20 20 | c8 99 20 22 57 69 6d 70 |...... |.. "Wimp|
|00001cf0| 5f 44 72 61 67 42 6f 78 | 22 2c 2c 62 6c 6f 63 6b |_DragBox|",,block|
|00001d00| 25 0d 0c f8 14 20 20 73 | 6f 6c 69 64 64 72 61 67 |%.... s|oliddrag|
|00001d10| 6f 6e 25 3d a3 0d 0d 02 | 05 cd 0d 0d 0c 05 e1 0d |on%=....|........|
|00001d20| 0d 16 04 0d 0d 20 1c dd | 20 a4 72 65 61 64 5f 6d |..... ..| .read_m|
|00001d30| 6f 64 65 28 6d 6f 64 65 | 25 2c 76 61 72 25 29 0d |ode(mode|%,var%).|
|00001d40| 0d 2a 32 c8 99 20 22 4f | 53 5f 52 65 61 64 4d 6f |.*2.. "O|S_ReadMo|
|00001d50| 64 65 56 61 72 69 61 62 | 6c 65 22 2c 6d 6f 64 65 |deVariab|le",mode|
|00001d60| 25 2c 76 61 72 25 20 b8 | 20 2c 2c 76 61 6c 75 65 |%,var% .| ,,value|
|00001d70| 25 0d 0d 34 0b 3d 76 61 | 6c 75 65 25 0d 0d 3e 04 |%..4.=va|lue%..>.|
|00001d80| 0d 0d 48 0b dd 20 f2 64 | 72 61 67 0d 0d 52 29 e7 |..H.. .d|rag..R).|
|00001d90| 20 73 6f 6c 69 64 64 72 | 61 67 6f 6e 25 20 8c 20 | soliddr|agon% . |
|00001da0| c8 99 22 44 72 61 67 41 | 53 70 72 69 74 65 5f 53 |.."DragA|Sprite_S|
|00001db0| 74 6f 70 22 0d 0d 5c 24 | c8 99 20 22 57 69 6d 70 |top"..\$|.. "Wimp|
|00001dc0| 5f 47 65 74 50 6f 69 6e | 74 65 72 49 6e 66 6f 22 |_GetPoin|terInfo"|
|00001dd0| 2c 2c 62 6c 6f 63 6b 25 | 0d 0d 66 10 6d 78 25 3d |,,block%|..f.mx%=|
|00001de0| 62 6c 6f 63 6b 25 21 30 | 0d 0d 70 10 6d 79 25 3d |block%!0|..p.my%=|
|00001df0| 62 6c 6f 63 6b 25 21 34 | 0d 0d 7a 15 77 69 6e 64 |block%!4|..z.wind|
|00001e00| 6f 77 25 3d 62 6c 6f 63 | 6b 25 21 31 32 0d 0d 84 |ow%=bloc|k%!12...|
|00001e10| 11 e7 20 77 69 6e 64 6f | 77 25 3c 31 20 e1 0d 0d |.. windo|w%<1 ...|
|00001e20| 8e 27 6e 61 6d 65 24 3d | a4 6c 65 61 66 6e 61 6d |.'name$=|.leafnam|
|00001e30| 65 28 a4 63 6f 6e 74 65 | 6e 74 73 28 73 61 76 65 |e(.conte|nts(save|
|00001e40| 25 2c 31 29 29 0d 0d 98 | 23 62 6c 6f 63 6b 25 21 |%,1))...|#block%!|
|00001e50| 30 3d 34 34 2b 28 28 a9 | 20 6e 61 6d 65 24 20 81 |0=44+((.| name$ .|
|00001e60| 20 34 29 2b 31 29 2a 34 | 0d 0d a2 0f 62 6c 6f 63 | 4)+1)*4|....bloc|
|00001e70| 6b 25 21 31 36 3d 31 0d | 0d ac 15 62 6c 6f 63 6b |k%!16=1.|...block|
|00001e80| 25 21 32 30 3d 77 69 6e | 64 6f 77 25 0d 0d b6 10 |%!20=win|dow%....|
|00001e90| 62 6c 6f 63 6b 25 21 32 | 34 3d 2d 31 0d 0d c0 11 |block%!2|4=-1....|
|00001ea0| 62 6c 6f 63 6b 25 21 32 | 38 3d 6d 78 25 0d 0d ca |block%!2|8=mx%...|
|00001eb0| 11 62 6c 6f 63 6b 25 21 | 33 32 3d 6d 79 25 0d 0d |.block%!|32=my%..|
|00001ec0| d4 12 62 6c 6f 63 6b 25 | 21 33 36 3d 26 31 30 30 |..block%|!36=&100|
|00001ed0| 0d 0d de 1b 62 6c 6f 63 | 6b 25 21 34 30 3d 73 61 |....bloc|k%!40=sa|
|00001ee0| 76 65 66 69 6c 65 74 79 | 70 65 25 0d 0d e8 19 24 |vefilety|pe%....$|
|00001ef0| 28 62 6c 6f 63 6b 25 2b | 34 34 29 3d 6e 61 6d 65 |(block%+|44)=name|
|00001f00| 24 2b bd 30 0d 0d f2 2b | c8 99 20 22 57 69 6d 70 |$+.0...+|.. "Wimp|
|00001f10| 5f 53 65 6e 64 4d 65 73 | 73 61 67 65 22 2c 31 37 |_SendMes|sage",17|
|00001f20| 2c 62 6c 6f 63 6b 25 2c | 77 69 6e 64 6f 77 25 0d |,block%,|window%.|
|00001f30| 0d fc 05 e1 0d 0e 06 04 | 0d 0e 10 16 dd 20 a4 6c |........|..... .l|
|00001f40| 65 61 66 6e 61 6d 65 28 | 6e 61 6d 65 24 29 0d 0e |eafname(|name$)..|
|00001f50| 1a 0c 6c 65 61 66 24 3d | 22 22 0d 0e 24 21 c8 95 |..leaf$=|""..$!..|
|00001f60| 20 6e 61 6d 65 24 3c 3e | 22 22 20 80 20 c2 6e 61 | name$<>|"" . .na|
|00001f70| 6d 65 24 2c 31 29 3c 3e | 22 2e 22 0d 0e 2e 1b 20 |me$,1)<>|".".... |
|00001f80| 20 6c 65 61 66 24 3d c2 | 6e 61 6d 65 24 2c 31 29 | leaf$=.|name$,1)|
|00001f90| 2b 6c 65 61 66 24 0d 0e | 38 13 20 20 6e 61 6d 65 |+leaf$..|8. name|
|00001fa0| 24 3d c0 6e 61 6d 65 24 | 29 0d 0e 42 05 ce 0d 0e |$=.name$|)..B....|
|00001fb0| 4c 0a 3d 6c 65 61 66 24 | 0d 0e 56 04 0d 0e 60 10 |L.=leaf$|..V...`.|
|00001fc0| dd 20 a4 70 61 64 28 6e | 75 6d 25 29 0d 0e 6a 16 |. .pad(n|um%)..j.|
|00001fd0| 3d c2 22 20 20 20 22 2b | c3 28 6e 75 6d 25 29 2c |=." "+|.(num%),|
|00001fe0| 34 29 0d 0e 74 04 0d 0e | 7e 0a dd 20 a4 6f 73 33 |4)..t...|~.. .os3|
|00001ff0| 0d 0e 88 2b 20 20 c8 99 | 22 4f 53 5f 4d 6f 64 75 |...+ ..|"OS_Modu|
|00002000| 6c 65 22 2c 32 30 2c 30 | 2c 2d 31 20 b8 20 2c 2c |le",20,0|,-1 . ,,|
|00002010| 2c 6e 61 6d 65 24 2c 2c | 2c 76 25 0d 0e 92 2c 3d |,name$,,|,v%...,=|
|00002020| 28 6e 61 6d 65 24 3d 22 | 55 74 69 6c 69 74 79 4d |(name$="|UtilityM|
|00002030| 6f 64 75 6c 65 22 20 80 | 20 76 25 3e 3d 26 33 30 |odule" .| v%>=&30|
|00002040| 30 30 30 29 3c 3e 30 0d | 0e 9c 04 0d 0e a6 15 dd |000)<>0.|........|
|00002050| 20 a4 75 73 65 64 72 61 | 67 61 73 70 72 69 74 65 | .usedra|gasprite|
|00002060| 0d 0e b0 24 20 20 c8 99 | 22 4f 53 5f 42 79 74 65 |...$ ..|"OS_Byte|
|00002070| 22 2c 31 36 31 2c 26 31 | 43 20 b8 20 2c 2c 76 61 |",161,&1|C . ,,va|
|00002080| 6c 75 65 25 0d 0e ba 1b | 3d 28 76 61 6c 75 65 25 |lue%....|=(value%|
|00002090| 20 80 20 32 29 3c 3e 30 | 20 80 20 6f 73 33 25 0d | . 2)<>0| . os3%.|
|000020a0| 0e c4 04 0d 0e ce 0f dd | 20 f2 66 69 6c 65 64 72 |........| .filedr|
|000020b0| 61 67 0d 0e d8 19 20 20 | f2 73 74 61 72 74 64 72 |ag.... |.startdr|
|000020c0| 61 67 28 73 61 76 65 25 | 2c 32 29 0d 0e e2 05 e1 |ag(save%|,2).....|
|000020d0| 0d 0e ec 04 0d 0e f6 0f | dd 20 f2 64 61 74 61 6f |........|. .datao|
|000020e0| 70 65 6e 0d 0f 00 13 74 | 79 70 65 25 3d 62 6c 6f |pen....t|ype%=blo|
|000020f0| 63 6b 25 21 34 30 0d 0f | 0a 1d e7 20 74 79 70 65 |ck%!40..|... type|
|00002100| 25 3c 3e 76 6d 65 66 69 | 6c 65 74 79 70 65 25 20 |%<>vmefi|letype% |
|00002110| 8c 20 e1 0d 0f 14 0c f2 | 6c 6f 61 64 61 63 6b 0d |. ......|loadack.|
|00002120| 0f 1e 1a 6e 61 6d 65 24 | 3d a4 66 69 6c 65 28 62 |...name$|=.file(b|
|00002130| 6c 6f 63 6b 25 2b 34 34 | 29 0d 0f 28 1b f2 63 68 |lock%+44|)..(..ch|
|00002140| 65 63 6b 6c 6f 61 64 28 | 6e 61 6d 65 24 2c 74 79 |eckload(|name$,ty|
|00002150| 70 65 25 29 0d 0f 32 05 | e1 0d 0f 3c 04 0d 0f 46 |pe%)..2.|...<...F|
|00002160| 1d dd 20 f2 63 68 65 63 | 6b 6c 6f 61 64 28 6e 61 |.. .chec|kload(na|
|00002170| 6d 65 24 2c 74 79 70 65 | 25 29 0d 0f 50 0e c8 8e |me$,type|%)..P...|
|00002180| 20 74 79 70 65 25 20 ca | 0d 0f 5a 27 20 20 c9 20 | type% .|..Z' . |
|00002190| 76 6d 65 66 69 6c 65 74 | 79 70 65 25 20 3a 20 f2 |vmefilet|ype% : .|
|000021a0| 6c 6f 61 64 66 69 6c 65 | 28 6e 61 6d 65 24 29 0d |loadfile|(name$).|
|000021b0| 0f 64 05 cb 0d 0f 6e 05 | e1 0d 0f 78 04 0d 0f 82 |.d....n.|...x....|
|000021c0| 15 dd 20 a4 6c 69 6e 65 | 66 28 f8 20 61 24 2c 6c |.. .line|f(. a$,l|
|000021d0| 25 29 0d 0f 8c 0e 20 20 | ea 20 6c 6c 25 2c 62 24 |%).... |. ll%,b$|
|000021e0| 0d 0f 96 10 20 20 62 24 | 3d c0 61 24 2c 6c 25 29 |.... b$|=.a$,l%)|
|000021f0| 0d 0f a0 12 20 20 e7 20 | a9 28 62 24 29 3d 6c 25 |.... . |.(b$)=l%|
|00002200| 20 8c 0d 0f aa 2a 20 20 | 20 20 c8 95 20 a7 22 2e | ....* | .. .".|
|00002210| 2c 21 20 3f 29 3a 25 3b | 22 2c c2 62 24 2c 31 29 |,! ?):%;|",.b$,1)|
|00002220| 29 3d 30 20 80 20 62 24 | 3c 3e 22 22 0d 0f b4 19 |)=0 . b$|<>""....|
|00002230| 20 20 20 20 20 20 62 24 | 3d c0 62 24 2c a9 28 62 | b$|=.b$,.(b|
|00002240| 24 29 2d 31 29 0d 0f be | 09 20 20 20 20 ce 0d 0f |$)-1)...|. ...|
|00002250| c8 07 20 20 cd 0d 0f d2 | 1a 20 20 e7 20 62 24 3d |.. ....|. . b$=|
|00002260| 22 22 20 8c 20 62 24 3d | c0 61 24 2c 6c 25 29 0d |"" . b$=|.a$,l%).|
|00002270| 0f dc 19 20 20 61 24 3d | c2 61 24 2c a9 28 61 24 |... a$=|.a$,.(a$|
|00002280| 29 2d a9 28 62 24 29 29 | 0d 0f e6 24 20 20 e7 20 |)-.(b$))|...$ . |
|00002290| c2 62 24 2c 31 29 3d 22 | 20 22 20 8c 20 62 24 3d |.b$,1)="| " . b$=|
|000022a0| c0 62 24 2c a9 28 62 24 | 29 2d 31 29 0d 0f f0 07 |.b$,.(b$|)-1)....|
|000022b0| 3d 62 24 0d 0f fa 04 0d | 10 04 1a f4 20 44 45 46 |=b$.....|.... DEF|
|000022c0| 46 4e 71 75 65 72 79 28 | 71 24 2c 61 24 2c 62 24 |FNquery(|q$,a$,b$|
|000022d0| 29 0d 10 0e 46 20 20 c8 | 99 22 57 69 6d 70 5f 52 |)...F .|."Wimp_R|
|000022e0| 65 70 6f 72 74 45 72 72 | 6f 72 22 2c 22 20 20 20 |eportErr|or"," |
|000022f0| 20 22 2b 71 24 2b 22 20 | 4f 4b 3d 22 2b 62 24 2b | "+q$+" |OK="+b$+|
|00002300| 22 20 43 61 6e 63 65 6c | 3d 22 2b 61 24 2c 33 20 |" Cancel|="+a$,3 |
|00002310| b8 20 2c 62 6f 62 25 0d | 10 18 0b 3d 62 6f 62 25 |. ,bob%.|...=bob%|
|00002320| 3d 31 0d 10 22 04 0d 10 | 2c 16 dd 20 a4 71 75 65 |=1.."...|,.. .que|
|00002330| 72 79 28 71 24 2c 61 24 | 2c 62 24 29 0d 10 36 2a |ry(q$,a$|,b$)..6*|
|00002340| 20 20 71 71 24 3d a4 6c | 69 6e 65 66 28 71 24 2c | qq$=.l|inef(q$,|
|00002350| 33 32 29 3a f2 70 69 69 | 28 71 75 65 72 79 25 2c |32):.pii|(query%,|
|00002360| 33 2c 71 71 24 29 0d 10 | 40 2a 20 20 71 71 24 3d |3,qq$)..|@* qq$=|
|00002370| a4 6c 69 6e 65 66 28 71 | 24 2c 33 32 29 3a f2 70 |.linef(q|$,32):.p|
|00002380| 69 69 28 71 75 65 72 79 | 25 2c 34 2c 71 71 24 29 |ii(query|%,4,qq$)|
|00002390| 0d 10 4a 2a 20 20 71 71 | 24 3d a4 6c 69 6e 65 66 |..J* qq|$=.linef|
|000023a0| 28 71 24 2c 34 30 29 3a | f2 70 69 69 28 71 75 65 |(q$,40):|.pii(que|
|000023b0| 72 79 25 2c 35 2c 71 71 | 24 29 0d 10 54 2a 20 20 |ry%,5,qq|$)..T* |
|000023c0| 71 71 24 3d a4 6c 69 6e | 65 66 28 71 24 2c 34 30 |qq$=.lin|ef(q$,40|
|000023d0| 29 3a f2 70 69 69 28 71 | 75 65 72 79 25 2c 36 2c |):.pii(q|uery%,6,|
|000023e0| 71 71 24 29 0d 10 5e 29 | 20 20 f2 70 69 69 28 71 |qq$)..^)| .pii(q|
|000023f0| 75 65 72 79 25 2c 32 2c | 61 24 29 3a f2 70 69 69 |uery%,2,|a$):.pii|
|00002400| 28 71 75 65 72 79 25 2c | 37 2c 62 24 29 0d 10 68 |(query%,|7,b$)..h|
|00002410| 19 20 20 f2 6f 70 65 6e | 77 69 6e 64 6f 77 28 71 |. .open|window(q|
|00002420| 75 65 72 79 25 29 0d 10 | 72 10 20 20 69 6e 71 75 |uery%)..|r. inqu|
|00002430| 69 72 65 25 3d b9 0d 10 | 7c 07 20 20 f5 0d 10 86 |ire%=...||. ....|
|00002440| 11 20 20 20 20 f2 70 6f | 6c 6c 6c 6f 6f 70 0d 10 |. .po|llloop..|
|00002450| 90 12 20 20 fd 20 69 6e | 71 75 69 72 65 25 3d a3 |.. . in|quire%=.|
|00002460| 0d 10 9a 0c 3d 69 6e 71 | 62 75 74 25 0d 10 a4 04 |....=inq|but%....|
|00002470| 0d 10 ae 16 dd 20 f2 6c | 6f 61 64 66 69 6c 65 28 |..... .l|oadfile(|
|00002480| 6e 61 6d 65 24 29 0d 10 | b8 19 20 20 f2 70 69 69 |name$)..|.. .pii|
|00002490| 28 73 61 76 65 25 2c 31 | 2c 6e 61 6d 65 24 29 0d |(save%,1|,name$).|
|000024a0| 10 c2 15 20 20 6c 6f 61 | 64 66 69 6c 65 24 3d 6e |... loa|dfile$=n|
|000024b0| 61 6d 65 24 0d 10 cc 1f | 20 20 c8 99 22 56 4d 45 |ame$....| .."VME|
|000024c0| 5f 4c 6f 61 64 4d 61 70 | 22 2c 6c 6f 61 64 66 69 |_LoadMap|",loadfi|
|000024d0| 6c 65 24 0d 10 d6 05 e1 | 0d 10 e0 04 0d 10 ea 21 |le$.....|.......!|
|000024e0| dd 20 f2 69 63 6f 6e 63 | 6c 69 63 6b 65 64 28 77 |. .iconc|licked(w|
|000024f0| 69 6e 64 6f 77 25 2c 69 | 63 6f 6e 25 29 0d 10 f4 |indow%,i|con%)...|
|00002500| 15 62 75 74 74 6f 6e 73 | 25 3d 62 6c 6f 63 6b 25 |.buttons|%=block%|
|00002510| 21 38 0d 10 fe 2f e7 20 | 77 69 6e 64 6f 77 25 3c |!8.../. |window%<|
|00002520| 30 20 80 20 69 63 6f 6e | 25 3d 69 63 6f 6e 69 64 |0 . icon|%=iconid|
|00002530| 25 20 8c 20 f2 63 6c 69 | 63 6b 5f 74 79 70 65 3a |% . .cli|ck_type:|
|00002540| e1 0d 11 08 14 e7 20 28 | 62 6c 6f 63 6b 25 21 38 |...... (|block%!8|
|00002550| 29 3d 32 20 8c 0d 11 12 | 30 20 20 e7 20 77 69 6e |)=2 ....|0 . win|
|00002560| 64 6f 77 25 3d 2d 32 20 | 8c 20 f2 70 6f 70 75 70 |dow%=-2 |. .popup|
|00002570| 6d 65 6e 75 28 69 63 6f | 6e 25 3d 69 63 6f 6e 69 |menu(ico|n%=iconi|
|00002580| 64 25 29 3a e1 0d 11 1c | 27 20 20 e7 20 77 69 6e |d%):....|' . win|
|00002590| 64 6f 77 25 3d 6d 61 69 | 6e 25 20 8c 20 f2 70 6f |dow%=mai|n% . .po|
|000025a0| 70 75 70 6d 65 6e 75 28 | a3 29 3a e1 0d 11 26 35 |pupmenu(|.):...&5|
|000025b0| 20 20 e7 20 70 61 69 6e | 66 6c 61 67 25 20 8c 20 | . pain|flag% . |
|000025c0| e7 20 77 69 6e 64 6f 77 | 25 3d 70 61 69 6e 25 20 |. window|%=pain% |
|000025d0| 8c 20 f2 70 6f 70 75 70 | 6d 65 6e 75 28 a3 29 3a |. .popup|menu(.):|
|000025e0| e1 0d 11 30 05 cd 0d 11 | 3a 10 c8 8e 20 77 69 6e |...0....|:... win|
|000025f0| 64 6f 77 25 20 ca 0d 11 | 44 1a 20 20 c9 20 73 61 |dow% ...|D. . sa|
|00002600| 76 65 25 20 3a 20 c8 8e | 20 69 63 6f 6e 25 20 ca |ve% : ..| icon% .|
|00002610| 0d 11 4e 26 20 20 20 20 | c9 20 32 20 3a 20 e7 20 |..N& |. 2 : . |
|00002620| 62 75 74 74 6f 6e 73 25 | 3e 3d 31 36 20 f2 66 69 |buttons%|>=16 .fi|
|00002630| 6c 65 64 72 61 67 0d 11 | 58 15 20 20 20 20 c9 20 |ledrag..|X. . |
|00002640| 30 20 3a 20 f2 73 61 76 | 65 6f 6b 0d 11 62 45 20 |0 : .sav|eok..bE |
|00002650| 20 20 20 c9 20 33 20 3a | 20 f2 63 6c 6f 73 65 77 | . 3 :| .closew|
|00002660| 69 6e 64 6f 77 28 73 61 | 76 65 25 29 3a 64 69 65 |indow(sa|ve%):die|
|00002670| 6f 6e 73 61 76 65 25 3d | a3 3a c8 99 22 57 69 6d |onsave%=|.:.."Wim|
|00002680| 70 5f 43 72 65 61 74 65 | 4d 65 6e 75 22 2c 2d 31 |p_Create|Menu",-1|
|00002690| 0d 11 6c 27 20 20 20 20 | c9 20 34 20 3a 20 c8 8e |..l' |. 4 : ..|
|000026a0| 20 a4 69 73 73 65 6c 65 | 63 74 65 64 28 73 61 76 | .issele|cted(sav|
|000026b0| 65 25 2c 34 29 20 ca 0d | 11 76 33 20 20 20 20 20 |e%,4) ..|.v3 |
|000026c0| 20 20 20 20 20 20 20 20 | 20 20 c9 20 a3 20 3a 20 | | . . : |
|000026d0| 73 61 76 65 66 69 6c 65 | 74 79 70 65 25 3d 76 6d |savefile|type%=vm|
|000026e0| 65 66 69 6c 65 74 79 70 | 65 25 0d 11 80 2c 20 20 |efiletyp|e%..., |
|000026f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 c9 20 b9 | | . .|
|00002700| 20 20 3a 20 73 61 76 65 | 66 69 6c 65 74 79 70 65 | : save|filetype|
|00002710| 25 3d 26 46 46 41 0d 11 | 8a 12 20 20 20 20 20 20 |%=&FFA..|.. |
|00002720| 20 20 20 20 20 20 20 cb | 0d 11 94 3d 20 20 20 20 | .|...= |
|00002730| 20 20 20 20 20 20 20 20 | 20 f2 63 68 61 6e 67 65 | | .change|
|00002740| 76 61 6c 28 73 61 76 65 | 25 2c 32 2c 22 53 66 69 |val(save|%,2,"Sfi|
|00002750| 6c 65 5f 22 2b c3 7e 73 | 61 76 65 66 69 6c 65 74 |le_"+.~s|avefilet|
|00002760| 79 70 65 25 29 0d 11 9e | 07 20 20 cb 0d 11 a8 36 |ype%)...|. ....6|
|00002770| 20 20 c9 20 61 75 74 5f | 77 69 6e 25 20 3a 20 e7 | . aut_|win% : .|
|00002780| 20 69 63 6f 6e 25 3d 31 | 36 20 8c 20 f2 63 6c 6f | icon%=1|6 . .clo|
|00002790| 73 65 77 69 6e 64 6f 77 | 28 61 75 74 5f 77 69 6e |sewindow|(aut_win|
|000027a0| 25 29 0d 11 b2 4c 20 20 | c9 20 69 6e 66 5f 77 69 |%)...L |. inf_wi|
|000027b0| 6e 25 20 3a 20 e7 20 69 | 63 6f 6e 25 3d 32 20 8c |n% : . i|con%=2 .|
|000027c0| 20 c8 99 22 57 69 6d 70 | 5f 43 72 65 61 74 65 4d | .."Wimp|_CreateM|
|000027d0| 65 6e 75 22 2c 2c 2d 31 | 3a f2 6f 70 65 6e 77 69 |enu",,-1|:.openwi|
|000027e0| 6e 64 6f 77 28 61 75 74 | 5f 77 69 6e 25 29 0d 11 |ndow(aut|_win%)..|
|000027f0| bc 1a 20 20 c9 20 6d 61 | 69 6e 25 20 3a 20 c8 8e |.. . ma|in% : ..|
|00002800| 20 69 63 6f 6e 25 20 ca | 0d 11 c6 34 20 20 20 20 | icon% .|...4 |
|00002810| c9 20 31 30 20 3a 20 c8 | 99 22 56 4d 45 5f 43 6f |. 10 : .|."VME_Co|
|00002820| 6e 74 72 6f 6c 22 2c a4 | 69 73 73 65 6c 65 63 74 |ntrol",.|isselect|
|00002830| 65 64 28 6d 61 69 6e 25 | 2c 31 30 29 0d 11 d0 37 |ed(main%|,10)...7|
|00002840| 20 20 20 20 c9 20 31 31 | 20 3a 20 c8 99 22 56 4d | . 11| : .."VM|
|00002850| 45 5f 57 72 69 74 65 4d | 61 70 22 2c eb 2c a4 69 |E_WriteM|ap",.,.i|
|00002860| 73 73 65 6c 65 63 74 65 | 64 28 6d 61 69 6e 25 2c |sselecte|d(main%,|
|00002870| 31 31 29 0d 11 da 19 20 | 20 20 20 c9 20 31 20 20 |11).... | . 1 |
|00002880| 3a 20 f2 6d 6f 64 65 5f | 64 6f 77 6e 0d 11 e4 17 |: .mode_|down....|
|00002890| 20 20 20 20 c9 20 32 20 | 20 3a 20 f2 6d 6f 64 65 | . 2 | : .mode|
|000028a0| 5f 75 70 0d 11 ee 1e 20 | 20 20 20 c9 20 34 20 20 |_up.... | . 4 |
|000028b0| 3a 20 6d 6f 64 65 25 3d | a4 6d 6f 64 65 74 65 73 |: mode%=|.modetes|
|000028c0| 74 0d 11 f8 4a 20 20 20 | 20 20 20 20 20 20 20 20 |t...J | |
|000028d0| 20 20 20 e7 20 6d 6f 64 | 65 25 3e 3d 30 20 8c 20 | . mod|e%>=0 . |
|000028e0| c8 99 22 56 4d 45 5f 57 | 72 69 74 65 4d 61 70 22 |.."VME_W|riteMap"|
|000028f0| 2c 6d 6f 64 65 25 2c a4 | 69 73 73 65 6c 65 63 74 |,mode%,.|isselect|
|00002900| 65 64 28 6d 61 69 6e 25 | 2c 34 29 0d 12 02 1a 20 |ed(main%|,4).... |
|00002910| 20 20 20 c9 20 31 33 20 | 3a 20 f2 73 61 76 65 77 | . 13 |: .savew|
|00002920| 69 6e 64 6f 77 0d 12 0c | 07 20 20 cb 0d 12 16 05 |indow...|. .....|
|00002930| cb 0d 12 20 05 e1 0d 12 | 2a 04 0d 12 34 12 dd 20 |... ....|*...4.. |
|00002940| f2 71 75 69 74 3a f2 64 | 69 65 3a e1 0d 12 3e 04 |.quit:.d|ie:...>.|
|00002950| 0d 12 48 20 dd 20 a4 69 | 6e 69 74 6d 65 6e 75 28 |..H . .i|nitmenu(|
|00002960| 6d 65 6e 75 25 2c 6d 65 | 6e 75 6e 61 6d 65 24 29 |menu%,me|nuname$)|
|00002970| 0d 12 52 32 24 6d 65 6e | 75 25 3d 6d 65 6e 75 6e |..R2$men|u%=menun|
|00002980| 61 6d 65 24 3a 20 20 20 | 20 20 20 20 20 20 20 20 |ame$: | |
|00002990| 20 20 20 20 3a 20 f4 20 | 6d 65 6e 75 20 74 69 74 | : . |menu tit|
|000029a0| 6c 65 0d 12 5c 45 6d 65 | 6e 75 25 3f 31 32 3d 37 |le..\Eme|nu%?12=7|
|000029b0| 3a 6d 65 6e 75 25 3f 31 | 33 3d 32 20 20 20 20 20 |:menu%?1|3=2 |
|000029c0| 20 20 20 20 20 20 3a 20 | f4 20 74 69 74 6c 65 20 | : |. title |
|000029d0| 66 6f 72 65 67 72 6f 75 | 6e 64 20 26 20 62 61 63 |foregrou|nd & bac|
|000029e0| 6b 67 72 6f 75 6e 64 0d | 12 66 45 6d 65 6e 75 25 |kground.|.fEmenu%|
|000029f0| 3f 31 34 3d 37 3a 6d 65 | 6e 75 25 3f 31 35 3d 30 |?14=7:me|nu%?15=0|
|00002a00| 20 20 20 20 20 20 20 20 | 20 20 20 3a 20 f4 20 6d | | : . m|
|00002a10| 65 6e 75 20 20 66 6f 72 | 65 67 72 6f 75 6e 64 20 |enu for|eground |
|00002a20| 26 20 62 61 63 6b 67 72 | 6f 75 6e 64 0d 12 70 16 |& backgr|ound..p.|
|00002a30| e7 20 a9 28 6d 65 6e 75 | 6e 61 6d 65 24 29 3e 35 |. .(menu|name$)>5|
|00002a40| 20 8c 0d 12 7a 22 20 20 | 6d 65 6e 75 25 21 31 36 | ...z" |menu%!16|
|00002a50| 3d 28 a9 28 6d 65 6e 75 | 6e 61 6d 65 24 29 2b 31 |=(.(menu|name$)+1|
|00002a60| 29 2a 31 36 0d 12 84 05 | cc 0d 12 8e 13 20 20 6d |)*16....|..... m|
|00002a70| 65 6e 75 25 21 31 36 3d | 36 2a 31 36 0d 12 98 05 |enu%!16=|6*16....|
|00002a80| cd 0d 12 a2 32 6d 65 6e | 75 25 21 32 30 3d 34 34 |....2men|u%!20=44|
|00002a90| 20 20 20 20 20 20 20 20 | 3a 20 f4 20 77 69 64 74 | |: . widt|
|00002aa0| 68 20 26 20 68 65 69 67 | 68 74 20 6f 66 20 69 74 |h & heig|ht of it|
|00002ab0| 65 6d 73 0d 12 ac 40 6d | 65 6e 75 25 21 32 34 3d |ems...@m|enu%!24=|
|00002ac0| 30 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |0 | |
|00002ad0| 20 20 20 20 20 20 20 3a | 20 f4 20 76 65 72 74 69 | :| . verti|
|00002ae0| 63 61 6c 20 67 61 70 20 | 74 77 69 78 74 20 69 74 |cal gap |twixt it|
|00002af0| 65 6d 73 0d 12 b6 0d 3d | 6d 65 6e 75 25 2b 32 38 |ems....=|menu%+28|
|00002b00| 0d 12 c0 04 0d 12 ca 26 | dd 20 a4 61 64 64 69 74 |.......&|. .addit|
|00002b10| 65 6d 28 6d 65 6e 75 25 | 2c 74 65 78 74 24 2c 6c |em(menu%|,text$,l|
|00002b20| 61 73 74 25 2c 73 75 62 | 25 29 0d 12 d4 23 e7 20 |ast%,sub|%)...#. |
|00002b30| 6c 61 73 74 25 20 8c 20 | 21 6d 65 6e 75 25 3d 31 |last% . |!menu%=1|
|00002b40| 32 38 20 8b 20 21 6d 65 | 6e 75 25 3d 30 0d 12 de |28 . !me|nu%=0...|
|00002b50| 10 6d 65 6e 75 25 21 34 | 3d 73 75 62 25 0d 12 e8 |.menu%!4|=sub%...|
|00002b60| 14 6d 65 6e 75 25 21 38 | 3d 26 37 30 30 30 30 32 |.menu%!8|=&700002|
|00002b70| 31 0d 12 f2 15 24 28 6d | 65 6e 75 25 2b 31 32 29 |1....$(m|enu%+12)|
|00002b80| 3d 74 65 78 74 24 0d 12 | fc 0d 3d 6d 65 6e 75 25 |=text$..|..=menu%|
|00002b90| 2b 32 34 0d 13 06 04 0d | 13 10 16 dd 20 f2 75 70 |+24.....|.... .up|
|00002ba0| 64 61 74 65 76 6d 65 77 | 69 6e 64 6f 77 0d 13 1a |datevmew|indow...|
|00002bb0| 2e 20 20 c8 99 22 56 4d | 45 5f 53 74 61 74 75 73 |. .."VM|E_Status|
|00002bc0| 22 20 b8 20 76 6d 65 6f | 6e 25 3a 76 6d 65 6f 6e |" . vmeo|n%:vmeon|
|00002bd0| 25 3d 76 6d 65 6f 6e 25 | 3c 3e 30 0d 13 24 35 20 |%=vmeon%|<>0..$5 |
|00002be0| 20 c8 99 22 56 4d 45 5f | 52 65 61 64 4d 61 70 22 | .."VME_|ReadMap"|
|00002bf0| 2c eb 20 b8 20 2c 76 6d | 65 63 66 67 25 3a 76 6d |,. . ,vm|ecfg%:vm|
|00002c00| 65 63 66 67 25 3d 76 6d | 65 63 66 67 25 3c 3e 30 |ecfg%=vm|ecfg%<>0|
|00002c10| 0d 13 2e 21 20 20 f2 70 | 69 69 28 6d 61 69 6e 25 |...! .p|ii(main%|
|00002c20| 2c 31 32 2c 22 4d 6f 64 | 65 20 22 2b c3 28 eb 29 |,12,"Mod|e "+.(.)|
|00002c30| 29 0d 13 38 23 20 20 76 | 65 73 25 3d a4 69 73 73 |)..8# v|es%=.iss|
|00002c40| 65 6c 65 63 74 65 64 28 | 6d 61 69 6e 25 2c 31 30 |elected(|main%,10|
|00002c50| 29 3c 3e 30 0d 13 42 23 | 20 20 76 65 63 25 3d a4 |)<>0..B#| vec%=.|
|00002c60| 69 73 73 65 6c 65 63 74 | 65 64 28 6d 61 69 6e 25 |isselect|ed(main%|
|00002c70| 2c 31 31 29 3c 3e 30 0d | 13 4c 2f 20 20 e7 20 76 |,11)<>0.|.L/ . v|
|00002c80| 65 73 25 3c 3e 76 6d 65 | 6f 6e 25 20 f2 73 65 6c |es%<>vme|on% .sel|
|00002c90| 65 63 74 65 64 28 6d 61 | 69 6e 25 2c 31 30 2c 76 |ected(ma|in%,10,v|
|00002ca0| 6d 65 6f 6e 25 29 0d 13 | 56 31 20 20 e7 20 76 65 |meon%)..|V1 . ve|
|00002cb0| 63 25 3c 3e 76 6d 65 63 | 66 67 25 20 f2 73 65 6c |c%<>vmec|fg% .sel|
|00002cc0| 65 63 74 65 64 28 6d 61 | 69 6e 25 2c 31 31 2c 76 |ected(ma|in%,11,v|
|00002cd0| 6d 65 63 66 67 25 29 0d | 13 60 31 20 20 6d 6f 64 |mecfg%).|.`1 mod|
|00002ce0| 65 25 3d a4 6d 6f 64 65 | 74 65 73 74 3a e7 20 6d |e%=.mode|test:. m|
|00002cf0| 6f 64 65 25 3c 30 20 8c | 20 6d 6f 64 65 25 3d a4 |ode%<0 .| mode%=.|
|00002d00| 6d 6f 64 65 74 65 73 74 | 0d 13 6a 39 20 20 c8 99 |modetest|..j9 ..|
|00002d10| 22 56 4d 45 5f 52 65 61 | 64 4d 61 70 22 2c 6d 6f |"VME_Rea|dMap",mo|
|00002d20| 64 65 25 20 b8 20 2c 76 | 6d 65 63 66 67 25 3a 76 |de% . ,v|mecfg%:v|
|00002d30| 6d 65 63 66 67 25 3d 76 | 6d 65 63 66 67 25 3c 3e |mecfg%=v|mecfg%<>|
|00002d40| 30 0d 13 74 22 20 20 76 | 65 63 25 3d a4 69 73 73 |0..t" v|ec%=.iss|
|00002d50| 65 6c 65 63 74 65 64 28 | 6d 61 69 6e 25 2c 34 29 |elected(|main%,4)|
|00002d60| 3c 3e 30 0d 13 7e 30 20 | 20 e7 20 76 65 63 25 3c |<>0..~0 | . vec%<|
|00002d70| 3e 76 6d 65 63 66 67 25 | 20 f2 73 65 6c 65 63 74 |>vmecfg%| .select|
|00002d80| 65 64 28 6d 61 69 6e 25 | 2c 34 2c 76 6d 65 63 66 |ed(main%|,4,vmecf|
|00002d90| 67 25 29 0d 13 88 05 e1 | 0d 13 92 04 0d 13 9c 0f |g%).....|........|
|00002da0| dd 20 a4 6d 6f 64 65 74 | 65 73 74 0d 13 a6 2e 20 |. .modet|est.... |
|00002db0| 20 6d 6f 64 65 25 3d bb | 28 a4 63 6f 6e 74 65 6e | mode%=.|(.conten|
|00002dc0| 74 73 28 6d 61 69 6e 25 | 2c 33 29 29 3a 6e 6d 6f |ts(main%|,3)):nmo|
|00002dd0| 64 65 25 3d 6d 6f 64 65 | 25 0d 13 b0 4e 20 20 e7 |de%=mode|%...N .|
|00002de0| 20 6d 6f 64 65 25 3c 30 | 20 f2 6e 61 67 67 28 22 | mode%<0| .nagg("|
|00002df0| 48 6d 6d 2c 20 6e 65 67 | 61 74 69 76 65 20 6d 6f |Hmm, neg|ative mo|
|00002e00| 64 65 20 6e 75 6d 62 65 | 72 2e 20 4e 6f 74 20 67 |de numbe|r. Not g|
|00002e10| 6f 6f 64 2c 20 42 61 74 | 6d 61 6e 2e 22 29 3a 6e |ood, Bat|man."):n|
|00002e20| 6d 6f 64 65 25 3d 30 0d | 13 ba 40 20 20 e7 20 6d |mode%=0.|..@ . m|
|00002e30| 6f 64 65 25 3e 31 32 37 | 20 f2 6e 61 67 67 28 22 |ode%>127| .nagg("|
|00002e40| 4d 61 78 69 6d 75 6d 20 | 6d 6f 64 65 20 6e 75 6d |Maximum |mode num|
|00002e50| 62 65 72 20 69 73 20 31 | 32 37 22 29 3a 6e 6d 6f |ber is 1|27"):nmo|
|00002e60| 64 65 25 3d 31 32 37 0d | 13 c4 36 20 20 e7 20 6e |de%=127.|..6 . n|
|00002e70| 6d 6f 64 65 25 3c 3e 6d | 6f 64 65 25 20 f2 70 69 |mode%<>m|ode% .pi|
|00002e80| 69 28 6d 61 69 6e 25 2c | 33 2c c3 28 6e 6d 6f 64 |i(main%,|3,.(nmod|
|00002e90| 65 25 29 29 3a 6d 6f 64 | 65 25 3d 2d 31 0d 13 ce |e%)):mod|e%=-1...|
|00002ea0| 0a 3d 6d 6f 64 65 25 0d | 13 d8 04 0d 13 e2 0e dd |.=mode%.|........|
|00002eb0| 20 f2 6d 6f 64 65 5f 75 | 70 0d 13 ec 15 20 20 6d | .mode_u|p.... m|
|00002ec0| 6f 64 65 25 3d a4 6d 6f | 64 65 74 65 73 74 0d 13 |ode%=.mo|detest..|
|00002ed0| f6 2c 20 20 e7 20 6d 6f | 64 65 25 3c 31 32 37 20 |., . mo|de%<127 |
|00002ee0| 8c 20 f2 70 69 69 28 6d | 61 69 6e 25 2c 33 2c c3 |. .pii(m|ain%,3,.|
|00002ef0| 28 6d 6f 64 65 25 2b 31 | 29 29 0d 14 00 05 e1 0d |(mode%+1|))......|
|00002f00| 14 0a 10 dd 20 f2 6d 6f | 64 65 5f 64 6f 77 6e 0d |.... .mo|de_down.|
|00002f10| 14 14 15 20 20 6d 6f 64 | 65 25 3d a4 6d 6f 64 65 |... mod|e%=.mode|
|00002f20| 74 65 73 74 0d 14 1e 2a | 20 20 e7 20 6d 6f 64 65 |test...*| . mode|
|00002f30| 25 3e 30 20 8c 20 f2 70 | 69 69 28 6d 61 69 6e 25 |%>0 . .p|ii(main%|
|00002f40| 2c 33 2c c3 28 6d 6f 64 | 65 25 2d 31 29 29 0d 14 |,3,.(mod|e%-1))..|
|00002f50| 28 05 e1 0d 14 32 04 0d | 14 3c 11 dd 20 f2 73 61 |(....2..|.<.. .sa|
|00002f60| 76 65 77 69 6e 64 6f 77 | 0d 14 46 24 c8 99 20 22 |vewindow|..F$.. "|
|00002f70| 57 69 6d 70 5f 47 65 74 | 50 6f 69 6e 74 65 72 49 |Wimp_Get|PointerI|
|00002f80| 6e 66 6f 22 2c 2c 62 6c | 6f 63 6b 25 0d 14 50 32 |nfo",,bl|ock%..P2|
|00002f90| 71 3d 21 62 6c 6f 63 6b | 25 3a 77 3d 62 6c 6f 63 |q=!block|%:w=bloc|
|00002fa0| 6b 25 21 34 3a 77 25 3d | 62 6c 6f 63 6b 25 21 31 |k%!4:w%=|block%!1|
|00002fb0| 32 3a 69 25 3d 62 6c 6f | 63 6b 25 21 31 36 0d 14 |2:i%=blo|ck%!16..|
|00002fc0| 5a 1c f2 6f 70 65 6e 77 | 69 6e 64 6f 77 78 79 28 |Z..openw|indowxy(|
|00002fd0| 73 61 76 65 25 2c 71 2c | 77 29 0d 14 64 05 e1 0d |save%,q,|w)..d...|
|00002fe0| 14 6e 04 0d 14 78 14 dd | 20 f2 73 61 76 65 66 69 |.n...x..| .savefi|
|00002ff0| 6c 65 28 61 73 24 29 0d | 14 82 18 20 20 c8 8e 20 |le(as$).|... .. |
|00003000| 73 61 76 65 66 69 6c 65 | 74 79 70 65 25 20 ca 0d |savefile|type% ..|
|00003010| 14 8c 2c 20 20 20 20 c9 | 20 76 6d 65 66 69 6c 65 |.., .| vmefile|
|00003020| 74 79 70 65 25 20 3a 20 | c8 99 22 56 4d 45 5f 53 |type% : |.."VME_S|
|00003030| 61 76 65 4d 61 70 22 2c | 61 73 24 0d 14 96 28 20 |aveMap",|as$...( |
|00003040| 20 20 20 c9 20 26 46 46 | 41 20 20 20 20 20 20 20 | . &FF|A |
|00003050| 20 20 3a 20 f2 6e 65 77 | 6d 6f 64 75 6c 65 28 61 | : .new|module(a|
|00003060| 73 24 29 0d 14 a0 07 20 | 20 cb 0d 14 aa 05 e1 0d |s$).... | .......|
|00003070| 14 b4 04 0d 14 be 10 dd | 20 f2 73 61 76 65 65 72 |........| .saveer|
|00003080| 72 6f 72 0d 14 c8 23 20 | 20 e7 20 66 69 6c 65 68 |ror...# | . fileh|
|00003090| 61 6e 64 6c 65 25 20 8c | 20 d9 23 66 69 6c 65 68 |andle% .| .#fileh|
|000030a0| 61 6e 64 6c 65 25 0d 14 | d2 13 20 20 66 69 6c 65 |andle%..|.. file|
|000030b0| 68 61 6e 64 6c 65 25 3d | 30 0d 14 dc 2e 20 20 f2 |handle%=|0.... .|
|000030c0| 6e 61 67 67 28 22 46 69 | 6c 65 20 73 61 76 65 20 |nagg("Fi|le save |
|000030d0| 6f 70 65 72 61 74 69 6f | 6e 20 66 61 69 6c 65 64 |operatio|n failed|
|000030e0| 3a 20 22 2b f6 24 29 0d | 14 e6 05 e1 0d 14 f0 04 |: "+.$).|........|
|000030f0| 0d 14 fa 19 dd 20 f2 6e | 65 77 6d 6f 64 75 6c 65 |..... .n|ewmodule|
|00003100| 28 73 61 76 65 61 73 24 | 29 0d 15 04 22 20 20 74 |(saveas$|)..." t|
|00003110| 61 62 6c 65 25 3d 6d 6f | 64 75 6c 65 25 2b 6d 6f |able%=mo|dule%+mo|
|00003120| 64 75 6c 65 6c 65 6e 67 | 74 68 25 0d 15 0e 23 20 |duleleng|th%...# |
|00003130| 20 c8 95 20 74 61 62 6c | 65 25 3f 2d 31 3c 3e 32 | .. tabl|e%?-1<>2|
|00003140| 35 35 3a 74 61 62 6c 65 | 25 2d 3d 31 3a ce 0d 15 |55:table|%-=1:...|
|00003150| 18 12 20 20 e3 20 6d 25 | 3d 30 20 b8 20 31 32 37 |.. . m%|=0 . 127|
|00003160| 0d 15 22 20 20 20 20 20 | c8 99 22 56 4d 45 5f 52 |.." |.."VME_R|
|00003170| 65 61 64 4d 61 70 22 2c | 6d 25 20 b8 20 2c 73 25 |eadMap",|m% . ,s%|
|00003180| 0d 15 2c 23 20 20 20 20 | e7 20 73 25 20 8c 20 3f |..,# |. s% . ?|
|00003190| 74 61 62 6c 65 25 3d 6d | 25 3a 74 61 62 6c 65 25 |table%=m|%:table%|
|000031a0| 2b 3d 31 0d 15 36 07 20 | 20 ed 0d 15 40 11 20 20 |+=1..6. | ...@. |
|000031b0| 3f 74 61 62 6c 65 25 3d | 31 32 38 0d 15 4a 39 20 |?table%=|128..J9 |
|000031c0| 20 c8 99 22 58 4f 53 5f | 46 69 6c 65 22 2c 31 30 | .."XOS_|File",10|
|000031d0| 2c 73 61 76 65 61 73 24 | 2c 26 46 46 41 2c 2c 6d |,saveas$|,&FFA,,m|
|000031e0| 6f 64 75 6c 65 25 2c 74 | 61 62 6c 65 25 20 b8 20 |odule%,t|able% . |
|000031f0| 65 72 72 25 0d 15 54 13 | 20 20 e7 20 65 72 72 25 |err%..T.| . err%|
|00003200| 3d 31 30 20 8c 20 e1 0d | 15 5e 19 20 20 6d 70 25 |=10 . ..|.^. mp%|
|00003210| 3d 65 72 72 25 2b 34 3a | 6d 65 73 73 24 3d 22 22 |=err%+4:|mess$=""|
|00003220| 0d 15 68 10 20 20 c8 95 | 20 3f 6d 70 25 3e 33 31 |..h. ..| ?mp%>31|
|00003230| 0d 15 72 1b 20 20 20 20 | 6d 65 73 73 24 2b 3d bd |..r. |mess$+=.|
|00003240| 3f 6d 70 25 3a 6d 70 25 | 2b 3d 31 0d 15 7c 07 20 |?mp%:mp%|+=1..|. |
|00003250| 20 ce 0d 15 86 33 20 20 | f2 6e 61 67 67 28 22 4d | ....3 |.nagg("M|
|00003260| 6f 64 75 6c 65 20 73 61 | 76 65 20 6f 70 65 72 61 |odule sa|ve opera|
|00003270| 74 69 6f 6e 20 66 61 69 | 6c 65 64 3a 20 22 2b 6d |tion fai|led: "+m|
|00003280| 65 73 73 24 29 0d 15 90 | 05 e1 0d ff |ess$)...|.... |
+--------+-------------------------+-------------------------+--------+--------+
