Multiple names: CSX.BAS, CSX 64 BOOT

00000000: 01 1C 20 1C E8 03 97 20  35 33 32 38 30 2C 30 3A  |.. .... 53280,0:|
00000010: 97 20 35 33 32 38 31 2C  30 3A 89 20 31 30 33 30  |. 53281,0:. 1030|
00000020: 00 3C 1C F2 03 F2 22 43  53 58 2E 42 41 53 22 3A  |.<...."CSX.BAS":|
00000030: EF 22 43 53 58 2E 42 41  53 22 3A 90 00 50 1C FC  |."CSX.BAS":..P..|
00000040: 03 A0 32 3A A0 33 3A A0  31 34 3A A0 31 35 3A 90  |..2:.3:.14:.15:.|
00000050: 00 95 1C 06 04 8F 20 22  3D 3D 3D 3D 3D 3D 3D 3D  |...... "========|
00000060: 3D 3D 3D 3D 3D 3D 3D 3D  3D 3D 3D 3D 3D 3D 3D 3D  |================|
00000070: 3D 3D 3D 3D 3D 3D 3D 3D  3D 3D 3D 3D 3D 3D 3D 3D  |================|
00000080: 3D 3D 3D 3D 3D 3D 3D 3D  3D 3D 3D 3D 3D 3D 3D 3D  |================|
00000090: 3D 3D 3D 3D 3D 00 D9 1C  10 04 8F 20 22 20 CD D3  |=====...... " ..|
000000A0: 2D C4 CF D3 20 C1 D2 C3  20 46 49 4C 45 20 44 49  |-... ... FILE DI|
000000B0: 53 53 4F 4C 56 45 52 2E  20 20 20 20 20 20 20 20  |SSOLVER.        |
000000C0: 20 20 20 28 C3 29 31 39  38 38 20 2D 20 C1 4D 50  |   (.)1988 - .MP|
000000D0: 45 52 45 20 CD 45 54 41  4C 00 1E 1D 1A 04 8F 20  |ERE .ETAL...... |
000000E0: 22 3D 3D 3D 3D 3D 3D 3D  3D 3D 3D 3D 3D 3D 3D 3D  |"===============|
000000F0: 3D 3D 3D 3D 3D 3D 3D 3D  3D 3D 3D 3D 3D 3D 3D 3D  |================|
00000100: 3D 3D 3D 3D 3D 3D 3D 3D  3D 3D 3D 3D 3D 3D 3D 3D  |================|
00000110: 3D 3D 3D 3D 3D 3D 3D 3D  3D 3D 3D 3D 3D 3D 00 53  |==============.S|
00000120: 1D 24 04 43 50 55 B2 36  34 3A 49 50 B2 31 32 3A  |.$.CPU.64:IP.12:|
00000130: 8B 20 C2 28 31 32 32 29  B2 C2 28 31 32 32 29 20  |. .(122)..(122) |
00000140: A7 20 49 50 B2 31 30 3A  43 50 55 B2 31 32 38 3A  |. IP.10:CPU.128:|
00000150: FE 02 30 00 80 1D 2E 04  8B 20 C2 28 49 50 AC 34  |..0...... .(IP.4|
00000160: 30 39 36 29 B2 37 36 20  AF 20 C2 28 49 50 AC 34  |096).76 . .(IP.4|
00000170: 30 39 36 AA 32 34 29 B2  37 36 20 A7 20 58 B2 31  |096.24).76 . X.1|
00000180: 00 AE 1D 38 04 91 20 58  20 89 20 31 31 30 30 3A  |...8.. X . 1100:|
00000190: 58 B2 31 3A 8B 20 43 50  55 B2 36 34 20 A7 20 93  |X.1:. CPU.64 . .|
000001A0: 22 43 53 58 36 34 2E 4D  4C 22 2C 38 2C 31 00 CE  |"CSX64.ML",8,1..|
000001B0: 1D 42 04 FE 11 22 43 53  58 31 32 38 2E 4D 4C 22  |.B..."CSX128.ML"|
000001C0: 2C 42 30 2C 50 28 49 50  AC 34 30 39 36 29 00 08  |,B0,P(IP.4096)..|
000001D0: 1E 4C 04 8B 20 43 50 55  B2 36 34 20 A7 20 4D 45  |.L.. CPU.64 . ME|
000001E0: 4D B2 35 35 3A 97 20 4D  45 4D 2C 30 3A 97 20 4D  |M.55:. MEM,0:. M|
000001F0: 45 4D AA 31 2C 34 AC 31  36 3A 9C 3A 43 50 55 B2  |EM.1,4.16:.:CPU.|
00000200: 36 34 3A 49 50 B2 31 32  00 2C 1E 56 04 8B 20 43  |64:IP.12.,.V.. C|
00000210: 50 55 B2 31 32 38 20 AF  20 28 C2 28 32 31 35 29  |PU.128 . (.(215)|
00000220: 20 AF 20 31 32 38 29 20  A7 20 FE 25 00 32 1E 60  | . 128) . .%.2.`|
00000230: 04 3A 00 57 1E 6A 04 49  41 B2 49 50 AC 34 30 39  |.:.W.j.IA.IP.409|
00000240: 36 3A 8F 20 22 C9 4E 49  54 49 41 4C 49 5A 45 20  |6:. ".NITIALIZE |
00000250: 41 52 43 48 49 56 45 00  79 1E 74 04 47 48 B2 49  |ARCHIVE.y.t.GH.I|
00000260: 41 AA 33 20 20 20 3A 8F  20 22 C7 45 54 20 4E 45  |A.3   :. ".ET NE|
00000270: 58 54 20 48 45 41 44 45  52 00 A1 1E 7E 04 49 45  |XT HEADER...~.IE|
00000280: B2 47 48 AA 33 20 20 20  3A 8F 20 22 C9 4E 49 54  |.GH.3   :. ".NIT|
00000290: 49 41 4C 49 5A 45 20 54  48 49 53 20 45 4E 54 52  |IALIZE THIS ENTR|
000002A0: 59 00 CC 1E 88 04 44 41  B2 49 45 AA 33 20 20 20  |Y.....DA.IE.3   |
000002B0: 3A 8F 20 22 CC 4F 4F 50  20 54 4F 20 55 4E C1 D2  |:. ".OOP TO UN..|
000002C0: C3 20 54 48 49 53 20 45  4E 54 52 59 00 F2 1E 92  |. THIS ENTRY....|
000002D0: 04 47 4E B2 44 41 AA 33  20 20 20 3A 8F 20 22 55  |.GN.DA.3   :. "U|
000002E0: 4E C1 D2 C3 20 4A 55 53  54 20 4F 4E 45 20 42 59  |N... JUST ONE BY|
000002F0: 54 45 00 14 1F 9C 04 42  4F B2 47 4E AA 33 20 20  |TE.....BO.GN.3  |
00000300: 20 3A 8F 20 22 C2 55 46  46 45 52 45 44 20 C3 C8  | :. ".UFFERED ..|
00000310: D2 CF D5 D4 00 4A 1F A6  04 43 56 B2 42 4F AA 33  |.....J...CV.BO.3|
00000320: 20 20 20 3A 8F 20 22 C3  4F 4E 56 45 52 54 20 D3  |   :. ".ONVERT .|
00000330: 54 41 4E 44 41 52 44 20  C1 D3 C3 C9 C9 20 54 4F  |TANDARD ..... TO|
00000340: 20 C3 C2 CD 20 C1 D3 C3  C9 C9 00 6E 1F B0 04 47  | ... ......n...G|
00000350: 45 B2 43 56 AA 33 20 20  20 3A 8F 20 22 C6 49 4C  |E.CV.3   :. ".IL|
00000360: 4C 20 49 4E 50 55 54 20  42 55 46 46 45 52 00 94  |L INPUT BUFFER..|
00000370: 1F BA 04 50 55 B2 47 45  AA 33 20 20 20 3A 8F 20  |...PU.GE.3   :. |
00000380: 22 C6 4C 55 53 48 20 4F  55 54 50 55 54 20 42 55  |".LUSH OUTPUT BU|
00000390: 46 46 45 52 00 C7 1F C4  04 49 30 B2 50 55 AA 33  |FFER.....I0.PU.3|
000003A0: 20 20 20 3A 8F 20 22 D0  4F 49 4E 54 45 52 20 54  |   :. ".OINTER T|
000003B0: 4F 20 53 54 41 52 54 20  4F 46 20 49 4E 50 55 54  |O START OF INPUT|
000003C0: 20 42 55 46 46 45 52 00  F8 1F CE 04 49 31 B2 49  | BUFFER.....I1.I|
000003D0: 30 AA 32 20 20 20 3A 8F  20 22 D0 4F 49 4E 54 45  |0.2   :. ".OINTE|
000003E0: 52 20 54 4F 20 45 4E 44  20 4F 46 20 49 4E 50 55  |R TO END OF INPU|
000003F0: 54 20 42 55 46 46 45 52  00 2C 20 D8 04 4F 30 B2  |T BUFFER., ..O0.|
00000400: 49 31 AA 32 20 20 20 3A  8F 20 22 D0 4F 49 4E 54  |I1.2   :. ".OINT|
00000410: 45 52 20 54 4F 20 53 54  41 52 54 20 4F 46 20 4F  |ER TO START OF O|
00000420: 55 54 50 55 54 20 42 55  46 46 45 52 00 5E 20 E2  |UTPUT BUFFER.^ .|
00000430: 04 4F 31 B2 4F 30 AA 32  20 20 20 3A 8F 20 22 D0  |.O1.O0.2   :. ".|
00000440: 4F 49 4E 54 45 52 20 54  4F 20 45 4E 44 20 4F 46  |OINTER TO END OF|
00000450: 20 4F 55 54 50 55 54 20  42 55 46 46 45 52 00 97  | OUTPUT BUFFER..|
00000460: 20 EC 04 4C 43 B2 4F 31  AA 32 20 20 20 3A 8F 20  | ..LC.O1.2   :. |
00000470: 22 C9 4E 50 55 54 20 42  55 46 46 45 52 20 50 4F  |".NPUT BUFFER PO|
00000480: 49 4E 54 45 52 20 57 48  45 52 45 20 C5 CF C6 20  |INTER WHERE ... |
00000490: 4F 43 43 55 52 45 44 00  BB 20 F6 04 45 B2 4C 43  |OCCURED.. ..E.LC|
000004A0: AA 32 20 20 20 20 3A 8F  20 22 C5 52 52 4F 52 20  |.2    :. ".RROR |
000004B0: 52 45 54 55 52 4E 20 43  4F 44 45 00 C1 20 00 05  |RETURN CODE.. ..|
000004C0: 3A 00 E5 20 0A 05 4D 45  B2 45 AA 32 20 20 20 20  |:.. ..ME.E.2    |
000004D0: 3A 8F 20 22 C3 4F 4D 50  52 45 53 49 4F 4E 20 4D  |:. ".OMPRESION M|
000004E0: 45 54 48 4F 44 00 07 21  14 05 46 4C B2 4D 45 AA  |ETHOD..!..FL.ME.|
000004F0: 31 20 20 20 3A 8F 20 22  C1 D3 C3 C9 C9 DA 20 46  |1   :. "...... F|
00000500: 49 4C 45 4E 41 4D 45 00  29 21 1E 05 53 4C B2 46  |ILENAME.)!..SL.F|
00000510: 4C AA 31 33 20 20 3A 8F  20 22 D3 51 55 45 45 5A  |L.13  :. ".QUEEZ|
00000520: 45 44 20 4C 45 4E 47 54  48 00 40 21 28 05 44 54  |ED LENGTH.@!(.DT|
00000530: B2 53 4C AA 34 20 20 20  3A 8F 20 22 C4 41 54 45  |.SL.4   :. ".ATE|
00000540: 00 57 21 32 05 54 4D B2  44 54 AA 32 20 20 20 3A  |.W!2.TM.DT.2   :|
00000550: 8F 20 22 D4 49 4D 45 00  6D 21 3C 05 43 30 B2 54  |. ".IME.m!<.C0.T|
00000560: 4D AA 32 20 20 20 3A 8F  20 22 C3 D2 C3 00 9C 21  |M.2   :. ".....!|
00000570: 46 05 4C 4E B2 43 30 AA  32 20 20 20 3A 8F 20 22  |F.LN.C0.2   :. "|
00000580: D5 4E D3 51 55 45 45 5A  45 44 20 28 4F 52 49 47  |.N.QUEEZED (ORIG|
00000590: 49 4E 41 4C 29 20 4C 45  4E 47 54 48 00 A2 21 50  |INAL) LENGTH..!P|
000005A0: 05 3A 00 C9 21 5A 05 43  31 B2 4C 4E AA 34 20 20  |.:..!Z.C1.LN.4  |
000005B0: 20 3A 8F 20 22 C3 41 4C  43 55 4C 41 54 45 44 20  | :. ".ALCULATED |
000005C0: 28 4E 45 57 29 20 C3 D2  C3 00 EC 21 64 05 4D 4F  |(NEW) .....!d.MO|
000005D0: B2 43 31 AA 32 20 20 20  3A 8F 20 22 CD 4F 44 45  |.C1.2   :. ".ODE|
000005E0: 2E 20 58 2C 45 2C 50 20  4F 52 20 56 00 21 22 6E  |. X,E,P OR V.!"n|
000005F0: 05 41 53 B2 4D 4F AA 31  20 20 20 3A 8F 20 22 C6  |.AS.MO.1   :. ".|
00000600: 4C 41 47 2E 20 30 3D 44  4F 4E 27 54 20 43 4F 4E  |LAG. 0=DON'T CON|
00000610: 56 45 52 54 20 54 4F 20  C3 C2 CD 20 C1 D3 C3 C9  |VERT TO ... ....|
00000620: C9 00 4E 22 78 05 41 4C  B2 41 53 AA 31 20 20 20  |..N"x.AL.AS.1   |
00000630: 3A 8F 20 22 D3 4F 55 52  43 45 20 4C 4F 47 49 43  |:. ".OURCE LOGIC|
00000640: 41 4C 20 46 49 4C 45 20  4E 55 4D 42 45 52 00 80  |AL FILE NUMBER..|
00000650: 22 82 05 4F 4C B2 41 4C  AA 31 20 20 20 3A 8F 20  |"..OL.AL.1   :. |
00000660: 22 C4 45 53 54 49 4E 41  54 49 4F 4E 20 4C 4F 47  |".ESTINATION LOG|
00000670: 49 43 41 4C 20 46 49 4C  45 20 4E 55 4D 42 45 52  |ICAL FILE NUMBER|
00000680: 00 86 22 8C 05 3A 00 C3  22 96 05 43 24 B2 22 2C  |.."..:.."..C$.",|
00000690: 22 3A 86 20 4D 24 28 39  29 3A 8F 20 4D 24 28 50  |":. M$(9):. M$(P|
000006A0: 45 45 4B 28 4D 45 29 29  20 52 45 54 55 52 4E 53  |EEK(ME)) RETURNS|
000006B0: 20 43 4F 4D 50 52 45 53  53 49 4F 4E 20 4D 45 54  | COMPRESSION MET|
000006C0: 48 4F 44 00 0B 23 A0 05  4D 24 28 30 29 B2 22 C5  |HOD..#..M$(0).".|
000006D0: CF C6 20 20 20 20 20 22  3A 4D 24 28 31 29 B2 22  |..     ":M$(1)."|
000006E0: D3 54 4F 52 45 44 20 20  22 3A 4D 24 28 32 29 B2  |.TORED  ":M$(2).|
000006F0: 22 D3 D4 4F 52 45 44 20  20 22 3A 4D 24 28 33 29  |"..ORED  ":M$(3)|
00000700: B2 22 D0 41 43 4B 45 44  20 20 22 00 55 23 AA 05  |.".ACKED  ".U#..|
00000710: 4D 24 28 34 29 B2 22 D3  51 55 45 45 5A 45 44 22  |M$(4).".QUEEZED"|
00000720: 3A 4D 24 28 35 29 B2 22  C3 52 55 4E 43 48 45 44  |:M$(5).".RUNCHED|
00000730: 22 3A 4D 24 28 36 29 B2  4D 24 28 35 29 3A 4D 24  |":M$(6).M$(5):M$|
00000740: 28 37 29 B2 4D 24 28 35  29 3A 4D 24 28 38 29 B2  |(7).M$(5):M$(8).|
00000750: 4D 24 28 35 29 00 6A 23  B4 05 4D 24 28 39 29 B2  |M$(5).j#..M$(9).|
00000760: 22 D3 51 55 41 53 48 45  44 22 00 82 23 BE 05 99  |".QUASHED"..#...|
00000770: 3A 99 3A 99 20 C7 28 31  34 29 3B C7 28 31 34 37  |:.:. .(14);.(147|
00000780: 29 3B 00 B1 23 C8 05 99  20 22 05 B0 C0 C0 C0 C0  |);..#... "......|
00000790: C0 C0 C0 C0 C0 C0 C0 C0  C0 C0 C0 C0 C0 C0 C0 C0  |................|
000007A0: C0 C0 C0 C0 C0 C0 C0 C0  C0 C0 C0 C0 C0 C0 C0 AE  |................|
000007B0: 22 00 E1 23 D2 05 99 20  22 DD 20 20 20 20 9F CD  |"..#... ".    ..|
000007C0: D3 2D C4 CF D3 20 C1 52  43 48 49 56 45 20 C4 49  |.-... .RCHIVE .I|
000007D0: 53 53 4F 4C 56 45 52 05  20 20 20 20 20 20 20 DD  |SSOLVER.       .|
000007E0: 22 00 0F 24 DC 05 99 20  22 AB C0 C0 C0 C0 C0 C0  |"..$... ".......|
000007F0: C0 C0 C0 C0 C0 C0 C0 C0  C0 C0 C0 C0 C0 C0 C0 C0  |................|
00000800: C0 C0 C0 C0 C0 C0 C0 C0  C0 C0 C0 C0 C0 B3 22 00  |..............".|
00000810: 3F 24 E6 05 99 20 22 DD  20 20 20 20 20 20 9E D3  |?$... ".      ..|
00000820: 48 41 52 45 57 41 52 45  20 28 4E 4F 54 20 D0 C4  |HAREWARE (NOT ..|
00000830: 29 20 42 59 3A 05 20 20  20 20 20 20 20 DD 22 00  |) BY:.       .".|
00000840: 6F 24 F0 05 99 20 22 DD  20 20 20 20 20 20 20 20  |o$... ".        |
00000850: 9F 20 C1 4D 50 45 52 45  20 CD 45 54 41 4C 05 20  |. .MPERE .ETAL. |
00000860: 20 20 20 20 20 20 20 20  20 20 20 20 20 DD 22 00  |             .".|
00000870: 9F 24 FA 05 99 20 22 DD  20 20 20 20 20 20 9E 38  |.$... ".      .8|
00000880: 30 20 C8 41 4C 45 20 D2  4F 41 44 2C 20 D5 4E 49  |0 .ALE .OAD, .NI|
00000890: 54 20 34 05 20 20 20 20  20 20 20 20 20 DD 22 00  |T 4.         .".|
000008A0: CF 24 04 06 99 20 22 DD  20 20 20 20 20 20 9E C2  |.$... ".      ..|
000008B0: 52 41 4D 50 54 4F 4E 2C  20 CF 4E 54 41 52 49 4F  |RAMPTON, .NTARIO|
000008C0: 05 20 20 20 20 20 20 20  20 20 20 20 20 DD 22 00  |.            .".|
000008D0: FF 24 0E 06 99 20 22 DD  20 20 20 20 20 20 9E C3  |.$... ".      ..|
000008E0: 41 4E 41 44 41 2E 20 CC  36 D7 2D 32 CD 35 20 05  |ANADA. .6.-2.5 .|
000008F0: 20 20 20 20 20 20 20 20  20 20 20 20 20 DD 22 00  |             .".|
00000900: 2D 25 18 06 99 20 22 AB  C0 C0 C0 C0 C0 C0 C0 C0  |-%... ".........|
00000910: C0 C0 C0 C0 C0 C0 C0 C0  C0 C0 C0 C0 C0 C0 C0 C0  |................|
00000920: C0 C0 C0 C0 C0 C0 C0 C0  C0 C0 C0 B3 22 00 5E 25  |............".^%|
00000930: 22 06 99 20 22 DD 20 20  20 9F CF CB 20 54 4F 20  |".. ".   ... TO |
00000940: 43 4F 50 59 2C 20 9E 42  55 54 20 4E 4F 54 20 54  |COPY, .BUT NOT T|
00000950: 4F 20 53 45 4C 4C 2E 05  20 20 20 20 DD 22 00 8C  |O SELL..    ."..|
00000960: 25 2C 06 99 20 22 AD C0  C0 C0 C0 C0 C0 C0 C0 C0  |%,.. "..........|
00000970: C0 C0 C0 C0 C0 C0 C0 C0  C0 C0 C0 C0 C0 C0 C0 C0  |................|
00000980: C0 C0 C0 C0 C0 C0 C0 C0  C0 C0 BD 22 00 92 25 36  |..........."..%6|
00000990: 06 99 00 C7 25 40 06 85  20 22 9F C5 4E 54 45 52  |....%@.. "..NTER|
000009A0: 20 4E 41 4D 45 20 4F 46  20 41 52 43 48 49 56 45  | NAME OF ARCHIVE|
000009B0: 05 20 22 3B 41 52 24 3A  8B 20 41 52 24 B2 22 22  |. ";AR$:. AR$.""|
000009C0: 20 A7 20 31 36 30 30 00  EF 25 4A 06 8B 20 C9 28  | . 1600..%J.. .(|
000009D0: 41 52 24 2C 34 29 B3 B1  22 2E 41 52 43 22 20 A7  |AR$,4)..".ARC" .|
000009E0: 20 41 52 24 B2 41 52 24  AA 22 2E 41 52 43 22 00  | AR$.AR$.".ARC".|
000009F0: 1A 26 54 06 85 20 22 20  20 20 20 20 20 20 20 20  |.&T.. "         |
00000A00: 20 20 20 20 20 20 20 9F  C4 52 49 56 45 05 20 20  |       ..RIVE.  |
00000A10: 20 30 9D 9D 9D 22 3B 44  52 24 00 3B 26 5E 06 8B  | 0...";DR$.;&^..|
00000A20: 20 44 52 24 B3 B1 22 30  22 20 AF 20 44 52 24 B3  | DR$.."0" . DR$.|
00000A30: B1 22 31 22 20 A7 20 31  36 32 30 00 65 26 68 06  |."1" . 1620.e&h.|
00000A40: 85 20 22 20 20 20 20 20  20 20 20 20 20 20 20 20  |. "             |
00000A50: 20 20 20 20 9F D5 4E 49  54 05 20 20 20 38 9D 9D  |    ..NIT.   8..|
00000A60: 9D 22 3B 44 56 00 80 26  72 06 8B 20 44 56 B3 38  |.";DV..&r.. DV.8|
00000A70: 20 B0 20 44 56 20 B1 31  34 20 A7 20 31 36 34 30  | . DV .14 . 1640|
00000A80: 00 AB 26 7C 06 9F 20 31  35 2C 44 56 2C 31 35 3A  |..&|.. 15,DV,15:|
00000A90: 9F 20 32 2C 44 56 2C 32  2C 28 44 52 24 AA 22 3A  |. 2,DV,2,(DR$.":|
00000AA0: 22 AA 41 52 24 AA 22 2C  52 22 29 00 E0 26 86 06  |".AR$.",R")..&..|
00000AB0: 84 31 35 2C 45 24 2C 4D  24 2C 54 24 2C 53 24 3A  |.15,E$,M$,T$,S$:|
00000AC0: 8B 20 C5 28 45 24 29 20  A7 20 99 20 45 24 43 24  |. .(E$) . . E$C$|
00000AD0: 4D 24 43 24 54 24 43 24  53 24 3A 89 31 30 32 30  |M$C$T$C$S$:.1020|
00000AE0: 00 E6 26 90 06 3A 00 1C  27 9A 06 85 20 22 9E D0  |..&..:..'... "..|
00000AF0: 9F 29 52 49 4E 54 2C 20  9E D6 9F 29 45 52 49 46  |.)RINT, ...)ERIF|
00000B00: 59 2C 20 4F 52 20 9E C5  9F 29 58 54 52 41 43 54  |Y, OR ...)XTRACT|
00000B10: 05 20 20 20 45 9D 9D 9D  22 3B 58 24 00 32 27 A4  |.   E...";X$.2'.|
00000B20: 06 58 24 B2 C7 28 C6 28  58 24 29 20 AF 20 31 32  |.X$..(.(X$) . 12|
00000B30: 37 29 00 65 27 AE 06 8B  20 58 24 B2 22 50 22 20  |7).e'... X$."P" |
00000B40: B0 20 58 24 B2 22 56 22  20 B0 20 58 24 B2 22 58  |. X$."V" . X$."X|
00000B50: 22 20 B0 20 58 24 B2 22  45 22 20 A7 20 99 3A 89  |" . X$."E" . .:.|
00000B60: 20 31 37 33 30 00 70 27  B8 06 89 20 31 36 39 30  | 1730.p'... 1690|
00000B70: 00 8F 27 C2 06 8B 20 58  24 B3 B1 22 58 22 20 AF  |..'... X$.."X" .|
00000B80: 20 58 24 B3 B1 22 45 22  20 A7 20 31 37 38 30 00  | X$.."E" . 1780.|
00000B90: A5 27 CC 06 8B 20 58 24  B2 22 58 22 20 A7 20 58  |.'... X$."X" . X|
00000BA0: 24 B2 22 45 22 00 E5 27  D6 06 85 20 22 9F CF 55  |$."E"..'... "..U|
00000BB0: 54 50 55 54 20 44 52 49  56 45 05 20 20 20 20 30  |TPUT DRIVE.    0|
00000BC0: 9D 9D 9D 22 3B 44 52 24  3A 8B 20 44 52 24 B3 B1  |...";DR$:. DR$..|
00000BD0: 22 30 22 20 AF 20 44 52  24 B3 B1 22 31 22 20 A7  |"0" . DR$.."1" .|
00000BE0: 20 31 37 35 30 00 1D 28  E0 06 85 20 22 9F CF 55  | 1750..(... "..U|
00000BF0: 54 50 55 54 20 55 4E 49  54 05 20 20 20 20 20 38  |TPUT UNIT.     8|
00000C00: 9D 9D 9D 22 3B 44 56 3A  8B 20 44 56 B3 38 20 B0  |...";DV:. DV.8 .|
00000C10: 20 44 56 B1 31 34 20 A7  20 31 37 36 30 00 2C 28  | DV.14 . 1760.,(|
00000C20: EA 06 9F 20 31 34 2C 44  56 2C 31 35 00 4A 28 F4  |... 14,DV,15.J(.|
00000C30: 06 97 20 4D 4F 2C 20 C6  28 58 24 29 3A 97 20 41  |.. MO, .(X$):. A|
00000C40: 4C 2C 32 3A 97 20 4F 4C  2C 33 00 87 28 FE 06 8B  |L,2:. OL,3..(...|
00000C50: 20 58 24 B3 B1 22 56 22  20 A7 20 99 22 C1 4E 53  | X$.."V" . .".NS|
00000C60: 57 45 52 20 9F 59 05 20  54 4F 20 44 49 53 53 4F  |WER .Y. TO DISSO|
00000C70: 4C 56 45 20 4F 52 20 9F  4E 05 20 54 4F 20 42 59  |LVE OR .N. TO BY|
00000C80: 50 41 53 53 22 3A 99 00  8D 28 08 07 3A 00 97 28  |PASS":...(..:..(|
00000C90: 12 07 9E 28 49 41 29 00  D1 28 1C 07 9E 28 47 48  |...(IA)..(...(GH|
00000CA0: 29 3A 8B 20 C2 28 4D 45  29 B2 30 20 A7 20 99 20  |):. .(ME).0 . . |
00000CB0: 22 C1 4C 4C 20 44 4F 4E  45 2E 20 C5 4E 44 20 4F  |".LL DONE. .ND O|
00000CC0: 46 20 41 52 43 48 49 56  45 2E 22 3A 89 31 30 32  |F ARCHIVE.":.102|
00000CD0: 30 00 06 29 26 07 8B 20  C2 28 45 29 B3 B1 30 20  |0..)&.. .(E)..0 |
00000CE0: A7 20 99 20 22 C4 49 53  4B 20 45 52 52 4F 52 20  |. . ".ISK ERROR |
00000CF0: 4F 52 20 46 49 4C 45 20  43 4F 52 52 55 50 54 22  |OR FILE CORRUPT"|
00000D00: 3A 89 31 30 32 30 00 3F  29 30 07 4D B2 C2 28 4D  |:.1020.?)0.M..(M|
00000D10: 45 29 3A 8B 20 4D B1 39  20 A7 20 99 20 22 D5 4E  |E):. M.9 . . ".N|
00000D20: 4B 4E 4F 57 4E 20 43 4F  4D 50 52 45 53 53 49 4F  |KNOWN COMPRESSIO|
00000D30: 4E 20 4D 45 54 48 4F 44  22 3A 89 31 30 32 30 00  |N METHOD":.1020.|
00000D40: 4D 29 3A 07 46 24 B2 22  22 3A 46 B2 30 00 82 29  |M):.F$."":F.0..)|
00000D50: 44 07 43 B2 C2 28 46 4C  AA 46 29 3A 8B 20 28 43  |D.C..(FL.F):. (C|
00000D60: 20 AF 20 46 B3 31 32 29  20 A7 20 46 24 B2 46 24  | . F.12) . F$.F$|
00000D70: AA C7 28 43 29 3A 46 B2  46 AA 31 3A 89 20 31 38  |..(C):F.F.1:. 18|
00000D80: 36 30 00 B6 29 4E 07 4C  B2 C2 28 4C 4E 29 AA 32  |60..)N.L..(LN).2|
00000D90: 35 36 AC 28 C2 28 4C 4E  AA 31 29 AA 32 35 36 AC  |56.(.(LN.1).256.|
00000DA0: 28 C2 28 4C 4E AA 32 29  AA 32 35 36 AC C2 28 4C  |(.(LN.2).256..(L|
00000DB0: 4E AA 33 29 29 29 00 CC  29 58 07 41 24 B2 C9 28  |N.3)))..)X.A$..(|
00000DC0: 46 24 2C 34 29 3A 5A 24  B2 22 4E 22 00 0C 2A 62  |F$,4):Z$."N"..*b|
00000DD0: 07 8B 20 41 24 B2 22 2E  54 58 54 22 20 B0 20 41  |.. A$.".TXT" . A|
00000DE0: 24 B2 22 2E 44 4F 43 22  20 B0 20 41 24 B2 22 2E  |$.".DOC" . A$.".|
00000DF0: 50 41 53 22 20 B0 20 C9  28 46 24 2C 32 29 B2 22  |PAS" . .(F$,2)."|
00000E00: 2E 43 22 20 A7 20 5A 24  B2 22 59 22 00 12 2A 6C  |.C" . Z$."Y"..*l|
00000E10: 07 3A 00 35 2A 76 07 99  20 C7 28 33 34 29 46 24  |.:.5*v.. .(34)F$|
00000E20: C7 28 33 34 29 A3 31 35  29 4C 22 20 42 59 54 45  |.(34).15)L" BYTE|
00000E30: 53 2E 20 22 3B 00 56 2A  80 07 59 24 B2 22 22 3A  |S. ";.V*..Y$."":|
00000E40: 59 59 24 B2 58 24 3A 8B  20 58 24 B2 22 56 22 20  |YY$.X$:. X$."V" |
00000E50: A7 20 31 39 39 30 00 70  2A 8A 07 85 20 22 9F 28  |. 1990.p*... ".(|
00000E60: 59 2F 4E 29 05 20 20 20  59 9D 9D 9D 22 3B 59 24  |Y/N).   Y...";Y$|
00000E70: 00 AA 2A 94 07 8B 20 59  24 B3 B1 22 59 22 20 AF  |..*... Y$.."Y" .|
00000E80: 20 59 24 B3 B1 22 D9 22  20 A7 20 59 24 B2 22 4E  | Y$.."." . Y$."N|
00000E90: 22 3A 97 20 4D 4F 2C C6  28 22 56 22 29 3A 58 24  |":. MO,.("V"):X$|
00000EA0: B2 22 56 22 3A 89 31 39  39 30 00 E8 2A 9E 07 99  |."V":.1990..*...|
00000EB0: 3A 99 20 22 9F C3 4F 4E  56 45 52 54 20 46 52 4F  |:. "..ONVERT FRO|
00000EC0: 4D 20 C1 D3 C3 C9 C9 A0  54 4F 20 C3 C2 CD 20 C1  |M ......TO ... .|
00000ED0: D3 C3 C9 C9 05 20 20 20  22 3B 5A 24 3B 22 9D 9D  |.....   ";Z$;"..|
00000EE0: 9D 22 3B 3A 85 20 5A 24  00 07 2B A8 07 8B 20 5A  |.";:. Z$..+... Z|
00000EF0: 24 B3 B1 22 59 22 20 AF  20 5A 24 B3 B1 22 4E 22  |$.."Y" . Z$.."N"|
00000F00: 20 A7 20 31 39 35 30 00  25 2B B2 07 97 20 41 53  | . 1950.%+... AS|
00000F10: 2C 31 3A 8B 20 5A 24 B3  B1 22 59 22 20 A7 20 97  |,1:. Z$.."Y" . .|
00000F20: 20 41 53 2C 30 00 3C 2B  BC 07 8B 20 58 24 B2 22  | AS,0.<+... X$."|
00000F30: 50 22 20 A7 20 99 3A 99  20 22 1E 22 00 59 2B C6  |P" . .:. ".".Y+.|
00000F40: 07 8B 20 58 24 B3 B1 22  45 22 20 A7 20 9F 20 33  |.. X$.."E" . . 3|
00000F50: 2C 33 3A 89 20 32 30 34  30 00 9C 2B D0 07 85 22  |,3:. 2040..+..."|
00000F60: 9F C6 49 4C 45 20 54 59  50 45 20 28 9E 50 20 9F  |..ILE TYPE (.P .|
00000F70: 4F 52 20 9E 53 9F 29 05  20 20 53 9D 9D 9D 22 3B  |OR .S.).  S...";|
00000F80: 46 54 24 3A 8B 46 54 24  B3 B1 22 50 22 AF 46 54  |FT$:.FT$.."P".FT|
00000F90: 24 B3 B1 22 53 22 20 A7  32 30 30 30 00 BB 2B DA  |$.."S" .2000..+.|
00000FA0: 07 46 24 B2 44 52 24 AA  22 3A 22 AA 46 24 AA 22  |.F$.DR$.":".F$."|
00000FB0: 2C 22 AA 46 54 24 AA 22  2C 57 22 00 DB 2B E4 07  |,".FT$.",W"..+..|
00000FC0: 9F 20 33 2C 44 56 2C 33  2C 46 24 3A 84 31 34 2C  |. 3,DV,3,F$:.14,|
00000FD0: 45 24 2C 4D 24 2C 54 24  2C 53 24 00 01 2C EE 07  |E$,M$,T$,S$..,..|
00000FE0: 8B 20 C5 28 45 24 29 20  A7 20 99 20 45 24 43 24  |. .(E$) . . E$C$|
00000FF0: 4D 24 43 24 54 24 43 24  53 24 3A 89 20 31 30 32  |M$C$T$C$S$:. 102|
00001000: 30 00 3E 2C F8 07 9E 28  49 45 29 3A 8B 20 C2 28  |0.>,...(IE):. .(|
00001010: 45 29 B3 B1 30 20 A7 20  99 22 C4 49 53 4B 20 45  |E)..0 . .".ISK E|
00001020: 52 52 4F 52 20 4F 52 20  41 52 43 48 49 56 45 20  |RROR OR ARCHIVE |
00001030: 43 4F 52 52 55 50 54 22  3A 89 31 30 32 30 00 66  |CORRUPT":.1020.f|
00001040: 2C 02 08 9E 28 44 41 29  3A A0 33 3A 8B 20 58 24  |,...(DA):.3:. X$|
00001050: B2 22 45 22 20 A7 20 84  31 34 2C 45 24 2C 4D 24  |."E" . .14,E$,M$|
00001060: 2C 54 24 2C 53 24 00 79  2C 0C 08 8B 20 58 24 B2  |,T$,S$.y,... X$.|
00001070: 22 50 22 20 A7 20 99 3A  99 00 9D 2C 16 08 8B 20  |"P" . .:...,... |
00001080: C2 28 45 29 B2 31 20 A7  20 99 22 9C 20 C3 D2 C3  |.(E).1 . .". ...|
00001090: 20 45 52 52 4F 52 21 05  20 20 20 22 3B 00 BA 2C  | ERROR!.   ";..,|
000010A0: 20 08 8B 20 C2 28 45 29  B2 30 20 A7 20 99 22 9C  | .. .(E).0 . .".|
000010B0: 20 CF CB 2E 05 20 20 20  22 3B 00 E4 2C 2A 08 8B  | ....   ";..,*..|
000010C0: 20 C2 28 45 29 B2 33 20  A7 20 99 22 9C 20 D2 D5  | .(E).3 . .". ..|
000010D0: CE 2F D3 D4 CF D0 20 50  52 45 53 53 45 44 05 20  |./.... PRESSED. |
000010E0: 20 20 22 3B 00 04 2D 34  08 8B 20 58 24 B2 22 45  |  ";..-4.. X$."E|
000010F0: 22 A7 20 99 20 45 24 43  24 4D 24 43 24 54 24 43  |". . E$C$M$C$T$C|
00001100: 24 53 24 3B 00 25 2D 3E  08 8B 20 59 24 B2 22 4E  |$S$;.%->.. Y$."N|
00001110: 22 20 A7 20 58 24 B2 59  59 24 3A 97 20 4D 4F 2C  |" . X$.YY$:. MO,|
00001120: C6 28 58 24 29 00 2B 2D  48 08 99 00 36 2D 52 08  |.(X$).+-H...6-R.|
00001130: 89 20 31 38 32 30 00 3C  2D 97 08 3A 00 49 2D 88  |. 1820.<-..:.I-.|
00001140: 13 22 43 53 58 2E 44 4F  43 00 70 2D 92 13 22 3D  |."CSX.DOC.p-.."=|
00001150: 3D 3D 3D 3D 3D 3D 3D 3D  3D 3D 3D 3D 3D 3D 3D 3D  |================|
00001160: 3D 3D 3D 3D 3D 3D 3D 3D  3D 3D 3D 3D 3D 3D 3D 3D  |================|
00001170: 00 96 2D 9C 13 22 CD D3  2D C4 CF D3 20 41 52 43  |..-.."..-... ARC|
00001180: 48 49 56 45 20 44 49 53  53 4F 4C 56 45 52 20 46  |HIVE DISSOLVER F|
00001190: 4F 52 20 54 48 45 00 BD  2D A6 13 22 C3 4F 4D 4D  |OR THE..-..".OMM|
000011A0: 4F 44 4F 52 45 20 36 34  20 41 4E 44 2F 4F 52 20  |ODORE 64 AND/OR |
000011B0: C3 4F 4D 4D 4F 44 4F 52  45 20 31 32 38 00 E4 2D  |.OMMODORE 128..-|
000011C0: B0 13 22 3D 3D 3D 3D 3D  3D 3D 3D 3D 3D 3D 3D 3D  |.."=============|
000011D0: 3D 3D 3D 3D 3D 3D 3D 3D  3D 3D 3D 3D 3D 3D 3D 3D  |================|
000011E0: 3D 3D 3D 3D 00 0B 2E BA  13 22 20 20 20 20 20 20  |====....."      |
000011F0: 20 20 20 28 C3 29 20 31  39 38 38 20 2D 20 C1 4D  |   (.) 1988 - .M|
00001200: 50 45 52 45 20 CD 45 54  41 4C 2E 00 32 2E C4 13  |PERE .ETAL..2...|
00001210: 22 20 20 C1 4C 4C 20 43  4F 4D 4D 45 52 43 49 41  |"  .LL COMMERCIA|
00001220: 4C 20 52 49 47 48 54 53  20 52 45 53 45 52 56 45  |L RIGHTS RESERVE|
00001230: 44 2E 00 59 2E CE 13 22  20 20 D9 4F 55 20 4D 41  |D..Y..."  .OU MA|
00001240: 59 20 55 53 45 2C 20 43  4F 50 59 A0 4F 52 20 44  |Y USE, COPY.OR D|
00001250: 49 53 54 52 49 42 55 54  45 00 80 2E D8 13 22 C3  |ISTRIBUTE.....".|
00001260: D3 D8 20 49 4E 20 41 4E  59 20 4D 41 4E 4E 45 52  |.. IN ANY MANNER|
00001270: 20 59 4F 55 20 53 45 45  20 46 49 54 2C 20 41 53  | YOU SEE FIT, AS|
00001280: 00 A7 2E E2 13 22 4C 4F  4E 47 20 41 53 20 49 54  |....."LONG AS IT|
00001290: 20 20 44 4F 45 53 20 4E  4F 54 20 A0 49 4E 56 4F  |  DOES NOT .INVO|
000012A0: 4C 56 45 20 41 4E 59 00  CE 2E EC 13 22 46 45 45  |LVE ANY....."FEE|
000012B0: 20 4F 46 20 41 4E 59 20  4B 49 4E 44 20 45 49 54  | OF ANY KIND EIT|
000012C0: 48 45 52 20 44 49 52 45  43 54 20 20 4F 52 00 DD  |HER DIRECT  OR..|
000012D0: 2E F6 13 22 49 4E 44 49  52 45 43 54 2E 00 01 2F  |..."INDIRECT.../|
000012E0: 00 14 22 20 20 22 41 59  20 20 4D 45 20 8B 20 59  |.."  "AY  ME . Y|
000012F0: 4F 55 27 52 45 20 48 91  45 53 54 22 2D 57 41 52  |OU'RE H.EST"-WAR|
00001300: 45 00 28 2F 0A 14 22 43  4F 4E 54 52 49 42 55 54  |E.(/.."CONTRIBUT|
00001310: 49 4F 4E 53 A0 41 52 45  20 20 41 43 43 45 50 54  |IONS.ARE  ACCEPT|
00001320: 45 44 2C A0 20 42 55 54  00 45 2F 14 14 22 4E 4F  |ED,. BUT.E/.."NO|
00001330: 54 20 41 43 54 49 56 45  4C 59 20 53 4F 4C 49 43  |T ACTIVELY SOLIC|
00001340: 49 54 45 44 2E 00 6C 2F  1E 14 22 20 20 28 49 45  |ITED..l/.."  (IE|
00001350: 2E 20 59 4F 55 20 41 4C  52 45 41 44 59 20 48 41  |. YOU ALREADY HA|
00001360: 56 45 20 57 48 41 54 A0  20 59 4F 55 00 81 2F 28  |VE WHAT. YOU../(|
00001370: 14 22 57 49 4C 4C 20 42  45 20 42 55 59 49 4E 47  |."WILL BE BUYING|
00001380: 29 00 A8 2F 32 14 22 3D  3D 3D 3D 3D 3D 3D 3D 3D  |)../2."=========|
00001390: 3D 3D 3D 3D 3D 3D 3D 3D  3D 3D 3D 3D 3D 3D 3D 3D  |================|
000013A0: 3D 3D 3D 3D 3D 3D 3D 3D  00 AF 2F 3C 14 22 A0 00  |========../<."..|
000013B0: D7 2F 46 14 22 20 C3 D3  D8 20 49 53 20 53 54 52  |./F." ... IS STR|
000013C0: 41 49 47 48 54 20 46 4F  52 57 41 52 44 2E 20 CA  |AIGHT FORWARD. .|
000013D0: 55 53 54 20 D2 D5 CE 00  FF 2F 50 14 22 22 43 53  |UST ...../P.""CS|
000013E0: 58 2E 42 41 53 22 20 20  41 4E 44 20 46 4F 4C 4C  |X.BAS"  AND FOLL|
000013F0: 4F 57 20 54 48 45 20 50  52 4F 4D 50 54 53 2E 00  |OW THE PROMPTS..|
00001400: 06 30 5A 14 22 A0 00 2E  30 64 14 22 20 D4 48 45  |.0Z."...0d." .HE|
00001410: 20 4D 41 43 48 49 4E 45  20 20 4C 41 4E 47 55 41  | MACHINE  LANGUA|
00001420: 47 45 20 49 53 20 41 43  43 55 52 41 54 45 00 56  |GE IS ACCURATE.V|
00001430: 30 6E 14 22 54 4F 20 54  48 45 20 20 42 45 53 54  |0n."TO THE  BEST|
00001440: 20 4F 46 20 20 4D 59 20  20 4B 4E 4F 57 4C 45 44  | OF  MY  KNOWLED|
00001450: 47 45 20 41 4E 44 00 7E  30 78 14 22 53 48 4F 55  |GE AND.~0x."SHOU|
00001460: 4C 44 20 42 45 20 41 42  4C 45 20 20 54 4F 20 48  |LD BE ABLE  TO H|
00001470: 41 4E 44 4C 45 20 41 4E  59 20 C9 C2 CD 2C 00 A7  |ANDLE ANY ...,..|
00001480: 30 82 14 22 C1 4D 49 47  41 20 4F 52 20 C1 54 41  |0..".MIGA OR .TA|
00001490: 52 49 20 D3 D4 20 41 52  43 48 49 56 45 20 59 4F  |RI .. ARCHIVE YO|
000014A0: 55 20 4D 49 47 48 54 00  D0 30 8C 14 22 43 4F 4D  |U MIGHT..0.."COM|
000014B0: 45 20 41 43 43 52 4F 53  53 2E 20 D0 4C 45 41 53  |E ACCROSS. .LEAS|
000014C0: 45 20 4C 45 54 20 4D 45  20 4B 4E 4F 57 20 49 46  |E LET ME KNOW IF|
000014D0: 00 E5 30 96 14 22 54 48  49 53 20 49 53 20 4E 4F  |..0.."THIS IS NO|
000014E0: 54 20 53 4F 2E 00 EC 30  A0 14 22 A0 00 11 31 AA  |T SO...0.."...1.|
000014F0: 14 22 20 C3 D3 D8 20 43  4F 4E 53 49 53 54 53 20  |." ... CONSISTS |
00001500: 4F 46 20 54 48 52 45 45  20 46 49 4C 45 53 2E 2E  |OF THREE FILES..|
00001510: 2E 00 18 31 B4 14 22 A0  00 41 31 BE 14 22 43 53  |...1.."..A1.."CS|
00001520: 58 2E 42 41 53 20 2D 20  54 48 45 20 C2 C1 D3 C9  |X.BAS - THE ....|
00001530: C3 20 44 52 49 56 45 52  20 46 4F 52 20 42 4F 54  |. DRIVER FOR BOT|
00001540: 48 00 69 31 C8 14 22 20  20 20 20 20 20 20 20 20  |H.i1.."         |
00001550: 20 36 34 20 26 20 31 32  38 20 4D 4F 44 45 2E 20  | 64 & 128 MODE. |
00001560: D4 48 49 53 20 57 49 4C  4C 00 92 31 D2 14 22 20  |.HIS WILL..1.." |
00001570: 20 20 20 20 20 20 20 20  20 46 45 54 43 48 20 54  |         FETCH T|
00001580: 48 45 20 41 50 50 52 4F  50 52 49 41 54 45 20 4D  |HE APPROPRIATE M|
00001590: 41 2D 00 BA 31 DC 14 22  20 20 20 20 20 20 20 20  |A-..1.."        |
000015A0: 20 20 43 48 49 4E 45 20  4C 41 4E 47 55 41 47 45  |  CHINE LANGUAGE|
000015B0: 20 46 52 4F 4D 20 44 49  53 4B 00 E3 31 E6 14 22  | FROM DISK..1.."|
000015C0: 43 53 58 36 34 2E 4D 4C  20 20 54 48 45 20 36 34  |CSX64.ML  THE 64|
000015D0: 20 4D 4F 44 45 20 4D 41  43 48 49 4E 45 20 4C 41  | MODE MACHINE LA|
000015E0: 4E 47 2E 00 07 32 F0 14  22 43 53 58 31 32 38 2E  |NG...2.."CSX128.|
000015F0: 4D 4C 20 54 48 45 20 31  32 38 20 4D 4F 44 45 20  |ML THE 128 MODE |
00001600: 4D 41 43 48 49 4E 45 00  20 32 FA 14 22 20 20 20  |MACHINE. 2.."   |
00001610: 20 20 20 20 20 20 20 4C  41 4E 47 55 41 47 45 2E  |       LANGUAGE.|
00001620: 00 27 32 04 15 22 A0 00  00 00                    |.'2.."....      |

.. .... 53280,0:. 53281,0:. 1030.<...."C
SX.BAS":."CSX.BAS":..P... 2: 3: 14: 15:.
...... "================================
=============================.Y.... " MS
-DOS ARC FILE DISSOLVER.           (C)19
88 - AMPERE METAL...... "===============
========================================
======.S.$.CPU.64:IP.12:. B(122).B(122) 
. IP.10:CPU.128:..0...... B(IP.4096).76 
. B(IP.4096.24).76 . X.1...8.. X . 1100:
X.1:. CPU.64 . ."CSX64.ML",8,1.N.B..."CS
X128.ML",B0,P(IP.4096)...L.. CPU.64 . ME
M.55:. MEM,0:. MEM.1,4.16:.:CPU.64:IP.12
.,.V.. CPU.128 . (B(215) . 128) . .%.2.`
.:.W.J.IA.IP.4096:. "INITIALIZE ARCHIVE.
Y.T.GH.IA.3   :. "GET NEXT HEADER...~.IE
.GH.3   :. "INITIALIZE THIS ENTRY.L...DA
.IE.3   :. "LOOP TO UNARC THIS ENTRY....
.GN.DA.3   :. "UNARC JUST ONE BYTE.....B
O.GN.3   :. "BUFFERED CHROUT.J...CV.BO.3
   :. "CONVERT STANDARD ASCII TO CBM ASC
II.N...GE.CV.3   :. "FILL INPUT BUFFER..
...PU.GE.3   :. "FLUSH OUTPUT BUFFER.G.D
.I0.PU.3   :. "POINTER TO START OF INPUT
 BUFFER...N.I1.I0.2   :. "POINTER TO END
 OF INPUT BUFFER., X.O0.I1.2   :. "POINT
ER TO START OF OUTPUT BUFFER.^ ..O1.O0.2
   :. "POINTER TO END OF OUTPUT BUFFER..
 ..LC.O1.2   :. "INPUT BUFFER POINTER WH
ERE EOF OCCURED.. ..E.LC.2    :. "ERROR 
RETURN CODE.A ..:.. ..ME.E.2    :. "COMP
RESION METHOD..!..FL.ME.1   :. "ASCIIZ F
ILENAME.)!..SL.FL.13  :. "SQUEEZED LENGT
H.@!(.DT.SL.4   :. "DATE.W!2.TM.DT.2   :
. "TIME.M!<.C0.TM.2   :. "CRC..!F.LN.C0.
2   :. "UNSQUEEZED (ORIGINAL) LENGTH..!P
.:.I!Z.C1.LN.4   :. "CALCULATED (NEW) CR
C..!D.MO.C1.2   :. "MODE. X,E,P OR V.!"N
.AS.MO.1   :. "FLAG. 0=DON'T CONVERT TO 
CBM ASCII.N"X.AL.AS.1   :. "SOURCE LOGIC
AL FILE NUMBER.."..OL.AL.1   :. "DESTINA
TION LOGICAL FILE NUMBER.."..:.C"..C$.",
":. M$(9):. M$(PEEK(ME)) RETURNS COMPRES
SION METHOD..# .M$(0)."EOF     ":M$(1)."
STORED  ":M$(2)."STORED  ":M$(3)."PACKED
  ".U#..M$(4)."SQUEEZED":M$(5)."CRUNCHED
":M$(6).M$(5):M$(7).M$(5):M$(8).M$(5).J#
..M$(9)."SQUASHED"..#...:.:. G(14);G(147
);..#H.. "..............................
........"..#R.. ".    .MS-DOS ARCHIVE DI
SSOLVER.       ."..$... "...............
......................".?$... ".      .S
HAREWARE (NOT PD) BY:.       .".O$... ".
        . AMPERE METAL.              .".
.$... ".      .80 HALE ROAD, UNIT 4.    
     .".O$... ".      .BRAMPTON, ONTARIO
.            ."..$... ".      .CANADA. L
6W-2M5 .             .".-%... ".........
............................".^%".. ".  
 .OK TO COPY, .BUT NOT TO SELL..    ."..
%,.. "..................................
..."..%6...G%@.. ".ENTER NAME OF ARCHIVE
. ";AR$:. AR$."" . 1600..%J.. I(AR$,4)..
".ARC" . AR$.AR$.".ARC"..&T.. "         
       .DRIVE.   0...";DR$.;&^.. DR$.."0
" . DR$.."1" . 1620.E&H.. "             
    .UNIT.   8...";DV..&R.. DV.8 . DV .1
4 . 1640..&|.. 15,DV,15:. 2,DV,2,(DR$.":
".AR$.",R")..&...15,E$,M$,T$,S$:. E(E$) 
. . E$C$M$C$T$C$S$:.1020..&..:..'... ".P
.)RINT, .V.)ERIFY, OR .E.)XTRACT.   E...
";X$.2'..X$.G(F(X$) . 127).E'... X$."P" 
. X$."V" . X$."X" . X$."E" . .:. 1730.P'
... 1690..'B.. X$.."X" . X$.."E" . 1780.
.'L.. X$."X" . X$."E"..'V.. ".OUTPUT DRI
VE.    0...";DR$:. DR$.."0" . DR$.."1" .
 1750..(... ".OUTPUT UNIT.     8...";DV:
. DV.8 . DV.14 . 1760.,(... 14,DV,15.J(.
.. MO, F(X$):. AL,2:. OL,3..(... X$.."V"
 . ."ANSWER .Y. TO DISSOLVE OR .N. TO BY
PASS":...(..:..(...(IA).Q(...(GH):. B(ME
).0 . . "ALL DONE. END OF ARCHIVE.":.102
0..)&.. B(E)..0 . . "DISK ERROR OR FILE 
CORRUPT":.1020.?)0.M.B(ME):. M.9 . . "UN
KNOWN COMPRESSION METHOD":.1020.M):.F$."
":F.0..)D.C.B(FL.F):. (C . F.12) . F$.F$
.G(C):F.F.1:. 1860..)N.L.B(LN).256.(B(LN
.1).256.(B(LN.2).256.B(LN.3))).L)X.A$.I(
F$,4):Z$."N"..*B.. A$.".TXT" . A$.".DOC"
 . A$.".PAS" . I(F$,2).".C" . Z$."Y"..*L
