/ The Datafile PD-CD 2 / DATAFILE_PDCD2.iso / utilities2 / _filecheck / !FileCheck / !RunImage

< prev

next >

view JSON data

view as text

open on a Mac

open on a PC

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 01 0c f4 3e 3c 46 | 69 6c 65 3e 0d 00 02 46 |.....><F|ile>...F|
|00000010| f4 20 46 69 6c 65 20 43 | 68 65 63 6b 20 2d 20 46 |. File C|heck - F|
|00000020| 69 6c 65 20 63 6f 72 72 | 75 70 74 69 6f 6e 20 64 |ile corr|uption d|
|00000030| 65 74 65 63 74 6f 72 20 | 28 4e 6f 72 74 6f 6e 20 |etector |(Norton |
|00000040| 46 43 20 66 6f 72 20 74 | 68 65 20 41 72 63 68 69 |FC for t|he Archi|
|00000050| 65 29 0d 00 03 3d f4 20 | 57 72 69 74 74 65 6e 20 |e)...=. |Written |
|00000060| 42 79 20 4a 61 6d 65 73 | 20 48 75 6e 74 65 72 20 |By James| Hunter |
|00000070| 2d 20 46 69 72 73 74 20 | 56 65 72 73 69 6f 6e 20 |- First |Version |
|00000080| 32 31 73 74 20 4d 61 72 | 63 68 20 31 39 39 33 0d |21st Mar|ch 1993.|
|00000090| 00 04 05 f4 0d 00 05 12 | ee 85 f1 f6 24 22 20 40 |........|....$" @|
|000000a0| 20 22 3b 9e 3a e0 0d 00 | 06 21 76 65 72 73 69 6f | ";.:...|.!versio|
|000000b0| 6e 24 3d 22 31 2e 35 30 | 20 28 31 34 20 41 70 72 |n$="1.50| (14 Apr|
|000000c0| 20 31 39 39 33 29 22 0d | 00 07 0d de 20 71 25 20 | 1993)".|.... q% |
|000000d0| 32 35 30 30 0d 00 08 0e | 24 71 25 3d 22 54 41 53 |2500....|$q%="TAS|
|000000e0| 4b 22 0d 00 09 35 c8 99 | 20 22 57 69 6d 70 5f 49 |K"...5..| "Wimp_I|
|000000f0| 6e 69 74 69 61 6c 69 73 | 65 22 2c 32 30 30 2c 21 |nitialis|e",200,!|
|00000100| 71 25 2c 22 46 69 6c 65 | 43 68 65 63 6b 22 20 b8 |q%,"File|Check" .|
|00000110| 20 2c 74 61 73 6b 25 0d | 00 0a 2a c8 99 20 22 57 | ,task%.|..*.. "W|
|00000120| 69 6d 70 45 78 74 5f 49 | 6e 69 74 69 61 6c 69 73 |impExt_I|nitialis|
|00000130| 65 22 2c 35 2c 74 61 73 | 6b 25 2c 25 31 30 30 30 |e",5,tas|k%,%1000|
|00000140| 30 0d 00 0b 15 c8 99 20 | 22 48 6f 75 72 67 6c 61 |0...... |"Hourgla|
|00000150| 73 73 5f 4f 6e 22 0d 00 | 0c 04 0d 00 0d 3d f4 20 |ss_On"..|.....=. |
|00000160| 2d 20 2d 20 2d 20 2d 20 | 2d 20 4c 6f 61 64 20 73 |- - - - |- Load s|
|00000170| 70 72 69 74 65 73 2f 50 | 75 74 20 73 70 72 69 74 |prites/P|ut sprit|
|00000180| 65 20 6f 6e 20 69 63 6f | 6e 20 62 61 72 20 2d 20 |e on ico|n bar - |
|00000190| 2d 20 2d 20 2d 20 2d 0d | 00 0e 04 0d 00 0f 33 53 |- - - -.|......3S|
|000001a0| 25 3d 8e 20 22 3c 46 69 | 6c 65 43 68 65 63 6b 24 |%=. "<Fi|leCheck$|
|000001b0| 44 69 72 3e 2e 53 70 72 | 69 74 65 73 22 3a 54 25 |Dir>.Spr|ites":T%|
|000001c0| 3d a2 23 53 25 2b 31 36 | 3a d9 20 23 53 25 0d 00 |=.#S%+16|:. #S%..|
|000001d0| 10 19 de 20 73 70 20 54 | 25 3a 21 73 70 3d 54 25 |... sp T|%:!sp=T%|
|000001e0| 3a 73 70 21 34 3d 30 0d | 00 11 14 73 70 21 38 3d |:sp!4=0.|...sp!8=|
|000001f0| 31 36 3a 73 70 21 31 32 | 3d 31 36 0d 00 12 1c c8 |16:sp!12|=16.....|
|00000200| 99 20 22 4f 53 5f 53 70 | 72 69 74 65 4f 70 22 2c |. "OS_Sp|riteOp",|
|00000210| 26 32 30 39 2c 73 70 0d | 00 13 36 c8 99 20 22 4f |&209,sp.|..6.. "O|
|00000220| 53 5f 53 70 72 69 74 65 | 4f 70 22 2c 26 32 30 41 |S_Sprite|Op",&20A|
|00000230| 2c 73 70 2c 22 3c 46 69 | 6c 65 43 68 65 63 6b 24 |,sp,"<Fi|leCheck$|
|00000240| 44 69 72 3e 2e 53 70 72 | 69 74 65 73 22 0d 00 14 |Dir>.Spr|ites"...|
|00000250| 04 0d 00 15 4b f4 20 2d | 20 2d 20 2d 20 2d 20 2d |....K. -| - - - -|
|00000260| 20 49 6e 69 74 69 61 6c | 69 73 65 20 56 61 72 69 | Initial|ise Vari|
|00000270| 61 62 6c 65 73 2f 53 74 | 6f 72 61 67 65 2f 41 72 |ables/St|orage/Ar|
|00000280| 72 61 79 73 20 61 6c 77 | 61 79 73 20 6e 65 65 64 |rays alw|ays need|
|00000290| 65 64 20 2d 20 2d 20 2d | 20 2d 20 2d 0d 00 16 04 |ed - - -| - -....|
|000002a0| 0d 00 17 3c 63 6c 61 69 | 6d 71 75 65 72 79 24 3d |...<clai|mquery$=|
|000002b0| 22 22 3a 63 6c 61 69 6d | 6d 65 6e 75 24 20 3d 22 |"":claim|menu$ ="|
|000002c0| 22 3a 63 6c 61 69 6d 64 | 72 61 67 24 20 3d 22 22 |":claimd|rag$ =""|
|000002d0| 3a 63 6c 6f 73 65 64 6f | 77 6e 3d a3 0d 00 18 45 |:closedo|wn=....E|
|000002e0| de 20 74 65 78 74 24 28 | 35 30 29 2c 73 65 74 74 |. text$(|50),sett|
|000002f0| 69 6e 67 28 35 30 29 2c | 66 6c 61 67 73 28 35 30 |ing(50),|flags(50|
|00000300| 29 2c 73 75 62 6d 65 6e | 75 28 35 30 29 2c 72 65 |),submen|u(50),re|
|00000310| 66 28 35 30 29 2c 6d 65 | 6e 75 70 6f 73 28 32 30 |f(50),me|nupos(20|
|00000320| 29 0d 00 19 1e de 20 6d | 65 6e 75 25 20 35 31 32 |)..... m|enu% 512|
|00000330| 2c 69 6e 64 69 72 65 63 | 74 25 20 26 35 38 30 0d |,indirec|t% &580.|
|00000340| 00 1a 24 69 70 74 72 25 | 3d 69 6e 64 69 72 65 63 |..$iptr%|=indirec|
|00000350| 74 25 3a 69 65 6e 64 25 | 3d 69 70 74 72 25 2b 26 |t%:iend%|=iptr%+&|
|00000360| 35 38 30 0d 00 1b 04 0d | 00 1c 46 f4 20 2d 20 2d |580.....|..F. - -|
|00000370| 20 2d 20 2d 20 2d 20 49 | 6e 69 74 69 61 6c 69 73 | - - - I|nitialis|
|00000380| 65 20 61 70 70 6c 69 63 | 61 74 69 6f 6e 20 75 6e |e applic|ation un|
|00000390| 69 71 75 65 20 56 61 72 | 69 61 62 6c 65 73 20 65 |ique Var|iables e|
|000003a0| 74 63 2e 20 2d 20 2d 20 | 2d 20 2d 20 2d 0d 00 1d |tc. - - |- - -...|
|000003b0| 04 0d 00 1e 0b 53 4a 50 | 44 25 3d a3 0d 00 1f 1d |.....SJP|D%=.....|
|000003c0| de 20 6d 73 67 62 6c 6b | 25 20 32 35 36 2c 20 46 |. msgblk|% 256, F|
|000003d0| 44 61 74 25 20 34 30 39 | 36 0d 00 20 25 73 63 61 |Dat% 409|6.. %sca|
|000003e0| 6e 6e 69 6e 67 25 3d a3 | 3a 61 72 63 68 69 76 65 |nning%=.|:archive|
|000003f0| 25 3d a3 3a 73 70 61 72 | 6b 66 73 25 3d a3 0d 00 |%=.:spar|kfs%=...|
|00000400| 21 19 de 20 62 75 66 66 | 65 72 61 72 65 61 25 20 |!.. buff|erarea% |
|00000410| 31 36 2a 31 30 32 34 0d | 00 22 04 0d 00 23 43 f4 |16*1024.|."...#C.|
|00000420| 20 2d 20 2d 20 2d 20 2d | 20 2d 20 4c 6f 61 64 20 | - - - -| - Load |
|00000430| 74 65 6d 70 6c 61 74 65 | 20 66 69 6c 65 73 20 28 |template| files (|
|00000440| 75 73 69 6e 67 20 53 69 | 64 27 73 20 6d 65 74 68 |using Si|d's meth|
|00000450| 6f 64 21 29 20 2d 20 2d | 20 2d 20 2d 20 2d 0d 00 |od!) - -| - - -..|
|00000460| 24 04 0d 00 25 37 c8 99 | 20 22 57 69 6d 70 5f 4f |$...%7..| "Wimp_O|
|00000470| 70 65 6e 54 65 6d 70 6c | 61 74 65 22 2c 2c 22 3c |penTempl|ate",,"<|
|00000480| 46 69 6c 65 43 68 65 63 | 6b 24 44 69 72 3e 2e 54 |FileChec|k$Dir>.T|
|00000490| 65 6d 70 6c 61 74 65 73 | 22 0d 00 26 21 6d 61 69 |emplates|"..&!mai|
|000004a0| 6e 25 3d a4 6c 6f 61 64 | 74 65 6d 70 6c 61 74 65 |n%=.load|template|
|000004b0| 28 22 6d 61 69 6e 22 2c | b9 29 0d 00 27 27 63 6f |("main",|.)..''co|
|000004c0| 6e 74 72 6f 6c 25 3d a4 | 6c 6f 61 64 74 65 6d 70 |ntrol%=.|loadtemp|
|000004d0| 6c 61 74 65 28 22 63 6f | 6e 74 72 6f 6c 22 2c b9 |late("co|ntrol",.|
|000004e0| 29 0d 00 28 24 69 6e 66 | 6f 25 3d a4 6c 6f 61 64 |)..($inf|o%=.load|
|000004f0| 74 65 6d 70 6c 61 74 65 | 28 22 49 6e 66 6f 42 6f |template|("InfoBo|
|00000500| 78 22 2c 30 29 0d 00 29 | 29 4f 6e 53 4a 50 44 25 |x",0)..)|)OnSJPD%|
|00000510| 3d a4 6c 6f 61 64 74 65 | 6d 70 6c 61 74 65 28 22 |=.loadte|mplate("|
|00000520| 49 6e 66 6f 4f 6e 53 4a | 50 44 22 2c 30 29 0d 00 |InfoOnSJ|PD",0)..|
|00000530| 2a 1b c8 99 20 22 57 69 | 6d 70 5f 43 6c 6f 73 65 |*... "Wi|mp_Close|
|00000540| 54 65 6d 70 6c 61 74 65 | 22 0d 00 2b 04 0d 00 2c |Template|"..+...,|
|00000550| 3c f4 20 2d 20 2d 20 2d | 20 2d 20 2d 20 50 75 74 |<. - - -| - - Put|
|00000560| 20 64 61 74 61 20 69 6e | 74 6f 20 69 63 6f 6e 73 | data in|to icons|
|00000570| 20 28 65 67 2e 20 49 6e | 66 6f 20 42 6f 78 29 20 | (eg. In|fo Box) |
|00000580| 2d 20 2d 20 2d 20 2d 20 | 2d 0d 00 2d 04 0d 00 2e |- - - - |-..-....|
|00000590| 28 f2 69 63 6f 6e 5f 70 | 75 74 64 61 74 61 28 71 |(.icon_p|utdata(q|
|000005a0| 25 2c 69 6e 66 6f 25 2c | 34 2c 76 65 72 73 69 6f |%,info%,|4,versio|
|000005b0| 6e 24 2c 30 29 0d 00 2f | 36 f2 69 63 6f 6e 5f 70 |n$,0)../|6.icon_p|
|000005c0| 75 74 64 61 74 61 28 71 | 25 2c 6d 61 69 6e 25 2c |utdata(q|%,main%,|
|000005d0| 38 2c 22 57 65 6c 63 6f | 6d 65 20 74 6f 20 46 69 |8,"Welco|me to Fi|
|000005e0| 6c 65 43 68 65 63 6b 22 | 2c 30 29 0d 00 30 23 f2 |leCheck"|,0)..0#.|
|000005f0| 69 63 6f 6e 5f 70 75 74 | 64 61 74 61 28 71 25 2c |icon_put|data(q%,|
|00000600| 6d 61 69 6e 25 2c 39 2c | 22 30 22 2c 30 29 0d 00 |main%,9,|"0",0)..|
|00000610| 31 24 f2 69 63 6f 6e 5f | 70 75 74 64 61 74 61 28 |1$.icon_|putdata(|
|00000620| 71 25 2c 6d 61 69 6e 25 | 2c 31 32 2c 22 30 22 2c |q%,main%|,12,"0",|
|00000630| 30 29 0d 00 32 24 f2 69 | 63 6f 6e 5f 70 75 74 64 |0)..2$.i|con_putd|
|00000640| 61 74 61 28 71 25 2c 6d | 61 69 6e 25 2c 31 33 2c |ata(q%,m|ain%,13,|
|00000650| 22 30 22 2c 30 29 0d 00 | 33 2a c8 99 20 22 57 69 |"0",0)..|3*.. "Wi|
|00000660| 6d 70 45 78 74 5f 47 65 | 74 49 63 6f 6e 22 2c 2c |mpExt_Ge|tIcon",,|
|00000670| 2c 63 6f 6e 74 72 6f 6c | 25 2c 32 20 b8 20 61 25 |,control|%,2 . a%|
|00000680| 0d 00 34 2a c8 99 20 22 | 57 69 6d 70 45 78 74 5f |..4*.. "|WimpExt_|
|00000690| 47 65 74 49 63 6f 6e 22 | 2c 2c 2c 63 6f 6e 74 72 |GetIcon"|,,,contr|
|000006a0| 6f 6c 25 2c 36 20 b8 20 | 62 25 0d 00 35 2a c8 99 |ol%,6 . |b%..5*..|
|000006b0| 20 22 57 69 6d 70 45 78 | 74 5f 47 65 74 49 63 6f | "WimpEx|t_GetIco|
|000006c0| 6e 22 2c 2c 2c 63 6f 6e | 74 72 6f 6c 25 2c 37 20 |n",,,con|trol%,7 |
|000006d0| b8 20 63 25 0d 00 36 2a | c8 99 20 22 57 69 6d 70 |. c%..6*|.. "Wimp|
|000006e0| 45 78 74 5f 47 65 74 49 | 63 6f 6e 22 2c 2c 2c 63 |Ext_GetI|con",,,c|
|000006f0| 6f 6e 74 72 6f 6c 25 2c | 38 20 b8 20 64 25 0d 00 |ontrol%,|8 . d%..|
|00000700| 37 2a c8 99 20 22 57 69 | 6d 70 45 78 74 5f 47 65 |7*.. "Wi|mpExt_Ge|
|00000710| 74 49 63 6f 6e 22 2c 2c | 2c 63 6f 6e 74 72 6f 6c |tIcon",,|,control|
|00000720| 25 2c 33 20 b8 20 65 25 | 0d 00 38 25 6d 75 6c 74 |%,3 . e%|..8%mult|
|00000730| 69 25 3d 30 3a 6d 75 6c | 74 69 25 2b 3d 61 25 3a |i%=0:mul|ti%+=a%:|
|00000740| 6d 75 6c 74 69 25 2b 3d | 65 25 2a 31 36 0d 00 39 |multi%+=|e%*16..9|
|00000750| 33 e7 20 61 25 3d 30 20 | 8c 20 6d 75 6c 74 69 25 |3. a%=0 |. multi%|
|00000760| 2b 3d 62 25 2a 32 3a 6d | 75 6c 74 69 25 2b 3d 63 |+=b%*2:m|ulti%+=c|
|00000770| 25 2a 34 3a 6d 75 6c 74 | 69 25 2b 3d 64 25 2a 38 |%*4:mult|i%+=d%*8|
|00000780| 0d 00 3a 2a c8 99 20 22 | 57 69 6d 70 45 78 74 5f |..:*.. "|WimpExt_|
|00000790| 53 68 61 64 65 49 63 6f | 6e 22 2c 2c 2c 63 6f 6e |ShadeIco|n",,,con|
|000007a0| 74 72 6f 6c 25 2c 36 2c | 61 25 0d 00 3b 2a c8 99 |trol%,6,|a%..;*..|
|000007b0| 20 22 57 69 6d 70 45 78 | 74 5f 53 68 61 64 65 49 | "WimpEx|t_ShadeI|
|000007c0| 63 6f 6e 22 2c 2c 2c 63 | 6f 6e 74 72 6f 6c 25 2c |con",,,c|ontrol%,|
|000007d0| 37 2c 61 25 0d 00 3c 2a | c8 99 20 22 57 69 6d 70 |7,a%..<*|.. "Wimp|
|000007e0| 45 78 74 5f 53 68 61 64 | 65 49 63 6f 6e 22 2c 2c |Ext_Shad|eIcon",,|
|000007f0| 2c 63 6f 6e 74 72 6f 6c | 25 2c 38 2c 61 25 0d 00 |,control|%,8,a%..|
|00000800| 3d 17 f2 6f 70 65 6e 63 | 65 6e 74 72 65 28 6d 61 |=..openc|entre(ma|
|00000810| 69 6e 25 29 20 0d 00 3e | 04 0d 00 3f 44 f4 20 2d |in%) ..>|...?D. -|
|00000820| 20 2d 20 2d 20 2d 20 2d | 20 45 72 72 6f 72 20 74 | - - - -| Error t|
|00000830| 72 61 70 2e 2e 2e 4d 61 | 69 6e 20 50 72 6f 67 72 |rap...Ma|in Progr|
|00000840| 61 6d 20 6c 6f 6f 70 2e | 2e 2e 43 6c 6f 73 65 64 |am loop.|..Closed|
|00000850| 6f 77 6e 20 2d 20 2d 20 | 2d 20 2d 20 2d 0d 00 40 |own - - |- - -..@|
|00000860| 04 0d 00 41 16 65 72 72 | 6f 72 5f 66 6c 61 67 25 |...A.err|or_flag%|
|00000870| 20 20 20 20 20 3d 33 0d | 00 42 0e ee 20 85 20 f2 |     =3.|.B.. . .|
|00000880| 65 72 72 6f 72 0d 00 43 | 04 0d 00 44 16 c8 99 20 |error..C|...D... |
|00000890| 22 48 6f 75 72 67 6c 61 | 73 73 5f 4f 66 66 22 0d |"Hourgla|ss_Off".|
|000008a0| 00 45 05 f5 0d 00 46 17 | 20 20 f2 61 63 74 69 6f |.E....F.|  .actio|
|000008b0| 6e 28 a4 70 6f 6c 6c 28 | 30 29 29 0d 00 47 0f fd |n(.poll(|0))..G..|
|000008c0| 20 63 6c 6f 73 65 64 6f | 77 6e 0d 00 48 04 0d 00 | closedo|wn..H...|
|000008d0| 49 0e 24 71 25 3d 22 54 | 41 53 4b 22 0d 00 4a 20 |I.$q%="T|ASK"..J |
|000008e0| c8 99 20 22 57 69 6d 70 | 45 78 74 5f 43 6c 6f 73 |.. "Wimp|Ext_Clos|
|000008f0| 65 44 6f 77 6e 22 2c 74 | 61 73 6b 25 0d 00 4b 22 |eDown",t|ask%..K"|
|00000900| c8 99 20 22 57 69 6d 70 | 5f 43 6c 6f 73 65 44 6f |.. "Wimp|_CloseDo|
|00000910| 77 6e 22 2c 74 61 73 6b | 25 2c 71 25 21 30 0d 00 |wn",task|%,q%!0..|
|00000920| 4c 05 e0 0d 00 4d 04 0d | 00 4e 3b f4 20 3d 20 3d |L....M..|.N;. = =|
|00000930| 20 3d 20 3d 20 3d 20 41 | 70 70 6c 69 63 61 74 69 | = = = A|pplicati|
|00000940| 6f 6e 20 70 72 6f 63 65 | 64 75 72 65 73 20 73 74 |on proce|dures st|
|00000950| 61 72 74 20 68 65 72 65 | 20 3d 20 3d 20 3d 20 3d |art here| = = = =|
|00000960| 20 3d 0d 00 4f 04 0d 00 | 50 0b dd f2 65 72 72 6f | =..O...|P...erro|
|00000970| 72 0d 00 51 15 e7 20 65 | 72 72 6f 72 5f 66 6c 61 |r..Q.. e|rror_fla|
|00000980| 67 25 3d 33 20 8c 0d 00 | 52 50 20 20 63 6c 6f 73 |g%=3 ...|RP  clos|
|00000990| 65 64 6f 77 6e 3d ac 20 | a4 65 72 72 6f 72 62 6f |edown=. |.errorbo|
|000009a0| 78 28 22 55 6e 65 78 70 | 65 63 74 65 64 20 65 72 |x("Unexp|ected er|
|000009b0| 72 6f 72 3a 2d 20 22 2b | f6 24 2b 22 20 49 6e 74 |ror:- "+|.$+" Int|
|000009c0| 65 72 6e 61 6c 20 65 72 | 72 6f 72 20 63 6f 64 65 |ernal er|ror code|
|000009d0| 20 22 2b c3 9e 29 0d 00 | 53 05 cc 0d 00 54 1f 20 | "+..)..|S....T. |
|000009e0| 20 63 6c 6f 73 65 64 6f | 77 6e 3d ac 20 a4 65 72 | closedo|wn=. .er|
|000009f0| 72 6f 72 62 6f 78 28 f6 | 24 29 0d 00 55 05 cd 0d |rorbox(.|$)..U...|
|00000a00| 00 56 11 65 72 72 6f 72 | 5f 66 6c 61 67 25 3d 33 |.V.error|_flag%=3|
|00000a10| 0d 00 57 0f 73 63 61 6e | 6e 69 6e 67 25 3d a3 0d |..W.scan|ning%=..|
|00000a20| 00 58 18 c8 99 20 22 48 | 6f 75 72 67 6c 61 73 73 |.X... "H|ourglass|
|00000a30| 5f 53 6d 61 73 68 22 0d | 00 59 05 e1 0d 00 5a 04 |_Smash".|.Y....Z.|
|00000a40| 0d 00 5b 0c dd f2 6f 6b | 28 65 24 29 0d 00 5c 11 |..[...ok|(e$)..\.|
|00000a50| 65 72 72 6f 72 5f 66 6c | 61 67 25 3d 31 0d 00 5d |error_fl|ag%=1..]|
|00000a60| 0a 85 20 31 2c 65 24 0d | 00 5e 05 e1 0d 00 5f 04 |.. 1,e$.|.^...._.|
|00000a70| 0d 00 60 12 dd a4 65 72 | 72 6f 72 62 6f 78 28 72 |..`...er|rorbox(r|
|00000a80| 24 29 0d 00 61 08 ea 20 | 72 25 0d 00 62 19 21 71 |$)..a.. |r%..b.!q|
|00000a90| 25 3d 9f 3a 24 28 71 25 | 2b 34 29 3d 72 24 2b bd |%=.:$(q%|+4)=r$+.|
|00000aa0| 28 30 29 0d 00 63 32 c8 | 99 20 22 57 69 6d 70 5f |(0)..c2.|. "Wimp_|
|00000ab0| 52 65 70 6f 72 74 45 72 | 72 6f 72 22 2c 71 25 2c |ReportEr|ror",q%,|
|00000ac0| 25 31 31 2c 22 46 69 6c | 65 43 68 65 63 6b 22 20 |%11,"Fil|eCheck" |
|00000ad0| b8 20 2c 72 25 0d 00 64 | 14 e7 20 72 25 3d 32 20 |. ,r%..d|.. r%=2 |
|00000ae0| 8c 20 3d a3 20 8b 20 3d | b9 0d 00 65 04 0d 00 66 |. =. . =|...e...f|
|00000af0| 2e f4 20 2d 20 2d 20 2d | 20 2d 20 2d 20 4d 6f 75 |.. - - -| - - Mou|
|00000b00| 73 65 20 63 6c 69 63 6b | 20 72 6f 75 74 69 6e 65 |se click| routine|
|00000b10| 73 20 2d 20 2d 20 2d 20 | 2d 20 2d 0d 00 67 04 0d |s - - - |- -..g..|
|00000b20| 00 68 3c dd f2 63 6c 69 | 63 6b 77 69 6e 64 6f 77 |.h<..cli|ckwindow|
|00000b30| 28 6d 6f 75 73 65 78 25 | 2c 6d 6f 75 73 65 79 25 |(mousex%|,mousey%|
|00000b40| 2c 62 75 74 74 6f 6e 25 | 2c 68 61 6e 64 6c 65 25 |,button%|,handle%|
|00000b50| 2c 69 63 6f 6e 25 2c 6f | 62 25 29 0d 00 69 10 c8 |,icon%,o|b%)..i..|
|00000b60| 8e 20 68 61 6e 64 6c 65 | 25 20 ca 0d 00 6a 2b 20 |. handle|% ...j+ |
|00000b70| 20 c9 20 6d 61 69 6e 25 | 20 20 20 20 3a f2 63 6c | . main%|    :.cl|
|00000b80| 69 63 6b 6d 61 69 6e 28 | 62 75 74 74 6f 6e 25 2c |ickmain(|button%,|
|00000b90| 69 63 6f 6e 25 29 0d 00 | 6b 2e 20 20 c9 20 63 6f |icon%)..|k.  . co|
|00000ba0| 6e 74 72 6f 6c 25 20 3a | f2 63 6c 69 63 6b 63 6f |ntrol% :|.clickco|
|00000bb0| 6e 74 72 6f 6c 28 62 75 | 74 74 6f 6e 25 2c 69 63 |ntrol(bu|tton%,ic|
|00000bc0| 6f 6e 25 29 0d 00 6c 1c | 20 20 c9 20 4f 6e 53 4a |on%)..l.|  . OnSJ|
|00000bd0| 50 44 25 20 20 3a f2 63 | 6c 69 63 6b 53 4a 50 44 |PD%  :.c|lickSJPD|
|00000be0| 0d 00 6d 2b 20 20 c9 20 | 69 6e 66 6f 25 20 20 20 |..m+  . |info%   |
|00000bf0| 20 3a f2 63 6c 69 63 6b | 69 6e 66 6f 28 62 75 74 | :.click|info(but|
|00000c00| 74 6f 6e 25 2c 69 63 6f | 6e 25 29 0d 00 6e 05 cb |ton%,ico|n%)..n..|
|00000c10| 0d 00 6f 05 e1 0d 00 70 | 04 0d 00 71 0f dd f2 63 |..o....p|...q...c|
|00000c20| 6c 69 63 6b 53 4a 50 44 | 0d 00 72 0b 53 4a 50 44 |lickSJPD|..r.SJPD|
|00000c30| 25 3d a3 0d 00 73 19 f2 | 63 6c 6f 73 65 77 69 6e |%=...s..|closewin|
|00000c40| 64 6f 77 28 4f 6e 53 4a | 50 44 25 29 0d 00 74 09 |dow(OnSJ|PD%)..t.|
|00000c50| f2 6d 62 74 73 0d 00 75 | 05 e1 0d 00 76 04 0d 00 |.mbts..u|....v...|
|00000c60| 77 1e dd f2 63 6c 69 63 | 6b 69 6e 66 6f 28 62 75 |w...clic|kinfo(bu|
|00000c70| 74 74 6f 6e 25 2c 69 63 | 6f 6e 25 29 0d 00 78 0a |tton%,ic|on%)..x.|
|00000c80| c8 8e 20 b9 20 ca 0d 00 | 79 1b 20 20 c9 20 62 75 |.. . ...|y.  . bu|
|00000c90| 74 74 6f 6e 25 3d 34 20 | 80 20 69 63 6f 6e 25 3d |tton%=4 |. icon%=|
|00000ca0| 39 0d 00 7a 0f 20 20 20 | 20 53 4a 50 44 25 3d b9 |9..z.   | SJPD%=.|
|00000cb0| 0d 00 7b 21 20 20 20 20 | f2 6f 70 65 6e 77 69 6e |..{!    |.openwin|
|00000cc0| 64 6f 77 28 4f 6e 53 4a | 50 44 25 2c a3 2c 2d 31 |dow(OnSJ|PD%,.,-1|
|00000cd0| 29 0d 00 7c 20 20 20 20 | 20 f2 6d 6f 75 73 65 5f |)..|    | .mouse_|
|00000ce0| 6c 69 6d 69 74 28 71 25 | 2c 4f 6e 53 4a 50 44 25 |limit(q%|,OnSJPD%|
|00000cf0| 29 0d 00 7d 05 cb 0d 00 | 7e 05 e1 0d 00 7f 04 0d |)..}....|~.......|
|00000d00| 00 80 1e dd f2 63 6c 69 | 63 6b 6d 61 69 6e 28 62 |.....cli|ckmain(b|
|00000d10| 75 74 74 6f 6e 25 2c 69 | 63 6f 6e 25 29 0d 00 81 |utton%,i|con%)...|
|00000d20| 1d e7 20 62 75 74 74 6f | 6e 25 3d 32 20 80 20 69 |.. butto|n%=2 . i|
|00000d30| 63 6f 6e 25 3c 3e 31 35 | 20 8c 0d 00 82 10 20 20 |con%<>15| .....  |
|00000d40| f2 6d 65 6e 75 5f 6d 61 | 69 6e 0d 00 83 05 cd 0d |.menu_ma|in......|
|00000d50| 00 84 11 e7 20 62 75 74 | 74 6f 6e 25 3d 34 20 8c |.... but|ton%=4 .|
|00000d60| 0d 00 85 10 20 20 c8 8e | 20 69 63 6f 6e 25 20 ca |....  ..| icon% .|
|00000d70| 0d 00 86 30 20 20 20 20 | c9 20 36 20 3a e7 20 73 |...0    |. 6 :. s|
|00000d80| 63 61 6e 6e 69 6e 67 25 | 3d a3 20 8c 20 f2 73 63 |canning%|=. . .sc|
|00000d90| 61 6e 20 8b 20 73 63 61 | 6e 6e 69 6e 67 25 3d a3 |an . sca|nning%=.|
|00000da0| 0d 00 87 07 20 20 cb 0d | 00 88 05 cd 0d 00 89 1c |....  ..|........|
|00000db0| e7 20 69 63 6f 6e 25 3d | 31 35 20 8c 20 f2 6d 65 |. icon%=|15 . .me|
|00000dc0| 6e 75 5f 70 61 74 68 73 | 0d 00 8a 05 e1 0d 00 8b |nu_paths|........|
|00000dd0| 04 0d 00 8c 21 dd f2 63 | 6c 69 63 6b 63 6f 6e 74 |....!..c|lickcont|
|00000de0| 72 6f 6c 28 62 75 74 74 | 6f 6e 25 2c 69 63 6f 6e |rol(butt|on%,icon|
|00000df0| 25 29 0d 00 8d 14 ea 20 | 61 25 2c 62 25 2c 63 25 |%)..... |a%,b%,c%|
|00000e00| 2c 64 25 2c 65 25 0d 00 | 8e 11 e7 20 62 75 74 74 |,d%,e%..|... butt|
|00000e10| 6f 6e 25 3d 32 20 8c 0d | 00 8f 10 20 20 f2 6d 65 |on%=2 ..|...  .me|
|00000e20| 6e 75 5f 6d 61 69 6e 0d | 00 90 05 cd 0d 00 91 18 |nu_main.|........|
|00000e30| e7 20 28 62 75 74 74 6f | 6e 25 20 80 20 32 29 3c |. (butto|n% . 2)<|
|00000e40| 3e 32 20 8c 0d 00 92 10 | 20 20 c8 8e 20 69 63 6f |>2 .....|  .. ico|
|00000e50| 6e 25 20 ca 0d 00 93 15 | 20 20 20 20 c9 20 32 2c |n% .....|    . 2,|
|00000e60| 33 2c 36 2c 37 2c 38 20 | 3a 0d 00 94 30 20 20 20 |3,6,7,8 |:...0   |
|00000e70| 20 20 20 c8 99 20 22 57 | 69 6d 70 45 78 74 5f 47 |   .. "W|impExt_G|
|00000e80| 65 74 49 63 6f 6e 22 2c | 2c 2c 63 6f 6e 74 72 6f |etIcon",|,,contro|
|00000e90| 6c 25 2c 32 20 b8 20 61 | 25 0d 00 95 30 20 20 20 |l%,2 . a|%...0   |
|00000ea0| 20 20 20 c8 99 20 22 57 | 69 6d 70 45 78 74 5f 47 |   .. "W|impExt_G|
|00000eb0| 65 74 49 63 6f 6e 22 2c | 2c 2c 63 6f 6e 74 72 6f |etIcon",|,,contro|
|00000ec0| 6c 25 2c 36 20 b8 20 62 | 25 0d 00 96 30 20 20 20 |l%,6 . b|%...0   |
|00000ed0| 20 20 20 c8 99 20 22 57 | 69 6d 70 45 78 74 5f 47 |   .. "W|impExt_G|
|00000ee0| 65 74 49 63 6f 6e 22 2c | 2c 2c 63 6f 6e 74 72 6f |etIcon",|,,contro|
|00000ef0| 6c 25 2c 37 20 b8 20 63 | 25 0d 00 97 30 20 20 20 |l%,7 . c|%...0   |
|00000f00| 20 20 20 c8 99 20 22 57 | 69 6d 70 45 78 74 5f 47 |   .. "W|impExt_G|
|00000f10| 65 74 49 63 6f 6e 22 2c | 2c 2c 63 6f 6e 74 72 6f |etIcon",|,,contro|
|00000f20| 6c 25 2c 38 20 b8 20 64 | 25 0d 00 98 30 20 20 20 |l%,8 . d|%...0   |
|00000f30| 20 20 20 c8 99 20 22 57 | 69 6d 70 45 78 74 5f 47 |   .. "W|impExt_G|
|00000f40| 65 74 49 63 6f 6e 22 2c | 2c 2c 63 6f 6e 74 72 6f |etIcon",|,,contro|
|00000f50| 6c 25 2c 33 20 b8 20 65 | 25 0d 00 99 2b 20 20 20 |l%,3 . e|%...+   |
|00000f60| 20 20 20 6d 75 6c 74 69 | 25 3d 30 3a 6d 75 6c 74 |   multi|%=0:mult|
|00000f70| 69 25 2b 3d 61 25 3a 6d | 75 6c 74 69 25 2b 3d 65 |i%+=a%:m|ulti%+=e|
|00000f80| 25 2a 31 36 0d 00 9a 39 | 20 20 20 20 20 20 e7 20 |%*16...9|      . |
|00000f90| 61 25 3d 30 20 8c 20 6d | 75 6c 74 69 25 2b 3d 62 |a%=0 . m|ulti%+=b|
|00000fa0| 25 2a 32 3a 6d 75 6c 74 | 69 25 2b 3d 63 25 2a 34 |%*2:mult|i%+=c%*4|
|00000fb0| 3a 6d 75 6c 74 69 25 2b | 3d 64 25 2a 38 0d 00 9b |:multi%+|=d%*8...|
|00000fc0| 30 20 20 20 20 20 20 c8 | 99 20 22 57 69 6d 70 45 |0      .|. "WimpE|
|00000fd0| 78 74 5f 53 68 61 64 65 | 49 63 6f 6e 22 2c 2c 2c |xt_Shade|Icon",,,|
|00000fe0| 63 6f 6e 74 72 6f 6c 25 | 2c 36 2c 61 25 0d 00 9c |control%|,6,a%...|
|00000ff0| 30 20 20 20 20 20 20 c8 | 99 20 22 57 69 6d 70 45 |0      .|. "WimpE|
|00001000| 78 74 5f 53 68 61 64 65 | 49 63 6f 6e 22 2c 2c 2c |xt_Shade|Icon",,,|
|00001010| 63 6f 6e 74 72 6f 6c 25 | 2c 37 2c 61 25 0d 00 9d |control%|,7,a%...|
|00001020| 30 20 20 20 20 20 20 c8 | 99 20 22 57 69 6d 70 45 |0      .|. "WimpE|
|00001030| 78 74 5f 53 68 61 64 65 | 49 63 6f 6e 22 2c 2c 2c |xt_Shade|Icon",,,|
|00001040| 63 6f 6e 74 72 6f 6c 25 | 2c 38 2c 61 25 0d 00 9e |control%|,8,a%...|
|00001050| 07 20 20 cb 0d 00 9f 05 | cd 0d 00 a0 05 e1 0d 00 |.  .....|........|
|00001060| a1 04 0d 00 a2 18 dd f2 | 64 6f 5f 62 61 63 6b 67 |........|do_backg|
|00001070| 72 6f 75 6e 64 5f 74 61 | 73 6b 0d 00 a3 28 e7 20 |round_ta|sk...(. |
|00001080| 53 4a 50 44 25 3d b9 20 | 8c 20 f2 6d 6f 75 73 65 |SJPD%=. |. .mouse|
|00001090| 5f 6c 69 6d 69 74 28 71 | 25 2c 4f 6e 53 4a 50 44 |_limit(q|%,OnSJPD|
|000010a0| 25 29 0d 00 a4 05 e1 0d | 00 a5 04 0d 00 a6 19 dd |%)......|........|
|000010b0| a4 6f 6b 74 6f 63 6c 6f | 73 65 77 28 68 61 6e 64 |.oktoclo|sew(hand|
|000010c0| 6c 65 25 29 0d 00 a7 0f | ea 20 73 68 75 74 74 69 |le%)....|. shutti|
|000010d0| 6e 67 25 0d 00 a8 0f 73 | 68 75 74 74 69 6e 67 25 |ng%....s|hutting%|
|000010e0| 3d b9 0d 00 a9 15 e7 20 | 68 61 6e 64 6c 65 25 3d |=...... |handle%=|
|000010f0| 6d 61 69 6e 25 20 8c 0d | 00 aa 1c 20 20 20 73 68 |main% ..|...   sh|
|00001100| 75 74 74 69 6e 67 25 3d | ac 20 73 63 61 6e 6e 69 |utting%=|. scanni|
|00001110| 6e 67 25 0d 00 ab 22 20 | 20 20 e7 20 73 63 61 6e |ng%..." |  . scan|
|00001120| 6e 69 6e 67 25 3d a3 20 | 8c 20 63 6c 6f 73 65 64 |ning%=. |. closed|
|00001130| 6f 77 6e 3d b9 0d 00 ac | 05 cd 0d 00 ad 0e 3d 73 |own=....|......=s|
|00001140| 68 75 74 74 69 6e 67 25 | 0d 00 ae 04 0d 00 af 37 |hutting%|.......7|
|00001150| f4 20 2d 20 2d 20 2d 20 | 2d 20 2d 20 4d 65 6e 75 |. - - - |- - Menu|
|00001160| 20 73 65 6c 65 63 74 69 | 6f 6e 73 2f 64 65 66 69 | selecti|ons/defi|
|00001170| 6e 69 6e 67 20 65 74 63 | 2e 20 2d 20 2d 20 2d 20 |ning etc|. - - - |
|00001180| 2d 20 2d 0d 00 b0 04 0d | 00 b1 15 dd a4 6d 65 6e |- -.....|.....men|
|00001190| 75 73 65 6c 65 63 74 5f | 6d 61 69 6e 0d 00 b2 14 |uselect_|main....|
|000011a0| ea 20 6c 65 76 65 6c 30 | 2c 62 75 74 74 6f 6e 25 |. level0|,button%|
|000011b0| 0d 00 b3 0f 6c 65 76 65 | 6c 30 3d 71 25 21 30 0d |....leve|l0=q%!0.|
|000011c0| 00 b4 20 c8 99 20 22 57 | 69 6d 70 5f 47 65 74 50 |.. .. "W|imp_GetP|
|000011d0| 6f 69 6e 74 65 72 49 6e | 66 6f 22 2c 2c 71 25 0d |ointerIn|fo",,q%.|
|000011e0| 00 b5 10 62 75 74 74 6f | 6e 25 3d 71 25 21 38 0d |...butto|n%=q%!8.|
|000011f0| 00 b6 0f c8 8e 20 6c 65 | 76 65 6c 30 20 ca 0d 00 |..... le|vel0 ...|
|00001200| b7 17 20 20 c9 20 30 20 | 3a f4 20 3e 3e 3e 49 6e |..  . 0 |:. >>>In|
|00001210| 66 6f 3c 3c 3c 0d 00 b8 | 25 20 20 c9 20 31 20 3a |fo<<<...|%  . 1 :|
|00001220| f2 6f 70 65 6e 77 69 6e | 64 6f 77 28 63 6f 6e 74 |.openwin|dow(cont|
|00001230| 72 6f 6c 25 2c a3 2c 2d | 31 29 0d 00 b9 16 20 20 |rol%,.,-|1)....  |
|00001240| c9 20 32 20 3a 63 6c 6f | 73 65 64 6f 77 6e 3d b9 |. 2 :clo|sedown=.|
|00001250| 0d 00 ba 05 cb 0d 00 bb | 1c e7 20 62 75 74 74 6f |........|.. butto|
|00001260| 6e 25 3d 31 20 8c 20 f2 | 6d 65 6e 75 5f 6d 61 69 |n%=1 . .|menu_mai|
|00001270| 6e 0d 00 bc 06 3d 30 0d | 00 bd 04 0d 00 be 18 dd |n....=0.|........|
|00001280| a4 6d 65 6e 75 73 65 6c | 65 63 74 5f 63 6f 6e 74 |.menusel|ect_cont|
|00001290| 72 6f 6c 0d 00 bf 14 ea | 20 6c 65 76 65 6c 30 2c |rol.....| level0,|
|000012a0| 62 75 74 74 6f 6e 25 0d | 00 c0 0f 6c 65 76 65 6c |button%.|...level|
|000012b0| 30 3d 71 25 21 30 0d 00 | c1 20 c8 99 20 22 57 69 |0=q%!0..|. .. "Wi|
|000012c0| 6d 70 5f 47 65 74 50 6f | 69 6e 74 65 72 49 6e 66 |mp_GetPo|interInf|
|000012d0| 6f 22 2c 2c 71 25 0d 00 | c2 10 62 75 74 74 6f 6e |o",,q%..|..button|
|000012e0| 25 3d 71 25 21 38 0d 00 | c3 1c e7 20 6c 65 76 65 |%=q%!8..|... leve|
|000012f0| 6c 30 3d 31 20 8c 20 63 | 6c 6f 73 65 64 6f 77 6e |l0=1 . c|losedown|
|00001300| 3d b9 0d 00 c4 1c e7 20 | 62 75 74 74 6f 6e 25 3d |=...... |button%=|
|00001310| 31 20 8c 20 f2 6d 65 6e | 75 5f 6d 61 69 6e 0d 00 |1 . .men|u_main..|
|00001320| c5 06 3d 30 0d 00 c6 04 | 0d 00 c7 16 dd a4 6d 65 |..=0....|......me|
|00001330| 6e 75 73 65 6c 65 63 74 | 5f 70 61 74 68 73 0d 00 |nuselect|_paths..|
|00001340| c8 12 e7 20 65 72 72 6f | 72 25 3d b9 20 8c 20 e1 |... erro|r%=. . .|
|00001350| 0d 00 c9 2e ea 20 6c 65 | 76 65 6c 30 2c 62 75 74 |..... le|vel0,but|
|00001360| 74 6f 6e 25 2c 66 25 2c | 68 25 2c 6e 75 6d 25 2c |ton%,f%,|h%,num%,|
|00001370| 74 25 2c 73 24 2c 69 25 | 2c 66 72 65 64 25 0d 00 |t%,s$,i%|,fred%..|
|00001380| ca 0f 6c 65 76 65 6c 30 | 3d 71 25 21 30 0d 00 cb |..level0|=q%!0...|
|00001390| 20 c8 99 20 22 57 69 6d | 70 5f 47 65 74 50 6f 69 | .. "Wim|p_GetPoi|
|000013a0| 6e 74 65 72 49 6e 66 6f | 22 2c 2c 71 25 0d 00 cc |nterInfo|",,q%...|
|000013b0| 10 62 75 74 74 6f 6e 25 | 3d 71 25 21 38 0d 00 cd |.button%|=q%!8...|
|000013c0| 1d c8 99 20 22 41 44 46 | 53 5f 44 72 69 76 65 73 |... "ADF|S_Drives|
|000013d0| 22 20 b8 20 2c 66 25 2c | 68 25 0d 00 ce 14 e7 20 |" . ,f%,|h%..... |
|000013e0| 6c 65 76 65 6c 30 3c 3d | 66 25 2d 31 20 8c 0d 00 |level0<=|f%-1 ...|
|000013f0| cf 12 20 20 20 6e 75 6d | 25 3d 6c 65 76 65 6c 30 |..   num|%=level0|
|00001400| 0d 00 d0 05 cc 0d 00 d1 | 17 20 20 20 6e 75 6d 25 |........|.   num%|
|00001410| 3d 6c 65 76 65 6c 30 2d | 66 25 2b 34 0d 00 d2 05 |=level0-|f%+4....|
|00001420| cd 0d 00 d3 11 ee 85 20 | ea 20 65 72 72 6f 72 25 |....... |. error%|
|00001430| 3d b9 0d 00 d4 10 e7 20 | 65 72 72 6f 72 25 3d a3 |=...... |error%=.|
|00001440| 20 8c 0d 00 d5 2a 20 20 | 20 c8 99 20 22 41 44 46 | ....*  | .. "ADF|
|00001450| 53 5f 44 65 73 63 72 69 | 62 65 44 69 73 63 22 2c |S_Descri|beDisc",|
|00001460| 22 3a 22 2b c3 6e 75 6d | 25 2c 71 25 0d 00 d6 12 |":"+.num|%,q%....|
|00001470| 20 20 20 69 25 3d 32 33 | 3a 73 24 3d 22 22 0d 00 |   i%=23|:s$=""..|
|00001480| d7 12 20 20 20 66 72 65 | 64 25 3d 71 25 3f 32 32 |..   fre|d%=q%?22|
|00001490| 0d 00 d8 12 20 20 20 c8 | 95 20 66 72 65 64 25 3e |....   .|. fred%>|
|000014a0| 33 32 0d 00 d9 14 20 20 | 20 20 20 20 73 24 2b 3d |32....  |    s$+=|
|000014b0| bd 66 72 65 64 25 0d 00 | da 15 20 20 20 20 20 20 |.fred%..|..      |
|000014c0| 66 72 65 64 25 3d 71 25 | 3f 69 25 0d 00 db 0f 20 |fred%=q%|?i%.... |
|000014d0| 20 20 20 20 20 69 25 2b | 3d 31 0d 00 dc 08 20 20 |     i%+|=1....  |
|000014e0| 20 ce 0d 00 dd 20 20 20 | 20 e7 20 a9 28 73 24 29 | ....   | . .(s$)|
|000014f0| 3e 31 30 20 8c 20 73 24 | 3d c1 73 24 2c 31 2c 31 |>10 . s$|=.s$,1,1|
|00001500| 30 29 0d 00 de 05 cc 0d | 00 df 0f 20 20 20 73 24 |0)......|...   s$|
|00001510| 3d c3 6e 75 6d 25 0d 00 | e0 05 cd 0d 00 e1 31 f2 |=.num%..|......1.|
|00001520| 69 63 6f 6e 5f 70 75 74 | 64 61 74 61 28 71 25 2c |icon_put|data(q%,|
|00001530| 6d 61 69 6e 25 2c 32 2c | 22 41 44 46 53 3a 3a 22 |main%,2,|"ADFS::"|
|00001540| 2b 73 24 2b 22 2e 24 22 | 2c 2d 31 29 0d 00 e2 1d |+s$+".$"|,-1)....|
|00001550| e7 20 62 75 74 74 6f 6e | 25 3d 31 20 8c 20 f2 6d |. button|%=1 . .m|
|00001560| 65 6e 75 5f 70 61 74 68 | 73 0d 00 e3 06 3d 30 0d |enu_path|s....=0.|
|00001570| 00 e4 04 0d 00 e5 3a f4 | 20 28 22 54 65 78 74 22 |......:.| ("Text"|
|00001580| 2c 6e 6f 2c 77 72 69 74 | 65 2c 74 69 63 6b 2c 64 |,no,writ|e,tick,d|
|00001590| 6f 74 2c 73 68 61 64 65 | 2c 26 31 30 30 32 31 2c |ot,shade|,&10021,|
|000015a0| 73 75 62 6d 65 6e 75 2c | 6c 61 73 74 29 0d 00 e6 |submenu,|last)...|
|000015b0| 39 f4 20 26 31 30 30 32 | 31 20 62 65 63 6f 6d 65 |9. &1002|1 become|
|000015c0| 73 20 26 31 30 31 32 31 | 20 66 6f 72 20 69 6e 64 |s &10121| for ind|
|000015d0| 69 72 65 63 74 65 64 2f | 77 72 69 74 61 62 6c 65 |irected/|writable|
|000015e0| 20 69 63 6f 6e 73 0d 00 | e7 40 f4 20 73 75 62 6d | icons..|.@. subm|
|000015f0| 65 6e 75 20 69 73 20 30 | 20 6f 72 20 31 2d 39 39 |enu is 0| or 1-99|
|00001600| 20 66 6f 72 20 61 20 6d | 65 6e 75 20 6f 72 20 73 | for a m|enu or s|
|00001610| 6f 6d 65 74 68 69 6e 67 | 25 20 66 6f 72 20 61 20 |omething|% for a |
|00001620| 77 69 6e 64 6f 77 0d 00 | e8 04 0d 00 e9 0f dd f2 |window..|........|
|00001630| 6d 65 6e 75 5f 6d 61 69 | 6e 0d 00 ea 0e ea 20 61 |menu_mai|n..... a|
|00001640| 25 2c 62 25 2c 63 25 0d | 00 eb 11 6e 6f 3d 30 3a |%,b%,c%.|...no=0:|
|00001650| c8 97 20 78 2c 79 2c 62 | 0d 00 ec 3d f2 64 65 66 |.. x,y,b|...=.def|
|00001660| 69 6e 65 5f 6d 65 6e 75 | 5f 74 65 78 74 28 22 49 |ine_menu|_text("I|
|00001670| 6e 66 6f 22 2c 6e 6f 2c | 30 2c 30 2c 30 2c 30 2c |nfo",no,|0,0,0,0,|
|00001680| 26 31 30 30 32 31 2c 69 | 6e 66 6f 25 2c 30 29 3a |&10021,i|nfo%,0):|
|00001690| 6e 6f 2b 3d 31 0d 00 ed | 45 f2 64 65 66 69 6e 65 |no+=1...|E.define|
|000016a0| 5f 6d 65 6e 75 5f 74 65 | 78 74 28 22 43 6f 6e 74 |_menu_te|xt("Cont|
|000016b0| 72 6f 6c 22 2c 6e 6f 2c | 30 2c 62 25 2c 30 2c 63 |rol",no,|0,b%,0,c|
|000016c0| 25 2c 26 31 30 30 32 31 | 2c 63 6f 6e 74 72 6f 6c |%,&10021|,control|
|000016d0| 25 2c 30 29 3a 6e 6f 2b | 3d 31 0d 00 ee 3a f2 64 |%,0):no+|=1...:.d|
|000016e0| 65 66 69 6e 65 5f 6d 65 | 6e 75 5f 74 65 78 74 28 |efine_me|nu_text(|
|000016f0| 22 51 75 69 74 22 2c 6e | 6f 2c 30 2c 30 2c 30 2c |"Quit",n|o,0,0,0,|
|00001700| 30 2c 26 31 30 30 32 31 | 2c 30 2c 2d 31 29 3a 6e |0,&10021|,0,-1):n|
|00001710| 6f 2b 3d 31 0d 00 ef 2b | f2 63 72 65 61 74 65 5f |o+=1...+|.create_|
|00001720| 6d 65 6e 75 28 22 46 69 | 6c 65 43 68 65 63 6b 22 |menu("Fi|leCheck"|
|00001730| 2c 6e 6f 2c 31 38 34 2c | 78 2d 36 34 2c 79 29 0d |,no,184,|x-64,y).|
|00001740| 00 f0 15 63 6c 61 69 6d | 6d 65 6e 75 24 3d 22 6d |...claim|menu$="m|
|00001750| 61 69 6e 22 0d 00 f1 05 | e1 0d 00 f2 04 0d 00 f3 |ain"....|........|
|00001760| 12 dd f2 6d 65 6e 75 5f | 63 6f 6e 74 72 6f 6c 0d |...menu_|control.|
|00001770| 00 f4 0e ea 20 61 25 2c | 62 25 2c 63 25 0d 00 f5 |.... a%,|b%,c%...|
|00001780| 11 6e 6f 3d 30 3a c8 97 | 20 78 2c 79 2c 62 0d 00 |.no=0:..| x,y,b..|
|00001790| f6 3d f2 64 65 66 69 6e | 65 5f 6d 65 6e 75 5f 74 |.=.defin|e_menu_t|
|000017a0| 65 78 74 28 22 49 6e 66 | 6f 22 2c 6e 6f 2c 30 2c |ext("Inf|o",no,0,|
|000017b0| 30 2c 30 2c 30 2c 26 31 | 30 30 32 31 2c 69 6e 66 |0,0,0,&1|0021,inf|
|000017c0| 6f 25 2c 30 29 3a 6e 6f | 2b 3d 31 0d 00 f7 3a f2 |o%,0):no|+=1...:.|
|000017d0| 64 65 66 69 6e 65 5f 6d | 65 6e 75 5f 74 65 78 74 |define_m|enu_text|
|000017e0| 28 22 51 75 69 74 22 2c | 6e 6f 2c 30 2c 30 2c 30 |("Quit",|no,0,0,0|
|000017f0| 2c 30 2c 26 31 30 30 32 | 31 2c 30 2c 2d 31 29 3a |,0,&1002|1,0,-1):|
|00001800| 6e 6f 2b 3d 31 0d 00 f8 | 2b f2 63 72 65 61 74 65 |no+=1...|+.create|
|00001810| 5f 6d 65 6e 75 28 22 46 | 69 6c 65 43 68 65 63 6b |_menu("F|ileCheck|
|00001820| 22 2c 6e 6f 2c 31 38 34 | 2c 78 2d 36 34 2c 79 29 |",no,184|,x-64,y)|
|00001830| 0d 00 f9 18 63 6c 61 69 | 6d 6d 65 6e 75 24 3d 22 |....clai|mmenu$="|
|00001840| 63 6f 6e 74 72 6f 6c 22 | 0d 00 fa 05 e1 0d 00 fb |control"|........|
|00001850| 04 0d 00 fc 10 dd f2 6d | 65 6e 75 5f 70 61 74 68 |.......m|enu_path|
|00001860| 73 0d 00 fd 11 ea 20 69 | 25 2c 66 25 2c 68 25 2c |s..... i|%,f%,h%,|
|00001870| 6a 25 0d 00 fe 11 6e 6f | 3d 30 3a c8 97 20 78 2c |j%....no|=0:.. x,|
|00001880| 79 2c 62 0d 00 ff 1d c8 | 99 20 22 41 44 46 53 5f |y,b.....|. "ADFS_|
|00001890| 44 72 69 76 65 73 22 20 | b8 20 2c 66 25 2c 68 25 |Drives" |. ,f%,h%|
|000018a0| 0d 01 00 14 66 25 2d 3d | 31 3a 68 25 2d 3d 31 3a |....f%-=|1:h%-=1:|
|000018b0| 6a 25 3d 30 0d 01 01 12 | 69 25 3d 30 3a c8 95 20 |j%=0....|i%=0:.. |
|000018c0| 69 25 3c 3d 66 25 0d 01 | 02 1b e7 20 68 25 3d 2d |i%<=f%..|... h%=-|
|000018d0| 31 20 80 20 69 25 3d 66 | 25 20 8c 20 6a 25 3d 2d |1 . i%=f|% . j%=-|
|000018e0| 31 0d 01 03 40 f2 64 65 | 66 69 6e 65 5f 6d 65 6e |1...@.de|fine_men|
|000018f0| 75 5f 74 65 78 74 28 22 | 41 44 46 53 3a 3a 22 2b |u_text("|ADFS::"+|
|00001900| c3 69 25 2c 6e 6f 2c 30 | 2c 30 2c 30 2c 30 2c 26 |.i%,no,0|,0,0,0,&|
|00001910| 31 30 30 32 31 2c 30 2c | 6a 25 29 3a 6e 6f 2b 3d |10021,0,|j%):no+=|
|00001920| 31 0d 01 04 0b 69 25 2b | 3d 31 3a ce 0d 01 05 12 |1....i%+|=1:.....|
|00001930| 69 25 3d 30 3a c8 95 20 | 69 25 3c 3d 68 25 0d 01 |i%=0:.. |i%<=h%..|
|00001940| 06 13 e7 20 69 25 3d 68 | 25 20 8c 20 6a 25 3d 2d |... i%=h|% . j%=-|
|00001950| 31 0d 01 07 44 f2 64 65 | 66 69 6e 65 5f 6d 65 6e |1...D.de|fine_men|
|00001960| 75 5f 74 65 78 74 28 22 | 41 44 46 53 3a 3a 22 2b |u_text("|ADFS::"+|
|00001970| c3 28 69 25 2b 34 29 2c | 6e 6f 2c 30 2c 30 2c 30 |.(i%+4),|no,0,0,0|
|00001980| 2c 30 2c 26 31 30 30 32 | 31 2c 30 2c 6a 25 29 3a |,0,&1002|1,0,j%):|
|00001990| 6e 6f 2b 3d 31 0d 01 08 | 0b 69 25 2b 3d 31 3a ce |no+=1...|.i%+=1:.|
|000019a0| 0d 01 09 2c f2 63 72 65 | 61 74 65 5f 6d 65 6e 75 |...,.cre|ate_menu|
|000019b0| 28 22 44 72 69 76 65 73 | 22 2c 6e 6f 2c 31 32 2b |("Drives|",no,12+|
|000019c0| 31 36 2a 37 2c 78 2d 36 | 34 2c 79 29 0d 01 0a 16 |16*7,x-6|4,y)....|
|000019d0| 63 6c 61 69 6d 6d 65 6e | 75 24 3d 22 70 61 74 68 |claimmen|u$="path|
|000019e0| 73 22 0d 01 0b 05 e1 0d | 01 0c 04 0d 01 0d 16 dd |s"......|........|
|000019f0| f2 77 68 69 63 68 6d 65 | 6e 75 28 6d 65 6e 75 24 |.whichme|nu(menu$|
|00001a00| 29 0d 01 0e 0b ea 20 76 | 6f 69 64 25 0d 01 0f 0e |)..... v|oid%....|
|00001a10| c8 8e 20 6d 65 6e 75 24 | 20 ca 0d 01 10 26 c9 20 |.. menu$| ....&. |
|00001a20| 22 6d 61 69 6e 22 20 20 | 20 3a 76 6f 69 64 25 3d |"main"  | :void%=|
|00001a30| a4 6d 65 6e 75 73 65 6c | 65 63 74 5f 6d 61 69 6e |.menusel|ect_main|
|00001a40| 0d 01 11 29 c9 20 22 63 | 6f 6e 74 72 6f 6c 22 3a |...). "c|ontrol":|
|00001a50| 76 6f 69 64 25 3d a4 6d | 65 6e 75 73 65 6c 65 63 |void%=.m|enuselec|
|00001a60| 74 5f 63 6f 6e 74 72 6f | 6c 0d 01 12 30 c9 20 22 |t_contro|l...0. "|
|00001a70| 70 61 74 68 73 22 20 20 | 3a 65 72 72 6f 72 25 3d |paths"  |:error%=|
|00001a80| a3 3a 76 6f 69 64 25 3d | a4 6d 65 6e 75 73 65 6c |.:void%=|.menusel|
|00001a90| 65 63 74 5f 70 61 74 68 | 73 0d 01 13 05 cb 0d 01 |ect_path|s.......|
|00001aa0| 14 05 e1 0d 01 15 04 0d | 01 16 30 f4 20 2d 20 2d |........|..0. - -|
|00001ab0| 20 2d 20 2d 20 2d 20 44 | 72 61 67 20 68 61 6e 64 | - - - D|rag hand|
|00001ac0| 6c 69 6e 67 20 72 6f 75 | 74 69 6e 65 73 20 2d 20 |ling rou|tines - |
|00001ad0| 2d 20 2d 20 2d 20 2d 0d | 01 17 04 0d 01 18 2f f4 |- - - -.|....../.|
|00001ae0| 20 2d 20 2d 20 2d 20 2d | 20 2d 20 57 49 4d 50 20 | - - - -| - WIMP |
|00001af0| 4c 69 62 72 61 72 79 20 | 52 6f 75 74 69 6e 65 73 |Library |Routines|
|00001b00| 20 2d 20 2d 20 2d 20 2d | 20 2d 0d 01 19 04 0d 01 | - - - -| -......|
|00001b10| 1a 26 dd f2 6f 70 65 6e | 77 69 6e 64 6f 77 28 68 |.&..open|window(h|
|00001b20| 61 6e 64 6c 65 25 2c 66 | 75 6c 6c 25 2c 66 72 6f |andle%,f|ull%,fro|
|00001b30| 6e 74 25 29 0d 01 1b 10 | 71 25 21 30 3d 68 61 6e |nt%)....|q%!0=han|
|00001b40| 64 6c 65 25 0d 01 1c 2d | e7 20 ac 20 66 75 6c 6c |dle%...-|. . full|
|00001b50| 25 20 8c 20 c8 99 20 22 | 57 69 6d 70 5f 47 65 74 |% . .. "|Wimp_Get|
|00001b60| 57 69 6e 64 6f 77 53 74 | 61 74 65 22 2c 30 2c 71 |WindowSt|ate",0,q|
|00001b70| 25 0d 01 1d 17 e7 20 66 | 72 6f 6e 74 25 20 8c 20 |%..... f|ront% . |
|00001b80| 71 25 21 32 38 3d 2d 31 | 0d 01 1e 1d c8 99 20 22 |q%!28=-1|...... "|
|00001b90| 57 69 6d 70 5f 4f 70 65 | 6e 57 69 6e 64 6f 77 22 |Wimp_Ope|nWindow"|
|00001ba0| 2c 30 2c 71 25 0d 01 1f | 05 e1 0d 01 20 04 0d 01 |,0,q%...|.... ...|
|00001bb0| 21 1a dd f2 63 6c 6f 73 | 65 77 69 6e 64 6f 77 28 |!...clos|ewindow(|
|00001bc0| 68 61 6e 64 6c 65 25 29 | 0d 01 22 1c e7 20 a4 6f |handle%)|..".. .o|
|00001bd0| 6b 74 6f 63 6c 6f 73 65 | 77 28 68 61 6e 64 6c 65 |ktoclose|w(handle|
|00001be0| 25 29 20 8c 0d 01 23 12 | 20 20 71 25 21 30 3d 68 |%) ...#.|  q%!0=h|
|00001bf0| 61 6e 64 6c 65 25 0d 01 | 24 20 20 20 c8 99 20 22 |andle%..|$   .. "|
|00001c00| 57 69 6d 70 5f 43 6c 6f | 73 65 57 69 6e 64 6f 77 |Wimp_Clo|seWindow|
|00001c10| 22 2c 30 2c 71 25 0d 01 | 25 05 cd 0d 01 26 05 e1 |",0,q%..|%....&..|
|00001c20| 0d 01 27 04 0d 01 28 11 | dd a4 70 6f 6c 6c 28 6d |..'...(.|..poll(m|
|00001c30| 61 73 6b 25 29 0d 01 29 | 18 c8 99 20 22 57 69 6d |ask%)..)|... "Wim|
|00001c40| 70 45 78 74 5f 50 72 65 | 50 6f 6c 6c 22 0d 01 2a |pExt_Pre|Poll"..*|
|00001c50| 20 c8 99 20 22 57 69 6d | 70 5f 50 6f 6c 6c 22 2c | .. "Wim|p_Poll",|
|00001c60| 6d 61 73 6b 25 2c 71 25 | 20 b8 20 61 25 0d 01 2b |mask%,q%| . a%..+|
|00001c70| 28 c8 99 20 22 57 69 6d | 70 45 78 74 5f 41 63 74 |(.. "Wim|pExt_Act|
|00001c80| 69 6f 6e 22 2c 74 61 73 | 6b 25 2c 71 25 2c 61 25 |ion",tas|k%,q%,a%|
|00001c90| 20 b8 20 61 25 0d 01 2c | 07 3d 61 25 0d 01 2d 04 | . a%..,|.=a%..-.|
|00001ca0| 0d 01 2e 13 dd f2 61 63 | 74 69 6f 6e 28 65 76 6e |......ac|tion(evn|
|00001cb0| 74 25 29 0d 01 2f 0e c8 | 8e 20 65 76 6e 74 25 20 |t%)../..|. evnt% |
|00001cc0| ca 0d 01 30 1d 20 20 c9 | 20 30 3a f2 64 6f 5f 62 |...0.  .| 0:.do_b|
|00001cd0| 61 63 6b 67 72 6f 75 6e | 64 5f 74 61 73 6b 0d 01 |ackgroun|d_task..|
|00001ce0| 31 25 20 20 c9 20 31 3a | c8 99 20 22 57 69 6d 70 |1%  . 1:|.. "Wimp|
|00001cf0| 45 78 74 5f 41 75 74 6f | 52 65 64 72 61 77 22 2c |Ext_Auto|Redraw",|
|00001d00| 2c 71 25 0d 01 32 1f 20 | 20 c9 20 32 3a f2 6f 70 |,q%..2. | . 2:.op|
|00001d10| 65 6e 77 69 6e 64 6f 77 | 28 71 25 21 30 2c b9 2c |enwindow|(q%!0,.,|
|00001d20| 30 29 0d 01 33 1c 20 20 | c9 20 33 3a f2 63 6c 6f |0)..3.  |. 3:.clo|
|00001d30| 73 65 77 69 6e 64 6f 77 | 28 71 25 21 30 29 0d 01 |sewindow|(q%!0)..|
|00001d40| 34 37 20 20 c9 20 36 3a | f2 63 6c 69 63 6b 77 69 |47  . 6:|.clickwi|
|00001d50| 6e 64 6f 77 28 21 71 25 | 2c 71 25 21 34 2c 71 25 |ndow(!q%|,q%!4,q%|
|00001d60| 21 38 2c 71 25 21 31 32 | 2c 71 25 21 31 36 2c 71 |!8,q%!12|,q%!16,q|
|00001d70| 25 21 32 30 29 0d 01 35 | 3f 20 20 c9 20 37 3a f4 |%!20)..5|?  . 7:.|
|00001d80| 20 49 46 20 63 6c 61 69 | 6d 64 72 61 67 24 3c 3e | IF clai|mdrag$<>|
|00001d90| 22 22 20 54 48 45 4e 20 | 6a 75 6e 6b 3d 45 56 41 |"" THEN |junk=EVA|
|00001da0| 4c 28 22 46 4e 75 73 65 | 72 64 72 61 67 5f 78 66 |L("FNuse|rdrag_xf|
|00001db0| 65 72 22 29 0d 01 36 4c | 20 20 c9 20 38 3a c8 99 |er")..6L|  . 8:..|
|00001dc0| 20 22 57 69 6d 70 5f 50 | 72 6f 63 65 73 73 4b 65 | "Wimp_P|rocessKe|
|00001dd0| 79 22 2c 71 25 21 32 34 | 20 3a f4 20 2a 2a 2a 2a |y",q%!24| :. ****|
|00001de0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001df0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001e00| 0d 01 37 33 20 20 c9 20 | 39 3a e7 20 63 6c 61 69 |..73  . |9:. clai|
|00001e10| 6d 6d 65 6e 75 24 3c 3e | 22 22 20 8c 20 f2 77 68 |mmenu$<>|"" . .wh|
|00001e20| 69 63 68 6d 65 6e 75 28 | 63 6c 61 69 6d 6d 65 6e |ichmenu(|claimmen|
|00001e30| 75 24 29 0d 01 38 1a 20 | 20 c9 20 31 37 2c 31 38 |u$)..8. | . 17,18|
|00001e40| 3a f2 72 65 63 65 69 76 | 65 28 71 25 29 0d 01 39 |:.receiv|e(q%)..9|
|00001e50| 05 cb 0d 01 3a 05 e1 0d | 01 3b 04 0d 01 3c 11 dd |....:...|.;...<..|
|00001e60| f2 72 65 63 65 69 76 65 | 28 71 25 29 0d 01 3d 0e |.receive|(q%)..=.|
|00001e70| c8 8e 20 71 25 21 31 36 | 20 ca 0d 01 3e 54 c9 20 |.. q%!16| ...>T. |
|00001e80| 30 20 20 20 20 3a 24 71 | 25 3d 22 54 41 53 4b 22 |0    :$q|%="TASK"|
|00001e90| 3a c8 99 20 22 57 69 6d | 70 45 78 74 5f 43 6c 6f |:.. "Wim|pExt_Clo|
|00001ea0| 73 65 44 6f 77 6e 22 2c | 74 61 73 6b 25 3a c8 99 |seDown",|task%:..|
|00001eb0| 20 22 57 69 6d 70 5f 43 | 6c 6f 73 65 44 6f 77 6e | "Wimp_C|loseDown|
|00001ec0| 22 2c 74 61 73 6b 25 2c | 71 25 21 30 3a e0 0d 01 |",task%,|q%!0:...|
|00001ed0| 3f 1e c9 20 32 20 20 20 | 20 3a f4 20 50 52 4f 43 |?.. 2   | :. PROC|
|00001ee0| 64 61 74 61 73 61 76 65 | 28 71 25 29 0d 01 40 25 |datasave|(q%)..@%|
|00001ef0| c9 20 33 2c 35 20 20 3a | e7 20 71 25 21 31 32 3d |. 3,5  :|. q%!12=|
|00001f00| 30 20 8c 20 f2 64 61 74 | 61 6c 6f 61 64 28 71 25 |0 . .dat|aload(q%|
|00001f10| 29 0d 01 41 0c c9 20 26 | 35 30 32 20 3a 0d 01 42 |)..A.. &|502 :..B|
|00001f20| 05 cb 0d 01 43 05 e1 0d | 01 44 04 0d 01 45 1c dd |....C...|.D...E..|
|00001f30| f2 6c 77 61 6f 72 69 67 | 69 6e 28 62 2c f8 20 78 |.lwaorig|in(b,. x|
|00001f40| 25 2c f8 20 79 25 29 0d | 01 46 1c 78 25 3d 62 21 |%,. y%).|.F.x%=b!|
|00001f50| 30 2d 62 21 31 36 3a 79 | 25 3d 62 21 31 32 2d 62 |0-b!16:y|%=b!12-b|
|00001f60| 21 32 30 0d 01 47 05 e1 | 0d 01 48 04 0d 01 49 48 |!20..G..|..H...IH|
|00001f70| dd a4 69 63 6f 6e 5f 63 | 72 65 61 74 65 28 77 69 |..icon_c|reate(wi|
|00001f80| 6e 64 6f 77 25 2c 6d 69 | 6e 78 25 2c 6d 69 6e 79 |ndow%,mi|nx%,miny|
|00001f90| 25 2c 77 69 64 74 68 25 | 2c 68 65 69 67 68 74 25 |%,width%|,height%|
|00001fa0| 2c 66 67 25 2c 62 67 25 | 2c 66 6c 67 25 2c 64 61 |,fg%,bg%|,flg%,da|
|00001fb0| 74 61 24 29 0d 01 4a 08 | ea 20 69 25 0d 01 4b 10 |ta$)..J.|. i%..K.|
|00001fc0| 71 25 21 30 3d 77 69 6e | 64 6f 77 25 0d 01 4c 19 |q%!0=win|dow%..L.|
|00001fd0| 71 25 21 34 3d 6d 69 6e | 78 25 3a 71 25 21 38 3d |q%!4=min|x%:q%!8=|
|00001fe0| 6d 69 6e 79 25 0d 01 4d | 2a 71 25 21 31 32 3d 6d |miny%..M|*q%!12=m|
|00001ff0| 69 6e 78 25 2b 77 69 64 | 74 68 25 3a 71 25 21 31 |inx%+wid|th%:q%!1|
|00002000| 36 3d 6d 69 6e 79 25 2b | 68 65 69 67 68 74 25 0d |6=miny%+|height%.|
|00002010| 01 4e 22 71 25 21 32 30 | 3d 66 6c 67 25 20 84 20 |.N"q%!20|=flg% . |
|00002020| 62 67 25 3c 3c 32 38 20 | 84 20 66 67 25 3c 3c 32 |bg%<<28 |. fg%<<2|
|00002030| 34 0d 01 4f 14 e7 20 71 | 25 21 32 30 20 80 20 26 |4..O.. q|%!20 . &|
|00002040| 31 30 30 20 8c 0d 01 50 | 14 20 20 69 25 3d a7 64 |100 ...P|.  i%=.d|
|00002050| 61 74 61 24 2c 22 2c 22 | 29 0d 01 51 1b 20 20 71 |ata$,","|)..Q.  q|
|00002060| 25 21 32 34 3d a0 28 c0 | 64 61 74 61 24 2c 69 25 |%!24=.(.|data$,i%|
|00002070| 2d 31 29 29 0d 01 52 0e | 20 20 71 25 21 32 38 3d |-1))..R.|  q%!28=|
|00002080| 2d 31 0d 01 53 1b 20 20 | 71 25 21 33 32 3d a0 28 |-1..S.  |q%!32=.(|
|00002090| c1 64 61 74 61 24 2c 69 | 25 2b 31 29 29 0d 01 54 |.data$,i|%+1))..T|
|000020a0| 05 cc 0d 01 55 17 24 28 | 71 25 2b 32 34 29 3d c0 |....U.$(|q%+24)=.|
|000020b0| 64 61 74 61 24 2c 31 31 | 29 0d 01 56 05 cd 0d 01 |data$,11|)..V....|
|000020c0| 57 22 c8 99 20 22 57 69 | 6d 70 5f 43 72 65 61 74 |W".. "Wi|mp_Creat|
|000020d0| 65 49 63 6f 6e 22 2c 30 | 2c 71 25 20 b8 20 69 25 |eIcon",0|,q% . i%|
|000020e0| 0d 01 58 07 3d 69 25 0d | 01 59 04 0d 01 5a 23 dd |..X.=i%.|.Y...Z#.|
|000020f0| f2 69 63 6f 6e 5f 64 65 | 73 65 6c 65 63 74 28 68 |.icon_de|select(h|
|00002100| 61 6e 64 6c 65 25 2c 69 | 63 6f 6e 68 25 29 0d 01 |andle%,i|conh%)..|
|00002110| 5b 12 e7 20 69 63 6f 6e | 68 25 3c 3e 2d 31 20 8c |[.. icon|h%<>-1 .|
|00002120| 0d 01 5c 1e 20 20 71 25 | 21 30 3d 68 61 6e 64 6c |..\.  q%|!0=handl|
|00002130| 65 25 3a 71 25 21 34 3d | 69 63 6f 6e 68 25 0d 01 |e%:q%!4=|iconh%..|
|00002140| 5d 1b 20 20 71 25 21 38 | 3d 26 32 30 30 30 30 30 |].  q%!8|=&200000|
|00002150| 3a 71 25 21 31 32 3d 26 | 30 0d 01 5e 20 20 20 c8 |:q%!12=&|0..^   .|
|00002160| 99 20 22 57 69 6d 70 5f | 53 65 74 49 63 6f 6e 53 |. "Wimp_|SetIconS|
|00002170| 74 61 74 65 22 2c 2c 71 | 25 0d 01 5f 05 cd 0d 01 |tate",,q|%.._....|
|00002180| 60 05 e1 0d 01 61 04 0d | 01 62 26 dd f2 69 63 6f |`....a..|.b&..ico|
|00002190| 6e 5f 70 75 74 64 61 74 | 61 28 62 2c 77 68 25 2c |n_putdat|a(b,wh%,|
|000021a0| 69 68 25 2c 74 65 78 74 | 24 2c 72 64 29 0d 01 63 |ih%,text|$,rd)..c|
|000021b0| 13 62 21 30 3d 77 68 25 | 3a 62 21 34 3d 69 68 25 |.b!0=wh%|:b!4=ih%|
|000021c0| 0d 01 64 1d c8 99 20 22 | 57 69 6d 70 5f 47 65 74 |..d... "|Wimp_Get|
|000021d0| 49 63 6f 6e 53 74 61 74 | 65 22 2c 2c 62 0d 01 65 |IconStat|e",,b..e|
|000021e0| 1b c8 99 20 22 57 69 6d | 70 5f 44 65 6c 65 74 65 |... "Wim|p_Delete|
|000021f0| 49 63 6f 6e 22 2c 2c 62 | 0d 01 66 1e 62 21 34 3d |Icon",,b|..f.b!4=|
|00002200| 77 68 25 3a 24 28 62 21 | 32 38 29 3d 74 65 78 74 |wh%:$(b!|28)=text|
|00002210| 24 3a 62 2b 3d 34 0d 01 | 67 1b c8 99 20 22 57 69 |$:b+=4..|g... "Wi|
|00002220| 6d 70 5f 43 72 65 61 74 | 65 49 63 6f 6e 22 2c 2c |mp_Creat|eIcon",,|
|00002230| 62 0d 01 68 36 e7 20 72 | 64 20 8c 20 c8 99 20 22 |b..h6. r|d . .. "|
|00002240| 57 69 6d 70 5f 46 6f 72 | 63 65 52 65 64 72 61 77 |Wimp_For|ceRedraw|
|00002250| 22 2c 62 21 30 2c 62 21 | 34 2c 62 21 38 2c 62 21 |",b!0,b!|4,b!8,b!|
|00002260| 31 32 2c 62 21 31 36 0d | 01 69 08 62 2d 3d 34 0d |12,b!16.|.i.b-=4.|
|00002270| 01 6a 05 e1 0d 01 6b 04 | 0d 01 6c 35 dd f2 69 63 |.j....k.|..l5..ic|
|00002280| 6f 6e 5f 70 75 74 64 61 | 74 61 28 71 25 2c 77 68 |on_putda|ta(q%,wh|
|00002290| 61 6e 64 6c 65 25 2c 69 | 68 61 6e 64 6c 65 25 2c |andle%,i|handle%,|
|000022a0| 64 61 74 61 24 2c 72 65 | 64 72 61 77 29 0d 01 6d |data$,re|draw)..m|
|000022b0| 11 71 25 21 30 3d 77 68 | 61 6e 64 6c 65 25 0d 01 |.q%!0=wh|andle%..|
|000022c0| 6e 11 71 25 21 34 3d 69 | 68 61 6e 64 6c 65 25 0d |n.q%!4=i|handle%.|
|000022d0| 01 6f 1e c8 99 20 22 57 | 69 6d 70 5f 47 65 74 49 |.o... "W|imp_GetI|
|000022e0| 63 6f 6e 53 74 61 74 65 | 22 2c 2c 71 25 0d 01 70 |conState|",,q%..p|
|000022f0| 12 24 28 71 25 21 32 38 | 29 3d 64 61 74 61 24 0d |.$(q%!28|)=data$.|
|00002300| 01 71 0e e7 20 72 65 64 | 72 61 77 20 8c 0d 01 72 |.q.. red|raw ...r|
|00002310| 3b 20 20 c8 99 20 22 57 | 69 6d 70 5f 46 6f 72 63 |;  .. "W|imp_Forc|
|00002320| 65 52 65 64 72 61 77 22 | 2c 77 68 61 6e 64 6c 65 |eRedraw"|,whandle|
|00002330| 25 2c 71 25 21 38 2c 71 | 25 21 31 32 2c 71 25 21 |%,q%!8,q|%!12,q%!|
|00002340| 31 36 2c 71 25 21 32 30 | 0d 01 73 05 cd 0d 01 74 |16,q%!20|..s....t|
|00002350| 05 e1 0d 01 75 04 0d 01 | 76 2d dd f2 69 63 6f 6e |....u...|v-..icon|
|00002360| 5f 73 65 74 62 67 63 6f | 6c 6f 75 72 28 62 2c 77 |_setbgco|lour(b,w|
|00002370| 68 61 6e 64 6c 65 25 2c | 69 63 6f 6e 25 2c 63 6f |handle%,|icon%,co|
|00002380| 6c 25 29 0d 01 77 35 21 | 62 3d 77 68 61 6e 64 6c |l%)..w5!|b=whandl|
|00002390| 65 25 3a 62 21 34 3d 69 | 63 6f 6e 25 3a 62 21 38 |e%:b!4=i|con%:b!8|
|000023a0| 3d 63 6f 6c 25 3c 3c 32 | 38 3a 62 21 31 32 3d 26 |=col%<<2|8:b!12=&|
|000023b0| 46 30 30 30 30 30 30 30 | 0d 01 78 1e c8 99 20 22 |F0000000|..x... "|
|000023c0| 57 69 6d 70 5f 53 65 74 | 49 63 6f 6e 53 74 61 74 |Wimp_Set|IconStat|
|000023d0| 65 22 2c 30 2c 62 0d 01 | 79 05 e1 0d 01 7a 04 0d |e",0,b..|y....z..|
|000023e0| 01 7b 2d dd f2 69 63 6f | 6e 5f 73 65 74 66 67 63 |.{-..ico|n_setfgc|
|000023f0| 6f 6c 6f 75 72 28 62 2c | 77 68 61 6e 64 6c 65 25 |olour(b,|whandle%|
|00002400| 2c 69 63 6f 6e 25 2c 63 | 6f 6c 25 29 0d 01 7c 35 |,icon%,c|ol%)..|5|
|00002410| 21 62 3d 77 68 61 6e 64 | 6c 65 25 3a 62 21 34 3d |!b=whand|le%:b!4=|
|00002420| 69 63 6f 6e 25 3a 62 21 | 38 3d 63 6f 6c 25 3c 3c |icon%:b!|8=col%<<|
|00002430| 32 34 3a 62 21 31 32 3d | 26 30 46 30 30 30 30 30 |24:b!12=|&0F00000|
|00002440| 30 0d 01 7d 1e c8 99 20 | 22 57 69 6d 70 5f 53 65 |0..}... |"Wimp_Se|
|00002450| 74 49 63 6f 6e 53 74 61 | 74 65 22 2c 30 2c 62 0d |tIconSta|te",0,b.|
|00002460| 01 7e 05 e1 0d 01 7f 04 | 0d 01 80 39 dd a4 69 63 |.~......|...9..ic|
|00002470| 6f 6e 5f 6e 65 77 73 70 | 72 69 74 65 28 62 2c 77 |on_newsp|rite(b,w|
|00002480| 68 61 6e 64 6c 65 25 2c | 69 68 61 6e 64 6c 65 25 |handle%,|ihandle%|
|00002490| 2c 6e 65 77 6e 61 6d 65 | 24 2c 72 65 64 72 61 77 |,newname|$,redraw|
|000024a0| 29 0d 01 81 1d 62 21 30 | 3d 77 68 61 6e 64 6c 65 |)....b!0|=whandle|
|000024b0| 25 3a 62 21 34 3d 69 68 | 61 6e 64 6c 65 25 0d 01 |%:b!4=ih|andle%..|
|000024c0| 82 1d c8 99 20 22 57 69 | 6d 70 5f 47 65 74 49 63 |.... "Wi|mp_GetIc|
|000024d0| 6f 6e 53 74 61 74 65 22 | 2c 2c 62 0d 01 83 1b c8 |onState"|,,b.....|
|000024e0| 99 20 22 57 69 6d 70 5f | 44 65 6c 65 74 65 49 63 |. "Wimp_|DeleteIc|
|000024f0| 6f 6e 22 2c 2c 62 0d 01 | 84 43 62 21 34 3d 62 21 |on",,b..|.Cb!4=b!|
|00002500| 38 3a 62 21 38 3d 62 21 | 31 32 3a 62 21 31 32 3d |8:b!8=b!|12:b!12=|
|00002510| 62 21 31 36 3a 62 21 31 | 36 3d 62 21 32 30 3a 62 |b!16:b!1|6=b!20:b|
|00002520| 21 32 30 3d 62 21 32 34 | 3a 24 28 62 2b 32 34 29 |!20=b!24|:$(b+24)|
|00002530| 3d 6e 65 77 6e 61 6d 65 | 24 0d 01 85 26 c8 99 20 |=newname|$...&.. |
|00002540| 22 57 69 6d 70 5f 43 72 | 65 61 74 65 49 63 6f 6e |"Wimp_Cr|eateIcon|
|00002550| 22 2c 2c 62 20 b8 20 69 | 68 61 6e 64 6c 65 25 0d |",,b . i|handle%.|
|00002560| 01 86 3a e7 20 72 65 64 | 72 61 77 20 8c 20 c8 99 |..:. red|raw . ..|
|00002570| 20 22 57 69 6d 70 5f 46 | 6f 72 63 65 52 65 64 72 | "Wimp_F|orceRedr|
|00002580| 61 77 22 2c 62 21 30 2c | 62 21 34 2c 62 21 38 2c |aw",b!0,|b!4,b!8,|
|00002590| 62 21 31 32 2c 62 21 31 | 36 0d 01 87 0d 3d 69 68 |b!12,b!1|6....=ih|
|000025a0| 61 6e 64 6c 65 25 0d 01 | 88 04 0d 01 89 28 dd a4 |andle%..|.....(..|
|000025b0| 69 63 6f 6e 5f 67 65 74 | 64 61 74 61 28 71 25 2c |icon_get|data(q%,|
|000025c0| 77 68 61 6e 64 6c 65 25 | 2c 69 68 61 6e 64 6c 65 |whandle%|,ihandle|
|000025d0| 25 29 0d 01 8a 11 71 25 | 21 30 3d 77 68 61 6e 64 |%)....q%|!0=whand|
|000025e0| 6c 65 25 0d 01 8b 11 71 | 25 21 34 3d 69 68 61 6e |le%....q|%!4=ihan|
|000025f0| 64 6c 65 25 0d 01 8c 1e | c8 99 20 22 57 69 6d 70 |dle%....|.. "Wimp|
|00002600| 5f 47 65 74 49 63 6f 6e | 53 74 61 74 65 22 2c 2c |_GetIcon|State",,|
|00002610| 71 25 0d 01 8d 0d 3d 24 | 28 71 25 21 32 38 29 0d |q%....=$|(q%!28).|
|00002620| 01 8e 04 0d 01 8f 45 dd | f2 63 61 72 65 74 5f 73 |......E.|.caret_s|
|00002630| 65 74 70 6f 73 69 74 69 | 6f 6e 28 77 68 61 6e 64 |etpositi|on(whand|
|00002640| 6c 65 25 2c 69 68 61 6e | 64 6c 65 25 2c 78 6f 66 |le%,ihan|dle%,xof|
|00002650| 66 25 2c 79 6f 66 66 25 | 2c 68 65 69 67 68 74 25 |f%,yoff%|,height%|
|00002660| 2c 69 6e 64 65 78 25 29 | 0d 01 90 4b c8 99 20 22 |,index%)|...K.. "|
|00002670| 57 69 6d 70 5f 53 65 74 | 43 61 72 65 74 50 6f 73 |Wimp_Set|CaretPos|
|00002680| 69 74 69 6f 6e 22 2c 77 | 68 61 6e 64 6c 65 25 2c |ition",w|handle%,|
|00002690| 69 68 61 6e 64 6c 65 25 | 2c 78 6f 66 66 25 2c 79 |ihandle%|,xoff%,y|
|000026a0| 6f 66 66 25 2c 68 65 69 | 67 68 74 25 2c 69 6e 64 |off%,hei|ght%,ind|
|000026b0| 65 78 25 0d 01 91 05 e1 | 0d 01 92 04 0d 01 93 0d |ex%.....|........|
|000026c0| dd f2 6e 65 77 76 61 6c | 73 0d 01 94 17 67 74 78 |..newval|s....gtx|
|000026d0| 3d 71 25 21 33 36 3a 67 | 74 79 3d 71 25 21 34 30 |=q%!36:g|ty=q%!40|
|000026e0| 0d 01 95 15 77 62 78 3d | 71 25 21 34 3a 77 62 79 |....wbx=|q%!4:wby|
|000026f0| 3d 71 25 21 38 0d 01 96 | 17 77 74 78 3d 71 25 21 |=q%!8...|.wtx=q%!|
|00002700| 31 32 3a 77 74 79 3d 71 | 25 21 31 36 0d 01 97 17 |12:wty=q|%!16....|
|00002710| 78 73 63 3d 71 25 21 32 | 30 3a 79 73 63 3d 71 25 |xsc=q%!2|0:ysc=q%|
|00002720| 21 32 34 0d 01 98 21 68 | 70 3d 77 74 78 2d 77 62 |!24...!h|p=wtx-wb|
|00002730| 78 3a 76 70 3d 77 74 79 | 2d 77 62 79 3a 65 62 78 |x:vp=wty|-wby:ebx|
|00002740| 3d 78 73 63 0d 01 99 21 | 65 74 78 3d 78 73 63 2b |=xsc...!|etx=xsc+|
|00002750| 68 70 3a 65 74 79 3d 79 | 73 63 3a 65 62 79 3d 79 |hp:ety=y|sc:eby=y|
|00002760| 73 63 2d 76 70 0d 01 9a | 05 e1 0d 01 9b 04 0d 01 |sc-vp...|........|
|00002770| 9c 32 dd f2 64 65 66 69 | 6e 65 5f 6d 65 6e 75 5f |.2..defi|ne_menu_|
|00002780| 74 65 78 74 28 74 65 78 | 74 24 2c 6e 2c 77 2c 74 |text(tex|t$,n,w,t|
|00002790| 2c 64 2c 73 2c 66 6c 61 | 67 73 2c 73 6d 2c 6c 29 |,d,s,fla|gs,sm,l)|
|000027a0| 0d 01 9d 12 74 65 78 74 | 24 28 6e 29 3d 74 65 78 |....text|$(n)=tex|
|000027b0| 74 24 0d 01 9e 10 73 65 | 74 74 69 6e 67 28 6e 29 |t$....se|tting(n)|
|000027c0| 3d 30 0d 01 9f 38 e7 20 | 77 20 8c 20 73 65 74 74 |=0...8. |w . sett|
|000027d0| 69 6e 67 28 6e 29 3d 73 | 65 74 74 69 6e 67 28 6e |ing(n)=s|etting(n|
|000027e0| 29 20 84 20 26 30 34 3a | 66 6c 61 67 73 3d 66 6c |) . &04:|flags=fl|
|000027f0| 61 67 73 20 84 20 26 31 | 30 30 0d 01 a0 25 e7 20 |ags . &1|00...%. |
|00002800| 74 20 8c 20 73 65 74 74 | 69 6e 67 28 6e 29 3d 73 |t . sett|ing(n)=s|
|00002810| 65 74 74 69 6e 67 28 6e | 29 20 84 20 26 30 31 0d |etting(n|) . &01.|
|00002820| 01 a1 25 e7 20 64 20 8c | 20 73 65 74 74 69 6e 67 |..%. d .| setting|
|00002830| 28 6e 29 3d 73 65 74 74 | 69 6e 67 28 6e 29 20 84 |(n)=sett|ing(n) .|
|00002840| 20 26 30 32 0d 01 a2 25 | e7 20 6c 20 8c 20 73 65 | &02...%|. l . se|
|00002850| 74 74 69 6e 67 28 6e 29 | 3d 73 65 74 74 69 6e 67 |tting(n)|=setting|
|00002860| 28 6e 29 20 84 20 26 38 | 30 0d 01 a3 1f e7 20 73 |(n) . &8|0..... s|
|00002870| 20 8c 20 66 6c 61 67 73 | 3d 66 6c 61 67 73 20 84 | . flags|=flags .|
|00002880| 20 26 34 30 30 30 30 30 | 0d 01 a4 12 66 6c 61 67 | &400000|....flag|
|00002890| 73 28 6e 29 3d 66 6c 61 | 67 73 0d 01 a5 11 73 75 |s(n)=fla|gs....su|
|000028a0| 62 6d 65 6e 75 28 6e 29 | 3d 73 6d 0d 01 a6 05 e1 |bmenu(n)|=sm.....|
|000028b0| 0d 01 a7 04 0d 01 a8 26 | dd f2 63 72 65 61 74 65 |.......&|..create|
|000028c0| 5f 6d 65 6e 75 28 74 69 | 74 6c 65 24 2c 6e 2c 77 |_menu(ti|tle$,n,w|
|000028d0| 69 64 74 68 25 2c 78 2c | 79 29 0d 01 a9 0d 6d 62 |idth%,x,|y)....mb|
|000028e0| 25 3d 6d 65 6e 75 25 0d | 01 aa 0f 6d 65 6e 75 73 |%=menu%.|...menus|
|000028f0| 3d 30 3a 71 3d 30 0d 01 | ab 05 f5 0d 01 ac 21 20 |=0:q=0..|......! |
|00002900| 20 6d 65 6e 75 70 6f 73 | 28 6d 65 6e 75 73 29 3d | menupos|(menus)=|
|00002910| 6d 62 25 3a 6d 65 6e 75 | 73 2b 3d 31 0d 01 ad 11 |mb%:menu|s+=1....|
|00002920| 20 20 24 6d 62 25 3d 74 | 69 74 6c 65 24 0d 01 ae |  $mb%=t|itle$...|
|00002930| 0e 20 20 6d 62 25 3f 31 | 32 3d 37 0d 01 af 0e 20 |.  mb%?1|2=7.... |
|00002940| 20 6d 62 25 3f 31 33 3d | 32 0d 01 b0 0e 20 20 6d | mb%?13=|2....  m|
|00002950| 62 25 3f 31 34 3d 37 0d | 01 b1 0e 20 20 6d 62 25 |b%?14=7.|...  mb%|
|00002960| 3f 31 35 3d 30 0d 01 b2 | 13 20 20 6d 62 25 21 31 |?15=0...|.  mb%!1|
|00002970| 36 3d 77 69 64 74 68 25 | 0d 01 b3 27 20 20 6d 62 |6=width%|...'  mb|
|00002980| 25 21 32 30 3d 34 30 20 | 3a f4 20 68 65 69 67 68 |%!20=40 |:. heigh|
|00002990| 74 20 6f 66 20 6d 65 6e | 75 20 69 74 65 6d 73 0d |t of men|u items.|
|000029a0| 01 b4 41 20 20 6d 62 25 | 21 32 34 3d 30 20 20 3a |..A  mb%|!24=0  :|
|000029b0| f4 20 76 65 72 74 69 63 | 61 6c 20 67 61 70 20 62 |. vertic|al gap b|
|000029c0| 65 74 77 65 65 6e 20 69 | 74 65 6d 73 20 28 61 6c |etween i|tems (al|
|000029d0| 73 6f 20 74 6f 70 20 26 | 20 62 6f 74 74 6f 6d 29 |so top &| bottom)|
|000029e0| 0d 01 b5 14 20 20 69 74 | 65 6d 70 74 72 3d 6d 62 |....  it|emptr=mb|
|000029f0| 25 2b 32 38 0d 01 b6 07 | 20 20 f5 0d 01 b7 1c 20 |%+28....|  ..... |
|00002a00| 20 20 20 69 74 65 6d 70 | 74 72 21 30 3d 73 65 74 |   itemp|tr!0=set|
|00002a10| 74 69 6e 67 28 71 29 0d | 01 b8 18 20 20 20 20 72 |ting(q).|...    r|
|00002a20| 65 66 28 71 29 3d 69 74 | 65 6d 70 74 72 2b 34 0d |ef(q)=it|emptr+4.|
|00002a30| 01 b9 2a 20 20 20 20 69 | 74 65 6d 70 74 72 21 38 |..*    i|temptr!8|
|00002a40| 3d 66 6c 61 67 73 28 71 | 29 20 84 20 30 3c 3c 32 |=flags(q|) . 0<<2|
|00002a50| 38 20 84 20 37 3c 3c 32 | 34 0d 01 ba 1f 20 20 20 |8 . 7<<2|4....   |
|00002a60| 20 e7 20 28 66 6c 61 67 | 73 28 71 29 20 80 20 26 | . (flag|s(q) . &|
|00002a70| 31 30 30 29 3d 30 20 8c | 0d 01 bb 20 20 20 20 20 |100)=0 .|...     |
|00002a80| 20 20 24 28 69 74 65 6d | 70 74 72 2b 31 32 29 3d |  $(item|ptr+12)=|
|00002a90| 74 65 78 74 24 28 71 29 | 0d 01 bc 09 20 20 20 20 |text$(q)|....    |
|00002aa0| cc 0d 01 bd 1c 20 20 20 | 20 20 20 70 6f 73 3d a7 |.....   |   pos=.|
|00002ab0| 74 65 78 74 24 28 71 29 | 2c 22 28 22 29 0d 01 be |text$(q)|,"(")...|
|00002ac0| 28 20 20 20 20 20 20 69 | 74 65 6d 70 74 72 21 31 |(      i|temptr!1|
|00002ad0| 32 3d a0 28 c0 74 65 78 | 74 24 28 71 29 2c 70 6f |2=.(.tex|t$(q),po|
|00002ae0| 73 2d 31 29 29 0d 01 bf | 17 20 20 20 20 20 20 69 |s-1))...|.      i|
|00002af0| 74 65 6d 70 74 72 21 31 | 36 3d 2d 31 0d 01 c0 32 |temptr!1|6=-1...2|
|00002b00| 20 20 20 20 20 20 69 74 | 65 6d 70 74 72 21 32 30 |      it|emptr!20|
|00002b10| 3d a0 28 c2 74 65 78 74 | 24 28 71 29 2c a9 28 74 |=.(.text|$(q),.(t|
|00002b20| 65 78 74 24 28 71 29 29 | 2d 70 6f 73 29 29 0d 01 |ext$(q))|-pos))..|
|00002b30| c1 09 20 20 20 20 cd 0d | 01 c2 18 20 20 20 20 69 |..    ..|...    i|
|00002b40| 74 65 6d 70 74 72 2b 3d | 32 34 3a 71 2b 3d 31 0d |temptr+=|24:q+=1.|
|00002b50| 01 c3 1e 20 20 fd 20 28 | 73 65 74 74 69 6e 67 28 |...  . (|setting(|
|00002b60| 71 2d 31 29 20 80 20 26 | 38 30 29 3e 30 0d 01 c4 |q-1) . &|80)>0...|
|00002b70| 11 20 20 6d 62 25 3d 69 | 74 65 6d 70 74 72 0d 01 |.  mb%=i|temptr..|
|00002b80| c5 23 20 20 e7 20 71 3c | 3e 6e 20 8c 20 74 69 74 |.#  . q<|>n . tit|
|00002b90| 6c 65 24 3d 74 65 78 74 | 24 28 71 29 3a 71 2b 3d |le$=text|$(q):q+=|
|00002ba0| 31 0d 01 c6 09 fd 20 71 | 3d 6e 0d 01 c7 04 0d 01 |1..... q|=n......|
|00002bb0| c8 0f e3 20 71 3d 30 20 | b8 20 6e 2d 31 0d 01 c9 |... q=0 |. n-1...|
|00002bc0| 29 20 20 e7 20 73 75 62 | 6d 65 6e 75 28 71 29 3e |)  . sub|menu(q)>|
|00002bd0| 30 20 80 20 73 75 62 6d | 65 6e 75 28 71 29 3c 6d |0 . subm|enu(q)<m|
|00002be0| 65 6e 75 73 20 8c 0d 01 | ca 23 20 20 20 20 21 72 |enus ...|.#    !r|
|00002bf0| 65 66 28 71 29 3d 6d 65 | 6e 75 70 6f 73 28 73 75 |ef(q)=me|nupos(su|
|00002c00| 62 6d 65 6e 75 28 71 29 | 29 0d 01 cb 07 20 20 cc |bmenu(q)|)....  .|
|00002c10| 0d 01 cc 48 20 20 20 20 | 21 72 65 66 28 71 29 3d |...H    |!ref(q)=|
|00002c20| 73 75 62 6d 65 6e 75 28 | 71 29 3a f4 20 77 61 73 |submenu(|q):. was|
|00002c30| 20 2d 31 20 69 2e 65 2e | 20 73 75 62 6d 65 6e 75 | -1 i.e.| submenu|
|00002c40| 20 64 69 73 61 6c 6c 6f | 77 65 64 21 20 54 68 69 | disallo|wed! Thi|
|00002c50| 73 20 63 68 61 6e 67 65 | 0d 01 cd 3e 20 20 20 20 |s change|...>    |
|00002c60| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00002c70| 20 20 3a f4 20 61 6c 6c | 6f 77 73 20 61 20 77 69 |  :. all|ows a wi|
|00002c80| 6e 64 6f 77 20 68 61 6e | 64 6c 65 20 74 6f 20 62 |ndow han|dle to b|
|00002c90| 65 20 75 73 65 64 0d 01 | ce 07 20 20 cd 0d 01 cf |e used..|..  ....|
|00002ca0| 07 ed 20 71 0d 01 d0 23 | c8 99 20 22 57 69 6d 70 |.. q...#|.. "Wimp|
|00002cb0| 5f 43 72 65 61 74 65 4d | 65 6e 75 22 2c 2c 6d 65 |_CreateM|enu",,me|
|00002cc0| 6e 75 25 2c 78 2c 79 0d | 01 d1 05 e1 0d 01 d2 04 |nu%,x,y.|........|
|00002cd0| 0d 01 d3 1f dd a4 6c 6f | 61 64 74 65 6d 70 6c 61 |......lo|adtempla|
|00002ce0| 74 65 28 6e 61 6d 65 24 | 2c 73 70 72 73 25 29 0d |te(name$|,sprs%).|
|00002cf0| 01 d4 13 ea 20 74 79 70 | 65 25 2c 70 6f 73 25 2c |.... typ|e%,pos%,|
|00002d00| 78 25 0d 01 d5 4c c8 99 | 20 22 57 69 6d 70 5f 4c |x%...L..| "Wimp_L|
|00002d10| 6f 61 64 54 65 6d 70 6c | 61 74 65 22 2c 2c 71 25 |oadTempl|ate",,q%|
|00002d20| 2c 69 70 74 72 25 2c 69 | 65 6e 64 25 2c 2d 31 2c |,iptr%,i|end%,-1,|
|00002d30| 6e 61 6d 65 24 2c 30 20 | b8 20 74 79 70 65 25 2c |name$,0 |. type%,|
|00002d40| 2c 69 70 74 72 25 2c 2c | 2c 2c 70 6f 73 25 0d 01 |,iptr%,,|,,pos%..|
|00002d50| d6 16 e7 20 73 70 72 73 | 25 20 8c 20 71 25 21 36 |... sprs|% . q%!6|
|00002d60| 34 3d 73 70 0d 01 d7 29 | c8 99 20 22 57 69 6d 70 |4=sp...)|.. "Wimp|
|00002d70| 5f 43 72 65 61 74 65 57 | 69 6e 64 6f 77 22 2c 2c |_CreateW|indow",,|
|00002d80| 71 25 20 b8 20 77 68 61 | 6e 64 6c 65 25 0d 01 d8 |q% . wha|ndle%...|
|00002d90| 0d 3d 77 68 61 6e 64 6c | 65 25 0d 01 d9 04 0d 01 |.=whandl|e%......|
|00002da0| da 22 dd f2 6d 6f 75 73 | 65 5f 72 65 63 74 61 6e |."..mous|e_rectan|
|00002db0| 67 6c 65 28 78 25 2c 79 | 25 2c 77 25 2c 68 25 29 |gle(x%,y|%,w%,h%)|
|00002dc0| 0d 01 db 15 c8 97 20 c8 | 93 20 78 25 2c 79 25 2c |...... .|. x%,y%,|
|00002dd0| 77 25 2c 68 25 0d 01 dc | 05 e1 0d 01 dd 04 0d 01 |w%,h%...|........|
|00002de0| de 1d dd f2 6d 6f 75 73 | 65 5f 6c 69 6d 69 74 28 |....mous|e_limit(|
|00002df0| 62 2c 77 68 61 6e 64 6c | 65 25 29 0d 01 df 2c 62 |b,whandl|e%)...,b|
|00002e00| 21 30 3d 77 68 61 6e 64 | 6c 65 25 3a c8 99 20 22 |!0=whand|le%:.. "|
|00002e10| 57 69 6d 70 5f 47 65 74 | 57 69 6e 64 6f 77 53 74 |Wimp_Get|WindowSt|
|00002e20| 61 74 65 22 2c 2c 62 0d | 01 e0 2f f2 6d 6f 75 73 |ate",,b.|../.mous|
|00002e30| 65 5f 72 65 63 74 61 6e | 67 6c 65 28 62 21 34 2c |e_rectan|gle(b!4,|
|00002e40| 62 21 38 2c 62 21 31 32 | 2d 62 21 34 2c 62 21 31 |b!8,b!12|-b!4,b!1|
|00002e50| 36 2d 62 21 38 29 0d 01 | e1 05 e1 0d 01 e2 04 0d |6-b!8)..|........|
|00002e60| 01 e3 14 dd f2 64 65 6c | 61 79 28 73 65 63 6f 6e |.....del|ay(secon|
|00002e70| 64 73 29 0d 01 e4 0a ea | 20 74 69 6d 65 0d 01 e5 |ds).....| time...|
|00002e80| 1e 74 69 6d 65 20 3d 20 | 91 20 2b 20 28 73 65 63 |.time = |. + (sec|
|00002e90| 6f 6e 64 73 20 2a 20 31 | 30 30 29 0d 01 e6 05 f5 |onds * 1|00).....|
|00002ea0| 0d 01 e7 0e fd 20 91 20 | 3e 20 74 69 6d 65 0d 01 |..... . |> time..|
|00002eb0| e8 05 e1 0d 01 e9 04 0d | 01 ea 19 dd a4 75 70 70 |........|.....upp|
|00002ec0| 65 72 5f 63 61 73 65 28 | 73 74 72 69 6e 67 24 29 |er_case(|string$)|
|00002ed0| 0d 01 eb 0b ea 20 6c 6f | 6f 70 25 0d 01 ec 16 e7 |..... lo|op%.....|
|00002ee0| 20 a9 28 73 74 72 69 6e | 67 24 29 20 3e 20 30 20 | .(strin|g$) > 0 |
|00002ef0| 8c 0d 01 ed 1d 20 e3 20 | 6c 6f 6f 70 25 20 3d 20 |..... . |loop% = |
|00002f00| 31 20 b8 20 a9 28 73 74 | 72 69 6e 67 24 29 0d 01 |1 . .(st|ring$)..|
|00002f10| ee 3a 20 20 20 e7 20 c1 | 73 74 72 69 6e 67 24 2c |.:   . .|string$,|
|00002f20| 6c 6f 6f 70 25 2c 31 29 | 3e 3d 22 61 22 20 80 20 |loop%,1)|>="a" . |
|00002f30| c1 73 74 72 69 6e 67 24 | 2c 6c 6f 6f 70 25 2c 31 |.string$|,loop%,1|
|00002f40| 29 3c 3d 22 7a 22 20 8c | 0d 01 ef 3a 20 20 20 20 |)<="z" .|...:    |
|00002f50| 20 c1 73 74 72 69 6e 67 | 24 2c 6c 6f 6f 70 25 2c | .string|$,loop%,|
|00002f60| 31 29 20 3d 20 bd 28 97 | 28 c1 73 74 72 69 6e 67 |1) = .(.|(.string|
|00002f70| 24 2c 6c 6f 6f 70 25 2c | 31 29 29 20 80 20 26 44 |$,loop%,|1)) . &D|
|00002f80| 46 29 0d 01 f0 08 20 20 | 20 cd 0d 01 f1 0c 20 ed |F)....  | ..... .|
|00002f90| 20 6c 6f 6f 70 25 0d 01 | f2 05 cd 0d 01 f3 0d 3d | loop%..|.......=|
|00002fa0| 20 73 74 72 69 6e 67 24 | 0d 01 f4 04 0d 01 f5 27 | string$|.......'|
|00002fb0| dd f2 57 69 6e 64 6f 77 | 5f 52 65 54 69 74 6c 65 |..Window|_ReTitle|
|00002fc0| 28 62 2c 77 68 61 6e 64 | 6c 65 25 2c 74 69 74 6c |(b,whand|le%,titl|
|00002fd0| 65 24 29 0d 01 f6 0b ea | 20 77 6f 62 6c 6b 0d 01 |e$).....| woblk..|
|00002fe0| f7 0d de 20 77 6f 62 6c | 6b 20 35 0d 01 f8 10 62 |... wobl|k 5....b|
|00002ff0| 21 30 3d 77 68 61 6e 64 | 6c 65 25 0d 01 f9 1e c8 |!0=whand|le%.....|
|00003000| 99 20 22 57 69 6d 70 5f | 47 65 74 57 69 6e 64 6f |. "Wimp_|GetWindo|
|00003010| 77 49 6e 66 6f 22 2c 2c | 62 0d 01 fa 15 24 28 21 |wInfo",,|b....$(!|
|00003020| 28 62 2b 37 36 29 29 3d | 74 69 74 6c 65 24 0d 01 |(b+76))=|title$..|
|00003030| fb 14 77 6f 62 6c 6b 21 | 30 3d 77 68 61 6e 64 6c |..woblk!|0=whandl|
|00003040| 65 25 0d 01 fc 25 c8 99 | 20 22 57 69 6d 70 5f 47 |e%...%..| "Wimp_G|
|00003050| 65 74 57 69 6e 64 6f 77 | 4f 75 74 6c 69 6e 65 22 |etWindow|Outline"|
|00003060| 2c 2c 77 6f 62 6c 6b 0d | 01 fd 44 c8 99 20 22 57 |,,woblk.|..D.. "W|
|00003070| 69 6d 70 5f 46 6f 72 63 | 65 52 65 64 72 61 77 22 |imp_Forc|eRedraw"|
|00003080| 2c 2d 31 2c 77 6f 62 6c | 6b 21 34 2c 28 77 6f 62 |,-1,wobl|k!4,(wob|
|00003090| 6c 6b 21 31 36 29 2d 34 | 30 2c 77 6f 62 6c 6b 21 |lk!16)-4|0,woblk!|
|000030a0| 31 32 2c 77 6f 62 6c 6b | 21 31 36 0d 01 fe 05 e1 |12,woblk|!16.....|
|000030b0| 0d 01 ff 04 0d 02 00 11 | dd a4 6c 65 61 66 28 70 |........|..leaf(p|
|000030c0| 61 74 68 24 29 0d 02 01 | 12 c8 95 20 a7 70 61 74 |ath$)...|... .pat|
|000030d0| 68 24 2c 22 2e 22 29 0d | 02 02 21 20 20 70 61 74 |h$,".").|..!  pat|
|000030e0| 68 24 3d c1 70 61 74 68 | 24 2c a7 70 61 74 68 24 |h$=.path|$,.path$|
|000030f0| 2c 22 2e 22 29 2b 31 29 | 0d 02 03 05 ce 0d 02 04 |,".")+1)|........|
|00003100| 0a 3d 70 61 74 68 24 0d | 02 05 04 0d 02 06 10 dd |.=path$.|........|
|00003110| a4 67 6e 61 6d 65 28 70 | 74 72 29 0d 02 07 09 66 |.gname(p|tr)....f|
|00003120| 24 3d 22 22 0d 02 08 19 | c8 95 20 3f 70 74 72 3c |$=""....|.. ?ptr<|
|00003130| 3e 30 20 80 20 3f 70 74 | 72 3c 3e 31 33 0d 02 09 |>0 . ?pt|r<>13...|
|00003140| 18 20 20 66 24 3d 66 24 | 2b bd 3f 70 74 72 3a 70 |.  f$=f$|+.?ptr:p|
|00003150| 74 72 2b 3d 31 0d 02 0a | 05 ce 0d 02 0b 07 3d 66 |tr+=1...|......=f|
|00003160| 24 0d 02 0c 04 0d 02 0d | 1a dd a4 66 69 6c 65 5f |$.......|...file_|
|00003170| 6c 65 6e 67 74 68 28 6f | 62 6a 65 63 74 24 29 0d |length(o|bject$).|
|00003180| 02 0e 37 ea 20 74 79 70 | 65 25 2c 6c 6f 61 64 5f |..7. typ|e%,load_|
|00003190| 61 64 64 72 25 2c 65 78 | 65 63 5f 61 64 64 72 25 |addr%,ex|ec_addr%|
|000031a0| 2c 6c 65 6e 67 74 68 25 | 2c 61 74 74 73 25 2c 73 |,length%|,atts%,s|
|000031b0| 74 72 69 6e 67 24 0d 02 | 0f 47 c8 99 20 22 4f 53 |tring$..|.G.. "OS|
|000031c0| 5f 46 69 6c 65 22 2c 35 | 2c 6f 62 6a 65 63 74 24 |_File",5|,object$|
|000031d0| 20 b8 20 74 79 70 65 25 | 2c 2c 6c 6f 61 64 5f 61 | . type%|,,load_a|
|000031e0| 64 64 72 25 2c 65 78 65 | 63 5f 61 64 64 72 25 2c |ddr%,exe|c_addr%,|
|000031f0| 6c 65 6e 67 74 68 25 2c | 61 74 74 73 25 0d 02 10 |length%,|atts%...|
|00003200| 0c 3d 6c 65 6e 67 74 68 | 25 0d 02 11 04 0d 02 12 |.=length|%.......|
|00003210| 13 dd a4 66 69 6c 65 5f | 64 61 74 65 28 46 24 29 |...file_|date(F$)|
|00003220| 0d 02 13 0e ea 20 4c 25 | 2c 41 25 2c 54 25 0d 02 |..... L%|,A%,T%..|
|00003230| 14 17 24 66 62 75 66 66 | 65 72 25 3d c4 32 38 2c |..$fbuff|er%=.28,|
|00003240| bd 28 30 29 29 0d 02 15 | 2f c8 99 20 22 4f 53 5f |.(0))...|/.. "OS_|
|00003250| 46 69 6c 65 22 2c 35 2c | 46 24 20 b8 20 54 25 2c |File",5,|F$ . T%,|
|00003260| 2c 6c 61 64 64 72 25 2c | 65 61 64 64 72 25 2c 4c |,laddr%,|eaddr%,L|
|00003270| 25 2c 41 25 0d 02 16 3b | f4 20 6c 6f 61 64 20 61 |%,A%...;|. load a|
|00003280| 6e 64 20 65 78 65 63 75 | 74 69 6f 6e 20 61 64 64 |nd execu|tion add|
|00003290| 72 65 73 73 65 73 20 61 | 72 65 2c 20 69 6e 20 66 |resses a|re, in f|
|000032a0| 61 63 74 2c 20 74 69 6d | 65 20 73 74 61 6d 70 0d |act, tim|e stamp.|
|000032b0| 02 17 19 66 64 61 74 65 | 25 3f 34 3d 6c 61 64 64 |...fdate|%?4=ladd|
|000032c0| 72 25 20 80 20 26 46 46 | 0d 02 18 1d 66 64 61 74 |r% . &FF|....fdat|
|000032d0| 65 25 3f 33 3d 65 61 64 | 64 72 25 3e 3e 32 34 20 |e%?3=ead|dr%>>24 |
|000032e0| 80 20 26 46 46 0d 02 19 | 1d 66 64 61 74 65 25 3f |. &FF...|.fdate%?|
|000032f0| 32 3d 65 61 64 64 72 25 | 3e 3e 31 36 20 80 20 26 |2=eaddr%|>>16 . &|
|00003300| 46 46 0d 02 1a 1d 66 64 | 61 74 65 25 3f 31 3d 65 |FF....fd|ate%?1=e|
|00003310| 61 64 64 72 25 3e 3e 38 | 20 20 80 20 26 46 46 0d |addr%>>8|  . &FF.|
|00003320| 02 1b 1d 66 64 61 74 65 | 25 3f 30 3d 65 61 64 64 |...fdate|%?0=eadd|
|00003330| 72 25 20 20 20 20 20 80 | 20 26 46 46 0d 02 1c 3c |r%     .| &FF...<|
|00003340| c8 99 20 22 4f 53 5f 43 | 6f 6e 76 65 72 74 53 74 |.. "OS_C|onvertSt|
|00003350| 61 6e 64 61 72 64 44 61 | 74 65 41 6e 64 54 69 6d |andardDa|teAndTim|
|00003360| 65 22 2c 20 66 64 61 74 | 65 25 2c 20 66 62 75 66 |e", fdat|e%, fbuf|
|00003370| 66 65 72 25 2c 20 32 38 | 0d 02 1d 0e 3d 24 66 62 |fer%, 28|....=$fb|
|00003380| 75 66 66 65 72 25 0d 02 | 1e 04 0d 02 1f 19 dd a4 |uffer%..|........|
|00003390| 75 70 70 65 72 5f 63 61 | 73 65 28 73 74 72 69 6e |upper_ca|se(strin|
|000033a0| 67 24 29 0d 02 20 0b ea | 20 6c 6f 6f 70 25 0d 02 |g$).. ..| loop%..|
|000033b0| 21 16 e7 20 a9 28 73 74 | 72 69 6e 67 24 29 20 3e |!.. .(st|ring$) >|
|000033c0| 20 30 20 8c 0d 02 22 1d | 20 e3 20 6c 6f 6f 70 25 | 0 ...".| . loop%|
|000033d0| 20 3d 20 31 20 b8 20 a9 | 28 73 74 72 69 6e 67 24 | = 1 . .|(string$|
|000033e0| 29 0d 02 23 3a 20 20 20 | e7 20 c1 73 74 72 69 6e |)..#:   |. .strin|
|000033f0| 67 24 2c 6c 6f 6f 70 25 | 2c 31 29 3e 3d 22 61 22 |g$,loop%|,1)>="a"|
|00003400| 20 80 20 c1 73 74 72 69 | 6e 67 24 2c 6c 6f 6f 70 | . .stri|ng$,loop|
|00003410| 25 2c 31 29 3c 3d 22 7a | 22 20 8c 0d 02 24 3a 20 |%,1)<="z|" ...$: |
|00003420| 20 20 20 20 c1 73 74 72 | 69 6e 67 24 2c 6c 6f 6f |    .str|ing$,loo|
|00003430| 70 25 2c 31 29 20 3d 20 | bd 28 97 28 c1 73 74 72 |p%,1) = |.(.(.str|
|00003440| 69 6e 67 24 2c 6c 6f 6f | 70 25 2c 31 29 29 20 80 |ing$,loo|p%,1)) .|
|00003450| 20 26 44 46 29 0d 02 25 | 08 20 20 20 cd 0d 02 26 | &DF)..%|.   ...&|
|00003460| 0c 20 ed 20 6c 6f 6f 70 | 25 0d 02 27 05 cd 0d 02 |. . loop|%..'....|
|00003470| 28 0d 3d 20 73 74 72 69 | 6e 67 24 0d 02 29 04 0d |(.= stri|ng$..)..|
|00003480| 02 2a 0a dd f2 6d 62 74 | 73 0d 02 2b 2b 71 25 21 |.*...mbt|s..++q%!|
|00003490| 30 3d 34 3a 71 25 21 34 | 3d 35 3a 71 25 21 38 3d |0=4:q%!4|=5:q%!8=|
|000034a0| 31 31 3a 71 25 21 31 32 | 3d 31 32 3a 71 25 21 31 |11:q%!12|=12:q%!1|
|000034b0| 36 3d 2d 31 0d 02 2c 25 | c8 99 20 22 4f 53 5f 52 |6=-1..,%|.. "OS_R|
|000034c0| 65 61 64 56 64 75 56 61 | 72 69 61 62 6c 65 73 22 |eadVduVa|riables"|
|000034d0| 2c 71 25 2c 71 25 2b 32 | 30 0d 02 2d 2f c8 97 20 |,q%,q%+2|0..-/.. |
|000034e0| c8 93 20 30 2c 30 2c 71 | 25 21 32 38 2a 28 31 3c |.. 0,0,q|%!28*(1<|
|000034f0| 3c 71 25 21 32 30 29 2c | 71 25 21 33 32 2a 28 31 |<q%!20),|q%!32*(1|
|00003500| 3c 3c 71 25 21 32 34 29 | 0d 02 2e 05 e1 0d 02 2f |<<q%!24)|......./|
|00003510| 04 0d 02 30 1a dd f2 6f | 70 65 6e 63 65 6e 74 72 |...0...o|pencentr|
|00003520| 65 28 77 68 61 6e 64 6c | 65 25 29 0d 02 31 25 ea |e(whandl|e%)..1%.|
|00003530| 20 78 25 2c 79 25 2c 73 | 63 72 78 25 2c 73 63 72 | x%,y%,s|crx%,scr|
|00003540| 79 25 2c 64 78 25 2c 64 | 79 25 2c 77 25 2c 68 25 |y%,dx%,d|y%,w%,h%|
|00003550| 0d 02 32 2b 71 25 21 30 | 3d 34 3a 71 25 21 34 3d |..2+q%!0|=4:q%!4=|
|00003560| 35 3a 71 25 21 38 3d 31 | 31 3a 71 25 21 31 32 3d |5:q%!8=1|1:q%!12=|
|00003570| 31 32 3a 71 25 21 31 36 | 3d 2d 31 0d 02 33 25 c8 |12:q%!16|=-1..3%.|
|00003580| 99 20 22 4f 53 5f 52 65 | 61 64 56 64 75 56 61 72 |. "OS_Re|adVduVar|
|00003590| 69 61 62 6c 65 73 22 2c | 71 25 2c 71 25 2b 32 30 |iables",|q%,q%+20|
|000035a0| 0d 02 34 21 64 78 25 3d | 31 3c 3c 28 71 25 21 32 |..4!dx%=|1<<(q%!2|
|000035b0| 30 29 3a 64 79 25 3d 31 | 3c 3c 28 71 25 21 32 34 |0):dy%=1|<<(q%!24|
|000035c0| 29 0d 02 35 2b 73 63 72 | 78 25 3d 28 71 25 21 32 |)..5+scr|x%=(q%!2|
|000035d0| 38 2b 31 29 2a 64 78 25 | 3a 73 63 72 79 25 3d 28 |8+1)*dx%|:scry%=(|
|000035e0| 71 25 21 33 32 2b 31 29 | 2a 64 79 25 0d 02 36 2e |q%!32+1)|*dy%..6.|
|000035f0| 71 25 21 30 3d 77 68 61 | 6e 64 6c 65 25 3a c8 99 |q%!0=wha|ndle%:..|
|00003600| 20 22 57 69 6d 70 5f 47 | 65 74 57 69 6e 64 6f 77 | "Wimp_G|etWindow|
|00003610| 53 74 61 74 65 22 2c 2c | 71 25 0d 02 37 1f 77 25 |State",,|q%..7.w%|
|00003620| 3d 71 25 21 31 32 2d 71 | 25 21 34 3a 68 25 3d 71 |=q%!12-q|%!4:h%=q|
|00003630| 25 21 31 36 2d 71 25 21 | 38 0d 02 38 23 78 25 3d |%!16-q%!|8..8#x%=|
|00003640| 28 73 63 72 78 25 2d 77 | 25 29 2f 32 3a 79 25 3d |(scrx%-w|%)/2:y%=|
|00003650| 28 73 63 72 79 25 2d 68 | 25 29 2f 32 0d 02 39 13 |(scry%-h|%)/2..9.|
|00003660| 71 25 21 34 3d 78 25 3a | 71 25 21 38 3d 79 25 0d |q%!4=x%:|q%!8=y%.|
|00003670| 02 3a 1b 71 25 21 31 32 | 3d 78 25 2b 77 25 3a 71 |.:.q%!12|=x%+w%:q|
|00003680| 25 21 31 36 3d 79 25 2b | 68 25 0d 02 3b 0c 71 25 |%!16=y%+|h%..;.q%|
|00003690| 21 32 38 3d 2d 31 0d 02 | 3c 1c c8 99 20 22 57 69 |!28=-1..|<... "Wi|
|000036a0| 6d 70 5f 4f 70 65 6e 57 | 69 6e 64 6f 77 22 2c 2c |mp_OpenW|indow",,|
|000036b0| 71 25 0d 02 3d 05 e1 0d | 02 3e 04 0d 02 3f 1f dd |q%..=...|.>...?..|
|000036c0| f2 69 63 6f 6e 5f 67 72 | 65 79 28 68 61 6e 64 6c |.icon_gr|ey(handl|
|000036d0| 65 25 2c 69 63 6f 6e 68 | 25 29 0d 02 40 2a f2 69 |e%,iconh|%)..@*.i|
|000036e0| 63 6f 6e 5f 73 65 74 66 | 67 63 6f 6c 6f 75 72 28 |con_setf|gcolour(|
|000036f0| 71 25 2c 68 61 6e 64 6c | 65 25 2c 69 63 6f 6e 68 |q%,handl|e%,iconh|
|00003700| 25 2c 33 29 0d 02 41 05 | e1 0d 02 42 04 0d 02 43 |%,3)..A.|...B...C|
|00003710| 20 dd f2 69 63 6f 6e 5f | 62 6c 61 63 6b 28 68 61 | ..icon_|black(ha|
|00003720| 6e 64 6c 65 25 2c 69 63 | 6f 6e 68 25 29 0d 02 44 |ndle%,ic|onh%)..D|
|00003730| 2a f2 69 63 6f 6e 5f 73 | 65 74 66 67 63 6f 6c 6f |*.icon_s|etfgcolo|
|00003740| 75 72 28 71 25 2c 68 61 | 6e 64 6c 65 25 2c 69 63 |ur(q%,ha|ndle%,ic|
|00003750| 6f 6e 68 25 2c 37 29 0d | 02 45 05 e1 0d 02 46 04 |onh%,7).|.E....F.|
|00003760| 0d 02 47 0a dd f2 73 63 | 61 6e 0d 02 48 0b ea 20 |..G...sc|an..H.. |
|00003770| 66 72 65 64 25 0d 02 49 | 0f 73 63 61 6e 6e 69 6e |fred%..I|.scannin|
|00003780| 67 25 3d b9 0d 02 4a 29 | e7 20 28 6d 75 6c 74 69 |g%=...J)|. (multi|
|00003790| 25 20 80 20 31 29 3c 3e | 31 20 8c 20 c8 99 20 22 |% . 1)<>|1 . .. "|
|000037a0| 48 6f 75 72 67 6c 61 73 | 73 5f 4f 6e 22 0d 02 4b |Hourglas|s_On"..K|
|000037b0| 19 73 70 61 72 6b 66 73 | 25 3d a3 3a 61 72 63 68 |.sparkfs|%=.:arch|
|000037c0| 69 76 65 25 3d a3 0d 02 | 4c 2a c8 99 20 22 57 69 |ive%=...|L*.. "Wi|
|000037d0| 6d 70 45 78 74 5f 47 65 | 74 49 63 6f 6e 22 2c 2c |mpExt_Ge|tIcon",,|
|000037e0| 2c 6d 61 69 6e 25 2c 34 | 20 b8 20 66 72 65 64 25 |,main%,4| . fred%|
|000037f0| 0d 02 4d 0f e7 20 66 72 | 65 64 25 3d 31 20 8c 0d |..M.. fr|ed%=1 ..|
|00003800| 02 4e 31 20 20 20 c8 99 | 20 22 57 69 6d 70 45 78 |.N1   ..| "WimpEx|
|00003810| 74 5f 47 65 74 49 63 6f | 6e 22 2c 2c 2c 63 6f 6e |t_GetIco|n",,,con|
|00003820| 74 72 6f 6c 25 2c 31 31 | 20 b8 20 66 72 65 64 25 |trol%,11| . fred%|
|00003830| 0d 02 4f 2a 20 20 20 e7 | 20 66 72 65 64 25 3d 31 |..O*   .| fred%=1|
|00003840| 20 8c 20 73 70 61 72 6b | 66 73 25 3d b9 20 8b 20 | . spark|fs%=. . |
|00003850| 61 72 63 68 69 76 65 25 | 3d b9 0d 02 50 05 cd 0d |archive%|=...P...|
|00003860| 02 51 12 e7 20 73 70 61 | 72 6b 66 73 25 3d b9 20 |.Q.. spa|rkfs%=. |
|00003870| 8c 0d 02 52 23 20 20 20 | c8 99 20 22 58 4f 53 5f |...R#   |.. "XOS_|
|00003880| 43 4c 49 22 2c 22 49 6d | 61 67 65 46 53 46 69 78 |CLI","Im|ageFSFix|
|00003890| 5f 4f 6e 22 0d 02 53 05 | cc 0d 02 54 24 20 20 20 |_On"..S.|...T$   |
|000038a0| c8 99 20 22 58 4f 53 5f | 43 4c 49 22 2c 22 49 6d |.. "XOS_|CLI","Im|
|000038b0| 61 67 65 46 53 46 69 78 | 5f 4f 66 66 22 0d 02 55 |ageFSFix|_Off"..U|
|000038c0| 05 cd 0d 02 56 27 f2 69 | 63 6f 6e 5f 70 75 74 64 |....V'.i|con_putd|
|000038d0| 61 74 61 28 71 25 2c 6d | 61 69 6e 25 2c 36 2c 22 |ata(q%,m|ain%,6,"|
|000038e0| 53 54 4f 50 22 2c 2d 31 | 29 0d 02 57 3a f2 69 63 |STOP",-1|)..W:.ic|
|000038f0| 6f 6e 5f 70 75 74 64 61 | 74 61 28 71 25 2c 6d 61 |on_putda|ta(q%,ma|
|00003900| 69 6e 25 2c 32 2c a4 69 | 63 6f 6e 5f 67 65 74 64 |in%,2,.i|con_getd|
|00003910| 61 74 61 28 71 25 2c 6d | 61 69 6e 25 2c 32 29 2c |ata(q%,m|ain%,2),|
|00003920| 2d 31 29 0d 02 58 42 f2 | 69 63 6f 6e 5f 67 72 65 |-1)..XB.|icon_gre|
|00003930| 79 28 6d 61 69 6e 25 2c | 32 29 3a f2 69 63 6f 6e |y(main%,|2):.icon|
|00003940| 5f 62 6c 61 63 6b 28 6d | 61 69 6e 25 2c 39 29 3a |_black(m|ain%,9):|
|00003950| f2 69 63 6f 6e 5f 62 6c | 61 63 6b 28 6d 61 69 6e |.icon_bl|ack(main|
|00003960| 25 2c 31 32 29 0d 02 59 | 2e f2 69 63 6f 6e 5f 62 |%,12)..Y|..icon_b|
|00003970| 6c 61 63 6b 28 6d 61 69 | 6e 25 2c 31 33 29 3a f2 |lack(mai|n%,13):.|
|00003980| 69 63 6f 6e 5f 62 6c 61 | 63 6b 28 6d 61 69 6e 25 |icon_bla|ck(main%|
|00003990| 2c 38 29 0d 02 5a 35 64 | 69 72 73 25 3d 30 3a 66 |,8)..Z5d|irs%=0:f|
|000039a0| 69 6c 65 73 25 3d 30 3a | 62 61 64 66 69 6c 65 73 |iles%=0:|badfiles|
|000039b0| 25 3d 30 3a 65 72 72 6f | 72 25 3d a3 3a f4 74 69 |%=0:erro|r%=.:.ti|
|000039c0| 6d 65 25 3d 54 49 4d 45 | 0d 02 5b 2b f2 72 65 63 |me%=TIME|..[+.rec|
|000039d0| 75 72 73 65 5f 64 69 72 | 28 a4 69 63 6f 6e 5f 67 |urse_dir|(.icon_g|
|000039e0| 65 74 64 61 74 61 28 71 | 25 2c 6d 61 69 6e 25 2c |etdata(q|%,main%,|
|000039f0| 32 29 29 0d 02 5c 41 f2 | 69 63 6f 6e 5f 62 6c 61 |2))..\A.|icon_bla|
|00003a00| 63 6b 28 6d 61 69 6e 25 | 2c 32 29 3a f2 69 63 6f |ck(main%|,2):.ico|
|00003a10| 6e 5f 67 72 65 79 28 6d | 61 69 6e 25 2c 39 29 3a |n_grey(m|ain%,9):|
|00003a20| f2 69 63 6f 6e 5f 67 72 | 65 79 28 6d 61 69 6e 25 |.icon_gr|ey(main%|
|00003a30| 2c 31 32 29 0d 02 5d 2c | f2 69 63 6f 6e 5f 67 72 |,12)..],|.icon_gr|
|00003a40| 65 79 28 6d 61 69 6e 25 | 2c 31 33 29 3a f2 69 63 |ey(main%|,13):.ic|
|00003a50| 6f 6e 5f 67 72 65 79 28 | 6d 61 69 6e 25 2c 38 29 |on_grey(|main%,8)|
|00003a60| 0d 02 5e 25 f2 69 63 6f | 6e 5f 70 75 74 64 61 74 |..^%.ico|n_putdat|
|00003a70| 61 28 71 25 2c 6d 61 69 | 6e 25 2c 36 2c 22 47 4f |a(q%,mai|n%,6,"GO|
|00003a80| 22 2c 2d 31 29 0d 02 5f | 2a e7 20 28 6d 75 6c 74 |",-1).._|*. (mult|
|00003a90| 69 25 20 80 20 31 29 3c | 3e 31 20 8c 20 c8 99 20 |i% . 1)<|>1 . .. |
|00003aa0| 22 48 6f 75 72 67 6c 61 | 73 73 5f 4f 66 66 22 0d |"Hourgla|ss_Off".|
|00003ab0| 02 60 0f 73 63 61 6e 6e | 69 6e 67 25 3d a3 0d 02 |.`.scann|ing%=...|
|00003ac0| 61 05 e1 0d 02 62 04 0d | 02 63 17 dd f2 72 65 63 |a....b..|.c...rec|
|00003ad0| 75 72 73 65 5f 64 69 72 | 28 64 69 72 24 29 0d 02 |urse_dir|(dir$)..|
|00003ae0| 64 2a f4 20 52 65 63 75 | 72 73 65 73 20 64 69 72 |d*. Recu|rses dir|
|00003af0| 65 63 74 6f 72 79 20 70 | 65 72 66 6f 72 6d 69 6e |ectory p|erformin|
|00003b00| 67 20 61 63 74 69 6f 6e | 0d 02 65 0d ea 20 6f 66 |g action|..e.. of|
|00003b10| 66 25 2c 6e 24 0d 02 66 | 29 e7 20 28 6d 75 6c 74 |f%,n$..f|). (mult|
|00003b20| 69 25 20 80 20 38 29 3c | 3e 38 20 8c 20 f2 61 63 |i% . 8)<|>8 . .ac|
|00003b30| 74 69 6f 6e 28 a4 70 6f | 6c 6c 28 30 29 29 0d 02 |tion(.po|ll(0))..|
|00003b40| 67 23 e7 20 63 6c 6f 73 | 65 64 6f 77 6e 3d b9 20 |g#. clos|edown=. |
|00003b50| 84 20 73 63 61 6e 6e 69 | 6e 67 25 3d a3 20 8c 20 |. scanni|ng%=. . |
|00003b60| e1 0d 02 68 13 6f 66 66 | 25 3d 30 3a 64 69 72 73 |...h.off|%=0:dirs|
|00003b70| 25 2b 3d 31 0d 02 69 28 | f2 69 63 6f 6e 5f 70 75 |%+=1..i(|.icon_pu|
|00003b80| 74 64 61 74 61 28 71 25 | 2c 6d 61 69 6e 25 2c 31 |tdata(q%|,main%,1|
|00003b90| 32 2c c3 64 69 72 73 25 | 2c 2d 31 29 0d 02 6a 25 |2,.dirs%|,-1)..j%|
|00003ba0| f2 69 63 6f 6e 5f 70 75 | 74 64 61 74 61 28 71 25 |.icon_pu|tdata(q%|
|00003bb0| 2c 6d 61 69 6e 25 2c 38 | 2c 64 69 72 24 2c 2d 31 |,main%,8|,dir$,-1|
|00003bc0| 29 0d 02 6b 92 f5 20 c8 | 99 20 22 4f 53 5f 47 42 |)..k.. .|. "OS_GB|
|00003bd0| 50 42 22 2c 31 30 2c 64 | 69 72 24 2c 46 44 61 74 |PB",10,d|ir$,FDat|
|00003be0| 25 2c 31 2c 6f 66 66 25 | 2c 32 35 36 2c 22 2a 22 |%,1,off%|,256,"*"|
|00003bf0| 20 b8 20 2c 2c 70 25 2c | 2c 6f 66 66 25 3a e7 6f | . ,,p%,|,off%:.o|
|00003c00| 66 66 25 3d 2d 31 20 8b | 20 6e 24 3d a4 73 74 72 |ff%=-1 .| n$=.str|
|00003c10| 69 6e 67 28 70 25 2b 32 | 30 29 3a e7 28 70 25 21 |ing(p%+2|0):.(p%!|
|00003c20| 31 36 29 3d 32 20 8c 20 | f2 72 65 63 75 72 73 65 |16)=2 . |.recurse|
|00003c30| 5f 64 69 72 28 64 69 72 | 24 2b 22 2e 22 2b 6e 24 |_dir(dir|$+"."+n$|
|00003c40| 29 8b 20 f2 64 6f 5f 6f | 6e 65 28 64 69 72 24 2c |). .do_o|ne(dir$,|
|00003c50| 6e 24 29 0d 02 6c 0d fd | 20 6f 66 66 25 3d 2d 31 |n$)..l..| off%=-1|
|00003c60| 0d 02 6d 05 e1 0d 02 6e | 04 0d 02 6f 15 dd f2 64 |..m....n|...o...d|
|00003c70| 6f 5f 6f 6e 65 28 64 69 | 72 24 2c 6e 24 29 0d 02 |o_one(di|r$,n$)..|
|00003c80| 70 15 e7 20 73 63 61 6e | 6e 69 6e 67 25 3d a3 20 |p.. scan|ning%=. |
|00003c90| 8c 20 e1 0d 02 71 3a e7 | 20 28 6d 75 6c 74 69 25 |. ...q:.| (multi%|
|00003ca0| 20 80 20 32 29 3d 32 20 | 8c 20 f2 61 63 74 69 6f | . 2)=2 |. .actio|
|00003cb0| 6e 28 a4 70 6f 6c 6c 28 | 30 29 29 3a e7 20 63 6c |n(.poll(|0)):. cl|
|00003cc0| 6f 73 65 64 6f 77 6e 3d | b9 20 8c 20 e1 0d 02 72 |osedown=|. . ...r|
|00003cd0| 15 70 61 74 68 24 3d 64 | 69 72 24 2b 22 2e 22 2b |.path$=d|ir$+"."+|
|00003ce0| 6e 24 0d 02 73 10 6c 6f | 61 64 25 3d 21 46 44 61 |n$..s.lo|ad%=!FDa|
|00003cf0| 74 25 0d 02 74 3a e7 28 | 6c 6f 61 64 25 3e 3e 3e |t%..t:.(|load%>>>|
|00003d00| 32 30 29 3d 26 46 46 46 | 20 8c 20 74 79 70 65 25 |20)=&FFF| . type%|
|00003d10| 3d 28 6c 6f 61 64 25 3e | 3e 3e 38 29 80 26 46 46 |=(load%>|>>8).&FF|
|00003d20| 46 20 8b 20 74 79 70 65 | 25 3d 2d 31 0d 02 75 0d |F . type|%=-1..u.|
|00003d30| 66 69 6c 65 73 25 2b 3d | 31 0d 02 76 28 f2 69 63 |files%+=|1..v(.ic|
|00003d40| 6f 6e 5f 70 75 74 64 61 | 74 61 28 71 25 2c 6d 61 |on_putda|ta(q%,ma|
|00003d50| 69 6e 25 2c 39 2c c3 66 | 69 6c 65 73 25 2c 2d 31 |in%,9,.f|iles%,-1|
|00003d60| 29 0d 02 77 31 e7 74 79 | 70 65 25 3d 26 44 44 43 |)..w1.ty|pe%=&DDC|
|00003d70| 20 80 20 61 72 63 68 69 | 76 65 25 3d b9 20 8c 20 | . archi|ve%=. . |
|00003d80| f2 61 72 63 68 69 76 65 | 28 70 61 74 68 24 2c 6e |.archive|(path$,n|
|00003d90| 24 29 0d 02 78 0c 65 72 | 72 6f 72 25 3d a3 0d 02 |$)..x.er|ror%=...|
|00003da0| 79 15 f2 63 68 65 63 6b | 66 69 6c 65 28 70 61 74 |y..check|file(pat|
|00003db0| 68 24 29 0d 02 7a 05 e1 | 0d 02 7b 04 0d 02 7c 10 |h$)..z..|..{...|.|
|00003dc0| dd a4 73 74 72 69 6e 67 | 28 61 25 29 0d 02 7d 25 |..string|(a%)..}%|
|00003dd0| 61 24 3d 22 22 3a c8 95 | 20 3f 61 25 3e 3d 33 32 |a$="":..| ?a%>=32|
|00003de0| 3a 61 24 2b 3d bd 3f 61 | 25 3a 61 25 2b 3d 31 3a |:a$+=.?a|%:a%+=1:|
|00003df0| ce 0d 02 7e 07 3d 61 24 | 0d 02 7f 04 0d 02 80 17 |...~.=a$|........|
|00003e00| dd f2 61 72 63 68 69 76 | 65 28 70 61 74 68 24 2c |..archiv|e(path$,|
|00003e10| 6e 24 29 0d 02 81 2b c8 | 99 20 22 4f 53 5f 43 4c |n$)...+.|. "OS_CL|
|00003e20| 49 22 2c 22 4f 70 65 6e | 41 72 63 68 69 76 65 20 |I","Open|Archive |
|00003e30| 22 2b 70 61 74 68 24 2b | 22 20 22 2b 6e 24 0d 02 |"+path$+|" "+n$..|
|00003e40| 82 22 f2 72 65 63 75 72 | 73 65 5f 64 69 72 28 22 |.".recur|se_dir("|
|00003e50| 61 72 63 66 73 23 22 2b | 6e 24 2b 22 3a 24 22 29 |arcfs#"+|n$+":$")|
|00003e60| 0d 02 83 1e c8 99 20 22 | 4f 53 5f 43 4c 49 22 2c |...... "|OS_CLI",|
|00003e70| 22 43 6c 6f 73 65 41 72 | 63 68 69 76 65 22 0d 02 |"CloseAr|chive"..|
|00003e80| 84 05 e1 0d 02 85 04 0d | 02 86 16 dd f2 63 68 65 |........|.....che|
|00003e90| 63 6b 66 69 6c 65 28 70 | 61 74 68 24 29 0d 02 87 |ckfile(p|ath$)...|
|00003ea0| 08 ea 20 66 25 0d 02 88 | 1a ee 85 20 ea 20 f2 65 |.. f%...|... . .e|
|00003eb0| 72 72 6f 72 73 63 61 6e | 28 70 61 74 68 24 29 0d |rrorscan|(path$).|
|00003ec0| 02 89 10 e7 20 65 72 72 | 6f 72 25 3d a3 20 8c 0d |.... err|or%=. ..|
|00003ed0| 02 8a 12 20 20 20 66 25 | 3d 8e 28 70 61 74 68 24 |...   f%|=.(path$|
|00003ee0| 29 0d 02 8b 10 20 20 20 | c8 95 20 ac 20 c5 23 66 |)....   |.. . .#f|
|00003ef0| 25 0d 02 8c 1c 20 20 20 | 20 20 20 e7 20 28 6d 75 |%....   |   . (mu|
|00003f00| 6c 74 69 25 20 80 20 31 | 29 3d 31 20 8c 0d 02 8d |lti% . 1|)=1 ....|
|00003f10| 1e 20 20 20 20 20 20 20 | 20 20 f2 61 63 74 69 6f |.       |  .actio|
|00003f20| 6e 28 a4 70 6f 6c 6c 28 | 30 29 29 0d 02 8e 2a 20 |n(.poll(|0))...* |
|00003f30| 20 20 20 20 20 20 20 20 | e7 20 63 6c 6f 73 65 64 |        |. closed|
|00003f40| 6f 77 6e 3d b9 20 84 20 | 73 63 61 6e 6e 69 6e 67 |own=. . |scanning|
|00003f50| 25 3d a3 20 8c 0d 02 8f | 14 20 20 20 20 20 20 20 |%=. ....|.       |
|00003f60| 20 20 20 20 20 d9 23 66 | 25 0d 02 90 11 20 20 20 |     .#f|%....   |
|00003f70| 20 20 20 20 20 20 20 20 | 20 e1 0d 02 91 0e 20 20 |        | .....  |
|00003f80| 20 20 20 20 20 20 20 cd | 0d 02 92 0b 20 20 20 20 |       .|....    |
|00003f90| 20 20 cd 0d 02 93 27 20 | 20 20 20 20 20 e7 20 28 |  ....' |     . (|
|00003fa0| 6d 75 6c 74 69 25 20 80 | 20 31 29 3c 3e 31 20 80 |multi% .| 1)<>1 .|
|00003fb0| 20 a6 2d 31 31 33 3d b9 | 20 8c 0d 02 94 10 20 20 | .-113=.| .....  |
|00003fc0| 20 20 20 20 20 20 20 ef | 20 37 0d 02 95 11 20 20 |       .| 7....  |
|00003fd0| 20 20 20 20 20 20 20 d9 | 23 66 25 0d 02 96 18 20 |       .|#f%.... |
|00003fe0| 20 20 20 20 20 20 20 20 | 73 63 61 6e 6e 69 6e 67 |        |scanning|
|00003ff0| 25 3d a3 0d 02 97 0e 20 | 20 20 20 20 20 20 20 20 |%=..... |        |
|00004000| e1 0d 02 98 0b 20 20 20 | 20 20 20 cd 0d 02 99 1e |.....   |   .....|
|00004010| 20 20 20 20 20 20 e7 20 | 28 6d 75 6c 74 69 25 20 |      . |(multi% |
|00004020| 80 20 31 36 29 3d 31 36 | 20 8c 0d 02 9a 2f 20 20 |. 16)=16| ..../  |
|00004030| 20 20 20 20 20 20 20 c8 | 99 20 22 4f 53 5f 47 42 |       .|. "OS_GB|
|00004040| 50 42 22 2c 34 2c 66 25 | 2c 62 75 66 66 65 72 61 |PB",4,f%|,buffera|
|00004050| 72 65 61 25 2c 31 30 32 | 34 0d 02 9b 0b 20 20 20 |rea%,102|4....   |
|00004060| 20 20 20 cc 0d 02 9c 32 | 20 20 20 20 20 20 20 20 |   ....2|        |
|00004070| 20 c8 99 20 22 4f 53 5f | 47 42 50 42 22 2c 34 2c | .. "OS_|GBPB",4,|
|00004080| 66 25 2c 62 75 66 66 65 | 72 61 72 65 61 25 2c 31 |f%,buffe|rarea%,1|
|00004090| 30 32 34 2a 31 36 0d 02 | 9d 0b 20 20 20 20 20 20 |024*16..|..      |
|000040a0| cd 0d 02 9e 08 20 20 20 | ce 0d 02 9f 0b 20 20 20 |.....   |.....   |
|000040b0| d9 23 66 25 0d 02 a0 05 | cd 0d 02 a1 0c 65 72 72 |.#f%....|.....err|
|000040c0| 6f 72 25 3d a3 0d 02 a2 | 05 e1 0d 02 a3 04 0d 02 |or%=....|........|
|000040d0| a4 16 dd f2 65 72 72 6f | 72 73 63 61 6e 28 70 61 |....erro|rscan(pa|
|000040e0| 74 68 24 29 0d 02 a5 10 | 62 61 64 66 69 6c 65 73 |th$)....|badfiles|
|000040f0| 25 2b 3d 31 0d 02 a6 0c | 65 72 72 6f 72 25 3d b9 |%+=1....|error%=.|
|00004100| 0d 02 a7 2c f2 69 63 6f | 6e 5f 70 75 74 64 61 74 |...,.ico|n_putdat|
|00004110| 61 28 71 25 2c 6d 61 69 | 6e 25 2c 31 33 2c c3 62 |a(q%,mai|n%,13,.b|
|00004120| 61 64 66 69 6c 65 73 25 | 2c 2d 31 29 0d 02 a8 0e |adfiles%|,-1)....|
|00004130| e7 20 9f 3d 31 37 20 8c | 20 e0 0d 02 a9 3f 73 63 |. .=17 .| ....?sc|
|00004140| 61 6e 6e 69 6e 67 25 3d | a4 65 72 72 6f 72 62 6f |anning%=|.errorbo|
|00004150| 78 28 22 45 72 72 6f 72 | 20 72 65 61 64 69 6e 67 |x("Error| reading|
|00004160| 20 66 69 6c 65 20 27 22 | 2b 70 61 74 68 24 2b 22 | file '"|+path$+"|
|00004170| 27 20 3a 20 22 2b f6 24 | 29 0d 02 aa 05 e1 0d 02 |' : "+.$|).......|
|00004180| ab 04 0d 02 ac 16 dd f2 | 64 61 74 61 6c 6f 61 64 |........|dataload|
|00004190| 28 62 6c 6f 63 6b 25 29 | 0d 02 ad 0a ea 20 64 69 |(block%)|..... di|
|000041a0| 72 24 0d 02 ae 17 e7 20 | 62 6c 6f 63 6b 25 21 32 |r$..... |block%!2|
|000041b0| 30 3d 6d 61 69 6e 25 20 | 8c 0d 02 af 1d 20 20 20 |0=main% |.....   |
|000041c0| 64 69 72 24 3d a4 67 6e | 61 6d 65 28 62 6c 6f 63 |dir$=.gn|ame(bloc|
|000041d0| 6b 25 2b 34 34 29 0d 02 | b0 2d 20 20 20 e7 20 62 |k%+44)..|.-   . b|
|000041e0| 6c 6f 63 6b 25 21 34 30 | 3c 3d 26 46 46 46 20 8c |lock%!40|<=&FFF .|
|000041f0| 20 64 69 72 24 3d a4 67 | 65 74 64 69 72 28 64 69 | dir$=.g|etdir(di|
|00004200| 72 24 29 0d 02 b1 28 20 | 20 20 f2 69 63 6f 6e 5f |r$)...( |  .icon_|
|00004210| 70 75 74 64 61 74 61 28 | 71 25 2c 6d 61 69 6e 25 |putdata(|q%,main%|
|00004220| 2c 32 2c 64 69 72 24 2c | 2d 31 29 0d 02 b2 05 cd |,2,dir$,|-1).....|
|00004230| 0d 02 b3 05 e1 0d 02 b4 | 04 0d 02 b5 13 dd a4 67 |........|.......g|
|00004240| 65 74 64 69 72 28 70 61 | 74 68 24 29 0d 02 b6 10 |etdir(pa|th$)....|
|00004250| ea 20 69 25 2c 6a 25 2c | 6c 65 6e 25 0d 02 b7 11 |. i%,j%,|len%....|
|00004260| 6c 65 6e 25 3d a9 28 70 | 61 74 68 24 29 0d 02 b8 |len%=.(p|ath$)...|
|00004270| 11 e3 20 69 25 3d 31 20 | b8 20 6c 65 6e 25 0d 02 |.. i%=1 |. len%..|
|00004280| b9 1e e7 20 c1 70 61 74 | 68 24 2c 69 25 2c 31 29 |... .pat|h$,i%,1)|
|00004290| 3d 22 2e 22 20 8c 20 6a | 25 3d 69 25 0d 02 ba 08 |="." . j|%=i%....|
|000042a0| ed 20 69 25 0d 02 bb 24 | 70 61 74 68 24 3d c1 70 |. i%...$|path$=.p|
|000042b0| 61 74 68 24 2c 31 2c 6c | 65 6e 25 2d 28 6c 65 6e |ath$,1,l|en%-(len|
|000042c0| 25 2d 6a 25 2b 31 29 29 | 0d 02 bc 0a 3d 70 61 74 |%-j%+1))|....=pat|
|000042d0| 68 24 0d ff             |                         |h$..    |        |
+--------+-------------------------+-------------------------+--------+--------+