> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0C 08 00 00 89 20 31 30 30 30 00 20 08 01 |....... 1000. ..|
00000010: 00 A1 5A 24 3A 8B 20 5A 24 B2 22 22 20 A7 20 31 |..Z$:. Z$."" . 1|
00000020: 00 26 08 02 00 8E 00 40 08 0A 00 84 31 35 2C 45 |.&.....@....15,E|
00000030: 52 2C 45 52 24 3A 8B 20 45 52 B2 30 20 A7 20 8E |R,ER$:. ER.0 . .|
00000040: 00 60 08 14 00 99 22 44 49 53 4B 20 45 52 52 4F |.`...."DISK ERRO|
00000050: 52 20 23 22 45 52 3A 99 20 45 52 24 3A 80 3A 8E |R #"ER:. ER$:.:.|
00000060: 00 96 08 64 00 99 22 13 11 11 11 22 3A 81 20 49 |...d.."....":. I|
00000070: B2 30 20 A4 20 31 35 3A 81 20 4A B2 30 20 A4 20 |.0 . 15:. J.0 . |
00000080: 4E 43 3A 99 A3 4A AC 32 30 29 3B 56 24 28 49 AA |NC:..J.20);V$(I.|
00000090: 4A AC 31 36 29 3B 00 A4 08 6E 00 82 20 4A 3A 99 |J.16);...n.. J:.|
000000A0: 3A 82 20 49 00 BE 08 78 00 97 20 58 42 2C 30 3A |:. I...x.. XB,0:|
000000B0: 52 4C B2 30 3A 43 4C B2 30 3A 8D 36 30 30 00 F6 |RL.0:CL.0:.600..|
000000C0: 08 82 00 81 20 49 B2 30 20 A4 20 31 20 A9 20 30 |.... I.0 . 1 . 0|
000000D0: 3A 8D 20 31 3A 5A B2 C6 28 5A 24 29 3A 54 43 B2 |:. 1:Z..(Z$):TC.|
000000E0: 43 4C 3A 54 52 B2 52 4C 3A 81 20 4A B2 30 20 A4 |CL:TR.RL:. J.0 .|
000000F0: 20 31 20 A9 20 30 00 20 09 8C 00 8B 28 5A AF 31 | 1 . 0. ....(Z.1|
00000100: 32 37 29 B2 32 39 20 A7 20 43 4C B2 28 43 4C AA |27).29 . CL.(CL.|
00000110: 31 AA 32 AC 28 5A B2 31 35 37 29 29 AF 20 4E 43 |1.2.(Z.157)). NC|
00000120: 00 4A 09 96 00 8B 28 5A AF 31 32 37 29 B2 31 37 |.J....(Z.127).17|
00000130: 20 A7 20 52 4C B2 28 52 4C AA 31 AA 32 AC 28 5A | . RL.(RL.1.2.(Z|
00000140: B2 31 34 35 29 29 AF 20 31 35 00 5B 09 A0 00 8B |.145)). 15.[....|
00000150: 20 5A B2 31 33 20 A7 20 49 B2 31 00 78 09 AA 00 | Z.13 . I.1.x...|
00000160: 8B 20 56 24 28 52 4C AA 43 4C AC 31 36 29 B3 B1 |. V$(RL.CL.16)..|
00000170: 42 24 20 A7 20 4A B2 31 00 99 09 B4 00 82 3A 8B |B$ . J.1......:.|
00000180: 28 54 43 B3 B1 43 4C 29 B0 28 54 52 B3 B1 52 4C |(TC..CL).(TR..RL|
00000190: 29 20 A7 20 8D 20 35 30 30 00 A1 09 BE 00 82 3A |) . . 500......:|
000001A0: 8E 00 C7 09 F4 01 97 20 58 41 2C 54 52 AA 33 3A |....... XA,TR.3:|
000001B0: 99 3A 99 A3 54 43 AC 32 30 29 3B 56 24 28 54 52 |.:..TC.20);V$(TR|
000001C0: AA 31 36 AC 54 43 29 00 F3 09 58 02 97 20 58 41 |.16.TC)...X.. XA|
000001D0: 2C 52 4C AA 33 3A 99 3A 99 A3 43 4C AC 32 30 29 |,RL.3:.:..CL.20)|
000001E0: 3B 22 12 22 3B 56 24 28 52 4C AA 31 36 AC 43 4C |;".";V$(RL.16.CL|
000001F0: 29 3A 8E 00 0F 0A 84 03 81 20 49 B2 31 20 A4 20 |):....... I.1 . |
00000200: 4E 56 3A 56 24 28 49 29 B2 42 24 3A 82 3A 8E 00 |NV:V$(I).B$:.:..|
00000210: 21 0A E8 03 99 22 13 13 93 22 3A 8D 20 36 30 30 |!...."...":. 600|
00000220: 30 00 3D 0A F2 03 4E 43 B2 31 3A 8B 20 C2 28 32 |0.=...NC.1:. .(2|
00000230: 31 33 29 B2 37 39 20 A7 20 4E 43 B2 33 00 78 0A |13).79 . NC.3.x.|
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 20 32 30 30 30 3A 42 24 B2 22 20 20 20 20 |:. 2000:B$." |
00000260: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
00000270: 3A 86 56 24 28 4E 56 29 00 A2 0A 4C 04 4E 50 B2 |:.V$(NV)...L.NP.|
00000280: 30 3A 53 4C B2 31 3A 56 24 28 30 29 B2 22 4E 45 |0:SL.1:V$(0)."NE|
00000290: 58 54 20 50 41 47 45 22 3A 99 22 93 11 12 22 48 |XT PAGE":."..."H|
000002A0: 45 24 00 C9 0A 56 04 53 4C B2 53 4C AA 4E 50 3A |E$...V.SL.SL.NP:|
000002B0: 4E 50 B2 4D 41 AB 53 4C AA 31 3A 8B 4E 50 B1 4E |NP.MA.SL.1:.NP.N|
000002C0: 56 20 A7 20 4E 50 B2 4E 56 00 DB 0A 60 04 8B 20 |V . NP.NV...`.. |
000002D0: 4E 50 B2 30 20 A7 20 33 30 30 30 00 04 0B 6A 04 |NP.0 . 3000...j.|
000002E0: 8D 20 39 30 30 3A 81 20 49 B2 31 20 A4 20 4E 50 |. 900:. I.1 . NP|
000002F0: 3A 56 24 28 49 29 B2 50 52 24 28 53 4C AA 49 AB |:V$(I).PR$(SL.I.|
00000300: 31 29 3A 82 00 1F 0B 74 04 8D 20 31 30 30 3A 8B |1):....t.. 100:.|
00000310: 20 43 4C AA 52 4C B2 30 20 A7 20 31 31 31 30 00 | CL.RL.0 . 1110.|
00000320: 2A 0B 7E 04 89 20 35 30 30 30 00 3A 0B D0 07 8D |*.~.. 5000.:....|
00000330: 20 32 39 30 30 3A 4D 41 B2 30 00 56 0B DA 07 9F | 2900:MA.0.V....|
00000340: 20 31 35 2C 55 4E 2C 31 35 2C 22 49 22 AA 44 52 | 15,UN,15,"I".DR|
00000350: 24 3A 8D 20 31 30 00 6B 0B E4 07 9F 20 31 2C 55 |$:. 10.k.... 1,U|
00000360: 4E 2C 33 2C 22 24 22 AA 44 52 24 00 75 0B EE 07 |N,3,"$".DR$.u...|
00000370: 9E 20 38 39 36 00 97 0B F8 07 46 4F B2 C6 28 49 |. 896.....FO..(I|
00000380: 4E 24 29 3A 8B 20 28 46 4F 20 AF 20 33 29 B2 31 |N$):. (FO . 3).1|
00000390: 20 A7 20 32 31 30 30 00 B9 0B 02 08 A0 20 31 3A | . 2100...... 1:|
000003A0: A0 20 31 35 3A 99 22 42 41 44 20 44 49 53 4B 20 |. 15:."BAD DISK |
000003B0: 46 4F 52 4D 41 54 22 3A 80 00 CF 0B 34 08 48 45 |FORMAT":....4.HE|
000003C0: 24 B2 CA 28 49 4E 24 2C 31 34 33 2C 31 36 29 00 |$..(IN$,143,16).|
000003D0: 06 0C 3E 08 8B 20 46 4F B1 31 20 A7 20 53 45 B2 |..>.. FO.1 . SE.|
000003E0: 31 38 3A 48 45 24 B2 48 45 24 AA 22 2C 20 31 35 |18:HE$.HE$.", 15|
000003F0: 34 31 2F 34 30 34 30 20 46 4F 52 4D 41 54 22 3A |41/4040 FORMAT":|
00000400: 89 20 32 32 30 30 00 31 0C 48 08 8B 20 46 4F B2 |. 2200.1.H.. FO.|
00000410: 31 20 A7 20 53 45 B2 31 39 3A 48 45 24 B2 48 45 |1 . SE.19:HE$.HE|
00000420: 24 AA 22 2C 20 32 30 34 30 20 46 4F 52 4D 41 54 |$.", 2040 FORMAT|
00000430: 22 00 52 0C 98 08 86 20 50 52 24 28 53 45 AC 38 |".R.... PR$(SE.8|
00000440: 29 3A 81 20 49 B2 31 20 A4 20 53 45 3A 9E 20 38 |):. I.1 . SE:. 8|
00000450: 39 36 00 7B 0C A2 08 81 20 4A B2 31 20 A4 20 32 |96.{.... J.1 . 2|
00000460: 35 34 20 A9 20 33 32 3A 41 B2 C6 28 CA 28 49 4E |54 . 32:A..(.(IN|
00000470: 24 2C 4A 29 29 20 AF 20 31 32 37 00 A5 0C AC 08 |$,J)) . 127.....|
00000480: 8B 20 41 B2 32 20 A7 20 4D 41 B2 4D 41 AA 31 3A |. A.2 . MA.MA.1:|
00000490: 50 52 24 28 4D 41 29 B2 CA 28 49 4E 24 2C 4A AA |PR$(MA)..(IN$,J.|
000004A0: 33 2C 31 36 29 00 AD 0C B6 08 82 20 4A 00 BD 0C |3,16)...... J...|
000004B0: C0 08 8B 20 53 54 20 A7 20 49 B2 53 45 00 C5 0C |... ST . I.SE...|
000004C0: CA 08 82 20 49 00 D4 0C D4 08 A0 20 31 3A A0 20 |... I...... 1:. |
000004D0: 31 35 3A 8E 00 EA 0C 54 0B 55 4E B2 38 3A 44 52 |15:....T.UN.8:DR|
000004E0: B2 30 3A 44 52 24 B2 22 30 22 00 F0 0C 5E 0B 8E |.0:DR$."0"...^..|
000004F0: 00 0F 0D 68 0B 99 22 55 4E 49 54 20 23 20 20 22 |...h.."UNIT # "|
00000500: 3B 55 4E 3B 3A 85 22 9D 9D 9D 9D 22 3B 55 4E 00 |;UN;:."....";UN.|
00000510: 42 0D 72 0B 99 22 44 52 49 56 45 20 23 20 20 22 |B.r.."DRIVE # "|
00000520: 3B 44 52 3B 3A 85 22 9D 9D 9D 9D 22 3B 44 52 3A |;DR;:."....";DR:|
00000530: 8B 20 44 52 AC 28 44 52 AB 31 29 20 A7 20 32 39 |. DR.(DR.1) . 29|
00000540: 33 30 00 52 0D 7C 0B 44 52 24 B2 C4 28 44 52 29 |30.R.|.DR$..(DR)|
00000550: 3A 8E 00 88 0D B8 0B 8D 20 39 30 30 3A 99 22 93 |:....... 900:.".|
00000560: 11 4E 4F 20 4D 4F 52 45 20 50 52 4F 47 52 41 4D |.NO MORE PROGRAM|
00000570: 53 20 4F 4E 20 44 49 53 4B 2E 20 20 4F 50 54 49 |S ON DISK. OPTI|
00000580: 4F 4E 53 20 41 52 45 3A 00 C8 0D CC 0B 56 24 28 |ONS ARE:.....V$(|
00000590: 30 29 B2 22 53 45 45 20 4E 45 57 20 44 49 53 4B |0)."SEE NEW DISK|
000005A0: 22 3A 56 24 28 32 29 B2 22 52 45 53 54 41 52 54 |":V$(2)."RESTART|
000005B0: 20 54 48 49 53 20 44 49 53 4B 22 3A 56 24 28 34 | THIS DISK":V$(4|
000005C0: 29 B2 22 51 55 49 54 22 00 DD 0D D6 0B 8D 20 31 |)."QUIT"...... 1|
000005D0: 30 30 3A 8B 20 52 4C B2 30 20 A7 20 8A 00 EF 0D |00:. RL.0 . ....|
000005E0: E0 0B 8B 20 52 4C B2 32 20 A7 20 31 31 30 30 00 |... RL.2 . 1100.|
000005F0: FA 0D EA 0B 99 22 93 22 3A 80 00 36 0E 88 13 99 |.....".":..6....|
00000600: 22 93 11 11 4C 4F 41 44 22 3B C7 28 33 34 29 3B |"...LOAD";.(34);|
00000610: 56 24 28 52 4C AA 31 36 AC 43 4C 29 3B C7 28 33 |V$(RL.16.CL);.(3|
00000620: 34 29 3B 22 2C 22 3B 55 4E 3A 99 22 11 11 11 11 |4);",";UN:."....|
00000630: 52 55 4E 13 22 3B 00 60 0E 92 13 8B 20 58 41 B2 |RUN.";.`.... XA.|
00000640: 32 31 34 20 A7 20 97 20 36 33 31 2C 31 33 3A 97 |214 . . 631,13:.|
00000650: 20 36 33 32 2C 31 33 3A 97 20 58 42 2C 32 3A 80 | 632,13:. XB,2:.|
00000660: 00 80 0E 9C 13 97 20 36 32 33 2C 31 33 3A 97 20 |...... 623,13:. |
00000670: 36 32 34 2C 31 33 3A 97 20 31 35 38 2C 32 3A 80 |624,13:. 158,2:.|
00000680: 00 A5 0E 70 17 49 4E 24 B2 22 5A 5A 22 3A 81 20 |...p.IN$."ZZ":. |
00000690: 49 B2 31 20 A4 20 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 2B |.XA.216:XB.158.+|
00000700: 0F 98 17 81 20 49 B2 38 39 36 20 A4 20 39 32 39 |.... I.896 . 929|
00000710: 3A 87 20 58 24 3A 8B 20 C8 28 58 24 2C 31 29 B3 |:. X$:. .(X$,1).|
00000720: B1 22 41 22 20 A7 20 36 30 36 30 00 51 0F A2 17 |."A" . 6060.Q...|
00000730: 58 24 B2 C4 28 C5 28 C9 28 58 24 2C C3 28 58 24 |X$..(.(.(X$,.(X$|
00000740: 29 AB 31 29 29 AA 33 AC 28 58 41 B2 32 31 36 29 |).1)).3.(XA.216)|
00000750: 29 00 61 0F AC 17 97 20 49 2C C5 28 58 24 29 3A |).a.... I,.(X$):|
00000760: 82 00 67 0F B6 17 8E 00 9C 0F C0 17 83 20 31 36 |..g.......... 16|
00000770: 30 2C 32 2C 31 37 37 2C 41 34 35 2C 31 35 33 2C |0,2,177,A45,153,|
00000780: 41 31 33 37 2C 30 2C 32 30 30 2C 31 39 32 2C 36 |A137,0,200,192,6|
00000790: 2C 32 30 38 2C 32 34 36 2C 31 36 32 00 D0 0F CA |,208,246,162....|
000007A0: 17 83 20 31 2C 33 32 2C 31 39 38 2C 32 35 35 2C |.. 1,32,198,255,|
000007B0: 33 32 2C 32 32 38 2C 32 35 35 2C 31 36 34 2C 41 |32,228,255,164,A|
000007C0: 31 34 32 2C 31 34 35 2C 41 31 34 30 2C 32 30 30 |142,145,A140,200|
000007D0: 00 FB 0F D4 17 83 20 31 33 32 2C 41 31 34 32 2C |...... 132,A142,|
000007E0: 31 39 36 2C 41 31 33 39 2C 32 30 38 2C 32 34 32 |196,A139,208,242|
000007F0: 2C 37 36 2C 32 30 34 2C 32 35 35 00 00 00 |,76,204,255... |
....... 1000. ....Z$:. Z$."" . 1.&.....@
....15,ER,ER$:. ER.0 . ..`...."DISK ERRO
R #"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$):TC.CL:TR.RL:. J.0 .
1 . 0. ....(Z.127).29 . CL.(CL.1.2.(Z.1
57)). NC.J....(Z.127).17 . RL.(RL.1.2.(Z
.145)). 15.[. .. Z.13 . I.1.X.... V$(RL.
CL.16)..B$ . J.1......:.(TC..CL).(TR..RL
) . . 500......:..G.... XA,TR.3:.:..TC.2
0);V$(TR.16.TC)...X.. XA,RL.3:.:..CL.20)
;".";V$(RL.16.CL):....... I.1 . NV:V$(I)
.B$:.:..!...."...":. 6000.=...NC.1:. B(2
13).79 . NC.3.X...NV.(NC.1).16.1:. 2000:
B$." ":.V$(NV)...L.NP.
0:SL.1:V$(0)."NEXT PAGE":."..."HE$.I.V.S
L.SL.NP:NP.MA.SL.1:.NP.NV . NP.NV...`..
NP.0 . 3000...J.. 900:. I.1 . NP:V$(I).P
R$(SL.I.1):....T.. 100:. CL.RL.0 . 1110.
*.~.. 5000.:.P.. 2900:MA.0.V.Z.. 15,UN,1
5,"I".DR$:. 10.K.... 1,UN,3,"$".DR$.U...
. 896.....FO.F(IN$):. (FO . 3).1 . 2100.
.... 1: 15:."BAD DISK FORMAT":..O.4.HE
$.J(IN$,143,16)...>.. FO.1 . SE.18:HE$.H
E$.", 1541/4040 FORMAT":. 2200.1.H.. FO.
1 . SE.19:HE$.HE$.", 2040 FORMAT".R....
PR$(SE.8):. I.1 . SE:. 896.{.... J.1 . 2
54 . 32:A.F(J(IN$,J)) . 127...... A.2 .
MA.MA.1:PR$(MA).J(IN$,J.3,16)...... J...
... ST . I.SE.E.J.. I.T.T. 1: 15:....T
.UN.8:DR.0:DR$."0"...^.....H.."UNIT # "
;UN;:."....";UN.B.R.."DRIVE # ";DR;:.".
...";DR:. DR.(DR.1) . 2930.R.|.DR$.D(DR)
:....... 900:."..NO MORE PROGRAMS ON DIS
K. OPTIONS ARE:.H.L.V$(0)."SEE NEW DISK
":V$(2)."RESTART THIS DISK":V$(4)."QUIT"
...V.. 100:. RL.0 . ....... RL.2 . 1100.
.....".":..6...."...LOAD";G(34);V$(RL.16
.CL);G(34);",";UN:."....RUN.";.`.... XA.
214 . . 631,13:. 632,13:. XB,2:....... 6
23,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.8
96 . 929:. X$:. H(X$,1).."A" . 6060.Q...
X$.D(E(I(X$,C(X$).1)).3.(XA.216)).A....
I,E(X$):..G.......... 160,2,177,A45,153,
A137,0,200,192,6,208,246,162.P.J.. 1,32,
198,255,32,228,255,164,A142,145,A140,200
...T.. 132,A142,196,A139,208,242,76,204,
255...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL