> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0B 08 00 00 89 31 30 30 30 00 1C 08 01 00 |.......1000.....|
00000010: A1 5A 24 3A 8B 5A 24 B2 22 22 A7 31 00 22 08 02 |.Z$:.Z$."".1."..|
00000020: 00 8E 00 39 08 0A 00 84 31 35 2C 45 52 2C 45 52 |...9....15,ER,ER|
00000030: 24 3A 8B 45 52 B2 30 A7 8E 00 58 08 14 00 99 22 |$:.ER.0...X...."|
00000040: 44 49 53 4B 20 45 52 52 4F 52 20 23 22 45 52 3A |DISK ERROR #"ER:|
00000050: 99 45 52 24 3A 80 3A 8E 00 88 08 64 00 99 22 13 |.ER$:.:....d..".|
00000060: 11 11 11 22 3A 81 49 B2 30 A4 31 35 3A 81 4A B2 |...":.I.0.15:.J.|
00000070: 30 A4 4E 43 3A 99 A3 4A AC 32 30 29 3B 56 24 28 |0.NC:..J.20);V$(|
00000080: 49 AA 4A AC 31 36 29 3B 00 94 08 6E 00 82 4A 3A |I.J.16);...n..J:|
00000090: 99 3A 82 49 00 AD 08 78 00 97 58 42 2C 30 3A 52 |.:.I...x..XB,0:R|
000000A0: 4C B2 30 3A 43 4C B2 30 3A 8D 36 30 30 00 DA 08 |L.0:CL.0:.600...|
000000B0: 82 00 81 49 B2 30 A4 31 A9 30 3A 8D 31 3A 5A B2 |...I.0.1.0:.1:Z.|
000000C0: C6 28 5A 24 29 3A 54 43 B2 43 4C 3A 54 52 B2 52 |.(Z$):TC.CL:TR.R|
000000D0: 4C 3A 81 4A B2 30 A4 31 A9 30 00 01 09 8C 00 8B |L:.J.0.1.0......|
000000E0: 28 5A AF 31 32 37 29 B2 32 39 A7 43 4C B2 28 43 |(Z.127).29.CL.(C|
000000F0: 4C AA 31 AA 32 AC 28 5A B2 31 35 37 29 29 AF 4E |L.1.2.(Z.157)).N|
00000100: 43 00 28 09 96 00 8B 28 5A AF 31 32 37 29 B2 31 |C.(....(Z.127).1|
00000110: 37 A7 52 4C B2 28 52 4C AA 31 AA 32 AC 28 5A B2 |7.RL.(RL.1.2.(Z.|
00000120: 31 34 35 29 29 AF 31 35 00 36 09 A0 00 8B 5A B2 |145)).15.6....Z.|
00000130: 31 33 A7 49 B2 31 00 50 09 AA 00 8B 56 24 28 52 |13.I.1.P....V$(R|
00000140: 4C AA 43 4C AC 31 36 29 B3 B1 42 24 A7 4A B2 31 |L.CL.16)..B$.J.1|
00000150: 00 6E 09 B4 00 82 3A 8B 28 54 43 B3 B1 43 4C 29 |.n....:.(TC..CL)|
00000160: B0 28 54 52 B3 B1 52 4C 29 A7 8D 35 30 30 00 76 |.(TR..RL)..500.v|
00000170: 09 BE 00 82 3A 8E 00 9B 09 F4 01 97 58 41 2C 54 |....:.......XA,T|
00000180: 52 AA 33 3A 99 3A 99 A3 54 43 AC 32 30 29 3B 56 |R.3:.:..TC.20);V|
00000190: 24 28 54 52 AA 31 36 AC 54 43 29 00 C6 09 58 02 |$(TR.16.TC)...X.|
000001A0: 97 58 41 2C 52 4C AA 33 3A 99 3A 99 A3 43 4C AC |.XA,RL.3:.:..CL.|
000001B0: 32 30 29 3B 22 12 22 3B 56 24 28 52 4C AA 31 36 |20);".";V$(RL.16|
000001C0: AC 43 4C 29 3A 8E 00 DF 09 84 03 81 49 B2 31 A4 |.CL):.......I.1.|
000001D0: 4E 56 3A 56 24 28 49 29 B2 42 24 3A 82 3A 8E 00 |NV:V$(I).B$:.:..|
000001E0: F0 09 E8 03 99 22 13 13 93 22 3A 8D 36 30 30 30 |....."...":.6000|
000001F0: 00 09 0A F2 03 4E 43 B2 31 3A 8B C2 28 32 31 33 |.....NC.1:..(213|
00000200: 29 B2 37 39 A7 4E 43 B2 33 00 43 0A FC 03 4E 56 |).79.NC.3.C...NV|
00000210: B2 28 4E 43 AA 31 29 AC 31 36 AB 31 3A 8D 32 30 |.(NC.1).16.1:.20|
00000220: 30 30 3A 42 24 B2 22 20 20 20 20 20 20 20 20 20 |00:B$." |
00000230: 20 20 20 20 20 20 20 20 20 20 22 3A 86 56 24 28 | ":.V$(|
00000240: 4E 56 29 00 6D 0A 4C 04 4E 50 B2 30 3A 53 4C B2 |NV).m.L.NP.0:SL.|
00000250: 31 3A 56 24 28 30 29 B2 22 4E 45 58 54 20 50 41 |1:V$(0)."NEXT PA|
00000260: 47 45 22 3A 99 22 93 11 12 22 48 45 24 00 92 0A |GE":."..."HE$...|
00000270: 56 04 53 4C B2 53 4C AA 4E 50 3A 4E 50 B2 4D 41 |V.SL.SL.NP:NP.MA|
00000280: AB 53 4C AA 31 3A 8B 4E 50 B1 4E 56 A7 4E 50 B2 |.SL.1:.NP.NV.NP.|
00000290: 4E 56 00 A1 0A 60 04 8B 4E 50 B2 30 A7 33 30 30 |NV...`..NP.0.300|
000002A0: 30 00 C6 0A 6A 04 8D 39 30 30 3A 81 49 B2 31 A4 |0...j..900:.I.1.|
000002B0: 4E 50 3A 56 24 28 49 29 B2 50 52 24 28 53 4C AA |NP:V$(I).PR$(SL.|
000002C0: 49 AB 31 29 3A 82 00 DD 0A 74 04 8D 31 30 30 3A |I.1):....t..100:|
000002D0: 8B 43 4C AA 52 4C B2 30 A7 31 31 31 30 00 E7 0A |.CL.RL.0.1110...|
000002E0: 7E 04 89 35 30 30 30 00 F6 0A D0 07 8D 32 39 30 |~..5000......290|
000002F0: 30 3A 4D 41 B2 30 00 10 0B DA 07 9F 31 35 2C 55 |0:MA.0......15,U|
00000300: 4E 2C 31 35 2C 22 49 22 AA 44 52 24 3A 8D 31 30 |N,15,"I".DR$:.10|
00000310: 00 24 0B E4 07 9F 31 2C 55 4E 2C 33 2C 22 24 22 |.$....1,UN,3,"$"|
00000320: AA 44 52 24 00 2D 0B EE 07 9E 38 39 36 00 4A 0B |.DR$.-....896.J.|
00000330: F8 07 46 4F B2 C6 28 49 4E 24 29 3A 8B 28 46 4F |..FO..(IN$):.(FO|
00000340: AF 33 29 B2 31 A7 32 31 30 30 00 6A 0B 02 08 A0 |.3).1.2100.j....|
00000350: 31 3A A0 31 35 3A 99 22 42 41 44 20 44 49 53 4B |1:.15:."BAD DISK|
00000360: 20 46 4F 52 4D 41 54 22 3A 80 00 80 0B 34 08 48 | FORMAT":....4.H|
00000370: 45 24 B2 CA 28 49 4E 24 2C 31 34 33 2C 31 36 29 |E$..(IN$,143,16)|
00000380: 00 B3 0B 3E 08 8B 46 4F B1 31 A7 53 45 B2 31 38 |...>..FO.1.SE.18|
00000390: 3A 48 45 24 B2 48 45 24 AA 22 2C 20 31 35 34 31 |:HE$.HE$.", 1541|
000003A0: 2F 34 30 34 30 20 46 4F 52 4D 41 54 22 3A 89 32 |/4040 FORMAT":.2|
000003B0: 32 30 30 00 DB 0B 48 08 8B 46 4F B2 31 A7 53 45 |200...H..FO.1.SE|
000003C0: B2 31 39 3A 48 45 24 B2 48 45 24 AA 22 2C 20 32 |.19:HE$.HE$.", 2|
000003D0: 30 34 30 20 46 4F 52 4D 41 54 22 00 F8 0B 98 08 |040 FORMAT".....|
000003E0: 86 20 50 52 24 28 53 45 AC 38 29 3A 81 49 B2 31 |. PR$(SE.8):.I.1|
000003F0: A4 53 45 3A 9E 38 39 36 00 1A 0C A2 08 81 4A B2 |.SE:.896......J.|
00000400: 31 A4 32 35 34 A9 33 32 3A 41 B2 C6 28 CA 28 49 |1.254.32:A..(.(I|
00000410: 4E 24 2C 4A 29 29 AF 31 32 37 00 41 0C AC 08 8B |N$,J)).127.A....|
00000420: 41 B2 32 A7 4D 41 B2 4D 41 AA 31 3A 50 52 24 28 |A.2.MA.MA.1:PR$(|
00000430: 4D 41 29 B2 CA 28 49 4E 24 2C 4A AA 33 2C 31 36 |MA)..(IN$,J.3,16|
00000440: 29 00 48 0C B6 08 82 4A 00 55 0C C0 08 8B 53 54 |).H....J.U....ST|
00000450: A7 49 B2 53 45 00 5C 0C CA 08 82 49 00 69 0C D4 |.I.SE.\....I.i..|
00000460: 08 A0 31 3A A0 31 35 3A 8E 00 7F 0C 54 0B 55 4E |..1:.15:....T.UN|
00000470: B2 38 3A 44 52 B2 30 3A 44 52 24 B2 22 30 22 00 |.8:DR.0:DR$."0".|
00000480: 85 0C 5E 0B 8E 00 A4 0C 68 0B 99 22 55 4E 49 54 |..^.....h.."UNIT|
00000490: 20 23 20 20 22 3B 55 4E 3B 3A 85 22 9D 9D 9D 9D | # ";UN;:."....|
000004A0: 22 3B 55 4E 00 D5 0C 72 0B 99 22 44 52 49 56 45 |";UN...r.."DRIVE|
000004B0: 20 23 20 20 22 3B 44 52 3B 3A 85 22 9D 9D 9D 9D | # ";DR;:."....|
000004C0: 22 3B 44 52 3A 8B 20 44 52 AC 28 44 52 AB 31 29 |";DR:. DR.(DR.1)|
000004D0: A7 32 39 33 30 00 E5 0C 7C 0B 44 52 24 B2 C4 28 |.2930...|.DR$..(|
000004E0: 44 52 29 3A 8E 00 1A 0D B8 0B 8D 39 30 30 3A 99 |DR):.......900:.|
000004F0: 22 93 11 4E 4F 20 4D 4F 52 45 20 50 52 4F 47 52 |"..NO MORE PROGR|
00000500: 41 4D 53 20 4F 4E 20 44 49 53 4B 2E 20 20 4F 50 |AMS ON DISK. OP|
00000510: 54 49 4F 4E 53 20 41 52 45 3A 00 5A 0D CC 0B 56 |TIONS ARE:.Z...V|
00000520: 24 28 30 29 B2 22 53 45 45 20 4E 45 57 20 44 49 |$(0)."SEE NEW DI|
00000530: 53 4B 22 3A 56 24 28 32 29 B2 22 52 45 53 54 41 |SK":V$(2)."RESTA|
00000540: 52 54 20 54 48 49 53 20 44 49 53 4B 22 3A 56 24 |RT THIS DISK":V$|
00000550: 28 34 29 B2 22 51 55 49 54 22 00 6B 0D D6 0B 8D |(4)."QUIT".k....|
00000560: 31 30 30 3A 8B 52 4C B2 30 A7 8A 00 7A 0D E0 0B |100:.RL.0...z...|
00000570: 8B 52 4C B2 32 A7 31 31 30 30 00 85 0D EA 0B 99 |.RL.2.1100......|
00000580: 22 93 22 3A 80 00 C1 0D 88 13 99 22 93 11 11 4C |".":......."...L|
00000590: 4F 41 44 22 3B C7 28 33 34 29 3B 56 24 28 52 4C |OAD";.(34);V$(RL|
000005A0: AA 31 36 AC 43 4C 29 3B C7 28 33 34 29 3B 22 2C |.16.CL);.(34);",|
000005B0: 22 3B 55 4E 3A 99 22 11 11 11 11 52 55 4E 13 22 |";UN:."....RUN."|
000005C0: 3B 00 E5 0D 92 13 8B 58 41 B2 32 31 34 A7 97 36 |;......XA.214..6|
000005D0: 33 31 2C 31 33 3A 97 36 33 32 2C 31 33 3A 97 58 |31,13:.632,13:.X|
000005E0: 42 2C 32 3A 80 00 02 0E 9C 13 97 36 32 33 2C 31 |B,2:.......623,1|
000005F0: 33 3A 97 36 32 34 2C 31 33 3A 97 31 35 38 2C 32 |3:.624,13:.158,2|
00000600: 3A 80 00 24 0E 70 17 49 4E 24 B2 22 5A 5A 22 3A |:..$.p.IN$."ZZ":|
00000610: 81 49 B2 31 A4 36 3A 49 4E 24 B2 49 4E 24 AA 49 |.I.1.6:IN$.IN$.I|
00000620: 4E 24 3A 82 00 41 0E 7A 17 49 4E 24 B2 CA 28 49 |N$:..A.z.IN$..(I|
00000630: 4E 24 2C 32 29 3A 49 4E 24 B2 49 4E 24 AA 49 4E |N$,2):IN$.IN$.IN|
00000640: 24 00 67 0E 84 17 8B C2 28 36 35 35 33 35 29 B2 |$.g.....(65535).|
00000650: 32 35 35 A7 58 41 B2 32 31 34 3A 58 42 B2 31 39 |255.XA.214:XB.19|
00000660: 38 3A 89 36 30 34 30 00 79 0E 8E 17 58 41 B2 32 |8:.6040.y...XA.2|
00000670: 31 36 3A 58 42 B2 31 35 38 00 9F 0E 98 17 81 49 |16:XB.158......I|
00000680: B2 38 39 36 A4 39 32 39 3A 87 58 24 3A 8B C8 28 |.896.929:.X$:..(|
00000690: 58 24 2C 31 29 B3 B1 22 41 22 A7 36 30 36 30 00 |X$,1).."A".6060.|
000006A0: C5 0E A2 17 58 24 B2 C4 28 C5 28 C9 28 58 24 2C |....X$..(.(.(X$,|
000006B0: C3 28 58 24 29 AB 31 29 29 AA 33 AC 28 58 41 B2 |.(X$).1)).3.(XA.|
000006C0: 32 31 36 29 29 00 D4 0E AC 17 97 49 2C C5 28 58 |216))......I,.(X|
000006D0: 24 29 3A 82 00 DA 0E B6 17 8E 00 0E 0F C0 17 83 |$):.............|
000006E0: 31 36 30 2C 32 2C 31 37 37 2C 41 34 35 2C 31 35 |160,2,177,A45,15|
000006F0: 33 2C 41 31 33 37 2C 30 2C 32 30 30 2C 31 39 32 |3,A137,0,200,192|
00000700: 2C 36 2C 32 30 38 2C 32 34 36 2C 31 36 32 00 41 |,6,208,246,162.A|
00000710: 0F CA 17 83 31 2C 33 32 2C 31 39 38 2C 32 35 35 |....1,32,198,255|
00000720: 2C 33 32 2C 32 32 38 2C 32 35 35 2C 31 36 34 2C |,32,228,255,164,|
00000730: 41 31 34 32 2C 31 34 35 2C 41 31 34 30 2C 32 30 |A142,145,A140,20|
00000740: 30 00 6B 0F D4 17 83 31 33 32 2C 41 31 34 32 2C |0.k....132,A142,|
00000750: 31 39 36 2C 41 31 33 39 2C 32 30 38 2C 32 34 32 |196,A139,208,242|
00000760: 2C 37 36 2C 32 30 34 2C 32 35 35 00 00 00 |,76,204,255... |
.......1000......Z$:.Z$."".1.".....9....
15,ER,ER$:.ER.0...X...."DISK ERROR #"ER:
.ER$:.:....D.."....":.I.0.15:.J.0.NC:..J
.20);V$(I.J.16);...N..J:.:.I...X..XB,0:R
L.0:CL.0:.600.Z....I.0.1.0:.1:Z.F(Z$):TC
.CL:TR.RL:.J.0.1.0......(Z.127).29.CL.(C
L.1.2.(Z.157)).NC.(....(Z.127).17.RL.(RL
.1.2.(Z.145)).15.6. ..Z.13.I.1.P....V$(R
L.CL.16)..B$.J.1.N....:.(TC..CL).(TR..RL
)..500.V....:.......XA,TR.3:.:..TC.20);V
$(TR.16.TC).F.X..XA,RL.3:.:..CL.20);".";
V$(RL.16.CL):.......I.1.NV:V$(I).B$:.:..
....."...":.6000.....NC.1:.B(213).79.NC.
3.C...NV.(NC.1).16.1:.2000:B$."
":.V$(NV).M.L.NP.0:SL.1:V$(0).
"NEXT PAGE":."..."HE$...V.SL.SL.NP:NP.MA
.SL.1:.NP.NV.NP.NV...`..NP.0.3000.F.J..9
00:.I.1.NP:V$(I).PR$(SL.I.1):....T..100:
.CL.RL.0.1110...~..5000...P..2900:MA.0..
.Z..15,UN,15,"I".DR$:.10.$....1,UN,3,"$"
.DR$.-....896.J...FO.F(IN$):.(FO.3).1.21
00.J... 1: 15:."BAD DISK FORMAT":....4.H
E$.J(IN$,143,16)...>..FO.1.SE.18:HE$.HE$
.", 1541/4040 FORMAT":.2200...H..FO.1.SE
.19:HE$.HE$.", 2040 FORMAT"...... PR$(SE
.8):.I.1.SE:.896......J.1.254.32:A.F(J(I
N$,J)).127.A....A.2.MA.MA.1:PR$(MA).J(IN
$,J.3,16).H....J.U....ST.I.SE.\.J..I.I.T
. 1: 15:...T.UN.8:DR.0:DR$."0"...^.....
H.."UNIT # ";UN;:."....";UN.U.R.."DRIVE
# ";DR;:."....";DR:. DR.(DR.1).2930...
|.DR$.D(DR):.......900:."..NO MORE PROGR
AMS ON DISK. OPTIONS ARE:.Z.L.V$(0)."SE
E NEW DISK":V$(2)."RESTART THIS DISK":V$
(4)."QUIT".K.V..100:.RL.0...Z....RL.2.11
00......".":..A...."...LOAD";G(34);V$(RL
.16.CL);G(34);",";UN:."....RUN.";......X
A.214..631,13:.632,13:.XB,2:.......623,1
3:.624,13:.158,2:..$.P.IN$."ZZ":.I.1.6:I
N$.IN$.IN$:..A.Z.IN$.J(IN$,2):IN$.IN$.IN
$.G....B(65535).255.XA.214:XB.198:.6040.
Y...XA.216:XB.158......I.896.929:.X$:.H(
X$,1).."A".6060.E...X$.D(E(I(X$,C(X$).1)
).3.(XA.216)).T....I,E(X$):..Z..........
160,2,177,A45,153,A137,0,200,192,6,208,2
46,162.A.J..1,32,198,255,32,228,255,164,
A142,145,A140,200.K.T..132,A142,196,A139
,208,242,76,204,255...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL