> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0F 08 08 00 8B 4D 4D B1 30 A7 31 31 30 00 |.......MM.0.110.|
00000010: 2E 08 0A 00 97 35 33 32 38 31 2C 31 35 3A 97 35 |.....53281,15:.5|
00000020: 33 32 38 30 2C 31 32 3A 97 36 34 36 2C 36 00 64 |3280,12:.646,6.d|
00000030: 08 14 00 53 24 B2 22 93 12 97 20 20 20 20 20 20 |...S$."... |
00000040: 20 20 20 20 20 20 20 20 20 52 45 4C 4F 43 41 54 | RELOCAT|
00000050: 4F 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |OR |
00000060: 20 20 92 22 00 6C 08 1E 00 99 53 24 00 96 08 20 | .".l....S$... |
00000070: 00 99 22 11 11 20 20 20 20 20 20 20 05 43 20 97 |..".. .C .|
00000080: 2D 20 52 45 4C 4F 43 41 54 45 20 43 4F 4D 50 52 |- RELOCATE COMPR|
00000090: 45 53 53 4F 52 22 00 C1 08 22 00 99 22 11 20 20 |ESSOR"..."..". |
000000A0: 20 20 20 20 20 05 44 20 97 2D 20 52 45 4C 4F 43 | .D .- RELOC|
000000B0: 41 54 45 20 44 45 43 4F 4D 50 52 45 53 53 4F 52 |ATE DECOMPRESSOR|
000000C0: 22 00 DD 08 24 00 99 22 11 20 20 20 20 20 20 20 |"...$..". |
000000D0: 05 51 20 97 2D 20 51 55 49 54 11 11 22 00 03 09 |.Q .- QUIT.."...|
000000E0: 26 00 99 22 20 20 20 20 20 20 20 50 52 45 53 53 |&.." PRESS|
000000F0: 20 05 43 97 2C 20 05 44 97 2C 20 4F 52 20 05 51 | .C., .D., OR .Q|
00000100: 97 2E 22 00 26 09 28 00 41 B2 C2 28 32 30 33 29 |..".&.(.A..(203)|
00000110: 3A 8B 41 B3 B1 32 30 AF 41 B3 B1 31 38 AF 41 B3 |:.A..20.A..18.A.|
00000120: B1 36 32 A7 34 30 00 48 09 2D 00 8B 41 B2 32 30 |.62.40.H.-..A.20|
00000130: A7 46 24 B2 22 43 4F 4D 50 52 45 53 53 4F 52 2E |.F$."COMPRESSOR.|
00000140: 4F 22 3A 4C B2 34 31 37 00 6C 09 32 00 8B 41 B2 |O":L.417.l.2..A.|
00000150: 31 38 A7 46 24 B2 22 44 45 43 4F 4D 50 52 45 53 |18.F$."DECOMPRES|
00000160: 53 4F 52 2E 4F 22 3A 4C B2 32 35 35 00 81 09 37 |SOR.O":L.255...7|
00000170: 00 8B 41 B2 36 32 A7 8D 36 30 30 30 30 3A 89 33 |..A.62..60000:.3|
00000180: 38 00 A9 09 46 00 99 22 11 1D 97 12 49 4E 53 45 |8...F.."....INSE|
00000190: 52 54 20 44 49 53 4B 20 43 4F 4E 54 41 49 4E 49 |RT DISK CONTAINI|
000001A0: 4E 47 20 22 46 24 22 20 22 00 E6 09 50 00 99 22 |NG "F$" "...P.."|
000001B0: 1D 97 12 20 20 20 20 20 20 20 20 20 20 20 41 4E |... AN|
000001C0: 44 20 50 52 45 53 53 20 52 45 54 55 52 4E 20 20 |D PRESS RETURN |
000001D0: 20 20 20 20 20 20 20 22 3B 3A 8B 4C B2 32 35 35 | ";:.L.255|
000001E0: A7 99 22 20 20 22 00 FC 09 5A 00 41 B2 C2 28 32 |.." "...Z.A..(2|
000001F0: 30 33 29 3A 8B 41 B3 B1 31 A7 39 30 00 13 0A 64 |03):.A..1.90...d|
00000200: 00 8B 4D 4D B2 30 A7 4D 4D B2 31 3A 93 46 24 2C |..MM.0.MM.1:.F$,|
00000210: 38 2C 31 00 50 0A 6E 00 99 22 92 22 3A 99 22 11 |8,1.P.n..".":.".|
00000220: 1D 1F 45 4E 54 45 52 20 4E 45 57 20 4C 4F 43 41 |..ENTER NEW LOCA|
00000230: 54 49 4F 4E 3A 22 3B 3A 41 4C B2 2E 3A 8D 36 30 |TION:";:AL..:.60|
00000240: 35 30 30 3A 41 4C B2 31 3A 4E B2 C5 28 42 24 29 |500:AL.1:N..(B$)|
00000250: 00 7C 0A 78 00 99 22 11 1D 1F 45 4E 54 45 52 20 |.|.x.."...ENTER |
00000260: 4E 45 57 20 46 49 4C 45 4E 41 4D 45 3A 22 3B 3A |NEW FILENAME:";:|
00000270: 8D 36 30 35 30 30 3A 46 24 B2 42 24 00 AE 0A 82 |.60500:F$.B$....|
00000280: 00 41 B2 B5 28 4E AD 32 35 36 29 3A 42 B2 4E AB |.A..(N.256):B.N.|
00000290: 32 35 36 AC 41 3A 99 22 11 22 A3 31 32 29 22 97 |256.A:.".".12)".|
000002A0: 2E 2E 2E 57 4F 52 4B 49 4E 47 2E 2E 2E 22 00 CD |...WORKING..."..|
000002B0: 0A 87 00 9F 31 35 2C 38 2C 31 35 2C 22 49 30 22 |....15,8,15,"I0"|
000002C0: 3A 98 31 35 2C 22 55 4A 22 3A A0 31 35 00 F4 0A |:.15,"UJ":.15...|
000002D0: 8C 00 9F 32 2C 38 2C 32 2C 46 24 AA 22 2C 50 2C |...2,8,2,F$.",P,|
000002E0: 57 22 3A 98 32 2C C7 28 42 29 3B 3A 98 32 2C C7 |W":.2,.(B);:.2,.|
000002F0: 28 41 29 3B 00 05 0B 96 00 81 49 B2 34 39 31 35 |(A);......I.4915|
00000300: 32 A4 49 AA 4C 00 32 0B A0 00 50 B2 C2 28 49 29 |2.I.L.2...P..(I)|
00000310: 3A 8B 50 B3 B1 37 36 AF 50 B3 B1 31 30 38 AF 50 |:.P..76.P..108.P|
00000320: B3 B1 33 32 A7 98 32 2C C7 28 50 29 3B 3A 89 33 |..32..2,.(P);:.3|
00000330: 30 30 00 5A 0B AA 00 5A B2 C2 28 49 AA 32 29 3A |00.Z...Z..(I.2):|
00000340: 8B 5A B3 31 39 32 B0 5A B1 31 39 34 A7 98 32 2C |.Z.192.Z.194..2,|
00000350: C7 28 50 29 3B 3A 89 33 30 30 00 92 0B B4 00 58 |.(P);:.300.....X|
00000360: B2 34 39 31 35 32 AB 4E 3A 59 B2 C2 28 49 AA 31 |.49152.N:Y..(I.1|
00000370: 29 3A 41 B2 59 AA 5A AC 32 35 36 AB 58 3A 5A B2 |):A.Y.Z.256.X:Z.|
00000380: B5 28 41 AD 32 35 36 29 3A 59 B2 41 AB 32 35 36 |.(A.256):Y.A.256|
00000390: AC 5A 00 BC 0B BE 00 98 32 2C C7 28 50 29 3B 3A |.Z......2,.(P);:|
000003A0: 98 32 2C C7 28 59 29 3B 3A 98 32 2C C7 28 5A 29 |.2,.(Y);:.2,.(Z)|
000003B0: 3B 3A 49 B2 49 AA 32 3A 89 33 30 30 00 CB 0B C8 |;:I.I.2:.300....|
000003C0: 00 8B 4C B2 32 35 35 A7 32 32 30 00 F4 0B D2 00 |..L.255.220.....|
000003D0: A0 32 3A 99 22 11 97 1D 4E 45 57 20 56 41 4C 55 |.2:."...NEW VALU|
000003E0: 45 20 46 4F 52 20 27 43 50 27 20 3D 20 22 4E 3A |E FOR 'CP' = "N:|
000003F0: 89 34 30 30 00 1D 0C DC 00 A0 32 3A 99 22 11 97 |.400......2:."..|
00000400: 1D 4E 45 57 20 56 41 4C 55 45 20 46 4F 52 20 27 |.NEW VALUE FOR '|
00000410: 44 43 27 20 3D 20 22 4E 3A 89 34 30 30 00 30 0C |DC' = "N:.400.0.|
00000420: 2C 01 8B 49 B2 34 39 31 35 32 AA 4C A7 32 30 30 |,..I.49152.L.200|
00000430: 00 36 0C 36 01 82 00 69 0C 90 01 99 22 11 1F 20 |.6.6...i....".. |
00000440: 20 20 20 20 20 20 20 50 52 45 53 53 20 05 53 50 | PRESS .SP|
00000450: 41 43 45 1F 20 54 4F 20 43 4F 4E 54 49 4E 55 45 |ACE. TO CONTINUE|
00000460: 13 22 3A 97 31 39 38 2C 2E 00 7D 0C 9A 01 8B C2 |.":.198,..}.....|
00000470: 28 32 30 33 29 B3 B1 36 30 A7 34 31 30 00 83 0C |(203)..60.410...|
00000480: A4 01 8A 00 B6 0C 60 EA 99 22 91 20 20 41 52 45 |......`..". ARE|
00000490: 20 59 4F 55 20 53 55 52 45 20 59 4F 55 20 57 41 | YOU SURE YOU WA|
000004A0: 4E 54 20 54 4F 20 51 55 49 54 3F 20 28 05 59 97 |NT TO QUIT? (.Y.|
000004B0: 2F 05 4E 97 29 22 00 D6 0C 6A EA 41 B2 C2 28 32 |/.N.)"...j.A..(2|
000004C0: 30 33 29 3A 8B 41 B3 B1 32 35 AF 41 B3 B1 33 39 |03):.A..25.A..39|
000004D0: A7 36 30 30 31 30 00 0E 0D 74 EA 8B 41 B2 33 39 |.60010...t..A.39|
000004E0: A7 99 22 91 20 20 20 20 20 20 20 20 20 20 20 20 |..". |
000004F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000500: 20 20 20 20 20 20 20 20 20 20 91 22 3A 8E 00 47 | .":..G|
00000510: 0D 7E EA 9F 31 35 2C 38 2C 31 35 2C 22 52 30 3A |.~..15,8,15,"R0:|
00000520: 43 4F 4D 50 52 45 53 53 20 4D 45 4E 55 3D 43 4F |COMPRESS MENU=CO|
00000530: 4D 50 52 45 53 53 20 4D 45 4E 55 22 3A 84 31 35 |MPRESS MENU":.15|
00000540: 2C 45 52 3A A0 31 35 00 61 0D 88 EA 8B 45 52 B3 |,ER:.15.a....ER.|
00000550: B1 36 33 A7 97 31 39 38 2C 2E 3A 99 22 93 22 3A |.63..198,.:.".":|
00000560: 80 00 78 0D 92 EA 93 22 43 4F 4D 50 52 45 53 53 |..x...."COMPRESS|
00000570: 20 4D 45 4E 55 22 2C 38 00 98 0D 54 EC 42 24 B2 | MENU",8...T.B$.|
00000580: 22 22 3A 99 22 05 A4 22 3B 3A 97 31 39 38 2C 2E |"":."..";:.198,.|
00000590: 3A 81 41 B2 31 A4 31 37 00 AD 0D 5E EC A1 41 24 |:.A.1.17...^..A$|
000005A0: 3A 8B 41 24 B2 22 22 A7 36 30 35 31 30 00 C3 0D |:.A$."".60510...|
000005B0: 68 EC 8B 41 24 B2 C7 28 31 33 29 A7 99 22 9D 20 |h..A$..(13)..". |
000005C0: 22 3A 8E 00 FB 0D 72 EC 8B 41 24 B2 C7 28 32 30 |":....r..A$..(20|
000005D0: 29 AF 41 B1 31 A7 99 22 9D 9D 20 20 9D 9D A4 22 |).A.1..".. ..."|
000005E0: 3B 3A 41 B2 41 AB 31 3A 42 24 B2 C8 28 42 24 2C |;:A.A.1:B$..(B$,|
000005F0: 41 AB 31 29 3A 89 36 30 35 31 30 00 21 0E 7C EC |A.1):.60510.!.|.|
00000600: 8B 28 28 41 4C 29 AF 28 41 B2 31 37 29 29 B0 28 |.((AL).(A.17)).(|
00000610: 28 4E 4F 29 AF 28 41 B2 36 29 29 A7 36 30 35 31 |(NO).(A.6)).6051|
00000620: 30 00 3C 0E 86 EC 8B 41 24 B1 B2 22 30 22 AF 41 |0.<....A$.."0".A|
00000630: 24 B3 B2 22 39 22 A7 36 30 35 38 30 00 5C 0E 90 |$.."9".60580.\..|
00000640: EC 8B 28 41 4C 29 AF 41 24 B1 B2 22 20 22 AF 41 |..(AL).A$.." ".A|
00000650: 24 B3 B2 22 DA 22 A7 36 30 35 38 30 00 67 0E 9A |$..".".60580.g..|
00000660: EC 89 36 30 35 31 30 00 8B 0E A4 EC 99 22 9D 22 |..60510......"."|
00000670: 41 24 3B 3A 97 32 31 32 2C 2E 3A 99 22 A4 22 3B |A$;:.212,.:.".";|
00000680: 3A 42 24 B2 42 24 AA 41 24 3A 82 00 00 00 |:B$.B$.A$:.... |
.......MM.0.110......53281,15:.53280,12:
.646,6.D...S$."... RELOCAT
OR .".L....S$... .."..
.C .- RELOCATE COMPRESSOR".A."..".
.D .- RELOCATE DECOMPRESSOR"...$.."
. .Q .- QUIT.."...&.." PRESS
.C., .D., OR .Q..".&.(.A.B(203):.A..20.
A..18.A..62.40.H.-..A.20.F$."COMPRESSOR.
O":L.417.L.2..A.18.F$."DECOMPRESSOR.O":L
.255...7..A.62..60000:.38...F.."....INSE
RT DISK CONTAINING "F$" "...P.."...
AND PRESS RETURN ";:.L.255
.." "...Z.A.B(203):.A..1.90...D..MM.0.M
M.1:.F$,8,1.P.N..".":."...ENTER NEW LOCA
TION:";:AL..:.60500:AL.1:N.E(B$).|.X..".
..ENTER NEW FILENAME:";:.60500:F$.B$....
.A..(N.256):B.N.256.A:.".".12)"....WORKI
NG...".M....15,8,15,"I0":.15,"UJ": 15...
...2,8,2,F$.",P,W":.2,G(B);:.2,G(A);....
..I.49152.I.L.2. .P.B(I):.P..76.P..108.P
..32..2,G(P);:.300.Z...Z.B(I.2):.Z.192.Z
.194..2,G(P);:.300.....X.49152.N:Y.B(I.1
):A.Y.Z.256.X:Z..(A.256):Y.A.256.Z......
2,G(P);:.2,G(Y);:.2,G(Z);:I.I.2:.300.K.H
..L.255.220...R. 2:."...NEW VALUE FOR 'C
P' = "N:.400..... 2:."...NEW VALUE FOR '
DC' = "N:.400.0.,..I.49152.L.200.6.6...I
....".. PRESS .SPACE. TO CONTINUE
.":.198,..}....B(203)..60.410.........`.
.". ARE YOU SURE YOU WANT TO QUIT? (.Y.
/.N.)".V.J.A.B(203):.A..25.A..39.60010..
.T..A.39..".
.":..G.~..15,8,15,"R0:COMPRESS
MENU=COMPRESS MENU":.15,ER: 15.A....ER.
.63..198,.:.".":..X...."COMPRESS MENU",8
...T.B$."":."..";:.198,.:.A.1.17...^..A$
:.A$."".60510.C.H..A$.G(13)..". ":....R.
.A$.G(20).A.1..".. ...";:A.A.1:B$.H(B$,
A.1):.60510.!.|..((AL).(A.17)).((NO).(A.
6)).60510.<....A$.."0".A$.."9".60580.\..
..(AL).A$.." ".A$.."Z".60580.G....60510.
....."."A$;:.212,.:.".";:B$.B$.A$:....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL