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