home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 4 / DATAFILE_PDCD4.iso / utilities / utilsf / libstore2 / !Setup / !RunImage < prev    next >
Unknown  |  1995-05-08  |  17.7 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.

ConfidenceProgramDetectionMatch TypeSupport
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 1b f4 20 a9 20 | 41 6e 64 72 65 77 20 48 |..... . |Andrew H|
|00000020| 75 6e 74 65 72 2c 20 31 | 39 39 35 0d 00 1e 12 f4 |unter, 1|995.....|
|00000030| 20 53 65 74 75 70 20 70 | 72 6f 67 67 79 0d 00 28 | Setup p|roggy..(|
|00000040| 05 3a 0d 00 32 35 f4 20 | 61 6c 74 65 72 20 74 68 |.:..25. |alter th|
|00000050| 69 73 20 76 61 6c 75 65 | 20 74 6f 20 63 6f 70 79 |is value| to copy|
|00000060| 20 6c 61 72 67 65 72 20 | 66 69 6c 65 73 20 69 6e | larger |files in|
|00000070| 20 6f 6e 65 20 67 6f 0d | 00 3c 13 73 63 73 69 7a | one go.|.<.scsiz|
|00000080| 65 25 3d 36 34 2a 31 30 | 32 34 0d 00 46 05 3a 0d |e%=64*10|24..F.:.|
|00000090| 00 50 38 ee 20 85 20 c8 | 99 20 22 57 69 6d 70 5f |.P8. . .|. "Wimp_|
|000000a0| 43 6c 6f 73 65 44 6f 77 | 6e 22 3a c8 99 20 22 48 |CloseDow|n":.. "H|
|000000b0| 6f 75 72 67 6c 61 73 73 | 5f 53 6d 61 73 68 22 3a |ourglass|_Smash":|
|000000c0| f6 3a f1 20 9e 3a e0 0d | 00 5a 15 c8 99 20 22 48 |.:. .:..|.Z... "H|
|000000d0| 6f 75 72 67 6c 61 73 73 | 5f 4f 6e 22 0d 00 64 09 |ourglass|_On"..d.|
|000000e0| f2 69 6e 69 74 0d 00 6e | 16 c8 99 20 22 48 6f 75 |.init..n|... "Hou|
|000000f0| 72 67 6c 61 73 73 5f 4f | 66 66 22 0d 00 78 04 0d |rglass_O|ff"..x..|
|00000100| 00 82 0d f2 6e 65 78 74 | 6c 69 6e 65 0d 00 8c 04 |....next|line....|
|00000110| 0d 00 96 39 e7 20 ac 20 | 77 61 69 74 69 6e 67 25 |...9. . |waiting%|
|00000120| 20 8c 20 f2 6e 65 77 74 | 65 78 74 28 73 74 61 74 | . .newt|ext(stat|
|00000130| 75 73 68 61 6e 64 6c 65 | 25 2c 30 2c 22 57 6f 72 |ushandle|%,0,"Wor|
|00000140| 6b 69 6e 67 2e 2e 2e 22 | 29 0d 00 a0 09 f2 70 6f |king..."|).....po|
|00000150| 6c 6c 0d 00 aa 2a f2 6e | 65 77 74 65 78 74 28 73 |ll...*.n|ewtext(s|
|00000160| 74 61 74 75 73 68 61 6e | 64 6c 65 25 2c 30 2c 22 |tatushan|dle%,0,"|
|00000170| 45 78 69 74 69 6e 67 2e | 2e 2e 22 29 0d 00 b4 0e |Exiting.|..")....|
|00000180| f2 6c 6f 73 65 66 6f 6e | 74 73 0d 00 be 05 e0 0d |.losefon|ts......|
|00000190| 00 c8 05 3a 0d 00 d2 0a | dd f2 69 6e 69 74 0d 00 |...:....|..init..|
|000001a0| dc 2f de 20 62 6c 6f 63 | 6b 25 20 32 30 34 38 2c |./. bloc|k% 2048,|
|000001b0| 74 62 6c 6f 63 6b 25 20 | 31 30 32 34 2c 73 63 72 |tblock% |1024,scr|
|000001c0| 61 74 63 68 25 20 73 63 | 73 69 7a 65 25 0d 00 e6 |atch% sc|size%...|
|000001d0| 41 c8 99 20 22 57 69 6d | 70 5f 49 6e 69 74 69 61 |A.. "Wim|p_Initia|
|000001e0| 6c 69 73 65 22 2c 32 30 | 30 2c 26 34 42 35 33 34 |lise",20|0,&4B534|
|000001f0| 31 35 34 2c 22 53 65 74 | 75 70 22 20 b8 20 76 65 |154,"Set|up" . ve|
|00000200| 72 25 2c 74 61 73 6b 68 | 61 6e 64 6c 65 25 0d 00 |r%,taskh|andle%..|
|00000210| f0 19 c8 99 20 22 48 6f | 75 72 67 6c 61 73 73 5f |.... "Ho|urglass_|
|00000220| 4c 45 44 73 22 2c 31 0d | 00 fa 12 f2 6c 6f 61 64 |LEDs",1.|....load|
|00000230| 74 65 6d 70 6c 61 74 65 | 73 0d 01 04 04 0d 01 0e |template|s.......|
|00000240| 19 c8 99 20 22 48 6f 75 | 72 67 6c 61 73 73 5f 4c |... "Hou|rglass_L|
|00000250| 45 44 73 22 2c 32 0d 01 | 18 2f de 20 76 61 72 25 |EDs",2..|./. var%|
|00000260| 28 32 35 35 29 2c 63 68 | 6f 69 63 65 24 28 38 29 |(255),ch|oice$(8)|
|00000270| 2c 73 74 61 63 6b 25 28 | 32 35 35 29 3a 73 74 70 |,stack%(|255):stp|
|00000280| 74 72 25 3d 30 0d 01 22 | 1a de 20 63 6c 69 6e 65 |tr%=0.."|.. cline|
|00000290| 24 28 35 30 29 3a 73 63 | 70 6f 73 25 3d 2d 31 0d |$(50):sc|pos%=-1.|
|000002a0| 01 2c 12 de 20 72 65 61 | 64 6d 65 24 28 35 31 32 |.,.. rea|dme$(512|
|000002b0| 29 0d 01 36 0f f2 72 65 | 61 64 73 63 72 69 70 74 |)..6..re|adscript|
|000002c0| 0d 01 40 2a 77 61 69 74 | 69 6e 67 25 3d a3 3a 61 |..@*wait|ing%=.:a|
|000002d0| 63 74 69 6f 6e 77 69 6e | 64 25 3d 30 3a 61 63 74 |ctionwin|d%=0:act|
|000002e0| 69 6f 6e 74 79 70 65 25 | 3d 30 0d 01 4a 0c 6e 65 |iontype%|=0..J.ne|
|000002f0| 77 65 72 25 3d b9 0d 01 | 54 0b 66 61 73 74 25 3d |wer%=...|T.fast%=|
|00000300| a3 0d 01 5e 05 e1 0d 01 | 68 05 3a 0d 01 72 13 dd |...^....|h.:..r..|
|00000310| f2 6c 6f 61 64 74 65 6d | 70 6c 61 74 65 73 0d 01 |.loadtem|plates..|
|00000320| 7c 1b de 20 69 6e 64 25 | 20 31 36 33 38 34 2c 66 ||.. ind%| 16384,f|
|00000330| 6f 6e 74 73 25 20 32 35 | 36 0d 01 86 2b de 20 77 |onts% 25|6...+. w|
|00000340| 5f 6d 73 67 25 20 31 30 | 32 34 2c 77 5f 71 75 65 |_msg% 10|24,w_que|
|00000350| 73 25 20 31 30 32 34 2c | 77 5f 6f 70 74 73 25 20 |s% 1024,|w_opts% |
|00000360| 31 30 32 34 0d 01 90 21 | de 20 77 5f 75 70 64 25 |1024...!|. w_upd%|
|00000370| 20 31 30 32 34 2c 77 5f | 73 61 76 65 6f 75 74 25 | 1024,w_|saveout%|
|00000380| 20 31 30 32 34 0d 01 9a | 21 de 20 77 5f 72 61 64 | 1024...|!. w_rad|
|00000390| 73 25 20 31 30 32 34 2c | 77 5f 76 69 65 77 65 72 |s% 1024,|w_viewer|
|000003a0| 25 20 31 30 32 34 0d 01 | a4 0f e3 20 78 3d 30 20 |% 1024..|... x=0 |
|000003b0| b8 20 32 35 35 0d 01 ae | 0e 66 6f 6e 74 73 25 3f |. 255...|.fonts%?|
|000003c0| 78 3d 30 0d 01 b8 05 ed | 0d 01 c2 16 65 6e 64 69 |x=0.....|....endi|
|000003d0| 6e 64 25 3d 69 6e 64 25 | 2b 31 36 33 38 34 0d 01 |nd%=ind%|+16384..|
|000003e0| cc 33 c8 99 20 22 57 69 | 6d 70 5f 4f 70 65 6e 54 |.3.. "Wi|mp_OpenT|
|000003f0| 65 6d 70 6c 61 74 65 22 | 2c 2c 22 3c 53 65 74 75 |emplate"|,,"<Setu|
|00000400| 70 24 44 69 72 3e 2e 54 | 65 6d 70 6c 61 74 65 73 |p$Dir>.T|emplates|
|00000410| 22 0d 01 d6 4e c8 99 20 | 22 57 69 6d 70 5f 4c 6f |"...N.. |"Wimp_Lo|
|00000420| 61 64 54 65 6d 70 6c 61 | 74 65 22 2c 2c 62 6c 6f |adTempla|te",,blo|
|00000430| 63 6b 25 2c 69 6e 64 25 | 2c 65 6e 64 69 6e 64 25 |ck%,ind%|,endind%|
|00000440| 2c 66 6f 6e 74 73 25 2c | 22 42 61 63 6b 64 72 6f |,fonts%,|"Backdro|
|00000450| 70 22 2b bd 31 33 20 b8 | 20 2c 2c 69 6e 64 25 0d |p"+.13 .| ,,ind%.|
|00000460| 01 e0 0f 62 6c 6f 63 6b | 25 21 36 34 3d 31 0d 01 |...block|%!64=1..|
|00000470| ea 30 c8 99 20 22 57 69 | 6d 70 5f 43 72 65 61 74 |.0.. "Wi|mp_Creat|
|00000480| 65 57 69 6e 64 6f 77 22 | 2c 2c 62 6c 6f 63 6b 25 |eWindow"|,,block%|
|00000490| 20 b8 20 62 61 63 6b 68 | 61 6e 64 6c 65 25 0d 01 | . backh|andle%..|
|000004a0| f4 04 0d 01 fe 4d c8 99 | 20 22 57 69 6d 70 5f 4c |.....M..| "Wimp_L|
|000004b0| 6f 61 64 54 65 6d 70 6c | 61 74 65 22 2c 2c 77 5f |oadTempl|ate",,w_|
|000004c0| 6d 73 67 25 2c 69 6e 64 | 25 2c 65 6e 64 69 6e 64 |msg%,ind|%,endind|
|000004d0| 25 2c 66 6f 6e 74 73 25 | 2c 22 4d 65 73 73 61 67 |%,fonts%|,"Messag|
|000004e0| 65 22 2b bd 31 33 20 b8 | 20 2c 2c 69 6e 64 25 0d |e"+.13 .| ,,ind%.|
|000004f0| 02 08 0f 77 5f 6d 73 67 | 25 21 36 34 3d 31 0d 02 |...w_msg|%!64=1..|
|00000500| 12 4f c8 99 20 22 57 69 | 6d 70 5f 4c 6f 61 64 54 |.O.. "Wi|mp_LoadT|
|00000510| 65 6d 70 6c 61 74 65 22 | 2c 2c 77 5f 71 75 65 73 |emplate"|,,w_ques|
|00000520| 25 2c 69 6e 64 25 2c 65 | 6e 64 69 6e 64 25 2c 66 |%,ind%,e|ndind%,f|
|00000530| 6f 6e 74 73 25 2c 22 51 | 75 65 73 74 69 6f 6e 22 |onts%,"Q|uestion"|
|00000540| 2b bd 31 33 20 b8 20 2c | 2c 69 6e 64 25 0d 02 1c |+.13 . ,|,ind%...|
|00000550| 10 77 5f 71 75 65 73 25 | 21 36 34 3d 31 0d 02 26 |.w_ques%|!64=1..&|
|00000560| 4e c8 99 20 22 57 69 6d | 70 5f 4c 6f 61 64 54 65 |N.. "Wim|p_LoadTe|
|00000570| 6d 70 6c 61 74 65 22 2c | 2c 77 5f 6f 70 74 73 25 |mplate",|,w_opts%|
|00000580| 2c 69 6e 64 25 2c 65 6e | 64 69 6e 64 25 2c 66 6f |,ind%,en|dind%,fo|
|00000590| 6e 74 73 25 2c 22 4f 70 | 74 69 6f 6e 73 22 2b bd |nts%,"Op|tions"+.|
|000005a0| 31 33 20 b8 20 2c 2c 69 | 6e 64 25 0d 02 30 10 77 |13 . ,,i|nd%..0.w|
|000005b0| 5f 6f 70 74 73 25 21 36 | 34 3d 31 0d 02 3a 4c c8 |_opts%!6|4=1..:L.|
|000005c0| 99 20 22 57 69 6d 70 5f | 4c 6f 61 64 54 65 6d 70 |. "Wimp_|LoadTemp|
|000005d0| 6c 61 74 65 22 2c 2c 77 | 5f 72 61 64 73 25 2c 69 |late",,w|_rads%,i|
|000005e0| 6e 64 25 2c 65 6e 64 69 | 6e 64 25 2c 66 6f 6e 74 |nd%,endi|nd%,font|
|000005f0| 73 25 2c 22 52 61 64 69 | 6f 22 2b bd 31 33 20 b8 |s%,"Radi|o"+.13 .|
|00000600| 20 2c 2c 69 6e 64 25 0d | 02 44 10 77 5f 72 61 64 | ,,ind%.|.D.w_rad|
|00000610| 73 25 21 36 34 3d 31 0d | 02 4e 4c c8 99 20 22 57 |s%!64=1.|.NL.. "W|
|00000620| 69 6d 70 5f 4c 6f 61 64 | 54 65 6d 70 6c 61 74 65 |imp_Load|Template|
|00000630| 22 2c 2c 77 5f 75 70 64 | 25 2c 69 6e 64 25 2c 65 |",,w_upd|%,ind%,e|
|00000640| 6e 64 69 6e 64 25 2c 66 | 6f 6e 74 73 25 2c 22 55 |ndind%,f|onts%,"U|
|00000650| 70 64 61 74 65 22 2b bd | 31 33 20 b8 20 2c 2c 69 |pdate"+.|13 . ,,i|
|00000660| 6e 64 25 0d 02 58 0f 77 | 5f 75 70 64 25 21 36 34 |nd%..X.w|_upd%!64|
|00000670| 3d 31 0d 02 62 51 c8 99 | 20 22 57 69 6d 70 5f 4c |=1..bQ..| "Wimp_L|
|00000680| 6f 61 64 54 65 6d 70 6c | 61 74 65 22 2c 2c 77 5f |oadTempl|ate",,w_|
|00000690| 73 61 76 65 6f 75 74 25 | 2c 69 6e 64 25 2c 65 6e |saveout%|,ind%,en|
|000006a0| 64 69 6e 64 25 2c 66 6f | 6e 74 73 25 2c 22 53 61 |dind%,fo|nts%,"Sa|
|000006b0| 76 65 4f 75 74 22 2b bd | 31 33 20 b8 20 2c 2c 69 |veOut"+.|13 . ,,i|
|000006c0| 6e 64 25 0d 02 6c 13 77 | 5f 73 61 76 65 6f 75 74 |nd%..l.w|_saveout|
|000006d0| 25 21 36 34 3d 31 0d 02 | 76 4f c8 99 20 22 57 69 |%!64=1..|vO.. "Wi|
|000006e0| 6d 70 5f 4c 6f 61 64 54 | 65 6d 70 6c 61 74 65 22 |mp_LoadT|emplate"|
|000006f0| 2c 2c 77 5f 76 69 65 77 | 65 72 25 2c 69 6e 64 25 |,,w_view|er%,ind%|
|00000700| 2c 65 6e 64 69 6e 64 25 | 2c 66 6f 6e 74 73 25 2c |,endind%|,fonts%,|
|00000710| 22 52 65 61 64 4d 65 22 | 2b bd 31 33 20 b8 20 2c |"ReadMe"|+.13 . ,|
|00000720| 2c 69 6e 64 25 0d 02 80 | 12 77 5f 76 69 65 77 65 |,ind%...|.w_viewe|
|00000730| 72 25 21 36 34 3d 31 0d | 02 8a 04 0d 02 94 4c c8 |r%!64=1.|......L.|
|00000740| 99 20 22 57 69 6d 70 5f | 4c 6f 61 64 54 65 6d 70 |. "Wimp_|LoadTemp|
|00000750| 6c 61 74 65 22 2c 2c 62 | 6c 6f 63 6b 25 2c 69 6e |late",,b|lock%,in|
|00000760| 64 25 2c 65 6e 64 69 6e | 64 25 2c 66 6f 6e 74 73 |d%,endin|d%,fonts|
|00000770| 25 2c 22 53 74 61 74 75 | 73 22 2b bd 31 33 20 b8 |%,"Statu|s"+.13 .|
|00000780| 20 2c 2c 69 6e 64 25 0d | 02 9e 0f 62 6c 6f 63 6b | ,,ind%.|...block|
|00000790| 25 21 36 34 3d 31 0d 02 | a8 04 0d 02 b2 32 c8 99 |%!64=1..|.....2..|
|000007a0| 20 22 57 69 6d 70 5f 43 | 72 65 61 74 65 57 69 6e | "Wimp_C|reateWin|
|000007b0| 64 6f 77 22 2c 2c 62 6c | 6f 63 6b 25 20 b8 20 73 |dow",,bl|ock% . s|
|000007c0| 74 61 74 75 73 68 61 6e | 64 6c 65 25 0d 02 bc 04 |tatushan|dle%....|
|000007d0| 0d 02 c6 1b c8 99 20 22 | 57 69 6d 70 5f 43 6c 6f |...... "|Wimp_Clo|
|000007e0| 73 65 54 65 6d 70 6c 61 | 74 65 22 0d 02 d0 1c f2 |seTempla|te".....|
|000007f0| 6f 70 65 6e 77 69 6e 64 | 6f 77 28 62 61 63 6b 68 |openwind|ow(backh|
|00000800| 61 6e 64 6c 65 25 29 0d | 02 da 1e f2 6f 70 65 6e |andle%).|....open|
|00000810| 77 69 6e 64 6f 77 28 73 | 74 61 74 75 73 68 61 6e |window(s|tatushan|
|00000820| 64 6c 65 25 29 0d 02 e4 | 05 e1 0d 02 ee 05 3a 0d |dle%)...|......:.|
|00000830| 02 f8 1a dd f2 6f 70 65 | 6e 77 69 6e 64 6f 77 28 |.....ope|nwindow(|
|00000840| 77 68 61 6e 64 6c 65 25 | 29 0d 03 02 14 21 62 6c |whandle%|)....!bl|
|00000850| 6f 63 6b 25 3d 77 68 61 | 6e 64 6c 65 25 0d 03 0c |ock%=wha|ndle%...|
|00000860| 24 c8 99 20 22 57 69 6d | 70 5f 47 65 74 57 69 6e |$.. "Wim|p_GetWin|
|00000870| 64 6f 77 53 74 61 74 65 | 22 2c 2c 62 6c 6f 63 6b |dowState|",,block|
|00000880| 25 0d 03 16 10 62 6c 6f | 63 6b 25 21 32 38 3d 2d |%....blo|ck%!28=-|
|00000890| 31 0d 03 20 20 c8 99 20 | 22 57 69 6d 70 5f 4f 70 |1.. .. |"Wimp_Op|
|000008a0| 65 6e 57 69 6e 64 6f 77 | 22 2c 2c 62 6c 6f 63 6b |enWindow|",,block|
|000008b0| 25 0d 03 2a 05 e1 0d 03 | 34 05 3a 0d 03 3e 0c dd |%..*....|4.:..>..|
|000008c0| f2 72 65 64 72 61 77 0d | 03 48 15 c8 99 20 22 48 |.redraw.|.H... "H|
|000008d0| 6f 75 72 67 6c 61 73 73 | 5f 4f 6e 22 0d 03 52 19 |ourglass|_On"..R.|
|000008e0| c8 99 20 22 48 6f 75 72 | 67 6c 61 73 73 5f 4c 45 |.. "Hour|glass_LE|
|000008f0| 44 73 22 2c 31 0d 03 5c | 2a c8 99 20 22 57 69 6d |Ds",1..\|*.. "Wim|
|00000900| 70 5f 52 65 64 72 61 77 | 57 69 6e 64 6f 77 22 2c |p_Redraw|Window",|
|00000910| 2c 62 6c 6f 63 6b 25 20 | b8 20 6d 6f 72 65 25 0d |,block% |. more%.|
|00000920| 03 66 0f 77 68 25 3d 21 | 62 6c 6f 63 6b 25 0d 03 |.f.wh%=!|block%..|
|00000930| 70 1a 78 4f 25 3d 62 6c | 6f 63 6b 25 21 34 2d 62 |p.xO%=bl|ock%!4-b|
|00000940| 6c 6f 63 6b 25 21 32 30 | 0d 03 7a 1b 79 4f 25 3d |lock%!20|..z.yO%=|
|00000950| 62 6c 6f 63 6b 25 21 31 | 36 2d 62 6c 6f 63 6b 25 |block%!1|6-block%|
|00000960| 21 32 34 0d 03 84 04 0d | 03 8e 0c c8 95 20 6d 6f |!24.....|..... mo|
|00000970| 72 65 25 0d 03 98 04 0d | 03 a2 17 6d 69 6e 78 25 |re%.....|...minx%|
|00000980| 3d 62 6c 6f 63 6b 25 21 | 32 38 2d 78 4f 25 0d 03 |=block%!|28-xO%..|
|00000990| ac 17 6d 69 6e 79 25 3d | 62 6c 6f 63 6b 25 21 33 |..miny%=|block%!3|
|000009a0| 32 2d 79 4f 25 0d 03 b6 | 17 6d 61 78 78 25 3d 62 |2-yO%...|.maxx%=b|
|000009b0| 6c 6f 63 6b 25 21 33 36 | 2d 78 4f 25 0d 03 c0 17 |lock%!36|-xO%....|
|000009c0| 6d 61 78 79 25 3d 62 6c | 6f 63 6b 25 21 34 30 2d |maxy%=bl|ock%!40-|
|000009d0| 79 4f 25 0d 03 ca 04 0d | 03 d4 0c c8 8e 20 77 68 |yO%.....|..... wh|
|000009e0| 25 20 ca 0d 03 de 17 c9 | 20 62 61 63 6b 68 61 6e |% ......| backhan|
|000009f0| 64 6c 65 25 3a f2 66 61 | 64 65 0d 03 e8 2c c9 20 |dle%:.fa|de...,. |
|00000a00| 61 63 74 69 6f 6e 77 69 | 6e 64 25 3a e7 20 61 63 |actionwi|nd%:. ac|
|00000a10| 74 69 6f 6e 74 79 70 65 | 25 3d 2d 31 20 8c 20 f2 |tiontype|%=-1 . .|
|00000a20| 72 65 61 64 6d 65 0d 03 | f2 05 cb 0d 03 fc 04 0d |readme..|........|
|00000a30| 04 06 2a c8 99 20 22 57 | 69 6d 70 5f 47 65 74 52 |..*.. "W|imp_GetR|
|00000a40| 65 63 74 61 6e 67 6c 65 | 22 2c 2c 62 6c 6f 63 6b |ectangle|",,block|
|00000a50| 25 20 b8 20 6d 6f 72 65 | 25 0d 04 10 05 ce 0d 04 |% . more|%.......|
|00000a60| 1a 04 0d 04 24 16 c8 99 | 20 22 48 6f 75 72 67 6c |....$...| "Hourgl|
|00000a70| 61 73 73 5f 4f 66 66 22 | 0d 04 2e 05 e1 0d 04 38 |ass_Off"|.......8|
|00000a80| 05 3a 0d 04 42 0a dd f2 | 70 6f 6c 6c 0d 04 4c 0b |.:..B...|poll..L.|
|00000a90| 71 75 69 74 25 3d a3 0d | 04 56 05 f5 0d 04 60 55 |quit%=..|.V....`U|
|00000aa0| e7 20 ac 20 77 61 69 74 | 69 6e 67 25 20 c8 99 20 |. . wait|ing% .. |
|00000ab0| 22 57 69 6d 70 5f 50 6f | 6c 6c 22 2c 2c 62 6c 6f |"Wimp_Po|ll",,blo|
|00000ac0| 63 6b 25 20 b8 20 72 65 | 61 73 6f 6e 25 20 8b 20 |ck% . re|ason% . |
|00000ad0| c8 99 20 22 57 69 6d 70 | 5f 50 6f 6c 6c 22 2c 31 |.. "Wimp|_Poll",1|
|00000ae0| 2c 62 6c 6f 63 6b 25 20 | b8 20 72 65 61 73 6f 6e |,block% |. reason|
|00000af0| 25 0d 04 6a 10 c8 8e 20 | 72 65 61 73 6f 6e 25 20 |%..j... |reason% |
|00000b00| ca 0d 04 74 0d c9 20 30 | 3a f2 6e 75 6c 6c 0d 04 |...t.. 0|:.null..|
|00000b10| 7e 04 0d 04 88 0f c9 20 | 31 3a f2 72 65 64 72 61 |~...... |1:.redra|
|00000b20| 77 0d 04 92 24 c9 20 32 | 3a c8 99 20 22 57 69 6d |w...$. 2|:.. "Wim|
|00000b30| 70 5f 4f 70 65 6e 57 69 | 6e 64 6f 77 22 2c 2c 62 |p_OpenWi|ndow",,b|
|00000b40| 6c 6f 63 6b 25 0d 04 9c | 25 c9 20 33 3a c8 99 20 |lock%...|%. 3:.. |
|00000b50| 22 57 69 6d 70 5f 43 6c | 6f 73 65 57 69 6e 64 6f |"Wimp_Cl|oseWindo|
|00000b60| 77 22 2c 2c 62 6c 6f 63 | 6b 25 0d 04 a6 16 e7 20 |w",,bloc|k%..... |
|00000b70| 61 63 74 69 6f 6e 74 79 | 70 65 25 3d 2d 31 20 8c |actionty|pe%=-1 .|
|00000b80| 0d 04 b0 1b e7 20 21 62 | 6c 6f 63 6b 25 3d 61 63 |..... !b|lock%=ac|
|00000b90| 74 69 6f 6e 77 69 6e 64 | 25 20 8c 0d 04 ba 22 c8 |tionwind|% ....".|
|00000ba0| 99 20 22 57 69 6d 70 5f | 44 65 6c 65 74 65 57 69 |. "Wimp_|DeleteWi|
|00000bb0| 6e 64 6f 77 22 2c 2c 62 | 6c 6f 63 6b 25 0d 04 c4 |ndow",,b|lock%...|
|00000bc0| 0e 77 61 69 74 69 6e 67 | 25 3d a3 0d 04 ce 2a f2 |.waiting|%=....*.|
|00000bd0| 6e 65 77 74 65 78 74 28 | 73 74 61 74 75 73 68 61 |newtext(|statusha|
|00000be0| 6e 64 6c 65 25 2c 30 2c | 22 57 6f 72 6b 69 6e 67 |ndle%,0,|"Working|
|00000bf0| 2e 2e 2e 22 29 0d 04 d8 | 05 cd 0d 04 e2 05 cd 0d |...")...|........|
|00000c00| 04 ec 04 0d 04 f6 08 c9 | 20 36 3a 0d 05 00 20 f2 |........| 6:... .|
|00000c10| 61 63 74 69 6f 6e 28 62 | 6c 6f 63 6b 25 21 31 32 |action(b|lock%!12|
|00000c20| 2c 62 6c 6f 63 6b 25 21 | 31 36 29 0d 05 0a 04 0d |,block%!|16).....|
|00000c30| 05 14 08 c9 20 37 3a 0d | 05 1e 0c f2 64 72 61 67 |.... 7:.|....drag|
|00000c40| 65 6e 64 0d 05 28 04 0d | 05 32 0c c9 20 31 37 2c |end..(..|.2.. 17,|
|00000c50| 31 38 3a 0d 05 3c 12 c8 | 8e 20 62 6c 6f 63 6b 25 |18:..<..|. block%|
|00000c60| 21 31 36 20 ca 0d 05 46 | 0f c9 20 30 3a 71 75 69 |!16 ...F|.. 0:qui|
|00000c70| 74 25 3d b9 0d 05 50 11 | c9 20 32 3a f2 73 61 76 |t%=...P.|. 2:.sav|
|00000c80| 65 64 6f 75 74 0d 05 5a | 0f c9 20 33 3a f2 64 72 |edout..Z|.. 3:.dr|
|00000c90| 61 67 69 6e 0d 05 64 05 | cb 0d 05 6e 04 0d 05 78 |agin..d.|...n...x|
|00000ca0| 05 cb 0d 05 82 0b fd 20 | 71 75 69 74 25 0d 05 8c |....... |quit%...|
|00000cb0| 05 e1 0d 05 96 05 3a 0d | 05 a0 0a dd f2 66 61 64 |......:.|.....fad|
|00000cc0| 65 0d 05 aa 1a e3 20 79 | 25 3d 6d 69 6e 79 25 20 |e..... y|%=miny% |
|00000cd0| b8 20 6d 61 78 79 25 20 | 88 20 38 0d 05 b4 10 63 |. maxy% |. 8....c|
|00000ce0| 6f 6c 25 3d 31 30 32 34 | 2b 79 25 0d 05 be 0f 63 |ol%=1024|+y%....c|
|00000cf0| 6f 6c 25 3d 63 6f 6c 25 | 2f 34 0d 05 c8 2d c8 99 |ol%=col%|/4...-..|
|00000d00| 20 22 43 6f 6c 6f 75 72 | 54 72 61 6e 73 5f 53 65 | "Colour|Trans_Se|
|00000d10| 74 47 43 4f 4c 22 2c 63 | 6f 6c 25 3c 3c 32 34 2c |tGCOL",c|ol%<<24,|
|00000d20| 2c 2c 32 35 36 2c 30 0d | 05 d2 28 c8 93 20 c8 90 |,,256,0.|..(.. ..|
|00000d30| 20 78 4f 25 2b 6d 69 6e | 78 25 2c 79 4f 25 2b 79 | xO%+min|x%,yO%+y|
|00000d40| 25 2c 6d 61 78 78 25 2d | 6d 69 6e 78 25 2c 38 0d |%,maxx%-|minx%,8.|
|00000d50| 05 dc 05 ed 0d 05 e6 05 | e1 0d 05 f0 05 3a 0d 05 |........|.....:..|
|00000d60| fa 10 dd f2 72 65 61 64 | 73 63 72 69 70 74 0d 06 |....read|script..|
|00000d70| 04 11 de 20 6c 69 6e 65 | 24 28 31 30 32 34 29 0d |... line|$(1024).|
|00000d80| 06 0e 0e 73 6c 69 6e 65 | 73 25 3d 2d 31 0d 06 18 |...sline|s%=-1...|
|00000d90| 1e 4f 25 3d 8e 28 22 3c | 53 65 74 75 70 24 44 69 |.O%=.("<|Setup$Di|
|00000da0| 72 3e 2e 53 63 72 69 70 | 74 22 29 0d 06 22 04 0d |r>.Scrip|t").."..|
|00000db0| 06 2c 05 f5 0d 06 36 0e | 73 6c 69 6e 65 73 25 2b |.,....6.|slines%+|
|00000dc0| 3d 31 0d 06 40 17 6c 69 | 6e 65 24 28 73 6c 69 6e |=1..@.li|ne$(slin|
|00000dd0| 65 73 25 29 3d be 23 4f | 25 0d 06 4a 0a fd 20 c5 |es%)=.#O|%..J.. .|
|00000de0| 23 4f 25 0d 06 54 04 0d | 06 5e 08 d9 23 4f 25 0d |#O%..T..|.^..#O%.|
|00000df0| 06 68 05 e1 0d 06 72 05 | 3a 0d 06 7c 0f dd f2 6c |.h....r.|:..|...l|
|00000e00| 6f 73 65 66 6f 6e 74 73 | 0d 06 86 0f e3 20 78 3d |osefonts|..... x=|
|00000e10| 30 20 b8 20 32 35 35 0d | 06 90 11 c8 95 20 66 6f |0 . 255.|..... fo|
|00000e20| 6e 74 73 25 3f 78 3e 30 | 0d 06 9a 18 c8 99 20 22 |nts%?x>0|...... "|
|00000e30| 46 6f 6e 74 5f 4c 6f 73 | 65 46 6f 6e 74 22 2c 78 |Font_Los|eFont",x|
|00000e40| 0d 06 a4 0f 66 6f 6e 74 | 73 25 3f 78 2d 3d 31 0d |....font|s%?x-=1.|
|00000e50| 06 ae 05 ce 0d 06 b8 05 | ed 0d 06 c2 05 e1 0d 06 |........|........|
|00000e60| cc 05 3a 0d 06 d6 0e dd | f2 6e 65 78 74 6c 69 6e |..:.....|.nextlin|
|00000e70| 65 0d 06 e0 19 e7 20 73 | 63 70 6f 73 25 3e 3d 73 |e..... s|cpos%>=s|
|00000e80| 6c 69 6e 65 73 25 20 8c | 20 e1 0d 06 ea 0d 73 63 |lines% .| .....sc|
|00000e90| 70 6f 73 25 2b 3d 31 0d | 06 f4 1d f2 69 6e 74 65 |pos%+=1.|....inte|
|00000ea0| 72 70 72 65 74 28 6c 69 | 6e 65 24 28 73 63 70 6f |rpret(li|ne$(scpo|
|00000eb0| 73 25 29 29 0d 06 fe 5b | e7 20 73 63 70 6f 73 25 |s%))...[|. scpos%|
|00000ec0| 3e 3d 73 6c 69 6e 65 73 | 25 20 8c 20 f2 6e 65 77 |>=slines|% . .new|
|00000ed0| 74 65 78 74 28 73 74 61 | 74 75 73 68 61 6e 64 6c |text(sta|tushandl|
|00000ee0| 65 25 2c 30 2c 22 46 69 | 6e 69 73 68 65 64 21 22 |e%,0,"Fi|nished!"|
|00000ef0| 29 3a 20 f2 6e 65 77 74 | 65 78 74 28 73 74 61 74 |): .newt|ext(stat|
|00000f00| 75 73 68 61 6e 64 6c 65 | 25 2c 31 2c 22 22 29 0d |ushandle|%,1,"").|
|00000f10| 07 08 04 0d 07 12 41 e7 | 20 77 61 69 74 69 6e 67 |......A.| waiting|
|00000f20| 25 20 8c 20 f2 6e 65 77 | 74 65 78 74 28 73 74 61 |% . .new|text(sta|
|00000f30| 74 75 73 68 61 6e 64 6c | 65 25 2c 30 2c 22 57 61 |tushandl|e%,0,"Wa|
|00000f40| 69 74 69 6e 67 20 66 6f | 72 20 69 6e 70 75 74 2e |iting fo|r input.|
|00000f50| 2e 2e 22 29 0d 07 1c 05 | e1 0d 07 26 05 3a 0d 07 |..")....|...&.:..|
|00000f60| 30 16 dd f2 69 6e 74 65 | 72 70 72 65 74 28 6c 69 |0...inte|rpret(li|
|00000f70| 6e 65 24 29 0d 07 3a 12 | e7 20 6c 69 6e 65 24 3d |ne$)..:.|. line$=|
|00000f80| 22 22 20 8c 20 e1 0d 07 | 44 14 f2 73 65 70 65 72 |"" . ...|D..seper|
|00000f90| 61 74 65 28 6c 69 6e 65 | 24 29 0d 07 4e 04 0d 07 |ate(line|$)..N...|
|00000fa0| 58 11 c8 8e 20 63 6f 6d | 6d 61 6e 64 24 20 ca 0d |X... com|mand$ ..|
|00000fb0| 07 62 0d c9 20 22 4e 41 | 4d 45 22 3a 0d 07 6c 35 |.b.. "NA|ME":..l5|
|00000fc0| c8 99 20 22 57 69 6d 70 | 5f 46 6f 72 63 65 52 65 |.. "Wimp|_ForceRe|
|00000fd0| 64 72 61 77 22 2c 62 61 | 63 6b 68 61 6e 64 6c 65 |draw",ba|ckhandle|
|00000fe0| 25 2c 30 2c 2d 31 32 38 | 2c 31 32 38 30 2c 2d 33 |%,0,-128|,1280,-3|
|00000ff0| 32 0d 07 76 22 f2 6e 65 | 77 74 65 78 74 28 62 61 |2..v".ne|wtext(ba|
|00001000| 63 6b 68 61 6e 64 6c 65 | 25 2c 30 2c 70 61 72 61 |ckhandle|%,0,para|
|00001010| 6d 24 29 0d 07 80 22 f2 | 6e 65 77 74 65 78 74 28 |m$)...".|newtext(|
|00001020| 62 61 63 6b 68 61 6e 64 | 6c 65 25 2c 31 2c 70 61 |backhand|le%,1,pa|
|00001030| 72 61 6d 24 29 0d 07 8a | 04 0d 07 94 10 c9 20 22 |ram$)...|...... "|
|00001040| 4d 45 53 53 41 47 45 22 | 3a 0d 07 9e 30 c8 99 20 |MESSAGE"|:...0.. |
|00001050| 22 57 69 6d 70 5f 43 72 | 65 61 74 65 57 69 6e 64 |"Wimp_Cr|eateWind|
|00001060| 6f 77 22 2c 2c 77 5f 6d | 73 67 25 20 b8 20 61 63 |ow",,w_m|sg% . ac|
|00001070| 74 69 6f 6e 77 69 6e 64 | 25 0d 07 a8 1c f2 6f 70 |tionwind|%.....op|
|00001080| 65 6e 77 69 6e 64 6f 77 | 28 61 63 74 69 6f 6e 77 |enwindow|(actionw|
|00001090| 69 6e 64 25 29 0d 07 b2 | 22 f2 6e 65 77 74 65 78 |ind%)...|".newtex|
|000010a0| 74 28 61 63 74 69 6f 6e | 77 69 6e 64 25 2c 30 2c |t(action|wind%,0,|
|000010b0| 70 61 72 61 6d 24 29 0d | 07 bc 1c 61 63 74 69 6f |param$).|...actio|
|000010c0| 6e 74 79 70 65 25 3d 31 | 3a 77 61 69 74 69 6e 67 |ntype%=1|:waiting|
|000010d0| 25 3d b9 0d 07 c6 04 0d | 07 d0 09 c9 20 22 22 3a |%=......|.... "":|
|000010e0| 0d 07 da 04 0d 07 e4 0f | c9 20 22 47 45 54 44 49 |........|. "GETDI|
|000010f0| 52 22 3a 0d 07 ee 0c f2 | 73 61 76 65 6f 75 74 0d |R":.....|saveout.|
|00001100| 07 f8 04 0d 08 02 13 c9 | 20 22 45 4e 44 22 3a 71 |........| "END":q|
|00001110| 75 69 74 25 3d b9 0d 08 | 0c 04 0d 08 16 0d c9 20 |uit%=...|....... |
|00001120| 22 47 4f 54 4f 22 3a 0d | 08 20 11 f2 67 6f 74 6f |"GOTO":.|. ..goto|
|00001130| 28 70 61 72 61 6d 24 29 | 0d 08 2a 04 0d 08 34 0e |(param$)|..*...4.|
|00001140| c9 20 22 47 4f 53 55 42 | 22 3a 0d 08 3e 0d 73 74 |. "GOSUB|":..>.st|
|00001150| 70 74 72 25 2b 3d 31 0d | 08 48 19 73 74 61 63 6b |ptr%+=1.|.H.stack|
|00001160| 25 28 73 74 70 74 72 25 | 29 3d 73 63 70 6f 73 25 |%(stptr%|)=scpos%|
|00001170| 0d 08 52 11 f2 67 6f 74 | 6f 28 70 61 72 61 6d 24 |..R..got|o(param$|
|00001180| 29 0d 08 5c 04 0d 08 66 | 0f c9 20 22 52 45 54 55 |)..\...f|.. "RETU|
|00001190| 52 4e 22 3a 0d 08 70 49 | e7 20 73 74 70 74 72 25 |RN":..pI|. stptr%|
|000011a0| 3c 3d 30 20 8c 20 85 20 | 30 2c 22 53 74 61 63 6b |<=0 . . |0,"Stack|
|000011b0| 20 75 6e 64 65 72 66 6c | 6f 77 20 61 74 20 6c 69 | underfl|ow at li|
|000011c0| 6e 65 20 22 2b c3 28 73 | 63 70 6f 73 25 2b 31 29 |ne "+.(s|cpos%+1)|
|000011d0| 2b 22 20 6f 66 20 73 63 | 72 69 70 74 22 0d 08 7a |+" of sc|ript"..z|
|000011e0| 19 73 63 70 6f 73 25 3d | 73 74 61 63 6b 25 28 73 |.scpos%=|stack%(s|
|000011f0| 74 70 74 72 25 29 0d 08 | 84 0d 73 74 70 74 72 25 |tptr%)..|..stptr%|
|00001200| 2d 3d 31 0d 08 8e 04 0d | 08 98 0f c9 20 22 43 48 |-=1.....|.... "CH|
|00001210| 4f 49 43 45 22 3a 0d 08 | a2 0d f2 6f 70 65 6e 63 |OICE":..|...openc|
|00001220| 62 6f 78 0d 08 ac 04 0d | 08 b6 11 c9 20 22 53 57 |box.....|.... "SW|
|00001230| 41 50 44 49 53 43 22 3a | 0d 08 c0 0d f2 73 77 61 |APDISC":|.....swa|
|00001240| 70 64 69 73 63 0d 08 ca | 04 0d 08 d4 10 c9 20 22 |pdisc...|...... "|
|00001250| 4f 50 54 49 4f 4e 53 22 | 3a 0d 08 de 0e f2 6f 70 |OPTIONS"|:.....op|
|00001260| 74 72 61 64 28 31 29 0d | 08 e8 04 0d 08 f2 0f c9 |trad(1).|........|
|00001270| 20 22 52 41 44 49 4f 53 | 22 3a 0d 08 fc 0e f2 6f | "RADIOS|":.....o|
|00001280| 70 74 72 61 64 28 32 29 | 0d 09 06 04 0d 09 10 0d |ptrad(2)|........|
|00001290| c9 20 22 46 41 53 54 22 | 3a 0d 09 1a 27 e7 20 63 |. "FAST"|:...'. c|
|000012a0| 6c 69 6e 65 24 28 31 29 | 3d 22 4f 46 46 22 20 66 |line$(1)|="OFF" f|
|000012b0| 61 73 74 25 3d a3 20 8b | 20 66 61 73 74 25 3d b9 |ast%=. .| fast%=.|
|000012c0| 0d 09 24 04 0d 09 2e 0e | c9 20 22 43 48 44 49 52 |..$.....|. "CHDIR|
|000012d0| 22 3a 0d 09 38 18 f2 63 | 68 65 63 6b 64 69 72 28 |":..8..c|heckdir(|
|000012e0| 63 6c 69 6e 65 24 28 31 | 29 29 0d 09 42 04 0d 09 |cline$(1|))..B...|
|000012f0| 4c 10 c9 20 22 43 4f 4d | 50 41 52 45 22 3a 0d 09 |L.. "COM|PARE":..|
|00001300| 56 21 f2 63 6f 6d 70 61 | 72 65 28 63 6c 69 6e 65 |V!.compa|re(cline|
|00001310| 24 28 31 29 2c 63 6c 69 | 6e 65 24 28 32 29 29 0d |$(1),cli|ne$(2)).|
|00001320| 09 60 04 0d 09 6a 0d c9 | 20 22 56 49 45 57 22 3a |.`...j..| "VIEW":|
|00001330| 0d 09 74 0f f2 6f 70 65 | 6e 76 69 65 77 65 72 0d |..t..ope|nviewer.|
|00001340| 09 7e 04 0d 09 88 0e c9 | 20 22 4e 45 57 45 52 22 |.~......| "NEWER"|
|00001350| 3a 0d 09 92 27 6e 65 77 | 65 72 25 3d b9 3a e7 20 |:...'new|er%=.:. |
|00001360| 63 6c 69 6e 65 24 28 31 | 29 3d 22 4f 46 46 22 20 |cline$(1|)="OFF" |
|00001370| 6e 65 77 65 72 25 3d a3 | 0d 09 9c 04 0d 09 a6 10 |newer%=.|........|
|00001380| c9 20 22 49 4e 53 54 41 | 4c 4c 22 3a 0d 09 b0 39 |. "INSTA|LL":...9|
|00001390| 73 72 63 24 3d 22 3c 53 | 65 74 75 70 24 44 69 72 |src$="<S|etup$Dir|
|000013a0| 3e 2e 46 69 6c 65 73 2e | 50 72 6f 67 72 61 6d 2e |>.Files.|Program.|
|000013b0| 22 2b 6c 65 61 66 24 2b | 22 2e 22 2b 63 6c 69 6e |"+leaf$+|"."+clin|
|000013c0| 65 24 28 31 29 0d 09 ba | 35 e7 20 63 6c 69 6e 65 |e$(1)...|5. cline|
|000013d0| 24 28 32 29 3c 3e 22 22 | 20 8c 20 64 73 74 24 3d |$(2)<>""| . dst$=|
|000013e0| 63 6c 69 6e 65 24 28 32 | 29 20 8b 20 64 73 74 24 |cline$(2|) . dst$|
|000013f0| 3d 63 6c 69 6e 65 24 28 | 31 29 0d 09 c4 1d 64 73 |=cline$(|1)....ds|
|00001400| 74 24 3d 69 6e 73 74 61 | 6c 6c 64 69 72 24 2b 22 |t$=insta|lldir$+"|
|00001410| 2e 22 2b 64 73 74 24 0d | 09 ce 1b f2 63 6f 70 79 |."+dst$.|....copy|
|00001420| 28 73 72 63 24 2c 64 73 | 74 24 2c 6e 65 77 65 72 |(src$,ds|t$,newer|
|00001430| 25 29 0d 09 d8 04 0d 09 | e2 0d c9 20 22 43 4f 50 |%)......|... "COP|
|00001440| 59 22 3a 0d 09 ec 12 73 | 72 63 24 3d 63 6c 69 6e |Y":....s|rc$=clin|
|00001450| 65 24 28 31 29 0d 09 f6 | 12 64 73 74 24 3d 63 6c |e$(1)...|.dst$=cl|
|00001460| 69 6e 65 24 28 32 29 0d | 0a 00 4c e7 20 73 72 63 |ine$(2).|..L. src|
|00001470| 24 3d 22 22 20 84 20 64 | 73 74 24 3d 22 22 20 8c |$="" . d|st$="" .|
|00001480| 20 85 20 30 2c 22 49 6e | 76 61 6c 69 64 20 73 79 | . 0,"In|valid sy|
|00001490| 6e 74 61 78 20 61 74 20 | 6c 69 6e 65 20 22 2b c3 |ntax at |line "+.|
|000014a0| 73 63 70 6f 73 25 2b 22 | 20 6f 66 20 73 63 72 69 |scpos%+"| of scri|
|000014b0| 70 74 22 0d 0a 0a 1b f2 | 63 6f 70 79 28 73 72 63 |pt".....|copy(src|
|000014c0| 24 2c 64 73 74 24 2c 6e | 65 77 65 72 25 29 0d 0a |$,dst$,n|ewer%)..|
|000014d0| 14 04 0d 0a 1e 0f c9 20 | 22 44 45 4c 45 54 45 22 |....... |"DELETE"|
|000014e0| 3a 0d 0a 28 16 f2 64 65 | 6c 65 74 65 28 63 6c 69 |:..(..de|lete(cli|
|000014f0| 6e 65 24 28 31 29 29 0d | 0a 32 04 0d 0a 3c 0f c9 |ne$(1)).|.2...<..|
|00001500| 20 22 55 50 44 41 54 45 | 22 3a 0d 0a 46 0a f2 75 | "UPDATE|":..F..u|
|00001510| 64 61 74 65 0d 0a 50 04 | 0d 0a 5a 0b c9 20 22 49 |date..P.|..Z.. "I|
|00001520| 46 22 3a 0d 0a 64 07 f2 | 69 66 0d 0a 6e 04 0d 0a |F":..d..|if..n...|
|00001530| 78 06 7f 3a 0d 0a 82 42 | 85 20 30 2c 22 43 6f 6d |x..:...B|. 0,"Com|
|00001540| 6d 61 6e 64 20 6e 6f 74 | 20 72 65 63 6f 67 6e 69 |mand not| recogni|
|00001550| 73 65 64 20 61 74 20 6c | 69 6e 65 20 22 2b c3 28 |sed at l|ine "+.(|
|00001560| 73 63 70 6f 73 25 2b 31 | 29 2b 22 20 6f 66 20 73 |scpos%+1|)+" of s|
|00001570| 63 72 69 70 74 22 0d 0a | 8c 05 cb 0d 0a 96 04 0d |cript"..|........|
|00001580| 0a a0 05 e1 0d 0a aa 05 | 3a 0d 0a b4 15 dd f2 73 |........|:......s|
|00001590| 65 70 65 72 61 74 65 28 | 6c 69 6e 65 24 29 0d 0a |eperate(|line$)..|
|000015a0| be 08 ea 20 6c 24 0d 0a | c8 0f 63 6c 69 6e 65 24 |... l$..|..cline$|
|000015b0| 28 29 3d 22 22 0d 0a d2 | 2d 77 6f 72 64 73 25 3d |()=""...|-words%=|
|000015c0| 2d 31 3a 6c 69 6e 65 24 | 3d a4 73 74 72 69 70 28 |-1:line$|=.strip(|
|000015d0| 6c 69 6e 65 24 29 3a 63 | 6f 6d 6d 61 6e 64 24 3d |line$):c|ommand$=|
|000015e0| 22 22 0d 0a dc 17 e7 20 | c0 6c 69 6e 65 24 2c 31 |""..... |.line$,1|
|000015f0| 29 3d 22 7c 22 20 8c 20 | e1 0d 0a e6 17 e7 20 c0 |)="|" . |...... .|
|00001600| 6c 69 6e 65 24 2c 31 29 | 3d 22 3a 22 20 8c 20 e1 |line$,1)|=":" . .|
|00001610| 0d 0a f0 12 e7 20 6c 69 | 6e 65 24 3d 22 22 20 8c |..... li|ne$="" .|
|00001620| 20 e1 0d 0a fa 04 0d 0b | 04 0c 6c 24 3d 6c 69 6e | .......|..l$=lin|
|00001630| 65 24 0d 0b 0e 0f c8 95 | 20 a7 6c 24 2c 22 20 22 |e$......| .l$," "|
|00001640| 29 0d 0b 18 0d 77 6f 72 | 64 73 25 2b 3d 31 0d 0b |)....wor|ds%+=1..|
|00001650| 22 22 63 6c 69 6e 65 24 | 28 77 6f 72 64 73 25 29 |""cline$|(words%)|
|00001660| 3d c0 6c 24 2c a7 6c 24 | 2c 22 20 22 29 2d 31 29 |=.l$,.l$|," ")-1)|
|00001670| 0d 0b 2c 16 6c 24 3d c1 | 6c 24 2c a7 6c 24 2c 22 |..,.l$=.|l$,.l$,"|
|00001680| 20 22 29 2b 31 29 0d 0b | 36 11 6c 24 3d a4 73 74 | ")+1)..|6.l$=.st|
|00001690| 72 69 70 28 6c 24 29 0d | 0b 40 05 ce 0d 0b 4a 04 |rip(l$).|.@....J.|
|000016a0| 0d 0b 54 1f 77 6f 72 64 | 73 25 2b 3d 31 3a 63 6c |..T.word|s%+=1:cl|
|000016b0| 69 6e 65 24 28 77 6f 72 | 64 73 25 29 3d 6c 24 0d |ine$(wor|ds%)=l$.|
|000016c0| 0b 5e 16 63 6f 6d 6d 61 | 6e 64 24 3d 63 6c 69 6e |.^.comma|nd$=clin|
|000016d0| 65 24 28 30 29 0d 0b 68 | 20 70 61 72 61 6d 24 3d |e$(0)..h| param$=|
|000016e0| c1 6c 69 6e 65 24 2c a7 | 6c 69 6e 65 24 2c 22 20 |.line$,.|line$," |
|000016f0| 22 29 2b 31 29 0d 0b 72 | 19 70 61 72 61 6d 24 3d |")+1)..r|.param$=|
|00001700| a4 73 74 72 69 70 28 70 | 61 72 61 6d 24 29 0d 0b |.strip(p|aram$)..|
|00001710| 7c 04 0d 0b 86 05 e1 0d | 0b 90 05 3a 0d 0b 9a 12 ||.......|...:....|
|00001720| dd a4 73 74 72 69 70 28 | 6c 69 6e 65 24 29 0d 0b |..strip(|line$)..|
|00001730| a4 11 ea 20 6c 24 3a 6c | 24 3d 6c 69 6e 65 24 0d |... l$:l|$=line$.|
|00001740| 0b ae 1d c8 95 20 c0 6c | 24 2c 31 29 3d 22 20 22 |..... .l|$,1)=" "|
|00001750| 3a 6c 24 3d c1 6c 24 2c | 32 29 3a ce 0d 0b b8 23 |:l$=.l$,|2):....#|
|00001760| c8 95 20 c2 6c 24 2c 31 | 29 3d 22 20 22 3a 6c 24 |.. .l$,1|)=" ":l$|
|00001770| 3d c0 6c 24 2c a9 28 6c | 24 29 2d 31 29 3a ce 0d |=.l$,.(l|$)-1):..|
|00001780| 0b c2 07 3d 6c 24 0d 0b | cc 05 3a 0d 0b d6 26 dd |...=l$..|..:...&.|
|00001790| f2 6e 65 77 74 65 78 74 | 28 77 68 61 6e 64 6c 65 |.newtext|(whandle|
|000017a0| 25 2c 69 68 61 6e 64 6c | 65 25 2c 74 65 78 74 24 |%,ihandl|e%,text$|
|000017b0| 29 0d 0b e0 0b ea 20 61 | 64 64 72 25 0d 0b ea 27 |)..... a|ddr%...'|
|000017c0| 61 64 64 72 25 3d a4 67 | 65 74 69 6e 64 70 74 72 |addr%=.g|etindptr|
|000017d0| 28 77 68 61 6e 64 6c 65 | 25 2c 69 68 61 6e 64 6c |(whandle|%,ihandl|
|000017e0| 65 25 29 0d 0b f4 10 24 | 61 64 64 72 25 3d 74 65 |e%)....$|addr%=te|
|000017f0| 78 74 24 0d 0b fe 28 f2 | 73 65 74 69 63 6f 6e 73 |xt$...(.|seticons|
|00001800| 74 61 74 65 28 77 68 61 | 6e 64 6c 65 25 2c 69 68 |tate(wha|ndle%,ih|
|00001810| 61 6e 64 6c 65 25 2c 30 | 2c 30 29 0d 0c 08 05 e1 |andle%,0|,0).....|
|00001820| 0d 0c 12 05 3a 0d 0c 1c | 22 dd a4 67 65 74 69 6e |....:...|"..getin|
|00001830| 64 70 74 72 28 77 68 61 | 6e 64 6c 65 25 2c 69 68 |dptr(wha|ndle%,ih|
|00001840| 61 6e 64 6c 65 25 29 0d | 0c 26 15 21 74 62 6c 6f |andle%).|.&.!tblo|
|00001850| 63 6b 25 3d 77 68 61 6e | 64 6c 65 25 0d 0c 30 16 |ck%=whan|dle%..0.|
|00001860| 74 62 6c 6f 63 6b 25 21 | 34 3d 69 68 61 6e 64 6c |tblock%!|4=ihandl|
|00001870| 65 25 0d 0c 3a 23 c8 99 | 20 22 57 69 6d 70 5f 47 |e%..:#..| "Wimp_G|
|00001880| 65 74 49 63 6f 6e 53 74 | 61 74 65 22 2c 2c 74 62 |etIconSt|ate",,tb|
|00001890| 6c 6f 63 6b 25 0d 0c 44 | 27 e7 20 28 74 62 6c 6f |lock%..D|'. (tblo|
|000018a0| 63 6b 25 21 32 34 20 80 | 20 31 3c 3c 38 29 20 8c |ck%!24 .| 1<<8) .|
|000018b0| 20 3d 74 62 6c 6f 63 6b | 25 21 32 38 0d 0c 4e 07 | =tblock|%!28..N.|
|000018c0| 3d 2d 31 0d 0c 58 05 3a | 0d 0c 62 31 dd f2 73 65 |=-1..X.:|..b1..se|
|000018d0| 74 69 63 6f 6e 73 74 61 | 74 65 28 77 68 61 6e 64 |ticonsta|te(whand|
|000018e0| 6c 65 25 2c 69 68 61 6e | 64 6c 65 25 2c 65 6f 72 |le%,ihan|dle%,eor|
|000018f0| 25 2c 63 6c 65 61 72 25 | 29 0d 0c 6c 15 21 74 62 |%,clear%|)..l.!tb|
|00001900| 6c 6f 63 6b 25 3d 77 68 | 61 6e 64 6c 65 25 0d 0c |lock%=wh|andle%..|
|00001910| 76 16 74 62 6c 6f 63 6b | 25 21 34 3d 69 68 61 6e |v.tblock|%!4=ihan|
|00001920| 64 6c 65 25 0d 0c 80 12 | 74 62 6c 6f 63 6b 25 21 |dle%....|tblock%!|
|00001930| 38 3d 65 6f 72 25 0d 0c | 8a 15 74 62 6c 6f 63 6b |8=eor%..|..tblock|
|00001940| 25 21 31 32 3d 63 6c 65 | 61 72 25 0d 0c 94 23 c8 |%!12=cle|ar%...#.|
|00001950| 99 20 22 57 69 6d 70 5f | 53 65 74 49 63 6f 6e 53 |. "Wimp_|SetIconS|
|00001960| 74 61 74 65 22 2c 2c 74 | 62 6c 6f 63 6b 25 0d 0c |tate",,t|block%..|
|00001970| 9e 05 e1 0d 0c a8 05 3a | 0d 0c b2 13 dd a4 67 65 |.......:|......ge|
|00001980| 74 73 74 72 28 61 64 64 | 72 25 29 0d 0c bc 0b ea |tstr(add|r%).....|
|00001990| 20 73 24 2c 73 25 0d 0c | c6 09 73 24 3d 22 22 0d | s$,s%..|..s$="".|
|000019a0| 0c d0 10 c8 95 20 3f 61 | 64 64 72 25 3c 3e 30 0d |..... ?a|ddr%<>0.|
|000019b0| 0c da 0d 73 25 3d 3f 61 | 64 64 72 25 0d 0c e4 1d |...s%=?a|ddr%....|
|000019c0| e7 20 73 25 3e 33 31 20 | 73 24 2b 3d bd 73 25 20 |. s%>31 |s$+=.s% |
|000019d0| 8b 20 73 24 2b 3d 22 2e | 22 0d 0c ee 0c 61 64 64 |. s$+=".|"....add|
|000019e0| 72 25 2b 3d 31 0d 0c f8 | 05 ce 0d 0d 02 07 3d 73 |r%+=1...|......=s|
|000019f0| 24 0d 0d 0c 05 3a 0d 0d | 16 0a dd f2 6e 75 6c 6c |$....:..|....null|
|00001a00| 0d 0d 20 12 e7 20 ac 20 | 77 61 69 74 69 6e 67 25 |.. .. . |waiting%|
|00001a10| 20 8c 0d 0d 2a 15 c8 99 | 20 22 48 6f 75 72 67 6c | ...*...| "Hourgl|
|00001a20| 61 73 73 5f 4f 6e 22 0d | 0d 34 04 0d 0d 3e 0d e7 |ass_On".|.4...>..|
|00001a30| 20 66 61 73 74 25 20 8c | 0d 0d 48 19 c8 99 20 22 | fast% .|..H... "|
|00001a40| 48 6f 75 72 67 6c 61 73 | 73 5f 4c 45 44 73 22 2c |Hourglas|s_LEDs",|
|00001a50| 32 0d 0d 52 07 d1 3d 30 | 0d 0d 5c 05 f5 0d 0d 66 |2..R..=0|..\....f|
|00001a60| 0d f2 6e 65 78 74 6c 69 | 6e 65 0d 0d 70 1e fd 20 |..nextli|ne..p.. |
|00001a70| 77 61 69 74 69 6e 67 25 | 20 84 20 71 75 69 74 25 |waiting%| . quit%|
|00001a80| 20 84 20 91 3e 31 30 30 | 0d 0d 7a 05 cc 0d 0d 84 | . .>100|..z.....|
|00001a90| 04 0d 0d 8e 0d f2 6e 65 | 78 74 6c 69 6e 65 0d 0d |......ne|xtline..|
|00001aa0| 98 04 0d 0d a2 05 cd 0d | 0d ac 04 0d 0d b6 16 c8 |........|........|
|00001ab0| 99 20 22 48 6f 75 72 67 | 6c 61 73 73 5f 4f 66 66 |. "Hourg|lass_Off|
|00001ac0| 22 0d 0d c0 05 cd 0d 0d | ca 05 e1 0d 0d d4 05 3a |".......|.......:|
|00001ad0| 0d 0d de 1f dd f2 61 63 | 74 69 6f 6e 28 77 68 61 |......ac|tion(wha|
|00001ae0| 6e 64 6c 65 25 2c 69 68 | 61 6e 64 6c 65 25 29 0d |ndle%,ih|andle%).|
|00001af0| 0d e8 1c e7 20 77 68 61 | 6e 64 6c 65 25 3d 61 63 |.... wha|ndle%=ac|
|00001b00| 74 69 6f 6e 77 69 6e 64 | 25 20 8c 0d 0d f2 04 0d |tionwind|% ......|
|00001b10| 0d fc 14 c8 8e 20 61 63 | 74 69 6f 6e 74 79 70 65 |..... ac|tiontype|
|00001b20| 25 20 ca 0d 0e 06 08 c9 | 20 31 3a 0d 0e 10 04 0d |% ......| 1:.....|
|00001b30| 0e 1a 12 e7 20 69 68 61 | 6e 64 6c 65 25 3d 31 20 |.... iha|ndle%=1 |
|00001b40| 8c 0d 0e 24 17 21 62 6c | 6f 63 6b 25 3d 61 63 74 |...$.!bl|ock%=act|
|00001b50| 69 6f 6e 77 69 6e 64 25 | 0d 0e 2e 22 c8 99 20 22 |ionwind%|...".. "|
|00001b60| 57 69 6d 70 5f 44 65 6c | 65 74 65 57 69 6e 64 6f |Wimp_Del|eteWindo|
|00001b70| 77 22 2c 2c 62 6c 6f 63 | 6b 25 0d 0e 38 11 61 63 |w",,bloc|k%..8.ac|
|00001b80| 74 69 6f 6e 77 69 6e 64 | 25 3d 30 0d 0e 42 11 61 |tionwind|%=0..B.a|
|00001b90| 63 74 69 6f 6e 74 79 70 | 65 25 3d 30 0d 0e 4c 0e |ctiontyp|e%=0..L.|
|00001ba0| 77 61 69 74 69 6e 67 25 | 3d a3 0d 0e 56 05 cd 0d |waiting%|=...V...|
|00001bb0| 0e 60 04 0d 0e 6a 08 c9 | 20 37 3a 0d 0e 74 04 0d |.`...j..| 7:..t..|
|00001bc0| 0e 7e 12 e7 20 69 68 61 | 6e 64 6c 65 25 3d 31 20 |.~.. iha|ndle%=1 |
|00001bd0| 8c 0d 0e 88 04 0d 0e 92 | 2a c8 99 20 22 58 4f 53 |........|*.. "XOS|
|00001be0| 5f 46 69 6c 65 22 2c 31 | 37 2c 73 77 61 70 66 69 |_File",1|7,swapfi|
|00001bf0| 6c 65 24 20 b8 20 74 79 | 70 65 25 3b 73 73 25 0d |le$ . ty|pe%;ss%.|
|00001c00| 0e 9c 17 e7 20 28 73 73 | 25 20 80 20 31 29 20 74 |.... (ss|% . 1) t|
|00001c10| 79 70 65 25 3d 30 0d 0e | a6 04 0d 0e b0 10 e7 20 |ype%=0..|....... |
|00001c20| 74 79 70 65 25 3c 3e 30 | 20 8c 0d 0e ba 17 21 62 |type%<>0| .....!b|
|00001c30| 6c 6f 63 6b 25 3d 61 63 | 74 69 6f 6e 77 69 6e 64 |lock%=ac|tionwind|
|00001c40| 25 0d 0e c4 22 c8 99 20 | 22 57 69 6d 70 5f 44 65 |%...".. |"Wimp_De|
|00001c50| 6c 65 74 65 57 69 6e 64 | 6f 77 22 2c 2c 62 6c 6f |leteWind|ow",,blo|
|00001c60| 63 6b 25 0d 0e ce 11 61 | 63 74 69 6f 6e 77 69 6e |ck%....a|ctionwin|
|00001c70| 64 25 3d 30 0d 0e d8 11 | 61 63 74 69 6f 6e 74 79 |d%=0....|actionty|
|00001c80| 70 65 25 3d 30 0d 0e e2 | 0e 77 61 69 74 69 6e 67 |pe%=0...|.waiting|
|00001c90| 25 3d a3 0d 0e ec 1b f2 | 6f 70 65 6e 6c 61 72 67 |%=......|openlarg|
|00001ca0| 65 28 62 61 63 6b 68 61 | 6e 64 6c 65 25 29 0d 0e |e(backha|ndle%)..|
|00001cb0| f6 05 cc 0d 0f 00 07 ef | 20 37 0d 0f 0a 05 cd 0d |........| 7......|
|00001cc0| 0f 14 04 0d 0f 1e 05 cd | 0d 0f 28 04 0d 0f 32 08 |........|..(...2.|
|00001cd0| c9 20 32 3a 0d 0f 3c 04 | 0d 0f 46 12 e7 20 69 68 |. 2:..<.|..F.. ih|
|00001ce0| 61 6e 64 6c 65 25 3e 30 | 20 8c 0d 0f 50 1a 76 61 |andle%>0| ...P.va|
|00001cf0| 72 25 28 61 63 74 76 61 | 72 25 29 3d 69 68 61 6e |r%(actva|r%)=ihan|
|00001d00| 64 6c 65 25 0d 0f 5a 17 | 21 62 6c 6f 63 6b 25 3d |dle%..Z.|!block%=|
|00001d10| 61 63 74 69 6f 6e 77 69 | 6e 64 25 0d 0f 64 22 c8 |actionwi|nd%..d".|
|00001d20| 99 20 22 57 69 6d 70 5f | 44 65 6c 65 74 65 57 69 |. "Wimp_|DeleteWi|
|00001d30| 6e 64 6f 77 22 2c 2c 62 | 6c 6f 63 6b 25 0d 0f 6e |ndow",,b|lock%..n|
|00001d40| 11 61 63 74 69 6f 6e 77 | 69 6e 64 25 3d 30 0d 0f |.actionw|ind%=0..|
|00001d50| 78 11 61 63 74 69 6f 6e | 74 79 70 65 25 3d 30 0d |x.action|type%=0.|
|00001d60| 0f 82 0e 77 61 69 74 69 | 6e 67 25 3d a3 0d 0f 8c |...waiti|ng%=....|
|00001d70| 05 cd 0d 0f 96 04 0d 0f | a0 0a c9 20 33 2c 34 3a |........|... 3,4:|
|00001d80| 0d 0f aa 13 e7 20 69 68 | 61 6e 64 6c 65 25 3d 31 |..... ih|andle%=1|
|00001d90| 30 20 8c 0d 0f b4 0d 73 | 65 6c 65 63 74 25 3d 30 |0 .....s|elect%=0|
|00001da0| 0d 0f be 04 0d 0f c8 0e | e3 20 78 25 3d 32 20 b8 |........|. x%=2 .|
|00001db0| 20 39 0d 0f d2 3f e7 20 | a4 67 65 74 69 63 6f 6e | 9...?. |.geticon|
|00001dc0| 73 65 6c 28 61 63 74 69 | 6f 6e 77 69 6e 64 25 2c |sel(acti|onwind%,|
|00001dd0| 78 25 29 20 8c 20 73 65 | 6c 65 63 74 25 3d 73 65 |x%) . se|lect%=se|
|00001de0| 6c 65 63 74 25 20 84 20 | 31 3c 3c 28 78 25 2d 31 |lect% . |1<<(x%-1|
|00001df0| 29 0d 0f dc 05 ed 0d 0f | e6 04 0d 0f f0 22 e7 20 |).......|.....". |
|00001e00| 73 65 6c 65 63 74 25 3c | 3e 30 20 84 20 61 63 74 |select%<|>0 . act|
|00001e10| 69 6f 6e 74 79 70 65 25 | 3d 33 20 8c 0d 0f fa 19 |iontype%|=3 .....|
|00001e20| 76 61 72 25 28 61 63 74 | 76 61 72 25 29 3d 73 65 |var%(act|var%)=se|
|00001e30| 6c 65 63 74 25 0d 10 04 | 04 0d 10 0e 17 21 62 6c |lect%...|.....!bl|
|00001e40| 6f 63 6b 25 3d 61 63 74 | 69 6f 6e 77 69 6e 64 25 |ock%=act|ionwind%|
|00001e50| 0d 10 18 22 c8 99 20 22 | 57 69 6d 70 5f 44 65 6c |...".. "|Wimp_Del|
|00001e60| 65 74 65 57 69 6e 64 6f | 77 22 2c 2c 62 6c 6f 63 |eteWindo|w",,bloc|
|00001e70| 6b 25 0d 10 22 11 61 63 | 74 69 6f 6e 77 69 6e 64 |k%..".ac|tionwind|
|00001e80| 25 3d 30 0d 10 2c 11 61 | 63 74 69 6f 6e 74 79 70 |%=0..,.a|ctiontyp|
|00001e90| 65 25 3d 30 0d 10 36 0e | 77 61 69 74 69 6e 67 25 |e%=0..6.|waiting%|
|00001ea0| 3d a3 0d 10 40 05 cc 0d | 10 4a 06 ef 37 0d 10 54 |=...@...|.J..7..T|
|00001eb0| 05 cd 0d 10 5e 04 0d 10 | 68 05 cd 0d 10 72 04 0d |....^...|h....r..|
|00001ec0| 10 7c 08 c9 20 35 3a 0d | 10 86 12 e7 20 69 68 61 |.|.. 5:.|.... iha|
|00001ed0| 6e 64 6c 65 25 3d 31 20 | 8c 0d 10 90 14 74 65 6d |ndle%=1 |.....tem|
|00001ee0| 70 25 3d 74 62 6c 6f 63 | 6b 25 2b 36 34 0d 10 9a |p%=tbloc|k%+64...|
|00001ef0| 21 21 74 62 6c 6f 63 6b | 25 3d 77 68 61 6e 64 6c |!!tblock|%=whandl|
|00001f00| 65 25 3a 74 62 6c 6f 63 | 6b 25 21 34 3d 31 0d 10 |e%:tbloc|k%!4=1..|
|00001f10| a4 23 c8 99 20 22 57 69 | 6d 70 5f 47 65 74 49 63 |.#.. "Wi|mp_GetIc|
|00001f20| 6f 6e 53 74 61 74 65 22 | 2c 2c 74 62 6c 6f 63 6b |onState"|,,tblock|
|00001f30| 25 0d 10 ae 04 0d 10 b8 | 13 21 74 65 6d 70 25 3d |%.......|.!temp%=|
|00001f40| 77 68 61 6e 64 6c 65 25 | 0d 10 c2 23 c8 99 20 22 |whandle%|...#.. "|
|00001f50| 57 69 6d 70 5f 47 65 74 | 57 69 6e 64 6f 77 53 74 |Wimp_Get|WindowSt|
|00001f60| 61 74 65 22 2c 2c 74 65 | 6d 70 25 0d 10 cc 16 74 |ate",,te|mp%....t|
|00001f70| 62 6c 6f 63 6b 25 21 38 | 2b 3d 74 65 6d 70 25 21 |block%!8|+=temp%!|
|00001f80| 34 0d 10 d6 1b 74 62 6c | 6f 63 6b 25 21 31 32 2b |4....tbl|ock%!12+|
|00001f90| 3d 74 65 6d 70 25 21 31 | 36 2b 34 34 0d 10 e0 17 |=temp%!1|6+44....|
|00001fa0| 74 62 6c 6f 63 6b 25 21 | 31 36 2b 3d 74 65 6d 70 |tblock%!|16+=temp|
|00001fb0| 25 21 34 0d 10 ea 18 74 | 62 6c 6f 63 6b 25 21 32 |%!4....t|block%!2|
|00001fc0| 30 2b 3d 74 65 6d 70 25 | 21 31 36 0d 10 f4 04 0d |0+=temp%|!16.....|
|00001fd0| 10 fe 3c c8 99 20 22 44 | 72 61 67 41 53 70 72 69 |..<.. "D|ragASpri|
|00001fe0| 74 65 5f 53 74 61 72 74 | 22 2c 25 31 30 30 30 30 |te_Start|",%10000|
|00001ff0| 31 30 31 2c 31 2c 22 44 | 69 72 65 63 74 6f 72 79 |101,1,"D|irectory|
|00002000| 22 2c 74 62 6c 6f 63 6b | 25 2b 38 0d 11 08 29 f2 |",tblock|%+8...).|
|00002010| 73 65 74 69 63 6f 6e 73 | 74 61 74 65 28 77 68 61 |seticons|tate(wha|
|00002020| 6e 64 6c 65 25 2c 31 2c | 31 3c 3c 32 32 2c 31 3c |ndle%,1,|1<<22,1<|
|00002030| 3c 32 32 29 0d 11 12 1b | f4 20 50 52 4f 43 73 68 |<22)....|. PROCsh|
|00002040| 61 64 65 28 77 68 61 6e | 64 6c 65 25 2c 31 29 0d |ade(whan|dle%,1).|
|00002050| 11 1c 05 cd 0d 11 26 04 | 0d 11 30 05 cb 0d 11 3a |......&.|..0....:|
|00002060| 04 0d 11 44 05 cd 0d 11 | 4e 04 0d 11 58 39 e7 20 |...D....|N...X9. |
|00002070| ac 20 77 61 69 74 69 6e | 67 25 20 8c 20 f2 6e 65 |. waitin|g% . .ne|
|00002080| 77 74 65 78 74 28 73 74 | 61 74 75 73 68 61 6e 64 |wtext(st|atushand|
|00002090| 6c 65 25 2c 30 2c 22 57 | 6f 72 6b 69 6e 67 2e 2e |le%,0,"W|orking..|
|000020a0| 2e 22 29 0d 11 62 05 e1 | 0d 11 6c 05 3a 0d 11 76 |.")..b..|..l.:..v|
|000020b0| 12 dd f2 67 6f 74 6f 28 | 6c 61 62 65 6c 24 29 0d |...goto(|label$).|
|000020c0| 11 80 0b ea 20 66 25 2c | 78 25 0d 11 8a 15 6c 61 |.... f%,|x%....la|
|000020d0| 62 65 6c 24 3d 22 3a 22 | 2b 6c 61 62 65 6c 24 0d |bel$=":"|+label$.|
|000020e0| 11 94 04 0d 11 9e 09 66 | 25 3d 2d 31 0d 11 a8 04 |.......f|%=-1....|
|000020f0| 0d 11 b2 14 e3 20 78 25 | 3d 30 20 b8 20 73 6c 69 |..... x%|=0 . sli|
|00002100| 6e 65 73 25 0d 11 bc 26 | e7 20 a4 73 74 72 69 70 |nes%...&|. .strip|
|00002110| 28 6c 69 6e 65 24 28 78 | 25 29 29 3d 6c 61 62 65 |(line$(x|%))=labe|
|00002120| 6c 24 20 8c 20 66 25 3d | 78 25 0d 11 c6 05 ed 0d |l$ . f%=|x%......|
|00002130| 11 d0 04 0d 11 da 30 e7 | 20 66 25 3c 30 20 8c 20 |......0.| f%<0 . |
|00002140| 85 20 30 2c 22 4c 61 62 | 65 6c 20 27 22 2b 6c 61 |. 0,"Lab|el '"+la|
|00002150| 62 65 6c 24 2b 22 27 20 | 6e 6f 74 20 66 6f 75 6e |bel$+"' |not foun|
|00002160| 64 21 22 0d 11 e4 0d 73 | 63 70 6f 73 25 3d 66 25 |d!"....s|cpos%=f%|
|00002170| 0d 11 ee 05 e1 0d 11 f8 | 05 3a 0d 12 02 0e dd f2 |........|.:......|
|00002180| 6f 70 65 6e 63 62 6f 78 | 0d 12 0c 0b ea 20 78 25 |opencbox|..... x%|
|00002190| 2c 77 24 0d 12 16 04 0d | 12 20 19 63 68 6f 69 63 |,w$.....|. .choic|
|000021a0| 65 73 25 3d bb 28 63 6c | 69 6e 65 24 28 31 29 29 |es%=.(cl|ine$(1))|
|000021b0| 0d 12 2a 58 e7 20 63 68 | 6f 69 63 65 73 25 3c 31 |..*X. ch|oices%<1|
|000021c0| 20 84 20 63 68 6f 69 63 | 65 73 25 3e 34 20 8c 20 | . choic|es%>4 . |
|000021d0| 85 20 30 2c 22 54 6f 6f | 20 6d 61 6e 79 20 63 68 |. 0,"Too| many ch|
|000021e0| 6f 69 63 65 73 20 61 74 | 20 6c 69 6e 65 20 22 2b |oices at| line "+|
|000021f0| c3 28 73 63 70 6f 73 25 | 2b 31 29 2b 22 20 6f 66 |.(scpos%|+1)+" of|
|00002200| 20 73 63 72 69 70 74 22 | 0d 12 34 04 0d 12 3e 31 | script"|..4...>1|
|00002210| c8 99 20 22 57 69 6d 70 | 5f 43 72 65 61 74 65 57 |.. "Wimp|_CreateW|
|00002220| 69 6e 64 6f 77 22 2c 2c | 77 5f 71 75 65 73 25 20 |indow",,|w_ques% |
|00002230| b8 20 61 63 74 69 6f 6e | 77 69 6e 64 25 0d 12 48 |. action|wind%..H|
|00002240| 1c 61 63 74 69 6f 6e 74 | 79 70 65 25 3d 32 3a 77 |.actiont|ype%=2:w|
|00002250| 61 69 74 69 6e 67 25 3d | b9 0d 12 52 04 0d 12 5c |aiting%=|...R...\|
|00002260| 17 e3 20 78 25 3d 32 20 | b8 20 63 68 6f 69 63 65 |.. x%=2 |. choice|
|00002270| 73 25 2b 31 0d 12 66 1c | 63 68 6f 69 63 65 24 28 |s%+1..f.|choice$(|
|00002280| 78 25 2d 31 29 3d 63 6c | 69 6e 65 24 28 78 25 29 |x%-1)=cl|ine$(x%)|
|00002290| 0d 12 70 05 ed 0d 12 7a | 04 0d 12 84 21 61 63 74 |..p....z|....!act|
|000022a0| 76 61 72 25 3d bb 28 63 | 6c 69 6e 65 24 28 63 68 |var%=.(c|line$(ch|
|000022b0| 6f 69 63 65 73 25 2b 32 | 29 29 0d 12 8e 5d e7 20 |oices%+2|))...]. |
|000022c0| 61 63 74 76 61 72 25 3c | 30 20 84 20 61 63 74 76 |actvar%<|0 . actv|
|000022d0| 61 72 25 3e 32 35 35 20 | 8c 20 85 20 30 2c 22 56 |ar%>255 |. . 0,"V|
|000022e0| 61 72 69 61 62 6c 65 20 | 6f 75 74 20 6f 66 20 72 |ariable |out of r|
|000022f0| 61 6e 67 65 20 61 74 20 | 6c 69 6e 65 20 22 2b c3 |ange at |line "+.|
|00002300| 28 73 63 70 6f 73 25 2b | 31 29 2b 22 20 6f 66 20 |(scpos%+|1)+" of |
|00002310| 73 63 72 69 70 74 22 0d | 12 98 04 0d 12 a2 09 77 |script".|.......w|
|00002320| 24 3d 22 22 0d 12 ac 1c | e3 20 78 25 3d 63 68 6f |$=""....|. x%=cho|
|00002330| 69 63 65 73 25 2b 33 20 | b8 20 77 6f 72 64 73 25 |ices%+3 |. words%|
|00002340| 0d 12 b6 16 77 24 2b 3d | 63 6c 69 6e 65 24 28 78 |....w$+=|cline$(x|
|00002350| 25 29 2b 22 20 22 0d 12 | c0 05 ed 0d 12 ca 11 77 |%)+" "..|.......w|
|00002360| 24 3d a4 73 74 72 69 70 | 28 77 24 29 0d 12 d4 1e |$=.strip|(w$)....|
|00002370| f2 6e 65 77 74 65 78 74 | 28 61 63 74 69 6f 6e 77 |.newtext|(actionw|
|00002380| 69 6e 64 25 2c 30 2c 77 | 24 29 0d 12 de 04 0d 12 |ind%,0,w|$)......|
|00002390| e8 15 e3 20 78 25 3d 31 | 20 b8 20 63 68 6f 69 63 |... x%=1| . choic|
|000023a0| 65 73 25 0d 12 f2 28 f2 | 6e 65 77 74 65 78 74 28 |es%...(.|newtext(|
|000023b0| 61 63 74 69 6f 6e 77 69 | 6e 64 25 2c 78 25 2c 63 |actionwi|nd%,x%,c|
|000023c0| 68 6f 69 63 65 24 28 78 | 25 29 29 0d 12 fc 05 ed |hoice$(x|%)).....|
|000023d0| 0d 13 06 04 0d 13 10 12 | e7 20 63 68 6f 69 63 65 |........|. choice|
|000023e0| 73 25 3c 34 20 8c 0d 13 | 1a 17 e3 20 78 25 3d 63 |s%<4 ...|... x%=c|
|000023f0| 68 6f 69 63 65 73 25 2b | 31 20 b8 20 34 0d 13 24 |hoices%+|1 . 4..$|
|00002400| 17 21 62 6c 6f 63 6b 25 | 3d 61 63 74 69 6f 6e 77 |.!block%|=actionw|
|00002410| 69 6e 64 25 0d 13 2e 0f | 62 6c 6f 63 6b 25 21 34 |ind%....|block%!4|
|00002420| 3d 78 25 0d 13 38 20 c8 | 99 20 22 57 69 6d 70 5f |=x%..8 .|. "Wimp_|
|00002430| 44 65 6c 65 74 65 49 63 | 6f 6e 22 2c 2c 62 6c 6f |DeleteIc|on",,blo|
|00002440| 63 6b 25 0d 13 42 05 ed | 0d 13 4c 05 cd 0d 13 56 |ck%..B..|..L....V|
|00002450| 04 0d 13 60 1c f2 6f 70 | 65 6e 77 69 6e 64 6f 77 |...`..op|enwindow|
|00002460| 28 61 63 74 69 6f 6e 77 | 69 6e 64 25 29 0d 13 6a |(actionw|ind%)..j|
|00002470| 05 e1 0d 13 74 05 3a 0d | 13 7e 08 dd f2 69 66 0d |....t.:.|.~...if.|
|00002480| 13 88 0b ea 20 77 24 2c | 78 25 0d 13 92 32 65 78 |.... w$,|x%...2ex|
|00002490| 70 24 3d 22 76 61 72 25 | 28 22 2b 63 6c 69 6e 65 |p$="var%|("+cline|
|000024a0| 24 28 31 29 2b 22 29 22 | 2b 63 6c 69 6e 65 24 28 |$(1)+")"|+cline$(|
|000024b0| 32 29 2b 63 6c 69 6e 65 | 24 28 33 29 0d 13 9c 04 |2)+cline|$(3)....|
|000024c0| 0d 13 a6 0f e7 20 a0 28 | 65 78 70 24 29 20 8c 0d |..... .(|exp$) ..|
|000024d0| 13 b0 04 0d 13 ba 09 77 | 24 3d 22 22 0d 13 c4 13 |.......w|$=""....|
|000024e0| e3 20 78 25 3d 34 20 b8 | 20 77 6f 72 64 73 25 0d |. x%=4 .| words%.|
|000024f0| 13 ce 16 77 24 2b 3d 63 | 6c 69 6e 65 24 28 78 25 |...w$+=c|line$(x%|
|00002500| 29 2b 22 20 22 0d 13 d8 | 05 ed 0d 13 e2 12 f2 69 |)+" "...|.......i|
|00002510| 6e 74 65 72 70 72 65 74 | 28 77 24 29 0d 13 ec 04 |nterpret|(w$)....|
|00002520| 0d 13 f6 05 cd 0d 14 00 | 05 e1 0d 14 0a 05 3a 0d |........|......:.|
|00002530| 14 14 13 dd f2 6f 70 74 | 72 61 64 28 74 79 70 65 |.....opt|rad(type|
|00002540| 25 29 0d 14 1e 0e ea 20 | 78 25 2c 77 24 2c 77 25 |%)..... |x%,w$,w%|
|00002550| 0d 14 28 04 0d 14 32 19 | 63 68 6f 69 63 65 73 25 |..(...2.|choices%|
|00002560| 3d bb 28 63 6c 69 6e 65 | 24 28 31 29 29 0d 14 3c |=.(cline|$(1))..<|
|00002570| 58 e7 20 63 68 6f 69 63 | 65 73 25 3c 31 20 84 20 |X. choic|es%<1 . |
|00002580| 63 68 6f 69 63 65 73 25 | 3e 38 20 8c 20 85 20 30 |choices%|>8 . . 0|
|00002590| 2c 22 54 6f 6f 20 6d 61 | 6e 79 20 63 68 6f 69 63 |,"Too ma|ny choic|
|000025a0| 65 73 20 61 74 20 6c 69 | 6e 65 20 22 2b c3 28 73 |es at li|ne "+.(s|
|000025b0| 63 70 6f 73 25 2b 31 29 | 2b 22 20 6f 66 20 73 63 |cpos%+1)|+" of sc|
|000025c0| 72 69 70 74 22 0d 14 46 | 04 0d 14 50 0e c8 8e 20 |ript"..F|...P... |
|000025d0| 74 79 70 65 25 20 ca 0d | 14 5a 20 c9 20 31 3a 77 |type% ..|.Z . 1:w|
|000025e0| 25 3d 77 5f 6f 70 74 73 | 25 3a 61 63 74 69 6f 6e |%=w_opts|%:action|
|000025f0| 74 79 70 65 25 3d 33 0d | 14 64 20 c9 20 32 3a 77 |type%=3.|.d . 2:w|
|00002600| 25 3d 77 5f 72 61 64 73 | 25 3a 61 63 74 69 6f 6e |%=w_rads|%:action|
|00002610| 74 79 70 65 25 3d 34 0d | 14 6e 17 7f 3a 85 20 30 |type%=4.|.n..:. 0|
|00002620| 2c 22 54 79 70 65 20 65 | 72 72 6f 72 21 22 0d 14 |,"Type e|rror!"..|
|00002630| 78 05 cb 0d 14 82 04 0d | 14 8c 2c c8 99 20 22 57 |x.......|..,.. "W|
|00002640| 69 6d 70 5f 43 72 65 61 | 74 65 57 69 6e 64 6f 77 |imp_Crea|teWindow|
|00002650| 22 2c 2c 77 25 20 b8 20 | 61 63 74 69 6f 6e 77 69 |",,w% . |actionwi|
|00002660| 6e 64 25 0d 14 96 0e 77 | 61 69 74 69 6e 67 25 3d |nd%....w|aiting%=|
|00002670| b9 0d 14 a0 04 0d 14 aa | 17 e3 20 78 25 3d 32 20 |........|.. x%=2 |
|00002680| b8 20 63 68 6f 69 63 65 | 73 25 2b 31 0d 14 b4 1c |. choice|s%+1....|
|00002690| 63 68 6f 69 63 65 24 28 | 78 25 2d 31 29 3d 63 6c |choice$(|x%-1)=cl|
|000026a0| 69 6e 65 24 28 78 25 29 | 0d 14 be 05 ed 0d 14 c8 |ine$(x%)|........|
|000026b0| 04 0d 14 d2 21 61 63 74 | 76 61 72 25 3d bb 28 63 |....!act|var%=.(c|
|000026c0| 6c 69 6e 65 24 28 63 68 | 6f 69 63 65 73 25 2b 32 |line$(ch|oices%+2|
|000026d0| 29 29 0d 14 dc 5d e7 20 | 61 63 74 76 61 72 25 3c |))...]. |actvar%<|
|000026e0| 30 20 84 20 61 63 74 76 | 61 72 25 3e 32 35 35 20 |0 . actv|ar%>255 |
|000026f0| 8c 20 85 20 30 2c 22 56 | 61 72 69 61 62 6c 65 20 |. . 0,"V|ariable |
|00002700| 6f 75 74 20 6f 66 20 72 | 61 6e 67 65 20 61 74 20 |out of r|ange at |
|00002710| 6c 69 6e 65 20 22 2b c3 | 28 73 63 70 6f 73 25 2b |line "+.|(scpos%+|
|00002720| 31 29 2b 22 20 6f 66 20 | 73 63 72 69 70 74 22 0d |1)+" of |script".|
|00002730| 14 e6 04 0d 14 f0 09 77 | 24 3d 22 22 0d 14 fa 1c |.......w|$=""....|
|00002740| e3 20 78 25 3d 63 68 6f | 69 63 65 73 25 2b 33 20 |. x%=cho|ices%+3 |
|00002750| b8 20 77 6f 72 64 73 25 | 0d 15 04 16 77 24 2b 3d |. words%|....w$+=|
|00002760| 63 6c 69 6e 65 24 28 78 | 25 29 2b 22 20 22 0d 15 |cline$(x|%)+" "..|
|00002770| 0e 05 ed 0d 15 18 11 77 | 24 3d a4 73 74 72 69 70 |.......w|$=.strip|
|00002780| 28 77 24 29 0d 15 22 1e | f2 6e 65 77 74 65 78 74 |(w$)..".|.newtext|
|00002790| 28 61 63 74 69 6f 6e 77 | 69 6e 64 25 2c 30 2c 77 |(actionw|ind%,0,w|
|000027a0| 24 29 0d 15 2c 04 0d 15 | 36 17 e3 20 78 25 3d 32 |$)..,...|6.. x%=2|
|000027b0| 20 b8 20 63 68 6f 69 63 | 65 73 25 2b 31 0d 15 40 | . choic|es%+1..@|
|000027c0| 2a f2 6e 65 77 74 65 78 | 74 28 61 63 74 69 6f 6e |*.newtex|t(action|
|000027d0| 77 69 6e 64 25 2c 78 25 | 2c 63 68 6f 69 63 65 24 |wind%,x%|,choice$|
|000027e0| 28 78 25 2d 31 29 29 0d | 15 4a 05 ed 0d 15 54 04 |(x%-1)).|.J....T.|
|000027f0| 0d 15 5e 12 e7 20 63 68 | 6f 69 63 65 73 25 3c 38 |..^.. ch|oices%<8|
|00002800| 20 8c 0d 15 68 17 e3 20 | 78 25 3d 63 68 6f 69 63 | ...h.. |x%=choic|
|00002810| 65 73 25 2b 32 20 b8 20 | 39 0d 15 72 17 21 62 6c |es%+2 . |9..r.!bl|
|00002820| 6f 63 6b 25 3d 61 63 74 | 69 6f 6e 77 69 6e 64 25 |ock%=act|ionwind%|
|00002830| 0d 15 7c 0f 62 6c 6f 63 | 6b 25 21 34 3d 78 25 0d |..|.bloc|k%!4=x%.|
|00002840| 15 86 20 c8 99 20 22 57 | 69 6d 70 5f 44 65 6c 65 |.. .. "W|imp_Dele|
|00002850| 74 65 49 63 6f 6e 22 2c | 2c 62 6c 6f 63 6b 25 0d |teIcon",|,block%.|
|00002860| 15 90 05 ed 0d 15 9a 05 | cd 0d 15 a4 04 0d 15 ae |........|........|
|00002870| 1c f2 6f 70 65 6e 77 69 | 6e 64 6f 77 28 61 63 74 |..openwi|ndow(act|
|00002880| 69 6f 6e 77 69 6e 64 25 | 29 0d 15 b8 05 e1 0d 15 |ionwind%|).......|
|00002890| c2 05 3a 0d 15 cc 23 dd | a4 67 65 74 69 63 6f 6e |..:...#.|.geticon|
|000028a0| 73 65 6c 28 77 68 61 6e | 64 6c 65 25 2c 69 68 61 |sel(whan|dle%,iha|
|000028b0| 6e 64 6c 65 25 29 0d 15 | d6 15 21 74 62 6c 6f 63 |ndle%)..|..!tbloc|
|000028c0| 6b 25 3d 77 68 61 6e 64 | 6c 65 25 0d 15 e0 16 74 |k%=whand|le%....t|
|000028d0| 62 6c 6f 63 6b 25 21 34 | 3d 69 68 61 6e 64 6c 65 |block%!4|=ihandle|
|000028e0| 25 0d 15 ea 23 c8 99 20 | 22 57 69 6d 70 5f 47 65 |%...#.. |"Wimp_Ge|
|000028f0| 74 49 63 6f 6e 53 74 61 | 74 65 22 2c 2c 74 62 6c |tIconSta|te",,tbl|
|00002900| 6f 63 6b 25 0d 15 f4 1e | 3d 28 74 62 6c 6f 63 6b |ock%....|=(tblock|
|00002910| 25 21 32 34 20 80 20 26 | 32 30 30 30 30 30 29 3c |%!24 . &|200000)<|
|00002920| 3e 30 0d 15 fe 05 3a 0d | 16 08 0d dd f2 73 61 76 |>0....:.|.....sav|
|00002930| 65 6f 75 74 0d 16 12 0b | ea 20 78 25 2c 77 24 0d |eout....|. x%,w$.|
|00002940| 16 1c 0e 77 61 69 74 69 | 6e 67 25 3d b9 0d 16 26 |...waiti|ng%=...&|
|00002950| 11 61 63 74 69 6f 6e 74 | 79 70 65 25 3d 35 0d 16 |.actiont|ype%=5..|
|00002960| 30 34 c8 99 20 22 57 69 | 6d 70 5f 43 72 65 61 74 |04.. "Wi|mp_Creat|
|00002970| 65 57 69 6e 64 6f 77 22 | 2c 2c 77 5f 73 61 76 65 |eWindow"|,,w_save|
|00002980| 6f 75 74 25 20 b8 20 61 | 63 74 69 6f 6e 77 69 6e |out% . a|ctionwin|
|00002990| 64 25 0d 16 3a 04 0d 16 | 44 35 f2 6e 65 77 74 65 |d%..:...|D5.newte|
|000029a0| 78 74 28 61 63 74 69 6f | 6e 77 69 6e 64 25 2c 31 |xt(actio|nwind%,1|
|000029b0| 2c 63 6c 69 6e 65 24 28 | 31 29 29 3a 6c 65 61 66 |,cline$(|1)):leaf|
|000029c0| 24 3d 63 6c 69 6e 65 24 | 28 31 29 0d 16 4e 09 77 |$=cline$|(1)..N.w|
|000029d0| 24 3d 22 22 0d 16 58 13 | e3 20 78 25 3d 32 20 b8 |$=""..X.|. x%=2 .|
|000029e0| 20 77 6f 72 64 73 25 0d | 16 62 16 77 24 2b 3d 63 | words%.|.b.w$+=c|
|000029f0| 6c 69 6e 65 24 28 78 25 | 29 2b 22 20 22 0d 16 6c |line$(x%|)+" "..l|
|00002a00| 05 ed 0d 16 76 11 77 24 | 3d a4 73 74 72 69 70 28 |....v.w$|=.strip(|
|00002a10| 77 24 29 0d 16 80 1e f2 | 6e 65 77 74 65 78 74 28 |w$).....|newtext(|
|00002a20| 61 63 74 69 6f 6e 77 69 | 6e 64 25 2c 30 2c 77 24 |actionwi|nd%,0,w$|
|00002a30| 29 0d 16 8a 04 0d 16 94 | 1c f2 6f 70 65 6e 77 69 |).......|..openwi|
|00002a40| 6e 64 6f 77 28 61 63 74 | 69 6f 6e 77 69 6e 64 25 |ndow(act|ionwind%|
|00002a50| 29 0d 16 9e 1c f2 6f 70 | 65 6e 73 68 72 75 6e 6b |).....op|enshrunk|
|00002a60| 28 62 61 63 6b 68 61 6e | 64 6c 65 25 29 0d 16 a8 |(backhan|dle%)...|
|00002a70| 35 78 25 3d a4 63 68 65 | 63 6b 66 69 6c 65 28 22 |5x%=.che|ckfile("|
|00002a80| 3c 53 65 74 75 70 24 44 | 69 72 3e 2e 46 69 6c 65 |<Setup$D|ir>.File|
|00002a90| 73 2e 50 72 6f 67 72 61 | 6d 2e 22 2b 6c 65 61 66 |s.Progra|m."+leaf|
|00002aa0| 24 29 0d 16 b2 31 e7 20 | 78 25 3c 3d 31 20 85 20 |$)...1. |x%<=1 . |
|00002ab0| 30 2c 22 44 69 72 65 63 | 74 6f 72 79 20 27 22 2b |0,"Direc|tory '"+|
|00002ac0| 6c 65 61 66 24 2b 22 27 | 20 6e 6f 74 20 66 6f 75 |leaf$+"'| not fou|
|00002ad0| 6e 64 22 0d 16 bc 17 6c | 65 61 66 64 61 74 65 25 |nd"....l|eafdate%|
|00002ae0| 3d 66 69 6c 65 64 61 74 | 65 25 0d 16 c6 05 e1 0d |=filedat|e%......|
|00002af0| 16 d0 05 3a 0d 16 da 0d | dd f2 64 72 61 67 65 6e |...:....|..dragen|
|00002b00| 64 0d 16 e4 19 c8 99 20 | 22 44 72 61 67 41 53 70 |d...... |"DragASp|
|00002b10| 72 69 74 65 5f 53 74 6f | 70 22 0d 16 ee 14 c8 8e |rite_Sto|p"......|
|00002b20| 20 61 63 74 69 6f 6e 74 | 79 70 65 25 20 ca 0d 16 | actiont|ype% ...|
|00002b30| f8 08 c9 20 35 3a 0d 17 | 02 28 f2 73 65 74 69 63 |... 5:..|.(.setic|
|00002b40| 6f 6e 73 74 61 74 65 28 | 61 63 74 69 6f 6e 77 69 |onstate(|actionwi|
|00002b50| 6e 64 25 2c 31 2c 30 2c | 31 3c 3c 32 32 29 0d 17 |nd%,1,0,|1<<22)..|
|00002b60| 0c 04 0d 17 16 25 c8 99 | 20 22 57 69 6d 70 5f 47 |.....%..| "Wimp_G|
|00002b70| 65 74 50 6f 69 6e 74 65 | 72 49 6e 66 6f 22 2c 2c |etPointe|rInfo",,|
|00002b80| 74 62 6c 6f 63 6b 25 0d | 17 20 04 0d 17 2a 0f 21 |tblock%.|. ...*.!|
|00002b90| 62 6c 6f 63 6b 25 3d 32 | 35 36 0d 17 34 0f 62 6c |block%=2|56..4.bl|
|00002ba0| 6f 63 6b 25 21 31 32 3d | 30 0d 17 3e 0f 62 6c 6f |ock%!12=|0..>.blo|
|00002bb0| 63 6b 25 21 31 36 3d 31 | 0d 17 48 18 62 6c 6f 63 |ck%!16=1|..H.bloc|
|00002bc0| 6b 25 21 32 30 3d 74 62 | 6c 6f 63 6b 25 21 31 32 |k%!20=tb|lock%!12|
|00002bd0| 0d 17 52 18 62 6c 6f 63 | 6b 25 21 32 34 3d 74 62 |..R.bloc|k%!24=tb|
|00002be0| 6c 6f 63 6b 25 21 31 36 | 0d 17 5c 16 62 6c 6f 63 |lock%!16|..\.bloc|
|00002bf0| 6b 25 21 32 38 3d 21 74 | 62 6c 6f 63 6b 25 0d 17 |k%!28=!t|block%..|
|00002c00| 66 17 62 6c 6f 63 6b 25 | 21 33 32 3d 74 62 6c 6f |f.block%|!32=tblo|
|00002c10| 63 6b 25 21 34 0d 17 70 | 10 62 6c 6f 63 6b 25 21 |ck%!4..p|.block%!|
|00002c20| 33 36 3d 2d 31 0d 17 7a | 13 62 6c 6f 63 6b 25 21 |36=-1..z|.block%!|
|00002c30| 34 30 3d 26 32 30 30 30 | 0d 17 84 16 24 28 62 6c |40=&2000|....$(bl|
|00002c40| 6f 63 6b 25 2b 34 34 29 | 3d 6c 65 61 66 24 0d 17 |ock%+44)|=leaf$..|
|00002c50| 8e 04 0d 17 98 37 c8 99 | 20 22 57 69 6d 70 5f 53 |.....7..| "Wimp_S|
|00002c60| 65 6e 64 4d 65 73 73 61 | 67 65 22 2c 31 38 2c 62 |endMessa|ge",18,b|
|00002c70| 6c 6f 63 6b 25 2c 62 6c | 6f 63 6b 25 21 32 30 2c |lock%,bl|ock%!20,|
|00002c80| 62 6c 6f 63 6b 25 21 32 | 34 0d 17 a2 05 cb 0d 17 |block%!2|4.......|
|00002c90| ac 05 e1 0d 17 b6 05 3a | 0d 17 c0 0e dd f2 73 61 |.......:|......sa|
|00002ca0| 76 65 64 6f 75 74 0d 17 | ca 08 ea 20 78 25 0d 17 |vedout..|... x%..|
|00002cb0| d4 04 0d 17 de 09 6f 6b | 25 3d b9 0d 17 e8 20 66 |......ok|%=.... f|
|00002cc0| 69 6c 65 6e 61 6d 65 24 | 3d a4 67 65 74 73 74 72 |ilename$|=.getstr|
|00002cd0| 28 62 6c 6f 63 6b 25 2b | 34 34 29 0d 17 f2 04 0d |(block%+|44).....|
|00002ce0| 17 fc 14 c8 8e 20 61 63 | 74 69 6f 6e 74 79 70 65 |..... ac|tiontype|
|00002cf0| 25 20 ca 0d 18 06 08 c9 | 20 35 3a 0d 18 10 1c e7 |% ......| 5:.....|
|00002d00| 20 a7 66 69 6c 65 6e 61 | 6d 65 24 2c 22 3c 57 69 | .filena|me$,"<Wi|
|00002d10| 6d 70 24 22 29 20 8c 0d | 18 1a 09 6f 6b 25 3d a3 |mp$") ..|...ok%=.|
|00002d20| 0d 18 24 05 cc 0d 18 2e | 1c 78 25 3d a4 63 68 65 |..$.....|.x%=.che|
|00002d30| 63 6b 66 69 6c 65 28 66 | 69 6c 65 6e 61 6d 65 24 |ckfile(f|ilename$|
|00002d40| 29 0d 18 38 04 0d 18 42 | 2b e7 20 78 25 3d 32 20 |)..8...B|+. x%=2 |
|00002d50| 80 20 66 69 6c 65 64 61 | 74 65 25 3e 6c 65 61 66 |. fileda|te%>leaf|
|00002d60| 64 61 74 65 25 20 80 20 | 6e 65 77 65 72 25 20 8c |date% . |newer% .|
|00002d70| 0d 18 4c 0e 21 74 62 6c | 6f 63 6b 25 3d 30 0d 18 |..L.!tbl|ock%=0..|
|00002d80| 56 64 24 28 74 62 6c 6f | 63 6b 25 2b 34 29 3d 22 |Vd$(tblo|ck%+4)="|
|00002d90| 54 68 69 73 20 64 69 72 | 65 63 74 6f 72 79 20 61 |This dir|ectory a|
|00002da0| 6c 72 65 61 64 79 20 65 | 78 69 73 74 73 2c 20 61 |lready e|xists, a|
|00002db0| 6e 64 20 69 73 20 6e 65 | 77 65 72 20 74 68 61 6e |nd is ne|wer than|
|00002dc0| 20 6d 79 20 66 69 6c 65 | 73 21 20 53 68 61 6c 6c | my file|s! Shall|
|00002dd0| 20 49 20 77 72 69 74 65 | 20 6f 76 65 72 20 69 74 | I write| over it|
|00002de0| 3f 22 0d 18 60 45 c8 99 | 20 22 57 69 6d 70 5f 52 |?"..`E..| "Wimp_R|
|00002df0| 65 70 6f 72 74 45 72 72 | 6f 72 22 2c 74 62 6c 6f |eportErr|or",tblo|
|00002e00| 63 6b 25 2c 25 31 30 30 | 31 31 2c 22 51 75 65 72 |ck%,%100|11,"Quer|
|00002e10| 79 20 66 72 6f 6d 20 53 | 65 74 75 70 22 20 b8 20 |y from S|etup" . |
|00002e20| 2c 63 6c 69 63 6b 25 0d | 18 6a 16 e7 20 63 6c 69 |,click%.|.j.. cli|
|00002e30| 63 6b 25 3d 32 20 8c 20 | 6f 6b 25 3d a3 0d 18 74 |ck%=2 . |ok%=...t|
|00002e40| 05 cd 0d 18 7e 04 0d 18 | 88 0c e7 20 78 25 3d 31 |....~...|... x%=1|
|00002e50| 20 8c 0d 18 92 09 6f 6b | 25 3d a3 0d 18 9c 0e 21 | .....ok|%=.....!|
|00002e60| 74 62 6c 6f 63 6b 25 3d | 30 0d 18 a6 5c 24 28 74 |tblock%=|0...\$(t|
|00002e70| 62 6c 6f 63 6b 25 2b 34 | 29 3d 22 54 68 69 73 20 |block%+4|)="This |
|00002e80| 61 6c 72 65 61 64 79 20 | 65 78 69 73 74 73 20 61 |already |exists a|
|00002e90| 73 20 61 20 66 69 6c 65 | 2e 20 54 6f 20 69 6e 73 |s a file|. To ins|
|00002ea0| 74 61 6c 6c 20 6f 76 65 | 72 20 69 74 2c 20 66 69 |tall ove|r it, fi|
|00002eb0| 72 73 74 20 64 65 6c 65 | 74 65 20 74 68 65 20 66 |rst dele|te the f|
|00002ec0| 69 6c 65 2e 22 0d 18 b0 | 47 c8 99 20 22 57 69 6d |ile."...|G.. "Wim|
|00002ed0| 70 5f 52 65 70 6f 72 74 | 45 72 72 6f 72 22 2c 74 |p_Report|Error",t|
|00002ee0| 62 6c 6f 63 6b 25 2c 25 | 31 30 30 30 31 2c 22 4d |block%,%|10001,"M|
|00002ef0| 65 73 73 61 67 65 20 66 | 72 6f 6d 20 53 65 74 75 |essage f|rom Setu|
|00002f00| 70 22 20 b8 20 2c 63 6c | 69 63 6b 25 0d 18 ba 05 |p" . ,cl|ick%....|
|00002f10| cd 0d 18 c4 04 0d 18 ce | 0b e7 20 6f 6b 25 20 8c |........|.. ok% .|
|00002f20| 0d 18 d8 1c 78 25 3d a4 | 63 68 65 63 6b 66 69 6c |....x%=.|checkfil|
|00002f30| 65 28 66 69 6c 65 6e 61 | 6d 65 24 29 0d 18 e2 1e |e(filena|me$)....|
|00002f40| e7 20 78 25 3d 30 20 ff | 20 22 43 44 49 52 20 22 |. x%=0 .| "CDIR "|
|00002f50| 2b 66 69 6c 65 6e 61 6d | 65 24 0d 18 ec 04 0d 18 |+filenam|e$......|
|00002f60| f6 25 f2 6e 65 77 74 65 | 78 74 28 61 63 74 69 6f |.%.newte|xt(actio|
|00002f70| 6e 77 69 6e 64 25 2c 30 | 2c 66 69 6c 65 6e 61 6d |nwind%,0|,filenam|
|00002f80| 65 24 29 0d 19 00 0e 77 | 61 69 74 69 6e 67 25 3d |e$)....w|aiting%=|
|00002f90| a3 0d 19 0a 1b f2 6f 70 | 65 6e 6c 61 72 67 65 28 |......op|enlarge(|
|00002fa0| 62 61 63 6b 68 61 6e 64 | 6c 65 25 29 0d 19 14 19 |backhand|le%)....|
|00002fb0| 69 6e 73 74 61 6c 6c 64 | 69 72 24 3d 66 69 6c 65 |installd|ir$=file|
|00002fc0| 6e 61 6d 65 24 0d 19 1e | 20 ff 20 22 53 45 54 20 |name$...| . "SET |
|00002fd0| 74 6d 70 24 64 69 72 20 | 22 2b 69 6e 73 74 61 6c |tmp$dir |"+instal|
|00002fe0| 6c 64 69 72 24 0d 19 28 | 04 0d 19 32 18 21 74 62 |ldir$..(|...2.!tb|
|00002ff0| 6c 6f 63 6b 25 3d 61 63 | 74 69 6f 6e 77 69 6e 64 |lock%=ac|tionwind|
|00003000| 25 0d 19 3c 23 c8 99 20 | 22 57 69 6d 70 5f 44 65 |%..<#.. |"Wimp_De|
|00003010| 6c 65 74 65 57 69 6e 64 | 6f 77 22 2c 2c 74 62 6c |leteWind|ow",,tbl|
|00003020| 6f 63 6b 25 0d 19 46 11 | 61 63 74 69 6f 6e 74 79 |ock%..F.|actionty|
|00003030| 70 65 25 3d 30 0d 19 50 | 11 61 63 74 69 6f 6e 77 |pe%=0..P|.actionw|
|00003040| 69 6e 64 25 3d 30 0d 19 | 5a 05 cd 0d 19 64 04 0d |ind%=0..|Z....d..|
|00003050| 19 6e 05 cd 0d 19 78 05 | cb 0d 19 82 04 0d 19 8c |.n....x.|........|
|00003060| 0b e7 20 6f 6b 25 20 8c | 0d 19 96 22 62 6c 6f 63 |.. ok% .|..."bloc|
|00003070| 6b 25 21 31 32 3d 62 6c | 6f 63 6b 25 21 38 3a 62 |k%!12=bl|ock%!8:b|
|00003080| 6c 6f 63 6b 25 21 31 36 | 3d 33 0d 19 a0 2e c8 99 |lock%!16|=3......|
|00003090| 20 22 57 69 6d 70 5f 53 | 65 6e 64 4d 65 73 73 61 | "Wimp_S|endMessa|
|000030a0| 67 65 22 2c 31 38 2c 62 | 6c 6f 63 6b 25 2c 62 6c |ge",18,b|lock%,bl|
|000030b0| 6f 63 6b 25 21 34 2c 30 | 0d 19 aa 1c c8 99 20 22 |ock%!4,0|...... "|
|000030c0| 57 69 6d 70 5f 43 72 65 | 61 74 65 4d 65 6e 75 22 |Wimp_Cre|ateMenu"|
|000030d0| 2c 2c 2d 31 0d 19 b4 05 | cd 0d 19 be 04 0d 19 c8 |,,-1....|........|
|000030e0| 39 e7 20 ac 20 77 61 69 | 74 69 6e 67 25 20 8c 20 |9. . wai|ting% . |
|000030f0| f2 6e 65 77 74 65 78 74 | 28 73 74 61 74 75 73 68 |.newtext|(statush|
|00003100| 61 6e 64 6c 65 25 2c 30 | 2c 22 57 6f 72 6b 69 6e |andle%,0|,"Workin|
|00003110| 67 2e 2e 2e 22 29 0d 19 | d2 05 e1 0d 19 dc 05 3a |g...")..|.......:|
|00003120| 0d 19 e6 1a dd f2 6f 70 | 65 6e 73 68 72 75 6e 6b |......op|enshrunk|
|00003130| 28 77 68 61 6e 64 6c 65 | 25 29 0d 19 f0 15 21 74 |(whandle|%)....!t|
|00003140| 62 6c 6f 63 6b 25 3d 77 | 68 61 6e 64 6c 65 25 0d |block%=w|handle%.|
|00003150| 19 fa 25 c8 99 20 22 57 | 69 6d 70 5f 47 65 74 57 |..%.. "W|imp_GetW|
|00003160| 69 6e 64 6f 77 53 74 61 | 74 65 22 2c 2c 74 62 6c |indowSta|te",,tbl|
|00003170| 6f 63 6b 25 0d 1a 04 12 | 74 62 6c 6f 63 6b 25 21 |ock%....|tblock%!|
|00003180| 38 2b 3d 31 32 38 0d 1a | 0e 21 c8 99 20 22 57 69 |8+=128..|.!.. "Wi|
|00003190| 6d 70 5f 4f 70 65 6e 57 | 69 6e 64 6f 77 22 2c 2c |mp_OpenW|indow",,|
|000031a0| 74 62 6c 6f 63 6b 25 0d | 1a 18 05 e1 0d 1a 22 05 |tblock%.|......".|
|000031b0| 3a 0d 1a 2c 19 dd f2 6f | 70 65 6e 6c 61 72 67 65 |:..,...o|penlarge|
|000031c0| 28 77 68 61 6e 64 6c 65 | 25 29 0d 1a 36 15 21 74 |(whandle|%)..6.!t|
|000031d0| 62 6c 6f 63 6b 25 3d 77 | 68 61 6e 64 6c 65 25 0d |block%=w|handle%.|
|000031e0| 1a 40 25 c8 99 20 22 57 | 69 6d 70 5f 47 65 74 57 |.@%.. "W|imp_GetW|
|000031f0| 69 6e 64 6f 77 53 74 61 | 74 65 22 2c 2c 74 62 6c |indowSta|te",,tbl|
|00003200| 6f 63 6b 25 0d 1a 4a 12 | 74 62 6c 6f 63 6b 25 21 |ock%..J.|tblock%!|
|00003210| 38 2d 3d 31 32 38 0d 1a | 54 21 c8 99 20 22 57 69 |8-=128..|T!.. "Wi|
|00003220| 6d 70 5f 4f 70 65 6e 57 | 69 6e 64 6f 77 22 2c 2c |mp_OpenW|indow",,|
|00003230| 74 62 6c 6f 63 6b 25 0d | 1a 5e 05 e1 0d 1a 68 05 |tblock%.|.^....h.|
|00003240| 3a 0d 1a 72 14 dd a4 63 | 68 65 63 6b 66 69 6c 65 |:..r...c|heckfile|
|00003250| 28 66 6e 24 29 0d 1a 7c | 1b ea 20 74 79 70 65 25 |(fn$)..||.. type%|
|00003260| 2c 6c 6f 61 64 25 2c 65 | 78 65 63 25 2c 66 64 25 |,load%,e|xec%,fd%|
|00003270| 0d 1a 86 10 66 69 6c 65 | 64 61 74 65 25 3d 2d 31 |....file|date%=-1|
|00003280| 0d 1a 90 2c c8 99 20 22 | 4f 53 5f 46 69 6c 65 22 |...,.. "|OS_File"|
|00003290| 2c 31 37 2c 66 6e 24 20 | b8 20 74 79 70 65 25 2c |,17,fn$ |. type%,|
|000032a0| 2c 6c 6f 61 64 25 2c 65 | 78 65 63 25 0d 1a 9a 16 |,load%,e|xec%....|
|000032b0| e7 20 74 79 70 65 25 3d | 30 20 8c 20 3d 74 79 70 |. type%=|0 . =typ|
|000032c0| 65 25 0d 1a a4 13 66 64 | 25 3d 6c 6f 61 64 25 20 |e%....fd|%=load% |
|000032d0| 80 20 32 35 35 0d 1a ae | 19 65 78 65 63 25 3d 65 |. 255...|.exec%=e|
|000032e0| 78 65 63 25 20 80 20 28 | ac 20 32 35 35 29 0d 1a |xec% . (|. 255)..|
|000032f0| b8 26 66 69 6c 65 64 61 | 74 65 25 3d 28 66 64 25 |.&fileda|te%=(fd%|
|00003300| 3c 3c 31 36 29 20 84 20 | 28 65 78 65 63 25 3e 3e |<<16) . |(exec%>>|
|00003310| 3e 31 36 29 0d 1a c2 0a | 3d 74 79 70 65 25 0d 1a |>16)....|=type%..|
|00003320| cc 05 3a 0d 1a d6 10 dd | f2 6f 70 65 6e 76 69 65 |..:.....|.openvie|
|00003330| 77 65 72 0d 1a e0 0e 77 | 61 69 74 69 6e 67 25 3d |wer....w|aiting%=|
|00003340| b9 0d 1a ea 12 61 63 74 | 69 6f 6e 74 79 70 65 25 |.....act|iontype%|
|00003350| 3d 2d 31 0d 1a f4 33 c8 | 99 20 22 57 69 6d 70 5f |=-1...3.|. "Wimp_|
|00003360| 43 72 65 61 74 65 57 69 | 6e 64 6f 77 22 2c 2c 77 |CreateWi|ndow",,w|
|00003370| 5f 76 69 65 77 65 72 25 | 20 b8 20 61 63 74 69 6f |_viewer%| . actio|
|00003380| 6e 77 69 6e 64 25 0d 1a | fe 04 0d 1b 08 25 4f 25 |nwind%..|.....%O%|
|00003390| 3d 8e 28 22 3c 53 65 74 | 75 70 24 44 69 72 3e 2e |=.("<Set|up$Dir>.|
|000033a0| 46 69 6c 65 73 2e 22 2b | 70 61 72 61 6d 24 29 0d |Files."+|param$).|
|000033b0| 1b 12 10 76 69 65 77 6c | 69 6e 65 73 25 3d 30 0d |...viewl|ines%=0.|
|000033c0| 1b 1c 05 f5 0d 1b 26 11 | 76 69 65 77 6c 69 6e 65 |......&.|viewline|
|000033d0| 73 25 2b 3d 31 0d 1b 30 | 1c 72 65 61 64 6d 65 24 |s%+=1..0|.readme$|
|000033e0| 28 76 69 65 77 6c 69 6e | 65 73 25 29 3d be 23 4f |(viewlin|es%)=.#O|
|000033f0| 25 0d 1b 3a 0a fd 20 c5 | 23 4f 25 0d 1b 44 08 d9 |%..:.. .|#O%..D..|
|00003400| 23 4f 25 0d 1b 4e 04 0d | 1b 58 0e 21 74 62 6c 6f |#O%..N..|.X.!tblo|
|00003410| 63 6b 25 3d 30 0d 1b 62 | 1e 74 62 6c 6f 63 6b 25 |ck%=0..b|.tblock%|
|00003420| 21 34 3d 2d 28 76 69 65 | 77 6c 69 6e 65 73 25 2a |!4=-(vie|wlines%*|
|00003430| 33 32 29 0d 1b 6c 12 74 | 62 6c 6f 63 6b 25 21 38 |32)..l.t|block%!8|
|00003440| 3d 31 32 33 32 0d 1b 76 | 10 74 62 6c 6f 63 6b 25 |=1232..v|.tblock%|
|00003450| 21 31 32 3d 30 0d 1b 80 | 2b c8 99 20 22 57 69 6d |!12=0...|+.. "Wim|
|00003460| 70 5f 53 65 74 45 78 74 | 65 6e 74 22 2c 61 63 74 |p_SetExt|ent",act|
|00003470| 69 6f 6e 77 69 6e 64 25 | 2c 74 62 6c 6f 63 6b 25 |ionwind%|,tblock%|
|00003480| 0d 1b 8a 04 0d 1b 94 1c | f2 6f 70 65 6e 77 69 6e |........|.openwin|
|00003490| 64 6f 77 28 61 63 74 69 | 6f 6e 77 69 6e 64 25 29 |dow(acti|onwind%)|
|000034a0| 0d 1b 9e 05 e1 0d 1b a8 | 05 3a 0d 1b b2 0c dd f2 |........|.:......|
|000034b0| 72 65 61 64 6d 65 0d 1b | bc 13 ea 20 78 25 2c 79 |readme..|... x%,y|
|000034c0| 25 2c 78 31 25 2c 78 32 | 25 0d 1b c6 04 0d 1b d0 |%,x1%,x2|%.......|
|000034d0| 14 78 31 25 3d 28 6d 69 | 6e 78 25 29 2f 31 36 2d |.x1%=(mi|nx%)/16-|
|000034e0| 31 0d 1b da 14 78 32 25 | 3d 28 6d 61 78 78 25 29 |1....x2%|=(maxx%)|
|000034f0| 2f 31 36 2b 31 0d 1b e4 | 11 e7 20 78 31 25 3c 31 |/16+1...|.. x1%<1|
|00003500| 20 78 31 25 3d 31 0d 1b | ee 13 e7 20 78 32 25 3e | x1%=1..|... x2%>|
|00003510| 38 30 20 78 32 25 3d 38 | 30 0d 1b f8 0c 78 32 25 |80 x2%=8|0....x2%|
|00003520| 2d 3d 78 31 25 0d 1c 02 | 04 0d 1c 0c 32 e3 20 79 |-=x1%...|....2. y|
|00003530| 25 3d 28 6d 69 6e 79 25 | 20 81 20 33 32 29 2a 33 |%=(miny%| . 32)*3|
|00003540| 32 2d 33 32 20 b8 20 28 | 6d 61 78 79 25 20 81 20 |2-32 . (|maxy% . |
|00003550| 33 32 29 2a 33 32 20 88 | 20 33 32 0d 1c 16 04 0d |32)*32 .| 32.....|
|00003560| 1c 20 17 ec 20 78 4f 25 | 2b 78 31 25 2a 31 36 2c |. .. xO%|+x1%*16,|
|00003570| 79 4f 25 2b 79 25 0d 1c | 2a 0f 78 25 3d 2d 28 79 |yO%+y%..|*.x%=-(y|
|00003580| 25 2f 33 32 29 0d 1c 34 | 31 e7 20 78 31 25 3c a9 |%/32)..4|1. x1%<.|
|00003590| 28 72 65 61 64 6d 65 24 | 28 78 25 29 29 20 f1 3b |(readme$|(x%)) .;|
|000035a0| c1 72 65 61 64 6d 65 24 | 28 78 25 29 2c 78 31 25 |.readme$|(x%),x1%|
|000035b0| 2c 78 32 25 29 3b 0d 1c | 3e 04 0d 1c 48 05 ed 0d |,x2%);..|>...H...|
|000035c0| 1c 52 05 e1 0d 1c 5c 05 | 3a 0d 1c 66 0e dd a4 74 |.R....\.|:..f...t|
|000035d0| 61 69 6c 28 6e 24 29 0d | 1c 70 08 ea 20 78 24 0d |ail(n$).|.p.. x$.|
|000035e0| 1c 7a 09 78 24 3d 22 22 | 0d 1c 84 0f c8 95 20 a7 |.z.x$=""|...... .|
|000035f0| 6e 24 2c 22 2e 22 29 0d | 1c 8e 15 78 24 2b 3d c0 |n$,".").|...x$+=.|
|00003600| 6e 24 2c a7 6e 24 2c 22 | 2e 22 29 29 0d 1c 98 16 |n$,.n$,"|."))....|
|00003610| 6e 24 3d c1 6e 24 2c a7 | 6e 24 2c 22 2e 22 29 2b |n$=.n$,.|n$,".")+|
|00003620| 31 29 0d 1c a2 05 ce 0d | 1c ac 0b 78 24 3d c0 78 |1)......|...x$=.x|
|00003630| 24 29 0d 1c b6 07 3d 78 | 24 0d 1c c0 05 3a 0d 1c |$)....=x|$....:..|
|00003640| ca 20 dd f2 63 6f 70 79 | 28 73 6f 75 72 63 65 24 |. ..copy|(source$|
|00003650| 2c 64 65 73 74 24 2c 6e | 65 77 65 72 25 29 0d 1c |,dest$,n|ewer%)..|
|00003660| d4 27 c8 99 20 22 4f 53 | 5f 47 53 54 72 61 6e 73 |.'.. "OS|_GSTrans|
|00003670| 22 2c 73 6f 75 72 63 65 | 24 2c 74 62 6c 6f 63 6b |",source|$,tblock|
|00003680| 25 2c 32 35 35 0d 1c de | 1c 73 6f 75 72 63 65 24 |%,255...|.source$|
|00003690| 3d a4 67 65 74 73 74 72 | 28 74 62 6c 6f 63 6b 25 |=.getstr|(tblock%|
|000036a0| 29 0d 1c e8 25 c8 99 20 | 22 4f 53 5f 47 53 54 72 |)...%.. |"OS_GSTr|
|000036b0| 61 6e 73 22 2c 64 65 73 | 74 24 2c 74 62 6c 6f 63 |ans",des|t$,tbloc|
|000036c0| 6b 25 2c 32 35 35 0d 1c | f2 1a 64 65 73 74 24 3d |k%,255..|..dest$=|
|000036d0| a4 67 65 74 73 74 72 28 | 74 62 6c 6f 63 6b 25 29 |.getstr(|tblock%)|
|000036e0| 0d 1c fc 04 0d 1d 06 2a | f2 6e 65 77 74 65 78 74 |.......*|.newtext|
|000036f0| 28 73 74 61 74 75 73 68 | 61 6e 64 6c 65 25 2c 30 |(statush|andle%,0|
|00003700| 2c 22 43 6f 70 79 69 6e | 67 2e 2e 2e 22 29 0d 1d |,"Copyin|g...")..|
|00003710| 10 15 64 69 72 24 3d a4 | 74 61 69 6c 28 64 65 73 |..dir$=.|tail(des|
|00003720| 74 24 29 0d 1d 1a 13 f2 | 63 68 65 63 6b 64 69 72 |t$).....|checkdir|
|00003730| 28 64 69 72 24 29 0d 1d | 24 19 f2 63 6f 70 79 31 |(dir$)..|$..copy1|
|00003740| 28 73 6f 75 72 63 65 24 | 2c 64 65 73 74 24 29 0d |(source$|,dest$).|
|00003750| 1d 2e 2a f2 6e 65 77 74 | 65 78 74 28 73 74 61 74 |..*.newt|ext(stat|
|00003760| 75 73 68 61 6e 64 6c 65 | 25 2c 30 2c 22 57 6f 72 |ushandle|%,0,"Wor|
|00003770| 6b 69 6e 67 2e 2e 2e 22 | 29 0d 1d 38 21 f2 6e 65 |king..."|)..8!.ne|
|00003780| 77 74 65 78 74 28 73 74 | 61 74 75 73 68 61 6e 64 |wtext(st|atushand|
|00003790| 6c 65 25 2c 31 2c 22 2d | 22 29 0d 1d 42 05 e1 0d |le%,1,"-|")..B...|
|000037a0| 1d 4c 05 3a 0d 1d 56 14 | dd f2 63 68 65 63 6b 64 |.L.:..V.|..checkd|
|000037b0| 69 72 28 64 69 72 24 29 | 0d 1d 60 0b ea 20 64 24 |ir(dir$)|..`.. d$|
|000037c0| 2c 6e 24 0d 1d 6a 04 0d | 1d 74 24 c8 99 20 22 4f |,n$..j..|.t$.. "O|
|000037d0| 53 5f 47 53 54 72 61 6e | 73 22 2c 64 69 72 24 2c |S_GSTran|s",dir$,|
|000037e0| 74 62 6c 6f 63 6b 25 2c | 32 35 35 0d 1d 7e 19 64 |tblock%,|255..~.d|
|000037f0| 69 72 24 3d a4 67 65 74 | 73 74 72 28 74 62 6c 6f |ir$=.get|str(tblo|
|00003800| 63 6b 25 29 0d 1d 88 04 | 0d 1d 92 20 c8 99 20 22 |ck%)....|... .. "|
|00003810| 4f 53 5f 46 69 6c 65 22 | 2c 31 37 2c 64 69 72 24 |OS_File"|,17,dir$|
|00003820| 20 b8 20 74 79 70 65 25 | 0d 1d 9c 4b e7 20 74 79 | . type%|...K. ty|
|00003830| 70 65 25 3d 31 20 8c 20 | 85 20 31 2c 22 55 6e 72 |pe%=1 . |. 1,"Unr|
|00003840| 65 63 6f 76 65 72 61 62 | 6c 65 20 65 72 72 6f 72 |ecoverab|le error|
|00003850| 3a 20 63 61 6e 6e 6f 74 | 20 63 6f 70 79 20 6f 76 |: cannot| copy ov|
|00003860| 65 72 20 66 69 6c 65 20 | 27 22 2b 64 69 72 24 2b |er file |'"+dir$+|
|00003870| 22 27 22 0d 1d a6 11 e7 | 20 74 79 70 65 25 3d 32 |"'".....| type%=2|
|00003880| 20 8c 20 e1 0d 1d b0 04 | 0d 1d ba 0b 6e 24 3d 64 | . .....|....n$=d|
|00003890| 69 72 24 0d 1d c4 09 64 | 24 3d 22 22 0d 1d ce 15 |ir$....d|$=""....|
|000038a0| 73 74 70 6f 73 25 3d a7 | 6e 24 2c 22 24 22 29 2b |stpos%=.|n$,"$")+|
|000038b0| 31 0d 1d d8 21 e7 20 73 | 74 70 6f 73 25 3c 3d 30 |1...!. s|tpos%<=0|
|000038c0| 20 8c 20 73 74 70 6f 73 | 25 3d a7 6e 24 2c 22 2e | . stpos|%=.n$,".|
|000038d0| 22 29 0d 1d e2 04 0d 1d | ec 14 64 24 3d c0 6e 24 |")......|..d$=.n$|
|000038e0| 2c 73 74 70 6f 73 25 2d | 31 29 0d 1d f6 14 6e 24 |,stpos%-|1)....n$|
|000038f0| 3d c1 6e 24 2c 73 74 70 | 6f 73 25 2b 31 29 0d 1e |=.n$,stp|os%+1)..|
|00003900| 00 05 f5 0d 1e 0a 04 0d | 1e 14 1e c8 99 20 22 4f |........|..... "O|
|00003910| 53 5f 46 69 6c 65 22 2c | 31 37 2c 64 24 20 b8 20 |S_File",|17,d$ . |
|00003920| 74 79 70 65 25 0d 1e 1e | 49 e7 20 74 79 70 65 25 |type%...|I. type%|
|00003930| 3d 31 20 8c 20 85 20 31 | 2c 22 55 6e 72 65 63 6f |=1 . . 1|,"Unreco|
|00003940| 76 65 72 61 62 6c 65 20 | 65 72 72 6f 72 3a 20 63 |verable |error: c|
|00003950| 61 6e 6e 6f 74 20 63 6f | 70 79 20 6f 76 65 72 20 |annot co|py over |
|00003960| 66 69 6c 65 20 27 22 2b | 64 24 2b 22 27 22 0d 1e |file '"+|d$+"'"..|
|00003970| 28 0f e7 20 74 79 70 65 | 25 3d 30 20 8c 0d 1e 32 |(.. type|%=0 ...2|
|00003980| 10 ff 20 22 43 44 49 52 | 20 22 2b 64 24 0d 1e 3c |.. "CDIR| "+d$..<|
|00003990| 05 cd 0d 1e 46 13 73 74 | 70 6f 73 25 3d a7 6e 24 |....F.st|pos%=.n$|
|000039a0| 2c 22 2e 22 29 0d 1e 50 | 1e e7 20 73 74 70 6f 73 |,".")..P|.. stpos|
|000039b0| 25 3c 3d 30 20 73 74 70 | 6f 73 25 3d a9 28 6e 24 |%<=0 stp|os%=.(n$|
|000039c0| 29 2b 31 0d 1e 5a 19 64 | 24 2b 3d 22 2e 22 2b c0 |)+1..Z.d|$+="."+.|
|000039d0| 6e 24 2c 73 74 70 6f 73 | 25 2d 31 29 0d 1e 64 14 |n$,stpos|%-1)..d.|
|000039e0| 6e 24 3d c1 6e 24 2c 73 | 74 70 6f 73 25 2b 31 29 |n$=.n$,s|tpos%+1)|
|000039f0| 0d 1e 6e 04 0d 1e 78 0b | fd 20 6e 24 3d 22 22 0d |..n...x.|. n$="".|
|00003a00| 1e 82 04 0d 1e 8c 1e c8 | 99 20 22 4f 53 5f 46 69 |........|. "OS_Fi|
|00003a10| 6c 65 22 2c 31 37 2c 64 | 24 20 b8 20 74 79 70 65 |le",17,d|$ . type|
|00003a20| 25 0d 1e 96 49 e7 20 74 | 79 70 65 25 3d 31 20 8c |%...I. t|ype%=1 .|
|00003a30| 20 85 20 31 2c 22 55 6e | 72 65 63 6f 76 65 72 61 | . 1,"Un|recovera|
|00003a40| 62 6c 65 20 65 72 72 6f | 72 3a 20 63 61 6e 6e 6f |ble erro|r: canno|
|00003a50| 74 20 63 6f 70 79 20 6f | 76 65 72 20 66 69 6c 65 |t copy o|ver file|
|00003a60| 20 27 22 2b 64 24 2b 22 | 27 22 0d 1e a0 0f e7 20 | '"+d$+"|'"..... |
|00003a70| 74 79 70 65 25 3d 30 20 | 8c 0d 1e aa 10 ff 20 22 |type%=0 |...... "|
|00003a80| 43 44 49 52 20 22 2b 64 | 24 0d 1e b4 05 cd 0d 1e |CDIR "+d|$.......|
|00003a90| be 04 0d 1e c8 05 e1 0d | 1e d2 05 3a 0d 1e dc 17 |........|...:....|
|00003aa0| dd f2 63 6f 70 79 31 28 | 73 72 63 24 2c 64 65 73 |..copy1(|src$,des|
|00003ab0| 74 24 29 0d 1e e6 0d ea | 20 70 6f 69 6e 74 65 72 |t$).....| pointer|
|00003ac0| 0d 1e f0 0d 70 6f 69 6e | 74 65 72 3d 30 0d 1e fa |....poin|ter=0...|
|00003ad0| 20 c8 99 20 22 4f 53 5f | 46 69 6c 65 22 2c 31 37 | .. "OS_|File",17|
|00003ae0| 2c 73 72 63 24 20 b8 20 | 74 79 70 65 25 0d 1f 04 |,src$ . |type%...|
|00003af0| 04 0d 1f 0e 0f e7 20 74 | 79 70 65 25 3d 31 20 8c |...... t|ype%=1 .|
|00003b00| 0d 1f 18 1f 6f 70 74 25 | 3d 28 31 3c 3c 31 34 29 |....opt%|=(1<<14)|
|00003b10| 2b 28 31 3c 3c 31 33 29 | 2b 28 31 3c 3c 31 29 0d |+(1<<13)|+(1<<1).|
|00003b20| 1f 22 04 0d 1f 2c 1a e7 | 20 6e 65 77 65 72 25 20 |."...,..| newer% |
|00003b30| 8c 20 6f 70 74 25 2b 3d | 31 3c 3c 31 32 0d 1f 36 |. opt%+=|1<<12..6|
|00003b40| 15 21 74 62 6c 6f 63 6b | 25 3d 73 63 72 61 74 63 |.!tblock|%=scratc|
|00003b50| 68 25 0d 1f 40 15 74 62 | 6c 6f 63 6b 25 21 34 3d |h%..@.tb|lock%!4=|
|00003b60| 73 63 73 69 7a 65 25 0d | 1f 4a 38 c8 99 20 22 4f |scsize%.|.J8.. "O|
|00003b70| 53 5f 46 53 43 6f 6e 74 | 72 6f 6c 22 2c 32 36 2c |S_FSCont|rol",26,|
|00003b80| 73 72 63 24 2c 64 65 73 | 74 24 2c 6f 70 74 25 2c |src$,des|t$,opt%,|
|00003b90| 34 2c 35 2c 36 2c 37 2c | 74 62 6c 6f 63 6b 25 0d |4,5,6,7,|tblock%.|
|00003ba0| 1f 54 05 e1 0d 1f 5e 05 | cd 0d 1f 68 04 0d 1f 72 |.T....^.|...h...r|
|00003bb0| 14 f2 63 68 65 63 6b 64 | 69 72 28 64 65 73 74 24 |..checkd|ir(dest$|
|00003bc0| 29 0d 1f 7c 04 0d 1f 86 | 05 f5 0d 1f 90 3e c8 99 |)..|....|.....>..|
|00003bd0| 20 22 4f 53 5f 47 42 50 | 42 22 2c 39 2c 73 72 63 | "OS_GBP|B",9,src|
|00003be0| 24 2c 74 62 6c 6f 63 6b | 25 2c 31 2c 70 6f 69 6e |$,tblock|%,1,poin|
|00003bf0| 74 65 72 2c 36 34 20 b8 | 20 2c 2c 2c 72 65 61 64 |ter,64 .| ,,,read|
|00003c00| 2c 70 6f 69 6e 74 65 72 | 0d 1f 9a 0e e7 20 72 65 |,pointer|..... re|
|00003c10| 61 64 3d 31 20 8c 0d 1f | a4 09 66 24 3d 22 22 0d |ad=1 ...|..f$="".|
|00003c20| 1f ae 08 69 25 3d 30 0d | 1f b8 17 66 24 3d a4 67 |...i%=0.|...f$=.g|
|00003c30| 65 74 73 74 72 28 74 62 | 6c 6f 63 6b 25 29 0d 1f |etstr(tb|lock%)..|
|00003c40| c2 19 f2 63 6f 70 79 32 | 28 66 24 2c 73 72 63 24 |...copy2|(f$,src$|
|00003c50| 2c 64 65 73 74 24 29 0d | 1f cc 05 cd 0d 1f d6 10 |,dest$).|........|
|00003c60| fd 20 70 6f 69 6e 74 65 | 72 3d 2d 31 0d 1f e0 05 |. pointe|r=-1....|
|00003c70| e1 0d 1f ea 05 3a 0d 1f | f4 1a dd f2 63 6f 70 79 |.....:..|....copy|
|00003c80| 32 28 66 24 2c 73 72 63 | 24 2c 64 65 73 74 24 29 |2(f$,src|$,dest$)|
|00003c90| 0d 1f fe 27 c8 99 20 22 | 4f 53 5f 46 69 6c 65 22 |...'.. "|OS_File"|
|00003ca0| 2c 31 37 2c 73 72 63 24 | 2b 22 2e 22 2b 66 24 20 |,17,src$|+"."+f$ |
|00003cb0| b8 20 74 79 70 65 25 0d | 20 08 2e f2 6e 65 77 74 |. type%.| ...newt|
|00003cc0| 65 78 74 28 73 74 61 74 | 75 73 68 61 6e 64 6c 65 |ext(stat|ushandle|
|00003cd0| 25 2c 31 2c c2 73 72 63 | 24 2b 22 2e 22 2b 66 24 |%,1,.src|$+"."+f$|
|00003ce0| 2c 32 35 29 29 0d 20 12 | 35 e7 20 74 79 70 65 25 |,25)). .|5. type%|
|00003cf0| 3d 30 20 8c 20 85 20 31 | 2c 22 53 74 72 61 6e 67 |=0 . . 1|,"Strang|
|00003d00| 65 20 65 72 72 6f 72 20 | 64 75 72 69 6e 67 20 63 |e error |during c|
|00003d10| 6f 70 79 69 6e 67 21 22 | 3a e0 0d 20 1c 0f e7 20 |opying!"|:.. ... |
|00003d20| 74 79 70 65 25 3d 31 20 | 8c 0d 20 26 04 0d 20 30 |type%=1 |.. &.. 0|
|00003d30| 1f 6f 70 74 25 3d 28 31 | 3c 3c 31 34 29 2b 28 31 |.opt%=(1|<<14)+(1|
|00003d40| 3c 3c 31 33 29 2b 28 31 | 3c 3c 31 29 0d 20 3a 04 |<<13)+(1|<<1). :.|
|00003d50| 0d 20 44 1a e7 20 6e 65 | 77 65 72 25 20 8c 20 6f |. D.. ne|wer% . o|
|00003d60| 70 74 25 2b 3d 31 3c 3c | 31 32 0d 20 4e 15 21 74 |pt%+=1<<|12. N.!t|
|00003d70| 62 6c 6f 63 6b 25 3d 73 | 63 72 61 74 63 68 25 0d |block%=s|cratch%.|
|00003d80| 20 58 15 74 62 6c 6f 63 | 6b 25 21 34 3d 73 63 73 | X.tbloc|k%!4=scs|
|00003d90| 69 7a 65 25 0d 20 62 46 | c8 99 20 22 4f 53 5f 46 |ize%. bF|.. "OS_F|
|00003da0| 53 43 6f 6e 74 72 6f 6c | 22 2c 32 36 2c 73 72 63 |SControl|",26,src|
|00003db0| 24 2b 22 2e 22 2b 66 24 | 2c 64 65 73 74 24 2b 22 |$+"."+f$|,dest$+"|
|00003dc0| 2e 22 2b 66 24 2c 6f 70 | 74 25 2c 34 2c 35 2c 36 |."+f$,op|t%,4,5,6|
|00003dd0| 2c 37 2c 74 62 6c 6f 63 | 6b 25 0d 20 6c 04 0d 20 |,7,tbloc|k%. l.. |
|00003de0| 76 05 cc 0d 20 80 1b f2 | 63 68 65 63 6b 64 69 72 |v... ...|checkdir|
|00003df0| 28 64 65 73 74 24 2b 22 | 2e 22 2b 66 24 29 0d 20 |(dest$+"|."+f$). |
|00003e00| 8a 24 f2 63 6f 70 79 31 | 28 73 72 63 24 2b 22 2e |.$.copy1|(src$+".|
|00003e10| 22 2b 66 24 2c 64 65 73 | 74 24 2b 22 2e 22 2b 66 |"+f$,des|t$+"."+f|
|00003e20| 24 29 0d 20 94 05 cd 0d | 20 9e 05 e1 0d 20 a8 05 |$). ....| .... ..|
|00003e30| 3a 0d 20 b2 0b dd f2 75 | 64 61 74 65 0d 20 bc 13 |:. ....u|date. ..|
|00003e40| 75 64 69 72 24 3d 63 6c | 69 6e 65 24 28 31 29 0d |udir$=cl|ine$(1).|
|00003e50| 20 c6 30 c8 99 20 22 57 | 69 6d 70 5f 43 72 65 61 | .0.. "W|imp_Crea|
|00003e60| 74 65 57 69 6e 64 6f 77 | 22 2c 2c 77 5f 75 70 64 |teWindow|",,w_upd|
|00003e70| 25 20 b8 20 61 63 74 69 | 6f 6e 77 69 6e 64 25 0d |% . acti|onwind%.|
|00003e80| 20 d0 04 0d 20 da 09 77 | 24 3d 22 22 0d 20 e4 13 | ... ..w|$="". ..|
|00003e90| e3 20 78 25 3d 32 20 b8 | 20 77 6f 72 64 73 25 0d |. x%=2 .| words%.|
|00003ea0| 20 ee 16 77 24 2b 3d 63 | 6c 69 6e 65 24 28 78 25 | ..w$+=c|line$(x%|
|00003eb0| 29 2b 22 20 22 0d 20 f8 | 05 ed 0d 21 02 1e f2 6e |)+" ". .|...!...n|
|00003ec0| 65 77 74 65 78 74 28 61 | 63 74 69 6f 6e 77 69 6e |ewtext(a|ctionwin|
|00003ed0| 64 25 2c 31 2c 77 24 29 | 0d 21 0c 11 77 24 3d a4 |d%,1,w$)|.!..w$=.|
|00003ee0| 73 74 72 69 70 28 77 24 | 29 0d 21 16 04 0d 21 20 |strip(w$|).!...! |
|00003ef0| 1c f2 6f 70 65 6e 77 69 | 6e 64 6f 77 28 61 63 74 |..openwi|ndow(act|
|00003f00| 69 6f 6e 77 69 6e 64 25 | 29 0d 21 2a 11 61 63 74 |ionwind%|).!*.act|
|00003f10| 69 6f 6e 74 79 70 65 25 | 3d 36 0d 21 34 0e 77 61 |iontype%|=6.!4.wa|
|00003f20| 69 74 69 6e 67 25 3d b9 | 0d 21 3e 1c f2 6f 70 65 |iting%=.|.!>..ope|
|00003f30| 6e 73 68 72 75 6e 6b 28 | 62 61 63 6b 68 61 6e 64 |nshrunk(|backhand|
|00003f40| 6c 65 25 29 0d 21 48 05 | e1 0d 21 52 05 3a 0d 21 |le%).!H.|..!R.:.!|
|00003f50| 5c 0e dd a4 6c 65 61 66 | 28 6e 24 29 0d 21 66 0f |\...leaf|(n$).!f.|
|00003f60| c8 95 20 a7 6e 24 2c 22 | 2e 22 29 0d 21 70 16 6e |.. .n$,"|.").!p.n|
|00003f70| 24 3d c1 6e 24 2c a7 6e | 24 2c 22 2e 22 29 2b 31 |$=.n$,.n|$,".")+1|
|00003f80| 29 0d 21 7a 05 ce 0d 21 | 84 07 3d 6e 24 0d 21 8e |).!z...!|..=n$.!.|
|00003f90| 05 3a 0d 21 98 0c dd f2 | 64 72 61 67 69 6e 0d 21 |.:.!....|dragin.!|
|00003fa0| a2 1f e7 20 61 63 74 69 | 6f 6e 74 79 70 65 25 3d |... acti|ontype%=|
|00003fb0| 35 20 8c 20 f2 73 61 76 | 65 64 6f 75 74 0d 21 ac |5 . .sav|edout.!.|
|00003fc0| 15 e7 20 61 63 74 69 6f | 6e 74 79 70 65 25 3d 36 |.. actio|ntype%=6|
|00003fd0| 20 8c 0d 21 b6 1a 66 6e | 24 3d a4 67 65 74 73 74 | ..!..fn|$=.getst|
|00003fe0| 72 28 62 6c 6f 63 6b 25 | 2b 34 34 29 0d 21 c0 2e |r(block%|+44).!..|
|00003ff0| e7 20 62 6c 6f 63 6b 25 | 21 34 30 3c 3e 26 32 30 |. block%|!40<>&20|
|00004000| 30 30 20 84 20 a4 6c 65 | 61 66 28 66 6e 24 29 3c |00 . .le|af(fn$)<|
|00004010| 3e 75 64 69 72 24 20 8c | 20 e1 0d 21 ca 04 0d 21 |>udir$ .| ..!...!|
|00004020| d4 29 75 64 24 3d 22 3c | 53 65 74 75 70 24 44 69 |.)ud$="<|Setup$Di|
|00004030| 72 3e 2e 46 69 6c 65 73 | 2e 53 79 73 74 65 6d 2e |r>.Files|.System.|
|00004040| 22 2b 75 64 69 72 24 0d | 21 de 04 0d 21 e8 35 6f |"+udir$.|!...!.5o|
|00004050| 70 74 25 3d 28 31 3c 3c | 31 34 29 2b 28 31 3c 3c |pt%=(1<<|14)+(1<<|
|00004060| 31 33 29 2b 28 31 3c 3c | 31 32 29 2b 28 31 3c 3c |13)+(1<<|12)+(1<<|
|00004070| 39 29 2b 28 31 3c 3c 31 | 29 2b 28 31 3c 3c 30 29 |9)+(1<<1|)+(1<<0)|
|00004080| 0d 21 f2 15 21 74 62 6c | 6f 63 6b 25 3d 73 63 72 |.!..!tbl|ock%=scr|
|00004090| 61 74 63 68 25 0d 21 fc | 15 74 62 6c 6f 63 6b 25 |atch%.!.|.tblock%|
|000040a0| 21 34 3d 73 63 73 69 7a | 65 25 0d 22 06 04 0d 22 |!4=scsiz|e%."..."|
|000040b0| 10 2b f2 6e 65 77 74 65 | 78 74 28 73 74 61 74 75 |.+.newte|xt(statu|
|000040c0| 73 68 61 6e 64 6c 65 25 | 2c 30 2c 22 55 70 64 61 |shandle%|,0,"Upda|
|000040d0| 74 69 6e 67 2e 2e 2e 22 | 29 0d 22 1a 31 c8 99 20 |ting..."|).".1.. |
|000040e0| 22 4f 53 5f 46 53 43 6f | 6e 74 72 6f 6c 22 2c 32 |"OS_FSCo|ntrol",2|
|000040f0| 36 2c 75 64 24 2c 66 6e | 24 2c 6f 70 74 25 2c 2c |6,ud$,fn|$,opt%,,|
|00004100| 2c 2c 2c 74 62 6c 6f 63 | 6b 25 0d 22 24 04 0d 22 |,,,tbloc|k%."$.."|
|00004110| 2e 18 21 74 62 6c 6f 63 | 6b 25 3d 61 63 74 69 6f |..!tbloc|k%=actio|
|00004120| 6e 77 69 6e 64 25 0d 22 | 38 23 c8 99 20 22 57 69 |nwind%."|8#.. "Wi|
|00004130| 6d 70 5f 44 65 6c 65 74 | 65 57 69 6e 64 6f 77 22 |mp_Delet|eWindow"|
|00004140| 2c 2c 74 62 6c 6f 63 6b | 25 0d 22 42 11 61 63 74 |,,tblock|%."B.act|
|00004150| 69 6f 6e 74 79 70 65 25 | 3d 30 0d 22 4c 04 0d 22 |iontype%|=0."L.."|
|00004160| 56 35 77 61 69 74 69 6e | 67 25 3d 30 3a f2 6e 65 |V5waitin|g%=0:.ne|
|00004170| 77 74 65 78 74 28 73 74 | 61 74 75 73 68 61 6e 64 |wtext(st|atushand|
|00004180| 6c 65 25 2c 30 2c 22 57 | 6f 72 6b 69 6e 67 2e 2e |le%,0,"W|orking..|
|00004190| 2e 22 29 0d 22 60 1b f2 | 6f 70 65 6e 6c 61 72 67 |.")."`..|openlarg|
|000041a0| 65 28 62 61 63 6b 68 61 | 6e 64 6c 65 25 29 0d 22 |e(backha|ndle%)."|
|000041b0| 6a 04 0d 22 74 05 cd 0d | 22 7e 04 0d 22 88 15 e7 |j.."t...|"~.."...|
|000041c0| 20 61 63 74 69 6f 6e 74 | 79 70 65 25 3d 37 20 8c | actiont|ype%=7 .|
|000041d0| 0d 22 92 2d e7 20 62 6c | 6f 63 6b 25 21 34 30 3c |.".-. bl|ock%!40<|
|000041e0| 3e 26 32 30 30 30 20 80 | 20 62 6c 6f 63 6b 25 21 |>&2000 .| block%!|
|000041f0| 34 30 3c 3e 26 31 30 30 | 30 20 8c 20 e1 0d 22 9c |40<>&100|0 . ..".|
|00004200| 29 ff 20 22 53 45 54 20 | 53 65 74 75 70 24 44 69 |). "SET |Setup$Di|
|00004210| 72 20 22 2b a4 67 65 74 | 73 74 72 28 62 6c 6f 63 |r "+.get|str(bloc|
|00004220| 6b 25 2b 34 34 29 0d 22 | a6 04 0d 22 b0 2a c8 99 |k%+44)."|...".*..|
|00004230| 20 22 58 4f 53 5f 46 69 | 6c 65 22 2c 31 37 2c 73 | "XOS_Fi|le",17,s|
|00004240| 77 61 70 66 69 6c 65 24 | 20 b8 20 74 79 70 65 25 |wapfile$| . type%|
|00004250| 3b 73 73 25 0d 22 ba 17 | e7 20 28 73 73 25 20 80 |;ss%."..|. (ss% .|
|00004260| 20 31 29 20 74 79 70 65 | 25 3d 30 0d 22 c4 04 0d | 1) type|%=0."...|
|00004270| 22 ce 10 e7 20 74 79 70 | 65 25 3c 3e 30 20 8c 0d |"... typ|e%<>0 ..|
|00004280| 22 d8 17 21 62 6c 6f 63 | 6b 25 3d 61 63 74 69 6f |"..!bloc|k%=actio|
|00004290| 6e 77 69 6e 64 25 0d 22 | e2 22 c8 99 20 22 57 69 |nwind%."|.".. "Wi|
|000042a0| 6d 70 5f 44 65 6c 65 74 | 65 57 69 6e 64 6f 77 22 |mp_Delet|eWindow"|
|000042b0| 2c 2c 62 6c 6f 63 6b 25 | 0d 22 ec 11 61 63 74 69 |,,block%|."..acti|
|000042c0| 6f 6e 77 69 6e 64 25 3d | 30 0d 22 f6 11 61 63 74 |onwind%=|0."..act|
|000042d0| 69 6f 6e 74 79 70 65 25 | 3d 30 0d 23 00 0e 77 61 |iontype%|=0.#..wa|
|000042e0| 69 74 69 6e 67 25 3d a3 | 0d 23 0a 04 0d 23 14 1b |iting%=.|.#...#..|
|000042f0| f2 6f 70 65 6e 6c 61 72 | 67 65 28 62 61 63 6b 68 |.openlar|ge(backh|
|00004300| 61 6e 64 6c 65 25 29 0d | 23 1e 05 cc 0d 23 28 1f |andle%).|#....#(.|
|00004310| ff 20 22 53 45 54 20 53 | 65 74 75 70 24 44 69 72 |. "SET S|etup$Dir|
|00004320| 20 41 44 46 53 3a 3a 30 | 2e 24 22 0d 23 32 07 ef | ADFS::0|.$".#2..|
|00004330| 20 37 0d 23 3c 05 cd 0d | 23 46 04 0d 23 50 05 cd | 7.#<...|#F..#P..|
|00004340| 0d 23 5a 05 e1 0d 23 64 | 05 3a 0d 23 6e 0e dd f2 |.#Z...#d|.:.#n...|
|00004350| 73 77 61 70 64 69 73 63 | 0d 23 78 2c 73 77 61 70 |swapdisc|.#x,swap|
|00004360| 66 69 6c 65 24 3d 22 3c | 53 65 74 75 70 24 44 69 |file$="<|Setup$Di|
|00004370| 72 3e 2e 46 69 6c 65 73 | 2e 22 2b 63 6c 69 6e 65 |r>.Files|."+cline|
|00004380| 24 28 31 29 0d 23 82 25 | c8 99 20 22 4f 53 5f 46 |$(1).#.%|.. "OS_F|
|00004390| 69 6c 65 22 2c 31 37 2c | 73 77 61 70 66 69 6c 65 |ile",17,|swapfile|
|000043a0| 24 20 b8 20 74 79 70 65 | 25 0d 23 8c 04 0d 23 96 |$ . type|%.#...#.|
|000043b0| 0f e7 20 74 79 70 65 25 | 3d 30 20 8c 0d 23 a0 09 |.. type%|=0 ..#..|
|000043c0| 77 24 3d 22 22 0d 23 aa | 13 e3 20 78 25 3d 32 20 |w$="".#.|.. x%=2 |
|000043d0| b8 20 77 6f 72 64 73 25 | 0d 23 b4 16 77 24 2b 3d |. words%|.#..w$+=|
|000043e0| 63 6c 69 6e 65 24 28 78 | 25 29 2b 22 20 22 0d 23 |cline$(x|%)+" ".#|
|000043f0| be 05 ed 0d 23 c8 11 77 | 24 3d a4 73 74 72 69 70 |....#..w|$=.strip|
|00004400| 28 77 24 29 0d 23 d2 04 | 0d 23 dc 30 c8 99 20 22 |(w$).#..|.#.0.. "|
|00004410| 57 69 6d 70 5f 43 72 65 | 61 74 65 57 69 6e 64 6f |Wimp_Cre|ateWindo|
|00004420| 77 22 2c 2c 77 5f 6d 73 | 67 25 20 b8 20 61 63 74 |w",,w_ms|g% . act|
|00004430| 69 6f 6e 77 69 6e 64 25 | 0d 23 e6 1c f2 6f 70 65 |ionwind%|.#...ope|
|00004440| 6e 77 69 6e 64 6f 77 28 | 61 63 74 69 6f 6e 77 69 |nwindow(|actionwi|
|00004450| 6e 64 25 29 0d 23 f0 1e | f2 6e 65 77 74 65 78 74 |nd%).#..|.newtext|
|00004460| 28 61 63 74 69 6f 6e 77 | 69 6e 64 25 2c 30 2c 77 |(actionw|ind%,0,w|
|00004470| 24 29 0d 23 fa 1c 61 63 | 74 69 6f 6e 74 79 70 65 |$).#..ac|tiontype|
|00004480| 25 3d 37 3a 77 61 69 74 | 69 6e 67 25 3d b9 0d 24 |%=7:wait|ing%=..$|
|00004490| 04 04 0d 24 0e 1f ff 20 | 22 53 45 54 20 53 65 74 |...$... |"SET Set|
|000044a0| 75 70 24 44 69 72 20 41 | 44 46 53 3a 3a 30 2e 24 |up$Dir A|DFS::0.$|
|000044b0| 22 0d 24 18 1c f2 6f 70 | 65 6e 73 68 72 75 6e 6b |".$...op|enshrunk|
|000044c0| 28 62 61 63 6b 68 61 6e | 64 6c 65 25 29 0d 24 22 |(backhan|dle%).$"|
|000044d0| 05 cd 0d 24 2c 05 e1 0d | 24 36 05 3a 0d 24 40 11 |...$,...|$6.:.$@.|
|000044e0| dd f2 64 65 6c 65 74 65 | 28 66 6e 24 29 0d 24 4a |..delete|(fn$).$J|
|000044f0| 10 e7 20 66 6e 24 3d 22 | 22 20 8c 20 e1 0d 24 54 |.. fn$="|" . ..$T|
|00004500| 2b c8 99 20 22 4f 53 5f | 46 53 43 6f 6e 74 72 6f |+.. "OS_|FSContro|
|00004510| 6c 22 2c 32 37 2c 66 6e | 24 2c 2c 28 31 3c 3c 30 |l",27,fn|$,,(1<<0|
|00004520| 29 2b 28 31 3c 3c 31 29 | 0d 24 5e 05 e1 0d 24 68 |)+(1<<1)|.$^...$h|
|00004530| 05 3a 0d 24 72 16 dd f2 | 63 6f 6d 70 61 72 65 28 |.:.$r...|compare(|
|00004540| 66 31 24 2c 66 32 24 29 | 0d 24 7c 15 ea 20 6c 65 |f1$,f2$)|.$|.. le|
|00004550| 61 66 64 61 74 65 25 2c | 78 25 2c 79 25 0d 24 86 |afdate%,|x%,y%.$.|
|00004560| 2a 78 25 3d a4 63 68 65 | 63 6b 66 69 6c 65 28 66 |*x%=.che|ckfile(f|
|00004570| 31 24 29 3a 6c 65 61 66 | 64 61 74 65 25 3d 66 69 |1$):leaf|date%=fi|
|00004580| 6c 65 64 61 74 65 25 0d | 24 90 16 79 25 3d a4 63 |ledate%.|$..y%=.c|
|00004590| 68 65 63 6b 66 69 6c 65 | 28 66 32 24 29 0d 24 9a |heckfile|(f2$).$.|
|000045a0| 04 0d 24 a4 1b e7 20 66 | 69 6c 65 64 61 74 65 25 |..$... f|iledate%|
|000045b0| 3e 6c 65 61 66 64 61 74 | 65 25 20 8c 0d 24 ae 0e |>leafdat|e% ..$..|
|000045c0| 21 74 62 6c 6f 63 6b 25 | 3d 30 0d 24 b8 04 0d 24 |!tblock%|=0.$...$|
|000045d0| c2 09 77 24 3d 22 22 0d | 24 cc 13 e3 20 78 25 3d |..w$="".|$... x%=|
|000045e0| 33 20 b8 20 77 6f 72 64 | 73 25 0d 24 d6 16 77 24 |3 . word|s%.$..w$|
|000045f0| 2b 3d 63 6c 69 6e 65 24 | 28 78 25 29 2b 22 20 22 |+=cline$|(x%)+" "|
|00004600| 0d 24 e0 05 ed 0d 24 ea | 11 77 24 3d a4 73 74 72 |.$....$.|.w$=.str|
|00004610| 69 70 28 77 24 29 0d 24 | f4 04 0d 24 fe 13 24 28 |ip(w$).$|...$..$(|
|00004620| 74 62 6c 6f 63 6b 25 2b | 34 29 3d 77 24 0d 25 08 |tblock%+|4)=w$.%.|
|00004630| 45 c8 99 20 22 57 69 6d | 70 5f 52 65 70 6f 72 74 |E.. "Wim|p_Report|
|00004640| 45 72 72 6f 72 22 2c 74 | 62 6c 6f 63 6b 25 2c 25 |Error",t|block%,%|
|00004650| 31 30 30 31 31 2c 22 51 | 75 65 72 79 20 66 72 6f |10011,"Q|uery fro|
|00004660| 6d 20 53 65 74 75 70 22 | 20 b8 20 2c 63 6c 69 63 |m Setup"| . ,clic|
|00004670| 6b 25 0d 25 12 18 e7 20 | 63 6c 69 63 6b 25 3d 32 |k%.%... |click%=2|
|00004680| 20 8c 20 71 75 69 74 25 | 3d b9 0d 25 1c 05 cd 0d | . quit%|=..%....|
|00004690| 25 26 04 0d 25 30 05 e1 | 0d ff |%&..%0..|.. |
+--------+-------------------------+-------------------------+--------+--------+