/ APDL Public Domain 1 / APDL_PD1A.iso / database / maxifile

< prev

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 41 72 63 68 69 76 65 00 | 8c 01 00 00 ec 01 00 00 |Archive.|........|
|00000010| 28 00 00 00 64 00 00 00 | 00 00 00 00 00 00 00 00 |(...d...|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000060| 82 21 4d 61 78 69 66 69 | 6c 65 00 00 ff ff ff ff |.!Maxifi|le......|
|00000070| 46 fd ff ff 37 37 ac 01 | 00 00 00 00 ff ff ff ff |F...77..|........|
|00000080| 68 01 00 80 82 21 42 6f | 6f 74 00 00 00 00 00 00 |h....!Bo|ot......|
|00000090| af 00 00 00 44 eb ff ff | 04 99 43 50 03 00 40 02 |....D...|..CP..@.|
|000000a0| af 00 00 00 24 00 00 00 | 82 21 52 75 6e 00 04 00 |....$...|.!Run...|
|000000b0| 00 00 00 00 3a 00 00 00 | 44 eb ff ff 0b 71 1d c8 |....:...|D....q..|
|000000c0| 03 00 5c e5 3a 00 00 00 | f7 00 00 00 82 21 52 75 |..\.:...|.....!Ru|
|000000d0| 6e 49 6d 61 67 65 00 00 | e8 dd 00 00 45 fb ff ff |nImage..|....E...|
|000000e0| b5 de e8 d0 03 00 f4 85 | e8 dd 00 00 55 01 00 00 |........|....U...|
|000000f0| 82 21 53 70 72 69 74 65 | 73 00 00 00 b4 0a 00 00 |.!Sprite|s.......|
|00000100| 44 f9 ff ff a5 e1 c1 60 | 03 00 27 4e b4 0a 00 00 |D......`|..'N....|
|00000110| 61 df 00 00 82 4c 69 62 | 42 4a 32 30 30 00 00 00 |a....Lib|BJ200...|
|00000120| 75 08 00 00 44 fb ff ff | c5 95 ce 67 03 00 6d 66 |u...D...|...g..mf|
|00000130| 75 08 00 00 39 ea 00 00 | 82 4c 69 62 45 70 73 6f |u...9...|.LibEpso|
|00000140| 6e 4c 51 00 9a 08 00 00 | 44 fb ff ff da 21 d8 67 |nLQ.....|D....!.g|
|00000150| 03 00 df 6d 9a 08 00 00 | d2 f2 00 00 82 4c 69 62 |...m....|.....Lib|
|00000160| 45 70 73 6f 6e 53 46 00 | 9d 08 00 00 44 fb ff ff |EpsonSF.|....D...|
|00000170| 6c 95 d2 76 03 00 61 6d | 9d 08 00 00 90 fb 00 00 |l..v..am|........|
|00000180| 82 52 65 61 64 4d 65 00 | 00 00 00 00 c4 b0 00 00 |.ReadMe.|........|
|00000190| 46 ff ff ff 3b 96 b5 01 | 03 00 31 49 c4 b0 00 00 |F...;...|..1I....|
|000001a0| 51 04 01 00 00 2e 24 00 | c3 00 04 00 00 00 00 00 |Q.....$.|........|
|000001b0| 00 00 00 00 e6 01 00 00 | 88 ff ff ff fe 01 00 00 |........|........|
|000001c0| b0 ff ff ff 4c fe 0e 07 | 00 00 00 00 00 00 00 00 |....L...|........|
|000001d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001e0| 00 00 00 00 00 00 00 00 | 68 01 00 00 46 69 6c 65 |........|h...File|
|000001f0| 44 61 74 61 82 21 42 6f | 6f 74 00 00 00 00 00 00 |Data.!Bo|ot......|
|00000200| af 00 00 00 44 eb ff ff | 04 99 43 50 03 00 40 02 |....D...|..CP..@.|
|00000210| 7c 3e 24 2e 21 4d 61 78 | 69 66 69 6c 65 2e 21 42 ||>$.!Max|ifile.!B|
|00000220| 6f 6f 74 20 66 69 6c 65 | 20 66 6f 72 20 4d 61 78 |oot file| for Max|
|00000230| 69 66 69 6c 65 20 34 2e | 0a 7c 0a 53 65 74 20 4d |ifile 4.|.|.Set M|
|00000240| 61 78 69 66 69 6c 65 24 | 44 69 72 20 3c 4f 62 65 |axifile$|Dir <Obe|
|00000250| 79 24 44 69 72 3e 0a 49 | 63 6f 6e 53 70 72 69 74 |y$Dir>.I|conSprit|
|00000260| 65 73 20 3c 4f 62 65 79 | 24 44 69 72 3e 2e 21 53 |es <Obey|$Dir>.!S|
|00000270| 70 72 69 74 65 73 0a 53 | 65 74 20 41 6c 69 61 73 |prites.S|et Alias|
|00000280| 24 40 52 75 6e 54 79 70 | 65 5f 30 41 30 20 2f 3c |$@RunTyp|e_0A0 /<|
|00000290| 4f 62 65 79 24 44 69 72 | 3e 2e 21 52 75 6e 20 25 |Obey$Dir|>.!Run %|
|000002a0| 25 2a 30 0a 53 65 74 20 | 46 69 6c 65 24 54 79 70 |%*0.Set |File$Typ|
|000002b0| 65 5f 30 41 30 20 4d 61 | 78 69 66 69 6c 65 0a 46 |e_0A0 Ma|xifile.F|
|000002c0| 69 6c 65 44 61 74 61 82 | 21 52 75 6e 00 04 00 00 |ileData.|!Run....|
|000002d0| 00 00 00 3a 00 00 00 44 | eb ff ff 0b 71 1d c8 03 |...:...D|....q...|
|000002e0| 00 5c e5 57 69 6d 70 53 | 6c 6f 74 20 2d 6d 69 6e |.\.WimpS|lot -min|
|000002f0| 20 36 34 30 4b 20 2d 6d | 61 78 20 36 34 30 4b 0a | 640K -m|ax 640K.|
|00000300| 52 75 6e 20 3c 4f 62 65 | 79 24 44 69 72 3e 2e 21 |Run <Obe|y$Dir>.!|
|00000310| 52 75 6e 49 6d 61 67 65 | 20 25 2a 30 0a 46 69 6c |RunImage| %*0.Fil|
|00000320| 65 44 61 74 61 82 21 52 | 75 6e 49 6d 61 67 65 00 |eData.!R|unImage.|
|00000330| 00 e8 dd 00 00 45 fb ff | ff b5 de e8 d0 03 00 f4 |.....E..|........|
|00000340| 85 0d 00 0a 1c f4 20 3e | 24 2e 21 4d 61 78 69 66 |...... >|$.!Maxif|
|00000350| 69 6c 65 2e 21 52 75 6e | 49 6d 61 67 65 0d 00 14 |ile.!Run|Image...|
|00000360| 1e f4 20 57 69 6d 70 20 | 76 65 72 73 69 6f 6e 20 |.. Wimp |version |
|00000370| 6f 66 20 4d 61 78 69 66 | 69 6c 65 0d 00 1e 13 f4 |of Maxif|ile.....|
|00000380| 20 56 65 72 73 69 6f 6e | 20 34 2e 31 34 64 0d 00 | Version| 4.14d..|
|00000390| 28 1f f4 20 28 43 29 20 | 43 68 72 69 73 20 57 72 |(.. (C) |Chris Wr|
|000003a0| 61 67 67 20 31 39 39 33 | 2c 31 39 39 34 0d 00 32 |agg 1993|,1994..2|
|000003b0| 04 0d 00 3c 09 f2 69 6e | 69 74 0d 00 46 38 ee 20 |...<..in|it..F8. |
|000003c0| 85 20 f2 65 72 72 6f 72 | 28 f6 24 2b 22 20 28 45 |. .error|(.$+" (E|
|000003d0| 72 72 6f 72 20 6e 6f 20 | 22 2b c3 28 9f 29 2b 22 |rror no |"+.(.)+"|
|000003e0| 20 61 74 20 6c 69 6e 65 | 20 22 2b c3 9e 2b 22 29 | at line| "+..+")|
|000003f0| 22 29 0d 00 50 04 0d 00 | 5a 0e c8 95 20 ac 20 71 |")..P...|Z... . q|
|00000400| 75 69 74 25 0d 00 64 27 | c8 99 20 22 57 69 6d 70 |uit%..d'|.. "Wimp|
|00000410| 5f 50 6f 6c 6c 22 2c 26 | 33 31 2c 62 6c 6f 63 6b |_Poll",&|31,block|
|00000420| 25 20 b8 20 72 65 61 73 | 6f 6e 25 0d 00 6e 10 c8 |% . reas|on%..n..|
|00000430| 8e 20 72 65 61 73 6f 6e | 25 20 ca 0d 00 78 07 c9 |. reason|% ...x..|
|00000440| 20 31 0d 00 82 10 c8 8e | 20 21 62 6c 6f 63 6b 25 | 1......| !block%|
|00000450| 20 ca 0d 00 8c 2b c9 20 | 6d 68 61 6e 64 6c 65 25 | ....+. |mhandle%|
|00000460| 3a f2 72 65 64 72 61 77 | 28 49 6e 64 65 78 25 28 |:.redraw|(Index%(|
|00000470| 49 6e 64 2c 6e 75 6d 62 | 65 72 25 29 29 0d 00 96 |Ind,numb|er%))...|
|00000480| 1d c9 20 70 72 69 6e 74 | 68 61 6e 64 6c 65 25 3a |.. print|handle%:|
|00000490| f2 64 72 61 77 70 72 69 | 6e 74 0d 00 a0 17 c9 20 |.drawpri|nt..... |
|000004a0| 73 72 68 61 6e 64 6c 65 | 25 3a f2 64 72 61 77 73 |srhandle|%:.draws|
|000004b0| 72 0d 00 aa 1b c9 20 73 | 6f 72 74 68 61 6e 64 6c |r..... s|orthandl|
|000004c0| 65 25 3a f2 64 72 61 77 | 73 6f 72 74 0d 00 b4 19 |e%:.draw|sort....|
|000004d0| c9 20 73 75 62 68 61 6e | 64 6c 65 25 3a f2 64 72 |. subhan|dle%:.dr|
|000004e0| 61 77 73 75 62 0d 00 be | 32 c9 20 6e 65 77 66 69 |awsub...|2. newfi|
|000004f0| 6c 65 25 3a f2 64 72 61 | 77 66 69 6c 65 28 22 45 |le%:.dra|wfile("E|
|00000500| 6e 74 65 72 20 6e 75 6d | 62 65 72 20 6f 66 20 66 |nter num|ber of f|
|00000510| 69 65 6c 64 73 22 29 0d | 00 c8 2e c9 20 6e 65 77 |ields").|.... new|
|00000520| 66 69 6c 65 32 25 3a f2 | 64 72 61 77 66 69 6c 65 |file2%:.|drawfile|
|00000530| 28 22 45 6e 74 65 72 20 | 66 69 65 6c 64 20 6e 61 |("Enter |field na|
|00000540| 6d 65 73 22 29 0d 00 d2 | 1a c9 20 6e 65 77 66 69 |mes")...|.. newfi|
|00000550| 6c 65 33 25 3a f2 64 72 | 61 77 66 69 6c 65 33 0d |le3%:.dr|awfile3.|
|00000560| 00 dc 3f c9 20 6e 65 77 | 66 69 6c 65 34 25 3a f2 |..?. new|file4%:.|
|00000570| 64 72 61 77 66 69 6c 65 | 28 22 4e 6f 20 6f 66 20 |drawfile|("No of |
|00000580| 72 65 63 6f 72 64 73 20 | 28 73 75 67 67 65 73 74 |records |(suggest|
|00000590| 65 64 20 64 65 66 61 75 | 6c 74 29 3a 22 29 0d 00 |ed defau|lt):")..|
|000005a0| e6 05 cb 0d 00 f0 0d c9 | 20 32 3a f2 6f 70 65 6e |........| 2:.open|
|000005b0| 0d 00 fa 0e c9 20 33 3a | f2 63 6c 6f 73 65 0d 01 |..... 3:|.close..|
|000005c0| 04 19 c9 20 36 3a f2 63 | 6c 69 63 6b 28 62 6c 6f |... 6:.c|lick(blo|
|000005d0| 63 6b 25 21 31 32 29 0d | 01 0e 12 c9 20 37 3a f2 |ck%!12).|.... 7:.|
|000005e0| 73 74 61 72 74 73 61 76 | 65 0d 01 18 1c c9 20 38 |startsav|e..... 8|
|000005f0| 3a f2 6b 65 79 70 72 65 | 73 73 28 62 6c 6f 63 6b |:.keypre|ss(block|
|00000600| 25 21 32 34 29 0d 01 22 | 13 c9 20 39 3a f2 6d 65 |%!24).."|.. 9:.me|
|00000610| 6e 75 73 65 6c 65 63 74 | 0d 01 2c 14 c9 20 31 37 |nuselect|..,.. 17|
|00000620| 2c 31 38 3a f2 72 65 63 | 65 69 76 65 0d 01 36 35 |,18:.rec|eive..65|
|00000630| c9 20 31 39 3a f2 72 65 | 70 6f 72 74 28 22 54 72 |. 19:.re|port("Tr|
|00000640| 61 6e 73 66 65 72 20 66 | 61 69 6c 65 64 20 2d 20 |ansfer f|ailed - |
|00000650| 72 65 63 65 69 76 65 72 | 20 64 65 61 64 22 2c 31 |receiver| dead",1|
|00000660| 29 0d 01 40 05 cb 0d 01 | 4a 05 ce 0d 01 54 17 c8 |)..@....|J....T..|
|00000670| 99 20 22 57 69 6d 70 5f | 43 6c 6f 73 65 44 6f 77 |. "Wimp_|CloseDow|
|00000680| 6e 22 0d 01 5e 05 e0 0d | 01 68 04 0d 01 72 0a dd |n"..^...|.h...r..|
|00000690| f2 69 6e 69 74 0d 01 7c | 38 ee 20 85 20 f2 65 72 |.init..||8. . .er|
|000006a0| 72 6f 72 28 f6 24 2b 22 | 20 28 45 72 72 6f 72 20 |ror(.$+"| (Error |
|000006b0| 6e 6f 20 22 2b c3 28 9f | 29 2b 22 20 61 74 20 6c |no "+.(.|)+" at l|
|000006c0| 69 6e 65 20 22 2b c3 9e | 2b 22 29 22 29 0d 01 86 |ine "+..|+")")...|
|000006d0| 1e c8 9b 20 22 3c 4f 62 | 65 79 24 44 69 72 3e 2e |... "<Ob|ey$Dir>.|
|000006e0| 4c 69 62 45 70 73 6f 6e | 4c 51 22 0d 01 90 04 0d |LibEpson|LQ".....|
|000006f0| 01 9a 85 de 20 62 6c 6f | 63 6b 25 20 32 35 35 2c |.... blo|ck% 255,|
|00000700| 20 69 6d 65 6e 75 25 20 | 37 35 2c 6d 61 69 6e 6d | imenu% |75,mainm|
|00000710| 65 6e 75 25 20 31 34 38 | 2c 73 6d 65 6e 75 31 25 |enu% 148|,smenu1%|
|00000720| 20 31 37 36 2c 73 73 6d | 65 6e 75 31 25 20 31 30 | 176,ssm|enu1% 10|
|00000730| 30 2c 73 6d 65 6e 75 32 | 25 20 37 35 2c 73 6d 65 |0,smenu2|% 75,sme|
|00000740| 6e 75 33 25 20 32 36 38 | 2c 66 69 6e 64 25 20 31 |nu3% 268|,find% 1|
|00000750| 30 30 2c 73 6d 65 6e 75 | 34 25 20 31 30 30 2c 73 |00,smenu|4% 100,s|
|00000760| 6d 65 6e 75 35 25 20 31 | 30 30 2c 6d 65 73 73 25 |menu5% 1|00,mess%|
|00000770| 20 32 35 35 0d 01 a4 5e | de 20 70 61 74 68 25 20 | 255...^|. path% |
|00000780| 32 35 35 2c 66 75 6c 6c | 74 65 78 74 25 20 32 35 |255,full|text% 25|
|00000790| 35 2c 74 62 61 72 25 20 | 32 30 2c 6e 6d 25 20 34 |5,tbar% |20,nm% 4|
|000007a0| 2c 76 61 6c 69 64 25 20 | 32 30 2c 52 33 25 20 34 |,valid% |20,R3% 4|
|000007b0| 2c 52 35 25 20 34 2c 6e | 6d 52 33 25 20 31 32 2c |,R5% 4,n|mR3% 12,|
|000007c0| 61 6c 6e 6d 52 33 25 20 | 31 32 2c 65 6e 74 25 20 |alnmR3% |12,ent% |
|000007d0| 31 32 0d 01 ae 22 de 20 | 72 65 63 25 20 36 2c 6f |12...". |rec% 6,o|
|000007e0| 6b 25 20 32 2c 70 72 69 | 6e 74 25 20 35 2c 41 4c |k% 2,pri|nt% 5,AL|
|000007f0| 4c 25 20 33 0d 01 b8 23 | de 20 46 69 6c 65 24 28 |L% 3...#|. File$(|
|00000800| 32 29 2c 53 46 25 28 32 | 29 2c 53 53 24 28 32 29 |2),SF%(2|),SS$(2)|
|00000810| 2c 43 74 25 28 31 29 0d | 01 c2 04 0d 01 cc 52 61 |,Ct%(1).|......Ra|
|00000820| 70 70 24 3d 22 4d 61 78 | 69 66 69 6c 65 22 3a 71 |pp$="Max|ifile":q|
|00000830| 75 69 74 25 3d a3 3a 66 | 69 6c 65 25 3d a3 3a 6f |uit%=.:f|ile%=.:o|
|00000840| 70 65 6e 6d 65 6e 75 25 | 3d 30 3a 61 6c 74 65 72 |penmenu%|=0:alter|
|00000850| 65 64 25 3d a3 3a 69 6f | 70 65 6e 25 3d a3 3a 6f |ed%=.:io|pen%=.:o|
|00000860| 6f 70 65 6e 25 3d a3 3a | 70 64 25 3d a3 0d 01 d6 |open%=.:|pd%=....|
|00000870| 20 24 6f 6b 25 3d 22 4f | 4b 22 3a 24 70 61 74 68 | $ok%="O|K":$path|
|00000880| 25 3d 22 4e 6f 74 20 6e | 61 6d 65 64 22 0d 01 e0 |%="Not n|amed"...|
|00000890| 7b 24 6e 6d 25 3d 22 41 | 30 2d 39 22 3a 24 76 61 |{$nm%="A|0-9":$va|
|000008a0| 6c 69 64 25 3d 22 53 72 | 61 64 69 6f 6f 66 66 2c |lid%="Sr|adiooff,|
|000008b0| 72 61 64 69 6f 6f 6e 22 | 3a 24 52 35 25 3d 22 52 |radioon"|:$R5%="R|
|000008c0| 35 22 3a 24 52 33 25 3d | 22 52 33 22 3a 24 6e 6d |5":$R3%=|"R3":$nm|
|000008d0| 52 33 25 3d 22 41 30 2d | 39 3b 52 33 3b 4b 41 52 |R3%="A0-|9;R3;KAR|
|000008e0| 22 3a 24 61 6c 6e 6d 52 | 33 25 3d 22 52 33 3b 4b |":$alnmR|3%="R3;K|
|000008f0| 41 52 22 3a 24 65 6e 74 | 25 3d 22 41 30 2d 39 2c |AR":$ent|%="A0-9,|
|00000900| 3b 52 33 3b 4b 41 52 22 | 0d 01 ea 2e 24 70 72 69 |;R3;KAR"|....$pri|
|00000910| 6e 74 25 3d 22 50 52 49 | 4e 54 22 3a 24 41 4c 4c |nt%="PRI|NT":$ALL|
|00000920| 25 3d 22 41 4c 4c 22 3a | 24 72 65 63 25 3d 22 52 |%="ALL":|$rec%="R|
|00000930| 65 63 6f 72 64 22 0d 01 | f4 44 63 61 73 65 25 3d |ecord"..|.Dcase%=|
|00000940| 30 3a 61 6c 6c 25 3d 30 | 3a 72 65 70 25 3d 30 3a |0:all%=0|:rep%=0:|
|00000950| 65 72 72 63 6c 69 63 6b | 25 3d 30 3a 63 6e 64 31 |errclick|%=0:cnd1|
|00000960| 25 3d 33 3a 63 6e 64 32 | 25 3d 33 3a 63 6d 62 25 |%=3:cnd2|%=3:cmb%|
|00000970| 3d 30 3a 6b 65 79 73 25 | 3d 31 0d 01 fe 77 6d 68 |=0:keys%|=1...wmh|
|00000980| 61 6e 64 6c 65 25 3d 30 | 3a 70 72 69 6e 74 68 61 |andle%=0|:printha|
|00000990| 6e 64 6c 65 25 3d 30 3a | 73 72 68 61 6e 64 6c 65 |ndle%=0:|srhandle|
|000009a0| 25 3d 30 3a 73 6f 72 74 | 68 61 6e 64 6c 65 25 3d |%=0:sort|handle%=|
|000009b0| 30 3a 73 75 62 68 61 6e | 64 6c 65 25 3d 30 3a 6e |0:subhan|dle%=0:n|
|000009c0| 65 77 66 69 6c 65 32 25 | 3d 30 3a 6e 65 77 66 69 |ewfile2%|=0:newfi|
|000009d0| 6c 65 33 25 3d 30 3a 6e | 65 77 66 69 6c 65 34 25 |le3%=0:n|ewfile4%|
|000009e0| 3d 30 3a 67 6f 25 3d 30 | 3a 65 78 74 65 64 25 3d |=0:go%=0|:exted%=|
|000009f0| 30 0d 02 08 04 0d 02 12 | 2b c8 99 20 22 57 69 6d |0.......|+.. "Wim|
|00000a00| 70 5f 49 6e 69 74 69 61 | 6c 69 73 65 22 2c 32 30 |p_Initia|lise",20|
|00000a10| 30 2c 26 34 42 35 33 34 | 31 35 34 2c 61 70 70 24 |0,&4B534|154,app$|
|00000a20| 0d 02 1c 04 0d 02 26 14 | f4 20 53 74 61 72 74 75 |......&.|. Startu|
|00000a30| 70 20 77 69 6e 64 6f 77 | 0d 02 30 04 0d 02 3a 3b |p window|..0...:;|
|00000a40| de 20 74 65 78 74 73 31 | 25 20 32 30 2c 74 65 78 |. texts1|% 20,tex|
|00000a50| 74 73 32 25 20 32 30 2c | 74 65 78 74 73 33 25 20 |ts2% 20,|texts3% |
|00000a60| 31 33 2c 74 65 78 74 73 | 34 25 20 31 38 2c 74 65 |13,texts|4% 18,te|
|00000a70| 78 74 73 35 25 20 39 0d | 02 44 48 73 68 61 6e 64 |xts5% 9.|.DHshand|
|00000a80| 6c 65 25 3d a4 63 72 65 | 61 74 65 5f 77 69 6e 64 |le%=.cre|ate_wind|
|00000a90| 6f 77 28 33 36 38 2c 33 | 32 30 2c 35 34 34 2c 33 |ow(368,3|20,544,3|
|00000aa0| 32 30 2c 30 2c 30 2c 26 | 38 37 30 30 30 30 31 32 |20,0,0,&|87000012|
|00000ab0| 2c 31 2c 31 32 2c 61 70 | 70 24 2c 33 2c 30 29 0d |,1,12,ap|p$,3,0).|
|00000ac0| 02 4e 1f 24 74 65 78 74 | 73 31 25 3d 22 53 74 61 |.N.$text|s1%="Sta|
|00000ad0| 72 74 20 61 20 6e 65 77 | 20 66 69 6c 65 22 0d 02 |rt a new| file"..|
|00000ae0| 58 22 24 74 65 78 74 73 | 32 25 3d 22 57 65 6c 63 |X"$texts|2%="Welc|
|00000af0| 6f 6d 65 20 74 6f 20 4d | 61 78 69 66 69 6c 65 22 |ome to M|axifile"|
|00000b00| 0d 02 62 1c 24 74 65 78 | 74 73 33 25 3d 22 56 65 |..b.$tex|ts3%="Ve|
|00000b10| 72 73 69 6f 6e 20 34 2e | 31 34 64 22 0d 02 6c 21 |rsion 4.|14d"..l!|
|00000b20| 24 74 65 78 74 73 34 25 | 3d 22 43 68 72 69 73 20 |$texts4%|="Chris |
|00000b30| 57 72 61 67 67 20 a9 20 | 31 39 39 32 22 0d 02 76 |Wragg . |1992"..v|
|00000b40| 18 24 74 65 78 74 73 35 | 25 3d 22 4c 6f 61 64 20 |.$texts5|%="Load |
|00000b50| 46 69 6c 65 22 0d 02 80 | 49 61 25 3d a4 63 72 65 |File"...|Ia%=.cre|
|00000b60| 61 74 65 5f 69 63 6f 6e | 28 73 68 61 6e 64 6c 65 |ate_icon|(shandle|
|00000b70| 25 2c 32 33 38 2c 2d 32 | 38 38 2c 32 38 30 2c 35 |%,238,-2|88,280,5|
|00000b80| 36 2c 26 43 37 30 31 39 | 31 33 44 2c 22 22 2c 74 |6,&C7019|13D,"",t|
|00000b90| 65 78 74 73 31 25 2c 52 | 35 25 2c 32 31 29 0d 02 |exts1%,R|5%,21)..|
|00000ba0| 8a 48 61 25 3d a4 63 72 | 65 61 74 65 5f 69 63 6f |.Ha%=.cr|eate_ico|
|00000bb0| 6e 28 73 68 61 6e 64 6c | 65 25 2c 31 30 34 2c 2d |n(shandl|e%,104,-|
|00000bc0| 36 34 2c 33 33 36 2c 35 | 36 2c 26 46 37 30 30 30 |64,336,5|6,&F7000|
|00000bd0| 31 33 44 2c 22 22 2c 74 | 65 78 74 73 32 25 2c 52 |13D,"",t|exts2%,R|
|00000be0| 33 25 2c 32 31 29 0d 02 | 94 49 61 25 3d a4 63 72 |3%,21)..|.Ia%=.cr|
|00000bf0| 65 61 74 65 5f 69 63 6f | 6e 28 73 68 61 6e 64 6c |eate_ico|n(shandl|
|00000c00| 65 25 2c 31 36 38 2c 2d | 31 32 38 2c 32 31 36 2c |e%,168,-|128,216,|
|00000c10| 35 36 2c 26 39 37 30 30 | 30 31 33 44 2c 22 22 2c |56,&9700|013D,"",|
|00000c20| 74 65 78 74 73 33 25 2c | 52 33 25 2c 31 34 29 0d |texts3%,|R3%,14).|
|00000c30| 02 9e 49 61 25 3d a4 63 | 72 65 61 74 65 5f 69 63 |..Ia%=.c|reate_ic|
|00000c40| 6f 6e 28 73 68 61 6e 64 | 6c 65 25 2c 31 31 36 2c |on(shand|le%,116,|
|00000c50| 2d 31 39 32 2c 33 31 32 | 2c 35 36 2c 26 39 37 30 |-192,312|,56,&970|
|00000c60| 30 30 31 33 44 2c 22 22 | 2c 74 65 78 74 73 34 25 |0013D,""|,texts4%|
|00000c70| 2c 52 33 25 2c 31 39 29 | 0d 02 a8 48 61 25 3d a4 |,R3%,19)|...Ha%=.|
|00000c80| 63 72 65 61 74 65 5f 69 | 63 6f 6e 28 73 68 61 6e |create_i|con(shan|
|00000c90| 64 6c 65 25 2c 33 32 2c | 2d 32 38 38 2c 31 38 34 |dle%,32,|-288,184|
|00000ca0| 2c 35 36 2c 26 43 37 30 | 31 39 31 33 44 2c 22 22 |,56,&C70|1913D,""|
|00000cb0| 2c 74 65 78 74 73 35 25 | 2c 52 35 25 2c 31 30 29 |,texts5%|,R5%,10)|
|00000cc0| 0d 02 b2 04 0d 02 bc 12 | f4 20 49 63 6f 6e 62 61 |........|. Iconba|
|00000cd0| 72 20 6d 65 6e 75 0d 02 | c6 04 0d 02 d0 45 69 6e |r menu..|.....Ein|
|00000ce0| 66 6f 25 3d a4 63 72 65 | 61 74 65 5f 77 69 6e 64 |fo%=.cre|ate_wind|
|00000cf0| 6f 77 28 30 2c 30 2c 35 | 38 30 2c 32 30 34 2c 30 |ow(0,0,5|80,204,0|
|00000d00| 2c 30 2c 26 38 34 30 30 | 30 30 31 32 2c 31 2c 32 |,0,&8400|0012,1,2|
|00000d10| 2c 22 50 72 6f 67 72 61 | 6d 22 2c 33 2c 30 29 0d |,"Progra|m",3,0).|
|00000d20| 02 da 0f de 20 74 65 78 | 74 69 25 20 31 36 0d 02 |.... tex|ti% 16..|
|00000d30| e4 16 e3 20 69 25 3d 31 | 20 b8 20 34 3a f3 20 74 |... i%=1| . 4:. t|
|00000d40| 65 78 74 24 0d 02 ee 42 | 61 25 3d a4 63 72 65 61 |ext$...B|a%=.crea|
|00000d50| 74 65 5f 69 63 6f 6e 28 | 69 6e 66 6f 25 2c 30 2c |te_icon(|info%,0,|
|00000d60| 2d 69 25 2a 34 38 2d 34 | 2c 31 34 34 2c 34 34 2c |-i%*48-4|,144,44,|
|00000d70| 26 31 37 30 30 30 32 31 | 31 2c 74 65 78 74 24 2c |&1700021|1,text$,|
|00000d80| 30 2c 30 2c 30 29 0d 02 | f8 05 ed 0d 03 02 16 e3 |0,0,0)..|........|
|00000d90| 20 69 25 3d 31 20 b8 20 | 33 3a f3 20 74 65 78 74 | i%=1 . |3:. text|
|00000da0| 24 0d 03 0c 43 61 25 3d | a4 63 72 65 61 74 65 5f |$...Ca%=|.create_|
|00000db0| 69 63 6f 6e 28 69 6e 66 | 6f 25 2c 31 34 38 2c 2d |icon(inf|o%,148,-|
|00000dc0| 69 25 2a 34 38 2d 34 2c | 34 32 34 2c 34 34 2c 26 |i%*48-4,|424,44,&|
|00000dd0| 37 30 30 30 30 33 44 2c | 74 65 78 74 24 2c 30 2c |700003D,|text$,0,|
|00000de0| 30 2c 30 29 0d 03 16 05 | ed 0d 03 20 0b f3 20 74 |0,0)....|... .. t|
|00000df0| 65 78 74 24 0d 03 2a 11 | 24 74 65 78 74 69 25 3d |ext$..*.|$texti%=|
|00000e00| 74 65 78 74 24 0d 03 34 | 47 61 25 3d a4 63 72 65 |text$..4|Ga%=.cre|
|00000e10| 61 74 65 5f 69 63 6f 6e | 28 69 6e 66 6f 25 2c 31 |ate_icon|(info%,1|
|00000e20| 34 38 2c 2d 69 25 2a 34 | 38 2d 34 2c 34 32 34 2c |48,-i%*4|8-4,424,|
|00000e30| 34 34 2c 26 37 30 30 30 | 31 33 44 2c 22 22 2c 74 |44,&7000|13D,"",t|
|00000e40| 65 78 74 69 25 2c 2d 31 | 2c 31 37 29 0d 03 3e 25 |exti%,-1|,17)..>%|
|00000e50| dc 20 4e 61 6d 65 3a 2c | 50 75 72 70 6f 73 65 3a |. Name:,|Purpose:|
|00000e60| 2c 41 75 74 68 6f 72 3a | 2c 56 65 72 73 69 6f 6e |,Author:|,Version|
|00000e70| 3a 0d 03 48 38 dc 20 4d | 61 78 69 66 69 6c 65 2c |:..H8. M|axifile,|
|00000e80| 44 61 74 61 62 61 73 65 | 2c 43 68 72 69 73 20 57 |Database|,Chris W|
|00000e90| 72 61 67 67 2c 22 34 2e | 31 34 64 20 2d 20 38 20 |ragg,"4.|14d - 8 |
|00000ea0| 4a 61 6e 20 31 39 39 35 | 22 0d 03 52 29 dc 20 4d |Jan 1995|"..R). M|
|00000eb0| 61 78 69 66 69 6c 65 2c | 32 2c 30 2c 69 6e 66 6f |axifile,|2,0,info|
|00000ec0| 25 2c 49 6e 66 6f 2c 26 | 38 30 2c 2d 31 2c 51 75 |%,Info,&|80,-1,Qu|
|00000ed0| 69 74 0d 03 5c 16 f2 73 | 65 74 75 70 6d 65 6e 75 |it..\..s|etupmenu|
|00000ee0| 28 69 6d 65 6e 75 25 29 | 0d 03 66 04 0d 03 70 12 |(imenu%)|..f...p.|
|00000ef0| f4 20 69 63 6f 6e 62 61 | 72 20 69 63 6f 6e 0d 03 |. iconba|r icon..|
|00000f00| 7a 04 0d 03 84 40 69 62 | 68 61 6e 64 6c 65 25 3d |z....@ib|handle%=|
|00000f10| a4 63 72 65 61 74 65 5f | 69 63 6f 6e 28 2d 31 2c |.create_|icon(-1,|
|00000f20| 30 2c 30 2c 36 38 2c 36 | 38 2c 26 33 30 30 32 2c |0,0,68,6|8,&3002,|
|00000f30| 22 21 4d 61 78 69 66 69 | 6c 65 22 2c 30 2c 30 2c |"!Maxifi|le",0,0,|
|00000f40| 30 29 0d 03 8e 04 0d 03 | 98 18 f4 20 41 6c 74 65 |0)......|... Alte|
|00000f50| 72 20 66 69 65 6c 64 20 | 77 69 6e 64 6f 77 0d 03 |r field |window..|
|00000f60| a2 04 0d 03 ac 1b de 20 | 74 65 73 74 31 25 20 32 |....... |test1% 2|
|00000f70| 35 35 2c 74 65 73 74 32 | 25 20 32 35 35 0d 03 b6 |55,test2|% 255...|
|00000f80| 19 24 74 65 73 74 31 25 | 3d 22 22 3a 24 74 65 73 |.$test1%|="":$tes|
|00000f90| 74 32 25 3d 22 22 0d 03 | c0 58 61 6c 74 65 72 68 |t2%=""..|.Xalterh|
|00000fa0| 61 6e 64 6c 65 25 3d a4 | 63 72 65 61 74 65 5f 77 |andle%=.|create_w|
|00000fb0| 69 6e 64 6f 77 28 31 30 | 30 2c 35 30 30 2c 31 30 |indow(10|0,500,10|
|00000fc0| 30 30 2c 32 30 34 2c 30 | 2c 30 2c 26 38 37 30 30 |00,204,0|,0,&8700|
|00000fd0| 30 30 31 32 2c 32 2c 31 | 32 2c 22 46 69 65 6c 64 |0012,2,1|2,"Field|
|00000fe0| 20 43 68 61 6e 67 65 22 | 2c 31 35 2c 30 29 0d 03 | Change"|,15,0)..|
|00000ff0| ca 4f 61 6c 74 65 72 25 | 3d a4 63 72 65 61 74 65 |.Oalter%|=.create|
|00001000| 5f 69 63 6f 6e 28 61 6c | 74 65 72 68 61 6e 64 6c |_icon(al|terhandl|
|00001010| 65 25 2c 32 38 38 2c 2d | 38 30 2c 34 32 34 2c 34 |e%,288,-|80,424,4|
|00001020| 34 2c 26 45 37 30 30 30 | 31 33 44 2c 22 22 2c 74 |4,&E7000|13D,"",t|
|00001030| 65 73 74 31 25 2c 52 35 | 25 2c 32 35 29 0d 03 d4 |est1%,R5|%,25)...|
|00001040| 4e 65 6e 74 72 79 25 3d | a4 63 72 65 61 74 65 5f |Nentry%=|.create_|
|00001050| 69 63 6f 6e 28 61 6c 74 | 65 72 68 61 6e 64 6c 65 |icon(alt|erhandle|
|00001060| 25 2c 35 30 2c 2d 31 34 | 34 2c 39 30 30 2c 34 34 |%,50,-14|4,900,44|
|00001070| 2c 26 37 30 30 46 31 33 | 35 2c 22 22 2c 74 65 73 |,&700F13|5,"",tes|
|00001080| 74 32 25 2c 2d 31 2c 32 | 35 35 29 0d 03 de 46 61 |t2%,-1,2|55)...Fa|
|00001090| 25 3d a4 63 72 65 61 74 | 65 5f 69 63 6f 6e 28 61 |%=.creat|e_icon(a|
|000010a0| 6c 74 65 72 68 61 6e 64 | 6c 65 25 2c 38 35 30 2c |lterhand|le%,850,|
|000010b0| 2d 35 36 2c 39 36 2c 34 | 38 2c 26 43 37 30 31 39 |-56,96,4|8,&C7019|
|000010c0| 31 33 44 2c 22 22 2c 6f | 6b 25 2c 52 35 25 2c 33 |13D,"",o|k%,R5%,3|
|000010d0| 29 0d 03 e8 04 0d 03 f2 | 18 f4 20 51 75 69 63 6b |).......|.. Quick|
|000010e0| 20 65 6e 74 72 79 20 77 | 69 6e 64 6f 77 0d 03 fc | entry w|indow...|
|000010f0| 04 0d 04 06 15 de 20 73 | 74 6f 70 25 20 34 2c 4e |...... s|top% 4,N|
|00001100| 65 78 74 25 20 34 0d 04 | 10 1f 24 73 74 6f 70 25 |ext% 4..|..$stop%|
|00001110| 3d 22 53 54 4f 50 22 3a | 24 4e 65 78 74 25 3d 22 |="STOP":|$Next%="|
|00001120| 4e 45 58 54 22 0d 04 1a | 56 66 61 73 74 68 61 6e |NEXT"...|Vfasthan|
|00001130| 64 6c 65 25 3d a4 63 72 | 65 61 74 65 5f 77 69 6e |dle%=.cr|eate_win|
|00001140| 64 6f 77 28 31 30 30 2c | 35 30 30 2c 31 30 30 30 |dow(100,|500,1000|
|00001150| 2c 32 30 34 2c 30 2c 30 | 2c 26 38 37 30 30 30 30 |,204,0,0|,&870000|
|00001160| 31 32 2c 32 2c 31 32 2c | 22 51 75 69 63 6b 20 45 |12,2,12,|"Quick E|
|00001170| 6e 74 72 79 22 2c 31 35 | 2c 30 29 0d 04 24 4a 61 |ntry",15|,0)..$Ja|
|00001180| 25 3d a4 63 72 65 61 74 | 65 5f 69 63 6f 6e 28 66 |%=.creat|e_icon(f|
|00001190| 61 73 74 68 61 6e 64 6c | 65 25 2c 32 38 38 2c 2d |asthandl|e%,288,-|
|000011a0| 38 30 2c 34 32 34 2c 34 | 34 2c 26 45 37 30 30 30 |80,424,4|4,&E7000|
|000011b0| 31 33 44 2c 22 22 2c 74 | 65 73 74 31 25 2c 52 35 |13D,"",t|est1%,R5|
|000011c0| 25 2c 32 35 29 0d 04 2e | 49 61 25 3d a4 63 72 65 |%,25)...|Ia%=.cre|
|000011d0| 61 74 65 5f 69 63 6f 6e | 28 66 61 73 74 68 61 6e |ate_icon|(fasthan|
|000011e0| 64 6c 65 25 2c 35 30 2c | 2d 31 34 34 2c 39 30 30 |dle%,50,|-144,900|
|000011f0| 2c 34 34 2c 26 37 30 30 | 46 31 33 35 2c 22 22 2c |,44,&700|F135,"",|
|00001200| 74 65 73 74 32 25 2c 2d | 31 2c 32 35 35 29 0d 04 |test2%,-|1,255)..|
|00001210| 38 47 61 25 3d a4 63 72 | 65 61 74 65 5f 69 63 6f |8Ga%=.cr|eate_ico|
|00001220| 6e 28 66 61 73 74 68 61 | 6e 64 6c 65 25 2c 35 30 |n(fastha|ndle%,50|
|00001230| 2c 2d 31 39 36 2c 39 36 | 2c 34 38 2c 26 43 37 30 |,-196,96|,48,&C70|
|00001240| 31 39 31 33 44 2c 22 22 | 2c 73 74 6f 70 25 2c 52 |1913D,""|,stop%,R|
|00001250| 35 25 2c 34 29 0d 04 42 | 48 61 25 3d a4 63 72 65 |5%,4)..B|Ha%=.cre|
|00001260| 61 74 65 5f 69 63 6f 6e | 28 66 61 73 74 68 61 6e |ate_icon|(fasthan|
|00001270| 64 6c 65 25 2c 38 35 30 | 2c 2d 31 39 36 2c 39 36 |dle%,850|,-196,96|
|00001280| 2c 34 38 2c 26 43 37 30 | 31 39 31 33 44 2c 22 22 |,48,&C70|1913D,""|
|00001290| 2c 4e 65 78 74 25 2c 52 | 35 25 2c 34 29 0d 04 4c |,Next%,R|5%,4)..L|
|000012a0| 04 0d 04 56 12 f4 20 43 | 6f 75 6e 74 20 77 69 6e |...V.. C|ount win|
|000012b0| 64 6f 77 0d 04 60 04 0d | 04 6a 47 de 20 74 65 73 |dow..`..|.jG. tes|
|000012c0| 74 33 25 20 33 36 2c 73 | 73 74 72 25 20 31 34 2c |t3% 36,s|str% 14,|
|000012d0| 66 6e 6f 25 20 31 34 2c | 66 6c 64 33 25 20 34 2c |fno% 14,|fld3% 4,|
|000012e0| 68 69 74 7a 25 20 31 38 | 2c 66 6c 64 34 25 20 35 |hitz% 18|,fld4% 5|
|000012f0| 2c 63 6e 74 25 20 35 2c | 63 61 73 25 20 38 0d 04 |,cnt% 5,|cas% 8..|
|00001300| 74 97 24 74 65 73 74 33 | 25 3d c4 33 36 2c bd 30 |t.$test3|%=.36,.0|
|00001310| 29 3a 24 73 73 74 72 25 | 3d 22 53 65 61 72 63 68 |):$sstr%|="Search|
|00001320| 20 73 74 72 69 6e 67 22 | 3a 24 66 6e 6f 25 3d 22 | string"|:$fno%="|
|00001330| 46 69 65 6c 64 20 6e 75 | 6d 62 65 72 22 3a 24 66 |Field nu|mber":$f|
|00001340| 6c 64 33 25 3d 22 31 22 | 3a 24 68 69 74 7a 25 3d |ld3%="1"|:$hitz%=|
|00001350| 22 4e 6f 20 6f 66 20 6f | 63 63 75 72 72 65 6e 63 |"No of o|ccurrenc|
|00001360| 65 73 22 3a 24 66 6c 64 | 34 25 3d 22 30 22 3a 24 |es":$fld|4%="0":$|
|00001370| 63 6e 74 25 3d 22 43 4f | 55 4e 54 22 3a 24 63 61 |cnt%="CO|UNT":$ca|
|00001380| 73 25 3d 22 43 41 53 45 | 20 4f 4e 22 3a 63 61 73 |s%="CASE| ON":cas|
|00001390| 65 32 25 3d 30 0d 04 7e | 50 63 6f 75 6e 74 68 61 |e2%=0..~|Pcountha|
|000013a0| 6e 64 6c 65 25 3d a4 63 | 72 65 61 74 65 5f 77 69 |ndle%=.c|reate_wi|
|000013b0| 6e 64 6f 77 28 33 36 30 | 2c 35 30 30 2c 34 36 34 |ndow(360|,500,464|
|000013c0| 2c 33 38 34 2c 30 2c 30 | 2c 26 41 37 30 30 31 30 |,384,0,0|,&A70010|
|000013d0| 31 32 2c 31 2c 31 32 2c | 22 43 6f 75 6e 74 22 2c |12,1,12,|"Count",|
|000013e0| 31 35 2c 30 29 0d 04 88 | 49 61 25 3d a4 63 72 65 |15,0)...|Ia%=.cre|
|000013f0| 61 74 65 5f 69 63 6f 6e | 28 63 6f 75 6e 74 68 61 |ate_icon|(countha|
|00001400| 6e 64 6c 65 25 2c 33 32 | 2c 2d 38 30 2c 34 30 30 |ndle%,32|,-80,400|
|00001410| 2c 36 34 2c 26 41 37 30 | 30 30 31 33 44 2c 22 22 |,64,&A70|0013D,""|
|00001420| 2c 73 73 74 72 25 2c 52 | 35 25 2c 31 34 29 0d 04 |,sstr%,R|5%,14)..|
|00001430| 92 4e 61 25 3d a4 63 72 | 65 61 74 65 5f 69 63 6f |.Na%=.cr|eate_ico|
|00001440| 6e 28 63 6f 75 6e 74 68 | 61 6e 64 6c 65 25 2c 33 |n(counth|andle%,3|
|00001450| 32 2c 2d 31 34 34 2c 34 | 30 30 2c 36 34 2c 26 37 |2,-144,4|00,64,&7|
|00001460| 30 31 46 31 33 35 2c 22 | 22 2c 74 65 73 74 33 25 |01F135,"|",test3%|
|00001470| 2c 61 6c 6e 6d 52 33 25 | 2c 33 36 29 0d 04 9c 49 |,alnmR3%|,36)...I|
|00001480| 61 25 3d a4 63 72 65 61 | 74 65 5f 69 63 6f 6e 28 |a%=.crea|te_icon(|
|00001490| 63 6f 75 6e 74 68 61 6e | 64 6c 65 25 2c 33 32 2c |counthan|dle%,32,|
|000014a0| 2d 32 30 38 2c 33 32 30 | 2c 36 34 2c 26 41 37 30 |-208,320|,64,&A70|
|000014b0| 30 30 31 33 44 2c 22 22 | 2c 66 6e 6f 25 2c 52 35 |0013D,""|,fno%,R5|
|000014c0| 25 2c 31 34 29 0d 04 a6 | 4a 61 25 3d a4 63 72 65 |%,14)...|Ja%=.cre|
|000014d0| 61 74 65 5f 69 63 6f 6e | 28 63 6f 75 6e 74 68 61 |ate_icon|(countha|
|000014e0| 6e 64 6c 65 25 2c 33 32 | 2c 2d 32 37 32 2c 33 32 |ndle%,32|,-272,32|
|000014f0| 30 2c 36 34 2c 26 41 37 | 30 30 30 31 33 44 2c 22 |0,64,&A7|00013D,"|
|00001500| 22 2c 68 69 74 7a 25 2c | 52 35 25 2c 31 38 29 0d |",hitz%,|R5%,18).|
|00001510| 04 b0 48 61 25 3d a4 63 | 72 65 61 74 65 5f 69 63 |..Ha%=.c|reate_ic|
|00001520| 6f 6e 28 63 6f 75 6e 74 | 68 61 6e 64 6c 65 25 2c |on(count|handle%,|
|00001530| 33 35 32 2c 2d 32 37 32 | 2c 38 30 2c 36 34 2c 26 |352,-272|,80,64,&|
|00001540| 37 30 30 30 31 33 35 2c | 22 22 2c 66 6c 64 34 25 |7000135,|"",fld4%|
|00001550| 2c 52 33 25 2c 35 29 0d | 04 ba 4a 61 25 3d a4 63 |,R3%,5).|..Ja%=.c|
|00001560| 72 65 61 74 65 5f 69 63 | 6f 6e 28 63 6f 75 6e 74 |reate_ic|on(count|
|00001570| 68 61 6e 64 6c 65 25 2c | 33 35 32 2c 2d 32 30 38 |handle%,|352,-208|
|00001580| 2c 38 30 2c 36 34 2c 26 | 37 30 31 46 31 33 35 2c |,80,64,&|701F135,|
|00001590| 22 22 2c 66 6c 64 33 25 | 2c 6e 6d 52 33 25 2c 34 |"",fld3%|,nmR3%,4|
|000015a0| 29 0d 04 c4 48 61 25 3d | a4 63 72 65 61 74 65 5f |)...Ha%=|.create_|
|000015b0| 69 63 6f 6e 28 63 6f 75 | 6e 74 68 61 6e 64 6c 65 |icon(cou|nthandle|
|000015c0| 25 2c 33 32 2c 2d 33 35 | 32 2c 31 36 30 2c 36 34 |%,32,-35|2,160,64|
|000015d0| 2c 26 41 37 30 32 39 31 | 33 44 2c 22 22 2c 63 61 |,&A70291|3D,"",ca|
|000015e0| 73 25 2c 52 35 25 2c 38 | 29 0d 04 ce 49 61 25 3d |s%,R5%,8|)...Ia%=|
|000015f0| a4 63 72 65 61 74 65 5f | 69 63 6f 6e 28 63 6f 75 |.create_|icon(cou|
|00001600| 6e 74 68 61 6e 64 6c 65 | 25 2c 32 37 32 2c 2d 33 |nthandle|%,272,-3|
|00001610| 35 32 2c 31 36 30 2c 36 | 34 2c 26 43 37 30 32 39 |52,160,6|4,&C7029|
|00001620| 31 33 44 2c 22 22 2c 63 | 6e 74 25 2c 52 35 25 2c |13D,"",c|nt%,R5%,|
|00001630| 35 29 0d 04 d8 04 0d 04 | e2 18 f4 20 53 75 6d 2f |5)......|... Sum/|
|00001640| 41 76 65 72 61 67 65 20 | 77 69 6e 64 6f 77 0d 04 |Average |window..|
|00001650| ec 04 0d 04 f6 32 de 20 | 72 73 6c 74 25 20 36 2c |.....2. |rslt% 6,|
|00001660| 66 6c 64 35 25 20 34 2c | 66 6c 64 36 25 20 31 30 |fld5% 4,|fld6% 10|
|00001670| 2c 63 6c 72 25 20 35 2c | 73 6d 25 20 37 2c 73 74 |,clr% 5,|sm% 7,st|
|00001680| 72 25 20 35 0d 05 00 50 | 24 72 73 6c 74 25 3d 22 |r% 5...P|$rslt%="|
|00001690| 52 65 73 75 6c 74 22 3a | 24 66 6c 64 35 25 3d 22 |Result":|$fld5%="|
|000016a0| 31 22 3a 24 66 6c 64 36 | 25 3d 22 30 22 3a 24 63 |1":$fld6|%="0":$c|
|000016b0| 6c 72 25 3d 22 43 4c 45 | 41 52 22 3a 24 73 6d 25 |lr%="CLE|AR":$sm%|
|000016c0| 3d 22 53 55 4d 22 3a 24 | 73 74 72 25 3d 22 53 54 |="SUM":$|str%="ST|
|000016d0| 4f 52 45 22 0d 05 0a 49 | 73 75 6d 68 61 6e 64 6c |ORE"...I|sumhandl|
|000016e0| 65 25 3d a4 63 72 65 61 | 74 65 5f 77 69 6e 64 6f |e%=.crea|te_windo|
|000016f0| 77 28 32 34 30 2c 35 30 | 30 2c 37 33 36 2c 31 36 |w(240,50|0,736,16|
|00001700| 34 2c 30 2c 30 2c 26 41 | 37 30 30 31 30 31 32 2c |4,0,0,&A|7001012,|
|00001710| 31 2c 31 32 2c 22 22 2c | 31 35 2c 30 29 0d 05 14 |1,12,"",|15,0)...|
|00001720| 47 61 25 3d a4 63 72 65 | 61 74 65 5f 69 63 6f 6e |Ga%=.cre|ate_icon|
|00001730| 28 73 75 6d 68 61 6e 64 | 6c 65 25 2c 33 32 30 2c |(sumhand|le%,320,|
|00001740| 2d 38 30 2c 39 36 2c 38 | 30 2c 26 37 30 30 46 31 |-80,96,8|0,&700F1|
|00001750| 33 35 2c 22 22 2c 66 6c | 64 35 25 2c 6e 6d 52 33 |35,"",fl|d5%,nmR3|
|00001760| 25 2c 34 29 0d 05 1e 48 | 61 25 3d a4 63 72 65 61 |%,4)...H|a%=.crea|
|00001770| 74 65 5f 69 63 6f 6e 28 | 73 75 6d 68 61 6e 64 6c |te_icon(|sumhandl|
|00001780| 65 25 2c 32 32 34 2c 2d | 31 36 30 2c 31 39 32 2c |e%,224,-|160,192,|
|00001790| 38 30 2c 26 37 30 30 30 | 31 33 35 2c 22 22 2c 66 |80,&7000|135,"",f|
|000017a0| 6c 64 36 25 2c 52 33 25 | 2c 31 30 29 0d 05 28 45 |ld6%,R3%|,10)..(E|
|000017b0| 61 25 3d a4 63 72 65 61 | 74 65 5f 69 63 6f 6e 28 |a%=.crea|te_icon(|
|000017c0| 73 75 6d 68 61 6e 64 6c | 65 25 2c 30 2c 2d 38 30 |sumhandl|e%,0,-80|
|000017d0| 2c 33 32 30 2c 38 30 2c | 26 46 37 30 30 30 31 33 |,320,80,|&F700013|
|000017e0| 44 2c 22 22 2c 66 6e 6f | 25 2c 52 35 25 2c 31 34 |D,"",fno|%,R5%,14|
|000017f0| 29 0d 05 32 47 61 25 3d | a4 63 72 65 61 74 65 5f |)..2Ga%=|.create_|
|00001800| 69 63 6f 6e 28 73 75 6d | 68 61 6e 64 6c 65 25 2c |icon(sum|handle%,|
|00001810| 30 2c 2d 31 36 30 2c 32 | 32 34 2c 38 30 2c 26 46 |0,-160,2|24,80,&F|
|00001820| 37 30 30 30 31 33 44 2c | 22 22 2c 72 73 6c 74 25 |700013D,|"",rslt%|
|00001830| 2c 52 35 25 2c 31 34 29 | 0d 05 3c 48 61 25 3d a4 |,R5%,14)|..<Ha%=.|
|00001840| 63 72 65 61 74 65 5f 69 | 63 6f 6e 28 73 75 6d 68 |create_i|con(sumh|
|00001850| 61 6e 64 6c 65 25 2c 34 | 31 36 2c 2d 38 30 2c 31 |andle%,4|16,-80,1|
|00001860| 39 32 2c 38 30 2c 26 43 | 37 30 31 39 31 33 44 2c |92,80,&C|701913D,|
|00001870| 22 22 2c 70 72 69 6e 74 | 25 2c 52 35 25 2c 35 29 |"",print|%,R5%,5)|
|00001880| 0d 05 46 46 61 25 3d a4 | 63 72 65 61 74 65 5f 69 |..FFa%=.|create_i|
|00001890| 63 6f 6e 28 73 75 6d 68 | 61 6e 64 6c 65 25 2c 36 |con(sumh|andle%,6|
|000018a0| 30 38 2c 2d 38 30 2c 31 | 32 38 2c 38 30 2c 26 42 |08,-80,1|28,80,&B|
|000018b0| 37 30 31 39 31 33 44 2c | 22 22 2c 63 6c 72 25 2c |701913D,|"",clr%,|
|000018c0| 52 35 25 2c 35 29 0d 05 | 50 46 61 25 3d a4 63 72 |R5%,5)..|PFa%=.cr|
|000018d0| 65 61 74 65 5f 69 63 6f | 6e 28 73 75 6d 68 61 6e |eate_ico|n(sumhan|
|000018e0| 64 6c 65 25 2c 34 31 36 | 2c 2d 31 36 30 2c 31 39 |dle%,416|,-160,19|
|000018f0| 32 2c 38 30 2c 26 43 37 | 30 31 39 31 33 44 2c 22 |2,80,&C7|01913D,"|
|00001900| 22 2c 73 6d 25 2c 52 35 | 25 2c 37 29 0d 05 5a 47 |",sm%,R5|%,7)..ZG|
|00001910| 61 25 3d a4 63 72 65 61 | 74 65 5f 69 63 6f 6e 28 |a%=.crea|te_icon(|
|00001920| 73 75 6d 68 61 6e 64 6c | 65 25 2c 36 30 38 2c 2d |sumhandl|e%,608,-|
|00001930| 31 36 30 2c 31 32 38 2c | 38 30 2c 26 43 37 30 31 |160,128,|80,&C701|
|00001940| 39 31 33 44 2c 22 22 2c | 73 74 72 25 2c 52 35 25 |913D,"",|str%,R5%|
|00001950| 2c 35 29 0d 05 64 04 0d | 05 6e 13 f4 20 45 78 74 |,5)..d..|.n.. Ext|
|00001960| 65 6e 64 20 77 69 6e 64 | 6f 77 0d 05 78 04 0d 05 |end wind|ow..x...|
|00001970| 82 18 de 20 65 78 74 72 | 61 73 25 20 32 34 2c 66 |... extr|as% 24,f|
|00001980| 6c 64 37 25 20 33 0d 05 | 8c 33 24 65 78 74 72 61 |ld7% 3..|.3$extra|
|00001990| 73 25 3d 22 45 6e 74 65 | 72 20 6e 6f 20 6f 66 20 |s%="Ente|r no of |
|000019a0| 65 78 74 72 61 20 66 69 | 65 6c 64 73 3a 22 3a 24 |extra fi|elds:":$|
|000019b0| 66 6c 64 37 25 3d 22 31 | 22 0d 05 96 4e 65 78 74 |fld7%="1|"...Next|
|000019c0| 65 6e 64 25 3d a4 63 72 | 65 61 74 65 5f 77 69 6e |end%=.cr|eate_win|
|000019d0| 64 6f 77 28 32 34 30 2c | 35 30 30 2c 35 34 34 2c |dow(240,|500,544,|
|000019e0| 39 36 2c 30 2c 30 2c 26 | 41 37 30 30 31 30 31 32 |96,0,0,&|A7001012|
|000019f0| 2c 31 2c 31 32 2c 22 45 | 78 74 65 6e 73 69 6f 6e |,1,12,"E|xtension|
|00001a00| 22 2c 31 35 2c 30 29 0d | 05 a0 46 61 25 3d a4 63 |",15,0).|..Fa%=.c|
|00001a10| 72 65 61 74 65 5f 69 63 | 6f 6e 28 65 78 74 65 6e |reate_ic|on(exten|
|00001a20| 64 25 2c 33 32 2c 2d 38 | 30 2c 34 31 36 2c 38 30 |d%,32,-8|0,416,80|
|00001a30| 2c 26 46 37 30 30 30 31 | 33 44 2c 22 22 2c 65 78 |,&F70001|3D,"",ex|
|00001a40| 74 72 61 73 25 2c 52 35 | 25 2c 32 34 29 0d 05 aa |tras%,R5|%,24)...|
|00001a50| 44 61 25 3d a4 63 72 65 | 61 74 65 5f 69 63 6f 6e |Da%=.cre|ate_icon|
|00001a60| 28 65 78 74 65 6e 64 25 | 2c 34 34 38 2c 2d 38 30 |(extend%|,448,-80|
|00001a70| 2c 36 34 2c 38 30 2c 26 | 37 30 30 46 31 33 35 2c |,64,80,&|700F135,|
|00001a80| 22 22 2c 66 6c 64 37 25 | 2c 6e 6d 52 33 25 2c 33 |"",fld7%|,nmR3%,3|
|00001a90| 29 0d 05 b4 04 0d 05 be | 04 0d 05 c8 24 f4 20 46 |).......|....$. F|
|00001aa0| 69 65 6c 64 20 64 65 66 | 69 6e 69 74 69 6f 6e 20 |ield def|inition |
|00001ab0| 77 69 6e 64 6f 77 20 70 | 61 72 74 20 31 0d 05 d2 |window p|art 1...|
|00001ac0| 04 0d 05 dc 0c de 20 6e | 6f 66 25 20 35 0d 05 e6 |...... n|of% 5...|
|00001ad0| 10 24 6e 6f 66 25 3d c4 | 35 2c bd 30 29 0d 05 f0 |.$nof%=.|5,.0)...|
|00001ae0| 52 6e 65 77 66 69 6c 65 | 25 3d a4 63 72 65 61 74 |Rnewfile|%=.creat|
|00001af0| 65 5f 77 69 6e 64 6f 77 | 28 32 38 30 2c 35 30 30 |e_window|(280,500|
|00001b00| 2c 35 36 30 2c 32 30 34 | 2c 30 2c 30 2c 26 38 37 |,560,204|,0,0,&87|
|00001b10| 30 30 30 30 30 32 2c 32 | 2c 31 32 2c 22 44 65 66 |000002,2|,12,"Def|
|00001b20| 69 6e 69 74 69 6f 6e 73 | 22 2c 31 35 2c 30 29 0d |initions|",15,0).|
|00001b30| 05 fa 43 61 25 3d a4 63 | 72 65 61 74 65 5f 69 63 |..Ca%=.c|reate_ic|
|00001b40| 6f 6e 28 6e 65 77 66 69 | 6c 65 25 2c 32 33 32 2c |on(newfi|le%,232,|
|00001b50| 2d 31 34 34 2c 39 36 2c | 34 34 2c 26 37 30 30 46 |-144,96,|44,&700F|
|00001b60| 33 33 35 2c 22 22 2c 6e | 6f 66 25 2c 6e 6d 25 2c |335,"",n|of%,nm%,|
|00001b70| 34 29 0d 06 04 04 0d 06 | 0e 15 f4 20 53 61 76 65 |4)......|... Save|
|00001b80| 20 62 6f 78 20 77 69 6e | 64 6f 77 0d 06 18 04 0d | box win|dow.....|
|00001b90| 06 22 29 de 20 73 61 76 | 65 73 70 72 25 20 38 2c |."). sav|espr% 8,|
|00001ba0| 73 61 76 65 74 65 78 74 | 25 20 32 35 35 2c 73 61 |savetext|% 255,sa|
|00001bb0| 76 65 76 61 6c 25 20 33 | 0d 06 2c 3e 24 73 61 76 |veval% 3|..,>$sav|
|00001bc0| 65 73 70 72 25 3d 22 66 | 69 6c 65 5f 30 61 30 22 |espr%="f|ile_0a0"|
|00001bd0| 3a 24 73 61 76 65 74 65 | 78 74 25 3d 22 4d 61 78 |:$savete|xt%="Max|
|00001be0| 69 44 61 74 61 22 3a 24 | 73 61 76 65 76 61 6c 25 |iData":$|saveval%|
|00001bf0| 3d 22 41 7e 20 22 0d 06 | 36 46 73 61 76 65 25 3d |="A~ "..|6Fsave%=|
|00001c00| a4 63 72 65 61 74 65 5f | 77 69 6e 64 6f 77 28 30 |.create_|window(0|
|00001c10| 2c 30 2c 32 36 34 2c 31 | 38 30 2c 30 2c 30 2c 26 |,0,264,1|80,0,0,&|
|00001c20| 38 34 30 30 30 30 31 32 | 2c 32 2c 32 2c 22 53 61 |84000012|,2,2,"Sa|
|00001c30| 76 65 20 61 73 3a 22 2c | 33 2c 30 29 0d 06 40 3e |ve as:",|3,0)..@>|
|00001c40| 61 25 3d a4 63 72 65 61 | 74 65 5f 69 63 6f 6e 28 |a%=.crea|te_icon(|
|00001c50| 73 61 76 65 25 2c 31 30 | 30 2c 2d 39 32 2c 36 38 |save%,10|0,-92,68|
|00001c60| 2c 36 38 2c 26 36 31 30 | 32 2c 22 22 2c 73 61 76 |,68,&610|2,"",sav|
|00001c70| 65 73 70 72 25 2c 31 2c | 39 29 0d 06 4a 4b 61 25 |espr%,1,|9)..JKa%|
|00001c80| 3d a4 63 72 65 61 74 65 | 5f 69 63 6f 6e 28 73 61 |=.create|_icon(sa|
|00001c90| 76 65 25 2c 38 2c 2d 31 | 35 36 2c 31 39 32 2c 34 |ve%,8,-1|56,192,4|
|00001ca0| 38 2c 26 37 30 30 46 31 | 32 44 2c 22 22 2c 73 61 |8,&700F1|2D,"",sa|
|00001cb0| 76 65 74 65 78 74 25 2c | 73 61 76 65 76 61 6c 25 |vetext%,|saveval%|
|00001cc0| 2c 32 35 36 29 0d 06 54 | 40 61 25 3d a4 63 72 65 |,256)..T|@a%=.cre|
|00001cd0| 61 74 65 5f 69 63 6f 6e | 28 73 61 76 65 25 2c 32 |ate_icon|(save%,2|
|00001ce0| 30 38 2c 2d 31 35 36 2c | 36 34 2c 34 38 2c 26 43 |08,-156,|64,48,&C|
|00001cf0| 37 30 31 39 31 33 44 2c | 22 22 2c 6f 6b 25 2c 52 |701913D,|"",ok%,R|
|00001d00| 35 25 2c 33 29 0d 06 5e | 04 0d 06 68 17 f4 20 53 |5%,3)..^|...h.. S|
|00001d10| 61 76 65 20 73 70 6f 6f | 6c 20 77 69 6e 64 6f 77 |ave spoo|l window|
|00001d20| 0d 06 72 04 0d 06 7c 1c | de 20 73 70 6c 73 70 72 |..r...|.|. splspr|
|00001d30| 25 20 38 2c 73 70 6c 74 | 65 78 74 25 20 32 35 35 |% 8,splt|ext% 255|
|00001d40| 0d 06 86 2d 24 73 70 6c | 73 70 72 25 3d 22 66 69 |...-$spl|spr%="fi|
|00001d50| 6c 65 5f 66 66 66 22 3a | 24 73 70 6c 74 65 78 74 |le_fff":|$spltext|
|00001d60| 25 3d 22 4d 61 78 69 53 | 70 6f 6f 6c 22 0d 06 90 |%="MaxiS|pool"...|
|00001d70| 46 73 70 6c 25 3d a4 63 | 72 65 61 74 65 5f 77 69 |Fspl%=.c|reate_wi|
|00001d80| 6e 64 6f 77 28 30 2c 30 | 2c 32 36 34 2c 31 38 30 |ndow(0,0|,264,180|
|00001d90| 2c 30 2c 30 2c 26 38 34 | 30 30 30 30 31 32 2c 32 |,0,0,&84|000012,2|
|00001da0| 2c 32 2c 22 53 70 6f 6f | 6c 20 61 73 3a 22 2c 33 |,2,"Spoo|l as:",3|
|00001db0| 2c 30 29 0d 06 9a 3c 61 | 25 3d a4 63 72 65 61 74 |,0)...<a|%=.creat|
|00001dc0| 65 5f 69 63 6f 6e 28 73 | 70 6c 25 2c 31 30 30 2c |e_icon(s|pl%,100,|
|00001dd0| 2d 39 32 2c 36 38 2c 36 | 38 2c 26 36 31 30 32 2c |-92,68,6|8,&6102,|
|00001de0| 22 22 2c 73 70 6c 73 70 | 72 25 2c 31 2c 39 29 0d |"",splsp|r%,1,9).|
|00001df0| 06 a4 49 61 25 3d a4 63 | 72 65 61 74 65 5f 69 63 |..Ia%=.c|reate_ic|
|00001e00| 6f 6e 28 73 70 6c 25 2c | 38 2c 2d 31 35 36 2c 31 |on(spl%,|8,-156,1|
|00001e10| 39 32 2c 34 38 2c 26 37 | 30 30 46 31 32 44 2c 22 |92,48,&7|00F12D,"|
|00001e20| 22 2c 73 70 6c 74 65 78 | 74 25 2c 73 61 76 65 76 |",spltex|t%,savev|
|00001e30| 61 6c 25 2c 32 35 36 29 | 0d 06 ae 3f 61 25 3d a4 |al%,256)|...?a%=.|
|00001e40| 63 72 65 61 74 65 5f 69 | 63 6f 6e 28 73 70 6c 25 |create_i|con(spl%|
|00001e50| 2c 32 30 38 2c 2d 31 35 | 36 2c 36 34 2c 34 38 2c |,208,-15|6,64,48,|
|00001e60| 26 43 37 30 31 39 31 33 | 44 2c 22 22 2c 6f 6b 25 |&C701913|D,"",ok%|
|00001e70| 2c 52 35 25 2c 33 29 0d | 06 b8 04 0d 06 c2 15 f4 |,R5%,3).|........|
|00001e80| 20 53 61 76 65 20 63 73 | 76 20 77 69 6e 64 6f 77 | Save cs|v window|
|00001e90| 0d 06 cc 04 0d 06 d6 1c | de 20 63 73 76 73 70 72 |........|. csvspr|
|00001ea0| 25 20 38 2c 63 73 76 74 | 65 78 74 25 20 32 35 35 |% 8,csvt|ext% 255|
|00001eb0| 0d 06 e0 2b 24 63 73 76 | 73 70 72 25 3d 22 66 69 |...+$csv|spr%="fi|
|00001ec0| 6c 65 5f 64 66 65 22 3a | 24 63 73 76 74 65 78 74 |le_dfe":|$csvtext|
|00001ed0| 25 3d 22 4d 61 78 69 43 | 53 56 22 0d 06 ea 46 63 |%="MaxiC|SV"...Fc|
|00001ee0| 73 76 25 3d a4 63 72 65 | 61 74 65 5f 77 69 6e 64 |sv%=.cre|ate_wind|
|00001ef0| 6f 77 28 30 2c 30 2c 32 | 36 34 2c 31 38 30 2c 30 |ow(0,0,2|64,180,0|
|00001f00| 2c 30 2c 26 38 34 30 30 | 30 30 31 32 2c 32 2c 32 |,0,&8400|0012,2,2|
|00001f10| 2c 22 43 53 56 20 66 69 | 6c 65 3a 22 2c 33 2c 30 |,"CSV fi|le:",3,0|
|00001f20| 29 0d 06 f4 3c 61 25 3d | a4 63 72 65 61 74 65 5f |)...<a%=|.create_|
|00001f30| 69 63 6f 6e 28 63 73 76 | 25 2c 31 30 30 2c 2d 39 |icon(csv|%,100,-9|
|00001f40| 32 2c 36 38 2c 36 38 2c | 26 36 31 30 32 2c 22 22 |2,68,68,|&6102,""|
|00001f50| 2c 63 73 76 73 70 72 25 | 2c 31 2c 39 29 0d 06 fe |,csvspr%|,1,9)...|
|00001f60| 49 61 25 3d a4 63 72 65 | 61 74 65 5f 69 63 6f 6e |Ia%=.cre|ate_icon|
|00001f70| 28 63 73 76 25 2c 38 2c | 2d 31 35 36 2c 31 39 32 |(csv%,8,|-156,192|
|00001f80| 2c 34 38 2c 26 37 30 30 | 46 31 32 44 2c 22 22 2c |,48,&700|F12D,"",|
|00001f90| 63 73 76 74 65 78 74 25 | 2c 73 61 76 65 76 61 6c |csvtext%|,saveval|
|00001fa0| 25 2c 32 35 36 29 0d 07 | 08 3f 61 25 3d a4 63 72 |%,256)..|.?a%=.cr|
|00001fb0| 65 61 74 65 5f 69 63 6f | 6e 28 63 73 76 25 2c 32 |eate_ico|n(csv%,2|
|00001fc0| 30 38 2c 2d 31 35 36 2c | 36 34 2c 34 38 2c 26 43 |08,-156,|64,48,&C|
|00001fd0| 37 30 31 39 31 33 44 2c | 22 22 2c 6f 6b 25 2c 52 |701913D,|"",ok%,R|
|00001fe0| 35 25 2c 33 29 0d 07 12 | 04 0d 07 1c 17 f4 20 53 |5%,3)...|...... S|
|00001ff0| 61 76 65 20 73 65 74 75 | 70 20 77 69 6e 64 6f 77 |ave setu|p window|
|00002000| 0d 07 26 04 0d 07 30 14 | de 20 73 65 74 75 70 74 |..&...0.|. setupt|
|00002010| 65 78 74 25 20 32 35 35 | 0d 07 3a 1a 24 73 65 74 |ext% 255|..:.$set|
|00002020| 75 70 74 65 78 74 25 3d | 22 4d 61 78 69 44 61 74 |uptext%=|"MaxiDat|
|00002030| 61 22 0d 07 44 4a 73 65 | 74 75 70 25 3d a4 63 72 |a"..DJse|tup%=.cr|
|00002040| 65 61 74 65 5f 77 69 6e | 64 6f 77 28 30 2c 30 2c |eate_win|dow(0,0,|
|00002050| 32 36 34 2c 31 38 30 2c | 30 2c 30 2c 26 38 34 30 |264,180,|0,0,&840|
|00002060| 30 30 30 31 32 2c 32 2c | 32 2c 22 53 61 76 65 20 |00012,2,|2,"Save |
|00002070| 53 65 74 75 70 3a 22 2c | 33 2c 30 29 0d 07 4e 3f |Setup:",|3,0)..N?|
|00002080| 61 25 3d a4 63 72 65 61 | 74 65 5f 69 63 6f 6e 28 |a%=.crea|te_icon(|
|00002090| 73 65 74 75 70 25 2c 31 | 30 30 2c 2d 39 32 2c 36 |setup%,1|00,-92,6|
|000020a0| 38 2c 36 38 2c 26 36 31 | 30 32 2c 22 22 2c 73 61 |8,68,&61|02,"",sa|
|000020b0| 76 65 73 70 72 25 2c 31 | 2c 39 29 0d 07 58 4d 61 |vespr%,1|,9)..XMa|
|000020c0| 25 3d a4 63 72 65 61 74 | 65 5f 69 63 6f 6e 28 73 |%=.creat|e_icon(s|
|000020d0| 65 74 75 70 25 2c 38 2c | 2d 31 35 36 2c 31 39 32 |etup%,8,|-156,192|
|000020e0| 2c 34 38 2c 26 37 30 30 | 46 31 32 44 2c 22 22 2c |,48,&700|F12D,"",|
|000020f0| 73 65 74 75 70 74 65 78 | 74 25 2c 73 61 76 65 76 |setuptex|t%,savev|
|00002100| 61 6c 25 2c 32 35 36 29 | 0d 07 62 41 61 25 3d a4 |al%,256)|..bAa%=.|
|00002110| 63 72 65 61 74 65 5f 69 | 63 6f 6e 28 73 65 74 75 |create_i|con(setu|
|00002120| 70 25 2c 32 30 38 2c 2d | 31 35 36 2c 36 34 2c 34 |p%,208,-|156,64,4|
|00002130| 38 2c 26 43 37 30 31 39 | 31 33 44 2c 22 22 2c 6f |8,&C7019|13D,"",o|
|00002140| 6b 25 2c 52 35 25 2c 33 | 29 0d 07 6c 04 0d 07 76 |k%,R5%,3|)..l...v|
|00002150| 1d f4 20 53 61 76 65 20 | 53 65 74 75 70 20 53 68 |.. Save |Setup Sh|
|00002160| 65 6c 6c 20 57 69 6e 64 | 6f 77 0d 07 80 04 0d 07 |ell Wind|ow......|
|00002170| 8a 15 de 20 73 65 74 75 | 70 73 68 65 6c 6c 25 20 |... setu|pshell% |
|00002180| 32 35 35 0d 07 94 1c 24 | 73 65 74 75 70 73 68 65 |255....$|setupshe|
|00002190| 6c 6c 25 3d 22 4d 61 78 | 69 53 68 65 6c 6c 22 0d |ll%="Max|iShell".|
|000021a0| 07 9e 4a 73 68 65 6c 6c | 25 3d a4 63 72 65 61 74 |..Jshell|%=.creat|
|000021b0| 65 5f 77 69 6e 64 6f 77 | 28 30 2c 30 2c 32 36 34 |e_window|(0,0,264|
|000021c0| 2c 31 38 30 2c 30 2c 30 | 2c 26 38 34 30 30 30 30 |,180,0,0|,&840000|
|000021d0| 31 32 2c 32 2c 32 2c 22 | 53 61 76 65 20 53 68 65 |12,2,2,"|Save She|
|000021e0| 6c 6c 3a 22 2c 33 2c 30 | 29 0d 07 a8 3f 61 25 3d |ll:",3,0|)...?a%=|
|000021f0| a4 63 72 65 61 74 65 5f | 69 63 6f 6e 28 73 68 65 |.create_|icon(she|
|00002200| 6c 6c 25 2c 31 30 30 2c | 2d 39 32 2c 36 38 2c 36 |ll%,100,|-92,68,6|
|00002210| 38 2c 26 36 31 30 32 2c | 22 22 2c 73 61 76 65 73 |8,&6102,|"",saves|
|00002220| 70 72 25 2c 31 2c 39 29 | 0d 07 b2 4e 61 25 3d a4 |pr%,1,9)|...Na%=.|
|00002230| 63 72 65 61 74 65 5f 69 | 63 6f 6e 28 73 68 65 6c |create_i|con(shel|
|00002240| 6c 25 2c 38 2c 2d 31 35 | 36 2c 31 39 32 2c 34 38 |l%,8,-15|6,192,48|
|00002250| 2c 26 37 30 30 46 31 32 | 44 2c 22 22 2c 73 65 74 |,&700F12|D,"",set|
|00002260| 75 70 73 68 65 6c 6c 25 | 2c 73 61 76 65 76 61 6c |upshell%|,saveval|
|00002270| 25 2c 32 35 36 29 0d 07 | bc 41 61 25 3d a4 63 72 |%,256)..|.Aa%=.cr|
|00002280| 65 61 74 65 5f 69 63 6f | 6e 28 73 68 65 6c 6c 25 |eate_ico|n(shell%|
|00002290| 2c 32 30 38 2c 2d 31 35 | 36 2c 36 34 2c 34 38 2c |,208,-15|6,64,48,|
|000022a0| 26 43 37 30 31 39 31 33 | 44 2c 22 22 2c 6f 6b 25 |&C701913|D,"",ok%|
|000022b0| 2c 52 35 25 2c 33 29 0d | 07 c6 04 0d 07 d0 1e f4 |,R5%,3).|........|
|000022c0| 20 45 78 74 65 6e 64 65 | 64 20 53 61 76 65 20 62 | Extende|d Save b|
|000022d0| 6f 78 20 77 69 6e 64 6f | 77 0d 07 da 04 0d 07 e4 |ox windo|w.......|
|000022e0| 4f 65 78 74 72 61 73 61 | 76 65 25 3d a4 63 72 65 |Oextrasa|ve%=.cre|
|000022f0| 61 74 65 5f 77 69 6e 64 | 6f 77 28 35 30 30 2c 33 |ate_wind|ow(500,3|
|00002300| 30 30 2c 32 36 34 2c 31 | 38 30 2c 30 2c 30 2c 26 |00,264,1|80,0,0,&|
|00002310| 38 34 30 30 30 30 31 32 | 2c 32 2c 32 2c 22 53 61 |84000012|,2,2,"Sa|
|00002320| 76 65 20 61 73 3a 22 2c | 33 2c 30 29 0d 07 ee 43 |ve as:",|3,0)...C|
|00002330| 61 25 3d a4 63 72 65 61 | 74 65 5f 69 63 6f 6e 28 |a%=.crea|te_icon(|
|00002340| 65 78 74 72 61 73 61 76 | 65 25 2c 31 30 30 2c 2d |extrasav|e%,100,-|
|00002350| 39 32 2c 36 38 2c 36 38 | 2c 26 36 31 30 32 2c 22 |92,68,68|,&6102,"|
|00002360| 22 2c 73 61 76 65 73 70 | 72 25 2c 31 2c 39 29 0d |",savesp|r%,1,9).|
|00002370| 07 f8 50 61 25 3d a4 63 | 72 65 61 74 65 5f 69 63 |..Pa%=.c|reate_ic|
|00002380| 6f 6e 28 65 78 74 72 61 | 73 61 76 65 25 2c 38 2c |on(extra|save%,8,|
|00002390| 2d 31 35 36 2c 31 39 32 | 2c 34 38 2c 26 37 30 30 |-156,192|,48,&700|
|000023a0| 46 31 32 44 2c 22 22 2c | 73 61 76 65 74 65 78 74 |F12D,"",|savetext|
|000023b0| 25 2c 73 61 76 65 76 61 | 6c 25 2c 32 35 36 29 0d |%,saveva|l%,256).|
|000023c0| 08 02 45 61 25 3d a4 63 | 72 65 61 74 65 5f 69 63 |..Ea%=.c|reate_ic|
|000023d0| 6f 6e 28 65 78 74 72 61 | 73 61 76 65 25 2c 32 30 |on(extra|save%,20|
|000023e0| 38 2c 2d 31 35 36 2c 36 | 34 2c 34 38 2c 26 43 37 |8,-156,6|4,48,&C7|
|000023f0| 30 31 39 31 33 44 2c 22 | 22 2c 6f 6b 25 2c 52 35 |01913D,"|",ok%,R5|
|00002400| 25 2c 33 29 0d 08 0c 04 | 0d 08 16 11 f4 20 47 6f |%,3)....|..... Go|
|00002410| 74 6f 20 57 69 6e 64 6f | 77 0d 08 20 04 0d 08 2a |to Windo|w.. ...*|
|00002420| 0d de 20 6e 65 78 74 25 | 20 33 0d 08 34 0e 24 6e |.. next%| 3..4.$n|
|00002430| 65 78 74 25 3d 22 30 22 | 0d 08 3e 4f 67 6f 68 61 |ext%="0"|..>Ogoha|
|00002440| 6e 64 6c 65 25 3d a4 63 | 72 65 61 74 65 5f 77 69 |ndle%=.c|reate_wi|
|00002450| 6e 64 6f 77 28 35 30 30 | 2c 34 30 30 2c 31 39 32 |ndow(500|,400,192|
|00002460| 2c 38 38 2c 30 2c 30 2c | 26 38 34 30 30 30 30 31 |,88,0,0,|&8400001|
|00002470| 32 2c 32 2c 32 2c 22 52 | 65 63 6f 72 64 20 6e 6f |2,2,2,"R|ecord no|
|00002480| 3a 22 2c 33 2c 30 29 0d | 08 48 43 61 25 3d a4 63 |:",3,0).|.HCa%=.c|
|00002490| 72 65 61 74 65 5f 69 63 | 6f 6e 28 67 6f 68 61 6e |reate_ic|on(gohan|
|000024a0| 64 6c 65 25 2c 35 36 2c | 2d 36 34 2c 38 38 2c 34 |dle%,56,|-64,88,4|
|000024b0| 38 2c 26 37 30 30 46 33 | 33 35 2c 22 22 2c 6e 65 |8,&700F3|35,"",ne|
|000024c0| 78 74 25 2c 6e 6d 25 2c | 34 29 0d 08 52 04 0d 08 |xt%,nm%,|4)..R...|
|000024d0| 5c 13 f4 20 49 6d 70 6f | 72 74 20 57 69 6e 64 6f |\.. Impo|rt Windo|
|000024e0| 77 0d 08 66 04 0d 08 70 | 17 de 20 69 6d 70 31 25 |w..f...p|.. imp1%|
|000024f0| 20 32 35 2c 66 74 79 70 | 65 25 20 34 0d 08 7a 34 | 25,ftyp|e% 4..z4|
|00002500| 24 69 6d 70 31 25 3d 22 | 50 61 74 68 6e 61 6d 65 |$imp1%="|Pathname|
|00002510| 20 6f 66 20 69 6d 70 6f | 72 74 65 64 20 66 69 6c | of impo|rted fil|
|00002520| 65 22 3a 24 66 74 79 70 | 65 25 3d 22 43 53 56 22 |e":$ftyp|e%="CSV"|
|00002530| 0d 08 84 4b 69 6d 70 6f | 72 74 25 3d a4 63 72 65 |...Kimpo|rt%=.cre|
|00002540| 61 74 65 5f 77 69 6e 64 | 6f 77 28 33 36 30 2c 34 |ate_wind|ow(360,4|
|00002550| 30 30 2c 35 37 36 2c 31 | 36 30 2c 30 2c 30 2c 26 |00,576,1|60,0,0,&|
|00002560| 38 36 30 30 30 30 31 32 | 2c 32 2c 31 32 2c 22 49 |86000012|,2,12,"I|
|00002570| 6d 70 6f 72 74 22 2c 33 | 2c 30 29 0d 08 8e 43 61 |mport",3|,0)...Ca|
|00002580| 25 3d a4 63 72 65 61 74 | 65 5f 69 63 6f 6e 28 69 |%=.creat|e_icon(i|
|00002590| 6d 70 6f 72 74 25 2c 30 | 2c 2d 38 30 2c 34 39 36 |mport%,0|,-80,496|
|000025a0| 2c 38 30 2c 26 46 37 30 | 30 30 31 33 44 2c 22 22 |,80,&F70|0013D,""|
|000025b0| 2c 69 6d 70 31 25 2c 52 | 35 25 2c 32 35 29 0d 08 |,imp1%,R|5%,25)..|
|000025c0| 98 44 61 25 3d a4 63 72 | 65 61 74 65 5f 69 63 6f |.Da%=.cr|eate_ico|
|000025d0| 6e 28 69 6d 70 6f 72 74 | 25 2c 30 2c 2d 31 36 30 |n(import|%,0,-160|
|000025e0| 2c 34 39 36 2c 38 30 2c | 26 37 30 30 46 31 33 35 |,496,80,|&700F135|
|000025f0| 2c 22 22 2c 70 61 74 68 | 25 2c 52 33 25 2c 32 35 |,"",path|%,R3%,25|
|00002600| 35 29 0d 08 a2 41 61 25 | 3d a4 63 72 65 61 74 65 |5)...Aa%|=.create|
|00002610| 5f 69 63 6f 6e 28 69 6d | 70 6f 72 74 25 2c 34 39 |_icon(im|port%,49|
|00002620| 36 2c 2d 38 30 2c 38 30 | 2c 38 30 2c 26 43 37 30 |6,-80,80|,80,&C70|
|00002630| 31 39 31 33 44 2c 22 22 | 2c 6f 6b 25 2c 52 35 25 |1913D,""|,ok%,R5%|
|00002640| 2c 33 29 0d 08 ac 45 61 | 25 3d a4 63 72 65 61 74 |,3)...Ea|%=.creat|
|00002650| 65 5f 69 63 6f 6e 28 69 | 6d 70 6f 72 74 25 2c 34 |e_icon(i|mport%,4|
|00002660| 39 36 2c 2d 31 36 30 2c | 38 30 2c 38 30 2c 26 43 |96,-160,|80,80,&C|
|00002670| 37 30 31 39 31 33 44 2c | 22 22 2c 66 74 79 70 65 |701913D,|"",ftype|
|00002680| 25 2c 52 35 25 2c 34 29 | 0d 08 b6 04 0d 08 c0 11 |%,R5%,4)|........|
|00002690| f4 20 50 61 6e 65 20 77 | 69 6e 64 6f 77 0d 08 ca |. Pane w|indow...|
|000026a0| 04 0d 08 d4 13 de 20 6c | 61 73 74 25 20 32 2c 6f |...... l|ast% 2,o|
|000026b0| 6e 25 20 32 0d 08 de 17 | 24 6c 61 73 74 25 3d 22 |n% 2....|$last%="|
|000026c0| 3c 22 3a 24 6f 6e 25 3d | 22 3e 22 0d 08 e8 3e 70 |<":$on%=|">"...>p|
|000026d0| 61 6e 65 25 3d a4 63 72 | 65 61 74 65 5f 77 69 6e |ane%=.cr|eate_win|
|000026e0| 64 6f 77 28 30 2c 31 38 | 30 2c 39 36 2c 34 38 2c |dow(0,18|0,96,48,|
|000026f0| 30 2c 30 2c 26 38 30 30 | 30 30 30 33 30 2c 32 2c |0,0,&800|00030,2,|
|00002700| 32 2c 22 22 2c 33 2c 30 | 29 0d 08 f2 3f 61 25 3d |2,"",3,0|)...?a%=|
|00002710| a4 63 72 65 61 74 65 5f | 69 63 6f 6e 28 70 61 6e |.create_|icon(pan|
|00002720| 65 25 2c 30 2c 2d 34 38 | 2c 34 38 2c 34 38 2c 26 |e%,0,-48|,48,48,&|
|00002730| 43 37 30 31 32 31 33 44 | 2c 22 22 2c 6c 61 73 74 |C701213D|,"",last|
|00002740| 25 2c 52 35 25 2c 32 29 | 0d 08 fc 3e 61 25 3d a4 |%,R5%,2)|...>a%=.|
|00002750| 63 72 65 61 74 65 5f 69 | 63 6f 6e 28 70 61 6e 65 |create_i|con(pane|
|00002760| 25 2c 34 38 2c 2d 34 38 | 2c 34 38 2c 34 38 2c 26 |%,48,-48|,48,48,&|
|00002770| 43 37 30 31 32 31 33 44 | 2c 22 22 2c 6f 6e 25 2c |C701213D|,"",on%,|
|00002780| 52 35 25 2c 32 29 0d 09 | 06 04 0d 09 10 2c f4 20 |R5%,2)..|.....,. |
|00002790| 4c 6f 61 64 20 64 61 74 | 61 20 66 69 6c 65 20 69 |Load dat|a file i|
|000027a0| 66 20 73 74 61 72 74 65 | 64 20 76 69 61 20 74 68 |f starte|d via th|
|000027b0| 65 20 66 69 6c 65 0d 09 | 1a 04 0d 09 24 19 c8 99 |e file..|....$...|
|000027c0| 20 22 4f 53 5f 47 65 74 | 45 6e 76 22 20 b8 20 65 | "OS_Get|Env" . e|
|000027d0| 6e 76 24 0d 09 2e 16 e7 | 20 a7 65 6e 76 24 2c 22 |nv$.....| .env$,"|
|000027e0| 2d 71 75 69 74 22 29 20 | 8c 0d 09 38 12 49 25 3d |-quit") |...8.I%=|
|000027f0| a7 65 6e 76 24 2c 22 22 | 22 22 29 0d 09 42 17 49 |.env$,""|"")..B.I|
|00002800| 25 3d a7 65 6e 76 24 2c | 22 22 22 22 2c 49 25 2b |%=.env$,|"""",I%+|
|00002810| 31 29 0d 09 4c 05 f5 0d | 09 56 09 49 25 2b 3d 31 |1)..L...|.V.I%+=1|
|00002820| 0d 09 60 16 fd 20 c1 65 | 6e 76 24 2c 49 25 2c 31 |..`.. .e|nv$,I%,1|
|00002830| 29 3c 3e 22 20 22 0d 09 | 6a 12 65 6e 76 24 3d c1 |)<>" "..|j.env$=.|
|00002840| 65 6e 76 24 2c 49 25 29 | 0d 09 74 05 cd 0d 09 7e |env$,I%)|..t....~|
|00002850| 04 0d 09 88 10 e7 20 65 | 6e 76 24 3c 3e 22 22 20 |...... e|nv$<>"" |
|00002860| 8c 0d 09 92 2b 70 61 74 | 68 24 3d 65 6e 76 24 3a |....+pat|h$=env$:|
|00002870| 24 70 61 74 68 25 3d 65 | 6e 76 24 3a 24 73 61 76 |$path%=e|nv$:$sav|
|00002880| 65 74 65 78 74 25 3d 70 | 61 74 68 24 0d 09 9c 1b |etext%=p|ath$....|
|00002890| f2 6c 6f 61 64 28 65 6e | 76 24 29 3a f2 6d 61 69 |.load(en|v$):.mai|
|000028a0| 6e 77 69 6e 64 6f 77 0d | 09 a6 0b 66 69 6c 65 25 |nwindow.|...file%|
|000028b0| 3d b9 0d 09 b0 26 74 62 | 61 72 24 3d 22 4d 61 78 |=....&tb|ar$="Max|
|000028c0| 69 66 69 6c 65 20 22 2b | c0 a4 67 65 74 6c 65 61 |ifile "+|..getlea|
|000028d0| 66 28 65 6e 76 24 29 29 | 0d 09 ba 21 f2 6e 6f 73 |f(env$))|...!.nos|
|000028e0| 74 61 72 28 6d 68 61 6e | 64 6c 65 25 2c 74 62 61 |tar(mhan|dle%,tba|
|000028f0| 72 25 2c 74 62 61 72 24 | 29 0d 09 c4 1c 6b 65 79 |r%,tbar$|)....key|
|00002900| 73 25 3d 31 3a 21 62 6c | 6f 63 6b 25 3d 6d 68 61 |s%=1:!bl|ock%=mha|
|00002910| 6e 64 6c 65 25 0d 09 ce | 23 c8 99 22 57 69 6d 70 |ndle%...|#.."Wimp|
|00002920| 5f 47 65 74 57 69 6e 64 | 6f 77 53 74 61 74 65 22 |_GetWind|owState"|
|00002930| 2c 2c 62 6c 6f 63 6b 25 | 0d 09 d8 10 62 6c 6f 63 |,,block%|....bloc|
|00002940| 6b 25 21 32 38 3d 2d 31 | 0d 09 e2 1f c8 99 22 57 |k%!28=-1|......"W|
|00002950| 69 6d 70 5f 4f 70 65 6e | 57 69 6e 64 6f 77 22 2c |imp_Open|Window",|
|00002960| 2c 62 6c 6f 63 6b 25 0d | 09 ec 09 f2 6f 70 65 6e |,block%.|....open|
|00002970| 0d 09 f6 05 cd 0d 0a 00 | 04 0d 0a 0a 05 e1 0d 0a |........|........|
|00002980| 14 04 0d 0a 1e 18 dd f2 | 72 65 70 6f 72 74 28 65 |........|report(e|
|00002990| 72 72 24 2c 66 6c 61 67 | 25 29 0d 0a 28 0e 6e 61 |rr$,flag|%)..(.na|
|000029a0| 6d 65 24 3d 61 70 70 24 | 0d 0a 32 2e e7 20 66 6c |me$=app$|..2.. fl|
|000029b0| 61 67 25 20 80 20 31 36 | 20 8c 20 6e 61 6d 65 24 |ag% . 16| . name$|
|000029c0| 3d 22 4d 65 73 73 61 67 | 65 20 66 72 6f 6d 20 22 |="Messag|e from "|
|000029d0| 2b 6e 61 6d 65 24 0d 0a | 3c 0e 21 6d 65 73 73 25 |+name$..|<.!mess%|
|000029e0| 3d 32 35 35 0d 0a 46 16 | 24 28 6d 65 73 73 25 2b |=255..F.|$(mess%+|
|000029f0| 34 29 3d 65 72 72 24 2b | bd 30 0d 0a 50 38 c8 99 |4)=err$+|.0..P8..|
|00002a00| 20 22 57 69 6d 70 5f 52 | 65 70 6f 72 74 45 72 72 | "Wimp_R|eportErr|
|00002a10| 6f 72 22 2c 6d 65 73 73 | 25 2c 66 6c 61 67 25 2c |or",mess|%,flag%,|
|00002a20| 6e 61 6d 65 24 20 b8 20 | 2c 65 72 72 63 6c 69 63 |name$ . |,errclic|
|00002a30| 6b 25 0d 0a 5a 05 e1 0d | 0a 64 04 0d 0a 6e 0f dd |k%..Z...|.d...n..|
|00002a40| f2 65 72 72 6f 72 28 61 | 24 29 0d 0a 78 09 65 72 |.error(a|$)..x.er|
|00002a50| 25 3d 31 0d 0a 82 07 ef | 20 33 0d 0a 8c 0a c8 8e |%=1.....| 3......|
|00002a60| 20 9f 20 ca 0d 0a 96 0c | 20 20 c9 20 31 39 33 3a | . .....|  . 193:|
|00002a70| 0d 0a a0 77 20 20 20 20 | f2 72 65 70 6f 72 74 28 |...w    |.report(|
|00002a80| 22 59 6f 75 20 61 72 65 | 20 6e 6f 74 20 61 6c 6c |"You are| not all|
|00002a90| 6f 77 65 64 20 74 6f 20 | 63 68 61 6e 67 65 20 74 |owed to |change t|
|00002aa0| 68 65 20 6f 72 69 67 69 | 6e 61 6c 20 66 69 6c 65 |he origi|nal file|
|00002ab0| 2c 20 62 75 74 20 79 6f | 75 20 6d 61 79 20 73 61 |, but yo|u may sa|
|00002ac0| 76 65 20 61 20 63 6f 70 | 79 20 75 6e 64 65 72 20 |ve a cop|y under |
|00002ad0| 61 6e 6f 74 68 65 72 20 | 6e 61 6d 65 22 2c 31 37 |another |name",17|
|00002ae0| 29 3a 65 72 25 3d 30 0d | 0a aa 0b 20 20 c9 20 31 |):er%=0.|...  . 1|
|00002af0| 35 3a 0d 0a b4 be 20 20 | 20 20 f2 72 65 70 6f 72 |5:....  |  .repor|
|00002b00| 74 28 61 24 2b 22 20 49 | 66 20 74 68 69 73 20 6f |t(a$+" I|f this o|
|00002b10| 63 63 75 72 72 65 64 20 | 69 6e 20 74 68 65 20 50 |ccurred |in the P|
|00002b20| 52 49 4e 54 20 53 65 74 | 75 70 2c 20 64 6f 6e 27 |RINT Set|up, don'|
|00002b30| 74 20 70 61 6e 69 63 21 | 20 4e 75 6d 62 65 72 73 |t panic!| Numbers|
|00002b40| 20 69 64 65 6e 74 69 66 | 79 69 6e 67 20 66 69 65 | identif|ying fie|
|00002b50| 6c 64 73 20 6d 75 73 74 | 20 62 65 20 73 65 70 61 |lds must| be sepa|
|00002b60| 72 61 74 65 64 20 62 79 | 20 63 6f 6d 6d 61 73 2e |rated by| commas.|
|00002b70| 20 4f 74 68 65 72 77 69 | 73 65 20 73 61 76 65 20 | Otherwi|se save |
|00002b80| 79 6f 75 72 20 64 61 74 | 61 20 61 6e 64 20 72 65 |your dat|a and re|
|00002b90| 73 74 61 72 74 20 74 68 | 65 20 61 70 70 6c 69 63 |start th|e applic|
|00002ba0| 61 74 69 6f 6e 22 2c 31 | 37 29 3a 65 72 25 3d 30 |ation",1|7):er%=0|
|00002bb0| 0d 0a be 32 20 20 c9 20 | 32 32 32 3a f2 72 65 70 |...2  . |222:.rep|
|00002bc0| 6f 72 74 28 61 24 2c 31 | 37 29 3a 6f 6f 70 65 6e |ort(a$,1|7):oopen|
|00002bd0| 25 3d a3 3a 69 6f 70 65 | 6e 25 3d a3 3a 65 72 25 |%=.:iope|n%=.:er%|
|00002be0| 3d 30 0d 0a c8 43 20 20 | c9 20 31 34 37 35 3a f2 |=0...C  |. 1475:.|
|00002bf0| 72 65 70 6f 72 74 28 22 | 50 72 69 6e 74 65 72 20 |report("|Printer |
|00002c00| 44 72 69 76 65 72 20 68 | 61 73 20 6e 6f 74 20 62 |Driver h|as not b|
|00002c10| 65 65 6e 20 6c 6f 61 64 | 65 64 22 2c 31 37 29 3a |een load|ed",17):|
|00002c20| 65 72 25 3d 30 0d 0a d2 | 07 20 20 7f 0d 0a dc 13 |er%=0...|.  .....|
|00002c30| 20 20 f2 72 65 70 6f 72 | 74 28 61 24 2c 31 29 0d |  .repor|t(a$,1).|
|00002c40| 0a e6 05 cb 0d 0a f0 19 | e7 20 69 6f 70 65 6e 25 |........|. iopen%|
|00002c50| 20 d9 23 49 3a 69 6f 70 | 65 6e 25 3d a3 0d 0a fa | .#I:iop|en%=....|
|00002c60| 19 e7 20 6f 6f 70 65 6e | 25 20 d9 23 4f 3a 6f 6f |.. oopen|% .#O:oo|
|00002c70| 70 65 6e 25 3d a3 0d 0b | 04 40 e7 20 70 64 25 20 |pen%=...|.@. pd% |
|00002c80| c8 99 20 22 50 44 72 69 | 76 65 72 5f 41 62 6f 72 |.. "PDri|ver_Abor|
|00002c90| 74 4a 6f 62 22 2c 50 25 | 3a d9 23 50 25 3a c8 99 |tJob",P%|:.#P%:..|
|00002ca0| 20 22 48 6f 75 72 67 6c | 61 73 73 5f 4f 66 66 22 | "Hourgl|ass_Off"|
|00002cb0| 3a 70 64 25 3d a3 0d 0b | 0e 1f 61 25 3d a7 61 24 |:pd%=...|..a%=.a$|
|00002cc0| 2c 22 64 69 73 63 22 29 | 3a e7 61 25 3c 3e 30 20 |,"disc")|:.a%<>0 |
|00002cd0| 65 72 25 3d 30 0d 0b 18 | 1f 61 25 3d a7 61 24 2c |er%=0...|.a%=.a$,|
|00002ce0| 22 44 69 73 63 22 29 3a | e7 61 25 3c 3e 30 20 65 |"Disc"):|.a%<>0 e|
|00002cf0| 72 25 3d 30 0d 0b 22 0d | e7 20 65 72 25 3d 30 20 |r%=0..".|. er%=0 |
|00002d00| e1 0d 0b 2c 17 c8 99 20 | 22 57 69 6d 70 5f 43 6c |...,... |"Wimp_Cl|
|00002d10| 6f 73 65 44 6f 77 6e 22 | 0d 0b 36 05 e0 0d 0b 40 |oseDown"|..6....@|
|00002d20| 05 e1 0d 0b 4a 04 0d 0b | 54 16 dd f2 73 65 74 75 |....J...|T...setu|
|00002d30| 70 6d 65 6e 75 28 6d 65 | 6e 75 25 29 0d 0b 5e 1f |pmenu(me|nu%)..^.|
|00002d40| f3 20 74 69 74 6c 65 24 | 2c 6e 75 6d 25 3a 24 6d |. title$|,num%:$m|
|00002d50| 65 6e 75 25 3d 74 69 74 | 6c 65 24 0d 0b 68 1b 77 |enu%=tit|le$..h.w|
|00002d60| 69 64 74 68 25 3d 28 a9 | 28 74 69 74 6c 65 24 29 |idth%=(.|(title$)|
|00002d70| 2d 32 29 2a 31 36 0d 0b | 72 2a 6d 65 6e 75 25 21 |-2)*16..|r*menu%!|
|00002d80| 31 32 3d 26 37 30 32 30 | 37 3a 6d 65 6e 75 25 21 |12=&7020|7:menu%!|
|00002d90| 32 30 3d 34 34 3a 6d 65 | 6e 75 25 21 32 34 3d 30 |20=44:me|nu%!24=0|
|00002da0| 0d 0b 7c 1f 70 74 72 25 | 3d 6d 65 6e 75 25 2b 32 |..|.ptr%|=menu%+2|
|00002db0| 38 3a e3 20 69 25 3d 31 | 20 b8 20 6e 75 6d 25 0d |8:. i%=1| . num%.|
|00002dc0| 0b 86 1b f3 20 6d 66 6c | 61 67 73 25 2c 73 75 62 |.... mfl|ags%,sub|
|00002dd0| 70 74 72 25 2c 69 74 65 | 6d 24 0d 0b 90 20 21 70 |ptr%,ite|m$... !p|
|00002de0| 74 72 25 3d 6d 66 6c 61 | 67 73 25 3a 70 74 72 25 |tr%=mfla|gs%:ptr%|
|00002df0| 21 34 3d 73 75 62 70 74 | 72 25 0d 0b 9a 24 70 74 |!4=subpt|r%...$pt|
|00002e00| 72 25 21 38 3d 26 37 30 | 30 30 30 32 31 3a 24 28 |r%!8=&70|00021:$(|
|00002e10| 70 74 72 25 2b 31 32 29 | 3d 69 74 65 6d 24 0d 0b |ptr%+12)|=item$..|
|00002e20| a4 16 61 25 3d 28 a9 28 | 69 74 65 6d 24 29 2b 31 |..a%=(.(|item$)+1|
|00002e30| 29 2a 31 36 0d 0b ae 19 | e7 20 61 25 3e 77 69 64 |)*16....|. a%>wid|
|00002e40| 74 68 25 20 77 69 64 74 | 68 25 3d 61 25 0d 0b b8 |th% widt|h%=a%...|
|00002e50| 0e 70 74 72 25 2b 3d 32 | 34 3a ed 0d 0b c2 13 6d |.ptr%+=2|4:.....m|
|00002e60| 65 6e 75 25 21 31 36 3d | 77 69 64 74 68 25 0d 0b |enu%!16=|width%..|
|00002e70| cc 05 e1 0d 0b d6 05 3a | 0d 0b e0 1d dd f2 73 68 |.......:|......sh|
|00002e80| 6f 77 6d 65 6e 75 28 6d | 65 6e 75 25 2c 6d 78 25 |owmenu(m|enu%,mx%|
|00002e90| 2c 6d 79 25 29 0d 0b ea | 27 c8 99 20 22 57 69 6d |,my%)...|'.. "Wim|
|00002ea0| 70 5f 43 72 65 61 74 65 | 4d 65 6e 75 22 2c 2c 6d |p_Create|Menu",,m|
|00002eb0| 65 6e 75 25 2c 6d 78 25 | 2c 6d 79 25 0d 0b f4 05 |enu%,mx%|,my%....|
|00002ec0| e1 0d 0b fe 05 3a 0d 0c | 08 79 dd 20 a4 63 72 65 |.....:..|.y. .cre|
|00002ed0| 61 74 65 5f 6d 61 69 6e | 77 69 6e 64 6f 77 28 78 |ate_main|window(x|
|00002ee0| 25 2c 79 25 2c 77 25 2c | 68 25 2c 65 78 74 78 25 |%,y%,w%,|h%,extx%|
|00002ef0| 2c 65 78 74 79 25 2c 66 | 6c 61 67 73 25 2c 62 61 |,exty%,f|lags%,ba|
|00002f00| 63 6b 67 72 6f 75 6e 64 | 25 2c 66 6f 63 75 73 25 |ckground|%,focus%|
|00002f10| 2c 74 69 74 6c 65 69 63 | 6f 6e 25 2c 70 74 31 25 |,titleic|on%,pt1%|
|00002f20| 2c 70 74 32 25 2c 70 74 | 33 25 2c 77 6f 72 6b 66 |,pt2%,pt|3%,workf|
|00002f30| 6c 61 67 25 2c 73 70 72 | 5f 61 72 65 61 25 29 0d |lag%,spr|_area%).|
|00002f40| 0c 12 17 f4 20 76 69 73 | 69 62 6c 65 20 77 6f 72 |.... vis|ible wor|
|00002f50| 6b 20 61 72 65 61 0d 0c | 1c 0e 21 62 6c 6f 63 6b |k area..|..!block|
|00002f60| 25 3d 78 25 0d 0c 26 0f | 62 6c 6f 63 6b 25 21 34 |%=x%..&.|block%!4|
|00002f70| 3d 79 25 0d 0c 30 12 62 | 6c 6f 63 6b 25 21 38 3d |=y%..0.b|lock%!8=|
|00002f80| 78 25 2b 77 25 0d 0c 3a | 13 62 6c 6f 63 6b 25 21 |x%+w%..:|.block%!|
|00002f90| 31 32 3d 79 25 2b 68 25 | 0d 0c 44 14 f4 20 73 63 |12=y%+h%|..D.. sc|
|00002fa0| 72 6f 6c 6c 20 6f 66 66 | 73 65 74 73 0d 0c 4e 0f |roll off|sets..N.|
|00002fb0| 62 6c 6f 63 6b 25 21 31 | 36 3d 30 0d 0c 58 0f 62 |block%!1|6=0..X.b|
|00002fc0| 6c 6f 63 6b 25 21 32 30 | 3d 30 0d 0c 62 24 f4 20 |lock%!20|=0..b$. |
|00002fd0| 68 61 6e 64 6c 65 20 62 | 65 68 69 6e 64 20 61 6e |handle b|ehind an|
|00002fe0| 64 20 77 69 6e 64 6f 77 | 20 66 6c 61 67 73 0d 0c |d window| flags..|
|00002ff0| 6c 10 62 6c 6f 63 6b 25 | 21 32 34 3d 2d 31 0d 0c |l.block%|!24=-1..|
|00003000| 76 14 62 6c 6f 63 6b 25 | 21 32 38 3d 66 6c 61 67 |v.block%|!28=flag|
|00003010| 73 25 0d 0c 80 14 f4 20 | 77 69 6e 64 6f 77 20 63 |s%..... |window c|
|00003020| 6f 6c 6f 75 72 73 0d 0c | 8a 0f 62 6c 6f 63 6b 25 |olours..|..block%|
|00003030| 3f 33 32 3d 37 0d 0c 94 | 0f 62 6c 6f 63 6b 25 3f |?32=7...|.block%?|
|00003040| 33 33 3d 32 0d 0c 9e 0f | 62 6c 6f 63 6b 25 3f 33 |33=2....|block%?3|
|00003050| 34 3d 37 0d 0c a8 19 62 | 6c 6f 63 6b 25 3f 33 35 |4=7....b|lock%?35|
|00003060| 3d 62 61 63 6b 67 72 6f | 75 6e 64 25 0d 0c b2 0f |=backgro|und%....|
|00003070| 62 6c 6f 63 6b 25 3f 33 | 36 3d 33 0d 0c bc 0f 62 |block%?3|6=3....b|
|00003080| 6c 6f 63 6b 25 3f 33 37 | 3d 31 0d 0c c6 14 62 6c |lock%?37|=1....bl|
|00003090| 6f 63 6b 25 3f 33 38 3d | 66 6f 63 75 73 25 0d 0c |ock%?38=|focus%..|
|000030a0| d0 16 f4 20 77 6f 72 6b | 20 61 72 65 61 20 65 78 |... work| area ex|
|000030b0| 74 65 6e 74 0d 0c da 0f | 62 6c 6f 63 6b 25 21 34 |tent....|block%!4|
|000030c0| 30 3d 30 0d 0c e4 17 62 | 6c 6f 63 6b 25 21 34 34 |0=0....b|lock%!44|
|000030d0| 3d 2d 68 25 2d 65 78 74 | 79 25 0d 0c ee 16 62 6c |=-h%-ext|y%....bl|
|000030e0| 6f 63 6b 25 21 34 38 3d | 77 25 2b 65 78 74 78 25 |ock%!48=|w%+extx%|
|000030f0| 0d 0c f8 0f 62 6c 6f 63 | 6b 25 21 35 32 3d 30 0d |....bloc|k%!52=0.|
|00003100| 0d 02 23 f4 20 74 69 74 | 6c 65 20 62 61 72 20 61 |..#. tit|le bar a|
|00003110| 6e 64 20 77 6f 72 6b 20 | 61 72 65 61 20 66 6c 61 |nd work |area fla|
|00003120| 67 73 0d 0d 0c 18 62 6c | 6f 63 6b 25 21 35 36 3d |gs....bl|ock%!56=|
|00003130| 74 69 74 6c 65 69 63 6f | 6e 25 0d 0d 16 1b 62 6c |titleico|n%....bl|
|00003140| 6f 63 6b 25 21 36 30 3d | 77 6f 72 6b 66 6c 61 67 |ock%!60=|workflag|
|00003150| 25 3c 3c 31 32 0d 0d 20 | 2a f4 20 73 70 72 69 74 |%<<12.. |*. sprit|
|00003160| 65 20 61 72 65 61 20 70 | 6f 69 6e 74 65 72 20 61 |e area p|ointer a|
|00003170| 6e 64 20 6d 69 6e 69 6d | 75 6d 20 73 69 7a 65 0d |nd minim|um size.|
|00003180| 0d 2a 17 62 6c 6f 63 6b | 25 21 36 34 3d 73 70 72 |.*.block|%!64=spr|
|00003190| 5f 61 72 65 61 25 0d 0d | 34 0f 62 6c 6f 63 6b 25 |_area%..|4.block%|
|000031a0| 21 36 38 3d 30 0d 0d 3e | 12 f4 20 77 69 6e 64 6f |!68=0..>|.. windo|
|000031b0| 77 20 74 69 74 6c 65 0d | 0d 48 12 62 6c 6f 63 6b |w title.|.H.block|
|000031c0| 25 21 37 32 3d 70 74 31 | 25 0d 0d 52 12 62 6c 6f |%!72=pt1|%..R.blo|
|000031d0| 63 6b 25 21 37 36 3d 70 | 74 32 25 0d 0d 5c 12 62 |ck%!76=p|t2%..\.b|
|000031e0| 6c 6f 63 6b 25 21 38 30 | 3d 70 74 33 25 0d 0d 66 |lock%!80|=pt3%..f|
|000031f0| 15 f4 20 6e 75 6d 62 65 | 72 20 6f 66 20 69 63 6f |.. numbe|r of ico|
|00003200| 6e 73 0d 0d 70 0f 62 6c | 6f 63 6b 25 21 38 34 3d |ns..p.bl|ock%!84=|
|00003210| 30 0d 0d 7a 2c c8 99 20 | 22 57 69 6d 70 5f 43 72 |0..z,.. |"Wimp_Cr|
|00003220| 65 61 74 65 57 69 6e 64 | 6f 77 22 2c 2c 62 6c 6f |eateWind|ow",,blo|
|00003230| 63 6b 25 20 b8 20 68 61 | 6e 64 6c 65 25 0d 0d 84 |ck% . ha|ndle%...|
|00003240| 0c 3d 68 61 6e 64 6c 65 | 25 0d 0d 8e 05 3a 0d 0d |.=handle|%....:..|
|00003250| 98 51 dd 20 a4 63 72 65 | 61 74 65 5f 77 69 6e 64 |.Q. .cre|ate_wind|
|00003260| 6f 77 28 78 25 2c 79 25 | 2c 77 25 2c 68 25 2c 65 |ow(x%,y%|,w%,h%,e|
|00003270| 78 74 78 25 2c 65 78 74 | 79 25 2c 66 6c 61 67 73 |xtx%,ext|y%,flags|
|00003280| 25 2c 62 61 63 6b 25 2c | 66 6f 63 75 73 25 2c 74 |%,back%,|focus%,t|
|00003290| 69 74 6c 65 24 2c 76 61 | 6c 25 2c 73 70 25 29 0d |itle$,va|l%,sp%).|
|000032a0| 0d a2 17 f4 20 76 69 73 | 69 62 6c 65 20 77 6f 72 |.... vis|ible wor|
|000032b0| 6b 20 61 72 65 61 0d 0d | ac 0e 21 62 6c 6f 63 6b |k area..|..!block|
|000032c0| 25 3d 78 25 0d 0d b6 0f | 62 6c 6f 63 6b 25 21 34 |%=x%....|block%!4|
|000032d0| 3d 79 25 0d 0d c0 12 62 | 6c 6f 63 6b 25 21 38 3d |=y%....b|lock%!8=|
|000032e0| 78 25 2b 77 25 0d 0d ca | 13 62 6c 6f 63 6b 25 21 |x%+w%...|.block%!|
|000032f0| 31 32 3d 79 25 2b 68 25 | 0d 0d d4 14 f4 20 73 63 |12=y%+h%|..... sc|
|00003300| 72 6f 6c 6c 20 6f 66 66 | 73 65 74 73 0d 0d de 0f |roll off|sets....|
|00003310| 62 6c 6f 63 6b 25 21 31 | 36 3d 30 0d 0d e8 0f 62 |block%!1|6=0....b|
|00003320| 6c 6f 63 6b 25 21 32 30 | 3d 30 0d 0d f2 24 f4 20 |lock%!20|=0...$. |
|00003330| 68 61 6e 64 6c 65 20 62 | 65 68 69 6e 64 20 61 6e |handle b|ehind an|
|00003340| 64 20 77 69 6e 64 6f 77 | 20 66 6c 61 67 73 0d 0d |d window| flags..|
|00003350| fc 10 62 6c 6f 63 6b 25 | 21 32 34 3d 2d 31 0d 0e |..block%|!24=-1..|
|00003360| 06 14 62 6c 6f 63 6b 25 | 21 32 38 3d 66 6c 61 67 |..block%|!28=flag|
|00003370| 73 25 0d 0e 10 14 f4 20 | 77 69 6e 64 6f 77 20 63 |s%..... |window c|
|00003380| 6f 6c 6f 75 72 73 0d 0e | 1a 0f 62 6c 6f 63 6b 25 |olours..|..block%|
|00003390| 3f 33 32 3d 37 0d 0e 24 | 0f 62 6c 6f 63 6b 25 3f |?32=7..$|.block%?|
|000033a0| 33 33 3d 32 0d 0e 2e 0f | 62 6c 6f 63 6b 25 3f 33 |33=2....|block%?3|
|000033b0| 34 3d 37 0d 0e 38 13 62 | 6c 6f 63 6b 25 3f 33 35 |4=7..8.b|lock%?35|
|000033c0| 3d 62 61 63 6b 25 0d 0e | 42 0f 62 6c 6f 63 6b 25 |=back%..|B.block%|
|000033d0| 3f 33 36 3d 33 0d 0e 4c | 0f 62 6c 6f 63 6b 25 3f |?36=3..L|.block%?|
|000033e0| 33 37 3d 31 0d 0e 56 14 | 62 6c 6f 63 6b 25 3f 33 |37=1..V.|block%?3|
|000033f0| 38 3d 66 6f 63 75 73 25 | 0d 0e 60 16 f4 20 77 6f |8=focus%|..`.. wo|
|00003400| 72 6b 20 61 72 65 61 20 | 65 78 74 65 6e 74 0d 0e |rk area |extent..|
|00003410| 6a 0f 62 6c 6f 63 6b 25 | 21 34 30 3d 30 0d 0e 74 |j.block%|!40=0..t|
|00003420| 17 62 6c 6f 63 6b 25 21 | 34 34 3d 2d 68 25 2d 65 |.block%!|44=-h%-e|
|00003430| 78 74 79 25 0d 0e 7e 16 | 62 6c 6f 63 6b 25 21 34 |xty%..~.|block%!4|
|00003440| 38 3d 77 25 2b 65 78 74 | 78 25 0d 0e 88 0f 62 6c |8=w%+ext|x%....bl|
|00003450| 6f 63 6b 25 21 35 32 3d | 30 0d 0e 92 23 f4 20 74 |ock%!52=|0...#. t|
|00003460| 69 74 6c 65 20 62 61 72 | 20 61 6e 64 20 77 6f 72 |itle bar| and wor|
|00003470| 6b 20 61 72 65 61 20 66 | 6c 61 67 73 0d 0e 9c 11 |k area f|lags....|
|00003480| 62 6c 6f 63 6b 25 21 35 | 36 3d 26 31 39 0d 0e a6 |block%!5|6=&19...|
|00003490| 16 62 6c 6f 63 6b 25 21 | 36 30 3d 76 61 6c 25 3c |.block%!|60=val%<|
|000034a0| 3c 31 32 0d 0e b0 2a f4 | 20 73 70 72 69 74 65 20 |<12...*.| sprite |
|000034b0| 61 72 65 61 20 70 6f 69 | 6e 74 65 72 20 61 6e 64 |area poi|nter and|
|000034c0| 20 6d 69 6e 69 6d 75 6d | 20 73 69 7a 65 0d 0e ba | minimum| size...|
|000034d0| 11 62 6c 6f 63 6b 25 21 | 36 34 3d 73 70 25 0d 0e |.block%!|64=sp%..|
|000034e0| c4 0f 62 6c 6f 63 6b 25 | 21 36 38 3d 30 0d 0e ce |..block%|!68=0...|
|000034f0| 12 f4 20 77 69 6e 64 6f | 77 20 74 69 74 6c 65 0d |.. windo|w title.|
|00003500| 0e d8 17 24 28 62 6c 6f | 63 6b 25 2b 37 32 29 3d |...$(blo|ck%+72)=|
|00003510| 74 69 74 6c 65 24 0d 0e | e2 15 f4 20 6e 75 6d 62 |title$..|... numb|
|00003520| 65 72 20 6f 66 20 69 63 | 6f 6e 73 0d 0e ec 0f 62 |er of ic|ons....b|
|00003530| 6c 6f 63 6b 25 21 38 34 | 3d 30 0d 0e f6 2c c8 99 |lock%!84|=0...,..|
|00003540| 20 22 57 69 6d 70 5f 43 | 72 65 61 74 65 57 69 6e | "Wimp_C|reateWin|
|00003550| 64 6f 77 22 2c 2c 62 6c | 6f 63 6b 25 20 b8 20 68 |dow",,bl|ock% . h|
|00003560| 61 6e 64 6c 65 25 0d 0f | 00 0c 3d 68 61 6e 64 6c |andle%..|..=handl|
|00003570| 65 25 0d 0f 0a 05 3a 0d | 0f 14 47 dd 20 a4 63 72 |e%....:.|..G. .cr|
|00003580| 65 61 74 65 5f 69 63 6f | 6e 28 77 68 61 6e 25 2c |eate_ico|n(whan%,|
|00003590| 69 78 25 2c 69 79 25 2c | 69 77 25 2c 69 68 25 2c |ix%,iy%,|iw%,ih%,|
|000035a0| 66 6c 61 67 25 2c 74 65 | 78 74 24 2c 70 74 72 31 |flag%,te|xt$,ptr1|
|000035b0| 25 2c 70 74 72 32 25 2c | 70 74 72 33 25 29 0d 0f |%,ptr2%,|ptr3%)..|
|000035c0| 1e 11 21 62 6c 6f 63 6b | 25 3d 77 68 61 6e 25 0d |..!block|%=whan%.|
|000035d0| 0f 28 10 62 6c 6f 63 6b | 25 21 34 3d 69 78 25 0d |.(.block|%!4=ix%.|
|000035e0| 0f 32 10 62 6c 6f 63 6b | 25 21 38 3d 69 79 25 0d |.2.block|%!8=iy%.|
|000035f0| 0f 3c 15 62 6c 6f 63 6b | 25 21 31 32 3d 69 78 25 |.<.block|%!12=ix%|
|00003600| 2b 69 77 25 0d 0f 46 15 | 62 6c 6f 63 6b 25 21 31 |+iw%..F.|block%!1|
|00003610| 36 3d 69 79 25 2b 69 68 | 25 0d 0f 50 13 62 6c 6f |6=iy%+ih|%..P.blo|
|00003620| 63 6b 25 21 32 30 3d 66 | 6c 61 67 25 0d 0f 5a 0f |ck%!20=f|lag%..Z.|
|00003630| e7 20 70 74 72 31 25 3d | 30 20 8c 0d 0f 64 16 24 |. ptr1%=|0 ...d.$|
|00003640| 28 62 6c 6f 63 6b 25 2b | 32 34 29 3d 74 65 78 74 |(block%+|24)=text|
|00003650| 24 0d 0f 6e 05 cc 0d 0f | 78 13 62 6c 6f 63 6b 25 |$..n....|x.block%|
|00003660| 21 32 34 3d 70 74 72 31 | 25 0d 0f 82 13 62 6c 6f |!24=ptr1|%....blo|
|00003670| 63 6b 25 21 32 38 3d 70 | 74 72 32 25 0d 0f 8c 13 |ck%!28=p|tr2%....|
|00003680| 62 6c 6f 63 6b 25 21 33 | 32 3d 70 74 72 33 25 0d |block%!3|2=ptr3%.|
|00003690| 0f 96 05 cd 0d 0f a0 2b | c8 99 20 22 57 69 6d 70 |.......+|.. "Wimp|
|000036a0| 5f 43 72 65 61 74 65 49 | 63 6f 6e 22 2c 2c 62 6c |_CreateI|con",,bl|
|000036b0| 6f 63 6b 25 20 b8 20 69 | 68 61 6e 64 6c 65 25 0d |ock% . i|handle%.|
|000036c0| 0f aa 0d 3d 69 68 61 6e | 64 6c 65 25 0d 0f b4 04 |...=ihan|dle%....|
|000036d0| 0d 0f be 10 dd f2 6d 61 | 69 6e 77 69 6e 64 6f 77 |......ma|inwindow|
|000036e0| 0d 0f c8 2f 6c 65 6e 67 | 74 68 25 3d 28 52 25 2b |.../leng|th%=(R%+|
|000036f0| 33 29 2a 34 34 3a e7 20 | 6c 65 6e 67 74 68 25 3c |3)*44:. |length%<|
|00003700| 38 39 36 20 6c 65 6e 67 | 74 68 25 3d 38 39 36 0d |896 leng|th%=896.|
|00003710| 0f d2 2e 24 74 62 61 72 | 25 3d 22 4e 65 77 20 4d |...$tbar|%="New M|
|00003720| 61 78 69 66 69 6c 65 22 | 3a 74 62 61 72 24 3d 22 |axifile"|:tbar$="|
|00003730| 4e 65 77 20 4d 61 78 69 | 66 69 6c 65 22 0d 0f dc |New Maxi|file"...|
|00003740| 63 6d 68 61 6e 64 6c 65 | 25 3d a4 63 72 65 61 74 |cmhandle|%=.creat|
|00003750| 65 5f 6d 61 69 6e 77 69 | 6e 64 6f 77 28 30 2c 31 |e_mainwi|ndow(0,1|
|00003760| 38 30 2c 31 32 33 36 2c | 37 32 30 2c 30 2c 6c 65 |80,1236,|720,0,le|
|00003770| 6e 67 74 68 25 2d 38 39 | 36 2c 26 46 46 30 30 31 |ngth%-89|6,&FF001|
|00003780| 30 30 32 2c 31 32 2c 31 | 32 2c 26 31 31 39 2c 74 |002,12,1|2,&119,t|
|00003790| 62 61 72 25 2c 2d 31 2c | 32 30 2c 31 35 2c 30 29 |bar%,-1,|20,15,0)|
|000037a0| 0d 0f e6 14 21 62 6c 6f | 63 6b 25 3d 73 68 61 6e |....!blo|ck%=shan|
|000037b0| 64 6c 65 25 0d 0f f0 21 | c8 99 20 22 57 69 6d 70 |dle%...!|.. "Wimp|
|000037c0| 5f 43 6c 6f 73 65 57 69 | 6e 64 6f 77 22 2c 2c 62 |_CloseWi|ndow",,b|
|000037d0| 6c 6f 63 6b 25 0d 0f fa | 0d 6e 75 6d 62 65 72 25 |lock%...|.number%|
|000037e0| 3d 31 0d 10 04 3b f4 20 | 54 68 65 20 66 6f 6c 6c |=1...;. |The foll|
|000037f0| 6f 77 69 6e 67 20 6c 6f | 6f 70 20 6e 75 6d 62 65 |owing lo|op numbe|
|00003800| 72 73 20 66 69 65 6c 64 | 20 69 63 6f 6e 73 20 66 |rs field| icons f|
|00003810| 72 6f 6d 20 30 20 74 6f | 20 46 25 2d 31 0d 10 0e |rom 0 to| F%-1...|
|00003820| 0c e3 59 25 3d 31 b8 46 | 25 0d 10 18 5e 61 25 3d |..Y%=1.F|%...^a%=|
|00003830| a4 63 72 65 61 74 65 5f | 69 63 6f 6e 28 6d 68 61 |.create_|icon(mha|
|00003840| 6e 64 6c 65 25 2c 31 36 | 2c 2d 46 6e 61 6d 65 25 |ndle%,16|,-Fname%|
|00003850| 28 59 25 29 2a 34 30 2d | 33 32 2c 34 30 30 2c 35 |(Y%)*40-|32,400,5|
|00003860| 32 2c 26 45 38 30 30 33 | 31 33 44 2c 22 22 2c 66 |2,&E8003|13D,"",f|
|00003870| 69 65 6c 64 25 2b 32 35 | 2a 28 59 25 2d 31 29 2c |ield%+25|*(Y%-1),|
|00003880| 52 35 25 2c 32 35 29 0d | 10 22 05 ed 0d 10 2c 49 |R5%,25).|."....,I|
|00003890| 54 6f 70 62 61 72 31 25 | 3d a4 63 72 65 61 74 65 |Topbar1%|=.create|
|000038a0| 5f 69 63 6f 6e 28 6d 68 | 61 6e 64 6c 65 25 2c 30 |_icon(mh|andle%,0|
|000038b0| 2c 2d 34 34 2c 31 32 38 | 2c 35 32 2c 26 32 37 30 |,-44,128|,52,&270|
|000038c0| 30 30 30 33 31 2c 22 20 | 46 69 6c 65 3a 22 2c 30 |00031," |File:",0|
|000038d0| 2c 30 2c 30 29 0d 10 36 | 4c 54 6f 70 62 61 72 32 |,0,0)..6|LTopbar2|
|000038e0| 25 3d a4 63 72 65 61 74 | 65 5f 69 63 6f 6e 28 6d |%=.creat|e_icon(m|
|000038f0| 68 61 6e 64 6c 65 25 2c | 31 32 38 2c 2d 34 34 2c |handle%,|128,-44,|
|00003900| 37 36 38 2c 35 32 2c 26 | 32 37 30 30 30 31 33 31 |768,52,&|27000131|
|00003910| 2c 22 22 2c 70 61 74 68 | 25 2c 2d 31 2c 32 35 35 |,"",path|%,-1,255|
|00003920| 29 0d 10 40 4a 54 6f 70 | 62 61 72 33 25 3d a4 63 |)..@JTop|bar3%=.c|
|00003930| 72 65 61 74 65 5f 69 63 | 6f 6e 28 6d 68 61 6e 64 |reate_ic|on(mhand|
|00003940| 6c 65 25 2c 38 39 36 2c | 2d 34 34 2c 31 36 30 2c |le%,896,|-44,160,|
|00003950| 35 32 2c 26 32 37 30 31 | 39 31 33 44 2c 22 22 2c |52,&2701|913D,"",|
|00003960| 72 65 63 25 2c 52 35 25 | 2c 37 29 0d 10 4a 4d 54 |rec%,R5%|,7)..JMT|
|00003970| 6f 70 62 61 72 34 25 3d | a4 63 72 65 61 74 65 5f |opbar4%=|.create_|
|00003980| 69 63 6f 6e 28 6d 68 61 | 6e 64 6c 65 25 2c 31 30 |icon(mha|ndle%,10|
|00003990| 35 36 2c 2d 34 34 2c 31 | 39 32 2c 35 32 2c 26 32 |56,-44,1|92,52,&2|
|000039a0| 37 30 30 30 30 33 31 2c | 22 20 4f 75 74 20 6f 66 |7000031,|" Out of|
|000039b0| 22 2c 30 2c 30 2c 30 29 | 0d 10 54 05 e1 0d 10 5e |",0,0,0)|..T....^|
|000039c0| 04 0d 10 68 0a dd f2 6f | 70 65 6e 0d 10 72 18 e7 |...h...o|pen..r..|
|000039d0| 20 21 62 6c 6f 63 6b 25 | 3d 6d 68 61 6e 64 6c 65 | !block%|=mhandle|
|000039e0| 25 20 8c 0d 10 7c 18 20 | 20 62 6c 6f 63 6b 25 21 |% ...|. | block%!|
|000039f0| 31 32 38 3d 21 62 6c 6f | 63 6b 25 0d 10 86 29 20 |128=!blo|ck%...) |
|00003a00| 20 c8 99 22 57 69 6d 70 | 5f 47 65 74 57 69 6e 64 | .."Wimp|_GetWind|
|00003a10| 6f 77 53 74 61 74 65 22 | 2c 2c 62 6c 6f 63 6b 25 |owState"|,,block%|
|00003a20| 2b 31 32 38 0d 10 90 35 | 20 20 e7 62 6c 6f 63 6b |+128...5|  .block|
|00003a30| 25 21 31 36 30 20 80 20 | 31 3c 3c 32 31 20 c8 99 |%!160 . |1<<21 ..|
|00003a40| 22 57 69 6d 70 5f 4f 70 | 65 6e 57 69 6e 64 6f 77 |"Wimp_Op|enWindow|
|00003a50| 22 2c 2c 62 6c 6f 63 6b | 25 0d 10 9a 05 cd 0d 10 |",,block|%.......|
|00003a60| a4 22 e7 20 21 62 6c 6f | 63 6b 25 3d 6d 68 61 6e |.". !blo|ck%=mhan|
|00003a70| 64 6c 65 25 20 80 20 6b | 65 79 73 25 3d 31 20 8c |dle% . k|eys%=1 .|
|00003a80| 0d 10 ae 13 62 6c 6f 63 | 6b 25 21 36 34 3d 70 61 |....bloc|k%!64=pa|
|00003a90| 6e 65 25 0d 10 b8 2e 62 | 6c 6f 63 6b 25 21 37 36 |ne%....b|lock%!76|
|00003aa0| 3d 62 6c 6f 63 6b 25 21 | 31 32 3a 62 6c 6f 63 6b |=block%!|12:block|
|00003ab0| 25 21 36 38 3d 62 6c 6f | 63 6b 25 21 31 32 2d 39 |%!68=blo|ck%!12-9|
|00003ac0| 36 0d 10 c2 2c 62 6c 6f | 63 6b 25 21 38 30 3d 62 |6...,blo|ck%!80=b|
|00003ad0| 6c 6f 63 6b 25 21 38 2b | 34 38 3a 62 6c 6f 63 6b |lock%!8+|48:block|
|00003ae0| 25 21 37 32 3d 62 6c 6f | 63 6b 25 21 38 0d 10 cc |%!72=blo|ck%!8...|
|00003af0| 2f 62 6c 6f 63 6b 25 21 | 38 34 3d 30 3a 62 6c 6f |/block%!|84=0:blo|
|00003b00| 63 6b 25 21 38 38 3d 30 | 3a 62 6c 6f 63 6b 25 21 |ck%!88=0|:block%!|
|00003b10| 39 32 3d 62 6c 6f 63 6b | 25 21 32 38 0d 10 d6 22 |92=block|%!28..."|
|00003b20| c8 99 22 57 69 6d 70 5f | 4f 70 65 6e 57 69 6e 64 |.."Wimp_|OpenWind|
|00003b30| 6f 77 22 2c 2c 62 6c 6f | 63 6b 25 2b 36 34 0d 10 |ow",,blo|ck%+64..|
|00003b40| e0 13 62 6c 6f 63 6b 25 | 21 32 38 3d 70 61 6e 65 |..block%|!28=pane|
|00003b50| 25 0d 10 ea 05 cd 0d 10 | f4 1f c8 99 22 57 69 6d |%.......|...."Wim|
|00003b60| 70 5f 4f 70 65 6e 57 69 | 6e 64 6f 77 22 2c 2c 62 |p_OpenWi|ndow",,b|
|00003b70| 6c 6f 63 6b 25 0d 10 fe | 05 e1 0d 11 08 04 0d 11 |lock%...|........|
|00003b80| 12 0b dd f2 63 6c 6f 73 | 65 0d 11 1c 20 c8 99 22 |....clos|e... .."|
|00003b90| 57 69 6d 70 5f 43 6c 6f | 73 65 57 69 6e 64 6f 77 |Wimp_Clo|seWindow|
|00003ba0| 22 2c 2c 62 6c 6f 63 6b | 25 0d 11 26 22 e7 20 21 |",,block|%..&". !|
|00003bb0| 62 6c 6f 63 6b 25 3d 6d | 68 61 6e 64 6c 65 25 20 |block%=m|handle% |
|00003bc0| 80 20 6b 65 79 73 25 3d | 31 20 8c 0d 11 30 11 21 |. keys%=|1 ...0.!|
|00003bd0| 62 6c 6f 63 6b 25 3d 70 | 61 6e 65 25 0d 11 3a 20 |block%=p|ane%..: |
|00003be0| c8 99 22 57 69 6d 70 5f | 43 6c 6f 73 65 57 69 6e |.."Wimp_|CloseWin|
|00003bf0| 64 6f 77 22 2c 2c 62 6c | 6f 63 6b 25 0d 11 44 05 |dow",,bl|ock%..D.|
|00003c00| cd 0d 11 4e 05 e1 0d 11 | 58 04 0d 11 62 11 dd f2 |...N....|X...b...|
|00003c10| 63 6c 69 63 6b 28 77 69 | 6e 25 29 0d 11 6c 0d 6e |click(wi|n%)..l.n|
|00003c20| 6f 77 25 3d 77 69 6e 25 | 0d 11 76 0d c8 8e 20 77 |ow%=win%|..v... w|
|00003c30| 69 6e 25 20 ca 0d 11 80 | 18 c9 20 2d 32 3a f2 69 |in% ....|.. -2:.i|
|00003c40| 62 61 72 28 62 6c 6f 63 | 6b 25 21 38 29 0d 11 8a |bar(bloc|k%!8)...|
|00003c50| 0f c9 20 73 68 61 6e 64 | 6c 65 25 3a 0d 11 94 12 |.. shand|le%:....|
|00003c60| c8 8e 20 62 6c 6f 63 6b | 25 21 31 36 20 ca 0d 11 |.. block|%!16 ...|
|00003c70| 9e 10 c9 20 30 3a f2 6e | 65 77 66 69 6c 65 0d 11 |... 0:.n|ewfile..|
|00003c80| a8 5e c9 20 34 3a f2 72 | 65 70 6f 72 74 28 22 44 |.^. 4:.r|eport("D|
|00003c90| 72 61 67 20 66 69 6c 65 | 20 69 63 6f 6e 20 6f 6e |rag file| icon on|
|00003ca0| 74 6f 20 74 68 69 73 20 | 77 69 6e 64 6f 77 20 6f |to this |window o|
|00003cb0| 72 20 6f 6e 20 74 6f 20 | 74 68 65 20 69 63 6f 6e |r on to |the icon|
|00003cc0| 62 61 72 20 73 79 6d 62 | 6f 6c 20 66 6f 72 20 4d |bar symb|ol for M|
|00003cd0| 61 78 69 66 69 6c 65 22 | 2c 31 37 29 0d 11 b2 05 |axifile"|,17)....|
|00003ce0| cb 0d 11 bc 2d c9 20 6d | 68 61 6e 64 6c 65 25 3a |....-. m|handle%:|
|00003cf0| f2 6d 61 69 6e 63 6c 69 | 63 6b 28 62 6c 6f 63 6b |.maincli|ck(block|
|00003d00| 25 21 38 2c 62 6c 6f 63 | 6b 25 21 31 36 29 0d 11 |%!8,bloc|k%!16)..|
|00003d10| c6 0c c9 20 70 61 6e 65 | 25 3a 0d 11 d0 12 c8 8e |... pane|%:......|
|00003d20| 20 62 6c 6f 63 6b 25 21 | 31 36 20 ca 0d 11 da 08 | block%!|16 .....|
|00003d30| c9 20 30 3a 0d 11 e4 24 | 6e 75 6d 62 65 72 25 2d |. 0:...$|number%-|
|00003d40| 3d 31 3a e7 20 6e 75 6d | 62 65 72 25 3c 31 20 6e |=1:. num|ber%<1 n|
|00003d50| 75 6d 62 65 72 25 3d 31 | 0d 11 ee 34 c8 99 20 22 |umber%=1|...4.. "|
|00003d60| 57 69 6d 70 5f 46 6f 72 | 63 65 52 65 64 72 61 77 |Wimp_For|ceRedraw|
|00003d70| 22 2c 6d 68 61 6e 64 6c | 65 25 2c 30 2c 2d 6c 65 |",mhandl|e%,0,-le|
|00003d80| 6e 67 74 68 25 2c 31 32 | 38 30 2c 30 0d 11 f8 07 |ngth%,12|80,0....|
|00003d90| c9 20 31 0d 12 02 26 6e | 75 6d 62 65 72 25 2b 3d |. 1...&n|umber%+=|
|00003da0| 31 3a e7 20 6e 75 6d 62 | 65 72 25 3e 54 25 20 6e |1:. numb|er%>T% n|
|00003db0| 75 6d 62 65 72 25 3d 54 | 25 0d 12 0c 34 c8 99 20 |umber%=T|%...4.. |
|00003dc0| 22 57 69 6d 70 5f 46 6f | 72 63 65 52 65 64 72 61 |"Wimp_Fo|rceRedra|
|00003dd0| 77 22 2c 6d 68 61 6e 64 | 6c 65 25 2c 30 2c 2d 6c |w",mhand|le%,0,-l|
|00003de0| 65 6e 67 74 68 25 2c 31 | 32 38 30 2c 30 0d 12 16 |ength%,1|280,0...|
|00003df0| 05 cb 0d 12 20 2e c9 20 | 73 61 76 65 25 2c 73 65 |.... .. |save%,se|
|00003e00| 74 75 70 25 2c 63 73 76 | 25 2c 73 70 6c 25 2c 73 |tup%,csv|%,spl%,s|
|00003e10| 68 65 6c 6c 25 2c 65 78 | 74 72 61 73 61 76 65 25 |hell%,ex|trasave%|
|00003e20| 0d 12 2a 12 c8 8e 20 62 | 6c 6f 63 6b 25 21 31 36 |..*... b|lock%!16|
|00003e30| 20 ca 0d 12 34 20 c9 20 | 30 3a e7 20 62 6c 6f 63 | ...4 . |0:. bloc|
|00003e40| 6b 25 21 38 20 80 20 36 | 34 20 f2 64 72 61 67 62 |k%!8 . 6|4 .dragb|
|00003e50| 6f 78 0d 12 3e 21 c9 20 | 32 3a e7 20 62 6c 6f 63 |ox..>!. |2:. bloc|
|00003e60| 6b 25 21 38 20 80 20 35 | 20 f2 71 75 69 63 6b 73 |k%!8 . 5| .quicks|
|00003e70| 61 76 65 0d 12 48 05 cb | 0d 12 52 33 c9 20 70 72 |ave..H..|..R3. pr|
|00003e80| 69 6e 74 68 61 6e 64 6c | 65 25 3a f2 70 72 69 6e |inthandl|e%:.prin|
|00003e90| 74 73 65 6c 65 63 74 28 | 62 6c 6f 63 6b 25 21 38 |tselect(|block%!8|
|00003ea0| 2c 62 6c 6f 63 6b 25 21 | 31 36 29 0d 12 5c 2d c9 |,block%!|16)..\-.|
|00003eb0| 20 73 72 68 61 6e 64 6c | 65 25 3a f2 73 72 73 65 | srhandl|e%:.srse|
|00003ec0| 6c 65 63 74 28 62 6c 6f | 63 6b 25 21 38 2c 62 6c |lect(blo|ck%!8,bl|
|00003ed0| 6f 63 6b 25 21 31 36 29 | 0d 12 66 11 c9 20 73 6f |ock%!16)|..f.. so|
|00003ee0| 72 74 68 61 6e 64 6c 65 | 25 0d 12 70 12 c8 8e 20 |rthandle|%..p... |
|00003ef0| 62 6c 6f 63 6b 25 21 31 | 36 20 ca 0d 12 7a 08 c9 |block%!1|6 ...z..|
|00003f00| 20 32 3a 0d 12 84 1c e7 | 20 4f 72 64 25 3d 30 20 | 2:.....| Ord%=0 |
|00003f10| 4f 72 64 25 3d 31 20 8b | 20 4f 72 64 25 3d 30 0d |Ord%=1 .| Ord%=0.|
|00003f20| 12 8e 3a ef 37 3a c8 99 | 20 22 57 69 6d 70 5f 46 |..:.7:..| "Wimp_F|
|00003f30| 6f 72 63 65 52 65 64 72 | 61 77 22 2c 73 6f 72 74 |orceRedr|aw",sort|
|00003f40| 68 61 6e 64 6c 65 25 2c | 34 38 30 2c 2d 31 39 32 |handle%,|480,-192|
|00003f50| 2c 31 30 32 34 2c 2d 38 | 38 0d 12 98 08 c9 20 33 |,1024,-8|8..... 3|
|00003f60| 3a 0d 12 a2 1c e7 20 4e | 61 74 25 3d 31 20 4e 61 |:..... N|at%=1 Na|
|00003f70| 74 25 3d 32 20 8b 20 4e | 61 74 25 3d 31 0d 12 ac |t%=2 . N|at%=1...|
|00003f80| 38 c8 99 20 22 57 69 6d | 70 5f 46 6f 72 63 65 52 |8.. "Wim|p_ForceR|
|00003f90| 65 64 72 61 77 22 2c 73 | 6f 72 74 68 61 6e 64 6c |edraw",s|orthandl|
|00003fa0| 65 25 2c 34 38 30 2c 2d | 32 36 34 2c 31 30 32 34 |e%,480,-|264,1024|
|00003fb0| 2c 2d 31 36 30 0d 12 b6 | 0d c9 20 34 3a f2 73 6f |,-160...|.. 4:.so|
|00003fc0| 72 74 0d 12 c0 05 cb 0d | 12 ca 2f c9 20 73 75 62 |rt......|../. sub|
|00003fd0| 68 61 6e 64 6c 65 25 3a | f2 73 75 62 73 65 6c 65 |handle%:|.subsele|
|00003fe0| 63 74 28 62 6c 6f 63 6b | 25 21 38 2c 62 6c 6f 63 |ct(block|%!8,bloc|
|00003ff0| 6b 25 21 31 36 29 0d 12 | d4 27 c9 20 6e 65 77 66 |k%!16)..|.'. newf|
|00004000| 69 6c 65 32 25 3a e7 20 | 62 6c 6f 63 6b 25 21 31 |ile2%:. |block%!1|
|00004010| 36 3d 30 20 f2 6e 6f 74 | 65 6e 61 6d 65 0d 12 de |6=0 .not|ename...|
|00004020| 29 c9 20 6e 65 77 66 69 | 6c 65 33 25 3a e7 20 62 |). newfi|le3%:. b|
|00004030| 6c 6f 63 6b 25 21 31 36 | 3d 30 20 f2 6e 6f 74 65 |lock%!16|=0 .note|
|00004040| 6c 65 6e 67 74 68 0d 12 | e8 2c c9 20 61 6c 74 65 |length..|.,. alte|
|00004050| 72 68 61 6e 64 6c 65 25 | 3a e7 20 62 6c 6f 63 6b |rhandle%|:. block|
|00004060| 25 21 31 36 3d 32 20 f2 | 63 6c 6f 73 65 61 6c 74 |%!16=2 .|closealt|
|00004070| 65 72 0d 12 f2 11 c9 20 | 66 61 73 74 68 61 6e 64 |er..... |fasthand|
|00004080| 6c 65 25 0d 12 fc 12 c8 | 8e 20 62 6c 6f 63 6b 25 |le%.....|. block%|
|00004090| 21 31 36 20 ca 0d 13 06 | 07 c9 20 32 0d 13 10 17 |!16 ....|.. 2....|
|000040a0| 21 62 6c 6f 63 6b 25 3d | 66 61 73 74 68 61 6e 64 |!block%=|fasthand|
|000040b0| 6c 65 25 0d 13 1a 20 c8 | 99 22 57 69 6d 70 5f 43 |le%... .|."Wimp_C|
|000040c0| 6c 6f 73 65 57 69 6e 64 | 6f 77 22 2c 2c 62 6c 6f |loseWind|ow",,blo|
|000040d0| 63 6b 25 0d 13 24 0e 61 | 6c 74 65 72 65 64 25 3d |ck%..$.a|ltered%=|
|000040e0| b9 0d 13 2e 1f f2 73 74 | 61 72 28 6d 68 61 6e 64 |......st|ar(mhand|
|000040f0| 6c 65 25 2c 74 62 61 72 | 25 2c 74 62 61 72 24 29 |le%,tbar|%,tbar$)|
|00004100| 0d 13 38 17 f2 63 61 72 | 65 74 28 6d 68 61 6e 64 |..8..car|et(mhand|
|00004110| 6c 65 25 2c 2d 31 29 0d | 13 42 12 c9 20 33 3a f2 |le%,-1).|.B.. 3:.|
|00004120| 6e 65 78 74 71 75 69 63 | 6b 0d 13 4c 05 cb 0d 13 |nextquic|k..L....|
|00004130| 56 12 c9 20 63 6f 75 6e | 74 68 61 6e 64 6c 65 25 |V.. coun|thandle%|
|00004140| 0d 13 60 12 c8 8e 20 62 | 6c 6f 63 6b 25 21 31 36 |..`... b|lock%!16|
|00004150| 20 ca 0d 13 6a 0e c9 20 | 37 3a f2 63 6f 75 6e 74 | ...j.. |7:.count|
|00004160| 0d 13 74 08 c9 20 36 3a | 0d 13 7e 43 e7 20 63 61 |..t.. 6:|..~C. ca|
|00004170| 73 65 32 25 3d 30 20 63 | 61 73 65 32 25 3d 31 3a |se2%=0 c|ase2%=1:|
|00004180| 24 63 61 73 25 3d 22 43 | 41 53 45 20 4f 46 46 22 |$cas%="C|ASE OFF"|
|00004190| 20 8b 20 63 61 73 65 32 | 25 3d 30 3a 24 63 61 73 | . case2|%=0:$cas|
|000041a0| 25 3d 22 43 41 53 45 20 | 4f 4e 22 0d 13 88 33 c8 |%="CASE |ON"...3.|
|000041b0| 99 20 22 57 69 6d 70 5f | 46 6f 72 63 65 52 65 64 |. "Wimp_|ForceRed|
|000041c0| 72 61 77 22 2c 63 6f 75 | 6e 74 68 61 6e 64 6c 65 |raw",cou|nthandle|
|000041d0| 25 2c 30 2c 2d 33 38 34 | 2c 34 36 34 2c 30 0d 13 |%,0,-384|,464,0..|
|000041e0| 92 05 cb 0d 13 9c 10 c9 | 20 73 75 6d 68 61 6e 64 |........| sumhand|
|000041f0| 6c 65 25 0d 13 a6 12 c8 | 8e 20 62 6c 6f 63 6b 25 |le%.....|. block%|
|00004200| 21 31 36 20 ca 0d 13 b0 | 11 c9 20 34 3a f2 70 72 |!16 ....|.. 4:.pr|
|00004210| 69 6e 74 73 75 6d 0d 13 | ba 11 c9 20 35 3a f2 63 |intsum..|... 5:.c|
|00004220| 6c 65 61 72 73 75 6d 0d | 13 c4 0c c9 20 36 3a f2 |learsum.|.... 6:.|
|00004230| 73 75 6d 0d 13 ce 11 c9 | 20 37 3a f2 73 74 6f 72 |sum.....| 7:.stor|
|00004240| 65 73 75 6d 0d 13 d8 05 | cb 0d 13 e2 0d c9 20 69 |esum....|...... i|
|00004250| 6d 70 6f 72 74 25 0d 13 | ec 12 c8 8e 20 62 6c 6f |mport%..|.... blo|
|00004260| 63 6b 25 21 31 36 20 ca | 0d 13 f6 0f c9 20 32 3a |ck%!16 .|..... 2:|
|00004270| f2 69 6d 70 6f 72 74 0d | 14 00 08 c9 20 33 3a 0d |.import.|.... 3:.|
|00004280| 14 0a 19 74 79 70 65 24 | 3d a4 73 74 72 69 6e 67 |...type$|=.string|
|00004290| 28 66 74 79 70 65 25 29 | 0d 14 14 30 e7 20 74 79 |(ftype%)|...0. ty|
|000042a0| 70 65 24 3d 22 43 53 56 | 22 20 24 66 74 79 70 65 |pe$="CSV|" $ftype|
|000042b0| 25 3d 22 4d 61 78 69 22 | 20 8b 20 24 66 74 79 70 |%="Maxi"| . $ftyp|
|000042c0| 65 25 3d 22 43 53 56 22 | 0d 14 1e 2d c8 99 22 57 |e%="CSV"|...-.."W|
|000042d0| 69 6d 70 5f 46 6f 72 63 | 65 52 65 64 72 61 77 22 |imp_Forc|eRedraw"|
|000042e0| 2c 69 6d 70 6f 72 74 25 | 2c 30 2c 2d 31 36 30 2c |,import%|,0,-160,|
|000042f0| 35 37 36 2c 30 0d 14 28 | 05 cb 0d 14 32 05 cb 0d |576,0..(|....2...|
|00004300| 14 3c 05 e1 0d 14 46 04 | 0d 14 50 13 dd f2 69 62 |.<....F.|..P...ib|
|00004310| 61 72 28 62 75 74 74 6f | 6e 25 29 0d 14 5a 10 c8 |ar(butto|n%)..Z..|
|00004320| 8e 20 62 75 74 74 6f 6e | 25 20 ca 0d 14 64 34 c9 |. button|% ...d4.|
|00004330| 20 32 3a 6f 70 65 6e 6d | 65 6e 75 25 3d 31 3a f2 | 2:openm|enu%=1:.|
|00004340| 73 68 6f 77 6d 65 6e 75 | 28 69 6d 65 6e 75 25 2c |showmenu|(imenu%,|
|00004350| 21 62 6c 6f 63 6b 25 2d | 36 34 2c 32 32 38 29 0d |!block%-|64,228).|
|00004360| 14 6e 09 c9 20 31 2c 34 | 0d 14 78 31 e7 20 66 69 |.n.. 1,4|..x1. fi|
|00004370| 6c 65 25 20 8c 20 21 62 | 6c 6f 63 6b 25 3d 6d 68 |le% . !b|lock%=mh|
|00004380| 61 6e 64 6c 65 25 20 8b | 20 21 62 6c 6f 63 6b 25 |andle% .| !block%|
|00004390| 3d 73 68 61 6e 64 6c 65 | 25 0d 14 82 24 c8 99 20 |=shandle|%...$.. |
|000043a0| 22 57 69 6d 70 5f 47 65 | 74 57 69 6e 64 6f 77 53 |"Wimp_Ge|tWindowS|
|000043b0| 74 61 74 65 22 2c 2c 62 | 6c 6f 63 6b 25 0d 14 8c |tate",,b|lock%...|
|000043c0| 2d 62 6c 6f 63 6b 25 21 | 32 38 3d 2d 31 3a c8 99 |-block%!|28=-1:..|
|000043d0| 20 22 57 69 6d 70 5f 4f | 70 65 6e 57 69 6e 64 6f | "Wimp_O|penWindo|
|000043e0| 77 22 2c 2c 62 6c 6f 63 | 6b 25 0d 14 96 1f e7 20 |w",,bloc|k%..... |
|000043f0| 66 69 6c 65 25 20 f2 63 | 61 72 65 74 28 6d 68 61 |file% .c|aret(mha|
|00004400| 6e 64 6c 65 25 2c 2d 31 | 29 0d 14 a0 05 cb 0d 14 |ndle%,-1|).......|
|00004410| aa 05 e1 0d 14 b4 04 0d | 14 be 1e dd f2 6d 61 69 |........|.....mai|
|00004420| 6e 63 6c 69 63 6b 28 62 | 75 74 74 6f 6e 25 2c 69 |nclick(b|utton%,i|
|00004430| 63 6f 6e 25 29 0d 14 c8 | 10 c8 8e 20 62 75 74 74 |con%)...|... butt|
|00004440| 6f 6e 25 20 ca 0d 14 d2 | 08 c9 20 31 3a 0d 14 dc |on% ....|.. 1:...|
|00004450| 16 e7 20 69 63 6f 6e 25 | 3d 54 6f 70 62 61 72 33 |.. icon%|=Topbar3|
|00004460| 25 20 8c 0d 14 e6 24 6e | 75 6d 62 65 72 25 2d 3d |% ....$n|umber%-=|
|00004470| 31 3a e7 20 6e 75 6d 62 | 65 72 25 3c 31 20 6e 75 |1:. numb|er%<1 nu|
|00004480| 6d 62 65 72 25 3d 31 0d | 14 f0 34 c8 99 20 22 57 |mber%=1.|..4.. "W|
|00004490| 69 6d 70 5f 46 6f 72 63 | 65 52 65 64 72 61 77 22 |imp_Forc|eRedraw"|
|000044a0| 2c 6d 68 61 6e 64 6c 65 | 25 2c 30 2c 2d 6c 65 6e |,mhandle|%,0,-len|
|000044b0| 67 74 68 25 2c 31 32 38 | 30 2c 30 0d 14 fa 05 cd |gth%,128|0,0.....|
|000044c0| 0d 15 04 3c c9 20 32 3a | 6f 70 65 6e 6d 65 6e 75 |...<. 2:|openmenu|
|000044d0| 25 3d 32 3a f2 73 68 6f | 77 6d 65 6e 75 28 6d 61 |%=2:.sho|wmenu(ma|
|000044e0| 69 6e 6d 65 6e 75 25 2c | 21 62 6c 6f 63 6b 25 2d |inmenu%,|!block%-|
|000044f0| 36 34 2c 62 6c 6f 63 6b | 25 21 34 29 0d 15 0e 08 |64,block|%!4)....|
|00004500| c9 20 34 3a 0d 15 18 16 | e7 20 69 63 6f 6e 25 3d |. 4:....|. icon%=|
|00004510| 54 6f 70 62 61 72 33 25 | 20 8c 0d 15 22 26 6e 75 |Topbar3%| ..."&nu|
|00004520| 6d 62 65 72 25 2b 3d 31 | 3a e7 20 6e 75 6d 62 65 |mber%+=1|:. numbe|
|00004530| 72 25 3e 54 25 20 6e 75 | 6d 62 65 72 25 3d 54 25 |r%>T% nu|mber%=T%|
|00004540| 0d 15 2c 34 c8 99 20 22 | 57 69 6d 70 5f 46 6f 72 |..,4.. "|Wimp_For|
|00004550| 63 65 52 65 64 72 61 77 | 22 2c 6d 68 61 6e 64 6c |ceRedraw|",mhandl|
|00004560| 65 25 2c 30 2c 2d 6c 65 | 6e 67 74 68 25 2c 31 32 |e%,0,-le|ngth%,12|
|00004570| 38 30 2c 30 0d 15 36 05 | cd 0d 15 40 3a e7 20 69 |80,0..6.|...@:. i|
|00004580| 63 6f 6e 25 3e 2d 31 20 | 80 20 69 63 6f 6e 25 3c |con%>-1 |. icon%<|
|00004590| 54 6f 70 62 61 72 31 25 | 20 8c 20 66 6c 64 25 3d |Topbar1%| . fld%=|
|000045a0| 69 63 6f 6e 25 2b 31 3a | f2 61 6c 74 65 72 66 69 |icon%+1:|.alterfi|
|000045b0| 65 6c 64 0d 15 4a 05 cb | 0d 15 54 05 e1 0d 15 5e |eld..J..|..T....^|
|000045c0| 04 0d 15 68 10 dd f2 61 | 6c 74 65 72 66 69 65 6c |...h...a|lterfiel|
|000045d0| 64 0d 15 72 2f 52 24 3d | a4 73 74 72 69 70 28 52 |d..r/R$=|.strip(R|
|000045e0| 24 28 49 6e 64 65 78 25 | 28 49 6e 64 2c 6e 75 6d |$(Index%|(Ind,num|
|000045f0| 62 65 72 25 29 2c 66 6c | 64 25 29 2c 22 20 22 29 |ber%),fl|d%)," ")|
|00004600| 0d 15 7c 21 24 74 65 73 | 74 32 25 3d 52 24 2b c4 |..|!$tes|t2%=R$+.|
|00004610| 32 35 34 2d 4c 25 28 66 | 6c 64 25 29 2c 22 20 22 |254-L%(f|ld%)," "|
|00004620| 29 0d 15 86 14 24 74 65 | 73 74 31 25 3d 46 24 28 |)....$te|st1%=F$(|
|00004630| 66 6c 64 25 29 0d 15 90 | 18 21 62 6c 6f 63 6b 25 |fld%)...|.!block%|
|00004640| 3d 61 6c 74 65 72 68 61 | 6e 64 6c 65 25 0d 15 9a |=alterha|ndle%...|
|00004650| 24 c8 99 20 22 57 69 6d | 70 5f 47 65 74 57 69 6e |$.. "Wim|p_GetWin|
|00004660| 64 6f 77 53 74 61 74 65 | 22 2c 2c 62 6c 6f 63 6b |dowState|",,block|
|00004670| 25 0d 15 a4 20 c8 99 20 | 22 57 69 6d 70 5f 4f 70 |%... .. |"Wimp_Op|
|00004680| 65 6e 57 69 6e 64 6f 77 | 22 2c 2c 62 6c 6f 63 6b |enWindow|",,block|
|00004690| 25 0d 15 ae 3c c8 99 20 | 22 57 69 6d 70 5f 53 65 |%...<.. |"Wimp_Se|
|000046a0| 74 43 61 72 65 74 50 6f | 73 69 74 69 6f 6e 22 2c |tCaretPo|sition",|
|000046b0| 61 6c 74 65 72 68 61 6e | 64 6c 65 25 2c 65 6e 74 |alterhan|dle%,ent|
|000046c0| 72 79 25 2c 30 2c 30 2c | 2d 31 2c 2d 31 0d 15 b8 |ry%,0,0,|-1,-1...|
|000046d0| 05 e1 0d 15 c2 04 0d 15 | cc 17 dd a4 73 74 72 69 |........|....stri|
|000046e0| 70 28 64 61 74 61 24 2c | 70 61 64 24 29 0d 15 d6 |p(data$,|pad$)...|
|000046f0| 13 c8 95 20 c2 64 61 74 | 61 24 29 3d 70 61 64 24 |... .dat|a$)=pad$|
|00004700| 0d 15 e0 11 64 61 74 61 | 24 3d c0 64 61 74 61 24 |....data|$=.data$|
|00004710| 29 0d 15 ea 05 ce 0d 15 | f4 0a 3d 64 61 74 61 24 |).......|..=data$|
|00004720| 0d 15 fe 04 0d 16 08 10 | dd f2 63 6c 6f 73 65 61 |........|..closea|
|00004730| 6c 74 65 72 0d 16 12 16 | 52 24 3d a4 73 74 72 69 |lter....|R$=.stri|
|00004740| 6e 67 28 74 65 73 74 32 | 25 29 0d 16 1c 35 52 24 |ng(test2|%)...5R$|
|00004750| 28 49 6e 64 65 78 25 28 | 49 6e 64 2c 6e 75 6d 62 |(Index%(|Ind,numb|
|00004760| 65 72 25 29 2c 66 6c 64 | 25 29 3d a4 6c 65 6e 67 |er%),fld|%)=.leng|
|00004770| 74 68 28 52 24 2c 4c 25 | 28 66 6c 64 25 29 29 0d |th(R$,L%|(fld%)).|
|00004780| 16 26 18 21 62 6c 6f 63 | 6b 25 3d 61 6c 74 65 72 |.&.!bloc|k%=alter|
|00004790| 68 61 6e 64 6c 65 25 0d | 16 30 21 c8 99 20 22 57 |handle%.|.0!.. "W|
|000047a0| 69 6d 70 5f 43 6c 6f 73 | 65 57 69 6e 64 6f 77 22 |imp_Clos|eWindow"|
|000047b0| 2c 2c 62 6c 6f 63 6b 25 | 0d 16 3a 12 e7 20 61 6c |,,block%|..:.. al|
|000047c0| 74 65 72 65 64 25 3d a3 | 20 8c 0d 16 44 10 20 20 |tered%=.| ...D.  |
|000047d0| 61 6c 74 65 72 65 64 25 | 3d b9 0d 16 4e 21 20 20 |altered%|=...N!  |
|000047e0| f2 73 74 61 72 28 6d 68 | 61 6e 64 6c 65 25 2c 74 |.star(mh|andle%,t|
|000047f0| 62 61 72 25 2c 74 62 61 | 72 24 29 0d 16 58 05 cc |bar%,tba|r$)..X..|
|00004800| 0d 16 62 16 20 20 21 62 | 6c 6f 63 6b 25 3d 6d 68 |..b.  !b|lock%=mh|
|00004810| 61 6e 64 6c 65 25 0d 16 | 6c 26 20 20 c8 99 20 22 |andle%..|l&  .. "|
|00004820| 57 69 6d 70 5f 47 65 74 | 57 69 6e 64 6f 77 53 74 |Wimp_Get|WindowSt|
|00004830| 61 74 65 22 2c 2c 62 6c | 6f 63 6b 25 0d 16 76 22 |ate",,bl|ock%..v"|
|00004840| 20 20 c8 99 20 22 57 69 | 6d 70 5f 4f 70 65 6e 57 |  .. "Wi|mp_OpenW|
|00004850| 69 6e 64 6f 77 22 2c 2c | 62 6c 6f 63 6b 25 0d 16 |indow",,|block%..|
|00004860| 80 05 cd 0d 16 8a 20 f2 | 72 65 64 72 61 77 28 49 |...... .|redraw(I|
|00004870| 6e 64 65 78 25 28 49 6e | 64 2c 6e 75 6d 62 65 72 |ndex%(In|d,number|
|00004880| 25 29 29 0d 16 94 17 f2 | 63 61 72 65 74 28 6d 68 |%)).....|caret(mh|
|00004890| 61 6e 64 6c 65 25 2c 2d | 31 29 0d 16 9e 05 e1 0d |andle%,-|1)......|
|000048a0| 16 a8 04 0d 16 b2 0b dd | f2 71 75 69 63 6b 0d 16 |........|.quick..|
|000048b0| bc 2c 66 6c 64 25 3d 31 | 3a 24 74 65 73 74 31 25 |.,fld%=1|:$test1%|
|000048c0| 3d 46 24 28 66 6c 64 25 | 29 3a 24 74 65 73 74 32 |=F$(fld%|):$test2|
|000048d0| 25 3d c4 32 35 35 2c bd | 30 29 0d 16 c6 16 f2 73 |%=.255,.|0).....s|
|000048e0| 68 6f 77 28 66 61 73 74 | 68 61 6e 64 6c 65 25 29 |how(fast|handle%)|
|000048f0| 0d 16 d0 36 c8 99 20 22 | 57 69 6d 70 5f 53 65 74 |...6.. "|Wimp_Set|
|00004900| 43 61 72 65 74 50 6f 73 | 69 74 69 6f 6e 22 2c 66 |CaretPos|ition",f|
|00004910| 61 73 74 68 61 6e 64 6c | 65 25 2c 31 2c 30 2c 30 |asthandl|e%,1,0,0|
|00004920| 2c 2d 31 2c 2d 31 0d 16 | da 05 e1 0d 16 e4 04 0d |,-1,-1..|........|
|00004930| 16 ee 0f dd f2 6e 65 78 | 74 71 75 69 63 6b 0d 16 |.....nex|tquick..|
|00004940| f8 16 52 24 3d a4 73 74 | 72 69 6e 67 28 74 65 73 |..R$=.st|ring(tes|
|00004950| 74 32 25 29 0d 17 02 0e | e7 a9 28 52 24 29 3e 30 |t2%)....|..(R$)>0|
|00004960| 20 8c 0d 17 0c 37 20 20 | 52 24 28 49 6e 64 65 78 | ....7  |R$(Index|
|00004970| 25 28 49 6e 64 2c 6e 75 | 6d 62 65 72 25 29 2c 66 |%(Ind,nu|mber%),f|
|00004980| 6c 64 25 29 3d a4 6c 65 | 6e 67 74 68 28 52 24 2c |ld%)=.le|ngth(R$,|
|00004990| 4c 25 28 66 6c 64 25 29 | 29 0d 17 16 3a 20 20 e7 |L%(fld%)|)...:  .|
|000049a0| 61 6c 74 65 72 65 64 25 | 3d a3 20 8c 20 61 6c 74 |altered%|=. . alt|
|000049b0| 65 72 65 64 25 3d b9 3a | f2 73 74 61 72 28 6d 68 |ered%=.:|.star(mh|
|000049c0| 61 6e 64 6c 65 25 2c 74 | 62 61 72 25 2c 74 62 61 |andle%,t|bar%,tba|
|000049d0| 72 24 29 0d 17 20 05 cd | 0d 17 2a 17 21 62 6c 6f |r$).. ..|..*.!blo|
|000049e0| 63 6b 25 3d 66 61 73 74 | 68 61 6e 64 6c 65 25 0d |ck%=fast|handle%.|
|000049f0| 17 34 21 c8 99 20 22 57 | 69 6d 70 5f 43 6c 6f 73 |.4!.. "W|imp_Clos|
|00004a00| 65 57 69 6e 64 6f 77 22 | 2c 2c 62 6c 6f 63 6b 25 |eWindow"|,,block%|
|00004a10| 0d 17 3e 30 c8 99 22 57 | 69 6d 70 5f 46 6f 72 63 |..>0.."W|imp_Forc|
|00004a20| 65 52 65 64 72 61 77 22 | 2c 6d 68 61 6e 64 6c 65 |eRedraw"|,mhandle|
|00004a30| 25 2c 30 2c 2d 31 30 32 | 34 2c 31 32 38 30 2c 30 |%,0,-102|4,1280,0|
|00004a40| 0d 17 48 0b 66 6c 64 25 | 2b 3d 31 0d 17 52 1e e7 |..H.fld%|+=1..R..|
|00004a50| 66 6c 64 25 3e 46 25 20 | 66 6c 64 25 3d 31 3a 6e |fld%>F% |fld%=1:n|
|00004a60| 75 6d 62 65 72 25 2b 3d | 31 0d 17 5c 1c e7 6e 75 |umber%+=|1..\..nu|
|00004a70| 6d 62 65 72 25 3e 54 25 | 20 6e 75 6d 62 65 72 25 |mber%>T%| number%|
|00004a80| 3d 54 25 3a e1 0d 17 66 | 25 24 74 65 73 74 31 25 |=T%:...f|%$test1%|
|00004a90| 3d 46 24 28 66 6c 64 25 | 29 3a 24 74 65 73 74 32 |=F$(fld%|):$test2|
|00004aa0| 25 3d c4 32 35 35 2c bd | 30 29 0d 17 70 16 f2 73 |%=.255,.|0)..p..s|
|00004ab0| 68 6f 77 28 66 61 73 74 | 68 61 6e 64 6c 65 25 29 |how(fast|handle%)|
|00004ac0| 0d 17 7a 36 c8 99 20 22 | 57 69 6d 70 5f 53 65 74 |..z6.. "|Wimp_Set|
|00004ad0| 43 61 72 65 74 50 6f 73 | 69 74 69 6f 6e 22 2c 66 |CaretPos|ition",f|
|00004ae0| 61 73 74 68 61 6e 64 6c | 65 25 2c 31 2c 30 2c 30 |asthandl|e%,1,0,0|
|00004af0| 2c 2d 31 2c 2d 31 0d 17 | 84 05 e1 0d 17 8e 04 0d |,-1,-1..|........|
|00004b00| 17 98 13 dd a4 6c 65 6e | 67 74 68 28 41 24 2c 4c |.....len|gth(A$,L|
|00004b10| 25 29 0d 17 a2 23 e7 20 | a9 28 41 24 29 3c 4c 25 |%)...#. |.(A$)<L%|
|00004b20| 20 41 24 3d 41 24 2b c4 | 4c 25 2d a9 28 41 24 29 | A$=A$+.|L%-.(A$)|
|00004b30| 2c 22 20 22 29 0d 17 ac | 19 e7 20 a9 28 41 24 29 |," ")...|.. .(A$)|
|00004b40| 3e 4c 25 20 41 24 3d c0 | 41 24 2c 4c 25 29 0d 17 |>L% A$=.|A$,L%)..|
|00004b50| b6 07 3d 41 24 0d 17 c0 | 04 0d 17 ca 14 dd f2 6b |..=A$...|.......k|
|00004b60| 65 79 70 72 65 73 73 28 | 6b 65 79 25 29 0d 17 d4 |eypress(|key%)...|
|00004b70| 0d c8 8e 20 6b 65 79 25 | 20 ca 0d 17 de 0e c9 20 |... key%| ...... |
|00004b80| 36 3a f2 66 69 72 73 74 | 0d 17 e8 0e c9 20 31 32 |6:.first|..... 12|
|00004b90| 3a f2 6c 61 73 74 0d 17 | f2 04 0d 17 fc 09 c9 20 |:.last..|....... |
|00004ba0| 31 33 3a 0d 18 06 10 c8 | 8e 20 21 62 6c 6f 63 6b |13:.....|. !block|
|00004bb0| 25 20 ca 0d 18 10 0f c9 | 20 6e 65 77 66 69 6c 65 |% ......| newfile|
|00004bc0| 25 3a 0d 18 1a 0f 46 25 | 3d bb 28 24 6e 6f 66 25 |%:....F%|=.($nof%|
|00004bd0| 29 0d 18 24 14 e7 46 25 | 3c 3e 30 20 f2 6e 65 77 |)..$..F%|<>0 .new|
|00004be0| 66 69 6c 65 32 0d 18 2e | 18 c9 20 6e 65 77 66 69 |file2...|.. newfi|
|00004bf0| 6c 65 34 25 3a f2 6e 65 | 77 69 6e 69 74 0d 18 38 |le4%:.ne|winit..8|
|00004c00| 2f c9 20 65 78 74 72 61 | 73 61 76 65 25 2c 73 61 |/. extra|save%,sa|
|00004c10| 76 65 25 2c 73 65 74 75 | 70 25 2c 73 68 65 6c 6c |ve%,setu|p%,shell|
|00004c20| 25 3a f2 71 75 69 63 6b | 73 61 76 65 0d 18 42 27 |%:.quick|save..B'|
|00004c30| c9 20 67 6f 68 61 6e 64 | 6c 65 25 3a e7 20 67 6f |. gohand|le%:. go|
|00004c40| 25 3d 30 20 f2 67 6f 74 | 6f 20 8b 20 f2 6d 61 73 |%=0 .got|o . .mas|
|00004c50| 74 65 72 0d 18 4c 30 c9 | 20 61 6c 74 65 72 68 61 |ter..L0.| alterha|
|00004c60| 6e 64 6c 65 25 3a e7 20 | 62 6c 6f 63 6b 25 21 34 |ndle%:. |block%!4|
|00004c70| 3d 65 6e 74 72 79 25 20 | f2 63 6c 6f 73 65 61 6c |=entry% |.closeal|
|00004c80| 74 65 72 0d 18 56 29 c9 | 20 66 61 73 74 68 61 6e |ter..V).| fasthan|
|00004c90| 64 6c 65 25 3a e7 20 62 | 6c 6f 63 6b 25 21 34 3d |dle%:. b|lock%!4=|
|00004ca0| 31 20 f2 6e 65 78 74 71 | 75 69 63 6b 0d 18 60 2b |1 .nextq|uick..`+|
|00004cb0| c9 20 65 78 74 65 6e 64 | 25 3a e7 20 65 78 74 65 |. extend|%:. exte|
|00004cc0| 64 25 3d 30 20 f2 65 78 | 74 65 6e 64 65 64 20 8b |d%=0 .ex|tended .|
|00004cd0| 20 f2 65 78 6c 65 6e 0d | 18 6a 27 c9 20 6e 65 77 | .exlen.|.j'. new|
|00004ce0| 66 69 6c 65 32 25 3a e7 | 20 62 6c 6f 63 6b 25 21 |file2%:.| block%!|
|00004cf0| 34 3d 46 25 20 f2 6e 6f | 74 65 6e 61 6d 65 0d 18 |4=F% .no|tename..|
|00004d00| 74 29 c9 20 6e 65 77 66 | 69 6c 65 33 25 3a e7 20 |t). newf|ile3%:. |
|00004d10| 62 6c 6f 63 6b 25 21 34 | 3d 46 25 20 f2 6e 6f 74 |block%!4|=F% .not|
|00004d20| 65 6c 65 6e 67 74 68 0d | 18 7e 33 c9 20 70 72 69 |elength.|.~3. pri|
|00004d30| 6e 74 68 61 6e 64 6c 65 | 25 3a e7 20 62 6c 6f 63 |nthandle|%:. bloc|
|00004d40| 6b 25 21 34 3d 36 20 f2 | 73 65 74 74 69 6e 67 73 |k%!4=6 .|settings|
|00004d50| 3a f2 70 72 69 6e 74 6f | 75 74 0d 18 88 26 c9 20 |:.printo|ut...&. |
|00004d60| 63 6f 75 6e 74 68 61 6e | 64 6c 65 25 3a e7 20 62 |counthan|dle%:. b|
|00004d70| 6c 6f 63 6b 25 21 34 3d | 35 20 f2 63 6f 75 6e 74 |lock%!4=|5 .count|
|00004d80| 0d 18 92 22 c9 20 73 75 | 6d 68 61 6e 64 6c 65 25 |...". su|mhandle%|
|00004d90| 3a e7 20 62 6c 6f 63 6b | 25 21 34 3d 30 20 f2 73 |:. block|%!4=0 .s|
|00004da0| 75 6d 0d 18 9c 27 c9 20 | 73 72 68 61 6e 64 6c 65 |um...'. |srhandle|
|00004db0| 25 3a e7 20 62 6c 6f 63 | 6b 25 21 34 3d 38 3a f2 |%:. bloc|k%!4=8:.|
|00004dc0| 73 65 61 72 63 68 28 31 | 29 0d 18 a6 35 c9 20 73 |search(1|)...5. s|
|00004dd0| 6f 72 74 68 61 6e 64 6c | 65 25 3a 69 66 20 62 6c |orthandl|e%:if bl|
|00004de0| 6f 63 6b 25 21 34 3d 31 | 20 f2 63 61 72 65 74 28 |ock%!4=1| .caret(|
|00004df0| 73 6f 72 74 68 61 6e 64 | 6c 65 25 2c 30 29 0d 18 |sorthand|le%,0)..|
|00004e00| b0 32 c9 20 73 75 62 68 | 61 6e 64 6c 65 25 3a e7 |.2. subh|andle%:.|
|00004e10| 20 62 6c 6f 63 6b 25 21 | 34 3d 35 20 f2 63 61 72 | block%!|4=5 .car|
|00004e20| 65 74 28 73 75 62 68 61 | 6e 64 6c 65 25 2c 31 29 |et(subha|ndle%,1)|
|00004e30| 0d 18 ba 05 cb 0d 18 c4 | 04 0d 18 ce 1b c9 20 31 |........|...... 1|
|00004e40| 34 3a f2 73 65 61 72 63 | 68 28 6e 75 6d 62 65 72 |4:.searc|h(number|
|00004e50| 25 2b 31 29 0d 18 d8 33 | c9 20 31 38 3a 67 6f 25 |%+1)...3|. 18:go%|
|00004e60| 3d 30 3a f2 73 68 6f 77 | 28 67 6f 68 61 6e 64 6c |=0:.show|(gohandl|
|00004e70| 65 25 29 3a f2 63 61 72 | 65 74 28 67 6f 68 61 6e |e%):.car|et(gohan|
|00004e80| 64 6c 65 25 2c 30 29 0d | 18 e2 2d c9 20 31 39 3a |dle%,0).|..-. 19:|
|00004e90| f2 73 68 6f 77 28 73 72 | 68 61 6e 64 6c 65 25 29 |.show(sr|handle%)|
|00004ea0| 3a f2 63 61 72 65 74 28 | 73 72 68 61 6e 64 6c 65 |:.caret(|srhandle|
|00004eb0| 25 2c 36 29 0d 18 ec 25 | c9 20 32 34 3a e7 20 21 |%,6)...%|. 24:. !|
|00004ec0| 62 6c 6f 63 6b 25 3d 67 | 6f 68 61 6e 64 6c 65 25 |block%=g|ohandle%|
|00004ed0| 20 f2 63 6c 6f 73 65 67 | 6f 0d 18 f6 04 0d 19 00 | .closeg|o.......|
|00004ee0| 11 c9 20 32 37 3a f4 20 | 45 53 43 41 50 45 0d 19 |.. 27:. |ESCAPE..|
|00004ef0| 0a 10 c8 8e 20 21 62 6c | 6f 63 6b 25 20 ca 0d 19 |.... !bl|ock% ...|
|00004f00| 14 0d c9 20 69 6d 70 6f | 72 74 25 0d 19 1e 13 21 |... impo|rt%....!|
|00004f10| 62 6c 6f 63 6b 25 3d 69 | 6d 70 6f 72 74 25 0d 19 |block%=i|mport%..|
|00004f20| 28 20 c8 99 22 57 69 6d | 70 5f 43 6c 6f 73 65 57 |( .."Wim|p_CloseW|
|00004f30| 69 6e 64 6f 77 22 2c 2c | 62 6c 6f 63 6b 25 0d 19 |indow",,|block%..|
|00004f40| 32 05 cb 0d 19 3c 04 0d | 19 46 13 c9 20 33 32 3a |2....<..|.F.. 32:|
|00004f50| 6e 75 6d 62 65 72 25 2b | 3d 31 0d 19 50 1b e7 20 |number%+|=1..P.. |
|00004f60| 6e 75 6d 62 65 72 25 3e | 54 25 20 6e 75 6d 62 65 |number%>|T% numbe|
|00004f70| 72 25 3d 54 25 0d 19 5a | 20 f2 72 65 64 72 61 77 |r%=T%..Z| .redraw|
|00004f80| 28 49 6e 64 65 78 25 28 | 49 6e 64 2c 6e 75 6d 62 |(Index%(|Ind,numb|
|00004f90| 65 72 25 29 29 0d 19 64 | 10 ff 28 22 46 58 20 32 |er%))..d|..("FX 2|
|00004fa0| 31 20 30 22 29 0d 19 6e | 04 0d 19 78 0b c9 20 36 |1 0")..n|...x.. 6|
|00004fb0| 36 2c 39 38 0d 19 82 24 | 6e 75 6d 62 65 72 25 2d |6,98...$|number%-|
|00004fc0| 3d 31 3a e7 20 6e 75 6d | 62 65 72 25 3c 31 20 6e |=1:. num|ber%<1 n|
|00004fd0| 75 6d 62 65 72 25 3d 31 | 0d 19 8c 20 f2 72 65 64 |umber%=1|... .red|
|00004fe0| 72 61 77 28 49 6e 64 65 | 78 25 28 49 6e 64 2c 6e |raw(Inde|x%(Ind,n|
|00004ff0| 75 6d 62 65 72 25 29 29 | 0d 19 96 10 ff 28 22 46 |umber%))|.....("F|
|00005000| 58 20 32 31 20 30 22 29 | 0d 19 a0 24 c9 20 31 32 |X 21 0")|...$. 12|
|00005010| 37 3a e7 20 21 62 6c 6f | 63 6b 25 3d 6d 68 61 6e |7:. !blo|ck%=mhan|
|00005020| 64 6c 65 25 20 f2 64 65 | 6c 65 74 65 0d 19 aa 1d |dle% .de|lete....|
|00005030| c9 20 33 38 34 3a f2 73 | 65 74 74 69 6e 67 73 3a |. 384:.s|ettings:|
|00005040| f2 70 72 69 6e 74 6f 75 | 74 0d 19 b4 10 c9 20 33 |.printou|t..... 3|
|00005050| 38 35 3a f2 71 75 69 63 | 6b 0d 19 be 32 c9 20 33 |85:.quic|k...2. 3|
|00005060| 38 36 3a f2 73 68 6f 77 | 28 73 6f 72 74 68 61 6e |86:.show|(sorthan|
|00005070| 64 6c 65 25 29 3a f2 63 | 61 72 65 74 28 73 6f 72 |dle%):.c|aret(sor|
|00005080| 74 68 61 6e 64 6c 65 25 | 2c 30 29 0d 19 c8 9d c9 |thandle%|,0).....|
|00005090| 20 33 38 37 3a e7 49 6e | 64 3e 30 20 f2 72 65 70 | 387:.In|d>0 .rep|
|000050a0| 6f 72 74 28 22 59 6f 75 | 20 61 72 65 20 69 6e 20 |ort("You| are in |
|000050b0| 61 20 73 75 62 66 69 6c | 65 2e 20 54 6f 20 61 76 |a subfil|e. To av|
|000050c0| 6f 69 64 20 6f 76 65 72 | 77 72 69 74 69 6e 67 20 |oid over|writing |
|000050d0| 74 68 65 20 6d 61 69 6e | 20 66 69 6c 65 20 62 79 |the main| file by|
|000050e0| 20 6d 69 73 74 61 6b 65 | 2c 20 73 65 6c 65 63 74 | mistake|, select|
|000050f0| 20 53 61 76 65 20 66 72 | 6f 6d 20 74 68 65 20 6d | Save fr|om the m|
|00005100| 61 69 6e 20 6d 65 6e 75 | 22 2c 31 37 29 20 8b 20 |ain menu|",17) . |
|00005110| 6e 6f 77 25 3d 6d 68 61 | 6e 64 6c 65 25 3a f2 71 |now%=mha|ndle%:.q|
|00005120| 75 69 63 6b 73 61 76 65 | 0d 19 d2 04 0d 19 dc 0a |uicksave|........|
|00005130| c9 20 33 38 38 3a 0d 19 | e6 0f e7 20 6b 65 79 73 |. 388:..|... keys|
|00005140| 25 3d 31 20 8c 0d 19 f0 | 14 21 62 6c 6f 63 6b 25 |%=1 ....|.!block%|
|00005150| 3d 6d 68 61 6e 64 6c 65 | 25 0d 19 fa 12 f2 63 6c |=mhandle|%.....cl|
|00005160| 6f 73 65 3a 6b 65 79 73 | 25 3d 30 0d 1a 04 14 21 |ose:keys|%=0....!|
|00005170| 62 6c 6f 63 6b 25 3d 6d | 68 61 6e 64 6c 65 25 0d |block%=m|handle%.|
|00005180| 1a 0e 23 c8 99 22 57 69 | 6d 70 5f 47 65 74 57 69 |..#.."Wi|mp_GetWi|
|00005190| 6e 64 6f 77 53 74 61 74 | 65 22 2c 2c 62 6c 6f 63 |ndowStat|e",,bloc|
|000051a0| 6b 25 0d 1a 18 09 f2 6f | 70 65 6e 0d 1a 22 05 cc |k%.....o|pen.."..|
|000051b0| 0d 1a 2c 1c 6b 65 79 73 | 25 3d 31 3a 21 62 6c 6f |..,.keys|%=1:!blo|
|000051c0| 63 6b 25 3d 6d 68 61 6e | 64 6c 65 25 0d 1a 36 23 |ck%=mhan|dle%..6#|
|000051d0| c8 99 22 57 69 6d 70 5f | 47 65 74 57 69 6e 64 6f |.."Wimp_|GetWindo|
|000051e0| 77 53 74 61 74 65 22 2c | 2c 62 6c 6f 63 6b 25 0d |wState",|,block%.|
|000051f0| 1a 40 09 f2 6f 70 65 6e | 0d 1a 4a 05 cd 0d 1a 54 |.@..open|..J....T|
|00005200| 04 0d 1a 5e 1d c9 20 33 | 38 39 3a f2 73 68 6f 77 |...^.. 3|89:.show|
|00005210| 28 63 6f 75 6e 74 68 61 | 6e 64 6c 65 25 29 0d 1a |(countha|ndle%)..|
|00005220| 68 2e c9 20 33 39 30 3a | 24 73 6d 25 3d 22 53 55 |h.. 390:|$sm%="SU|
|00005230| 4d 22 3a 73 74 61 74 25 | 3d 30 3a f2 73 68 6f 77 |M":stat%|=0:.show|
|00005240| 28 73 75 6d 68 61 6e 64 | 6c 65 25 29 0d 1a 72 32 |(sumhand|le%)..r2|
|00005250| c9 20 33 39 31 3a 24 73 | 6d 25 3d 22 41 56 45 52 |. 391:$s|m%="AVER|
|00005260| 41 47 45 22 3a 73 74 61 | 74 25 3d 31 3a f2 73 68 |AGE":sta|t%=1:.sh|
|00005270| 6f 77 28 73 75 6d 68 61 | 6e 64 6c 65 25 29 0d 1a |ow(sumha|ndle%)..|
|00005280| 7c 25 c9 20 33 39 35 3a | e7 20 21 62 6c 6f 63 6b ||%. 395:|. !block|
|00005290| 25 3d 6d 68 61 6e 64 6c | 65 25 20 f2 72 65 70 6c |%=mhandl|e% .repl|
|000052a0| 61 63 65 0d 1a 86 04 0d | 1a 90 16 c9 20 33 39 38 |ace.....|.... 398|
|000052b0| 3a f4 20 44 4f 57 4e 20 | 61 72 72 6f 77 0d 1a 9a |:. DOWN |arrow...|
|000052c0| 10 c8 8e 20 21 62 6c 6f | 63 6b 25 20 ca 0d 1a a4 |... !blo|ck% ....|
|000052d0| 3a c9 20 6e 65 77 66 69 | 6c 65 32 25 2c 6e 65 77 |:. newfi|le2%,new|
|000052e0| 66 69 6c 65 33 25 3a f2 | 63 61 72 65 74 28 21 62 |file3%:.|caret(!b|
|000052f0| 6c 6f 63 6b 25 2c 28 62 | 6c 6f 63 6b 25 21 34 29 |lock%,(b|lock%!4)|
|00005300| 83 20 46 25 2b 31 29 0d | 1a ae 05 cb 0d 1a b8 04 |. F%+1).|........|
|00005310| 0d 1a c2 14 c9 20 33 39 | 39 3a f4 20 55 50 20 61 |..... 39|9:. UP a|
|00005320| 72 72 6f 77 0d 1a cc 10 | c8 8e 20 21 62 6c 6f 63 |rrow....|.. !bloc|
|00005330| 6b 25 20 ca 0d 1a d6 1a | c9 20 6e 65 77 66 69 6c |k% .....|. newfil|
|00005340| 65 32 25 2c 6e 65 77 66 | 69 6c 65 33 25 3a 0d 1a |e2%,newf|ile3%:..|
|00005350| e0 17 c8 8e 20 28 62 6c | 6f 63 6b 25 21 34 29 83 |.... (bl|ock%!4).|
|00005360| 20 46 25 20 ca 0d 1a ea | 1c c9 20 30 3a f2 63 61 | F% ....|.. 0:.ca|
|00005370| 72 65 74 28 21 62 6c 6f | 63 6b 25 2c 46 25 2d 31 |ret(!blo|ck%,F%-1|
|00005380| 29 0d 1a f4 1a c9 20 31 | 3a f2 63 61 72 65 74 28 |)..... 1|:.caret(|
|00005390| 21 62 6c 6f 63 6b 25 2c | 46 25 29 0d 1a fe 26 7f |!block%,|F%)...&.|
|000053a0| 3a f2 63 61 72 65 74 28 | 21 62 6c 6f 63 6b 25 2c |:.caret(|!block%,|
|000053b0| 28 62 6c 6f 63 6b 25 21 | 34 29 83 20 46 25 2d 31 |(block%!|4). F%-1|
|000053c0| 29 0d 1b 08 05 cb 0d 1b | 12 05 cb 0d 1b 1c 04 0d |).......|........|
|000053d0| 1b 26 10 c9 20 34 30 30 | 3a f2 70 72 69 6e 74 0d |.&.. 400|:.print.|
|000053e0| 1b 30 11 c9 20 34 36 31 | 3a f2 69 6e 73 65 72 74 |.0.. 461|:.insert|
|000053f0| 0d 1b 3a 1e 7f 20 c8 99 | 22 57 69 6d 70 5f 50 72 |..:.. ..|"Wimp_Pr|
|00005400| 6f 63 65 73 73 4b 65 79 | 22 2c 6b 65 79 25 0d 1b |ocessKey|",key%..|
|00005410| 44 05 cb 0d 1b 4e 05 e1 | 0d 1b 58 04 0d 1b 62 10 |D....N..|..X...b.|
|00005420| dd f2 6d 65 6e 75 73 65 | 6c 65 63 74 0d 1b 6c 2f |..menuse|lect..l/|
|00005430| 73 65 6c 31 25 3d 21 62 | 6c 6f 63 6b 25 3a 73 65 |sel1%=!b|lock%:se|
|00005440| 6c 32 25 3d 62 6c 6f 63 | 6b 25 21 34 3a 73 65 6c |l2%=bloc|k%!4:sel|
|00005450| 33 25 3d 62 6c 6f 63 6b | 25 21 38 0d 1b 76 24 c8 |3%=block|%!8..v$.|
|00005460| 99 20 22 57 69 6d 70 5f | 47 65 74 50 6f 69 6e 74 |. "Wimp_|GetPoint|
|00005470| 65 72 49 6e 66 6f 22 2c | 2c 62 6c 6f 63 6b 25 0d |erInfo",|,block%.|
|00005480| 1b 80 14 62 75 74 74 6f | 6e 25 3d 62 6c 6f 63 6b |...butto|n%=block|
|00005490| 25 21 38 0d 1b 8a 13 e7 | 20 6f 70 65 6e 6d 65 6e |%!8.....| openmen|
|000054a0| 75 25 3d 31 20 8c 0d 1b | 94 0e c8 8e 20 73 65 6c |u%=1 ...|.... sel|
|000054b0| 31 25 20 ca 0d 1b 9e 0f | c9 20 31 3a 71 75 69 74 |1% .....|. 1:quit|
|000054c0| 25 3d b9 0d 1b a8 05 cb | 0d 1b b2 33 e7 20 62 75 |%=......|...3. bu|
|000054d0| 74 74 6f 6e 25 3d 31 20 | f2 73 68 6f 77 6d 65 6e |tton%=1 |.showmen|
|000054e0| 75 28 69 6d 65 6e 75 25 | 2c 30 2c 30 29 20 8b 20 |u(imenu%|,0,0) . |
|000054f0| 6f 70 65 6e 6d 65 6e 75 | 25 3d 30 0d 1b bc 05 cd |openmenu|%=0.....|
|00005500| 0d 1b c6 13 e7 20 6f 70 | 65 6e 6d 65 6e 75 25 3d |..... op|enmenu%=|
|00005510| 32 20 8c 0d 1b d0 0e c8 | 8e 20 73 65 6c 31 25 20 |2 ......|. sel1% |
|00005520| ca 0d 1b da 17 c9 20 30 | 3a f4 20 46 69 6c 65 20 |...... 0|:. File |
|00005530| 73 65 6c 65 63 74 65 64 | 0d 1b e4 0e c8 8e 20 73 |selected|...... s|
|00005540| 65 6c 32 25 20 ca 0d 1b | ee 9b c9 20 30 3a e7 49 |el2% ...|... 0:.I|
|00005550| 6e 64 3e 30 20 f2 72 65 | 70 6f 72 74 28 22 59 6f |nd>0 .re|port("Yo|
|00005560| 75 20 61 72 65 20 69 6e | 20 61 20 73 75 62 66 69 |u are in| a subfi|
|00005570| 6c 65 2e 20 54 6f 20 61 | 76 6f 69 64 20 6f 76 65 |le. To a|void ove|
|00005580| 72 77 72 69 74 69 6e 67 | 20 74 68 65 20 6d 61 69 |rwriting| the mai|
|00005590| 6e 20 66 69 6c 65 20 62 | 79 20 6d 69 73 74 61 6b |n file b|y mistak|
|000055a0| 65 2c 20 73 65 6c 65 63 | 74 20 53 61 76 65 20 66 |e, selec|t Save f|
|000055b0| 72 6f 6d 20 74 68 65 20 | 6d 61 69 6e 20 6d 65 6e |rom the |main men|
|000055c0| 75 22 2c 31 37 29 20 8b | 20 6e 6f 77 25 3d 6d 68 |u",17) .| now%=mh|
|000055d0| 61 6e 64 6c 65 25 3a f2 | 71 75 69 63 6b 73 61 76 |andle%:.|quicksav|
|000055e0| 65 0d 1b f8 16 c9 20 34 | 3a f2 73 68 6f 77 28 69 |e..... 4|:.show(i|
|000055f0| 6d 70 6f 72 74 25 29 0d | 1c 02 07 c9 20 35 0d 1c |mport%).|.... 5..|
|00005600| 0c 81 e7 20 61 6c 74 65 | 72 65 64 25 3d b9 20 f2 |... alte|red%=. .|
|00005610| 72 65 70 6f 72 74 28 22 | 59 6f 75 20 68 61 76 65 |report("|You have|
|00005620| 20 6e 6f 74 20 73 61 76 | 65 64 20 61 6c 74 65 72 | not sav|ed alter|
|00005630| 61 74 69 6f 6e 73 20 74 | 6f 20 74 68 69 73 20 66 |ations t|o this f|
|00005640| 69 6c 65 20 2d 20 70 72 | 65 73 73 20 43 41 4e 43 |ile - pr|ess CANC|
|00005650| 45 4c 20 74 6f 20 73 61 | 76 65 20 66 69 72 73 74 |EL to sa|ve first|
|00005660| 20 6f 72 20 4f 4b 20 74 | 6f 20 71 75 69 74 20 69 | or OK t|o quit i|
|00005670| 6d 6d 65 64 69 61 74 65 | 6c 79 22 2c 31 39 29 0d |mmediate|ly",19).|
|00005680| 1c 16 28 e7 20 65 72 72 | 63 6c 69 63 6b 25 3d 31 |..(. err|click%=1|
|00005690| 20 84 20 61 6c 74 65 72 | 65 64 25 3d a3 20 8c 20 | . alter|ed%=. . |
|000056a0| 71 75 69 74 25 3d b9 0d | 1c 20 05 cb 0d 1c 2a 18 |quit%=..|. ....*.|
|000056b0| c9 20 31 3a f4 20 50 72 | 69 6e 74 20 73 65 6c 65 |. 1:. Pr|int sele|
|000056c0| 63 74 65 64 0d 1c 34 0e | c8 8e 20 73 65 6c 32 25 |cted..4.|.. sel2%|
|000056d0| 20 ca 0d 1c 3e 24 c9 20 | 30 3a f2 73 65 74 74 69 | ...>$. |0:.setti|
|000056e0| 6e 67 73 3a 53 70 6f 6f | 6c 25 3d 30 3a f2 70 72 |ngs:Spoo|l%=0:.pr|
|000056f0| 69 6e 74 6f 75 74 0d 1c | 48 0e c9 20 31 3a f2 70 |intout..|H.. 1:.p|
|00005700| 72 69 6e 74 0d 1c 52 05 | cb 0d 1c 5c 18 c9 20 32 |rint..R.|...\.. 2|
|00005710| 3a 20 f4 20 45 64 69 74 | 20 73 65 6c 65 63 74 65 |: . Edit| selecte|
|00005720| 64 0d 1c 66 0e c8 8e 20 | 73 65 6c 32 25 20 ca 0d |d..f... |sel2% ..|
|00005730| 1c 70 18 c9 20 30 3a 20 | f4 20 46 69 6e 64 20 73 |.p.. 0: |. Find s|
|00005740| 65 6c 65 63 74 65 64 0d | 1c 7a 0e c8 8e 20 73 65 |elected.|.z... se|
|00005750| 6c 33 25 20 ca 0d 1c 84 | 32 c9 20 30 3a 67 6f 25 |l3% ....|2. 0:go%|
|00005760| 3d 30 3a f2 73 68 6f 77 | 28 67 6f 68 61 6e 64 6c |=0:.show|(gohandl|
|00005770| 65 25 29 3a f2 63 61 72 | 65 74 28 67 6f 68 61 6e |e%):.car|et(gohan|
|00005780| 64 6c 65 25 2c 30 29 0d | 1c 8e 2c c9 20 31 3a f2 |dle%,0).|..,. 1:.|
|00005790| 73 68 6f 77 28 73 72 68 | 61 6e 64 6c 65 25 29 3a |show(srh|andle%):|
|000057a0| f2 63 61 72 65 74 28 73 | 72 68 61 6e 64 6c 65 25 |.caret(s|rhandle%|
|000057b0| 2c 36 29 0d 1c 98 1a c9 | 20 32 3a f2 73 65 61 72 |,6).....| 2:.sear|
|000057c0| 63 68 28 6e 75 6d 62 65 | 72 25 2b 31 29 0d 1c a2 |ch(numbe|r%+1)...|
|000057d0| 05 cb 0d 1c ac 0f c9 20 | 31 3a f2 69 6e 73 65 72 |....... |1:.inser|
|000057e0| 74 0d 1c b6 0f c9 20 32 | 3a f2 64 65 6c 65 74 65 |t..... 2|:.delete|
|000057f0| 0d 1c c0 0e c9 20 33 3a | f2 71 75 69 63 6b 0d 1c |..... 3:|.quick..|
|00005800| ca 30 c9 20 34 3a f2 73 | 68 6f 77 28 73 6f 72 74 |.0. 4:.s|how(sort|
|00005810| 68 61 6e 64 6c 65 25 29 | 3a f2 63 61 72 65 74 28 |handle%)|:.caret(|
|00005820| 73 6f 72 74 68 61 6e 64 | 6c 65 25 2c 30 29 0d 1c |sorthand|le%,0)..|
|00005830| d4 13 c9 20 35 3a f2 66 | 69 65 6c 64 6e 61 6d 65 |... 5:.f|ieldname|
|00005840| 73 0d 1c de 22 c9 20 36 | 3a f2 6e 65 77 66 69 6c |s...". 6|:.newfil|
|00005850| 65 33 3a f2 73 68 6f 77 | 28 6e 65 77 66 69 6c 65 |e3:.show|(newfile|
|00005860| 33 25 29 0d 1c e8 32 c9 | 20 37 3a 67 6f 25 3d 31 |3%)...2.| 7:go%=1|
|00005870| 3a f2 73 68 6f 77 28 67 | 6f 68 61 6e 64 6c 65 25 |:.show(g|ohandle%|
|00005880| 29 3a f2 63 61 72 65 74 | 28 67 6f 68 61 6e 64 6c |):.caret|(gohandl|
|00005890| 65 25 2c 30 29 0d 1c f2 | 10 c9 20 38 3a f2 72 65 |e%,0)...|.. 8:.re|
|000058a0| 70 6c 61 63 65 0d 1c fc | 0f c9 20 39 3a f2 65 78 |place...|.. 9:.ex|
|000058b0| 74 65 6e 64 0d 1d 06 05 | cb 0d 1d 10 1a c9 20 33 |tend....|...... 3|
|000058c0| 3a f4 20 53 75 62 66 69 | 6c 65 20 73 65 6c 65 63 |:. Subfi|le selec|
|000058d0| 74 65 64 0d 1d 1a 0e c8 | 8e 20 73 65 6c 32 25 20 |ted.....|. sel2% |
|000058e0| ca 0d 1d 24 10 c9 20 30 | 3a f2 73 68 6f 77 73 75 |...$.. 0|:.showsu|
|000058f0| 62 0d 1d 2e 0e c9 20 31 | 3a f2 67 6f 73 75 62 0d |b..... 1|:.gosub.|
|00005900| 1d 38 0b c9 20 32 3a f2 | 75 70 0d 1d 42 05 cb 0d |.8.. 2:.|up..B...|
|00005910| 1d 4c 1d c9 20 34 3a f4 | 20 53 74 61 74 69 73 74 |.L.. 4:.| Statist|
|00005920| 69 63 73 20 73 65 6c 65 | 63 74 65 64 0d 1d 56 0e |ics sele|cted..V.|
|00005930| c8 8e 20 73 65 6c 32 25 | 20 ca 0d 1d 60 1b c9 20 |.. sel2%| ...`.. |
|00005940| 30 3a f2 73 68 6f 77 28 | 63 6f 75 6e 74 68 61 6e |0:.show(|counthan|
|00005950| 64 6c 65 25 29 0d 1d 6a | 2c c9 20 31 3a 24 73 6d |dle%)..j|,. 1:$sm|
|00005960| 25 3d 22 53 55 4d 22 3a | 73 74 61 74 25 3d 30 3a |%="SUM":|stat%=0:|
|00005970| f2 73 68 6f 77 28 73 75 | 6d 68 61 6e 64 6c 65 25 |.show(su|mhandle%|
|00005980| 29 0d 1d 74 30 c9 20 32 | 3a 24 73 6d 25 3d 22 41 |)..t0. 2|:$sm%="A|
|00005990| 56 45 52 41 47 45 22 3a | 73 74 61 74 25 3d 31 3a |VERAGE":|stat%=1:|
|000059a0| f2 73 68 6f 77 28 73 75 | 6d 68 61 6e 64 6c 65 25 |.show(su|mhandle%|
|000059b0| 29 0d 1d 7e 05 cb 0d 1d | 88 05 cb 0d 1d 92 0f 6f |)..~....|.......o|
|000059c0| 70 65 6e 6d 65 6e 75 25 | 3d 30 0d 1d 9c 05 cd 0d |penmenu%|=0......|
|000059d0| 1d a6 05 e1 0d 1d b0 04 | 0d 1d ba 15 dd f2 72 65 |........|......re|
|000059e0| 64 72 61 77 28 72 65 63 | 6f 72 64 25 29 0d 1d c4 |draw(rec|ord%)...|
|000059f0| 14 21 62 6c 6f 63 6b 25 | 3d 6d 68 61 6e 64 6c 65 |.!block%|=mhandle|
|00005a00| 25 0d 1d ce 2a c8 99 20 | 22 57 69 6d 70 5f 52 65 |%...*.. |"Wimp_Re|
|00005a10| 64 72 61 77 57 69 6e 64 | 6f 77 22 2c 2c 62 6c 6f |drawWind|ow",,blo|
|00005a20| 63 6b 25 20 b8 20 6d 6f | 72 65 25 0d 1d d8 1a 6f |ck% . mo|re%....o|
|00005a30| 78 25 3d 62 6c 6f 63 6b | 25 21 34 2d 62 6c 6f 63 |x%=block|%!4-bloc|
|00005a40| 6b 25 21 32 30 0d 1d e2 | 1b 6f 79 25 3d 62 6c 6f |k%!20...|.oy%=blo|
|00005a50| 63 6b 25 21 31 36 2d 62 | 6c 6f 63 6b 25 21 32 34 |ck%!16-b|lock%!24|
|00005a60| 0d 1d ec 0c c8 95 20 6d | 6f 72 65 25 0d 1d f6 1a |...... m|ore%....|
|00005a70| c8 99 20 22 57 69 6d 70 | 5f 53 65 74 43 6f 6c 6f |.. "Wimp|_SetColo|
|00005a80| 75 72 22 2c 31 31 0d 1e | 00 14 ec 20 6f 78 25 2b |ur",11..|... ox%+|
|00005a90| 39 35 36 2c 6f 79 25 2d | 34 38 0d 1e 0a 0e f1 3b |956,oy%-|48.....;|
|00005aa0| 6e 75 6d 62 65 72 25 3b | 0d 1e 14 15 ec 20 6f 78 |number%;|..... ox|
|00005ab0| 25 2b 31 31 30 34 2c 6f | 79 25 2d 34 38 0d 1e 1e |%+1104,o|y%-48...|
|00005ac0| 0e f1 3b 54 25 3b 22 20 | 20 22 3b 0d 1e 28 1a c8 |..;T%;" | ";..(..|
|00005ad0| 99 20 22 57 69 6d 70 5f | 53 65 74 43 6f 6c 6f 75 |. "Wimp_|SetColou|
|00005ae0| 72 22 2c 31 33 0d 1e 32 | 14 f1 3b 22 4c 22 3b bd |r",13..2|..;"L";.|
|00005af0| 28 49 6e 64 2b 34 38 29 | 3b 0d 1e 3c 19 c8 99 20 |(Ind+48)|;..<... |
|00005b00| 22 57 69 6d 70 5f 53 65 | 74 43 6f 6c 6f 75 72 22 |"Wimp_Se|tColour"|
|00005b10| 2c 37 0d 1e 46 0c e3 59 | 25 3d 31 b8 46 25 0d 1e |,7..F..Y|%=1.F%..|
|00005b20| 50 25 ec 20 6f 78 25 2b | 46 78 25 28 59 25 29 2a |P%. ox%+|Fx%(Y%)*|
|00005b30| 31 36 2c 6f 79 25 2d 28 | 46 79 25 28 59 25 29 2a |16,oy%-(|Fy%(Y%)*|
|00005b40| 34 30 29 0d 1e 5a 11 e7 | 20 4c 25 28 59 25 29 3c |40)..Z..| L%(Y%)<|
|00005b50| 37 36 20 8c 0d 1e 64 14 | f1 20 52 24 28 72 65 63 |76 ...d.|. R$(rec|
|00005b60| 6f 72 64 25 2c 59 25 29 | 0d 1e 6e 05 cc 0d 1e 78 |ord%,Y%)|..n....x|
|00005b70| 4a e7 20 a9 28 52 24 28 | 72 65 63 6f 72 64 25 2c |J. .(R$(|record%,|
|00005b80| 59 25 29 29 3c 3e 4c 25 | 28 59 25 29 20 52 24 28 |Y%))<>L%|(Y%) R$(|
|00005b90| 72 65 63 6f 72 64 25 2c | 59 25 29 3d a4 66 69 74 |record%,|Y%)=.fit|
|00005ba0| 28 52 24 28 72 65 63 6f | 72 64 25 2c 59 25 29 2c |(R$(reco|rd%,Y%),|
|00005bb0| 4c 25 28 59 25 29 29 0d | 1e 82 1d 52 24 3d 52 24 |L%(Y%)).|...R$=R$|
|00005bc0| 28 72 65 63 6f 72 64 25 | 2c 59 25 29 3a 6c 69 6e |(record%|,Y%):lin|
|00005bd0| 65 25 3d 30 0d 1e 8c 0f | c8 95 20 a9 28 52 24 29 |e%=0....|.. .(R$)|
|00005be0| 3e 37 36 0d 1e 96 1b 52 | 31 24 3d c0 52 24 2c 37 |>76....R|1$=.R$,7|
|00005bf0| 36 29 3a 52 32 24 3d c1 | 52 24 2c 37 37 29 0d 1e |6):R2$=.|R$,77)..|
|00005c00| a0 12 e7 c0 52 31 24 2c | 31 29 3c 3e 22 2a 22 8c |....R1$,|1)<>"*".|
|00005c10| 0d 1e aa 11 c8 95 20 c2 | 52 31 24 29 3c 3e 22 20 |...... .|R1$)<>" |
|00005c20| 22 0d 1e b4 1b 52 32 24 | 3d c2 52 31 24 29 2b 52 |"....R2$|=.R1$)+R|
|00005c30| 32 24 3a 52 31 24 3d c0 | 52 31 24 29 0d 1e be 05 |2$:R1$=.|R1$)....|
|00005c40| ce 0d 1e c8 05 cd 0d 1e | d2 13 f1 20 52 31 24 3a |........|... R1$:|
|00005c50| 6c 69 6e 65 25 2b 3d 34 | 30 0d 1e dc 23 ec 20 6f |line%+=4|0...#. o|
|00005c60| 78 25 2b 31 36 2c 6f 79 | 25 2d 28 46 79 25 28 59 |x%+16,oy|%-(Fy%(Y|
|00005c70| 25 29 2a 34 30 2b 6c 69 | 6e 65 25 29 0d 1e e6 0a |%)*40+li|ne%)....|
|00005c80| 52 24 3d 52 32 24 0d 1e | f0 05 ce 0d 1e fa 0d 6c |R$=R2$..|.......l|
|00005c90| 69 6e 65 25 2b 3d 34 30 | 0d 1f 04 09 f1 20 52 32 |ine%+=40|..... R2|
|00005ca0| 24 0d 1f 0e 05 cd 0d 1f | 18 05 ed 0d 1f 22 2a c8 |$.......|....."*.|
|00005cb0| 99 20 22 57 69 6d 70 5f | 47 65 74 52 65 63 74 61 |. "Wimp_|GetRecta|
|00005cc0| 6e 67 6c 65 22 2c 2c 62 | 6c 6f 63 6b 25 20 b8 20 |ngle",,b|lock% . |
|00005cd0| 6d 6f 72 65 25 0d 1f 2c | 05 ce 0d 1f 36 05 e1 0d |more%..,|....6...|
|00005ce0| 1f 40 04 0d 1f 4a 10 dd | a4 66 69 74 28 61 24 2c |.@...J..|.fit(a$,|
|00005cf0| 6c 25 29 0d 1f 54 1d e7 | 20 a9 28 61 24 29 3e 6c |l%)..T..| .(a$)>l|
|00005d00| 25 20 61 24 3d c0 61 24 | 2c 6c 25 29 3a 3d 61 24 |% a$=.a$|,l%):=a$|
|00005d10| 0d 1f 5e 18 61 24 3d 61 | 24 2b c4 6c 25 2d a9 28 |..^.a$=a|$+.l%-.(|
|00005d20| 61 24 29 2c 22 20 22 29 | 0d 1f 68 07 3d 61 24 0d |a$)," ")|..h.=a$.|
|00005d30| 1f 72 04 0d 1f 7c 0d dd | f2 72 65 63 65 69 76 65 |.r...|..|.receive|
|00005d40| 0d 1f 86 12 c8 8e 20 62 | 6c 6f 63 6b 25 21 31 36 |...... b|lock%!16|
|00005d50| 20 ca 0d 1f 90 0f c9 20 | 30 3a 71 75 69 74 25 3d | ...... |0:quit%=|
|00005d60| b9 0d 1f 9a 11 c9 20 32 | 3a f2 64 61 74 61 73 61 |...... 2|:.datasa|
|00005d70| 76 65 0d 1f a4 07 c9 20 | 33 0d 1f ae 12 c8 8e 20 |ve..... |3...... |
|00005d80| 62 6c 6f 63 6b 25 21 32 | 30 20 ca 0d 1f b8 26 c9 |block%!2|0 ....&.|
|00005d90| 20 2d 32 2c 73 68 61 6e | 64 6c 65 25 3a f2 64 61 | -2,shan|dle%:.da|
|00005da0| 74 61 6c 6f 61 64 28 62 | 6c 6f 63 6b 25 21 34 30 |taload(b|lock%!40|
|00005db0| 29 0d 1f c2 0d c9 20 69 | 6d 70 6f 72 74 25 0d 1f |)..... i|mport%..|
|00005dc0| cc 13 e7 20 62 6c 6f 63 | 6b 25 21 32 34 3d 31 20 |... bloc|k%!24=1 |
|00005dd0| 8c 0d 1f d6 13 74 79 70 | 65 25 3d 62 6c 6f 63 6b |.....typ|e%=block|
|00005de0| 25 21 34 30 0d 1f e0 12 | c8 8e 20 62 6c 6f 63 6b |%!40....|.. block|
|00005df0| 25 21 34 30 20 ca 0d 1f | ea 0f c9 20 26 30 41 30 |%!40 ...|... &0A0|
|00005e00| 2c 26 44 46 45 0d 1f f4 | 29 70 61 74 68 24 3d a4 |,&DFE...|)path$=.|
|00005e10| 73 74 72 69 6e 67 28 62 | 6c 6f 63 6b 25 2b 34 34 |string(b|lock%+44|
|00005e20| 29 3a 24 70 61 74 68 25 | 3d 70 61 74 68 24 0d 1f |):$path%|=path$..|
|00005e30| fe 33 e7 20 62 6c 6f 63 | 6b 25 21 34 30 3d 26 30 |.3. bloc|k%!40=&0|
|00005e40| 41 30 20 24 66 74 79 70 | 65 25 3d 22 4d 61 78 69 |A0 $ftyp|e%="Maxi|
|00005e50| 22 20 8b 20 24 66 74 79 | 70 65 25 3d 22 43 53 56 |" . $fty|pe%="CSV|
|00005e60| 22 0d 20 08 2d c8 99 22 | 57 69 6d 70 5f 46 6f 72 |". .-.."|Wimp_For|
|00005e70| 63 65 52 65 64 72 61 77 | 22 2c 69 6d 70 6f 72 74 |ceRedraw|",import|
|00005e80| 25 2c 30 2c 2d 31 36 30 | 2c 35 37 36 2c 30 0d 20 |%,0,-160|,576,0. |
|00005e90| 12 27 7f 3a f2 72 65 70 | 6f 72 74 28 22 4e 6f 74 |.'.:.rep|ort("Not|
|00005ea0| 20 61 20 73 75 69 74 61 | 62 6c 65 20 66 69 6c 65 | a suita|ble file|
|00005eb0| 22 2c 31 37 29 0d 20 1c | 05 cb 0d 20 26 05 cd 0d |",17). .|... &...|
|00005ec0| 20 30 05 cb 0d 20 3a 05 | cb 0d 20 44 05 e1 0d 20 | 0... :.|.. D... |
|00005ed0| 4e 04 0d 20 58 15 dd f2 | 64 61 74 61 6c 6f 61 64 |N.. X...|dataload|
|00005ee0| 28 74 79 70 65 25 29 0d | 20 62 a1 e7 20 66 69 6c |(type%).| b.. fil|
|00005ef0| 65 25 3d b9 20 f2 72 65 | 70 6f 72 74 28 22 59 6f |e%=. .re|port("Yo|
|00005f00| 75 20 63 61 6e 6e 6f 74 | 20 6c 6f 61 64 20 61 20 |u cannot| load a |
|00005f10| 32 6e 64 20 66 69 6c 65 | 20 69 6e 74 6f 20 74 68 |2nd file| into th|
|00005f20| 65 20 73 61 6d 65 20 73 | 6c 6f 74 2e 20 45 69 74 |e same s|lot. Eit|
|00005f30| 68 65 72 20 71 75 69 74 | 20 61 6e 64 20 72 65 6c |her quit| and rel|
|00005f40| 6f 61 64 20 4d 61 78 69 | 66 69 6c 65 2c 20 6f 72 |oad Maxi|file, or|
|00005f50| 20 6c 6f 61 64 20 61 20 | 73 65 63 6f 6e 64 20 63 | load a |second c|
|00005f60| 6f 70 79 20 6f 66 20 4d | 61 78 69 66 69 6c 65 20 |opy of M|axifile |
|00005f70| 6f 6e 74 6f 20 74 68 65 | 20 69 63 6f 6e 62 61 72 |onto the| iconbar|
|00005f80| 2e 22 2c 31 37 29 3a e1 | 0d 20 6c 0e c8 8e 20 74 |.",17):.|. l... t|
|00005f90| 79 70 65 25 20 ca 0d 20 | 76 36 c9 20 26 31 30 30 |ype% .. |v6. &100|
|00005fa0| 30 3a f2 72 65 70 6f 72 | 74 28 22 59 6f 75 20 63 |0:.repor|t("You c|
|00005fb0| 61 6e 6e 6f 74 20 6c 6f | 61 64 20 61 20 44 69 72 |annot lo|ad a Dir|
|00005fc0| 65 63 74 6f 72 79 21 22 | 2c 31 37 29 0d 20 80 39 |ectory!"|,17). .9|
|00005fd0| c9 20 26 32 30 30 30 3a | f2 72 65 70 6f 72 74 28 |. &2000:|.report(|
|00005fe0| 22 59 6f 75 20 63 61 6e | 6e 6f 74 20 6c 6f 61 64 |"You can|not load|
|00005ff0| 20 61 6e 20 41 70 70 6c | 69 63 61 74 69 6f 6e 21 | an Appl|ication!|
|00006000| 22 2c 31 37 29 0d 20 8a | 0f c9 20 26 30 41 30 2c |",17). .|.. &0A0,|
|00006010| 26 46 46 44 0d 20 94 3a | 70 61 74 68 24 3d a4 73 |&FFD. .:|path$=.s|
|00006020| 74 72 69 6e 67 28 62 6c | 6f 63 6b 25 2b 34 34 29 |tring(bl|ock%+44)|
|00006030| 3a 24 70 61 74 68 25 3d | 70 61 74 68 24 3a 24 73 |:$path%=|path$:$s|
|00006040| 61 76 65 74 65 78 74 25 | 3d 70 61 74 68 24 0d 20 |avetext%|=path$. |
|00006050| 9e 1c f2 6c 6f 61 64 28 | 70 61 74 68 24 29 3a f2 |...load(|path$):.|
|00006060| 6d 61 69 6e 77 69 6e 64 | 6f 77 0d 20 a8 0b 66 69 |mainwind|ow. ..fi|
|00006070| 6c 65 25 3d b9 0d 20 b2 | 27 74 62 61 72 24 3d 22 |le%=.. .|'tbar$="|
|00006080| 4d 61 78 69 66 69 6c 65 | 20 22 2b c0 a4 67 65 74 |Maxifile| "+..get|
|00006090| 6c 65 61 66 28 70 61 74 | 68 24 29 29 0d 20 bc 21 |leaf(pat|h$)). .!|
|000060a0| f2 6e 6f 73 74 61 72 28 | 6d 68 61 6e 64 6c 65 25 |.nostar(|mhandle%|
|000060b0| 2c 74 62 61 72 25 2c 74 | 62 61 72 24 29 0d 20 c6 |,tbar%,t|bar$). .|
|000060c0| 0a c9 20 26 44 46 45 0d | 20 d0 29 70 61 74 68 24 |.. &DFE.| .)path$|
|000060d0| 3d a4 73 74 72 69 6e 67 | 28 62 6c 6f 63 6b 25 2b |=.string|(block%+|
|000060e0| 34 34 29 3a 24 70 61 74 | 68 25 3d 70 61 74 68 24 |44):$pat|h%=path$|
|000060f0| 0d 20 da 18 f2 6c 6f 61 | 64 63 73 76 3a f2 6d 61 |. ...loa|dcsv:.ma|
|00006100| 69 6e 77 69 6e 64 6f 77 | 0d 20 e4 0b 66 69 6c 65 |inwindow|. ..file|
|00006110| 25 3d b9 0d 20 ee 27 74 | 62 61 72 24 3d 22 4d 61 |%=.. .'t|bar$="Ma|
|00006120| 78 69 66 69 6c 65 20 22 | 2b c0 a4 67 65 74 6c 65 |xifile "|+..getle|
|00006130| 61 66 28 70 61 74 68 24 | 29 29 0d 20 f8 21 f2 6e |af(path$|)). .!.n|
|00006140| 6f 73 74 61 72 28 6d 68 | 61 6e 64 6c 65 25 2c 74 |ostar(mh|andle%,t|
|00006150| 62 61 72 25 2c 74 62 61 | 72 24 29 0d 21 02 39 7f |bar%,tba|r$).!.9.|
|00006160| 3a f2 72 65 70 6f 72 74 | 28 22 55 6e 61 62 6c 65 |:.report|("Unable|
|00006170| 20 74 6f 20 72 65 63 6f | 67 6e 69 73 65 20 74 68 | to reco|gnise th|
|00006180| 69 73 20 74 79 70 65 20 | 6f 66 20 66 69 6c 65 22 |is type |of file"|
|00006190| 2c 31 37 29 0d 21 0c 05 | cb 0d 21 16 05 e1 0d 21 |,17).!..|..!....!|
|000061a0| 20 04 0d 21 2a 12 dd f2 | 64 72 61 77 66 69 6c 65 | ..!*...|drawfile|
|000061b0| 28 61 24 29 0d 21 34 2a | c8 99 20 22 57 69 6d 70 |(a$).!4*|.. "Wimp|
|000061c0| 5f 52 65 64 72 61 77 57 | 69 6e 64 6f 77 22 2c 2c |_RedrawW|indow",,|
|000061d0| 62 6c 6f 63 6b 25 20 b8 | 20 6d 6f 72 65 25 0d 21 |block% .| more%.!|
|000061e0| 3e 1a 6f 78 25 3d 62 6c | 6f 63 6b 25 21 34 2d 62 |>.ox%=bl|ock%!4-b|
|000061f0| 6c 6f 63 6b 25 21 32 30 | 0d 21 48 1b 6f 79 25 3d |lock%!20|.!H.oy%=|
|00006200| 62 6c 6f 63 6b 25 21 31 | 36 2d 62 6c 6f 63 6b 25 |block%!1|6-block%|
|00006210| 21 32 34 0d 21 52 19 c8 | 99 20 22 57 69 6d 70 5f |!24.!R..|. "Wimp_|
|00006220| 53 65 74 43 6f 6c 6f 75 | 72 22 2c 37 0d 21 5c 0c |SetColou|r",7.!\.|
|00006230| c8 95 20 6d 6f 72 65 25 | 0d 21 66 13 ec 20 6f 78 |.. more%|.!f.. ox|
|00006240| 25 2b 31 36 2c 6f 79 25 | 2d 32 34 0d 21 70 08 f1 |%+16,oy%|-24.!p..|
|00006250| 20 61 24 0d 21 7a 2a c8 | 99 20 22 57 69 6d 70 5f | a$.!z*.|. "Wimp_|
|00006260| 47 65 74 52 65 63 74 61 | 6e 67 6c 65 22 2c 2c 62 |GetRecta|ngle",,b|
|00006270| 6c 6f 63 6b 25 20 b8 20 | 6d 6f 72 65 25 0d 21 84 |lock% . |more%.!.|
|00006280| 05 ce 0d 21 8e 05 e1 0d | 21 98 04 0d 21 a2 0f dd |...!....|!...!...|
|00006290| f2 64 72 61 77 66 69 6c | 65 33 0d 21 ac 2a c8 99 |.drawfil|e3.!.*..|
|000062a0| 20 22 57 69 6d 70 5f 52 | 65 64 72 61 77 57 69 6e | "Wimp_R|edrawWin|
|000062b0| 64 6f 77 22 2c 2c 62 6c | 6f 63 6b 25 20 b8 20 6d |dow",,bl|ock% . m|
|000062c0| 6f 72 65 25 0d 21 b6 1a | 6f 78 25 3d 62 6c 6f 63 |ore%.!..|ox%=bloc|
|000062d0| 6b 25 21 34 2d 62 6c 6f | 63 6b 25 21 32 30 0d 21 |k%!4-blo|ck%!20.!|
|000062e0| c0 1b 6f 79 25 3d 62 6c | 6f 63 6b 25 21 31 36 2d |..oy%=bl|ock%!16-|
|000062f0| 62 6c 6f 63 6b 25 21 32 | 34 0d 21 ca 19 c8 99 20 |block%!2|4.!.... |
|00006300| 22 57 69 6d 70 5f 53 65 | 74 43 6f 6c 6f 75 72 22 |"Wimp_Se|tColour"|
|00006310| 2c 37 0d 21 d4 0c c8 95 | 20 6d 6f 72 65 25 0d 21 |,7.!....| more%.!|
|00006320| de 13 ec 20 6f 78 25 2b | 31 36 2c 6f 79 25 2d 32 |... ox%+|16,oy%-2|
|00006330| 34 0d 21 e8 1b f1 20 22 | 45 6e 74 65 72 20 66 69 |4.!... "|Enter fi|
|00006340| 65 6c 64 20 6c 65 6e 67 | 74 68 73 22 0d 21 f2 0c |eld leng|ths".!..|
|00006350| e3 58 25 3d 31 b8 46 25 | 0d 21 fc 1b ec 20 6f 78 |.X%=1.F%|.!... ox|
|00006360| 25 2b 31 36 2c 6f 79 25 | 2d 32 34 2d 28 35 32 2a |%+16,oy%|-24-(52*|
|00006370| 58 25 29 0d 22 06 0c f1 | 20 46 24 28 58 25 29 0d |X%)."...| F$(X%).|
|00006380| 22 10 05 ed 0d 22 1a 2a | c8 99 20 22 57 69 6d 70 |"....".*|.. "Wimp|
|00006390| 5f 47 65 74 52 65 63 74 | 61 6e 67 6c 65 22 2c 2c |_GetRect|angle",,|
|000063a0| 62 6c 6f 63 6b 25 20 b8 | 20 6d 6f 72 65 25 0d 22 |block% .| more%."|
|000063b0| 24 05 ce 0d 22 2e 05 e1 | 0d 22 38 04 0d 22 42 0d |$..."...|."8.."B.|
|000063c0| dd f2 6e 65 77 66 69 6c | 65 0d 22 4c 14 21 62 6c |..newfil|e."L.!bl|
|000063d0| 6f 63 6b 25 3d 73 68 61 | 6e 64 6c 65 25 0d 22 56 |ock%=sha|ndle%."V|
|000063e0| 21 c8 99 20 22 57 69 6d | 70 5f 43 6c 6f 73 65 57 |!.. "Wim|p_CloseW|
|000063f0| 69 6e 64 6f 77 22 2c 2c | 62 6c 6f 63 6b 25 0d 22 |indow",,|block%."|
+--------+-------------------------+-------------------------+--------+--------+