.:.5*V.. G(34)F$G(34).15)L" BYTES. ";.V*
..Y$."":YY$.X$:. X$."V" . 1990.P*... ".(
Y/N).   Y...";Y$..*... Y$.."Y" . Y$.."Y"
 . Y$."N":. MO,F("V"):X$."V":.1990..*...
:. ".CONVERT FROM ASCII TO CBM ASCII.   
";Z$;"...";:. Z$..+... Z$.."Y" . Z$.."N"
 . 1950.%+... AS,1:. Z$.."Y" . . AS,0.<+
... X$."P" . .:. ".".Y+F.. X$.."E" . . 3
,3:. 2040..+P..".FILE TYPE (.P .OR .S.).
  S...";FT$:.FT$.."P".FT$.."S" .2000..+Z
.F$.DR$.":".F$.",".FT$.",W"..+... 3,DV,3
,F$:.14,E$,M$,T$,S$..,... E(E$) . . E$C$
M$C$T$C$S$:. 1020.>,...(IE):. B(E)..0 . 
."DISK ERROR OR ARCHIVE CORRUPT":.1020.F
,...(DA): 3:. X$."E" . .14,E$,M$,T$,S$.Y
,... X$."P" . .:...,... B(E).1 . .". CRC
 ERROR!.   ";.., .. B(E).0 . .". OK..   
";..,*.. B(E).3 . .". RUN/STOP PRESSED. 
  ";..-4.. X$."E". . E$C$M$C$T$C$S$;.%->
.. Y$."N" . X$.YY$:. MO,F(X$).+-H...6-R.
. 1820.<-..:.I-.."CSX.DOC.P-.."=========
========================..-.."MS-DOS ARC
HIVE DISSOLVER FOR THE..-.."COMMODORE 64
 AND/OR COMMODORE 128..-.."=============
====================....."         (C) 1
988 - AMPERE METAL..2.D."  ALL COMMERCIA
L RIGHTS RESERVED..Y.N."  YOU MAY USE, C
OPY OR DISTRIBUTE...X."CSX IN ANY MANNER
 YOU SEE FIT, AS....."LONG AS IT  DOES N
OT  INVOLVE ANY.N..."FEE OF ANY KIND EIT
HER DIRECT  OR....."INDIRECT.../.."  "AY
  ME . YOU'RE H.EST"-WARE.(/.."CONTRIBUT
IONS ARE  ACCEPTED,  BUT.E/.."NOT ACTIVE
LY SOLICITED..L/.."  (IE. YOU ALREADY HA
VE WHAT  YOU../(."WILL BE BUYING)../2."=
================================../<." .
W/F." CSX IS STRAIGHT FORWARD. JUST RUN.
./P.""CSX.BAS"  AND FOLLOW THE PROMPTS..
.0Z." ..0D." THE MACHINE  LANGUAGE IS AC
CURATE.V0N."TO THE  BEST OF  MY  KNOWLED
GE AND.~0X."SHOULD BE ABLE  TO HANDLE AN
Y IBM,..0.."AMIGA OR ATARI ST ARCHIVE YO
U MIGHT.P0.."COME ACCROSS. PLEASE LET ME
 KNOW IF..0.."THIS IS NOT SO...0 ." ..1.
." CSX CONSISTS OF THREE FILES.....1.." 
.A1.."CSX.BAS - THE BASIC DRIVER FOR BOT
H.I1H."          64 & 128 MODE. THIS WIL
L..1R."          FETCH THE APPROPRIATE M
A-..1.."          CHINE LANGUAGE FROM DI
SK..1.."CSX64.ML  THE 64 MODE MACHINE LA
NG...2.."CSX128.ML THE 128 MODE MACHINE.
 2.."          LANGUAGE..'2.." ...

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL