> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 26 08 00 00 97 35 33 32 38 30 2C 36 3A 97 |..&....53280,6:.|
00000010: 35 33 32 38 31 2C 36 3A 97 36 34 36 2C 31 34 3A |53281,6:.646,14:|
00000020: 89 20 31 30 30 30 00 38 08 01 00 A1 5A 24 3A 8B |. 1000.8....Z$:.|
00000030: 5A 24 B2 22 22 A7 20 31 00 3E 08 02 00 8E 00 58 |Z$."". 1.>.....X|
00000040: 08 0A 00 84 31 35 2C 45 52 2C 45 52 24 3A 8B 20 |....15,ER,ER$:. |
00000050: 45 52 B2 30 20 A7 20 8E 00 77 08 14 00 99 22 44 |ER.0 . ..w...."D|
00000060: 49 53 4B 20 45 52 52 4F 52 20 23 22 45 52 3A 99 |ISK ERROR #"ER:.|
00000070: 45 52 24 3A 80 3A 8E 00 A9 08 64 00 99 22 13 11 |ER$:.:....d.."..|
00000080: 11 11 22 3A 81 49 B2 30 A4 31 35 3A 81 20 4A B2 |..":.I.0.15:. J.|
00000090: 30 20 A4 4E 43 3A 99 A3 4A AC 32 30 29 3B 56 24 |0 .NC:..J.20);V$|
000000A0: 28 49 AA 4A AC 31 36 29 3B 00 B6 08 6E 00 82 20 |(I.J.16);...n.. |
000000B0: 4A 3A 99 3A 82 49 00 CF 08 78 00 97 58 42 2C 30 |J:.:.I...x..XB,0|
000000C0: 3A 52 4C B2 30 3A 43 4C B2 30 3A 8D 36 30 30 00 |:RL.0:CL.0:.600.|
000000D0: FD 08 82 00 81 20 49 B2 30 A4 31 A9 30 3A 8D 31 |..... I.0.1.0:.1|
000000E0: 3A 5A B2 C6 28 5A 24 29 3A 54 43 B2 43 4C 3A 54 |:Z..(Z$):TC.CL:T|
000000F0: 52 B2 52 4C 3A 81 4A B2 30 A4 31 A9 30 00 28 09 |R.RL:.J.0.1.0.(.|
00000100: 8C 00 8B 20 28 5A AF 31 32 37 29 B2 32 39 20 A7 |... (Z.127).29 .|
00000110: 43 4C B2 28 43 4C AA 31 AA 32 AC 28 5A B2 31 35 |CL.(CL.1.2.(Z.15|
00000120: 37 29 29 20 AF 20 4E 43 00 53 09 96 00 8B 20 28 |7)) . NC.S.... (|
00000130: 5A AF 31 32 37 29 B2 31 37 20 A7 52 4C B2 28 52 |Z.127).17 .RL.(R|
00000140: 4C AA 31 AA 32 AC 28 5A B2 31 34 35 29 29 20 AF |L.1.2.(Z.145)) .|
00000150: 20 31 35 00 64 09 A0 00 8B 20 5A B2 31 33 20 A7 | 15.d.... Z.13 .|
00000160: 20 49 B2 31 00 80 09 AA 00 8B 20 56 24 28 52 4C | I.1...... V$(RL|
00000170: AA 43 4C AC 31 36 29 B3 B1 42 24 20 A7 4A B2 31 |.CL.16)..B$ .J.1|
00000180: 00 9E 09 B4 00 82 3A 8B 28 54 43 B3 B1 43 4C 29 |......:.(TC..CL)|
00000190: B0 28 54 52 B3 B1 52 4C 29 A7 8D 35 30 30 00 A6 |.(TR..RL)..500..|
000001A0: 09 BE 00 82 3A 8E 00 CC 09 F4 01 97 20 58 41 2C |....:....... XA,|
000001B0: 54 52 AA 33 3A 99 3A 99 A3 54 43 AC 32 30 29 3B |TR.3:.:..TC.20);|
000001C0: 56 24 28 54 52 AA 31 36 AC 54 43 29 00 F8 09 58 |V$(TR.16.TC)...X|
000001D0: 02 97 20 58 41 2C 52 4C AA 33 3A 99 3A 99 A3 43 |.. XA,RL.3:.:..C|
000001E0: 4C AC 32 30 29 3B 22 12 22 3B 56 24 28 52 4C AA |L.20);".";V$(RL.|
000001F0: 31 36 AC 43 4C 29 3A 8E 00 13 0A 84 03 81 49 B2 |16.CL):.......I.|
00000200: 31 20 A4 20 4E 56 3A 56 24 28 49 29 B2 42 24 3A |1 . NV:V$(I).B$:|
00000210: 82 3A 8E 00 24 0A E8 03 99 22 13 13 93 22 3A 8D |.:..$...."...":.|
00000220: 36 30 30 30 00 3D 0A F2 03 4E 43 B2 31 3A 8B C2 |6000.=...NC.1:..|
00000230: 28 32 31 33 29 B2 37 39 A7 4E 43 B2 33 00 77 0A |(213).79.NC.3.w.|
00000240: FC 03 4E 56 B2 28 4E 43 AA 31 29 AC 31 36 AB 31 |..NV.(NC.1).16.1|
00000250: 3A 8D 32 30 30 30 3A 42 24 B2 22 20 20 20 20 20 |:.2000:B$." |
00000260: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 3A | ":|
00000270: 86 56 24 28 4E 56 29 00 A1 0A 4C 04 4E 50 B2 30 |.V$(NV)...L.NP.0|
00000280: 3A 53 4C B2 31 3A 56 24 28 30 29 B2 22 4E 45 58 |:SL.1:V$(0)."NEX|
00000290: 54 20 50 41 47 45 22 3A 99 22 93 11 12 22 48 45 |T PAGE":."..."HE|
000002A0: 24 00 C8 0A 56 04 53 4C B2 53 4C AA 4E 50 3A 4E |$...V.SL.SL.NP:N|
000002B0: 50 B2 4D 41 AB 53 4C AA 31 3A 8B 20 4E 50 B1 4E |P.MA.SL.1:. NP.N|
000002C0: 56 A7 20 4E 50 B2 4E 56 00 DA 0A 60 04 8B 20 4E |V. NP.NV...`.. N|
000002D0: 50 B2 30 20 A7 20 33 30 30 30 00 02 0B 6A 04 8D |P.0 . 3000...j..|
000002E0: 39 30 30 3A 81 20 49 B2 31 20 A4 20 4E 50 3A 56 |900:. I.1 . NP:V|
000002F0: 24 28 49 29 B2 50 52 24 28 53 4C AA 49 AB 31 29 |$(I).PR$(SL.I.1)|
00000300: 3A 82 00 1C 0B 74 04 8D 31 30 30 3A 8B 20 43 4C |:....t..100:. CL|
00000310: AA 52 4C B2 30 20 A7 20 31 31 31 30 00 27 0B 7E |.RL.0 . 1110.'.~|
00000320: 04 89 20 35 30 30 30 00 36 0B D0 07 8D 32 39 30 |.. 5000.6....290|
00000330: 30 3A 4D 41 B2 30 00 50 0B DA 07 9F 31 35 2C 55 |0:MA.0.P....15,U|
00000340: 4E 2C 31 35 2C 22 49 22 AA 44 52 24 3A 8D 31 30 |N,15,"I".DR$:.10|
00000350: 00 64 0B E4 07 9F 31 2C 55 4E 2C 33 2C 22 24 22 |.d....1,UN,3,"$"|
00000360: AA 44 52 24 00 6E 0B EE 07 9E 20 38 39 36 00 90 |.DR$.n.... 896..|
00000370: 0B F8 07 46 4F B2 C6 28 49 4E 24 29 3A 8B 20 28 |...FO..(IN$):. (|
00000380: 46 4F 20 AF 20 33 29 B2 31 20 A7 20 32 31 30 30 |FO . 3).1 . 2100|
00000390: 00 B1 0B 02 08 A0 31 3A A0 31 35 3A 99 22 42 41 |......1:.15:."BA|
000003A0: 44 20 44 49 53 4B 20 46 4F 52 4D 41 54 2E 22 3A |D DISK FORMAT.":|
000003B0: 80 00 C7 0B 34 08 48 45 24 B2 CA 28 49 4E 24 2C |....4.HE$..(IN$,|
000003C0: 31 34 33 2C 31 36 29 00 FE 0B 3E 08 8B 20 46 4F |143,16)...>.. FO|
000003D0: B1 31 20 A7 20 53 45 B2 31 38 3A 48 45 24 B2 48 |.1 . SE.18:HE$.H|
000003E0: 45 24 AA 22 2C 20 31 35 34 31 2F 34 30 34 30 20 |E$.", 1541/4040 |
000003F0: 46 4F 52 4D 41 54 22 3A 89 20 32 32 30 30 00 29 |FORMAT":. 2200.)|
00000400: 0C 48 08 8B 20 46 4F B2 31 20 A7 20 53 45 B2 31 |.H.. FO.1 . SE.1|
00000410: 39 3A 48 45 24 B2 48 45 24 AA 22 2C 20 32 30 34 |9:HE$.HE$.", 204|
00000420: 30 20 46 4F 52 4D 41 54 22 00 47 0C 98 08 86 20 |0 FORMAT".G.... |
00000430: 50 52 24 28 53 45 AC 38 29 3A 81 49 B2 31 20 A4 |PR$(SE.8):.I.1 .|
00000440: 53 45 3A 9E 38 39 36 00 6F 0C A2 08 81 4A B2 31 |SE:.896.o....J.1|
00000450: 20 A4 20 32 35 34 20 A9 20 33 32 3A 41 B2 C6 28 | . 254 . 32:A..(|
00000460: CA 28 49 4E 24 2C 4A 29 29 20 AF 20 31 32 37 00 |.(IN$,J)) . 127.|
00000470: 96 0C AC 08 8B 41 B2 32 A7 4D 41 B2 4D 41 AA 31 |.....A.2.MA.MA.1|
00000480: 3A 50 52 24 28 4D 41 29 B2 CA 28 49 4E 24 2C 4A |:PR$(MA)..(IN$,J|
00000490: AA 33 2C 31 36 29 00 9E 0C B6 08 82 20 4A 00 AE |.3,16)...... J..|
000004A0: 0C C0 08 8B 20 53 54 20 A7 20 49 B2 53 45 00 B6 |.... ST . I.SE..|
000004B0: 0C CA 08 82 20 49 00 C3 0C D4 08 A0 31 3A A0 31 |.... I......1:.1|
000004C0: 35 3A 8E 00 D9 0C 54 0B 55 4E B2 38 3A 44 52 B2 |5:....T.UN.8:DR.|
000004D0: 30 3A 44 52 24 B2 22 30 22 00 DF 0C 5E 0B 8E 00 |0:DR$."0"...^...|
000004E0: FE 0C 68 0B 99 22 55 4E 49 54 20 23 20 20 22 3B |..h.."UNIT # ";|
000004F0: 55 4E 3B 3A 85 22 9D 9D 9D 9D 22 3B 55 4E 00 30 |UN;:."....";UN.0|
00000500: 0D 72 0B 99 22 44 52 49 56 45 20 23 20 20 22 3B |.r.."DRIVE # ";|
00000510: 44 52 3B 3A 85 22 9D 9D 9D 9D 22 3B 44 52 3A 8B |DR;:."....";DR:.|
00000520: 44 52 AC 28 44 52 AB 31 29 20 A7 20 32 39 33 30 |DR.(DR.1) . 2930|
00000530: 00 40 0D 7C 0B 44 52 24 B2 C4 28 44 52 29 3A 8E |.@.|.DR$..(DR):.|
00000540: 00 76 0D B8 0B 8D 20 39 30 30 3A 99 22 93 11 4E |.v.... 900:."..N|
00000550: 4F 20 4D 4F 52 45 20 50 52 4F 47 52 41 4D 53 20 |O MORE PROGRAMS |
00000560: 4F 4E 20 44 49 53 4B 2E 20 20 4F 50 54 49 4F 4E |ON DISK. OPTION|
00000570: 53 20 41 52 45 3A 00 B6 0D CC 0B 56 24 28 30 29 |S ARE:.....V$(0)|
00000580: B2 22 53 45 45 20 4E 45 57 20 44 49 53 4B 22 3A |."SEE NEW DISK":|
00000590: 56 24 28 32 29 B2 22 52 45 53 54 41 52 54 20 54 |V$(2)."RESTART T|
000005A0: 48 49 53 20 44 49 53 4B 22 3A 56 24 28 34 29 B2 |HIS DISK":V$(4).|
000005B0: 22 45 58 49 54 22 00 C9 0D D6 0B 8D 20 31 30 30 |"EXIT"...... 100|
000005C0: 3A 8B 52 4C B2 30 A7 20 8A 00 DB 0D E0 0B 8B 20 |:.RL.0. ....... |
000005D0: 52 4C B2 32 20 A7 20 31 31 30 30 00 E7 0D EA 0B |RL.2 . 1100.....|
000005E0: 99 22 93 1F 22 3A 80 00 02 0E 88 13 55 31 24 B2 |."..":......U1$.|
000005F0: C4 28 55 4E 29 3A 55 31 24 B2 55 31 24 AA 22 2C |.(UN):U1$.U1$.",|
00000600: 31 22 00 42 0E 89 13 99 22 93 11 11 1F 4C 4F 41 |1".B...."....LOA|
00000610: 44 1F 22 3B C7 28 33 34 29 3B 56 24 28 52 4C AA |D.";.(34);V$(RL.|
00000620: 31 36 AC 43 4C 29 3B C7 28 33 34 29 3B 22 2C 22 |16.CL);.(34);","|
00000630: 3B 55 31 24 3A 99 22 1F 11 11 11 11 52 55 4E 13 |;U1$:.".....RUN.|
00000640: 22 3B 00 66 0E 92 13 8B 58 41 B2 32 31 34 A7 97 |";.f....XA.214..|
00000650: 36 33 31 2C 31 33 3A 97 36 33 32 2C 31 33 3A 97 |631,13:.632,13:.|
00000660: 58 42 2C 32 3A 80 00 83 0E 9C 13 97 36 32 33 2C |XB,2:.......623,|
00000670: 31 33 3A 97 36 32 34 2C 31 33 3A 97 31 35 38 2C |13:.624,13:.158,|
00000680: 32 3A 80 00 A5 0E 70 17 49 4E 24 B2 22 5A 5A 22 |2:....p.IN$."ZZ"|
00000690: 3A 81 49 B2 31 A4 36 3A 49 4E 24 B2 49 4E 24 AA |:.I.1.6:IN$.IN$.|
000006A0: 49 4E 24 3A 82 00 C2 0E 7A 17 49 4E 24 B2 CA 28 |IN$:....z.IN$..(|
000006B0: 49 4E 24 2C 32 29 3A 49 4E 24 B2 49 4E 24 AA 49 |IN$,2):IN$.IN$.I|
000006C0: 4E 24 00 EC 0E 84 17 8B 20 C2 28 36 35 35 33 35 |N$...... .(65535|
000006D0: 29 B2 32 35 35 20 A7 20 58 41 B2 32 31 34 3A 58 |).255 . XA.214:X|
000006E0: 42 B2 31 39 38 3A 89 20 36 30 34 30 00 FE 0E 8E |B.198:. 6040....|
000006F0: 17 58 41 B2 32 31 36 3A 58 42 B2 31 35 38 00 2A |.XA.216:XB.158.*|
00000700: 0F 98 17 81 49 B2 38 39 36 20 A4 20 39 32 39 3A |....I.896 . 929:|
00000710: 87 20 58 24 3A 8B 20 C8 28 58 24 2C 31 29 B3 B1 |. X$:. .(X$,1)..|
00000720: 22 41 22 20 A7 20 36 30 36 30 00 50 0F A2 17 58 |"A" . 6060.P...X|
00000730: 24 B2 C4 28 C5 28 C9 28 58 24 2C C3 28 58 24 29 |$..(.(.(X$,.(X$)|
00000740: AB 31 29 29 AA 33 AC 28 58 41 B2 32 31 36 29 29 |.1)).3.(XA.216))|
00000750: 00 5F 0F AC 17 97 49 2C C5 28 58 24 29 3A 82 00 |._....I,.(X$):..|
00000760: 65 0F B6 17 8E 00 9A 0F C0 17 83 20 31 36 30 2C |e.......... 160,|
00000770: 32 2C 31 37 37 2C 41 34 35 2C 31 35 33 2C 41 31 |2,177,A45,153,A1|
00000780: 33 37 2C 30 2C 32 30 30 2C 31 39 32 2C 36 2C 32 |37,0,200,192,6,2|
00000790: 30 38 2C 32 34 36 2C 31 36 32 00 CE 0F CA 17 83 |08,246,162......|
000007A0: 20 31 2C 33 32 2C 31 39 38 2C 32 35 35 2C 33 32 | 1,32,198,255,32|
000007B0: 2C 32 32 38 2C 32 35 35 2C 31 36 34 2C 41 31 34 |,228,255,164,A14|
000007C0: 32 2C 31 34 35 2C 41 31 34 30 2C 32 30 30 00 F9 |2,145,A140,200..|
000007D0: 0F D4 17 83 20 31 33 32 2C 41 31 34 32 2C 31 39 |.... 132,A142,19|
000007E0: 36 2C 41 31 33 39 2C 32 30 38 2C 32 34 32 2C 37 |6,A139,208,242,7|
000007F0: 36 2C 32 30 34 2C 32 35 35 00 00 00 |6,204,255... |
..&....53280,6:.53281,6:.646,14:. 1000.8
....Z$:.Z$."". 1.>.....X....15,ER,ER$:.
ER.0 . ..W...."DISK ERROR #"ER:.ER$:.:..
..D.."....":.I.0.15:. J.0 .NC:..J.20);V$
(I.J.16);...N.. J:.:.I.O.X..XB,0:RL.0:CL
.0:.600...... I.0.1.0:.1:Z.F(Z$):TC.CL:T
R.RL:.J.0.1.0.(.... (Z.127).29 .CL.(CL.1
.2.(Z.157)) . NC.S.... (Z.127).17 .RL.(R
L.1.2.(Z.145)) . 15.D. .. Z.13 . I.1....
.. V$(RL.CL.16)..B$ .J.1......:.(TC..CL)
.(TR..RL)..500......:..L.... XA,TR.3:.:.
.TC.20);V$(TR.16.TC)...X.. XA,RL.3:.:..C
L.20);".";V$(RL.16.CL):.......I.1 . NV:V
$(I).B$:.:..$...."...":.6000.=...NC.1:.B
(213).79.NC.3.W...NV.(NC.1).16.1:.2000:B
$." ":.V$(NV)...L.NP.0
:SL.1:V$(0)."NEXT PAGE":."..."HE$.H.V.SL
.SL.NP:NP.MA.SL.1:. NP.NV. NP.NV.Z.`.. N
P.0 . 3000...J..900:. I.1 . NP:V$(I).PR$
(SL.I.1):....T..100:. CL.RL.0 . 1110.'.~
.. 5000.6.P..2900:MA.0.P.Z..15,UN,15,"I"
.DR$:.10.D....1,UN,3,"$".DR$.N.... 896..
...FO.F(IN$):. (FO . 3).1 . 2100..... 1:
15:."BAD DISK FORMAT.":..G.4.HE$.J(IN$,
143,16)...>.. FO.1 . SE.18:HE$.HE$.", 15
41/4040 FORMAT":. 2200.).H.. FO.1 . SE.1
9:HE$.HE$.", 2040 FORMAT".G.... PR$(SE.8
):.I.1 .SE:.896.O....J.1 . 254 . 32:A.F(
J(IN$,J)) . 127......A.2.MA.MA.1:PR$(MA)
.J(IN$,J.3,16)...... J...... ST . I.SE..
.J.. I.C.T. 1: 15:..Y.T.UN.8:DR.0:DR$."0
"...^.....H.."UNIT # ";UN;:."....";UN.0
.R.."DRIVE # ";DR;:."....";DR:.DR.(DR.1
) . 2930.@.|.DR$.D(DR):..V.... 900:."..N
O MORE PROGRAMS ON DISK. OPTIONS ARE:..
.L.V$(0)."SEE NEW DISK":V$(2)."RESTART T
HIS DISK":V$(4)."EXIT".I.V.. 100:.RL.0.
....... RL.2 . 1100......"..":......U1$.
D(UN):U1$.U1$.",1".B...."....LOAD.";G(34
);V$(RL.16.CL);G(34);",";U1$:.".....RUN.
";.F....XA.214..631,13:.632,13:.XB,2:...
....623,13:.624,13:.158,2:....P.IN$."ZZ"
:.I.1.6:IN$.IN$.IN$:..B.Z.IN$.J(IN$,2):I
N$.IN$.IN$...... B(65535).255 . XA.214:X
B.198:. 6040.....XA.216:XB.158.*....I.89
6 . 929:. X$:. H(X$,1).."A" . 6060.P...X
$.D(E(I(X$,C(X$).1)).3.(XA.216))._....I,
E(X$):..E.......... 160,2,177,A45,153,A1
37,0,200,192,6,208,246,162.N.J.. 1,32,19
8,255,32,228,255,164,A142,145,A140,200..
.T.. 132,A142,196,A139,208,242,76,204,25
5...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL