home *** CD-ROM | disk | FTP | other *** search
open in: 
MacOS 8.1
|
Win98
|
DOS
browse contents |
view JSON data
|
view as text
This file was processed as: ArcFS Archive
(archive/arcFS).
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| dexvert
| ArcFS Archive (archive/arcFS)
| magic
| Supported |
| 100%
| file
| RISC OS archive (ArcFS format)
| default
| |
| 99%
| file
| data
| default
| |
| 100%
| TrID
| Acorn ArcFS Archive
| default
| |
| 100%
| gt2
| Kopftext: 'Archive'
| default (weak)
| |
| 100%
| detectItEasy
| Archive: ArcFS
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 41 72 63 68 69 76 65 00 | 68 01 00 00 c8 01 00 00 |Archive.|h.......|
|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 42 61 73 43 6f 6e | 76 00 00 00 ff ff ff ff |.!BasCon|v.......|
|00000070| 45 fd ff ff e1 58 31 a8 | 00 00 00 00 ff ff ff ff |E....X1.|........|
|00000080| 44 01 00 80 82 21 48 65 | 6c 70 00 00 38 39 3a 3b |D....!He|lp..89:;|
|00000090| 78 02 00 00 44 ff ff ff | eb 3c 33 ab 03 00 54 d5 |x...D...|.<3...T.|
|000000a0| 78 02 00 00 24 00 00 00 | 82 21 52 75 6e 00 04 00 |x...$...|.!Run...|
|000000b0| 38 39 3a 3b 54 01 00 00 | 44 eb ff ff 4c 10 33 ab |89:;T...|D...L.3.|
|000000c0| 03 00 6d 03 54 01 00 00 | c0 02 00 00 82 21 52 75 |..m.T...|.....!Ru|
|000000d0| 6e 49 6d 61 67 65 00 3b | d4 40 00 00 45 fb ff ff |nImage.;|.@..E...|
|000000e0| dc 66 a0 1e 03 00 5e f3 | d4 40 00 00 38 04 00 00 |.f....^.|.@..8...|
|000000f0| 82 21 53 70 72 69 74 65 | 73 00 3a 3b 2c 07 00 00 |.!Sprite|s.:;,...|
|00000100| 44 f9 ff ff a4 cd da aa | 03 00 36 2f 2c 07 00 00 |D.......|..6/,...|
|00000110| 30 45 00 00 82 47 65 74 | 54 6f 6b 65 6e 73 00 3b |0E...Get|Tokens.;|
|00000120| 39 01 00 00 44 fb ff ff | e2 6b b6 75 03 00 f1 7c |9...D...|.k.u...||
|00000130| 39 01 00 00 80 4c 00 00 | 82 4d 65 6e 75 4c 69 62 |9....L..|.MenuLib|
|00000140| 00 39 3a 3b 33 08 00 00 | 44 fb ff ff 11 c0 ba 99 |.9:;3...|D.......|
|00000150| 03 00 6a d1 33 08 00 00 | dd 4d 00 00 82 54 65 6d |..j.3...|.M...Tem|
|00000160| 70 6c 61 74 65 73 00 3b | cb 02 00 00 44 ec ff ff |plates.;|....D...|
|00000170| 71 59 db aa 03 00 0d d8 | cb 02 00 00 34 56 00 00 |qY......|....4V..|
|00000180| 00 6e 76 00 c3 00 04 00 | 38 39 3a 3b 3c 3d 3e 3f |.nv.....|89:;<=>?|
|00000190| 40 41 42 43 44 45 46 47 | 48 49 4a 4b 4c 4d 4e 4f |@ABCDEFG|HIJKLMNO|
|000001a0| 88 4f 52 53 00 00 00 00 | 00 00 00 00 00 00 00 00 |.ORS....|........|
|000001b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001c0| 00 00 00 00 8c 01 00 00 | 46 69 6c 65 44 61 74 61 |........|FileData|
|000001d0| 82 21 48 65 6c 70 00 00 | 38 39 3a 3b 78 02 00 00 |.!Help..|89:;x...|
|000001e0| 44 ff ff ff eb 3c 33 ab | 03 00 54 d5 42 61 73 69 |D....<3.|..T.Basi|
|000001f0| 63 20 43 6f 6e 76 65 72 | 74 65 72 20 56 31 2e 30 |c Conver|ter V1.0|
|00000200| 37 2c 20 43 6f 70 79 72 | 69 67 68 74 20 31 39 39 |7, Copyr|ight 199|
|00000210| 33 20 4a 2e 47 2e 48 61 | 72 73 74 6f 6e 0a 0a 50 |3 J.G.Ha|rston..P|
|00000220| 72 6f 67 72 61 6d 20 6c | 6f 6f 73 65 6c 79 20 62 |rogram l|oosely b|
|00000230| 61 73 65 64 20 6f 6e 20 | 21 47 6f 74 6f 44 69 72 |ased on |!GotoDir|
|00000240| 2c 20 41 63 6f 72 6e 20 | 55 73 65 72 20 46 65 62 |, Acorn |User Feb|
|00000250| 20 31 39 39 33 2e 0a 0a | 42 61 73 69 63 20 66 69 | 1993...|Basic fi|
|00000260| 6c 65 73 20 63 61 6e 20 | 62 65 20 63 6f 6e 76 65 |les can |be conve|
|00000270| 72 74 65 64 20 62 65 74 | 77 65 65 6e 20 41 72 63 |rted bet|ween Arc|
|00000280| 2f 42 42 43 20 74 6f 6b | 65 6e 69 73 65 64 0a 66 |/BBC tok|enised.f|
|00000290| 6f 72 6d 61 74 2c 20 74 | 65 78 74 20 66 6f 72 6d |ormat, t|ext form|
|000002a0| 61 74 20 61 6e 64 20 5a | 38 30 2f 50 43 20 72 65 |at and Z|80/PC re|
|000002b0| 76 65 72 73 65 64 20 74 | 6f 6b 65 6e 69 73 65 64 |versed t|okenised|
|000002c0| 20 66 6f 72 6d 61 74 2e | 20 0a 54 6f 20 64 6f 20 | format.| .To do |
|000002d0| 73 6f 2c 20 6a 75 73 74 | 20 64 72 61 67 20 61 20 |so, just| drag a |
|000002e0| 42 61 73 69 63 20 66 69 | 6c 65 20 6f 72 20 54 65 |Basic fi|le or Te|
|000002f0| 78 74 20 66 69 6c 65 20 | 6f 6e 74 6f 20 74 68 65 |xt file |onto the|
|00000300| 0a 42 61 73 69 63 20 43 | 6f 6e 76 65 72 74 65 72 |.Basic C|onverter|
|00000310| 20 69 63 6f 6e 2e 20 20 | 41 20 6d 65 6e 75 20 77 | icon. |A menu w|
|00000320| 69 6c 6c 20 70 6f 70 20 | 75 70 20 67 69 76 69 6e |ill pop |up givin|
|00000330| 67 20 79 6f 75 20 61 0a | 63 68 6f 69 63 65 20 6f |g you a.|choice o|
|00000340| 66 20 77 68 61 74 20 74 | 6f 20 63 6f 6e 76 65 72 |f what t|o conver|
|00000350| 74 20 74 6f 2e 20 20 45 | 6e 74 65 72 20 74 68 65 |t to. E|nter the|
|00000360| 20 6e 61 6d 65 2c 20 6f | 72 20 64 72 61 67 0a 74 | name, o|r drag.t|
|00000370| 68 65 20 69 63 6f 6e 2e | 20 20 49 66 20 74 68 65 |he icon.| If the|
|00000380| 20 53 48 49 46 54 20 6b | 65 79 20 69 73 20 68 65 | SHIFT k|ey is he|
|00000390| 6c 64 20 64 6f 77 6e 20 | 77 68 65 6e 20 79 6f 75 |ld down |when you|
|000003a0| 20 63 6f 6e 76 65 72 74 | 0a 74 6f 20 61 20 74 65 | convert|.to a te|
|000003b0| 78 74 20 66 69 6c 65 2c | 20 74 68 65 20 66 69 6c |xt file,| the fil|
|000003c0| 65 20 77 69 6c 6c 20 62 | 65 20 74 79 70 65 2d 73 |e will b|e type-s|
|000003d0| 65 74 20 74 6f 20 54 65 | 78 74 20 69 66 20 69 74 |et to Te|xt if it|
|000003e0| 0a 69 73 20 63 6f 6e 76 | 65 72 74 65 64 20 74 6f |.is conv|erted to|
|000003f0| 20 74 65 78 74 2e 0a 0a | 49 66 20 79 6f 75 20 64 | text...|If you d|
|00000400| 72 6f 70 20 61 20 64 69 | 72 65 63 74 6f 72 79 20 |rop a di|rectory |
|00000410| 6f 6e 20 6f 72 20 73 65 | 6c 65 63 74 20 27 44 6f |on or se|lect 'Do|
|00000420| 20 2a 44 69 72 27 2c 20 | 21 42 61 73 43 6f 6e 76 | *Dir', |!BasConv|
|00000430| 0a 77 69 6c 6c 20 64 6f | 20 61 20 2a 44 69 72 20 |.will do| a *Dir |
|00000440| 74 6f 20 74 68 65 20 64 | 69 72 65 63 74 6f 72 79 |to the d|irectory|
|00000450| 2c 20 61 73 20 77 69 74 | 68 20 21 47 6f 74 6f 44 |, as wit|h !GotoD|
|00000460| 69 72 2e 0a 46 69 6c 65 | 44 61 74 61 82 21 52 75 |ir..File|Data.!Ru|
|00000470| 6e 00 04 00 38 39 3a 3b | 54 01 00 00 44 eb ff ff |n...89:;|T...D...|
|00000480| 4c 10 33 ab 03 00 6d 03 | 7c 20 3e 20 21 52 75 6e |L.3...m.|| > !Run|
|00000490| 20 66 6f 72 20 42 61 73 | 69 63 20 43 6f 6e 76 65 | for Bas|ic Conve|
|000004a0| 72 74 6f 72 20 31 2e 30 | 37 0a 7c 0a 7c 20 28 43 |rtor 1.0|7.|.| (C|
|000004b0| 29 31 39 39 33 20 4a 2e | 47 2e 48 61 72 73 74 6f |)1993 J.|G.Harsto|
|000004c0| 6e 2c 20 31 37 2d 4a 75 | 6e 2d 31 39 39 33 0a 7c |n, 17-Ju|n-1993.||
|000004d0| 0a 49 63 6f 6e 53 70 72 | 69 74 65 73 20 3c 4f 62 |.IconSpr|ites <Ob|
|000004e0| 65 79 24 44 69 72 3e 2e | 21 53 70 72 69 74 65 73 |ey$Dir>.|!Sprites|
|000004f0| 0a 53 65 74 20 52 49 53 | 43 4f 53 20 33 0a 52 4d |.Set RIS|COS 3.RM|
|00000500| 45 6e 73 75 72 65 20 55 | 74 69 6c 69 74 79 4d 6f |Ensure U|tilityMo|
|00000510| 64 75 6c 65 20 33 2e 30 | 30 20 53 65 74 20 52 49 |dule 3.0|0 Set RI|
|00000520| 53 43 4f 53 20 32 0a 7c | 49 66 20 22 3c 52 49 53 |SCOS 2.||If "<RIS|
|00000530| 43 4f 53 3e 22 20 3d 20 | 22 33 22 20 54 68 65 6e |COS>" = |"3" Then|
|00000540| 20 45 72 72 6f 72 20 30 | 20 21 42 61 73 43 6f 6e | Error 0| !BasCon|
|00000550| 76 20 6e 6f 74 20 6e 65 | 65 64 65 64 20 77 69 74 |v not ne|eded wit|
|00000560| 68 20 52 49 53 43 20 4f | 53 20 33 20 2d 20 21 45 |h RISC O|S 3 - !E|
|00000570| 64 69 74 20 63 6f 6e 76 | 65 72 74 73 20 42 41 53 |dit conv|erts BAS|
|00000580| 49 43 20 69 74 73 65 6c | 66 0a 53 65 74 20 42 61 |IC itsel|f.Set Ba|
|00000590| 73 43 6f 6e 76 24 44 69 | 72 20 3c 4f 62 65 79 24 |sConv$Di|r <Obey$|
|000005a0| 44 69 72 3e 0a 57 69 6d | 70 73 6c 6f 74 20 2d 6d |Dir>.Wim|pslot -m|
|000005b0| 69 6e 20 36 34 4b 20 2d | 6d 61 78 20 36 34 4b 0a |in 64K -|max 64K.|
|000005c0| 52 75 6e 20 3c 42 61 73 | 43 6f 6e 76 24 44 69 72 |Run <Bas|Conv$Dir|
|000005d0| 3e 2e 21 52 75 6e 49 6d | 61 67 65 0a 46 69 6c 65 |>.!RunIm|age.File|
|000005e0| 44 61 74 61 82 21 52 75 | 6e 49 6d 61 67 65 00 3b |Data.!Ru|nImage.;|
|000005f0| d4 40 00 00 45 fb ff ff | dc 66 a0 1e 03 00 5e f3 |.@..E...|.f....^.|
|00000600| 0d 00 0a 10 f4 20 3e 21 | 52 75 6e 49 6d 61 67 65 |..... >!|RunImage|
|00000610| 0d 00 14 2a f4 20 42 61 | 73 69 63 20 43 6f 6e 76 |...*. Ba|sic Conv|
|00000620| 65 72 74 65 72 2c 20 28 | 43 29 31 39 39 33 20 4a |erter, (|C)1993 J|
|00000630| 2e 47 2e 48 61 72 73 74 | 6f 6e 0d 00 1e 05 3a 0d |.G.Harst|on....:.|
|00000640| 00 28 1b ee 20 85 20 ef | 34 3a f6 3a f1 22 20 61 |.(.. . .|4:.:." a|
|00000650| 74 20 22 2b c3 28 9e 29 | 3a e0 0d 00 32 1b c8 9b |t "+.(.)|:...2...|
|00000660| 20 22 3c 4f 62 65 79 24 | 44 69 72 3e 2e 4d 65 6e | "<Obey$|Dir>.Men|
|00000670| 75 4c 69 62 22 0d 00 3c | 05 3a 0d 00 46 3d de 20 |uLib"..<|.:..F=. |
|00000680| 6d 65 6e 75 66 72 65 65 | 25 20 26 35 30 30 3a 6d |menufree|% &500:m|
|00000690| 65 6e 75 65 6e 64 25 3d | 6d 65 6e 75 66 72 65 65 |enuend%=|menufree|
|000006a0| 25 2b 26 35 30 30 20 20 | 20 20 3a f4 20 6d 65 6e |%+&500 | :. men|
|000006b0| 75 20 73 74 75 66 66 0d | 00 50 46 de 20 62 6c 6f |u stuff.|.PF. blo|
|000006c0| 63 6b 25 20 26 31 30 30 | 30 20 20 20 20 20 20 20 |ck% &100|0 |
|000006d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000006e0| 20 20 20 20 20 20 20 3a | f4 20 6d 61 69 6e 20 53 | :|. main S|
|000006f0| 59 53 20 63 61 6c 6c 20 | 62 6c 6f 63 6b 0d 00 5a |YS call |block..Z|
|00000700| 44 de 20 62 6c 6f 63 6b | 32 25 20 38 30 20 20 20 |D. block|2% 80 |
|00000710| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000720| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 3a f4 20 | | :. |
|00000730| 67 65 6e 65 72 61 6c 20 | 75 73 65 20 62 6c 6f 63 |general |use bloc|
|00000740| 6b 0d 00 64 41 60 77 62 | 63 6f 6c 3d 26 30 3a 60 |k..dA`wb|col=&0:`|
|00000750| 77 66 63 6f 6c 3d 26 37 | 3a 60 74 66 63 6f 6c 3d |wfcol=&7|:`tfcol=|
|00000760| 26 37 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |&7 | |
|00000770| 20 20 20 3a f4 20 6d 65 | 6e 75 20 63 6f 6c 6f 75 | :. me|nu colou|
|00000780| 72 73 0d 00 6e 12 74 65 | 6d 70 73 69 7a 65 25 3d |rs..n.te|mpsize%=|
|00000790| 32 30 30 30 0d 00 78 50 | de 20 74 65 6d 70 25 20 |2000..xP|. temp% |
|000007a0| 74 65 6d 70 73 69 7a 65 | 25 3a 65 6e 64 6f 66 74 |tempsize|%:endoft|
|000007b0| 65 6d 70 25 3d 74 65 6d | 70 25 2b 74 65 6d 70 73 |emp%=tem|p%+temps|
|000007c0| 69 7a 65 25 3a f4 20 66 | 6f 72 20 69 6e 64 69 72 |ize%:. f|or indir|
|000007d0| 65 63 74 65 64 20 74 65 | 6d 70 6c 61 74 65 20 69 |ected te|mplate i|
|000007e0| 63 6f 6e 73 0d 00 82 4a | f4 20 44 49 4d 20 49 63 |cons...J|. DIM Ic|
|000007f0| 6f 6e 49 6e 64 69 72 65 | 63 74 69 6f 6e 42 6c 6f |onIndire|ctionBlo|
|00000800| 63 6b 25 20 32 30 30 30 | 20 20 20 20 20 20 20 20 |ck% 2000| |
|00000810| 20 20 20 20 3a 52 45 4d | 20 69 6e 64 69 72 65 63 | :REM| indirec|
|00000820| 74 65 64 20 69 63 6f 6e | 20 62 6c 6f 63 6b 0d 00 |ted icon| block..|
|00000830| 8c 0b 64 65 62 75 67 3d | a3 0d 00 96 05 3a 0d 00 |..debug=|.....:..|
|00000840| a0 2e ee 20 85 20 c8 99 | 20 22 57 69 6d 70 5f 43 |... . ..| "Wimp_C|
|00000850| 6c 6f 73 65 44 6f 77 6e | 22 3a f6 3a f1 22 20 61 |loseDown|":.:." a|
|00000860| 74 20 6c 69 6e 65 20 22 | 3b 9e 3a e0 0d 00 aa 3b |t line "|;.:....;|
|00000870| 70 72 6f 67 6e 61 6d 65 | 24 3d 22 42 61 73 69 63 |progname|$="Basic|
|00000880| 20 43 6f 6e 76 65 72 74 | 65 72 22 3a de 20 74 61 | Convert|er":. ta|
|00000890| 73 6b 69 64 25 20 34 3a | 24 74 61 73 6b 69 64 25 |skid% 4:|$taskid%|
|000008a0| 3d 22 54 41 53 4b 22 0d | 00 b4 3a c8 99 20 22 57 |="TASK".|..:.. "W|
|000008b0| 69 6d 70 5f 49 6e 69 74 | 69 61 6c 69 73 65 22 2c |imp_Init|ialise",|
|000008c0| 32 30 30 2c 21 74 61 73 | 6b 69 64 25 2c 70 72 6f |200,!tas|kid%,pro|
|000008d0| 67 6e 61 6d 65 24 20 b8 | 20 76 65 72 73 69 6f 6e |gname$ .| version|
|000008e0| 25 0d 00 be 4a de 20 71 | 25 20 26 37 30 30 2c 62 |%...J. q|% &700,b|
|000008f0| 75 66 66 65 72 25 20 26 | 33 30 30 2c 65 6e 64 62 |uffer% &|300,endb|
|00000900| 75 66 25 20 2d 31 2c 69 | 63 6f 6e 69 6e 66 25 20 |uf% -1,i|coninf% |
|00000910| 34 30 2c 20 6f 70 74 62 | 75 66 66 25 20 31 30 30 |40, optb|uff% 100|
|00000920| 2c 20 68 65 61 70 25 20 | 32 30 30 0d 00 c8 35 c8 |, heap% |200...5.|
|00000930| 99 20 22 58 4f 53 5f 46 | 69 6c 65 22 2c 35 2c 22 |. "XOS_F|ile",5,"|
|00000940| 3c 42 61 73 43 6f 6e 76 | 24 44 69 72 3e 2e 21 53 |<BasConv|$Dir>.!S|
|00000950| 70 72 69 74 65 73 22 20 | b8 20 2c 2c 2c 2c 74 25 |prites" |. ,,,,t%|
|00000960| 0d 00 d2 22 de 20 73 70 | 72 69 74 65 73 25 20 74 |...". sp|rites% t|
|00000970| 25 2b 34 3a 21 73 70 72 | 69 74 65 73 25 3d 74 25 |%+4:!spr|ites%=t%|
|00000980| 2b 34 0d 00 dc 38 c8 99 | 20 22 4f 53 5f 46 69 6c |+4...8..| "OS_Fil|
|00000990| 65 22 2c 32 35 35 2c 22 | 3c 42 61 73 43 6f 6e 76 |e",255,"|<BasConv|
|000009a0| 24 44 69 72 3e 2e 21 53 | 70 72 69 74 65 73 22 2c |$Dir>.!S|prites",|
|000009b0| 73 70 72 69 74 65 73 25 | 2b 34 0d 00 e6 1f 69 63 |sprites%|+4....ic|
|000009c0| 62 61 72 25 3d a4 69 63 | 6f 6e 62 61 72 28 22 21 |bar%=.ic|onbar("!|
|000009d0| 62 61 73 63 6f 6e 76 22 | 29 0d 00 f0 27 f2 67 65 |basconv"|)...'.ge|
|000009e0| 74 70 6f 69 6e 74 65 72 | 3a 78 6f 25 3d 6d 6f 75 |tpointer|:xo%=mou|
|000009f0| 73 65 78 25 3a 79 6f 25 | 3d 6d 6f 75 73 65 79 25 |sex%:yo%|=mousey%|
|00000a00| 0d 00 fa 23 f2 69 6e 69 | 74 54 65 6d 70 6c 61 74 |...#.ini|tTemplat|
|00000a10| 65 73 3a f4 20 53 65 74 | 20 75 70 20 77 69 6e 64 |es:. Set| up wind|
|00000a20| 6f 77 73 0d 01 04 1d f2 | 69 6e 69 74 4d 65 6e 75 |ows.....|initMenu|
|00000a30| 73 3a f4 20 53 65 74 20 | 75 70 20 6d 65 6e 75 73 |s:. Set |up menus|
|00000a40| 0d 01 0e 1c 6f 70 65 6e | 25 3d a3 3a 64 65 73 74 |....open|%=.:dest|
|00000a50| 66 69 6c 65 6e 61 6d 65 | 24 3d 22 22 0d 01 18 20 |filename|$=""... |
|00000a60| ee 20 85 20 f2 65 72 72 | 6f 72 28 9f 2c f6 24 2b |. . .err|or(.,.$+|
|00000a70| 22 20 28 22 2b c3 9e 2b | 22 29 22 29 0d 01 22 25 |" ("+..+|")").."%|
|00000a80| c8 99 20 22 57 69 6d 70 | 5f 44 72 61 67 42 6f 78 |.. "Wimp|_DragBox|
|00000a90| 22 2c 2c 2d 31 3a 57 69 | 6d 70 4d 61 73 6b 25 3d |",,-1:Wi|mpMask%=|
|00000aa0| 31 0d 01 2c 05 f5 0d 01 | 36 31 20 20 c8 99 20 22 |1..,....|61 .. "|
|00000ab0| 57 69 6d 70 5f 50 6f 6c | 6c 22 2c 57 69 6d 70 4d |Wimp_Pol|l",WimpM|
|00000ac0| 61 73 6b 25 2c 71 25 2c | 91 2b 31 30 30 20 b8 20 |ask%,q%,|.+100 . |
|00000ad0| 72 65 61 73 6f 6e 25 0d | 01 40 25 e7 64 65 62 75 |reason%.|.@%.debu|
|00000ae0| 67 20 ef 34 2c 33 30 3a | f1 22 72 65 61 73 6f 6e |g .4,30:|."reason|
|00000af0| 25 3d 20 22 3b 72 65 61 | 73 6f 6e 25 0d 01 4a 12 |%= ";rea|son%..J.|
|00000b00| 20 20 c8 8e 20 72 65 61 | 73 6f 6e 25 20 ca 0d 01 | .. rea|son% ...|
|00000b10| 54 1e 20 20 20 20 c9 20 | 31 3a f2 52 65 64 72 61 |T. . |1:.Redra|
|00000b20| 77 57 69 6e 64 6f 77 28 | 21 71 25 29 0d 01 5e 44 |wWindow(|!q%)..^D|
|00000b30| 20 20 20 20 c9 20 32 3a | f2 4d 6f 76 65 57 69 6e | . 2:|.MoveWin|
|00000b40| 64 6f 77 28 21 71 25 2c | 71 25 21 34 2c 71 25 21 |dow(!q%,|q%!4,q%!|
|00000b50| 38 2c 71 25 21 31 32 2c | 71 25 21 31 36 2c 71 25 |8,q%!12,|q%!16,q%|
|00000b60| 21 32 30 2c 71 25 21 32 | 34 2c 71 25 21 32 38 29 |!20,q%!2|4,q%!28)|
|00000b70| 0d 01 68 1d 20 20 20 20 | c9 20 33 3a f2 43 6c 6f |..h. |. 3:.Clo|
|00000b80| 73 65 57 69 6e 64 6f 77 | 28 21 71 25 29 0d 01 72 |seWindow|(!q%)..r|
|00000b90| 38 20 20 20 20 c9 20 36 | 3a f2 63 68 65 63 6b 6d |8 . 6|:.checkm|
|00000ba0| 6f 75 73 65 28 21 71 25 | 2c 71 25 21 34 2c 71 25 |ouse(!q%|,q%!4,q%|
|00000bb0| 21 38 2c 71 25 21 31 32 | 2c 71 25 21 31 36 2c 71 |!8,q%!12|,q%!16,q|
|00000bc0| 25 21 32 30 29 0d 01 7c | 18 20 20 20 20 c9 20 37 |%!20)..||. . 7|
|00000bd0| 3a f2 64 72 61 67 62 6f | 78 28 71 25 29 0d 01 86 |:.dragbo|x(q%)...|
|00000be0| 20 20 20 20 20 c9 20 38 | 3a f2 6b 65 79 28 21 71 | . 8|:.key(!q|
|00000bf0| 25 2c 71 25 21 34 2c 71 | 25 21 32 34 29 0d 01 90 |%,q%!4,q|%!24)...|
|00000c00| 27 20 20 20 20 c9 20 39 | 3a f2 6d 65 6e 75 73 65 |' . 9|:.menuse|
|00000c10| 6c 65 63 74 28 6d 65 6e | 75 68 61 6e 64 6c 65 25 |lect(men|uhandle%|
|00000c20| 2c 71 25 29 0d 01 9a 1c | 20 20 20 20 c9 20 31 37 |,q%)....| . 17|
|00000c30| 2c 31 38 3a f2 72 65 63 | 65 69 76 65 28 71 25 29 |,18:.rec|eive(q%)|
|00000c40| 0d 01 a4 07 20 20 cb 0d | 01 ae 07 fd 20 a3 0d 01 |.... ..|.... ...|
|00000c50| b8 05 e0 0d 01 c2 05 3a | 0d 01 cc 12 dd f2 65 72 |.......:|......er|
|00000c60| 72 6f 72 28 41 25 2c 41 | 24 29 0d 01 d6 1a 21 71 |ror(A%,A|$)....!q|
|00000c70| 25 3d 41 25 3a 24 28 71 | 25 2b 34 29 3d 41 24 2b |%=A%:$(q|%+4)=A$+|
|00000c80| bd 28 30 29 0d 01 e0 38 | c8 99 20 22 57 69 6d 70 |.(0)...8|.. "Wimp|
|00000c90| 5f 52 65 70 6f 72 74 45 | 72 72 6f 72 22 2c 71 25 |_ReportE|rror",q%|
|00000ca0| 2c 25 30 30 30 30 30 31 | 2c 70 72 6f 67 6e 61 6d |,%000001|,prognam|
|00000cb0| 65 24 20 b8 20 72 65 73 | 75 6c 74 25 0d 01 ea 10 |e$ . res|ult%....|
|00000cc0| f4 20 20 20 50 52 4f 43 | 71 75 69 74 0d 01 f4 05 |. PROC|quit....|
|00000cd0| e1 0d 01 fe 05 3a 0d 02 | 08 2f f4 20 2d 2d 2d 2d |.....:..|./. ----|
|00000ce0| 2d 2d 2d 2d 2d 2d 2d 20 | 53 65 74 20 75 70 20 74 |------- |Set up t|
|00000cf0| 65 6d 70 6c 61 74 65 73 | 20 2d 2d 2d 2d 2d 2d 2d |emplates| -------|
|00000d00| 2d 2d 2d 2d 2d 0d 02 12 | 13 dd f2 69 6e 69 74 54 |-----...|...initT|
|00000d10| 65 6d 70 6c 61 74 65 73 | 0d 02 1c 35 c8 99 20 22 |emplates|...5.. "|
|00000d20| 57 69 6d 70 5f 4f 70 65 | 6e 54 65 6d 70 6c 61 74 |Wimp_Ope|nTemplat|
|00000d30| 65 22 2c 2c 22 3c 42 61 | 73 43 6f 6e 76 24 44 69 |e",,"<Ba|sConv$Di|
|00000d40| 72 3e 2e 54 65 6d 70 6c | 61 74 65 73 22 0d 02 26 |r>.Templ|ates"..&|
|00000d50| 24 77 5f 69 6e 66 6f 25 | 3d 20 20 20 a4 54 65 6d |$w_info%|= .Tem|
|00000d60| 70 6c 61 74 65 28 22 50 | 72 6f 67 49 6e 66 6f 22 |plate("P|rogInfo"|
|00000d70| 29 0d 02 30 21 77 5f 73 | 61 76 65 61 73 25 3d a4 |)..0!w_s|aveas%=.|
|00000d80| 54 65 6d 70 6c 61 74 65 | 28 22 73 61 76 65 61 73 |Template|("saveas|
|00000d90| 22 29 0d 02 3a 05 3a 0d | 02 44 1b c8 99 20 22 57 |")..:.:.|.D... "W|
|00000da0| 69 6d 70 5f 43 6c 6f 73 | 65 54 65 6d 70 6c 61 74 |imp_Clos|eTemplat|
|00000db0| 65 22 0d 02 4e 05 e1 0d | 02 58 05 3a 0d 02 62 4a |e"..N...|.X.:..bJ|
|00000dc0| f4 20 74 65 6d 70 25 2c | 65 6e 64 6f 66 74 65 6d |. temp%,|endoftem|
|00000dd0| 70 25 20 4d 55 53 54 20 | 62 65 20 47 6c 6f 62 61 |p% MUST |be Globa|
|00000de0| 6c 2e 20 74 65 6d 70 25 | 20 69 73 20 69 6e 63 72 |l. temp%| is incr|
|00000df0| 65 6d 65 6e 74 65 64 20 | 62 79 20 46 4e 54 65 6d |emented |by FNTem|
|00000e00| 70 6c 61 74 65 2e 0d 02 | 6c 05 3a 0d 02 76 12 dd |plate...|l.:..v..|
|00000e10| a4 54 65 6d 70 6c 61 74 | 65 28 41 24 29 0d 02 80 |.Templat|e(A$)...|
|00000e20| 08 ea 20 41 25 0d 02 8a | 46 c8 99 20 22 57 69 6d |.. A%...|F.. "Wim|
|00000e30| 70 5f 4c 6f 61 64 54 65 | 6d 70 6c 61 74 65 22 2c |p_LoadTe|mplate",|
|00000e40| 2c 62 6c 6f 63 6b 25 2c | 74 65 6d 70 25 2c 65 6e |,block%,|temp%,en|
|00000e50| 64 6f 66 74 65 6d 70 25 | 2c 2d 31 2c 41 24 2c 30 |doftemp%|,-1,A$,0|
|00000e60| 20 20 b8 20 2c 2c 74 65 | 6d 70 25 0d 02 94 27 c8 | . ,,te|mp%...'.|
|00000e70| 99 20 22 57 69 6d 70 5f | 43 72 65 61 74 65 57 69 |. "Wimp_|CreateWi|
|00000e80| 6e 64 6f 77 22 2c 2c 62 | 6c 6f 63 6b 25 20 b8 20 |ndow",,b|lock% . |
|00000e90| 41 25 0d 02 9e 07 3d 41 | 25 0d 02 a8 05 3a 0d 02 |A%....=A|%....:..|
|00000ea0| b2 2f f4 20 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 20 |./. ----|------- |
|00000eb0| 53 65 74 20 75 70 20 6d | 65 6e 75 73 20 2d 2d 2d |Set up m|enus ---|
|00000ec0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 02 bc |--------|-----...|
|00000ed0| 0f dd f2 69 6e 69 74 4d | 65 6e 75 73 0d 02 c6 34 |...initM|enus...4|
|00000ee0| 6d 5f 69 63 6f 6e 62 61 | 72 25 3d a4 63 72 6d 65 |m_iconba|r%=.crme|
|00000ef0| 6e 75 28 22 23 42 61 73 | 43 6f 6e 76 2c 49 6e 66 |nu("#Bas|Conv,Inf|
|00000f00| 6f 3e 77 5f 69 6e 66 6f | 25 2c 51 75 69 74 22 29 |o>w_info|%,Quit")|
|00000f10| 0d 02 d0 62 6d 5f 73 61 | 76 65 61 73 25 3d 20 a4 |...bm_sa|veas%= .|
|00000f20| 63 72 6d 65 6e 75 28 22 | 23 43 6f 6e 76 65 72 74 |crmenu("|#Convert|
|00000f30| 20 74 6f 2c 21 42 41 53 | 49 43 3e 77 5f 73 61 76 | to,!BAS|IC>w_sav|
|00000f40| 65 61 73 25 2c 21 54 65 | 78 74 3e 77 5f 73 61 76 |eas%,!Te|xt>w_sav|
|00000f50| 65 61 73 25 2c 21 52 65 | 76 65 72 73 65 64 3e 77 |eas%,!Re|versed>w|
|00000f60| 5f 73 61 76 65 61 73 25 | 2c 44 6f 20 2a 44 49 52 |_saveas%|,Do *DIR|
|00000f70| 22 29 0d 02 da 05 3a 0d | 02 e4 05 e1 0d 02 ee 05 |")....:.|........|
|00000f80| 3a 0d 02 f8 31 dd a4 70 | 61 72 28 73 65 70 24 29 |:...1..p|ar(sep$)|
|00000f90| 3a 69 31 25 3d 69 25 2b | 31 3a 69 25 3d a7 6d 65 |:i1%=i%+|1:i%=.me|
|00000fa0| 6e 75 24 2b 73 65 70 24 | 2c 73 65 70 24 2c 69 31 |nu$+sep$|,sep$,i1|
|00000fb0| 25 29 0d 03 02 17 3d c1 | 6d 65 6e 75 24 2c 69 31 |%)....=.|menu$,i1|
|00000fc0| 25 2c 69 25 2d 69 31 25 | 29 0d 03 0c 05 3a 0d 03 |%,i%-i1%|)....:..|
|00000fd0| 16 2f f4 20 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 20 |./. ----|------- |
|00000fe0| 4f 70 65 6e 2f 43 6c 6f | 73 65 20 77 69 6e 64 6f |Open/Clo|se windo|
|00000ff0| 77 73 20 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 03 20 |ws -----|-----.. |
|00001000| 42 dd a4 4f 70 65 6e 28 | 77 68 61 6e 64 6c 65 25 |B..Open(|whandle%|
|00001010| 29 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |) | |
|00001020| 20 20 20 20 20 20 3a f4 | 20 54 52 55 45 20 69 66 | :.| TRUE if|
|00001030| 20 77 69 6e 64 6f 77 20 | 69 73 20 6f 70 65 6e 0d | window |is open.|
|00001040| 03 2a 15 21 62 6c 6f 63 | 6b 32 25 3d 77 68 61 6e |.*.!bloc|k2%=whan|
|00001050| 64 6c 65 25 0d 03 34 25 | c8 99 20 22 57 69 6d 70 |dle%..4%|.. "Wimp|
|00001060| 5f 47 65 74 57 69 6e 64 | 6f 77 53 74 61 74 65 22 |_GetWind|owState"|
|00001070| 2c 2c 62 6c 6f 63 6b 32 | 25 0d 03 3e 18 3d 62 6c |,,block2|%..>.=bl|
|00001080| 6f 63 6b 32 25 21 33 32 | 20 80 20 25 31 3c 3c 31 |ock2%!32| . %1<<1|
|00001090| 36 0d 03 48 04 0d 03 52 | 44 dd a4 43 6c 6f 73 65 |6..H...R|D..Close|
|000010a0| 64 28 77 68 61 6e 64 6c | 65 25 29 20 20 20 20 20 |d(whandl|e%) |
|000010b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 3a f4 | | :.|
|000010c0| 20 54 52 55 45 20 69 66 | 20 77 69 6e 64 6f 77 20 | TRUE if| window |
|000010d0| 69 73 20 63 6c 6f 73 65 | 64 0d 03 5c 15 21 62 6c |is close|d..\.!bl|
|000010e0| 6f 63 6b 32 25 3d 77 68 | 61 6e 64 6c 65 25 0d 03 |ock2%=wh|andle%..|
|000010f0| 66 25 c8 99 20 22 57 69 | 6d 70 5f 47 65 74 57 69 |f%.. "Wi|mp_GetWi|
|00001100| 6e 64 6f 77 53 74 61 74 | 65 22 2c 2c 62 6c 6f 63 |ndowStat|e",,bloc|
|00001110| 6b 32 25 0d 03 70 1f 3d | 20 28 28 62 6c 6f 63 6b |k2%..p.=| ((block|
|00001120| 32 25 21 33 32 20 80 20 | 25 31 3c 3c 31 36 29 3d |2%!32 . |%1<<16)=|
|00001130| 30 29 0d 03 7a 04 0d 03 | 84 1c dd f2 52 65 64 72 |0)..z...|....Redr|
|00001140| 61 77 57 69 6e 64 6f 77 | 28 77 68 61 6e 64 6c 65 |awWindow|(whandle|
|00001150| 25 29 0d 03 8e 14 21 62 | 6c 6f 63 6b 25 3d 77 68 |%)....!b|lock%=wh|
|00001160| 61 6e 64 6c 65 25 0d 03 | 98 2a c8 99 20 22 57 69 |andle%..|.*.. "Wi|
|00001170| 6d 70 5f 52 65 64 72 61 | 77 57 69 6e 64 6f 77 22 |mp_Redra|wWindow"|
|00001180| 2c 2c 62 6c 6f 63 6b 25 | 20 b8 20 6d 6f 72 65 25 |,,block%| . more%|
|00001190| 0d 03 a2 11 f2 69 6e 66 | 6f 28 62 6c 6f 63 6b 25 |.....inf|o(block%|
|000011a0| 29 0d 03 ac 15 f4 20 50 | 52 4f 43 64 6f 73 6f 6d |)..... P|ROCdosom|
|000011b0| 65 74 68 69 6e 67 0d 03 | b6 05 e1 0d 03 c0 04 0d |ething..|........|
|000011c0| 03 ca 11 dd f2 46 6f 72 | 63 65 52 65 64 72 61 77 |.....For|ceRedraw|
|000011d0| 0d 03 d4 36 c8 99 20 22 | 57 69 6d 70 5f 46 6f 72 |...6.. "|Wimp_For|
|000011e0| 63 65 52 65 64 72 61 77 | 22 2c 2d 31 2c 2d 31 30 |ceRedraw|",-1,-10|
|000011f0| 30 30 30 2c 2d 31 30 30 | 30 30 2c 31 30 30 30 30 |000,-100|00,10000|
|00001200| 2c 31 30 30 30 30 0d 03 | de 05 e1 0d 03 e8 04 0d |,10000..|........|
|00001210| 03 f2 31 dd f2 69 6e 66 | 6f 28 71 25 29 20 20 20 |..1..inf|o(q%) |
|00001220| 3a f4 20 65 78 74 72 61 | 63 74 20 77 6f 72 6b 20 |:. extra|ct work |
|00001230| 61 72 65 61 20 69 6e 66 | 6f 72 6d 61 74 69 6f 6e |area inf|ormation|
|00001240| 0d 03 fc 3a f4 20 57 69 | 6d 70 5f 52 65 64 72 61 |...:. Wi|mp_Redra|
|00001250| 77 57 69 6e 64 6f 77 20 | 61 6e 64 20 57 69 6d 70 |wWindow |and Wimp|
|00001260| 5f 47 65 74 57 69 6e 64 | 6f 77 53 74 61 74 65 20 |_GetWind|owState |
|00001270| 69 6e 66 6f 20 62 6c 6f | 63 6b 0d 04 06 3b 78 30 |info blo|ck...;x0|
|00001280| 25 3d 71 25 21 34 20 20 | 20 20 20 20 20 20 20 20 |%=q%!4 | |
|00001290| 20 3a f4 20 76 69 73 61 | 62 6c 65 20 61 72 65 61 | :. visa|ble area|
|000012a0| 20 6d 69 6e 69 6d 75 6d | 20 78 20 63 6f 6f 72 64 | minimum| x coord|
|000012b0| 69 6e 61 74 65 0d 04 10 | 3b 79 30 25 3d 71 25 21 |inate...|;y0%=q%!|
|000012c0| 38 20 20 20 20 20 20 20 | 20 20 20 20 3a f4 20 76 |8 | :. v|
|000012d0| 69 73 61 62 6c 65 20 61 | 72 65 61 20 6d 69 6e 69 |isable a|rea mini|
|000012e0| 6d 75 6d 20 79 20 63 6f | 6f 72 64 69 6e 61 74 65 |mum y co|ordinate|
|000012f0| 0d 04 1a 3b 78 31 25 3d | 71 25 21 31 32 20 20 20 |...;x1%=|q%!12 |
|00001300| 20 20 20 20 20 20 20 3a | f4 20 76 69 73 61 62 6c | :|. visabl|
|00001310| 65 20 61 72 65 61 20 6d | 61 78 69 6d 75 6d 20 78 |e area m|aximum x|
|00001320| 20 63 6f 6f 72 64 69 6e | 61 74 65 0d 04 24 3b 79 | coordin|ate..$;y|
|00001330| 31 25 3d 71 25 21 31 36 | 20 20 20 20 20 20 20 20 |1%=q%!16| |
|00001340| 20 20 3a f4 20 76 69 73 | 61 62 6c 65 20 61 72 65 | :. vis|able are|
|00001350| 61 20 6d 61 78 69 6d 75 | 6d 20 79 20 63 6f 6f 72 |a maximu|m y coor|
|00001360| 64 69 6e 61 74 65 0d 04 | 2e 29 73 63 78 25 3d 71 |dinate..|.)scx%=q|
|00001370| 25 21 32 30 20 20 20 20 | 20 20 20 20 20 3a f4 20 |%!20 | :. |
|00001380| 73 63 72 6f 6c 6c 20 58 | 20 6f 66 66 73 65 74 0d |scroll X| offset.|
|00001390| 04 38 29 73 63 79 25 3d | 71 25 21 32 34 20 20 20 |.8)scy%=|q%!24 |
|000013a0| 20 20 20 20 20 20 3a f4 | 20 73 63 72 6f 6c 6c 20 | :.| scroll |
|000013b0| 59 20 6f 66 66 73 65 74 | 0d 04 42 49 58 25 3d 78 |Y offset|..BIX%=x|
|000013c0| 30 25 2d 73 63 78 25 20 | 20 20 20 20 20 20 20 3a |0%-scx% | :|
|000013d0| f4 20 20 20 58 25 2c 59 | 25 20 69 73 20 74 6f 70 |. X%,Y|% is top|
|000013e0| 20 6c 65 66 74 20 6f 66 | 20 77 69 6e 64 6f 77 20 | left of| window |
|000013f0| 21 21 21 21 20 28 6e 6f | 74 20 73 63 72 65 65 6e |!!!! (no|t screen|
|00001400| 29 0d 04 4c 3f 59 25 3d | 79 31 25 2d 73 63 79 25 |)..L?Y%=|y1%-scy%|
|00001410| 20 20 20 20 20 20 20 20 | 3a f4 20 20 20 61 6c 6c | |:. all|
|00001420| 20 67 72 61 70 68 69 63 | 73 20 61 72 65 20 62 61 | graphic|s are ba|
|00001430| 73 65 64 20 6f 6e 20 58 | 25 20 61 6e 64 20 59 25 |sed on X|% and Y%|
|00001440| 0d 04 56 05 e1 0d 04 60 | 04 0d 04 6a 1a dd f2 4f |..V....`|...j...O|
|00001450| 70 65 6e 57 69 6e 64 6f | 77 28 77 68 61 6e 64 6c |penWindo|w(whandl|
|00001460| 65 25 29 0d 04 74 15 62 | 6c 6f 63 6b 25 21 30 3d |e%)..t.b|lock%!0=|
|00001470| 77 68 61 6e 64 6c 65 25 | 0d 04 7e 24 c8 99 20 22 |whandle%|..~$.. "|
|00001480| 57 69 6d 70 5f 47 65 74 | 57 69 6e 64 6f 77 53 74 |Wimp_Get|WindowSt|
|00001490| 61 74 65 22 2c 2c 62 6c | 6f 63 6b 25 0d 04 88 2d |ate",,bl|ock%...-|
|000014a0| 62 6c 6f 63 6b 25 21 32 | 38 3d 2d 31 3a c8 99 20 |block%!2|8=-1:.. |
|000014b0| 22 57 69 6d 70 5f 4f 70 | 65 6e 57 69 6e 64 6f 77 |"Wimp_Op|enWindow|
|000014c0| 22 2c 2c 62 6c 6f 63 6b | 25 0d 04 92 05 e1 0d 04 |",,block|%.......|
|000014d0| 9c 04 0d 04 a6 1b dd f2 | 43 6c 6f 73 65 57 69 6e |........|CloseWin|
|000014e0| 64 6f 77 28 77 68 61 6e | 64 6c 65 25 29 0d 04 b0 |dow(whan|dle%)...|
|000014f0| 13 e7 20 77 68 61 6e 64 | 6c 65 25 3c 3e 30 20 8c |.. whand|le%<>0 .|
|00001500| 0d 04 ba 17 20 20 62 6c | 6f 63 6b 25 21 30 3d 77 |.... bl|ock%!0=w|
|00001510| 68 61 6e 64 6c 65 25 0d | 04 c4 24 20 20 c8 99 20 |handle%.|..$ .. |
|00001520| 22 57 69 6d 70 5f 43 6c | 6f 73 65 57 69 6e 64 6f |"Wimp_Cl|oseWindo|
|00001530| 77 22 2c 30 2c 62 6c 6f | 63 6b 25 0d 04 ce 05 cd |w",0,blo|ck%.....|
|00001540| 0d 04 d8 05 e1 0d 04 e2 | 05 3a 0d 04 ec 3c dd f2 |........|.:...<..|
|00001550| 4d 6f 76 65 57 69 6e 64 | 6f 77 28 68 61 6e 64 6c |MoveWind|ow(handl|
|00001560| 65 25 2c 78 30 25 2c 79 | 30 25 2c 78 31 25 2c 79 |e%,x0%,y|0%,x1%,y|
|00001570| 31 25 2c 73 63 78 25 2c | 73 63 79 25 2c 62 68 61 |1%,scx%,|scy%,bha|
|00001580| 6e 64 6c 65 25 29 0d 04 | f6 11 e7 68 61 6e 64 6c |ndle%)..|...handl|
|00001590| 65 25 3d 2d 31 8c e1 0d | 05 00 1f 71 25 21 30 3d |e%=-1...|...q%!0=|
|000015a0| 68 61 6e 64 6c 65 25 3a | 71 25 21 32 38 3d 62 68 |handle%:|q%!28=bh|
|000015b0| 61 6e 64 6c 65 25 0d 05 | 0a 29 71 25 21 34 3d 78 |andle%..|.)q%!4=x|
|000015c0| 30 25 3a 71 25 21 38 3d | 79 30 25 3a 71 25 21 31 |0%:q%!8=|y0%:q%!1|
|000015d0| 32 3d 78 31 25 3a 71 25 | 21 31 36 3d 79 31 25 0d |2=x1%:q%|!16=y1%.|
|000015e0| 05 14 19 71 25 21 32 30 | 3d 73 63 78 25 3a 71 25 |...q%!20|=scx%:q%|
|000015f0| 21 32 34 3d 73 63 79 25 | 0d 05 1e 1c c8 99 20 22 |!24=scy%|...... "|
|00001600| 57 69 6d 70 5f 4f 70 65 | 6e 57 69 6e 64 6f 77 22 |Wimp_Ope|nWindow"|
|00001610| 2c 2c 71 25 0d 05 28 05 | e1 0d 05 32 05 3a 0d 05 |,,q%..(.|...2.:..|
|00001620| 3c 1c dd f2 64 65 6c 65 | 74 65 77 69 6e 64 6f 77 |<...dele|tewindow|
|00001630| 28 77 68 61 6e 64 6c 65 | 25 29 0d 05 46 13 e7 20 |(whandle|%)..F.. |
|00001640| 77 68 61 6e 64 6c 65 25 | 3c 3e 30 20 8c 0d 05 50 |whandle%|<>0 ...P|
|00001650| 17 20 20 62 6c 6f 63 6b | 25 21 30 3d 77 68 61 6e |. block|%!0=whan|
|00001660| 64 6c 65 25 0d 05 5a 24 | 20 20 c8 99 20 22 57 69 |dle%..Z$| .. "Wi|
|00001670| 6d 70 5f 44 65 6c 65 74 | 65 57 69 6e 64 6f 77 22 |mp_Delet|eWindow"|
|00001680| 2c 2c 62 6c 6f 63 6b 25 | 0d 05 64 05 cd 0d 05 6e |,,block%|..d....n|
|00001690| 05 e1 0d 05 78 04 0d 05 | 82 2f f4 20 2d 2d 2d 2d |....x...|./. ----|
|000016a0| 2d 2d 2d 2d 2d 2d 2d 20 | 50 6f 70 20 75 70 20 61 |------- |Pop up a|
|000016b0| 20 6d 65 6e 75 20 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d | menu --|--------|
|000016c0| 2d 2d 2d 2d 2d 0d 05 8c | 14 dd f2 6d 65 6e 75 28 |-----...|...menu(|
|000016d0| 6d 25 2c 68 25 2c 77 25 | 29 0d 05 96 30 ea 20 59 |m%,h%,w%|)...0. Y|
|000016e0| 25 2c 6d 6f 75 73 65 78 | 25 2c 6d 6f 75 73 65 79 |%,mousex|%,mousey|
|000016f0| 25 2c 77 68 61 6e 64 6c | 65 25 2c 69 68 61 6e 64 |%,whandl|e%,ihand|
|00001700| 6c 65 25 2c 74 79 70 65 | 25 0d 05 a0 12 6d 65 6e |le%,type|%....men|
|00001710| 75 68 61 6e 64 6c 65 25 | 3d 6d 25 0d 05 aa 24 c8 |uhandle%|=m%...$.|
|00001720| 99 20 22 57 69 6d 70 5f | 47 65 74 50 6f 69 6e 74 |. "Wimp_|GetPoint|
|00001730| 65 72 49 6e 66 6f 22 2c | 2c 62 6c 6f 63 6b 25 0d |erInfo",|,block%.|
|00001740| 05 b4 25 6d 6f 75 73 65 | 78 25 3d 62 6c 6f 63 6b |..%mouse|x%=block|
|00001750| 25 21 30 3a 6d 6f 75 73 | 65 79 25 3d 62 6c 6f 63 |%!0:mous|ey%=bloc|
|00001760| 6b 25 21 34 0d 05 be 29 | 77 68 61 6e 64 6c 65 25 |k%!4...)|whandle%|
|00001770| 3d 62 6c 6f 63 6b 25 21 | 31 32 3a 69 68 61 6e 64 |=block%!|12:ihand|
|00001780| 6c 65 25 3d 62 6c 6f 63 | 6b 25 21 31 36 0d 05 c8 |le%=bloc|k%!16...|
|00001790| 33 e7 20 77 68 61 6e 64 | 6c 65 25 3c 30 20 59 25 |3. whand|le%<0 Y%|
|000017a0| 3d 68 25 2a 33 32 2b 31 | 32 30 20 8b 20 59 25 3d |=h%*32+1|20 . Y%=|
|000017b0| 6d 6f 75 73 65 79 25 2b | 68 25 2a 33 32 2b 37 32 |mousey%+|h%*32+72|
|000017c0| 0d 05 d2 30 c8 99 20 22 | 57 69 6d 70 5f 43 72 65 |...0.. "|Wimp_Cre|
|000017d0| 61 74 65 4d 65 6e 75 22 | 2c 2c 6d 25 2c 6d 6f 75 |ateMenu"|,,m%,mou|
|000017e0| 73 65 78 25 2d 36 36 2b | 77 25 2a 31 36 2c 59 25 |sex%-66+|w%*16,Y%|
|000017f0| 0d 05 dc 05 e1 0d 05 e6 | 05 3a 0d 05 f0 51 2d 2d |........|.:...Q--|
|00001800| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001810| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001820| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001830| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001840| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 05 fa 05 3a |--------|---....:|
|00001850| 0d 06 04 30 f4 20 2d 2d | 2d 2d 2d 2d 2d 2d 2d 20 |...0. --|------- |
|00001860| 52 65 63 65 69 76 65 20 | 61 20 57 69 6d 70 20 6d |Receive |a Wimp m|
|00001870| 65 73 73 61 67 65 20 2d | 2d 2d 2d 2d 2d 2d 2d 2d |essage -|--------|
|00001880| 0d 06 0e 32 dd f2 72 65 | 63 65 69 76 65 28 71 25 |...2..re|ceive(q%|
|00001890| 29 3a e7 64 65 62 75 67 | 3a ef 34 2c 33 30 3a f1 |):.debug|:.4,30:.|
|000018a0| 22 52 65 63 65 69 76 65 | 3a 20 22 3b 7e 71 25 21 |"Receive|: ";~q%!|
|000018b0| 31 36 0d 06 18 0e c8 8e | 20 71 25 21 31 36 20 ca |16......| q%!16 .|
|000018c0| 0d 06 22 14 20 20 c9 20 | 30 3a 20 f2 66 69 6e 69 |..". . |0: .fini|
|000018d0| 73 68 3a e0 0d 06 2c 30 | 20 20 c9 20 32 3a 20 64 |sh:...,0| . 2: d|
|000018e0| 65 73 74 66 69 6c 65 6e | 61 6d 65 24 3d a4 67 65 |estfilen|ame$=.ge|
|000018f0| 74 73 74 72 28 71 25 2b | 34 34 29 3a f2 63 6f 6e |tstr(q%+|44):.con|
|00001900| 76 65 72 74 0d 06 36 2c | 20 20 c9 20 33 3a 20 e7 |vert..6,| . 3: .|
|00001910| 20 71 25 21 31 32 3d 30 | 20 8c 20 f2 73 63 61 6e | q%!12=0| . .scan|
|00001920| 28 a4 67 65 74 73 74 72 | 28 71 25 2b 34 34 29 29 |(.getstr|(q%+44))|
|00001930| 0d 06 40 31 20 20 c9 20 | 26 34 30 30 43 30 3a 20 |..@1 . |&400C0: |
|00001940| f2 53 75 62 4d 65 6e 75 | 28 71 25 21 32 30 2c 71 |.SubMenu|(q%!20,q|
|00001950| 25 21 32 34 2c 71 25 21 | 32 38 2c 71 25 21 33 32 |%!24,q%!|28,q%!32|
|00001960| 29 0d 06 4a 05 cb 0d 06 | 54 05 e1 0d 06 5e 05 3a |)..J....|T....^.:|
|00001970| 0d 06 68 22 dd f2 53 75 | 62 4d 65 6e 75 28 77 69 |..h"..Su|bMenu(wi|
|00001980| 6e 64 6f 77 25 2c 77 78 | 25 2c 77 79 25 2c 6d 69 |ndow%,wx|%,wy%,mi|
|00001990| 25 29 0d 06 72 12 20 20 | c8 8e 20 77 69 6e 64 6f |%)..r. |.. windo|
|000019a0| 77 25 20 ca 0d 06 7c 14 | 20 20 20 20 c9 20 77 5f |w% ...|.| . w_|
|000019b0| 73 61 76 65 61 73 25 3a | 0d 06 86 12 20 20 20 20 |saveas%:|.... |
|000019c0| 20 20 c8 8e 20 6d 69 25 | 20 ca 0d 06 90 41 20 20 | .. mi%| ....A |
|000019d0| 20 20 20 20 20 20 c9 20 | 30 3a 20 f2 53 65 74 49 | . |0: .SetI|
|000019e0| 63 6f 6e 28 77 5f 73 61 | 76 65 61 73 25 2c 20 32 |con(w_sa|veas%, 2|
|000019f0| 2c 20 22 66 69 6c 65 5f | 66 66 62 22 2c 20 a3 29 |, "file_|ffb", .)|
|00001a00| 3a 44 65 73 74 25 3d 26 | 46 46 42 0d 06 9a 41 20 |:Dest%=&|FFB...A |
|00001a10| 20 20 20 20 20 20 20 c9 | 20 31 3a 20 f2 53 65 74 | .| 1: .Set|
|00001a20| 49 63 6f 6e 28 77 5f 73 | 61 76 65 61 73 25 2c 20 |Icon(w_s|aveas%, |
|00001a30| 32 2c 20 22 66 69 6c 65 | 5f 66 66 66 22 2c 20 a3 |2, "file|_fff", .|
|00001a40| 29 3a 44 65 73 74 25 3d | 26 46 46 46 0d 06 a4 41 |):Dest%=|&FFF...A|
|00001a50| 20 20 20 20 20 20 20 20 | c9 20 32 3a 20 f2 53 65 | |. 2: .Se|
|00001a60| 74 49 63 6f 6e 28 77 5f | 73 61 76 65 61 73 25 2c |tIcon(w_|saveas%,|
|00001a70| 20 32 2c 20 22 66 69 6c | 65 5f 62 62 64 22 2c 20 | 2, "fil|e_bbd", |
|00001a80| a3 29 3a 44 65 73 74 25 | 3d 26 42 42 44 0d 06 ae |.):Dest%|=&BBD...|
|00001a90| 0b 20 20 20 20 20 20 cb | 0d 06 b8 07 20 20 cb 0d |. .|.... ..|
|00001aa0| 06 c2 2e 20 20 c8 99 20 | 22 57 69 6d 70 5f 43 72 |... .. |"Wimp_Cr|
|00001ab0| 65 61 74 65 53 75 62 4d | 65 6e 75 22 2c 2c 77 69 |eateSubM|enu",,wi|
|00001ac0| 6e 64 6f 77 25 2c 77 78 | 25 2c 77 79 25 0d 06 cc |ndow%,wx|%,wy%...|
|00001ad0| 05 e1 0d 06 d6 05 3a 0d | 06 e0 2f f4 20 2d 2d 2d |......:.|../. ---|
|00001ae0| 2d 2d 2d 2d 2d 2d 2d 2d | 20 41 20 6d 6f 75 73 65 |--------| A mouse|
|00001af0| 20 63 6c 69 63 6b 20 2d | 2d 2d 2d 2d 2d 2d 2d 2d | click -|--------|
|00001b00| 2d 2d 2d 2d 2d 2d 0d 06 | ea 37 dd f2 63 68 65 63 |------..|.7..chec|
|00001b10| 6b 6d 6f 75 73 65 28 6d | 6f 75 73 65 78 25 2c 6d |kmouse(m|ousex%,m|
|00001b20| 6f 75 73 65 79 25 2c 62 | 25 2c 77 68 61 6e 64 6c |ousey%,b|%,whandl|
|00001b30| 65 25 2c 69 63 6f 6e 25 | 2c 6f 62 25 29 0d 06 f4 |e%,icon%|,ob%)...|
|00001b40| 35 73 65 6c 65 63 74 25 | 3d 62 25 20 80 20 34 3a |5select%|=b% . 4:|
|00001b50| 73 65 6c 65 63 74 31 25 | 3d 62 25 20 80 20 26 34 |select1%|=b% . &4|
|00001b60| 30 30 3a 64 72 61 67 53 | 25 3d 62 25 20 80 20 26 |00:dragS|%=b% . &|
|00001b70| 34 30 0d 06 fe 12 6d 65 | 6e 75 25 20 20 3d 62 25 |40....me|nu% =b%|
|00001b80| 20 80 20 32 0d 07 08 35 | 61 64 6a 75 73 74 25 3d | . 2...5|adjust%=|
|00001b90| 62 25 20 80 20 31 3a 61 | 64 6a 75 73 74 31 25 3d |b% . 1:a|djust1%=|
|00001ba0| 62 25 20 80 20 26 31 30 | 30 3a 64 72 61 67 41 25 |b% . &10|0:dragA%|
|00001bb0| 3d 62 25 20 80 20 26 31 | 30 0d 07 12 05 3a 0d 07 |=b% . &1|0....:..|
|00001bc0| 1c 24 e7 64 65 62 75 67 | 3a ef 34 2c 33 30 3a f1 |.$.debug|:.4,30:.|
|00001bd0| 22 69 63 6f 6e 25 3d 22 | 3b 69 63 6f 6e 25 2c 7e |"icon%="|;icon%,~|
|00001be0| 62 25 0d 07 26 0d e7 20 | 6d 65 6e 75 25 20 8c 0d |b%..&.. |menu% ..|
|00001bf0| 07 30 39 20 20 e7 20 77 | 68 61 6e 64 6c 65 25 3d |.09 . w|handle%=|
|00001c00| 2d 32 20 80 20 69 63 6f | 6e 25 3d 69 63 62 61 72 |-2 . ico|n%=icbar|
|00001c10| 25 20 20 f2 6d 65 6e 75 | 28 6d 5f 69 63 6f 6e 62 |% .menu|(m_iconb|
|00001c20| 61 72 25 2c 32 2c 30 29 | 0d 07 3a 05 cd 0d 07 44 |ar%,2,0)|..:....D|
|00001c30| 04 0d 07 4e 61 e7 20 73 | 65 6c 65 63 74 25 20 80 |...Na. s|elect% .|
|00001c40| 20 77 68 61 6e 64 6c 65 | 25 3d 77 5f 73 61 76 65 | whandle|%=w_save|
|00001c50| 61 73 25 20 80 20 69 63 | 6f 6e 25 3d 30 20 8c 20 |as% . ic|on%=0 . |
|00001c60| 64 65 73 74 66 69 6c 65 | 6e 61 6d 65 24 3d a4 47 |destfile|name$=.G|
|00001c70| 65 74 49 63 6f 6e 28 77 | 5f 73 61 76 65 61 73 25 |etIcon(w|_saveas%|
|00001c80| 2c 20 31 2c 20 b9 29 3a | f2 63 6f 6e 76 65 72 74 |, 1, .):|.convert|
|00001c90| 3a e1 0d 07 58 04 0d 07 | 62 17 e7 20 64 72 61 67 |:...X...|b.. drag|
|00001ca0| 53 25 20 84 20 64 72 61 | 67 41 25 20 8c 0d 07 6c |S% . dra|gA% ...l|
|00001cb0| 2a 20 20 74 68 69 73 69 | 63 6f 6e 25 3d 32 3a f2 |* thisi|con%=2:.|
|00001cc0| 73 65 74 75 70 64 72 61 | 67 62 6f 78 28 77 5f 73 |setupdra|gbox(w_s|
|00001cd0| 61 76 65 61 73 25 29 0d | 07 76 05 cd 0d 07 80 04 |aveas%).|.v......|
|00001ce0| 0d 07 8a 05 e1 0d 07 94 | 05 3a 0d 07 9e 0c dd f2 |........|.:......|
|00001cf0| 61 64 6a 75 73 74 0d 07 | a8 24 c8 99 20 22 57 69 |adjust..|.$.. "Wi|
|00001d00| 6d 70 5f 47 65 74 50 6f | 69 6e 74 65 72 49 6e 66 |mp_GetPo|interInf|
|00001d10| 6f 22 2c 2c 62 6c 6f 63 | 6b 25 0d 07 b2 16 e7 20 |o",,bloc|k%..... |
|00001d20| 28 62 6c 6f 63 6b 25 21 | 38 20 80 20 31 29 20 8c |(block%!|8 . 1) .|
|00001d30| 0d 07 bc 16 f2 6d 65 6e | 75 28 6d 65 6e 75 68 61 |.....men|u(menuha|
|00001d40| 6e 64 6c 65 25 29 0d 07 | c6 3f 20 20 f4 20 65 6e |ndle%)..|.? . en|
|00001d50| 73 75 72 65 20 6d 65 73 | 73 61 67 65 20 77 69 6e |sure mes|sage win|
|00001d60| 64 6f 77 20 6f 70 65 6e | 73 20 69 6e 20 66 72 6f |dow open|s in fro|
|00001d70| 6e 74 20 6f 66 20 6d 65 | 6e 75 20 6e 6f 74 20 62 |nt of me|nu not b|
|00001d80| 65 68 69 6e 64 0d 07 d0 | 19 20 20 e7 20 a4 4f 70 |ehind...|. . .Op|
|00001d90| 65 6e 28 6d 65 73 73 61 | 67 65 25 29 20 8c 0d 07 |en(messa|ge%) ...|
|00001da0| da 1c 20 20 f2 43 6c 6f | 73 65 57 69 6e 64 6f 77 |.. .Clo|seWindow|
|00001db0| 28 6d 65 73 73 61 67 65 | 25 29 0d 07 e4 1b 20 20 |(message|%).... |
|00001dc0| f2 4f 70 65 6e 57 69 6e | 64 6f 77 28 6d 65 73 73 |.OpenWin|dow(mess|
|00001dd0| 61 67 65 25 29 0d 07 ee | 07 20 20 cd 0d 07 f8 05 |age%)...|. .....|
|00001de0| cd 0d 08 02 05 e1 0d 08 | 0c 05 3a 0d 08 16 2f f4 |........|..:.../.|
|00001df0| 20 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 20 4b 65 79 | -------|---- Key|
|00001e00| 20 70 72 65 73 73 65 64 | 20 2d 2d 2d 2d 2d 2d 2d | pressed| -------|
|00001e10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 08 20 16 dd f2 |--------|--.. ...|
|00001e20| 6b 65 79 28 77 25 2c 69 | 63 25 2c 6b 65 79 25 29 |key(w%,i|c%,key%)|
|00001e30| 0d 08 2a 58 e7 77 25 3d | 77 5f 73 61 76 65 61 73 |..*X.w%=|w_saveas|
|00001e40| 25 20 80 20 6b 65 79 25 | 3d 31 33 20 f2 63 68 65 |% . key%|=13 .che|
|00001e50| 63 6b 6d 6f 75 73 65 28 | 30 2c 30 2c 34 2c 77 5f |ckmouse(|0,0,4,w_|
|00001e60| 73 61 76 65 61 73 25 2c | 30 2c 30 29 20 8b 20 c8 |saveas%,|0,0) . .|
|00001e70| 99 20 22 57 69 6d 70 5f | 50 72 6f 63 65 73 73 4b |. "Wimp_|ProcessK|
|00001e80| 65 79 22 2c 6b 65 79 25 | 0d 08 34 05 e1 0d 08 3e |ey",key%|..4....>|
|00001e90| 05 3a 0d 08 48 2f f4 20 | 2d 2d 2d 2d 2d 2d 2d 2d |.:..H/. |--------|
|00001ea0| 2d 2d 2d 20 53 65 74 20 | 75 70 20 61 20 64 72 61 |--- Set |up a dra|
|00001eb0| 67 20 62 6f 78 20 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |g box --|--------|
|00001ec0| 2d 0d 08 52 1b dd f2 73 | 65 74 75 70 64 72 61 67 |-..R...s|etupdrag|
|00001ed0| 62 6f 78 28 77 69 6e 64 | 6f 77 25 29 0d 08 5c 21 |box(wind|ow%)..\!|
|00001ee0| ea 20 77 65 78 2c 77 65 | 79 2c 6d 69 6e 78 2c 6d |. wex,we|y,minx,m|
|00001ef0| 61 78 78 2c 6d 69 6e 79 | 2c 6d 61 78 79 0d 08 66 |axx,miny|,maxy..f|
|00001f00| 4b 21 71 25 3d 77 69 6e | 64 6f 77 25 3a c8 99 20 |K!q%=win|dow%:.. |
|00001f10| 22 57 69 6d 70 5f 47 65 | 74 57 69 6e 64 6f 77 53 |"Wimp_Ge|tWindowS|
|00001f20| 74 61 74 65 22 2c 2c 71 | 25 3a 77 65 78 3d 71 25 |tate",,q|%:wex=q%|
|00001f30| 21 34 2d 71 25 21 32 30 | 3a 77 65 79 3d 71 25 21 |!4-q%!20|:wey=q%!|
|00001f40| 31 36 2d 71 25 21 32 34 | 0d 08 70 3d 6d 69 6e 78 |16-q%!24|..p=minx|
|00001f50| 3d 71 25 21 31 32 2b 77 | 65 78 3a 6d 69 6e 79 3d |=q%!12+w|ex:miny=|
|00001f60| 71 25 21 31 36 2b 77 65 | 79 3a 6d 61 78 78 3d 71 |q%!16+we|y:maxx=q|
|00001f70| 25 21 34 2d 77 65 78 3a | 6d 61 78 79 3d 71 25 21 |%!4-wex:|maxy=q%!|
|00001f80| 38 2d 77 65 79 0d 08 7a | 39 21 71 25 3d 77 69 6e |8-wey..z|9!q%=win|
|00001f90| 64 6f 77 25 3a 71 25 21 | 34 3d 74 68 69 73 69 63 |dow%:q%!|4=thisic|
|00001fa0| 6f 6e 25 3a c8 99 20 22 | 57 69 6d 70 5f 47 65 74 |on%:.. "|Wimp_Get|
|00001fb0| 49 63 6f 6e 53 74 61 74 | 65 22 2c 2c 71 25 0d 08 |IconStat|e",,q%..|
|00001fc0| 84 2e 6d 69 6e 78 3d 71 | 25 21 38 3a 6d 69 6e 79 |..minx=q|%!8:miny|
|00001fd0| 3d 71 25 21 31 32 3a 6d | 61 78 78 3d 71 25 21 31 |=q%!12:m|axx=q%!1|
|00001fe0| 36 3a 6d 61 78 79 3d 71 | 25 21 32 30 0d 08 8e 51 |6:maxy=q|%!20...Q|
|00001ff0| 21 71 25 3d 77 69 6e 64 | 6f 77 25 3a 71 25 21 34 |!q%=wind|ow%:q%!4|
|00002000| 3d 35 3a 71 25 21 38 3d | 6d 69 6e 78 2b 77 65 78 |=5:q%!8=|minx+wex|
|00002010| 3a 71 25 21 31 32 3d 6d | 69 6e 79 2b 77 65 79 3a |:q%!12=m|iny+wey:|
|00002020| 71 25 21 31 36 3d 6d 61 | 78 78 2b 77 65 78 3a 71 |q%!16=ma|xx+wex:q|
|00002030| 25 21 32 30 3d 6d 61 78 | 79 2b 77 65 79 0d 08 98 |%!20=max|y+wey...|
|00002040| 49 71 25 21 32 34 3d 30 | 3a 71 25 21 32 38 3d 30 |Iq%!24=0|:q%!28=0|
|00002050| 3a 71 25 21 33 32 3d 26 | 37 46 46 46 46 46 46 46 |:q%!32=&|7FFFFFFF|
|00002060| 3a 71 25 21 33 36 3d 26 | 37 46 46 46 46 46 46 46 |:q%!36=&|7FFFFFFF|
|00002070| 3a c8 99 20 22 57 69 6d | 70 5f 44 72 61 67 42 6f |:.. "Wim|p_DragBo|
|00002080| 78 22 2c 2c 71 25 0d 08 | a2 17 f4 20 64 72 61 67 |x",,q%..|... drag|
|00002090| 62 6f 78 73 61 76 65 25 | 3d 54 52 55 45 0d 08 ac |boxsave%|=TRUE...|
|000020a0| 05 e1 0d 08 b6 05 3a 0d | 08 c0 2f f4 20 2d 2d 2d |......:.|../. ---|
|000020b0| 2d 2d 2d 2d 2d 2d 2d 2d | 20 44 65 70 6f 73 69 74 |--------| Deposit|
|000020c0| 20 61 20 64 72 61 67 67 | 65 64 20 69 74 65 6d 20 | a dragg|ed item |
|000020d0| 2d 2d 2d 2d 2d 2d 0d 08 | ca 11 dd f2 64 72 61 67 |------..|....drag|
|000020e0| 62 6f 78 28 71 25 29 0d | 08 d4 1f f4 20 49 46 20 |box(q%).|.... IF |
|000020f0| 64 72 61 67 62 6f 78 73 | 61 76 65 25 3d 54 52 55 |dragboxs|ave%=TRU|
|00002100| 45 20 54 48 45 4e 0d 08 | de 14 20 20 64 72 61 67 |E THEN..|.. drag|
|00002110| 62 6f 78 73 61 76 65 25 | 3d a3 0d 08 e8 11 20 20 |boxsave%|=..... |
|00002120| f2 67 65 74 70 6f 69 6e | 74 65 72 0d 08 f2 15 20 |.getpoin|ter.... |
|00002130| 20 66 69 6c 65 74 72 61 | 6e 73 66 65 72 25 3d b9 | filetra|nsfer%=.|
|00002140| 0d 08 fc 2a 20 20 74 61 | 72 67 65 74 5f 77 69 6e |...* ta|rget_win|
|00002150| 25 3d 68 61 6e 64 6c 65 | 25 3a 74 61 72 67 65 74 |%=handle|%:target|
|00002160| 5f 69 63 25 3d 69 63 6f | 6e 25 0d 09 06 29 20 20 |_ic%=ico|n%...) |
|00002170| 74 61 72 67 65 74 5f 78 | 25 3d 6d 6f 75 73 65 78 |target_x|%=mousex|
|00002180| 25 3a 74 61 72 67 65 74 | 5f 79 25 3d 6d 6f 75 73 |%:target|_y%=mous|
|00002190| 65 79 25 0d 09 10 16 20 | 20 74 61 72 67 65 74 5f |ey%.... | target_|
|000021a0| 69 6e 64 65 78 25 3d 2d | 31 0d 09 1a 34 20 20 64 |index%=-|1...4 d|
|000021b0| 61 74 61 73 61 76 65 24 | 3d a4 6c 65 61 66 6e 61 |atasave$|=.leafna|
|000021c0| 6d 65 28 a4 47 65 74 49 | 63 6f 6e 28 77 5f 73 61 |me(.GetI|con(w_sa|
|000021d0| 76 65 61 73 25 2c 20 31 | 2c 20 b9 29 29 0d 09 24 |veas%, 1|, .))..$|
|000021e0| 1d 20 20 71 25 21 30 3d | 36 30 3a 71 25 21 31 32 |. q%!0=|60:q%!12|
|000021f0| 3d 30 3a 71 25 21 31 36 | 3d 31 0d 09 2e 28 20 20 |=0:q%!16|=1...( |
|00002200| 71 25 21 32 30 3d 74 61 | 72 67 65 74 5f 77 69 6e |q%!20=ta|rget_win|
|00002210| 25 3a 71 25 21 32 34 3d | 74 61 72 67 65 74 5f 69 |%:q%!24=|target_i|
|00002220| 63 25 0d 09 38 25 20 20 | 71 25 21 32 38 3d 74 61 |c%..8% |q%!28=ta|
|00002230| 72 67 65 74 5f 78 25 3a | 71 25 21 33 32 3d 74 61 |rget_x%:|q%!32=ta|
|00002240| 72 67 65 74 5f 79 25 0d | 09 42 21 20 20 71 25 21 |rget_y%.|.B! q%!|
|00002250| 33 36 3d 31 3a 71 25 21 | 34 30 3d 31 3a f4 20 46 |36=1:q%!|40=1:. F|
|00002260| 69 6c 65 20 74 79 70 65 | 0d 09 4c 1d 20 20 24 28 |ile type|..L. $(|
|00002270| 71 25 2b 34 34 29 3d 64 | 61 74 61 73 61 76 65 24 |q%+44)=d|atasave$|
|00002280| 2b bd 28 30 29 0d 09 56 | 2f 20 20 c8 99 20 22 57 |+.(0)..V|/ .. "W|
|00002290| 69 6d 70 5f 53 65 6e 64 | 4d 65 73 73 61 67 65 22 |imp_Send|Message"|
|000022a0| 2c 31 37 2c 71 25 2c 68 | 61 6e 64 6c 65 25 2c 69 |,17,q%,h|andle%,i|
|000022b0| 63 6f 6e 25 0d 09 60 11 | 20 20 6d 79 72 65 66 25 |con%..`.| myref%|
|000022c0| 3d 71 25 21 38 0d 09 6a | 05 e1 0d 09 74 05 3a 0d |=q%!8..j|....t.:.|
|000022d0| 09 7e 0b f4 20 45 4e 44 | 49 46 0d 09 88 05 e1 0d |.~.. END|IF......|
|000022e0| 09 92 05 3a 0d 09 9c 2f | f4 20 2d 2d 2d 2d 2d 2d |...:.../|. ------|
|000022f0| 2d 2d 2d 2d 2d 20 41 20 | 6d 65 6e 75 20 73 65 6c |----- A |menu sel|
|00002300| 65 63 74 69 6f 6e 20 2d | 2d 2d 2d 2d 2d 2d 2d 2d |ection -|--------|
|00002310| 2d 2d 2d 0d 09 a6 24 dd | f2 6d 65 6e 75 73 65 6c |---...$.|.menusel|
|00002320| 65 63 74 28 6d 65 6e 75 | 68 61 6e 64 6c 65 25 2c |ect(menu|handle%,|
|00002330| 6d 65 6e 75 73 25 29 0d | 09 b0 41 e7 64 65 62 75 |menus%).|..A.debu|
|00002340| 67 3a ef 34 2c 33 30 3a | f1 22 6d 65 6e 75 68 61 |g:.4,30:|."menuha|
|00002350| 6e 64 6c 65 25 3d 22 3b | 6d 65 6e 75 68 61 6e 64 |ndle%=";|menuhand|
|00002360| 6c 65 25 3b 22 20 20 21 | 6d 65 6e 75 73 25 3d 22 |le%;" !|menus%="|
|00002370| 3b 21 6d 65 6e 75 73 25 | 0d 09 ba 0b ea 20 61 24 |;!menus%|..... a$|
|00002380| 2c 61 25 0d 09 c4 14 c8 | 8e 20 6d 65 6e 75 68 61 |,a%.....|. menuha|
|00002390| 6e 64 6c 65 25 20 ca 0d | 09 ce 13 20 20 c9 20 6d |ndle% ..|... . m|
|000023a0| 5f 69 63 6f 6e 62 61 72 | 25 3a 0d 09 d8 14 20 20 |_iconbar|%:.... |
|000023b0| 20 20 c8 8e 20 21 6d 65 | 6e 75 73 25 20 ca 0d 09 | .. !me|nus% ...|
|000023c0| e2 16 20 20 20 20 20 20 | c9 20 31 3a 20 f2 66 69 |.. |. 1: .fi|
|000023d0| 6e 69 73 68 0d 09 ec 09 | 20 20 20 20 cb 0d 09 f6 |nish....| ....|
|000023e0| 12 20 20 c9 20 6d 5f 73 | 61 76 65 61 73 25 3a 0d |. . m_s|aveas%:.|
|000023f0| 0a 00 14 20 20 20 20 c8 | 8e 20 21 6d 65 6e 75 73 |... .|. !menus|
|00002400| 25 20 ca 0d 0a 0a 22 20 | 20 20 20 20 20 c9 20 30 |% ...." | . 0|
|00002410| 3a 20 44 65 73 74 25 3d | 26 46 46 42 3a f2 63 6f |: Dest%=|&FFB:.co|
|00002420| 6e 76 65 72 74 0d 0a 14 | 22 20 20 20 20 20 20 c9 |nvert...|" .|
|00002430| 20 31 3a 20 44 65 73 74 | 25 3d 26 46 46 46 3a f2 | 1: Dest|%=&FFF:.|
|00002440| 63 6f 6e 76 65 72 74 0d | 0a 1e 22 20 20 20 20 20 |convert.|.." |
|00002450| 20 c9 20 32 3a 20 44 65 | 73 74 25 3d 26 42 42 44 | . 2: De|st%=&BBD|
|00002460| 3a f2 63 6f 6e 76 65 72 | 74 0d 0a 28 55 20 20 20 |:.conver|t..(U |
|00002470| 20 20 20 c9 20 33 3a 20 | 66 24 3d 64 65 73 74 66 | . 3: |f$=destf|
|00002480| 69 6c 65 6e 61 6d 65 24 | 3a c8 95 20 c2 66 24 2c |ilename$|:.. .f$,|
|00002490| 31 29 3c 3e 22 2e 22 20 | 66 24 3d c0 66 24 2c a9 |1)<>"." |f$=.f$,.|
|000024a0| 66 24 2d 31 29 3a ce 3a | ff 22 44 69 72 20 22 2b |f$-1):.:|."Dir "+|
|000024b0| c0 66 24 2c a9 66 24 2d | 31 29 3a ef 20 37 0d 0a |.f$,.f$-|1):. 7..|
|000024c0| 32 09 20 20 20 20 cb 0d | 0a 3c 07 20 20 cb 0d 0a |2. ..|.<. ...|
|000024d0| 46 05 e1 0d 0a 50 05 3a | 0d 0a 5a 21 f4 20 2d 2d |F....P.:|..Z!. --|
|000024e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 20 51 75 69 74 20 2d |--------|- Quit -|
|000024f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 0a 64 0c dd f2 66 |--------|-..d...f|
|00002500| 69 6e 69 73 68 0d 0a 6e | 17 c8 99 20 22 57 69 6d |inish..n|... "Wim|
|00002510| 70 5f 43 6c 6f 73 65 44 | 6f 77 6e 22 0d 0a 78 05 |p_CloseD|own"..x.|
|00002520| e1 0d 0a 82 05 3a 0d 0a | 8c 10 dd f2 67 65 74 70 |.....:..|....getp|
|00002530| 6f 69 6e 74 65 72 0d 0a | 96 20 c8 99 20 22 57 69 |ointer..|. .. "Wi|
|00002540| 6d 70 5f 47 65 74 50 6f | 69 6e 74 65 72 49 6e 66 |mp_GetPo|interInf|
|00002550| 6f 22 2c 2c 71 25 0d 0a | a0 48 6d 6f 75 73 65 78 |o",,q%..|.Hmousex|
|00002560| 25 3d 21 71 25 3a 6d 6f | 75 73 65 79 25 3d 71 25 |%=!q%:mo|usey%=q%|
|00002570| 21 34 3a 62 25 3d 71 25 | 21 38 3a 68 61 6e 64 6c |!4:b%=q%|!8:handl|
|00002580| 65 25 3d 71 25 21 31 32 | 3a 69 63 6f 6e 25 3d 71 |e%=q%!12|:icon%=q|
|00002590| 25 21 31 36 3a 6f 62 25 | 3d 71 25 21 32 30 0d 0a |%!16:ob%|=q%!20..|
|000025a0| aa 05 e1 0d 0a b4 05 3a | 0d 0a be 0e dd f2 65 72 |.......:|......er|
|000025b0| 72 6f 72 62 6f 78 0d 0a | c8 19 c8 99 20 22 57 69 |rorbox..|.... "Wi|
|000025c0| 6d 70 5f 44 72 61 67 42 | 6f 78 22 2c 2c 2d 31 0d |mp_DragB|ox",,-1.|
|000025d0| 0a d2 30 21 62 75 66 66 | 65 72 25 3d 9f 3a 24 28 |..0!buff|er%=.:$(|
|000025e0| 62 75 66 66 65 72 25 2b | 34 29 3d f6 24 2b 22 20 |buffer%+|4)=.$+" |
|000025f0| 61 74 20 6c 69 6e 65 20 | 22 2b c3 9e 2b bd 30 0d |at line |"+..+.0.|
|00002600| 0a dc 29 c8 99 20 22 57 | 69 6d 70 5f 52 65 70 6f |..).. "W|imp_Repo|
|00002610| 72 74 45 72 72 6f 72 22 | 2c 62 75 66 66 65 72 25 |rtError"|,buffer%|
|00002620| 2c 31 2c 22 52 43 53 22 | 0d 0a e6 0d f2 66 69 6e |,1,"RCS"|.....fin|
|00002630| 69 73 68 3a e0 0d 0a f0 | 05 e1 0d 0a fa 05 3a 0d |ish:....|......:.|
|00002640| 0b 04 16 dd a4 69 63 6f | 6e 62 61 72 28 73 70 6e |.....ico|nbar(spn|
|00002650| 61 6d 65 24 29 0d 0b 0e | 11 21 71 25 3d 2d 31 3a |ame$)...|.!q%=-1:|
|00002660| 71 25 21 34 3d 30 0d 0b | 18 13 71 25 21 38 3d 30 |q%!4=0..|..q%!8=0|
|00002670| 3a 71 25 21 31 32 3d 36 | 33 0d 0b 22 18 71 25 21 |:q%!12=6|3..".q%!|
|00002680| 31 36 3d 36 34 3a 71 25 | 21 32 30 3d 26 32 31 30 |16=64:q%|!20=&210|
|00002690| 32 0d 0b 2c 18 de 20 71 | 25 21 32 34 20 28 a9 73 |2..,.. q|%!24 (.s|
|000026a0| 70 6e 61 6d 65 24 2b 31 | 29 0d 0b 36 14 24 28 71 |pname$+1|)..6.$(q|
|000026b0| 25 21 32 34 29 3d 73 70 | 6e 61 6d 65 24 0d 0b 40 |%!24)=sp|name$..@|
|000026c0| 12 71 25 21 32 38 3d 73 | 70 72 69 74 65 73 25 0d |.q%!28=s|prites%.|
|000026d0| 0b 4a 16 71 25 21 33 32 | 3d a9 28 73 70 6e 61 6d |.J.q%!32|=.(spnam|
|000026e0| 65 24 29 2b 31 0d 0b 54 | 22 c8 99 20 22 57 69 6d |e$)+1..T|".. "Wim|
|000026f0| 70 5f 43 72 65 61 74 65 | 49 63 6f 6e 22 2c 2c 71 |p_Create|Icon",,q|
|00002700| 25 20 b8 20 69 63 25 0d | 0b 5e 08 3d 69 63 25 0d |% . ic%.|.^.=ic%.|
|00002710| 0b 68 05 3a 0d 0b 72 10 | dd a4 67 65 74 73 74 72 |.h.:..r.|..getstr|
|00002720| 28 61 25 29 0d 0b 7c 08 | ea 20 62 24 0d 0b 86 0e |(a%)..|.|. b$....|
|00002730| c8 95 20 3f 61 25 3e 3d | 33 32 0d 0b 90 0f 20 62 |.. ?a%>=|32.... b|
|00002740| 24 2b 3d bd 28 3f 61 25 | 29 0d 0b 9a 0a 20 61 25 |$+=.(?a%|).... a%|
|00002750| 2b 3d 31 0d 0b a4 05 ce | 0d 0b ae 07 3d 62 24 0d |+=1.....|....=b$.|
|00002760| 0b b8 05 3a 0d 0b c2 12 | dd a4 6c 65 61 66 6e 61 |...:....|..leafna|
|00002770| 6d 65 28 61 24 29 0d 0b | cc 23 c8 95 a7 61 24 2c |me(a$)..|.#...a$,|
|00002780| 22 2e 22 29 3a 61 24 3d | c1 61 24 2c a7 61 24 2c |"."):a$=|.a$,.a$,|
|00002790| 22 2e 22 29 2b 31 29 3a | ce 0d 0b d6 07 3d 61 24 |".")+1):|.....=a$|
|000027a0| 0d 0b e0 05 3a 0d 0b ea | 3a f4 20 2d 2d 2d 2d 2d |....:...|:. -----|
|000027b0| 2d 2d 2d 2d 2d 2d 20 4d | 6f 64 69 66 79 20 61 6e |------ M|odify an|
|000027c0| 20 65 78 69 73 74 69 6e | 67 20 69 63 6f 6e 20 6e | existin|g icon n|
|000027d0| 20 61 20 77 69 6e 64 6f | 77 20 2d 2d 2d 2d 2d 0d | a windo|w -----.|
|000027e0| 0b f4 26 dd f2 53 65 74 | 49 63 6f 6e 28 77 69 6e |..&..Set|Icon(win|
|000027f0| 64 6f 77 25 2c 69 63 6f | 6e 25 2c 73 74 61 74 65 |dow%,ico|n%,state|
|00002800| 24 2c 66 25 29 0d 0b fe | 47 21 6f 70 74 62 75 66 |$,f%)...|G!optbuf|
|00002810| 66 25 3d 77 69 6e 64 6f | 77 25 3a 6f 70 74 62 75 |f%=windo|w%:optbu|
|00002820| 66 66 25 21 34 3d 69 63 | 6f 6e 25 3a c8 99 20 22 |ff%!4=ic|on%:.. "|
|00002830| 57 69 6d 70 5f 47 65 74 | 49 63 6f 6e 53 74 61 74 |Wimp_Get|IconStat|
|00002840| 65 22 2c 2c 6f 70 74 62 | 75 66 66 25 0d 0c 08 36 |e",,optb|uff%...6|
|00002850| e7 20 66 25 20 24 28 6f | 70 74 62 75 66 66 25 21 |. f% $(o|ptbuff%!|
|00002860| 32 38 29 3d 73 74 61 74 | 65 24 20 8b 20 24 28 6f |28)=stat|e$ . $(o|
|00002870| 70 74 62 75 66 66 25 2b | 32 38 29 3d 73 74 61 74 |ptbuff%+|28)=stat|
|00002880| 65 24 0d 0c 12 45 21 6f | 70 74 62 75 66 66 25 3d |e$...E!o|ptbuff%=|
|00002890| 77 69 6e 64 6f 77 25 3a | 6f 70 74 62 75 66 66 25 |window%:|optbuff%|
|000028a0| 21 34 3d 69 63 6f 6e 25 | 3a c8 99 20 22 57 69 6d |!4=icon%|:.. "Wim|
|000028b0| 70 5f 44 65 6c 65 74 65 | 49 63 6f 6e 22 2c 2c 6f |p_Delete|Icon",,o|
|000028c0| 70 74 62 75 66 66 25 0d | 0c 1c 37 6f 70 74 62 75 |ptbuff%.|..7optbu|
|000028d0| 66 66 25 21 34 3d 77 69 | 6e 64 6f 77 25 3a c8 99 |ff%!4=wi|ndow%:..|
|000028e0| 20 22 57 69 6d 70 5f 43 | 72 65 61 74 65 49 63 6f | "Wimp_C|reateIco|
|000028f0| 6e 22 2c 2c 6f 70 74 62 | 75 66 66 25 2b 34 0d 0c |n",,optb|uff%+4..|
|00002900| 26 44 21 71 25 3d 77 69 | 6e 64 6f 77 25 3a 71 25 |&D!q%=wi|ndow%:q%|
|00002910| 21 34 3d 69 63 6f 6e 25 | 3a 71 25 21 38 3d 30 3a |!4=icon%|:q%!8=0:|
|00002920| 71 25 21 31 32 3d 30 3a | c8 99 20 22 57 69 6d 70 |q%!12=0:|.. "Wimp|
|00002930| 5f 53 65 74 49 63 6f 6e | 53 74 61 74 65 22 2c 2c |_SetIcon|State",,|
|00002940| 71 25 0d 0c 30 05 e1 0d | 0c 3a 05 3a 0d 0c 44 31 |q%..0...|.:.:..D1|
|00002950| f4 20 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 20 47 65 |. ------|----- Ge|
|00002960| 74 20 74 68 65 20 73 74 | 61 74 65 20 6f 66 20 61 |t the st|ate of a|
|00002970| 6e 20 69 63 6f 6e 20 2d | 2d 2d 2d 2d 2d 0d 0c 4e |n icon -|-----..N|
|00002980| 1f dd a4 47 65 74 49 63 | 6f 6e 28 77 69 6e 64 6f |...GetIc|on(windo|
|00002990| 77 25 2c 69 63 6f 6e 25 | 2c 66 25 29 0d 0c 58 47 |w%,icon%|,f%)..XG|
|000029a0| 21 6f 70 74 62 75 66 66 | 25 3d 77 69 6e 64 6f 77 |!optbuff|%=window|
|000029b0| 25 3a 6f 70 74 62 75 66 | 66 25 21 34 3d 69 63 6f |%:optbuf|f%!4=ico|
|000029c0| 6e 25 3a c8 99 20 22 57 | 69 6d 70 5f 47 65 74 49 |n%:.. "W|imp_GetI|
|000029d0| 63 6f 6e 53 74 61 74 65 | 22 2c 2c 6f 70 74 62 75 |conState|",,optbu|
|000029e0| 66 66 25 0d 0c 62 2a e7 | 20 66 25 3a 3d 24 28 6f |ff%..b*.| f%:=$(o|
|000029f0| 70 74 62 75 66 66 25 21 | 32 38 29 20 8b 20 3d 24 |ptbuff%!|28) . =$|
|00002a00| 28 6f 70 74 62 75 66 66 | 25 2b 32 38 29 0d 0c 6c |(optbuff|%+28)..l|
|00002a10| 05 3a 0d 0c 76 35 f4 20 | 52 45 4d 20 2d 2d 2d 2d |.:..v5. |REM ----|
|00002a20| 2d 2d 2d 2d 2d 2d 2d 20 | 53 65 6c 65 63 74 20 61 |------- |Select a|
|00002a30| 6e 20 69 63 6f 6e 20 2d | 2d 2d 2d 2d 2d 2d 2d 2d |n icon -|--------|
|00002a40| 2d 2d 2d 2d 2d 2d 2d 0d | 0c 80 29 f4 20 44 45 46 |-------.|..). DEF|
|00002a50| 50 52 4f 43 53 65 6c 65 | 63 74 49 63 6f 6e 28 77 |PROCSele|ctIcon(w|
|00002a60| 69 6e 64 6f 77 25 2c 69 | 63 6f 6e 25 2c 66 25 29 |indow%,i|con%,f%)|
|00002a70| 0d 0c 8a 3d f4 20 71 25 | 21 30 3d 77 69 6e 64 6f |...=. q%|!0=windo|
|00002a80| 77 25 3a 71 25 21 34 3d | 69 63 6f 6e 25 3a 71 25 |w%:q%!4=|icon%:q%|
|00002a90| 21 38 3d 31 3c 3c 32 31 | 3a 71 25 21 31 32 3d 28 |!8=1<<21|:q%!12=(|
|00002aa0| 66 25 20 41 4e 44 20 31 | 29 3c 3c 32 31 0d 0c 94 |f% AND 1|)<<21...|
|00002ab0| 20 f4 20 53 59 53 22 57 | 69 6d 70 5f 53 65 74 49 | . SYS"W|imp_SetI|
|00002ac0| 63 6f 6e 53 74 61 74 65 | 22 2c 2c 71 25 0d 0c 9e |conState|",,q%...|
|00002ad0| 0d f4 20 45 4e 44 50 52 | 4f 43 0d 0c a8 05 3a 0d |.. ENDPR|OC....:.|
|00002ae0| 0c b2 4d f4 20 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..M. ---|--------|
|00002af0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002b00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002b10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002b20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 0c bc 05 |--------|----....|
|00002b30| 3a 0d 0c c6 0e dd f2 73 | 63 61 6e 28 66 24 29 0d |:......s|can(f$).|
|00002b40| 0c d0 3a ea 20 63 6f 75 | 6e 74 31 25 2c 64 69 72 |..:. cou|nt1%,dir|
|00002b50| 24 2c 6c 25 2c 65 25 2c | 72 30 25 3a 6e 75 6d 62 |$,l%,e%,|r0%:numb|
|00002b60| 65 72 25 3d a3 3a 6b 65 | 79 25 3d ac a6 2d 31 3a |er%=.:ke|y%=..-1:|
|00002b70| 6b 65 79 32 25 3d a6 2d | 32 0d 0c da 43 c8 99 20 |key2%=.-|2...C.. |
|00002b80| 22 58 4f 53 5f 46 69 6c | 65 22 2c 35 2c 66 24 20 |"XOS_Fil|e",5,f$ |
|00002b90| b8 20 72 30 25 2c 2c 6c | 25 2c 65 25 3a e7 6b 65 |. r0%,,l|%,e%:.ke|
|00002ba0| 79 32 25 20 6c 25 3d 30 | 3a f4 20 49 67 6e 6f 72 |y2% l%=0|:. Ignor|
|00002bb0| 65 20 63 6f 6e 76 65 72 | 73 69 6f 6e 0d 0c e4 1b |e conver|sion....|
|00002bc0| e7 20 72 30 25 3d 32 20 | ff 22 44 69 72 20 22 2b |. r0%=2 |."Dir "+|
|00002bd0| 66 24 3a ef 37 3a e1 0d | 0c ee 0e e7 20 72 30 25 |f$:.7:..|.... r0%|
|00002be0| 3c 3e 31 20 e1 0d 0c f8 | 30 f4 20 49 46 20 49 4e |<>1 ....|0. IF IN|
|00002bf0| 4b 45 59 2d 32 3a 4f 53 | 43 4c 49 22 57 49 4d 50 |KEY-2:OS|CLI"WIMP|
|00002c00| 54 41 53 4b 22 5a 38 30 | 20 22 2b 66 24 3a 45 4e |TASK"Z80| "+f$:EN|
|00002c10| 44 50 52 4f 43 0d 0d 02 | 45 73 6f 75 72 63 65 66 |DPROC...|Esourcef|
|00002c20| 69 6c 65 6e 61 6d 65 24 | 3d 66 24 3a 64 65 73 74 |ilename$|=f$:dest|
|00002c30| 66 69 6c 65 6e 61 6d 65 | 24 3d 66 24 3a f2 53 65 |filename|$=f$:.Se|
|00002c40| 74 49 63 6f 6e 28 77 5f | 73 61 76 65 61 73 25 2c |tIcon(w_|saveas%,|
|00002c50| 20 31 2c 20 66 24 2c 20 | b9 29 0d 0d 0c 24 e7 28 | 1, f$, |.)...$.(|
|00002c60| 6c 25 80 26 46 46 46 30 | 30 29 3d 26 46 46 42 30 |l%.&FFF0|0)=&FFB0|
|00002c70| 30 20 f2 42 61 73 54 6f | 54 65 78 74 3a e1 0d 0d |0 .BasTo|Text:...|
|00002c80| 16 24 e7 28 6c 25 80 26 | 46 46 46 30 30 29 3d 26 |.$.(l%.&|FFF00)=&|
|00002c90| 46 46 46 30 30 20 f2 54 | 65 78 74 54 6f 42 61 73 |FFF00 .T|extToBas|
|00002ca0| 3a e1 0d 0d 20 24 e7 28 | 6c 25 80 26 46 46 46 30 |:... $.(|l%.&FFF0|
|00002cb0| 30 29 3d 26 42 42 44 30 | 30 20 f2 52 65 76 72 54 |0)=&BBD0|0 .RevrT|
|00002cc0| 6f 42 61 73 3a e1 0d 0d | 2a 22 c8 95 20 c2 66 24 |oBas:...|*".. .f$|
|00002cd0| 2c 31 29 3c 3e 22 2e 22 | 20 66 24 3d c0 66 24 2c |,1)<>"."| f$=.f$,|
|00002ce0| a9 66 24 2d 31 29 3a ce | 0d 0d 34 1a ff 22 44 69 |.f$-1):.|..4.."Di|
|00002cf0| 72 20 22 2b c0 66 24 2c | a9 66 24 2d 31 29 3a ef |r "+.f$,|.f$-1):.|
|00002d00| 20 37 0d 0d 3e 05 e1 0d | 0d 48 05 3a 0d 0d 52 30 | 7..>...|.H.:..R0|
|00002d10| dd f2 63 6f 6e 76 65 72 | 74 3a 6b 65 79 25 3d ac |..conver|t:key%=.|
|00002d20| a6 2d 31 3a c8 99 20 22 | 57 69 6d 70 5f 43 72 65 |.-1:.. "|Wimp_Cre|
|00002d30| 61 74 65 4d 65 6e 75 22 | 2c 2c 2d 31 0d 0d 5c 49 |ateMenu"|,,-1..\I|
|00002d40| e7 64 65 62 75 67 3a ef | 34 2c 33 30 3a f1 22 43 |.debug:.|4,30:."C|
|00002d50| 6f 6e 76 65 72 74 69 6e | 67 20 22 3b 73 6f 75 72 |onvertin|g ";sour|
|00002d60| 63 65 66 69 6c 65 6e 61 | 6d 65 24 3b 22 20 74 6f |cefilena|me$;" to|
|00002d70| 20 22 3b 64 65 73 74 66 | 69 6c 65 6e 61 6d 65 24 | ";destf|ilename$|
|00002d80| 3b 22 20 20 22 0d 0d 66 | 33 e7 53 6f 75 72 63 65 |;" "..f|3.Source|
|00002d90| 25 3d 26 46 46 46 20 f2 | 54 65 78 74 54 6f 42 61 |%=&FFF .|TextToBa|
|00002da0| 73 47 6f 3a e1 3a f4 20 | 44 65 73 74 20 6d 75 73 |sGo:.:. |Dest mus|
|00002db0| 74 20 62 65 20 46 46 42 | 0d 0d 70 2d e7 53 6f 75 |t be FFB|..p-.Sou|
|00002dc0| 72 63 65 25 3d 26 46 46 | 42 20 80 20 44 65 73 74 |rce%=&FF|B . Dest|
|00002dd0| 25 3d 26 46 46 46 20 f2 | 42 61 73 54 6f 54 65 78 |%=&FFF .|BasToTex|
|00002de0| 74 47 6f 3a e1 0d 0d 7a | 2d e7 53 6f 75 72 63 65 |tGo:...z|-.Source|
|00002df0| 25 3d 26 46 46 42 20 80 | 20 44 65 73 74 25 3d 26 |%=&FFB .| Dest%=&|
|00002e00| 42 42 44 20 f2 42 61 73 | 54 6f 52 65 76 72 47 6f |BBD .Bas|ToRevrGo|
|00002e10| 3a e1 0d 0d 84 33 e7 53 | 6f 75 72 63 65 25 3d 26 |:....3.S|ource%=&|
|00002e20| 42 42 44 20 f2 52 65 76 | 72 54 6f 42 61 73 47 6f |BBD .Rev|rToBasGo|
|00002e30| 3a e1 3a f4 20 44 65 73 | 74 20 6d 75 73 74 20 62 |:.:. Des|t must b|
|00002e40| 65 20 46 46 42 0d 0d 8e | 05 e1 0d 0d 98 05 3a 0d |e FFB...|......:.|
|00002e50| 0d a2 0f dd f2 52 65 76 | 72 54 6f 42 61 73 0d 0d |.....Rev|rToBas..|
|00002e60| ac 1d f2 73 65 74 5f 73 | 68 61 64 65 28 6d 5f 73 |...set_s|hade(m_s|
|00002e70| 61 76 65 61 73 25 2c 30 | 2c a3 29 0d 0d b6 1d f2 |aveas%,0|,.).....|
|00002e80| 73 65 74 5f 73 68 61 64 | 65 28 6d 5f 73 61 76 65 |set_shad|e(m_save|
|00002e90| 61 73 25 2c 31 2c b9 29 | 0d 0d c0 1d f2 73 65 74 |as%,1,.)|.....set|
|00002ea0| 5f 73 68 61 64 65 28 6d | 5f 73 61 76 65 61 73 25 |_shade(m|_saveas%|
|00002eb0| 2c 32 2c b9 29 0d 0d ca | 25 53 6f 75 72 63 65 25 |,2,.)...|%Source%|
|00002ec0| 3d 26 42 42 44 3a f2 6d | 65 6e 75 28 6d 5f 73 61 |=&BBD:.m|enu(m_sa|
|00002ed0| 76 65 61 73 25 2c 34 2c | 30 29 0d 0d d4 05 e1 0d |veas%,4,|0)......|
|00002ee0| 0d de 05 3a 0d 0d e8 11 | dd f2 52 65 76 72 54 6f |...:....|..RevrTo|
|00002ef0| 42 61 73 47 6f 0d 0d f2 | 23 69 6e 25 3d 8e 28 73 |BasGo...|#in%=.(s|
|00002f00| 6f 75 72 63 65 66 69 6c | 65 6e 61 6d 65 24 29 3a |ourcefil|ename$):|
|00002f10| e7 69 6e 25 3d 30 20 e1 | 0d 0d fc 50 6f 75 74 25 |.in%=0 .|...Pout%|
|00002f20| 3d ae 28 22 3c 57 69 6d | 70 24 53 63 72 61 70 3e |=.("<Wim|p$Scrap>|
|00002f30| 22 29 3a e7 6f 75 74 25 | 3d 30 20 d9 23 69 6e 25 |"):.out%|=0 .#in%|
|00002f40| 3a f2 65 72 72 6f 72 28 | 32 31 34 2c 22 43 61 6e |:.error(|214,"Can|
|00002f50| 27 74 20 6f 70 65 6e 20 | 3c 57 69 6d 70 24 53 63 |'t open |<Wimp$Sc|
|00002f60| 72 61 70 3e 22 29 3a e1 | 0d 0e 06 15 c8 99 20 22 |rap>"):.|...... "|
|00002f70| 48 6f 75 72 67 6c 61 73 | 73 5f 4f 6e 22 0d 0e 10 |Hourglas|s_On"...|
|00002f80| 18 6c 65 6e 25 3d 9a 23 | 69 6e 25 3a d5 23 6f 75 |.len%=.#|in%:.#ou|
|00002f90| 74 25 2c 31 33 0d 0e 1a | 2f f5 3a c8 99 20 22 48 |t%,13...|/.:.. "H|
|00002fa0| 6f 75 72 67 6c 61 73 73 | 5f 50 65 72 63 65 6e 74 |ourglass|_Percent|
|00002fb0| 61 67 65 22 2c 31 30 30 | 2a 8f 23 69 6e 25 2f a2 |age",100|*.#in%/.|
|00002fc0| 23 69 6e 25 0d 0e 24 1f | 20 20 6c 69 6e 65 31 25 |#in%..$.| line1%|
|00002fd0| 3d 9a 23 69 6e 25 3a 6c | 69 6e 65 32 25 3d 9a 23 |=.#in%:l|ine2%=.#|
|00002fe0| 69 6e 25 0d 0e 2e 2d 20 | 20 d5 23 6f 75 74 25 2c |in%...- | .#out%,|
|00002ff0| 6c 69 6e 65 32 25 3a d5 | 23 6f 75 74 25 2c 6c 69 |line2%:.|#out%,li|
|00003000| 6e 65 31 25 3a d5 23 6f | 75 74 25 2c 6c 65 6e 25 |ne1%:.#o|ut%,len%|
|00003010| 0d 0e 38 20 20 20 f5 62 | 25 3d 9a 23 69 6e 25 3a |..8 .b|%=.#in%:|
|00003020| d5 23 6f 75 74 25 2c 62 | 25 3a fd 62 25 3d 31 33 |.#out%,b|%:.b%=13|
|00003030| 0d 0e 42 10 20 20 6c 65 | 6e 25 3d 9a 23 69 6e 25 |..B. le|n%=.#in%|
|00003040| 0d 0e 4c 13 fd 6c 65 6e | 25 3d 30 20 84 20 c5 23 |..L..len|%=0 . .#|
|00003050| 69 6e 25 0d 0e 56 32 d5 | 23 6f 75 74 25 2c 26 46 |in%..V2.|#out%,&F|
|00003060| 46 3a e7 ac c5 23 69 6e | 25 20 62 25 3d 9a 23 69 |F:...#in|% b%=.#i|
|00003070| 6e 25 3a e7 62 25 3c 3e | 26 46 46 20 d5 23 6f 75 |n%:.b%<>|&FF .#ou|
|00003080| 74 25 2c 62 25 0d 0e 60 | 27 e7 ac c5 23 69 6e 25 |t%,b%..`|'...#in%|
|00003090| 20 62 25 3d 9a 23 69 6e | 25 3a e7 62 25 3c 3e 26 | b%=.#in|%:.b%<>&|
|000030a0| 46 46 20 d5 23 6f 75 74 | 25 2c 62 25 0d 0e 6a 20 |FF .#out|%,b%..j |
|000030b0| e7 ac c5 23 69 6e 25 20 | f5 d5 23 6f 75 74 25 2c |...#in% |..#out%,|
|000030c0| 9a 23 69 6e 25 3a fd c5 | 23 69 6e 25 0d 0e 74 10 |.#in%:..|#in%..t.|
|000030d0| d9 23 6f 75 74 25 3a d9 | 23 69 6e 25 0d 0e 7e 16 |.#out%:.|#in%..~.|
|000030e0| c8 99 20 22 48 6f 75 72 | 67 6c 61 73 73 5f 4f 66 |.. "Hour|glass_Of|
|000030f0| 66 22 0d 0e 88 21 ff 22 | 53 65 74 54 79 70 65 20 |f"...!."|SetType |
|00003100| 3c 57 69 6d 70 24 53 63 | 72 61 70 3e 20 42 61 73 |<Wimp$Sc|rap> Bas|
|00003110| 69 63 22 0d 0e 92 40 ff | 22 43 6f 70 79 20 3c 57 |ic"...@.|"Copy <W|
|00003120| 69 6d 70 24 53 63 72 61 | 70 3e 20 22 2b 64 65 73 |imp$Scra|p> "+des|
|00003130| 74 66 69 6c 65 6e 61 6d | 65 24 2b 22 20 7e 43 20 |tfilenam|e$+" ~C |
|00003140| 44 20 46 20 7e 4c 20 7e | 4e 20 7e 50 20 7e 52 20 |D F ~L ~|N ~P ~R |
|00003150| 7e 56 22 0d 0e 9c 05 e1 | 0d 0e a6 05 3a 0d 0e b0 |~V".....|....:...|
|00003160| 11 dd f2 42 61 73 54 6f | 52 65 76 72 47 6f 0d 0e |...BasTo|RevrGo..|
|00003170| ba 23 69 6e 25 3d 8e 28 | 73 6f 75 72 63 65 66 69 |.#in%=.(|sourcefi|
|00003180| 6c 65 6e 61 6d 65 24 29 | 3a e7 69 6e 25 3d 30 20 |lename$)|:.in%=0 |
|00003190| e1 0d 0e c4 50 6f 75 74 | 25 3d ae 28 22 3c 57 69 |....Pout|%=.("<Wi|
|000031a0| 6d 70 24 53 63 72 61 70 | 3e 22 29 3a e7 6f 75 74 |mp$Scrap|>"):.out|
|000031b0| 25 3d 30 20 d9 23 69 6e | 25 3a f2 65 72 72 6f 72 |%=0 .#in|%:.error|
|000031c0| 28 32 31 34 2c 22 43 61 | 6e 27 74 20 6f 70 65 6e |(214,"Ca|n't open|
|000031d0| 20 3c 57 69 6d 70 24 53 | 63 72 61 70 3e 22 29 3a | <Wimp$S|crap>"):|
|000031e0| e1 0d 0e ce 15 c8 99 20 | 22 48 6f 75 72 67 6c 61 |....... |"Hourgla|
|000031f0| 73 73 5f 4f 6e 22 0d 0e | d8 19 62 25 3d 9a 23 69 |ss_On"..|..b%=.#i|
|00003200| 6e 25 3a 6c 69 6e 65 31 | 25 3d 9a 23 69 6e 25 0d |n%:line1|%=.#in%.|
|00003210| 0e e2 2f f5 3a c8 99 20 | 22 48 6f 75 72 67 6c 61 |../.:.. |"Hourgla|
|00003220| 73 73 5f 50 65 72 63 65 | 6e 74 61 67 65 22 2c 31 |ss_Perce|ntage",1|
|00003230| 30 30 2a 8f 23 69 6e 25 | 2f a2 23 69 6e 25 0d 0e |00*.#in%|/.#in%..|
|00003240| ec 1d 20 20 6c 69 6e 65 | 32 25 3d 9a 23 69 6e 25 |.. line|2%=.#in%|
|00003250| 3a 6c 65 6e 25 3d 9a 23 | 69 6e 25 0d 0e f6 2d 20 |:len%=.#|in%...- |
|00003260| 20 d5 23 6f 75 74 25 2c | 6c 65 6e 25 3a d5 23 6f | .#out%,|len%:.#o|
|00003270| 75 74 25 2c 6c 69 6e 65 | 32 25 3a d5 23 6f 75 74 |ut%,line|2%:.#out|
|00003280| 25 2c 6c 69 6e 65 31 25 | 0d 0f 00 20 20 20 f5 62 |%,line1%|... .b|
|00003290| 25 3d 9a 23 69 6e 25 3a | d5 23 6f 75 74 25 2c 62 |%=.#in%:|.#out%,b|
|000032a0| 25 3a fd 62 25 3d 31 33 | 0d 0f 0a 12 20 20 6c 69 |%:.b%=13|.... li|
|000032b0| 6e 65 31 25 3d 9a 23 69 | 6e 25 0d 0f 14 17 fd 6c |ne1%=.#i|n%.....l|
|000032c0| 69 6e 65 31 25 3d 26 46 | 46 20 84 20 c5 23 69 6e |ine1%=&F|F . .#in|
|000032d0| 25 0d 0f 1e 22 d5 23 6f | 75 74 25 2c 30 3a d5 23 |%...".#o|ut%,0:.#|
|000032e0| 6f 75 74 25 2c 26 46 46 | 3a d5 23 6f 75 74 25 2c |out%,&FF|:.#out%,|
|000032f0| 26 46 46 0d 0f 28 20 e7 | ac c5 23 69 6e 25 20 f5 |&FF..( .|..#in% .|
|00003300| d5 23 6f 75 74 25 2c 9a | 23 69 6e 25 3a fd c5 23 |.#out%,.|#in%:..#|
|00003310| 69 6e 25 0d 0f 32 10 d9 | 23 6f 75 74 25 3a d9 23 |in%..2..|#out%:.#|
|00003320| 69 6e 25 0d 0f 3c 16 c8 | 99 20 22 48 6f 75 72 67 |in%..<..|. "Hourg|
|00003330| 6c 61 73 73 5f 4f 66 66 | 22 0d 0f 46 1f ff 22 53 |lass_Off|"..F.."S|
|00003340| 65 74 54 79 70 65 20 3c | 57 69 6d 70 24 53 63 72 |etType <|Wimp$Scr|
|00003350| 61 70 3e 20 42 42 44 22 | 0d 0f 50 40 ff 22 43 6f |ap> BBD"|..P@."Co|
|00003360| 70 79 20 3c 57 69 6d 70 | 24 53 63 72 61 70 3e 20 |py <Wimp|$Scrap> |
|00003370| 22 2b 64 65 73 74 66 69 | 6c 65 6e 61 6d 65 24 2b |"+destfi|lename$+|
|00003380| 22 20 7e 43 20 44 20 46 | 20 7e 4c 20 7e 4e 20 7e |" ~C D F| ~L ~N ~|
|00003390| 50 20 7e 52 20 7e 56 22 | 0d 0f 5a 05 e1 0d 0f 64 |P ~R ~V"|..Z....d|
|000033a0| 05 3a 0d 0f 6e 0f dd f2 | 42 61 73 54 6f 54 65 78 |.:..n...|BasToTex|
|000033b0| 74 0d 0f 78 1c 69 6e 25 | 3d 8e 28 66 24 29 3a 62 |t..x.in%|=.(f$):b|
|000033c0| 25 3d 9a 23 69 6e 25 3a | d9 23 69 6e 25 0d 0f 82 |%=.#in%:|.#in%...|
|000033d0| 19 e7 20 62 25 3c 3e 31 | 33 20 f2 54 65 78 74 54 |.. b%<>1|3 .TextT|
|000033e0| 6f 42 61 73 3a e1 0d 0f | 8c 1d f2 73 65 74 5f 73 |oBas:...|...set_s|
|000033f0| 68 61 64 65 28 6d 5f 73 | 61 76 65 61 73 25 2c 30 |hade(m_s|aveas%,0|
|00003400| 2c b9 29 0d 0f 96 1d f2 | 73 65 74 5f 73 68 61 64 |,.).....|set_shad|
|00003410| 65 28 6d 5f 73 61 76 65 | 61 73 25 2c 31 2c a3 29 |e(m_save|as%,1,.)|
|00003420| 0d 0f a0 1d f2 73 65 74 | 5f 73 68 61 64 65 28 6d |.....set|_shade(m|
|00003430| 5f 73 61 76 65 61 73 25 | 2c 32 2c a3 29 0d 0f aa |_saveas%|,2,.)...|
|00003440| 25 53 6f 75 72 63 65 25 | 3d 26 46 46 42 3a f2 6d |%Source%|=&FFB:.m|
|00003450| 65 6e 75 28 6d 5f 73 61 | 76 65 61 73 25 2c 34 2c |enu(m_sa|veas%,4,|
|00003460| 30 29 0d 0f b4 05 e1 0d | 0f be 05 3a 0d 0f c8 11 |0)......|...:....|
|00003470| dd f2 42 61 73 54 6f 54 | 65 78 74 47 6f 0d 0f d2 |..BasToT|extGo...|
|00003480| 21 ea 20 6c 69 6e 65 25 | 2c 6c 65 6e 25 2c 62 25 |!. line%|,len%,b%|
|00003490| 2c 6c 6e 65 72 72 25 2c | 71 75 6f 74 65 25 0d 0f |,lnerr%,|quote%..|
|000034a0| dc 23 69 6e 25 3d 8e 28 | 73 6f 75 72 63 65 66 69 |.#in%=.(|sourcefi|
|000034b0| 6c 65 6e 61 6d 65 24 29 | 3a 62 25 3d 9a 23 69 6e |lename$)|:b%=.#in|
|000034c0| 25 0d 0f e6 4f 6f 75 74 | 25 3d ae 22 3c 57 69 6d |%...Oout|%=."<Wim|
|000034d0| 70 24 53 63 72 61 70 3e | 22 3a e7 20 6f 75 74 25 |p$Scrap>|":. out%|
|000034e0| 3d 30 20 d9 23 69 6e 25 | 3a f2 65 72 72 6f 72 28 |=0 .#in%|:.error(|
|000034f0| 32 31 34 2c 22 43 61 6e | 27 74 20 6f 70 65 6e 20 |214,"Can|'t open |
|00003500| 3c 57 69 6d 70 24 53 63 | 72 61 70 3e 22 29 3a e1 |<Wimp$Sc|rap>"):.|
|00003510| 0d 0f f0 15 c8 99 20 22 | 48 6f 75 72 67 6c 61 73 |...... "|Hourglas|
|00003520| 73 5f 4f 6e 22 0d 0f fa | 32 6c 69 6e 65 25 3d 9a |s_On"...|2line%=.|
|00003530| 23 69 6e 25 3a f5 3a 6c | 69 6e 65 25 3d 32 35 36 |#in%:.:l|ine%=256|
|00003540| 2a 6c 69 6e 65 25 2b 9a | 23 69 6e 25 3a 6c 65 6e |*line%+.|#in%:len|
|00003550| 25 3d 9a 23 69 6e 25 0d | 10 04 2d c8 99 20 22 48 |%=.#in%.|..-.. "H|
|00003560| 6f 75 72 67 6c 61 73 73 | 5f 50 65 72 63 65 6e 74 |ourglass|_Percent|
|00003570| 61 67 65 22 2c 8f 23 69 | 6e 25 2f a2 23 69 6e 25 |age",.#i|n%/.#in%|
|00003580| 2a 31 30 30 0d 10 0e 2b | e7 6e 75 6d 62 65 72 25 |*100...+|.number%|
|00003590| 20 d5 23 6f 75 74 25 2c | c4 35 2d a9 c3 6c 69 6e | .#out%,|.5-..lin|
|000035a0| 65 25 2c 22 20 22 29 2b | c3 6c 69 6e 65 25 3b 0d |e%," ")+|.line%;.|
|000035b0| 10 18 30 f5 3a 62 25 3d | 9a 23 69 6e 25 3a d5 23 |..0.:b%=|.#in%:.#|
|000035c0| 6f 75 74 25 2c a4 63 68 | 61 72 28 62 25 29 3b 3a |out%,.ch|ar(b%);:|
|000035d0| fd 62 25 3d 31 33 20 84 | 20 6c 6e 65 72 72 25 0d |.b%=13 .| lnerr%.|
|000035e0| 10 22 23 6c 69 6e 65 25 | 3d 9a 23 69 6e 25 3a fd |."#line%|=.#in%:.|
|000035f0| 6c 69 6e 65 25 3d 26 46 | 46 20 84 20 6c 6e 65 72 |line%=&F|F . lner|
|00003600| 72 25 0d 10 2c 30 d9 23 | 6f 75 74 25 3a d9 23 69 |r%..,0.#|out%:.#i|
|00003610| 6e 25 3a 69 6e 25 3d 30 | 3a 6f 75 74 25 3d 30 3a |n%:in%=0|:out%=0:|
|00003620| c8 99 20 22 48 6f 75 72 | 67 6c 61 73 73 5f 4f 66 |.. "Hour|glass_Of|
|00003630| 66 22 0d 10 36 24 e7 6c | 6e 65 72 72 25 20 6e 75 |f"..6$.l|nerr% nu|
|00003640| 6d 62 65 72 25 3d b9 3a | f2 42 61 73 54 6f 54 65 |mber%=.:|.BasToTe|
|00003650| 78 74 47 6f 3a e1 0d 10 | 40 28 e7 20 a6 2d 31 20 |xtGo:...|@(. .-1 |
|00003660| 6b 65 79 25 3d a3 3a f4 | 20 43 68 65 63 6b 20 53 |key%=.:.| Check S|
|00003670| 48 49 46 54 20 6f 6e 63 | 65 20 6d 6f 72 65 0d 10 |HIFT onc|e more..|
|00003680| 4a 47 e7 20 6b 65 79 25 | 20 ff 22 53 65 74 54 79 |JG. key%| ."SetTy|
|00003690| 70 65 20 3c 57 69 6d 70 | 24 53 63 72 61 70 3e 20 |pe <Wimp|$Scrap> |
|000036a0| 42 41 53 49 43 22 20 8b | 20 ff 22 53 65 74 54 79 |BASIC" .| ."SetTy|
|000036b0| 70 65 20 3c 57 69 6d 70 | 24 53 63 72 61 70 3e 20 |pe <Wimp|$Scrap> |
|000036c0| 54 65 78 74 22 0d 10 54 | 40 ff 22 43 6f 70 79 20 |Text"..T|@."Copy |
|000036d0| 3c 57 69 6d 70 24 53 63 | 72 61 70 3e 20 22 2b 64 |<Wimp$Sc|rap> "+d|
|000036e0| 65 73 74 66 69 6c 65 6e | 61 6d 65 24 2b 22 20 7e |estfilen|ame$+" ~|
|000036f0| 43 20 44 20 46 20 7e 4c | 20 7e 4e 20 7e 50 20 7e |C D F ~L| ~N ~P ~|
|00003700| 52 20 7e 56 22 0d 10 5e | 05 e1 0d 10 68 05 3a 0d |R ~V"..^|....h.:.|
|00003710| 10 72 22 dd a4 63 68 61 | 72 28 62 25 29 3a ea 20 |.r"..cha|r(b%):. |
|00003720| 61 24 2c 62 24 3a e7 62 | 25 3d 31 33 3a 3d bd 31 |a$,b$:.b|%=13:=.1|
|00003730| 30 0d 10 7c 19 e7 62 25 | 3d 33 34 20 71 75 6f 74 |0..|..b%|=34 quot|
|00003740| 65 25 3d ac 71 75 6f 74 | 65 25 0d 10 86 19 e7 62 |e%=.quot|e%.....b|
|00003750| 25 3c 31 32 37 20 84 20 | 71 75 6f 74 65 25 3a 3d |%<127 . |quote%:=|
|00003760| bd 62 25 0d 10 90 12 e7 | 62 25 3d 31 34 31 3a 3d |.b%.....|b%=141:=|
|00003770| a4 6c 69 6e 65 0d 10 9a | 24 e7 62 25 3e 26 43 35 |.line...|$.b%>&C5|
|00003780| 20 80 20 62 25 3c 26 43 | 39 20 62 25 3d 62 25 2a | . b%<&C|9 b%=b%*|
|00003790| 32 35 36 2b 9a 23 69 6e | 25 0d 10 a4 26 f7 3a f5 |256+.#in|%...&.:.|
|000037a0| 3a f3 20 61 24 2c 62 24 | 3a fd a0 61 24 3d 62 25 |:. a$,b$|:..a$=b%|
|000037b0| 20 84 20 61 24 3d 22 26 | 30 30 22 3a 3d 62 24 0d | . a$="&|00":=b$.|
|000037c0| 10 ae 05 3a 0d 10 b8 18 | dd a4 6c 69 6e 65 3a ea |...:....|..line:.|
|000037d0| 20 6c 31 25 2c 6c 32 25 | 2c 6c 33 25 0d 10 c2 34 | l1%,l2%|,l3%...4|
|000037e0| 6c 31 25 3d 9a 23 69 6e | 25 3a 6c 32 25 3d 9a 23 |l1%=.#in|%:l2%=.#|
|000037f0| 69 6e 25 3a 6c 33 25 3d | 9a 23 69 6e 25 3a e7 ac |in%:l3%=|.#in%:..|
|00003800| 6e 75 6d 62 65 72 25 20 | 6c 6e 65 72 72 25 3d b9 |number% |lnerr%=.|
|00003810| 0d 10 cc 48 3d c3 28 28 | 6c 32 25 20 80 20 36 33 |...H=.((|l2% . 63|
|00003820| 29 2b 28 6c 33 25 20 80 | 20 36 33 29 2a 32 35 36 |)+(l3% .| 63)*256|
|00003830| 2b 28 28 6c 31 25 20 80 | 20 26 33 30 29 82 26 31 |+((l1% .| &30).&1|
|00003840| 30 29 2a 34 2b 28 28 6c | 31 25 80 26 43 29 82 26 |0)*4+((l|1%.&C).&|
|00003850| 34 29 2a 34 30 39 36 29 | 0d 10 d6 05 3a 0d 10 e0 |4)*4096)|....:...|
|00003860| 0f dd f2 54 65 78 74 54 | 6f 42 61 73 0d 10 ea 1d |...TextT|oBas....|
|00003870| f2 73 65 74 5f 73 68 61 | 64 65 28 6d 5f 73 61 76 |.set_sha|de(m_sav|
|00003880| 65 61 73 25 2c 30 2c a3 | 29 0d 10 f4 1d f2 73 65 |eas%,0,.|).....se|
|00003890| 74 5f 73 68 61 64 65 28 | 6d 5f 73 61 76 65 61 73 |t_shade(|m_saveas|
|000038a0| 25 2c 31 2c b9 29 0d 10 | fe 1d f2 73 65 74 5f 73 |%,1,.)..|...set_s|
|000038b0| 68 61 64 65 28 6d 5f 73 | 61 76 65 61 73 25 2c 32 |hade(m_s|aveas%,2|
|000038c0| 2c b9 29 0d 11 08 25 53 | 6f 75 72 63 65 25 3d 26 |,.)...%S|ource%=&|
|000038d0| 46 46 46 3a f2 6d 65 6e | 75 28 6d 5f 73 61 76 65 |FFF:.men|u(m_save|
|000038e0| 61 73 25 2c 34 2c 30 29 | 0d 11 12 05 e1 0d 11 1c |as%,4,0)|........|
|000038f0| 05 3a 0d 11 26 11 dd f2 | 54 65 78 74 54 6f 42 61 |.:..&...|TextToBa|
|00003900| 73 47 6f 0d 11 30 51 ff | 22 43 6f 70 79 20 22 2b |sGo..0Q.|"Copy "+|
|00003910| 73 6f 75 72 63 65 66 69 | 6c 65 6e 61 6d 65 24 2b |sourcefi|lename$+|
|00003920| 22 20 3c 57 69 6d 70 24 | 53 63 72 61 70 44 69 72 |" <Wimp$|ScrapDir|
|00003930| 3e 2e 42 61 73 43 6f 6e | 76 54 6d 70 20 7e 43 20 |>.BasCon|vTmp ~C |
|00003940| 7e 44 20 46 20 7e 4c 20 | 7e 4e 20 7e 50 20 7e 52 |~D F ~L |~N ~P ~R|
|00003950| 20 7e 56 22 0d 11 3a 30 | ff 22 53 65 74 54 79 70 | ~V"..:0|."SetTyp|
|00003960| 65 20 3c 57 69 6d 70 24 | 53 63 72 61 70 44 69 72 |e <Wimp$|ScrapDir|
|00003970| 3e 2e 42 61 73 43 6f 6e | 76 54 6d 70 20 20 42 61 |>.BasCon|vTmp Ba|
|00003980| 73 69 63 22 0d 11 44 55 | 6f 75 74 25 3d ae 22 3c |sic"..DU|out%=."<|
|00003990| 57 69 6d 70 24 53 63 72 | 61 70 44 69 72 3e 2e 45 |Wimp$Scr|apDir>.E|
|000039a0| 78 65 63 46 69 6c 65 22 | 3a d5 23 6f 75 74 25 2c |xecFile"|:.#out%,|
|000039b0| 22 2a 42 61 73 69 63 20 | 2d 6c 6f 61 64 20 3c 57 |"*Basic |-load <W|
|000039c0| 69 6d 70 24 53 63 72 61 | 70 44 69 72 3e 2e 42 61 |imp$Scra|pDir>.Ba|
|000039d0| 73 43 6f 6e 76 54 6d 70 | 22 0d 11 4e 27 d5 23 6f |sConvTmp|"..N'.#o|
|000039e0| 75 74 25 2c 22 53 41 56 | 45 20 22 22 22 2b 64 65 |ut%,"SAV|E """+de|
|000039f0| 73 74 66 69 6c 65 6e 61 | 6d 65 24 2b 22 22 22 22 |stfilena|me$+""""|
|00003a00| 0d 11 58 37 d5 23 6f 75 | 74 25 2c 22 53 59 53 20 |..X7.#ou|t%,"SYS |
|00003a10| 22 22 57 69 6d 70 5f 43 | 6f 6d 6d 61 6e 64 57 69 |""Wimp_C|ommandWi|
|00003a20| 6e 64 6f 77 22 22 2c 2d | 31 3a 2a 51 75 69 74 22 |ndow"",-|1:*Quit"|
|00003a30| 3a d9 23 6f 75 74 25 0d | 11 62 54 ff 22 53 65 74 |:.#out%.|.bT."Set|
|00003a40| 54 79 70 65 20 3c 57 69 | 6d 70 24 53 63 72 61 70 |Type <Wi|mp$Scrap|
|00003a50| 44 69 72 3e 2e 45 78 65 | 63 46 69 6c 65 20 43 6f |Dir>.Exe|cFile Co|
|00003a60| 6d 6d 61 6e 64 22 3a ff | 22 57 69 6d 70 54 61 73 |mmand":.|"WimpTas|
|00003a70| 6b 20 3c 57 69 6d 70 24 | 53 63 72 61 70 44 69 72 |k <Wimp$|ScrapDir|
|00003a80| 3e 2e 45 78 65 63 46 69 | 6c 65 22 0d 11 6c 26 ff |>.ExecFi|le"..l&.|
|00003a90| 22 44 65 6c 65 74 65 20 | 3c 57 69 6d 70 24 53 63 |"Delete |<Wimp$Sc|
|00003aa0| 72 61 70 44 69 72 3e 2e | 45 78 65 63 46 69 6c 65 |rapDir>.|ExecFile|
|00003ab0| 22 0d 11 76 05 e1 0d 11 | 80 05 3a 0d 11 8a 4d f4 |"..v....|..:...M.|
|00003ac0| 20 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d | -------|--------|
|00003ad0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003ae0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003af0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003b00| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 11 94 14 f4 20 4f 6c |--------|..... Ol|
|00003b10| 64 65 72 20 76 65 72 73 | 69 6f 6e 3a 0d 11 9e 0e |der vers|ion:....|
|00003b20| ea 20 61 24 2c 6c 69 6e | 65 25 0d 11 a8 59 69 6e |. a$,lin|e%...Yin|
|00003b30| 25 3d 8e 28 66 24 29 3a | 6f 75 74 25 3d ae 22 3c |%=.(f$):|out%=."<|
|00003b40| 57 69 6d 70 24 53 63 72 | 61 70 3e 22 3a e7 20 6f |Wimp$Scr|ap>":. o|
|00003b50| 75 74 25 3d 30 20 d9 23 | 69 6e 25 3a f2 65 72 72 |ut%=0 .#|in%:.err|
|00003b60| 6f 72 28 32 31 34 2c 22 | 43 61 6e 27 74 20 6f 70 |or(214,"|Can't op|
|00003b70| 65 6e 20 3c 57 69 6d 70 | 24 53 63 72 61 70 3e 22 |en <Wimp|$Scrap>"|
|00003b80| 29 3a e1 0d 11 b2 15 c8 | 99 20 22 48 6f 75 72 67 |):......|. "Hourg|
|00003b90| 6c 61 73 73 5f 4f 6e 22 | 0d 11 bc 2f f5 3a c8 99 |lass_On"|.../.:..|
|00003ba0| 20 22 48 6f 75 72 67 6c | 61 73 73 5f 50 65 72 63 | "Hourgl|ass_Perc|
|00003bb0| 65 6e 74 61 67 65 22 2c | 8f 23 69 6e 25 2f a2 23 |entage",|.#in%/.#|
|00003bc0| 69 6e 25 2a 31 30 30 0d | 11 c6 16 61 24 3d be 23 |in%*100.|...a$=.#|
|00003bd0| 69 6e 25 3a f2 63 6f 6e | 76 28 61 24 29 0d 11 d0 |in%:.con|v(a$)...|
|00003be0| 1f fd c5 23 69 6e 25 3a | d5 23 6f 75 74 25 2c 31 |...#in%:|.#out%,1|
|00003bf0| 33 3a d5 23 6f 75 74 25 | 2c 26 46 46 0d 11 da 1d |3:.#out%|,&FF....|
|00003c00| d9 23 6f 75 74 25 3a d9 | 23 69 6e 25 3a 6f 75 74 |.#out%:.|#in%:out|
|00003c10| 25 3d 30 3a 69 6e 25 3d | 30 0d 11 e4 21 ff 22 53 |%=0:in%=|0...!."S|
|00003c20| 65 74 54 79 70 65 20 3c | 57 69 6d 70 24 53 63 72 |etType <|Wimp$Scr|
|00003c30| 61 70 3e 20 42 41 53 49 | 43 22 0d 11 ee 35 ff 22 |ap> BASI|C"...5."|
|00003c40| 43 6f 70 79 20 3c 57 69 | 6d 70 24 53 63 72 61 70 |Copy <Wi|mp$Scrap|
|00003c50| 3e 20 22 2b 66 24 2b 22 | 20 7e 43 20 44 20 46 20 |> "+f$+"| ~C D F |
|00003c60| 7e 4c 20 7e 4e 20 7e 50 | 20 7e 52 20 7e 56 22 0d |~L ~N ~P| ~R ~V".|
|00003c70| 11 f8 16 c8 99 20 22 48 | 6f 75 72 67 6c 61 73 73 |..... "H|ourglass|
|00003c80| 5f 4f 66 66 22 0d 12 02 | 05 e1 0d 12 0c 05 3a 0d |_Off"...|......:.|
|00003c90| 12 16 0e dd f2 63 6f 6e | 76 28 61 24 29 0d 12 20 |.....con|v(a$).. |
|00003ca0| 0b ea 20 62 24 2c 66 25 | 0d 12 2a 1d c8 95 20 c0 |.. b$,f%|..*... .|
|00003cb0| 61 24 2c 31 29 3d 22 20 | 22 20 61 24 3d c1 61 24 |a$,1)=" |" a$=.a$|
|00003cc0| 2c 32 29 3a ce 0d 12 34 | 74 e7 c0 61 24 2c 31 29 |,2):...4|t..a$,1)|
|00003cd0| 3e 3d 22 30 22 20 80 20 | c0 61 24 2c 31 29 3c 3d |>="0" . |.a$,1)<=|
|00003ce0| 22 39 22 20 8c 20 6c 69 | 6e 65 25 3d 30 3a f5 3a |"9" . li|ne%=0:.:|
|00003cf0| 6c 69 6e 65 25 3d 6c 69 | 6e 65 25 2a 31 30 2b 97 |line%=li|ne%*10+.|
|00003d00| 61 24 2d 34 38 3a 61 24 | 3d c1 61 24 2c 32 29 3a |a$-48:a$|=.a$,2):|
|00003d10| fd c0 61 24 2c 31 29 3c | 22 30 22 20 84 20 c0 61 |..a$,1)<|"0" . .a|
|00003d20| 24 2c 31 29 3e 22 39 22 | 20 8b 20 6c 69 6e 65 25 |$,1)>"9"| . line%|
|00003d30| 3d 6c 69 6e 65 25 2b 31 | 30 0d 12 3e 2f d5 23 6f |=line%+1|0..>/.#o|
|00003d40| 75 74 25 2c 31 33 3a d5 | 23 6f 75 74 25 2c 6c 69 |ut%,13:.|#out%,li|
|00003d50| 6e 65 25 81 32 35 36 3a | d5 23 6f 75 74 25 2c 6c |ne%.256:|.#out%,l|
|00003d60| 69 6e 65 25 80 26 46 46 | 0d 12 48 12 f5 3a f2 62 |ine%.&FF|..H..:.b|
|00003d70| 79 74 65 3a fd 61 24 3d | 22 22 0d 12 52 1b d5 23 |yte:.a$=|""..R..#|
|00003d80| 6f 75 74 25 2c 34 2b a9 | 62 24 3a d5 23 6f 75 74 |out%,4+.|b$:.#out|
|00003d90| 25 2c 62 24 3b 0d 12 5c | 05 e1 0d 12 66 05 3a 0d |%,b$;..\|....f.:.|
|00003da0| 12 70 13 dd f2 62 79 74 | 65 3a e7 61 24 3d 22 22 |.p...byt|e:.a$=""|
|00003db0| 20 e1 0d 12 7a 26 62 25 | 3d a4 74 6f 6b 65 6e 3a | ...z&b%|=.token:|
|00003dc0| e7 20 62 25 3e 26 46 46 | 20 62 24 3d 62 24 2b bd |. b%>&FF| b$=b$+.|
|00003dd0| 28 62 25 81 32 35 36 29 | 0d 12 84 17 62 24 3d 62 |(b%.256)|....b$=b|
|00003de0| 24 2b bd 62 25 3a e7 62 | 25 3e 26 46 46 20 e1 0d |$+.b%:.b|%>&FF ..|
|00003df0| 12 8e 21 e7 20 28 66 25 | 20 80 20 31 29 3d 30 20 |..!. (f%| . 1)=0 |
|00003e00| 80 20 62 25 3d 97 22 3a | 22 20 66 25 3d 30 3a e1 |. b%=.":|" f%=0:.|
|00003e10| 0d 12 98 39 e7 20 28 66 | 25 3d 30 20 80 20 62 25 |...9. (f|%=0 . b%|
|00003e20| 3d 97 22 2a 22 29 20 84 | 20 62 25 3d 26 46 34 20 |=."*") .| b%=&F4 |
|00003e30| 84 20 62 25 3d 26 44 43 | 20 62 24 3d 62 24 2b 61 |. b%=&DC| b$=b$+a|
|00003e40| 24 3a 61 24 3d 22 22 3a | e1 0d 12 a2 0d 66 25 3d |$:a$="":|.....f%=|
|00003e50| 66 25 20 84 20 34 0d 12 | ac 15 e7 20 62 25 3d 33 |f% . 4..|... b%=3|
|00003e60| 34 3a 66 25 3d 66 25 82 | 31 3a e1 0d 12 b6 1c e7 |4:f%=f%.|1:......|
|00003e70| 20 62 25 3d 26 41 34 20 | 84 20 62 25 3d 26 46 32 | b%=&A4 |. b%=&F2|
|00003e80| 20 66 25 3d 32 3a e1 0d | 12 c0 05 e1 0d 12 ca 05 | f%=2:..|........|
|00003e90| 3a 0d 12 d4 0b dd a4 74 | 6f 6b 65 6e 0d 12 de 0e |:......t|oken....|
|00003ea0| ea 20 64 25 2c 68 24 2c | 74 24 0d 12 e8 1e e7 61 |. d%,h$,|t$.....a|
|00003eb0| 24 3c 22 41 22 20 84 20 | 61 24 3e 22 7a 22 20 66 |$<"A" . |a$>"z" f|
|00003ec0| 25 3d 66 25 80 26 46 44 | 0d 12 f2 32 e7 61 24 3c |%=f%.&FD|...2.a$<|
|00003ed0| 22 41 22 20 84 20 61 24 | 3e 22 5a 22 20 84 20 28 |"A" . a$|>"Z" . (|
|00003ee0| 66 25 80 33 29 3a 64 25 | 3d 97 61 24 3a 61 24 3d |f%.3):d%|=.a$:a$=|
|00003ef0| c1 61 24 2c 32 29 3a 3d | 64 25 0d 12 fc 11 64 25 |.a$,2):=|d%....d%|
|00003f00| 3d a7 61 24 2c 22 2e 22 | 29 3a f7 0d 13 06 0d f5 |=.a$,"."|):......|
|00003f10| 3a f3 20 68 24 2c 74 24 | 0d 13 10 3a fd 68 24 3d |:. h$,t$|...:.h$=|
|00003f20| 22 26 30 30 22 20 84 20 | c0 61 24 2c a9 74 24 29 |"&00" . |.a$,.t$)|
|00003f30| 3d 74 24 20 84 20 28 64 | 25 3e 30 20 80 20 c0 61 |=t$ . (d|%>0 . .a|
|00003f40| 24 2c 64 25 2d 31 29 3d | c0 74 24 2c 64 25 2d 31 |$,d%-1)=|.t$,d%-1|
|00003f50| 29 29 0d 13 1a 23 e7 20 | 68 24 3d 22 26 30 30 22 |))...#. |h$="&00"|
|00003f60| 3a 64 25 3d 97 61 24 3a | 61 24 3d c1 61 24 2c 32 |:d%=.a$:|a$=.a$,2|
|00003f70| 29 3a 3d 64 25 0d 13 24 | 26 e7 20 c0 61 24 2c a9 |):=d%..$|&. .a$,.|
|00003f80| 74 24 29 3d 74 24 3a 61 | 24 3d c1 61 24 2c a9 74 |t$)=t$:a|$=.a$,.t|
|00003f90| 24 2b 31 29 3a 3d a0 28 | 68 24 29 0d 13 2e 17 61 |$+1):=.(|h$)....a|
|00003fa0| 24 3d c1 61 24 2c 64 25 | 2b 31 29 3a 3d a0 28 68 |$=.a$,d%|+1):=.(h|
|00003fb0| 24 29 0d 13 38 05 3a 0d | 13 42 0d f4 20 54 6f 6b |$)..8.:.|.B.. Tok|
|00003fc0| 65 6e 73 3a 0d 13 4c 40 | f4 20 28 43 6f 75 6c 64 |ens:..L@|. (Could|
|00003fd0| 20 72 65 70 6c 61 63 65 | 20 74 68 69 73 20 62 79 | replace| this by|
|00003fe0| 20 6c 6f 6f 6b 69 6e 67 | 20 69 6e 20 74 68 65 20 | looking| in the |
|00003ff0| 42 41 53 49 43 20 6d 6f | 64 75 6c 65 20 69 74 73 |BASIC mo|dule its|
|00004000| 65 6c 66 29 0d 13 56 05 | 3a 0d 13 60 4a dc 20 26 |elf)..V.|:..`J. &|
|00004010| 38 30 2c 41 4e 44 2c 26 | 39 34 2c 41 42 53 2c 26 |80,AND,&|94,ABS,&|
|00004020| 39 35 2c 41 43 53 2c 26 | 39 36 2c 41 44 56 41 4c |95,ACS,&|96,ADVAL|
|00004030| 2c 26 39 37 2c 41 53 43 | 2c 26 39 38 2c 41 53 4e |,&97,ASC|,&98,ASN|
|00004040| 2c 26 39 39 2c 41 54 4e | 2c 26 43 37 38 46 2c 41 |,&99,ATN|,&C78F,A|
|00004050| 55 54 4f 0d 13 6a 5a dc | 20 26 43 36 38 45 2c 41 |UTO..jZ.| &C68E,A|
|00004060| 50 50 45 4e 44 2c 26 39 | 41 2c 42 47 45 54 2c 26 |PPEND,&9|A,BGET,&|
|00004070| 44 35 2c 42 50 55 54 2c | 26 43 38 39 45 2c 42 45 |D5,BPUT,|&C89E,BE|
|00004080| 41 54 53 2c 26 43 36 38 | 46 2c 42 45 41 54 2c 26 |ATS,&C68|F,BEAT,&|
|00004090| 46 42 2c 43 4f 4c 4f 55 | 52 2c 26 44 36 2c 43 41 |FB,COLOU|R,&D6,CA|
|000040a0| 4c 4c 2c 26 43 38 38 45 | 2c 43 41 53 45 0d 13 74 |LL,&C88E|,CASE..t|
|000040b0| 4e dc 20 26 44 37 2c 43 | 48 41 49 4e 2c 26 42 44 |N. &D7,C|HAIN,&BD|
|000040c0| 2c 43 48 52 24 2c 26 44 | 38 2c 43 4c 45 41 52 2c |,CHR$,&D|8,CLEAR,|
|000040d0| 26 44 39 2c 43 4c 4f 53 | 45 2c 26 44 41 2c 43 4c |&D9,CLOS|E,&DA,CL|
|000040e0| 47 2c 26 44 42 2c 43 4c | 53 2c 26 39 42 2c 43 4f |G,&DB,CL|S,&9B,CO|
|000040f0| 53 2c 26 39 43 2c 43 4f | 55 4e 54 0d 13 7e 52 dc |S,&9C,CO|UNT..~R.|
|00004100| 20 26 43 38 38 46 2c 43 | 49 52 43 4c 45 2c 26 46 | &C88F,C|IRCLE,&F|
|00004110| 42 2c 43 4f 4c 4f 52 2c | 26 44 43 2c 44 41 54 41 |B,COLOR,|&DC,DATA|
|00004120| 2c 26 39 44 2c 44 45 47 | 2c 26 44 44 2c 44 45 46 |,&9D,DEG|,&DD,DEF|
|00004130| 2c 26 43 37 39 30 2c 44 | 45 4c 45 54 45 2c 26 38 |,&C790,D|ELETE,&8|
|00004140| 31 2c 44 49 56 2c 26 44 | 45 2c 44 49 4d 0d 13 88 |1,DIV,&D|E,DIM...|
|00004150| 5d dc 20 26 44 46 2c 44 | 52 41 57 2c 26 45 31 2c |]. &DF,D|RAW,&E1,|
|00004160| 45 4e 44 50 52 4f 43 2c | 26 43 37 39 31 2c 45 44 |ENDPROC,|&C791,ED|
|00004170| 49 54 2c 26 43 45 2c 45 | 4e 44 57 48 49 4c 45 2c |IT,&CE,E|NDWHILE,|
|00004180| 26 43 42 2c 45 4e 44 43 | 41 53 45 2c 26 43 44 2c |&CB,ENDC|ASE,&CD,|
|00004190| 45 4e 44 49 46 2c 26 45 | 30 2c 45 4e 44 2c 26 45 |ENDIF,&E|0,END,&E|
|000041a0| 32 2c 45 4e 56 45 4c 4f | 50 45 0d 13 92 52 dc 20 |2,ENVELO|PE...R. |
|000041b0| 26 43 43 2c 45 4c 53 45 | 2c 26 38 42 2c 45 4c 53 |&CC,ELSE|,&8B,ELS|
|000041c0| 45 2c 26 41 30 2c 45 56 | 41 4c 2c 26 39 45 2c 45 |E,&A0,EV|AL,&9E,E|
|000041d0| 52 4c 2c 26 38 35 2c 45 | 52 52 4f 52 2c 26 43 35 |RL,&85,E|RROR,&C5|
|000041e0| 2c 45 4f 46 2c 26 38 32 | 2c 45 4f 52 2c 26 39 46 |,EOF,&82|,EOR,&9F|
|000041f0| 2c 45 52 52 2c 26 41 31 | 2c 45 58 50 0d 13 9c 51 |,ERR,&A1|,EXP...Q|
|00004200| dc 20 26 41 32 2c 45 58 | 54 2c 26 43 38 39 44 2c |. &A2,EX|T,&C89D,|
|00004210| 45 4c 4c 49 50 53 45 2c | 26 45 33 2c 46 4f 52 2c |ELLIPSE,|&E3,FOR,|
|00004220| 26 41 33 2c 46 41 4c 53 | 45 2c 26 43 38 39 30 2c |&A3,FALS|E,&C890,|
|00004230| 46 49 4c 4c 2c 26 41 34 | 2c 46 4e 2c 26 45 35 2c |FILL,&A4|,FN,&E5,|
|00004240| 47 4f 54 4f 2c 26 42 45 | 2c 47 45 54 24 0d 13 a6 |GOTO,&BE|,GET$...|
|00004250| 51 dc 20 26 41 35 2c 47 | 45 54 2c 26 45 34 2c 47 |Q. &A5,G|ET,&E4,G|
|00004260| 4f 53 55 42 2c 26 45 36 | 2c 47 43 4f 4c 2c 26 39 |OSUB,&E6|,GCOL,&9|
|00004270| 33 2c 48 49 4d 45 4d 2c | 26 43 36 39 32 2c 48 45 |3,HIMEM,|&C692,HE|
|00004280| 4c 50 2c 26 45 38 2c 49 | 4e 50 55 54 2c 26 45 37 |LP,&E8,I|NPUT,&E7|
|00004290| 2c 49 46 2c 26 42 46 2c | 49 4e 4b 45 59 24 0d 13 |,IF,&BF,|INKEY$..|
|000042a0| b0 59 dc 20 26 41 36 2c | 49 4e 4b 45 59 2c 26 41 |.Y. &A6,|INKEY,&A|
|000042b0| 38 2c 49 4e 54 2c 26 41 | 37 2c 49 4e 53 54 52 28 |8,INT,&A|7,INSTR(|
|000042c0| 2c 26 43 38 39 41 2c 49 | 4e 53 54 41 4c 4c 2c 26 |,&C89A,I|NSTALL,&|
|000042d0| 43 37 39 33 2c 4c 49 53 | 54 2c 26 38 36 2c 4c 49 |C793,LIS|T,&86,LI|
|000042e0| 4e 45 2c 26 43 36 39 34 | 2c 4c 4f 41 44 2c 26 39 |NE,&C694|,LOAD,&9|
|000042f0| 32 2c 4c 4f 4d 45 4d 0d | 13 ba 52 dc 20 26 45 41 |2,LOMEM.|..R. &EA|
|00004300| 2c 4c 4f 43 41 4c 2c 26 | 43 30 2c 4c 45 46 54 24 |,LOCAL,&|C0,LEFT$|
|00004310| 28 2c 26 41 39 2c 4c 45 | 4e 2c 26 45 39 2c 4c 45 |(,&A9,LE|N,&E9,LE|
|00004320| 54 2c 26 41 42 2c 4c 4f | 47 2c 26 41 41 2c 4c 4e |T,&AB,LO|G,&AA,LN|
|00004330| 2c 26 43 38 39 42 2c 4c | 49 42 52 41 52 59 2c 26 |,&C89B,L|IBRARY,&|
|00004340| 43 36 39 35 2c 4c 56 41 | 52 0d 13 c4 50 dc 20 26 |C695,LVA|R...P. &|
|00004350| 43 31 2c 4d 49 44 24 28 | 2c 26 45 42 2c 4d 4f 44 |C1,MID$(|,&EB,MOD|
|00004360| 45 2c 26 38 33 2c 4d 4f | 44 2c 26 45 43 2c 4d 4f |E,&83,MO|D,&EC,MO|
|00004370| 56 45 2c 26 43 38 39 37 | 2c 4d 4f 55 53 45 2c 26 |VE,&C897|,MOUSE,&|
|00004380| 45 44 2c 4e 45 58 54 2c | 26 43 36 39 36 2c 4e 45 |ED,NEXT,|&C696,NE|
|00004390| 57 2c 26 41 43 2c 4e 4f | 54 0d 13 ce 50 dc 20 26 |W,&AC,NO|T...P. &|
|000043a0| 43 36 39 37 2c 4f 4c 44 | 2c 26 45 45 2c 4f 4e 2c |C697,OLD|,&EE,ON,|
|000043b0| 26 38 37 2c 4f 46 46 2c | 26 43 41 2c 4f 46 2c 26 |&87,OFF,|&CA,OF,&|
|000043c0| 43 38 39 31 2c 4f 52 49 | 47 49 4e 2c 26 38 34 2c |C891,ORI|GIN,&84,|
|000043d0| 4f 52 2c 26 38 45 2c 4f | 50 45 4e 49 4e 2c 26 41 |OR,&8E,O|PENIN,&A|
|000043e0| 45 2c 4f 50 45 4e 4f 55 | 54 0d 13 d8 58 dc 20 26 |E,OPENOU|T...X. &|
|000043f0| 41 44 2c 4f 50 45 4e 55 | 50 2c 26 46 46 2c 4f 53 |AD,OPENU|P,&FF,OS|
|00004400| 43 4c 49 2c 26 37 46 2c | 4f 54 48 45 52 57 49 53 |CLI,&7F,|OTHERWIS|
|00004410| 45 2c 26 43 38 41 33 2c | 4f 56 45 52 4c 41 59 2c |E,&C8A3,|OVERLAY,|
|00004420| 26 46 31 2c 50 52 49 4e | 54 2c 26 39 30 2c 50 41 |&F1,PRIN|T,&90,PA|
|00004430| 47 45 2c 26 38 46 2c 50 | 54 52 2c 26 41 46 2c 50 |GE,&8F,P|TR,&AF,P|
|00004440| 49 0d 13 e2 57 dc 20 26 | 46 30 2c 50 4c 4f 54 2c |I...W. &|F0,PLOT,|
|00004450| 26 42 30 2c 50 4f 49 4e | 54 28 2c 26 43 38 39 32 |&B0,POIN|T(,&C892|
|00004460| 2c 50 4f 49 4e 54 2c 26 | 46 32 2c 50 52 4f 43 2c |,POINT,&|F2,PROC,|
|00004470| 26 42 31 2c 50 4f 53 2c | 26 43 38 39 38 2c 51 55 |&B1,POS,|&C898,QU|
|00004480| 49 54 2c 26 46 38 2c 52 | 45 54 55 52 4e 2c 26 46 |IT,&F8,R|ETURN,&F|
|00004490| 35 2c 52 45 50 45 41 54 | 0d 13 ec 51 dc 20 26 46 |5,REPEAT|...Q. &F|
|000044a0| 36 2c 52 45 50 4f 52 54 | 2c 26 46 33 2c 52 45 41 |6,REPORT|,&F3,REA|
|000044b0| 44 2c 26 46 34 2c 52 45 | 4d 2c 26 46 39 2c 52 55 |D,&F4,RE|M,&F9,RU|
|000044c0| 4e 2c 26 42 32 2c 52 41 | 44 2c 26 46 37 2c 52 45 |N,&B2,RA|D,&F7,RE|
|000044d0| 53 54 4f 52 45 2c 26 43 | 32 2c 52 49 47 48 54 24 |STORE,&C|2,RIGHT$|
|000044e0| 28 2c 26 42 33 2c 52 4e | 44 0d 13 f6 5a dc 20 26 |(,&B3,RN|D...Z. &|
|000044f0| 43 38 39 33 2c 52 45 43 | 54 41 4e 47 4c 45 2c 26 |C893,REC|TANGLE,&|
|00004500| 43 37 39 38 2c 52 45 4e | 55 4d 42 45 52 2c 26 38 |C798,REN|UMBER,&8|
|00004510| 38 2c 53 54 45 50 2c 26 | 43 36 39 39 2c 53 41 56 |8,STEP,&|C699,SAV|
|00004520| 45 2c 26 42 34 2c 53 47 | 4e 2c 26 42 35 2c 53 49 |E,&B4,SG|N,&B5,SI|
|00004530| 4e 2c 26 42 36 2c 53 51 | 52 2c 26 44 34 2c 53 4f |N,&B6,SQ|R,&D4,SO|
|00004540| 55 4e 44 0d 14 00 58 dc | 20 26 38 39 2c 53 50 43 |UND...X.| &89,SPC|
|00004550| 2c 26 43 33 2c 53 54 52 | 24 2c 26 43 34 2c 53 54 |,&C3,STR|$,&C4,ST|
|00004560| 52 49 4e 47 24 28 2c 26 | 46 41 2c 53 54 4f 50 2c |RING$(,&|FA,STOP,|
|00004570| 26 43 38 41 32 2c 53 54 | 45 52 45 4f 2c 26 43 36 |&C8A2,ST|EREO,&C6|
|00004580| 38 45 2c 53 55 4d 2c 26 | 43 38 39 34 2c 53 57 41 |8E,SUM,&|C894,SWA|
|00004590| 50 2c 26 43 38 39 39 2c | 53 59 53 0d 14 0a 50 dc |P,&C899,|SYS...P.|
|000045a0| 20 26 42 37 2c 54 41 4e | 2c 26 38 41 2c 54 41 42 | &B7,TAN|,&8A,TAB|
|000045b0| 28 2c 26 43 38 39 46 2c | 54 45 4d 50 4f 2c 26 38 |(,&C89F,|TEMPO,&8|
|000045c0| 43 2c 54 48 45 4e 2c 26 | 39 31 2c 54 49 4d 45 2c |C,THEN,&|91,TIME,|
|000045d0| 26 43 38 39 43 2c 54 49 | 4e 54 2c 26 42 38 2c 54 |&C89C,TI|NT,&B8,T|
|000045e0| 4f 2c 26 46 43 2c 54 52 | 41 43 45 0d 14 14 50 dc |O,&FC,TR|ACE...P.|
|000045f0| 20 26 42 39 2c 54 52 55 | 45 2c 26 43 36 39 42 2c | &B9,TRU|E,&C69B,|
|00004600| 54 57 49 4e 4f 2c 26 43 | 36 39 41 2c 54 57 49 4e |TWINO,&C|69A,TWIN|
|00004610| 2c 26 46 44 2c 55 4e 54 | 49 4c 2c 26 42 41 2c 55 |,&FD,UNT|IL,&BA,U|
|00004620| 53 52 2c 26 45 46 2c 56 | 44 55 2c 26 42 42 2c 56 |SR,&EF,V|DU,&BB,V|
|00004630| 41 4c 2c 26 42 43 2c 56 | 50 4f 53 0d 14 1e 48 dc |AL,&BC,V|POS...H.|
|00004640| 20 26 43 38 41 30 2c 56 | 4f 49 43 45 53 2c 26 43 | &C8A0,V|OICES,&C|
|00004650| 38 41 31 2c 56 4f 49 43 | 45 2c 26 43 38 39 35 2c |8A1,VOIC|E,&C895,|
|00004660| 57 48 49 4c 45 2c 26 43 | 39 2c 57 48 45 4e 2c 26 |WHILE,&C|9,WHEN,&|
|00004670| 43 38 39 36 2c 57 41 49 | 54 2c 26 46 45 2c 57 49 |C896,WAI|T,&FE,WI|
|00004680| 44 54 48 0d 14 28 33 dc | 20 26 43 46 2c 50 54 52 |DTH..(3.| &CF,PTR|
|00004690| 2c 26 44 30 2c 50 41 47 | 45 2c 26 44 31 2c 54 49 |,&D0,PAG|E,&D1,TI|
|000046a0| 4d 45 2c 26 44 32 2c 4c | 4f 4d 45 4d 2c 26 44 33 |ME,&D2,L|OMEM,&D3|
|000046b0| 2c 48 49 4d 45 4d 0d 14 | 32 1c dc 20 26 30 30 2c |,HIMEM..|2.. &00,|
|000046c0| 5b 75 6e 6c 69 73 74 61 | 62 6c 65 20 74 6f 6b 65 |[unlista|ble toke|
|000046d0| 6e 5d 0d ff 46 69 6c 65 | 44 61 74 61 82 21 53 70 |n]..File|Data.!Sp|
|000046e0| 72 69 74 65 73 00 3a 3b | 2c 07 00 00 44 f9 ff ff |rites.:;|,...D...|
|000046f0| a4 cd da aa 03 00 36 2f | 06 00 00 00 10 00 00 00 |......6/|........|
|00004700| 30 07 00 00 d4 02 00 00 | 21 62 61 73 63 6f 6e 76 |0.......|!basconv|
|00004710| 00 00 00 00 04 00 00 00 | 10 00 00 00 00 00 00 00 |........|........|
|00004720| 07 00 00 00 2c 00 00 00 | 80 01 00 00 0c 00 00 00 |....,...|........|
|00004730| 00 00 00 00 00 00 00 00 | 00 70 77 77 77 77 77 77 |........|.pwwwwww|
|00004740| 77 00 00 00 00 00 00 00 | 00 00 00 00 00 70 00 00 |w.......|.....p..|
|00004750| 00 00 00 00 70 00 00 00 | 00 00 00 00 70 77 77 77 |....p...|....pwww|
|00004760| 07 70 70 07 77 07 07 80 | 7f 00 00 00 00 00 00 00 |.pp.w...|........|
|00004770| 70 77 77 77 07 70 00 00 | 00 00 00 f8 78 00 00 00 |pwww.p..|....x...|
|00004780| 00 00 00 70 70 70 00 00 | 00 70 70 07 77 77 80 8f |...ppp..|.pp.ww..|
|00004790| 70 00 00 00 00 00 00 70 | 77 77 00 00 00 70 00 00 |p......p|ww...p..|
|000047a0| 00 00 f8 08 70 00 00 00 | 00 00 00 00 77 07 00 00 |....p...|....w...|
|000047b0| 00 70 70 77 07 a0 89 00 | 70 00 00 00 00 00 00 00 |.ppw....|p.......|
|000047c0| 70 00 00 00 00 70 00 00 | 00 aa 00 00 70 00 00 00 |p....p..|....p...|
|000047d0| 77 77 77 77 77 77 77 77 | 77 77 77 77 77 77 77 77 |wwwwwwww|wwwwwwww|
|000047e0| 77 00 00 00 87 88 88 88 | 88 88 88 88 77 00 00 00 |w.......|....w...|
|000047f0| 00 70 77 00 00 00 00 00 | 87 08 00 80 00 80 80 88 |.pw.....|........|
|00004800| 77 00 00 00 00 77 77 07 | 00 00 00 00 87 88 88 88 |w....ww.|........|
|00004810| 88 88 88 88 77 00 00 00 | 00 77 77 07 00 00 00 00 |....w...|.ww.....|
|00004820| 87 88 08 00 00 88 00 80 | 77 77 77 77 77 77 07 07 |........|wwwwww..|
|00004830| 00 00 00 00 87 88 88 88 | 88 88 88 88 77 00 77 77 |........|....w.ww|
|00004840| 77 77 07 00 00 00 00 00 | 87 08 00 08 00 00 88 88 |ww......|........|
|00004850| 77 00 77 77 77 77 07 00 | 00 00 00 00 87 88 88 88 |w.wwww..|........|
|00004860| 88 88 88 88 77 00 00 00 | 00 00 00 00 00 00 00 00 |....w...|........|
|00004870| 77 77 77 77 77 77 77 77 | 77 00 00 00 00 00 00 00 |wwwwwwww|w.......|
|00004880| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 f0 ff ff |........|........|
|00004890| ff ff ff ff ff ff ff ff | 00 00 00 00 00 00 00 00 |........|........|
|000048a0| 00 f0 ff ff ff ff ff ff | ff ff ff ff 00 00 00 00 |........|........|
|000048b0| f0 ff ff ff 0f f0 ff ff | ff ff ff ff ff ff ff ff |........|........|
|000048c0| 00 00 00 00 f0 00 00 00 | 00 f0 ff ff ff ff ff ff |........|........|
|000048d0| ff ff ff ff 00 00 00 f0 | f0 f0 00 00 00 f0 ff ff |........|........|
|000048e0| ff ff ff ff ff ff ff ff | 00 00 00 00 ff 0f 00 00 |........|........|
|000048f0| 00 f0 ff ff ff ff ff ff | ff ff ff ff 00 00 00 00 |........|........|
|00004900| f0 00 00 00 00 f0 ff ff | ff ff ff ff ff ff ff ff |........|........|
|00004910| 00 00 00 00 00 00 00 00 | 00 f0 ff ff ff ff ff ff |........|........|
|00004920| ff ff ff ff ff ff ff ff | ff ff ff ff 0f f0 ff ff |........|........|
|00004930| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00004940| 0f 00 00 00 00 00 00 00 | 00 ff ff ff ff ff ff ff |........|........|
|00004950| ff ff ff ff 0f 00 00 00 | 00 00 0f 00 00 ff ff ff |........|........|
|00004960| ff ff ff ff ff ff ff ff | 0f 00 00 00 00 f0 ff 00 |........|........|
|00004970| 00 ff ff ff ff ff ff ff | ff ff ff ff 0f 00 00 00 |........|........|
|00004980| 00 0f 0f 0f 00 ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00004990| 0f 00 00 00 00 00 0f 00 | 00 ff ff ff ff ff ff ff |........|........|
|000049a0| ff ff ff ff 0f 00 ff ff | ff ff 0f 00 00 ff ff ff |........|........|
|000049b0| ff ff ff ff ff ff ff ff | 0f 00 00 00 00 00 00 00 |........|........|
|000049c0| 00 ff ff ff ff ff ff ff | ff ff ff ff 0f 00 00 00 |........|........|
|000049d0| 00 00 00 00 00 ff ff ff | 98 00 00 00 73 6d 61 6c |........|....smal|
|000049e0| 6c 5f 66 66 62 00 00 00 | 02 00 00 00 08 00 00 00 |l_ffb...|........|
|000049f0| 00 00 00 00 07 00 00 00 | 2c 00 00 00 2c 00 00 00 |........|,...,...|
|00004a00| 0c 00 00 00 77 77 77 77 | 77 77 77 77 77 00 00 70 |....wwww|wwwww..p|
|00004a10| 77 88 88 88 88 88 88 88 | 77 00 00 70 77 88 00 80 |w.......|w..pw...|
|00004a20| 00 80 80 88 77 00 00 70 | 77 88 88 88 88 88 88 88 |....w..p|w.......|
|00004a30| 77 00 00 70 77 88 88 00 | 80 08 00 88 77 00 00 70 |w..pw...|....w..p|
|00004a40| 77 88 88 88 88 88 88 88 | 77 00 00 70 77 88 00 80 |w.......|w..pw...|
|00004a50| 00 00 88 88 77 00 00 70 | 77 88 88 88 88 88 88 88 |....w..p|w.......|
|00004a60| 77 00 00 70 77 77 77 77 | 77 77 77 77 77 00 00 80 |w..pwwww|wwwww...|
|00004a70| 98 00 00 00 73 6d 61 6c | 6c 5f 66 66 66 00 00 00 |....smal|l_fff...|
|00004a80| 02 00 00 00 08 00 00 00 | 00 00 00 00 07 00 00 00 |........|........|
|00004a90| 2c 00 00 00 2c 00 00 00 | 0c 00 00 00 77 77 77 77 |,...,...|....wwww|
|00004aa0| 77 77 77 77 77 00 00 70 | 77 00 00 00 00 00 00 08 |wwwww..p|w.......|
|00004ab0| 77 00 00 70 77 70 07 77 | 70 77 80 8f 77 00 00 70 |w..pwp.w|pw..w..p|
|00004ac0| 77 00 00 00 00 00 f8 08 | 77 00 00 70 77 70 70 77 |w.......|w..pwppw|
|00004ad0| 07 80 8f 00 77 00 00 70 | 77 00 00 00 00 f8 08 00 |....w..p|w.......|
|00004ae0| 77 00 00 70 77 70 77 07 | e0 89 00 00 77 00 00 70 |w..pwpw.|....w..p|
|00004af0| 77 00 00 00 ee 00 00 00 | 77 00 00 70 77 77 77 77 |w.......|w..pwwww|
|00004b00| 77 77 77 77 77 00 00 80 | 04 01 00 00 73 6d 21 62 |wwwww...|....sm!b|
|00004b10| 61 73 63 6f 6e 76 00 00 | 02 00 00 00 08 00 00 00 |asconv..|........|
|00004b20| 00 00 00 00 0b 00 00 00 | 2c 00 00 00 98 00 00 00 |........|,.......|
|00004b30| 0c 00 00 00 00 70 77 77 | 07 70 77 77 77 07 00 00 |.....pww|.pwww...|
|00004b40| 00 70 00 00 00 70 70 70 | 07 07 00 00 00 77 07 00 |.p...ppp|.....w..|
|00004b50| 00 70 00 07 00 07 00 00 | 00 70 00 00 00 70 70 70 |.p......|.p...ppp|
|00004b60| 00 07 00 00 77 77 77 77 | 00 70 77 77 77 07 00 00 |....wwww|.pwww...|
|00004b70| 87 00 08 77 00 00 00 70 | 00 00 00 00 87 88 88 77 |...w...p|.......w|
|00004b80| 00 00 00 77 07 00 00 00 | 87 80 80 77 00 00 00 70 |...w....|...w...p|
|00004b90| 00 00 00 00 77 77 77 77 | 00 77 77 77 00 00 00 00 |....wwww|.www....|
|00004ba0| 00 f0 ff ff 0f f0 ff ff | ff ff ff ff 00 f0 00 00 |........|........|
|00004bb0| 00 f0 ff ff ff ff ff ff | 00 ff 0f 00 00 f0 ff ff |........|........|
|00004bc0| ff ff ff ff 00 f0 00 00 | 00 f0 ff ff ff ff ff ff |........|........|
|00004bd0| ff ff ff ff 00 f0 ff ff | ff ff ff ff ff ff ff ff |........|........|
|00004be0| 00 00 00 f0 00 f0 ff ff | ff ff ff ff 00 00 00 ff |........|........|
|00004bf0| 0f f0 ff ff ff ff ff ff | 00 00 00 f0 00 f0 ff ff |........|........|
|00004c00| ff ff ff ff 00 ff ff ff | 00 f0 ff ff 80 01 00 00 |........|........|
|00004c10| 66 69 6c 65 5f 62 62 64 | 00 00 00 00 04 00 00 00 |file_bbd|........|
|00004c20| 10 00 00 00 00 00 00 00 | 07 00 00 00 2c 00 00 00 |........|....,...|
|00004c30| 2c 00 00 00 0c 00 00 00 | 77 77 77 77 77 77 77 77 |,.......|wwwwwwww|
|00004c40| 77 77 77 77 77 77 77 77 | 77 00 00 00 77 bb bb bb |wwwwwwww|w...w...|
|00004c50| bb bb bb bb bb bb bb bb | bb bb bb bb 77 00 00 00 |........|....w...|
|00004c60| 77 bb 0b 00 b0 0b 00 b0 | 00 00 0b 00 00 00 bb bb |w.......|........|
|00004c70| 77 00 00 00 77 bb bb bb | bb bb bb bb bb bb bb bb |w...w...|........|
|00004c80| bb bb bb bb 77 00 00 00 | 77 bb 0b 00 b0 bb 0b 00 |....w...|w.......|
|00004c90| b0 00 00 bb bb bb bb bb | 77 00 00 00 77 bb bb bb |........|w...w...|
|00004ca0| bb bb bb bb bb bb bb bb | bb bb bb bb 77 00 00 00 |........|....w...|
|00004cb0| 77 bb 0b 00 b0 bb 0b b0 | 00 00 00 bb bb bb bb bb |w.......|........|
|00004cc0| 77 00 00 00 77 bb bb bb | bb bb bb bb bb bb bb bb |w...w...|........|
|00004cd0| bb bb bb bb 77 00 00 00 | 77 bb 00 00 b0 0b 00 00 |....w...|w.......|
|00004ce0| bb bb bb bb bb bb bb bb | 77 00 00 00 77 bb bb bb |........|w...w...|
|00004cf0| bb bb bb bb bb bb bb bb | bb bb bb bb 77 00 00 00 |........|....w...|
|00004d00| 77 bb 00 00 b0 0b 00 b0 | 00 00 b0 00 00 0b 00 b0 |w.......|........|
|00004d10| 77 00 00 00 77 bb bb bb | bb bb bb bb bb bb bb bb |w...w...|........|
|00004d20| bb bb bb bb 77 00 00 00 | 77 bb bb bb bb 0b b0 00 |....w...|w.......|
|00004d30| 00 0b 00 00 0b 00 bb bb | 77 00 00 00 77 bb bb bb |........|w...w...|
|00004d40| bb bb bb bb bb bb bb bb | bb bb bb bb 77 00 00 00 |........|....w...|
|00004d50| 77 bb 00 00 b0 0b 00 00 | 0b b0 bb bb bb bb bb bb |w.......|........|
|00004d60| 77 00 00 00 77 bb bb bb | bb bb bb bb bb bb bb bb |w...w...|........|
|00004d70| bb bb bb bb 77 00 00 00 | 77 77 77 77 77 77 77 77 |....w...|wwwwwwww|
|00004d80| 77 77 77 77 77 77 77 77 | 77 4c 04 18 98 00 00 00 |wwwwwwww|wL......|
|00004d90| 73 6d 61 6c 6c 5f 62 62 | 64 00 00 00 02 00 00 00 |small_bb|d.......|
|00004da0| 08 00 00 00 00 00 00 00 | 07 00 00 00 2c 00 00 00 |........|....,...|
|00004db0| 2c 00 00 00 0c 00 00 00 | 77 77 77 77 77 77 77 77 |,.......|wwwwwwww|
|00004dc0| 77 00 00 70 77 bb bb bb | bb bb bb bb 77 00 00 70 |w..pw...|....w..p|
|00004dd0| 77 bb 00 b0 00 b0 b0 bb | 77 00 00 70 77 bb bb bb |w.......|w..pw...|
|00004de0| bb bb bb bb 77 00 00 70 | 77 bb bb 00 b0 0b 00 bb |....w..p|w.......|
|00004df0| 77 00 00 70 77 bb bb bb | bb bb bb bb 77 00 00 70 |w..pw...|....w..p|
|00004e00| 77 bb 00 b0 00 00 bb bb | 77 00 00 70 77 bb bb bb |w.......|w..pw...|
|00004e10| bb bb bb bb 77 00 00 70 | 77 77 77 77 77 77 77 77 |....w..p|wwwwwwww|
|00004e20| 77 00 00 80 46 69 6c 65 | 44 61 74 61 82 47 65 74 |w...File|Data.Get|
|00004e30| 54 6f 6b 65 6e 73 00 3b | 39 01 00 00 44 fb ff ff |Tokens.;|9...D...|
|00004e40| e2 6b b6 75 03 00 f1 7c | 0d 00 0a 11 f4 20 3e 20 |.k.u...||..... > |
|00004e50| 47 65 74 54 6f 6b 65 6e | 73 0d 00 14 0f 41 25 3d |GetToken|s....A%=|
|00004e60| 26 33 38 33 34 30 34 34 | 0d 00 1e 12 4e 25 3d 30 |&3834044|....N%=0|
|00004e70| 3a f1 22 44 41 54 41 20 | 22 3b 0d 00 28 05 f5 0d |:."DATA |";..(...|
|00004e80| 00 32 1a 41 24 3d 22 22 | 3a f5 3a 42 25 3d 3f 41 |.2.A$=""|:.:B%=?A|
|00004e90| 25 3a 41 25 3d 41 25 2b | 31 0d 00 3c 1e e7 20 42 |%:A%=A%+|1..<.. B|
|00004ea0| 25 3e 33 31 20 80 20 42 | 25 3c 31 32 37 20 41 24 |%>31 . B|%<127 A$|
|00004eb0| 3d 41 24 2b bd 42 25 0d | 00 46 0c fd 20 42 25 3e |=A$+.B%.|.F.. B%>|
|00004ec0| 31 32 36 0d 00 50 15 42 | 25 3d 42 25 2b 32 35 36 |126..P.B|%=B%+256|
|00004ed0| 2a a4 78 28 3f 41 25 29 | 0d 00 5a 1c 41 25 3d 41 |*.x(?A%)|..Z.A%=A|
|00004ee0| 25 2b 31 3a f1 22 26 22 | 3b 7e 42 25 3b 22 2c 22 |%+1:."&"|;~B%;","|
|00004ef0| 3b 41 24 3b 0d 00 64 2a | 4e 25 3d 4e 25 2b 31 3a |;A$;..d*|N%=N%+1:|
|00004f00| e7 20 4e 25 3d 38 20 f1 | 27 22 44 41 54 41 20 22 |. N%=8 .|'"DATA "|
|00004f10| 3b 3a 4e 25 3d 30 20 8b | 20 f1 22 2c 22 3b 0d 00 |;:N%=0 .| .",";..|
|00004f20| 6e 10 fd c0 41 24 2c 32 | 29 3d 22 20 75 22 0d 00 |n...A$,2|)=" u"..|
|00004f30| 78 05 e0 0d 00 82 18 dd | a4 78 28 61 25 29 3a e7 |x.......|.x(a%):.|
|00004f40| 28 61 25 80 38 29 3d 30 | 3a 3d 30 0d 00 8c 16 e7 |(a%.8)=0|:=0.....|
|00004f50| 28 61 25 80 26 46 30 29 | 3d 26 34 30 3a 3d 26 43 |(a%.&F0)|=&40:=&C|
|00004f60| 38 0d 00 96 16 e7 28 61 | 25 80 26 46 30 29 3d 26 |8.....(a|%.&F0)=&|
|00004f70| 30 30 3a 3d 26 43 36 0d | 00 a0 08 3d 26 43 37 0d |00:=&C6.|...=&C7.|
|00004f80| ff 46 69 6c 65 44 61 74 | 61 82 4d 65 6e 75 4c 69 |.FileDat|a.MenuLi|
|00004f90| 62 00 39 3a 3b 33 08 00 | 00 44 fb ff ff 11 c0 ba |b.9:;3..|.D......|
|00004fa0| 99 03 00 6a d1 0d 00 0a | 0f f4 20 3e 20 4d 65 6e |...j....|.. > Men|
|00004fb0| 75 4c 69 62 0d 00 14 15 | f4 20 4d 65 6e 75 69 6e |uLib....|. Menuin|
|00004fc0| 67 20 6c 69 62 72 61 72 | 79 0d 00 1e 05 3a 0d 00 |g librar|y....:..|
|00004fd0| 28 14 dd 20 a4 63 72 6d | 65 6e 75 28 6d 65 6e 75 |(.. .crm|enu(menu|
|00004fe0| 24 29 0d 00 32 34 e7 20 | 6d 65 6e 75 66 72 65 65 |$)..24. |menufree|
|00004ff0| 25 2b 32 38 20 3e 20 6d | 65 6e 75 65 6e 64 25 20 |%+28 > m|enuend% |
|00005000| 8c 20 85 20 31 2c 22 4d | 65 6e 75 20 61 72 65 61 |. . 1,"M|enu area|
|00005010| 20 66 75 6c 6c 22 0d 00 | 3c 23 ea 20 6d 25 2c 69 | full"..|<#. m%,i|
|00005020| 25 3a 6d 65 6e 75 70 74 | 72 25 3d 6d 65 6e 75 66 |%:menupt|r%=menuf|
|00005030| 72 65 65 25 3a 69 25 3d | 30 0d 00 46 3f e7 20 c0 |ree%:i%=|0..F?. .|
|00005040| 6d 65 6e 75 24 2c 31 29 | 3d 22 23 22 20 8c 20 69 |menu$,1)|="#" . i|
|00005050| 25 3d 31 3a 6d 65 6e 75 | 74 69 74 6c 65 24 3d a4 |%=1:menu|title$=.|
|00005060| 70 61 72 28 22 2c 22 29 | 20 8b 20 6d 65 6e 75 74 |par(",")| . menut|
|00005070| 69 74 6c 65 24 3d 22 22 | 0d 00 50 ff 24 6d 65 6e |itle$=""|..P.$men|
|00005080| 75 70 74 72 25 3d 6d 65 | 6e 75 74 69 74 6c 65 24 |uptr%=me|nutitle$|
|00005090| 3a 6d 65 6e 75 70 74 72 | 25 3f 31 32 3d 60 74 66 |:menuptr|%?12=`tf|
|000050a0| 63 6f 6c 3a 6d 65 6e 75 | 70 74 72 25 3f 31 33 3d |col:menu|ptr%?13=|
|000050b0| 32 3a 6d 65 6e 75 70 74 | 72 25 3f 31 34 3d 60 77 |2:menupt|r%?14=`w|
|000050c0| 66 63 6f 6c 3a 6d 65 6e | 75 70 74 72 25 3f 31 35 |fcol:men|uptr%?15|
|000050d0| 3d 60 77 62 63 6f 6c 3a | 6d 65 6e 75 70 74 72 25 |=`wbcol:|menuptr%|
|000050e0| 21 31 36 3d 31 39 36 2d | 32 34 3a 6d 65 6e 75 70 |!16=196-|24:menup|
|000050f0| 74 72 25 21 32 30 3d 34 | 34 3a 6d 65 6e 75 70 74 |tr%!20=4|4:menupt|
|00005100| 72 25 21 32 34 3d 30 3a | 6d 65 6e 75 70 74 72 25 |r%!24=0:|menuptr%|
|00005110| 2b 3d 32 38 3a 6d 61 78 | 78 25 3d a9 6d 65 6e 75 |+=28:max|x%=.menu|
|00005120| 74 69 74 6c 65 24 2d 33 | 3a f5 20 69 74 65 6d 24 |title$-3|:. item$|
|00005130| 3d a4 70 61 72 28 22 2c | 22 29 3a f2 6d 65 6e 75 |=.par(",|"):.menu|
|00005140| 69 74 65 6d 28 69 74 65 | 6d 24 29 3a fd 20 69 74 |item(ite|m$):. it|
|00005150| 65 6d 24 3d 22 22 3a 6d | 25 3d 6d 65 6e 75 66 72 |em$="":m|%=menufr|
|00005160| 65 65 25 3a 6d 25 21 31 | 36 3d 28 6d 61 78 78 25 |ee%:m%!1|6=(maxx%|
|00005170| 2a 38 2b 36 29 2a 32 0d | 00 5a 1a 6d 65 6e 75 66 |*8+6)*2.|.Z.menuf|
|00005180| 72 65 65 25 3d 6d 65 6e | 75 70 74 72 25 3a 3d 6d |ree%=men|uptr%:=m|
|00005190| 25 0d 00 64 45 dd 20 f2 | 6d 65 6e 75 69 74 65 6d |%..dE. .|menuitem|
|000051a0| 28 74 65 78 74 24 29 3a | e7 20 74 65 78 74 24 3d |(text$):|. text$=|
|000051b0| 22 22 20 8c 20 6d 65 6e | 75 70 74 72 25 21 2d 32 |"" . men|uptr%!-2|
|000051c0| 34 3d 28 6d 65 6e 75 70 | 74 72 25 21 2d 32 34 29 |4=(menup|tr%!-24)|
|000051d0| 84 26 38 30 3a e1 0d 00 | 6e 33 e7 20 6d 65 6e 75 |.&80:...|n3. menu|
|000051e0| 70 74 72 25 2b 32 34 20 | 3e 20 6d 65 6e 75 65 6e |ptr%+24 |> menuen|
|000051f0| 64 25 20 8c 20 85 20 31 | 2c 22 4d 65 6e 75 20 61 |d% . . 1|,"Menu a|
|00005200| 72 65 61 20 66 75 6c 6c | 22 0d 00 78 40 ea 69 25 |rea full|"..x@.i%|
|00005210| 2c 66 6c 67 25 2c 56 25 | 3a 66 6c 67 25 3d 26 30 |,flg%,V%|:flg%=&0|
|00005220| 30 3a e7 c0 74 65 78 74 | 24 2c 31 29 3d 22 21 22 |0:..text|$,1)="!"|
|00005230| 20 66 6c 67 25 3d 26 30 | 38 3a 74 65 78 74 24 3d | flg%=&0|8:text$=|
|00005240| c1 74 65 78 74 24 2c 32 | 29 0d 00 82 45 69 25 3d |.text$,2|)...Ei%=|
|00005250| a7 74 65 78 74 24 2c 22 | 3e 22 29 3a e7 20 c2 74 |.text$,"|>"):. .t|
|00005260| 65 78 74 24 2c 31 29 3d | 22 23 22 20 8c 20 74 65 |ext$,1)=|"#" . te|
|00005270| 78 74 24 3d c0 74 65 78 | 74 24 2c a9 74 65 78 74 |xt$=.tex|t$,.text|
|00005280| 24 2d 31 29 3a 66 6c 67 | 25 2b 3d 26 30 32 0d 00 |$-1):flg|%+=&02..|
|00005290| 8c 3d e7 69 25 3e 30 8c | 73 75 62 70 74 72 25 3d |.=.i%>0.|subptr%=|
|000052a0| a0 c1 74 65 78 74 24 2c | 69 25 2b 31 29 3a 74 65 |..text$,|i%+1):te|
|000052b0| 78 74 24 3d c0 74 65 78 | 74 24 2c 69 25 2d 31 29 |xt$=.tex|t$,i%-1)|
|000052c0| 8b 73 75 62 70 74 72 25 | 3d 2d 31 0d 00 96 4b 6d |.subptr%|=-1...Km|
|000052d0| 65 6e 75 70 74 72 25 21 | 30 3d 66 6c 67 25 3a 6d |enuptr%!|0=flg%:m|
|000052e0| 65 6e 75 70 74 72 25 21 | 34 3d 73 75 62 70 74 72 |enuptr%!|4=subptr|
|000052f0| 25 3a 6d 65 6e 75 70 74 | 72 25 21 38 3d 26 30 37 |%:menupt|r%!8=&07|
|00005300| 30 30 30 30 32 31 3a e7 | c0 74 65 78 74 24 2c 31 |000021:.|.text$,1|
|00005310| 29 3d 22 24 22 8c 0d 00 | a0 33 20 21 6d 65 6e 75 |)="$"...|.3 !menu|
|00005320| 70 74 72 25 2b 3d 26 30 | 34 3a 6d 65 6e 75 70 74 |ptr%+=&0|4:menupt|
|00005330| 72 25 21 38 2b 3d 26 31 | 30 38 3a 69 25 3d a7 74 |r%!8+=&1|08:i%=.t|
|00005340| 65 78 74 24 2c 22 28 22 | 29 0d 00 aa 36 20 e7 69 |ext$,"("|)...6 .i|
|00005350| 25 3e 30 20 8c 20 4c 25 | 3d bb c1 74 65 78 74 24 |%>0 . L%|=..text$|
|00005360| 2c 69 25 2b 31 29 3a 74 | 65 78 74 24 3d c0 74 65 |,i%+1):t|ext$=.te|
|00005370| 78 74 24 2c 69 25 2d 31 | 29 8b 4c 25 3d 31 32 0d |xt$,i%-1|).L%=12.|
|00005380| 00 b4 50 20 56 25 20 3d | 20 2d 31 3a 6d 65 6e 75 |..P V% =| -1:menu|
|00005390| 70 74 72 25 21 31 32 3d | a0 c1 74 65 78 74 24 2c |ptr%!12=|..text$,|
|000053a0| 32 29 3a 6d 65 6e 75 70 | 74 72 25 21 31 36 3d 2d |2):menup|tr%!16=-|
|000053b0| 31 3a 6d 65 6e 75 70 74 | 72 25 21 32 30 3d 4c 25 |1:menupt|r%!20=L%|
|000053c0| 3a 74 65 78 74 24 3d c4 | 4c 25 2c 22 20 22 29 0d |:text$=.|L%," ").|
|000053d0| 00 be 1a 20 e7 20 6d 61 | 78 78 25 3c 32 30 20 8c |... . ma|xx%<20 .|
|000053e0| 20 6d 61 78 78 25 3d 32 | 30 0d 00 c8 05 cc 0d 00 | maxx%=2|0.......|
|000053f0| d2 11 20 e7 a9 74 65 78 | 74 24 3c 3d 31 32 8c 0d |.. ..tex|t$<=12..|
|00005400| 00 dc 1a 20 20 24 28 6d | 65 6e 75 70 74 72 25 2b |... $(m|enuptr%+|
|00005410| 31 32 29 3d 74 65 78 74 | 24 0d 00 e6 28 20 cc 20 |12)=text|$...( . |
|00005420| 49 25 3d a4 77 6f 72 6b | 73 70 61 63 65 28 a9 74 |I%=.work|space(.t|
|00005430| 65 78 74 24 2b 31 29 3a | 24 49 25 3d 74 65 78 74 |ext$+1):|$I%=text|
|00005440| 24 0d 00 f0 38 20 20 6d | 65 6e 75 70 74 72 25 21 |$...8 m|enuptr%!|
|00005450| 31 32 3d 49 25 3a 6d 65 | 6e 75 70 74 72 25 21 31 |12=I%:me|nuptr%!1|
|00005460| 36 3d 2d 31 3a 6d 65 6e | 75 70 74 72 25 21 32 30 |6=-1:men|uptr%!20|
|00005470| 3d a9 74 65 78 74 24 2b | 31 0d 00 fa 22 20 20 6d |=.text$+|1..." m|
|00005480| 65 6e 75 70 74 72 25 21 | 38 3d 6d 65 6e 75 70 74 |enuptr%!|8=menupt|
|00005490| 72 25 21 38 20 84 20 26 | 31 30 30 0d 01 04 06 20 |r%!8 . &|100.... |
|000054a0| cd 0d 01 0e 1f e7 a9 74 | 65 78 74 24 3e 6d 61 78 |.......t|ext$>max|
|000054b0| 78 25 20 8c 6d 61 78 78 | 25 3d a9 74 65 78 74 24 |x% .maxx|%=.text$|
|000054c0| 0d 01 18 15 cd 3a 6d 65 | 6e 75 70 74 72 25 2b 3d |.....:me|nuptr%+=|
|000054d0| 32 34 3a e1 3a 0d 01 22 | 20 dd 20 f2 73 68 61 64 |24:.:.."| . .shad|
|000054e0| 65 28 6d 65 6e 75 68 61 | 6e 64 6c 65 25 2c 20 69 |e(menuha|ndle%, i|
|000054f0| 74 65 6d 25 29 0d 01 2c | 45 6d 65 6e 75 68 61 6e |tem%)..,|Emenuhan|
|00005500| 64 6c 65 25 21 28 32 38 | 2b 38 2b 32 34 2a 69 74 |dle%!(28|+8+24*it|
|00005510| 65 6d 25 29 3d 6d 65 6e | 75 68 61 6e 64 6c 65 25 |em%)=men|uhandle%|
|00005520| 21 28 32 38 2b 38 2b 32 | 34 2a 69 74 65 6d 25 29 |!(28+8+2|4*item%)|
|00005530| 82 26 34 30 30 30 30 30 | 3a e1 0d 01 36 5a dd 20 |.&400000|:...6Z. |
|00005540| a4 73 68 61 64 65 5f 73 | 74 61 74 75 73 28 6d 65 |.shade_s|tatus(me|
|00005550| 6e 75 68 61 6e 64 6c 65 | 25 2c 69 74 65 6d 25 29 |nuhandle|%,item%)|
|00005560| 20 3d 20 28 28 6d 65 6e | 75 68 61 6e 64 6c 65 25 | = ((men|uhandle%|
|00005570| 21 28 32 38 2b 38 2b 32 | 34 2a 69 74 65 6d 25 29 |!(28+8+2|4*item%)|
|00005580| 20 80 20 26 34 30 30 30 | 30 30 29 3d 26 34 30 30 | . &4000|00)=&400|
|00005590| 30 30 30 29 0d 01 40 32 | dd 20 f2 73 65 74 5f 73 |000)..@2|. .set_s|
|000055a0| 68 61 64 65 28 6d 65 6e | 75 68 61 6e 64 6c 65 25 |hade(men|uhandle%|
|000055b0| 2c 20 69 74 65 6d 25 2c | 20 76 61 6c 75 65 25 29 |, item%,| value%)|
|000055c0| 3a ea 20 73 74 25 0d 01 | 4a 2b 73 74 25 20 3d 20 |:. st%..|J+st% = |
|000055d0| a4 73 68 61 64 65 5f 73 | 74 61 74 75 73 28 6d 65 |.shade_s|tatus(me|
|000055e0| 6e 75 68 61 6e 64 6c 65 | 25 2c 20 69 74 65 6d 25 |nuhandle|%, item%|
|000055f0| 29 0d 01 54 30 e7 20 76 | 61 6c 75 65 25 20 3c 3e |)..T0. v|alue% <>|
|00005600| 20 73 74 25 20 8c 20 f2 | 73 68 61 64 65 28 6d 65 | st% . .|shade(me|
|00005610| 6e 75 68 61 6e 64 6c 65 | 25 2c 20 69 74 65 6d 25 |nuhandle|%, item%|
|00005620| 29 0d 01 5e 06 e1 3a 0d | 01 68 1e dd 20 f2 74 69 |)..^..:.|.h.. .ti|
|00005630| 63 6b 28 6d 65 6e 75 68 | 61 6e 64 6c 65 25 2c 69 |ck(menuh|andle%,i|
|00005640| 74 65 6d 25 29 0d 01 72 | 3d 6d 65 6e 75 68 61 6e |tem%)..r|=menuhan|
|00005650| 64 6c 65 25 21 28 32 38 | 2b 32 34 2a 69 74 65 6d |dle%!(28|+24*item|
|00005660| 25 29 3d 6d 65 6e 75 68 | 61 6e 64 6c 65 25 21 28 |%)=menuh|andle%!(|
|00005670| 32 38 2b 32 34 2a 69 74 | 65 6d 25 29 82 26 30 31 |28+24*it|em%).&01|
|00005680| 3a e1 0d 01 7c 44 dd 20 | a4 74 69 63 6b 5f 73 74 |:...|D. |.tick_st|
|00005690| 61 74 75 73 28 6d 65 6e | 75 68 61 6e 64 6c 65 25 |atus(men|uhandle%|
|000056a0| 2c 20 69 74 65 6d 25 29 | 20 3d 20 6d 65 6e 75 68 |, item%)| = menuh|
|000056b0| 61 6e 64 6c 65 25 21 28 | 32 38 2b 32 34 2a 69 74 |andle%!(|28+24*it|
|000056c0| 65 6d 25 29 80 31 0d 01 | 86 2b dd 20 f2 73 65 74 |em%).1..|.+. .set|
|000056d0| 5f 74 69 63 6b 28 6d 65 | 6e 75 68 61 6e 64 6c 65 |_tick(me|nuhandle|
|000056e0| 25 2c 20 69 74 65 6d 25 | 2c 20 76 61 6c 75 65 25 |%, item%|, value%|
|000056f0| 29 0d 01 90 4a e7 20 a4 | 74 69 63 6b 5f 73 74 61 |)...J. .|tick_sta|
|00005700| 74 75 73 28 6d 65 6e 75 | 68 61 6e 64 6c 65 25 2c |tus(menu|handle%,|
|00005710| 20 69 74 65 6d 25 29 3c | 3e 76 61 6c 75 65 25 20 | item%)<|>value% |
|00005720| 8c 20 f2 74 69 63 6b 28 | 6d 65 6e 75 68 61 6e 64 |. .tick(|menuhand|
|00005730| 6c 65 25 2c 20 69 74 65 | 6d 25 29 0d 01 9a 06 e1 |le%, ite|m%).....|
|00005740| 3a 0d 01 a4 39 dd f2 74 | 69 63 6b 69 74 28 6d 65 |:...9..t|ickit(me|
|00005750| 6e 75 25 2c 20 69 74 65 | 6d 25 2c 20 6e 69 74 65 |nu%, ite|m%, nite|
|00005760| 6d 73 25 29 3a ea 20 49 | 25 3a e3 20 49 25 3d 30 |ms%):. I|%:. I%=0|
|00005770| 20 b8 20 6e 69 74 65 6d | 73 25 0d 01 ae 3b f2 73 | . nitem|s%...;.s|
|00005780| 65 74 5f 74 69 63 6b 28 | 6d 65 6e 75 25 2c 20 49 |et_tick(|menu%, I|
|00005790| 25 2c 20 30 29 3a ed 3a | f2 73 65 74 5f 74 69 63 |%, 0):.:|.set_tic|
|000057a0| 6b 28 6d 65 6e 75 25 2c | 20 69 74 65 6d 25 2c 20 |k(menu%,| item%, |
|000057b0| 31 29 3a e1 3a 0d 01 b8 | 21 dd 20 a4 77 6f 72 6b |1):.:...|!. .work|
|000057c0| 73 70 61 63 65 28 4c 25 | 29 3a de 20 4c 25 20 4c |space(L%|):. L% L|
|000057d0| 25 3a 3d 20 4c 25 0d ff | 46 69 6c 65 44 61 74 61 |%:= L%..|FileData|
|000057e0| 82 54 65 6d 70 6c 61 74 | 65 73 00 3b cb 02 00 00 |.Templat|es.;....|
|000057f0| 44 ec ff ff 71 59 db aa | 03 00 0d d8 ff ff ff ff |D...qY..|........|
|00005800| 00 00 00 00 00 00 00 00 | 00 00 00 00 44 00 00 00 |........|....D...|
|00005810| ce 01 00 00 01 00 00 00 | 50 72 6f 67 49 6e 66 6f |........|ProgInfo|
|00005820| 0d 00 00 00 12 02 00 00 | b9 00 00 00 01 00 00 00 |........|........|
|00005830| 73 61 76 65 61 73 0d 70 | 77 99 ff ff 00 00 00 00 |saveas.p|w.......|
|00005840| 06 02 00 00 f4 02 00 00 | 82 04 00 00 cc 03 00 00 |........|........|
|00005850| 00 00 00 00 00 00 00 00 | 88 07 00 00 12 00 03 84 |........|........|
|00005860| 07 02 07 01 0c 0e 0c 00 | 00 00 00 00 00 fc ff ff |........|........|
|00005870| 00 05 00 00 00 00 00 00 | 3d 01 00 00 00 30 00 00 |........|=....0..|
|00005880| 01 00 00 00 00 00 00 00 | 78 01 00 00 ff ff ff ff |........|x.......|
|00005890| 13 00 00 00 09 00 00 00 | a4 02 00 00 34 ff ff ff |........|....4...|
|000058a0| 54 03 00 00 64 ff ff ff | 3d 30 00 b7 0d 4b 0d 74 |T...d...|=0...K.t|
|000058b0| 69 74 6c 65 64 3e 0d fe | 9a 00 00 00 cc ff ff ff |itled>..|........|
|000058c0| 76 02 00 00 fc ff ff ff | 3d 60 00 07 42 61 73 43 |v.......|=`..BasC|
|000058d0| 6f 6e 76 0d 28 00 00 00 | 9a 00 00 00 98 ff ff ff |onv.(...|........|
|000058e0| 76 02 00 00 c8 ff ff ff | 3d 61 00 07 8b 01 00 00 |v.......|=a......|
|000058f0| ff ff ff ff 1c 00 00 00 | 9a 00 00 00 64 ff ff ff |........|....d...|
|00005900| 76 02 00 00 94 ff ff ff | 3d 61 00 07 a7 01 00 00 |v.......|=a......|
|00005910| ff ff ff ff 28 00 00 00 | 9a 00 00 00 30 ff ff ff |....(...|....0...|
|00005920| 76 02 00 00 60 ff ff ff | 3d 61 00 07 bb 01 00 00 |v...`...|=a......|
|00005930| ff ff ff ff 1e 00 00 00 | 3e 00 00 00 d0 ff ff ff |........|>.......|
|00005940| 9a 00 00 00 f8 ff ff ff | 19 00 00 17 4e 61 6d 65 |........|....Name|
|00005950| 3a 0d 6c 65 64 3e 0d fe | 0e 00 00 00 9c ff ff ff |:.led>..|........|
|00005960| 9a 00 00 00 c4 ff ff ff | 19 00 00 17 50 75 72 70 |........|....Purp|
|00005970| 6f 73 65 3a 0d 3e 0d fe | 1e 00 00 00 68 ff ff ff |ose:.>..|....h...|
|00005980| 9a 00 00 00 90 ff ff ff | 19 00 00 17 41 75 74 68 |........|....Auth|
|00005990| 6f 72 3a 0d 64 3e 0d fe | 0e 00 00 00 38 ff ff ff |or:.d>..|....8...|
|000059a0| 9a 00 00 00 60 ff ff ff | 19 00 00 17 56 65 72 73 |....`...|....Vers|
|000059b0| 69 6f 6e 3a 0d 3e 0d fe | 41 62 6f 75 74 20 74 68 |ion:.>..|About th|
|000059c0| 69 73 20 70 72 6f 67 72 | 61 6d 0d 43 6f 6e 76 65 |is progr|am.Conve|
|000059d0| 72 74 20 42 61 73 69 63 | 20 70 72 6f 67 72 61 6d |rt Basic| program|
|000059e0| 20 66 69 6c 65 73 0d a9 | 20 31 39 39 33 2c 20 4a | files..| 1993, J|
|000059f0| 2e 47 2e 48 61 72 73 74 | 6f 6e 0d 30 2e 30 37 20 |.G.Harst|on.0.07 |
|00005a00| 28 31 36 20 4a 75 6e 20 | 31 39 39 33 29 0d de 01 |(16 Jun |1993)...|
|00005a10| 00 00 9c 01 00 00 de 02 | 00 00 44 02 00 00 00 00 |........|..D.....|
|00005a20| 00 00 00 00 00 00 6c 07 | 00 00 12 00 03 84 07 02 |......l.|........|
|00005a30| 07 01 03 01 02 00 00 00 | 00 00 00 fc ff ff 00 05 |........|........|
|00005a40| 00 00 00 00 00 00 3d 00 | 00 00 00 00 00 00 01 00 |......=.|........|
|00005a50| 00 00 00 00 00 00 53 61 | 76 65 20 61 73 3a 0d 3e |......Sa|ve as:.>|
|00005a60| 0d 0d 03 00 00 00 c2 00 | 00 00 60 ff ff ff f4 00 |........|..`.....|
|00005a70| 00 00 90 ff ff ff 3d 90 | 01 c7 4f 4b 0d 74 69 74 |......=.|..OK.tit|
|00005a80| 6c 65 64 3e 0d 64 08 00 | 00 00 60 ff ff ff bc 00 |led>.d..|..`.....|
|00005a90| 00 00 90 ff ff ff 3d f1 | 00 07 b8 00 00 00 ff ff |......=.|........|
|00005aa0| ff ff 00 01 00 00 5c 00 | 00 00 a4 ff ff ff a0 00 |......\.|........|
|00005ab0| 00 00 ec ff ff ff 02 60 | 00 d7 66 69 6c 65 5f 66 |.......`|..file_f|
|00005ac0| 66 39 0d 3e 0d 64 0d | |f9.>.d. | |
+--------+-------------------------+-------------------------+--------+--------+
