> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 24 08 00 00 97 35 33 32 38 30 2C 31 31 3A |..$....53280,11:|
00000010: 97 35 33 32 38 31 2C 31 32 3A 97 36 34 36 2C 30 |.53281,12:.646,0|
00000020: 3A 89 31 38 00 35 08 01 00 A1 5A 24 3A 8B 5A 24 |:.18.5....Z$:.Z$|
00000030: B2 22 22 A7 31 00 3B 08 02 00 8E 00 52 08 03 00 |."".1.;.....R...|
00000040: 84 31 35 2C 45 52 2C 45 52 24 3A 8B 45 52 B2 30 |.15,ER,ER$:.ER.0|
00000050: A7 8E 00 70 08 04 00 99 22 44 49 53 4B 20 45 52 |...p...."DISK ER|
00000060: 52 4F 52 23 22 45 52 3A 99 45 52 24 3A 80 3A 8E |ROR#"ER:.ER$:.:.|
00000070: 00 A0 08 05 00 99 22 13 11 11 11 22 3A 81 49 B2 |......"....":.I.|
00000080: 30 A4 31 35 3A 81 4A B2 30 A4 4E 43 3A 99 A3 4A |0.15:.J.0.NC:..J|
00000090: AC 32 30 29 3B 56 24 28 49 AA 4A AC 31 36 29 3B |.20);V$(I.J.16);|
000000A0: 00 AC 08 06 00 82 4A 3A 99 3A 82 49 00 C4 08 07 |......J:.:.I....|
000000B0: 00 97 58 42 2C 30 3A 52 4C B2 30 3A 43 4C B2 30 |..XB,0:RL.0:CL.0|
000000C0: 3A 8D 31 36 00 F1 08 08 00 81 49 B2 30 A4 31 A9 |:.16......I.0.1.|
000000D0: 30 3A 8D 31 3A 5A B2 C6 28 5A 24 29 3A 54 43 B2 |0:.1:Z..(Z$):TC.|
000000E0: 43 4C 3A 54 52 B2 52 4C 3A 81 4A B2 30 A4 31 A9 |CL:TR.RL:.J.0.1.|
000000F0: 30 00 18 09 09 00 8B 28 5A AF 31 32 37 29 B2 32 |0......(Z.127).2|
00000100: 39 A7 43 4C B2 28 43 4C AA 31 AA 32 AC 28 5A B2 |9.CL.(CL.1.2.(Z.|
00000110: 31 35 37 29 29 AF 4E 43 00 3F 09 0A 00 8B 28 5A |157)).NC.?....(Z|
00000120: AF 31 32 37 29 B2 31 37 A7 52 4C B2 28 52 4C AA |.127).17.RL.(RL.|
00000130: 31 AA 32 AC 28 5A B2 31 34 35 29 29 AF 31 35 00 |1.2.(Z.145)).15.|
00000140: 4D 09 0B 00 8B 5A B2 31 33 A7 49 B2 31 00 67 09 |M....Z.13.I.1.g.|
00000150: 0C 00 8B 56 24 28 52 4C AA 43 4C AC 31 36 29 B3 |...V$(RL.CL.16).|
00000160: B1 42 24 A7 4A B2 31 00 85 09 0D 00 82 3A 8B 28 |.B$.J.1......:.(|
00000170: 54 43 B3 B1 43 4C 29 B0 28 54 52 B3 B1 52 4C 29 |TC..CL).(TR..RL)|
00000180: A7 8D 20 31 35 00 8D 09 0E 00 82 3A 8E 00 B2 09 |.. 15......:....|
00000190: 0F 00 97 58 41 2C 54 52 AA 33 3A 99 3A 99 A3 54 |...XA,TR.3:.:..T|
000001A0: 43 AC 32 30 29 3B 56 24 28 54 52 AA 31 36 AC 54 |C.20);V$(TR.16.T|
000001B0: 43 29 00 DD 09 10 00 97 58 41 2C 52 4C AA 33 3A |C)......XA,RL.3:|
000001C0: 99 3A 99 A3 43 4C AC 32 30 29 3B 22 12 22 3B 56 |.:..CL.20);".";V|
000001D0: 24 28 52 4C AA 31 36 AC 43 4C 29 3A 8E 00 F6 09 |$(RL.16.CL):....|
000001E0: 11 00 81 49 B2 31 A4 4E 56 3A 56 24 28 49 29 B2 |...I.1.NV:V$(I).|
000001F0: 42 24 3A 82 3A 8E 00 05 0A 12 00 99 22 13 13 93 |B$:.:......."...|
00000200: 22 3A 8D 36 34 00 1E 0A 13 00 4E 43 B2 31 3A 8B |":.64.....NC.1:.|
00000210: C2 28 32 31 33 29 B2 37 39 A7 4E 43 B2 33 00 55 |.(213).79.NC.3.U|
00000220: 0A 14 00 4E 56 B2 28 4E 43 AA 31 29 AC 31 36 AB |...NV.(NC.1).16.|
00000230: 31 3A 8D 32 37 3A 42 24 B2 22 20 20 20 20 20 20 |1:.27:B$." |
00000240: 20 20 20 20 20 20 20 20 20 20 20 20 22 3A 86 56 | ":.V|
00000250: 24 28 4E 56 29 00 7F 0A 15 00 4E 50 B2 30 3A 53 |$(NV).....NP.0:S|
00000260: 4C B2 31 3A 56 24 28 30 29 B2 22 4E 45 58 54 20 |L.1:V$(0)."NEXT |
00000270: 50 41 47 45 22 3A 99 22 93 11 12 22 48 45 24 00 |PAGE":."..."HE$.|
00000280: A4 0A 16 00 53 4C B2 53 4C AA 4E 50 3A 4E 50 B2 |....SL.SL.NP:NP.|
00000290: 4D 41 AB 53 4C AA 31 3A 8B 4E 50 B1 4E 56 A7 4E |MA.SL.1:.NP.NV.N|
000002A0: 50 B2 4E 56 00 B1 0A 17 00 8B 4E 50 B2 30 A7 34 |P.NV......NP.0.4|
000002B0: 38 00 D5 0A 18 00 8D 31 37 3A 81 49 B2 31 A4 4E |8......17:.I.1.N|
000002C0: 50 3A 56 24 28 49 29 B2 50 52 24 28 53 4C AA 49 |P:V$(I).PR$(SL.I|
000002D0: AB 31 29 3A 82 00 E8 0A 19 00 8D 35 3A 8B 43 4C |.1):.......5:.CL|
000002E0: AA 52 4C B2 30 A7 32 32 00 F0 0A 1A 00 89 35 33 |.RL.0.22......53|
000002F0: 00 FD 0A 1B 00 8D 34 33 3A 4D 41 B2 30 00 16 0B |......43:MA.0...|
00000300: 1C 00 9F 31 35 2C 55 4E 2C 31 35 2C 22 49 22 AA |...15,UN,15,"I".|
00000310: 44 52 24 3A 8D 33 00 2A 0B 1D 00 9F 31 2C 55 4E |DR$:.3.*....1,UN|
00000320: 2C 33 2C 22 24 22 AA 44 52 24 00 33 0B 1E 00 9E |,3,"$".DR$.3....|
00000330: 38 39 36 00 45 0B 1F 00 46 4F B2 C6 28 49 4E 24 |896.E...FO..(IN$|
00000340: 29 3A 89 33 32 00 5B 0B 20 00 48 45 24 B2 CA 28 |):.32.[. .HE$..(|
00000350: 49 4E 24 2C 31 34 33 2C 31 36 29 00 8B 0B 21 00 |IN$,143,16)...!.|
00000360: 8B 46 4F B1 31 A7 53 45 B2 31 38 3A 48 45 24 B2 |.FO.1.SE.18:HE$.|
00000370: 48 45 24 AA 22 2C 31 35 34 31 2F 34 30 34 30 20 |HE$.",1541/4040 |
00000380: 46 4F 52 4D 41 54 22 3A 89 33 35 00 B2 0B 22 00 |FORMAT":.35...".|
00000390: 8B 46 4F B2 31 A7 53 45 B2 31 39 3A 48 45 24 B2 |.FO.1.SE.19:HE$.|
000003A0: 48 45 24 AA 22 2C 32 30 34 30 20 46 4F 52 4D 41 |HE$.",2040 FORMA|
000003B0: 54 22 00 CE 0B 23 00 86 50 52 24 28 53 45 AC 38 |T"...#..PR$(SE.8|
000003C0: 29 3A 81 49 B2 31 A4 53 45 3A 9E 38 39 36 00 F0 |):.I.1.SE:.896..|
000003D0: 0B 24 00 81 4A B2 31 A4 32 34 35 A9 33 32 3A 41 |.$..J.1.245.32:A|
000003E0: B2 C6 28 CA 28 49 4E 24 2C 4A 29 29 AF 31 32 37 |..(.(IN$,J)).127|
000003F0: 00 17 0C 25 00 8B 41 B2 32 A7 4D 41 B2 4D 41 AA |...%..A.2.MA.MA.|
00000400: 31 3A 50 52 24 28 4D 41 29 B2 CA 28 49 4E 24 2C |1:PR$(MA)..(IN$,|
00000410: 4A AA 33 2C 31 36 29 00 35 0C 26 00 8B C8 28 50 |J.3,16).5.&...(P|
00000420: 52 24 28 4D 41 29 2C 31 29 B2 22 20 22 A7 4D 41 |R$(MA),1)." ".MA|
00000430: B2 4D 41 AB 31 00 3C 0C 27 00 82 4A 00 49 0C 28 |.MA.1.<.'..J.I.(|
00000440: 00 8B 53 54 A7 49 B2 53 45 00 50 0C 29 00 82 49 |..ST.I.SE.P.)..I|
00000450: 00 5D 0C 2A 00 A0 31 3A A0 31 35 3A 8E 00 73 0C |.].*..1:.15:..s.|
00000460: 2B 00 55 4E B2 38 3A 44 52 B2 30 3A 44 52 24 B2 |+.UN.8:DR.0:DR$.|
00000470: 22 30 22 00 79 0C 2C 00 8E 00 98 0C 2D 00 99 22 |"0".y.,.....-.."|
00000480: 55 4E 49 54 20 23 20 20 22 3B 55 4E 3B 3A 85 22 |UNIT # ";UN;:."|
00000490: 9D 9D 9D 9D 22 3B 55 4E 00 C6 0C 2E 00 99 22 44 |....";UN......"D|
000004A0: 52 49 56 45 20 23 20 20 22 3B 44 52 3B 3A 85 22 |RIVE # ";DR;:."|
000004B0: 9D 9D 9D 9D 22 3B 44 52 3A 8B 44 52 AC 28 44 52 |....";DR:.DR.(DR|
000004C0: AB 31 29 A7 34 36 00 D6 0C 2F 00 44 52 24 B2 C4 |.1).46.../.DR$..|
000004D0: 28 44 52 29 3A 8E 00 0A 0D 30 00 8D 31 37 3A 99 |(DR):....0..17:.|
000004E0: 22 93 11 4E 4F 20 4D 4F 52 45 20 50 52 4F 47 52 |"..NO MORE PROGR|
000004F0: 41 4D 53 20 4F 4E 20 44 49 53 4B 2E 20 20 4F 50 |AMS ON DISK. OP|
00000500: 54 49 4F 4E 53 20 41 52 45 3A 00 4A 0D 31 00 56 |TIONS ARE:.J.1.V|
00000510: 24 28 30 29 B2 22 53 45 45 20 4E 45 57 20 44 49 |$(0)."SEE NEW DI|
00000520: 53 4B 22 3A 56 24 28 32 29 B2 22 52 45 53 54 41 |SK":V$(2)."RESTA|
00000530: 52 54 20 54 48 49 53 20 44 49 53 4B 22 3A 56 24 |RT THIS DISK":V$|
00000540: 28 34 29 B2 22 51 55 49 54 22 00 59 0D 32 00 8D |(4)."QUIT".Y.2..|
00000550: 35 3A 8B 52 4C B2 30 A7 8A 00 66 0D 33 00 8B 52 |5:.RL.0...f.3..R|
00000560: 4C B2 32 A7 32 31 00 71 0D 34 00 99 22 93 22 3A |L.2.21.q.4..".":|
00000570: 80 00 A6 0D 35 00 99 22 93 11 11 98 50 CF 34 33 |....5.."....P.43|
00000580: 2C 31 3A 50 CF 34 34 2C 38 3A 50 CF 34 35 2C 33 |,1:P.44,8:P.45,3|
00000590: 3A 50 CF 34 36 2C 38 3A 50 CF 32 30 34 38 2C 30 |:P.46,8:P.2048,0|
000005A0: 3A 4E 45 57 90 22 00 BB 0D 36 00 5A 5A 24 B2 56 |:NEW."...6.ZZ$.V|
000005B0: 24 28 52 4C AA 31 36 AC 43 4C 29 00 CB 0D 37 00 |$(RL.16.CL)...7.|
000005C0: 9F 31 34 2C 38 2C 32 2C 5A 5A 24 00 FA 0D 38 00 |.14,8,2,ZZ$...8.|
000005D0: A1 23 31 34 2C 41 24 2C 42 24 3A 41 B2 C6 28 41 |.#14,A$,B$:A..(A|
000005E0: 24 AA C7 28 30 29 29 AA 32 35 36 AC C6 28 42 24 |$..(0)).256..(B$|
000005F0: AA C7 28 30 29 29 3A A0 31 34 00 18 0E 39 00 8B |..(0)):.14...9..|
00000600: 20 41 B3 B1 32 30 34 39 20 A7 20 44 46 24 B2 22 | A..2049 . DF$."|
00000610: 2C 31 22 3A 89 20 35 39 00 23 0E 3A 00 44 46 24 |,1":. 59.#.:.DF$|
00000620: B2 22 22 00 4B 0E 3B 00 99 22 11 11 4C 4F 41 44 |."".K.;.."..LOAD|
00000630: 22 3B C7 28 33 34 29 3B 5A 5A 24 3B C7 28 33 34 |";.(34);ZZ$;.(34|
00000640: 29 3B 22 2C 22 55 4E 3B 44 46 24 00 66 0E 3C 00 |);","UN;DF$.f.<.|
00000650: 8B 20 41 B3 B1 32 30 34 39 20 A7 20 99 22 13 22 |. A..2049 . ."."|
00000660: 3B 3A 89 20 36 33 00 77 0E 3D 00 99 22 11 11 11 |;:. 63.w.=.."...|
00000670: 11 52 55 4E 13 22 3B 00 9C 0E 3E 00 97 36 33 31 |.RUN.";...>..631|
00000680: 2C 31 33 3A 97 36 33 32 2C 31 33 3A 97 36 33 33 |,13:.632,13:.633|
00000690: 2C 31 33 3A 97 31 39 38 2C 33 3A 80 00 B9 0E 3F |,13:.198,3:....?|
000006A0: 00 97 36 33 31 2C 31 33 3A 97 36 33 32 2C 31 33 |..631,13:.632,13|
000006B0: 3A 97 31 39 38 2C 32 3A 80 00 DB 0E 40 00 49 4E |:.198,2:....@.IN|
000006C0: 24 B2 22 5A 5A 22 3A 81 49 B2 31 A4 36 3A 49 4E |$."ZZ":.I.1.6:IN|
000006D0: 24 B2 49 4E 24 AA 49 4E 24 3A 82 00 F8 0E 41 00 |$.IN$.IN$:....A.|
000006E0: 49 4E 24 B2 CA 28 49 4E 24 2C 32 29 3A 49 4E 24 |IN$..(IN$,2):IN$|
000006F0: B2 49 4E 24 AA 49 4E 24 00 1C 0F 42 00 8B C2 28 |.IN$.IN$...B...(|
00000700: 36 35 35 33 35 29 B2 32 35 35 A7 58 41 B2 32 31 |65535).255.XA.21|
00000710: 34 3A 58 42 B2 31 39 38 3A 89 36 38 00 2E 0F 43 |4:XB.198:.68...C|
00000720: 00 58 41 B2 32 31 36 3A 58 42 B2 31 35 38 00 52 |.XA.216:XB.158.R|
00000730: 0F 44 00 81 49 B2 38 39 36 A4 39 32 39 3A 87 58 |.D..I.896.929:.X|
00000740: 24 3A 8B C8 28 58 24 2C 31 29 B3 B1 22 41 22 A7 |$:..(X$,1).."A".|
00000750: 37 30 00 78 0F 45 00 58 24 B2 C4 28 C5 28 C9 28 |70.x.E.X$..(.(.(|
00000760: 58 24 2C C3 28 58 24 29 AB 31 29 29 AA 33 AC 28 |X$,.(X$).1)).3.(|
00000770: 58 41 B2 32 31 36 29 29 00 87 0F 46 00 97 49 2C |XA.216))...F..I,|
00000780: C5 28 58 24 29 3A 82 00 8D 0F 47 00 8E 00 C1 0F |.(X$):....G.....|
00000790: 48 00 83 31 36 30 2C 32 2C 31 37 37 2C 41 34 35 |H..160,2,177,A45|
000007A0: 2C 31 35 33 2C 41 31 33 37 2C 30 2C 32 30 30 2C |,153,A137,0,200,|
000007B0: 31 39 32 2C 36 2C 32 30 38 2C 32 34 36 2C 31 36 |192,6,208,246,16|
000007C0: 32 00 F4 0F 49 00 83 31 2C 33 32 2C 31 39 38 2C |2...I..1,32,198,|
000007D0: 32 35 35 2C 33 32 2C 32 32 38 2C 32 35 35 2C 31 |255,32,228,255,1|
000007E0: 36 34 2C 41 31 34 32 2C 31 34 35 2C 41 31 34 30 |64,A142,145,A140|
000007F0: 2C 32 30 30 00 1E 10 4A 00 83 31 33 32 2C 41 31 |,200...J..132,A1|
00000800: 34 32 2C 31 39 36 2C 41 31 33 39 2C 32 30 38 2C |42,196,A139,208,|
00000810: 32 34 32 2C 37 36 2C 32 30 34 2C 32 35 35 00 00 |242,76,204,255..|
00000820: 00 |. |
..$....53280,11:.53281,12:.646,0:.18.5..
..Z$:.Z$."".1.;.....R....15,ER,ER$:.ER.0
...P...."DISK ERROR#"ER:.ER$:.:.. ....".
...":.I.0.15:.J.0.NC:..J.20);V$(I.J.16);
......J:.:.I.D....XB,0:RL.0:CL.0:.16....
..I.0.1.0:.1:Z.F(Z$):TC.CL:TR.RL:.J.0.1.
0......(Z.127).29.CL.(CL.1.2.(Z.157)).NC
.?....(Z.127).17.RL.(RL.1.2.(Z.145)).15.
M....Z.13.I.1.G....V$(RL.CL.16)..B$.J.1.
.....:.(TC..CL).(TR..RL).. 15......:....
...XA,TR.3:.:..TC.20);V$(TR.16.TC)......
XA,RL.3:.:..CL.20);".";V$(RL.16.CL):....
...I.1.NV:V$(I).B$:.:......."...":.64...
..NC.1:.B(213).79.NC.3.U...NV.(NC.1).16.
1:.27:B$." ":.V$(NV)..
..NP.0:SL.1:V$(0)."NEXT PAGE":."..."HE$.
....SL.SL.NP:NP.MA.SL.1:.NP.NV.NP.NV....
..NP.0.48.U....17:.I.1.NP:V$(I).PR$(SL.I
.1):.......5:.CL.RL.0.22......53......43
:MA.0......15,UN,15,"I".DR$:.3.*....1,UN
,3,"$".DR$.3....896.E...FO.F(IN$):.32.[.
.HE$.J(IN$,143,16)...!..FO.1.SE.18:HE$.
HE$.",1541/4040 FORMAT":.35..."..FO.1.SE
.19:HE$.HE$.",2040 FORMAT".N.#..PR$(SE.8
):.I.1.SE:.896...$..J.1.245.32:A.F(J(IN$
,J)).127...%..A.2.MA.MA.1:PR$(MA).J(IN$,
J.3,16).5.&..H(PR$(MA),1)." ".MA.MA.1.<.
'..J.I.(..ST.I.SE.P.)..I.].*. 1: 15:..S.
+.UN.8:DR.0:DR$."0".Y.,.....-.."UNIT #
";UN;:."....";UN.F...."DRIVE # ";DR;:."
....";DR:.DR.(DR.1).46.V./.DR$.D(DR):...
.0..17:."..NO MORE PROGRAMS ON DISK. OP
TIONS ARE:.J.1.V$(0)."SEE NEW DISK":V$(2
)."RESTART THIS DISK":V$(4)."QUIT".Y.2..
5:.RL.0...F.3..RL.2.21.Q.4..".":....5.."
....PO43,1:PO44,8:PO45,3:PO46,8:PO2048,0
:NEW."...6.ZZ$.V$(RL.16.CL).K.7..14,8,2,
ZZ$...8..#14,A$,B$:A.F(A$.G(0)).256.F(B$
.G(0)): 14...9.. A..2049 . DF$.",1":. 59
.#.:.DF$."".K.;.."..LOAD";G(34);ZZ$;G(34
);","UN;DF$.F.<.. A..2049 . .".";:. 63.W
.=.."....RUN.";...>..631,13:.632,13:.633
,13:.198,3:....?..631,13:.632,13:.198,2:
....@.IN$."ZZ":.I.1.6:IN$.IN$.IN$:....A.
IN$.J(IN$,2):IN$.IN$.IN$...B..B(65535).2
55.XA.214:XB.198:.68...C.XA.216:XB.158.R
.D..I.896.929:.X$:.H(X$,1).."A".70.X.E.X
$.D(E(I(X$,C(X$).1)).3.(XA.216))...F..I,
E(X$):....G...A.H..160,2,177,A45,153,A13
7,0,200,192,6,208,246,162...I..1,32,198,
255,32,228,255,164,A142,145,A140,200...J
..132,A142,196,A139,208,242,76,204,255..
.
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL