> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1E 08 6E 00 97 20 35 33 32 38 31 2C 31 20 |....n.. 53281,1 |
00000010: 3A 8F 20 46 4F 52 20 43 4F 4D 2E 20 36 34 00 24 |:. FOR COM. 64.$|
00000020: 08 78 00 9C 00 49 08 82 00 99 22 93 11 11 11 11 |.x...I....".....|
00000030: 1E 52 45 41 44 49 4E 47 20 44 49 53 4B 20 44 49 |.READING DISK DI|
00000040: 52 45 43 54 4F 52 59 1F 22 00 56 08 8C 00 86 50 |RECTORY.".V....P|
00000050: 24 28 31 30 30 29 00 65 08 AA 00 9F 31 2C 38 2C |$(100).e....1,8,|
00000060: 30 2C 22 24 22 00 79 08 B4 00 8F 20 4C 4F 41 44 |0,"$".y.... LOAD|
00000070: 20 41 52 52 41 59 20 50 24 00 8F 08 BE 00 A1 23 | ARRAY P$......#|
00000080: 31 2C 42 24 3A 8B 53 54 B3 B1 30 A7 32 37 30 00 |1,B$:.ST..0.270.|
00000090: A2 08 C8 00 8B 42 24 B3 B1 C7 28 33 34 29 A7 31 |.....B$...(34).1|
000000A0: 39 30 00 AC 08 D2 00 50 24 B2 22 22 00 D0 08 DC |90.....P$.""....|
000000B0: 00 A1 23 31 2C 42 24 3A 8B 42 24 B3 B1 C7 28 33 |..#1,B$:.B$...(3|
000000C0: 34 29 A7 50 24 B2 50 24 AA 42 24 3A 89 32 32 30 |4).P$.P$.B$:.220|
000000D0: 00 E9 08 E6 00 A1 23 31 2C 42 24 3A 8B 42 24 B2 |......#1,B$:.B$.|
000000E0: C7 28 33 32 29 A7 32 33 30 00 FD 08 F0 00 50 24 |.(32).230.....P$|
000000F0: 28 58 29 B2 50 24 3A 99 58 3B 22 91 22 00 14 09 |(X).P$:.X;"."...|
00000100: FA 00 A1 23 31 2C 42 24 3A 8B 42 24 B3 B1 22 22 |...#1,B$:.B$..""|
00000110: A7 32 35 30 00 29 09 04 01 8B 53 54 B2 30 A7 58 |.250.)....ST.0.X|
00000120: B2 58 AA 31 3A 89 31 38 30 00 30 09 0E 01 A0 31 |.X.1:.180.0....1|
00000130: 00 3F 09 18 01 8F 20 20 64 7D 20 4D 45 4E 55 00 |.?.... d} MENU.|
00000140: 48 09 22 01 4E B2 31 30 00 6A 09 2C 01 99 22 93 |H.".N.10.j.,..".|
00000150: 22 3A 99 A3 31 32 29 22 12 1C 20 20 20 20 4D 45 |":..12)".. ME|
00000160: 4E 55 20 20 20 20 9E 92 05 22 00 87 09 36 01 99 |NU ..."...6..|
00000170: A3 31 30 29 22 9E 46 4F 52 20 22 3B 50 24 28 30 |.10)".FOR ";P$(0|
00000180: 29 3B 22 1F 22 3A 99 00 96 09 40 01 8B 4E B3 31 |);".":....@..N.1|
00000190: 30 A7 4E B2 31 30 00 A7 09 4A 01 8B 4E B1 31 30 |0.N.10...J..N.10|
000001A0: 30 A7 4E B2 31 30 30 00 C7 09 54 01 81 4A B2 28 |0.N.100...T..J.(|
000001B0: 4E AB 39 29 A4 4E 3A 99 4A 3B 22 2D 20 22 3B 50 |N.9).N:.J;"- ";P|
000001C0: 24 28 4A 29 3A 82 4A 00 EF 09 5E 01 99 3A 99 22 |$(J):.J...^..:."|
000001D0: 50 52 45 53 53 11 9D 9D 9D 9D 9D 1C 3E 1F 20 46 |PRESS.......>. F|
000001E0: 4F 52 20 4E 45 58 54 20 53 43 52 45 45 4E 22 00 |OR NEXT SCREEN".|
000001F0: 0A 0A 68 01 99 22 1C 3C 1F 20 46 4F 52 20 4C 41 |..h..".<. FOR LA|
00000200: 53 54 20 53 43 52 45 45 4E 22 00 26 0A 72 01 99 |ST SCREEN".&.r..|
00000210: 22 1C 42 1F 20 54 4F 20 45 58 49 54 20 54 4F 20 |".B. TO EXIT TO |
00000220: 42 41 53 49 43 22 00 3E 0A 7C 01 99 22 9C 4C 1F |BASIC".>.|..".L.|
00000230: 20 54 4F 20 4C 4F 41 44 20 4F 4E 4C 59 22 00 58 | TO LOAD ONLY".X|
00000240: 0A 80 01 99 22 1E 50 1F 20 50 52 49 4E 54 20 4C |....".P. PRINT L|
00000250: 49 53 54 49 4E 47 20 22 00 73 0A 82 01 99 22 1E |ISTING ".s....".|
00000260: 44 1F 20 50 52 49 4E 54 20 44 49 52 45 43 54 4F |D. PRINT DIRECTO|
00000270: 52 59 22 00 8D 0A 86 01 99 22 1E 45 1F 20 45 52 |RY"......".E. ER|
00000280: 41 53 45 20 50 52 4F 47 52 41 4D 4D 22 00 A6 0A |ASE PROGRAMM"...|
00000290: 90 01 5A 24 B2 22 22 3A A1 5A 24 3A 8B 5A 24 B2 |..Z$."":.Z$:.Z$.|
000002A0: 22 22 A7 34 30 30 00 BE 0A 9A 01 8B 5A 24 B2 22 |"".400......Z$."|
000002B0: 3E 22 A7 4E B2 4E AA 31 30 3A 89 33 30 30 00 D6 |>".N.N.10:.300..|
000002C0: 0A A4 01 8B 5A 24 B2 22 3C 22 A7 4E B2 4E AB 31 |....Z$."<".N.N.1|
000002D0: 30 3A 89 33 30 30 00 FB 0A AE 01 8B 5A 24 B2 22 |0:.300......Z$."|
000002E0: 42 22 A7 99 22 49 4E 44 45 58 20 53 54 49 4C 4C |B".."INDEX STILL|
000002F0: 20 50 52 45 53 45 4E 54 22 3A 80 00 0C 0B B8 01 | PRESENT":......|
00000300: 8B 5A 24 B2 22 4C 22 A7 89 34 37 30 00 22 0B C2 |.Z$."L"..470."..|
00000310: 01 8B 5A 24 B2 22 52 22 A7 8D 34 37 30 3A 89 35 |..Z$."R"..470:.5|
00000320: 34 30 00 33 0B C4 01 8B 5A 24 B2 22 50 22 A7 89 |40.3....Z$."P"..|
00000330: 34 37 30 00 44 0B C6 01 8B 5A 24 B2 22 44 22 A7 |470.D....Z$."D".|
00000340: 89 34 37 30 00 55 0B C8 01 8B 5A 24 B2 22 45 22 |.470.U....Z$."E"|
00000350: A7 89 34 37 30 00 5E 0B CC 01 89 34 30 30 00 86 |..470.^....400..|
00000360: 0B D6 01 8F 20 53 45 4C 45 43 54 20 41 4E 44 20 |.... SELECT AND |
00000370: 20 20 20 20 20 20 20 20 20 20 20 20 50 52 49 4E | PRIN|
00000380: 54 20 4C 4F 41 44 00 99 0B E0 01 99 22 11 50 52 |T LOAD......".PR|
00000390: 4F 47 52 41 4D 20 23 22 3B 00 B5 0B EA 01 85 53 |OGRAM #";......S|
000003A0: 3A 99 22 11 11 11 11 11 11 11 11 11 11 11 11 11 |:.".............|
000003B0: 11 11 11 11 22 00 C6 0B F4 01 8B 53 B3 31 B0 53 |...."......S.1.S|
000003C0: B1 58 A7 34 38 30 00 ED 0B FE 01 8B C3 28 50 24 |.X.480.......(P$|
000003D0: 28 53 29 29 B1 31 32 A7 50 24 28 53 29 B2 C8 28 |(S)).12.P$(S)..(|
000003E0: 50 24 28 53 29 2C 31 32 29 AA 22 2A 22 00 F6 0B |P$(S),12)."*"...|
000003F0: 03 02 89 36 30 30 00 1E 0C 08 02 99 22 4C 4F 41 |...600......"LOA|
00000400: 44 22 AA C7 28 33 34 29 AA 50 24 28 53 29 AA C7 |D"..(34).P$(S)..|
00000410: 28 33 34 29 AA 22 2C 38 2C 31 91 91 91 22 00 27 |(34).",8,1...".'|
00000420: 0C 12 02 89 37 31 30 00 3A 0C 1C 02 8F 20 4C 4F |....710.:.... LO|
00000430: 41 44 20 41 4E 44 20 52 55 4E 00 6D 0C 26 02 97 |AD AND RUN.m.&..|
00000440: 36 33 31 2C 31 33 3A 97 36 33 32 2C 38 32 3A 97 |631,13:.632,82:.|
00000450: 36 33 33 2C 38 35 3A 97 36 33 34 2C 37 38 3A 97 |633,85:.634,78:.|
00000460: 36 33 35 2C 31 33 3A 97 31 39 38 2C 35 00 73 0C |635,13:.198,5.s.|
00000470: 30 02 80 00 83 0C 3A 02 8F 20 4C 4F 41 44 20 4F |0.....:.. LOAD O|
00000480: 4E 4C 59 00 96 0C 44 02 97 36 33 31 2C 31 33 3A |NLY...D..631,13:|
00000490: 97 31 39 38 2C 31 00 A7 0C 58 02 8B 5A 24 B2 22 |.198,1...X..Z$."|
000004A0: 45 22 A7 89 37 30 30 00 B8 0C 62 02 8B 5A 24 B2 |E"..700...b..Z$.|
000004B0: 22 50 22 A7 89 38 30 30 00 C9 0C 6C 02 8B 5A 24 |"P"..800...l..Z$|
000004C0: B2 22 44 22 A7 89 39 30 30 00 D2 0C 76 02 89 35 |."D"..900...v..5|
000004D0: 32 30 00 0D 0D BC 02 99 22 4F 50 45 4E 31 35 2C |20......"OPEN15,|
000004E0: 38 2C 31 35 3A 50 52 49 4E 54 23 31 35 2C 22 AA |8,15:PRINT#15,".|
000004F0: C7 28 33 34 29 AA 22 53 30 3A 22 AA 50 24 28 53 |.(34)."S0:".P$(S|
00000500: 29 AA C7 28 33 34 29 AA 22 91 91 91 22 00 20 0D |)..(34)."...". .|
00000510: C6 02 A1 41 24 3A 8B 41 24 B2 22 22 A7 37 31 30 |...A$:.A$."".710|
00000520: 00 29 0D C8 02 89 35 35 30 00 51 0D 20 03 99 22 |.)....550.Q. .."|
00000530: 4C 4F 41 44 22 AA C7 28 33 34 29 AA 50 24 28 53 |LOAD"..(34).P$(S|
00000540: 29 AA C7 28 33 34 29 AA 22 2C 38 2C 31 91 91 91 |)..(34).",8,1...|
00000550: 22 00 64 0D 2A 03 A1 41 24 3A 8B 41 24 B2 22 22 |".d.*..A$:.A$.""|
00000560: A7 38 31 30 00 80 0D 52 03 99 22 4F 50 45 4E 35 |.810...R.."OPEN5|
00000570: 2C 34 3A 43 4D 44 35 3A 4C 49 53 54 91 91 91 22 |,4:CMD5:LIST..."|
00000580: 00 9B 0D 5C 03 97 36 33 31 2C 31 33 3A 97 31 39 |...\..631,13:.19|
00000590: 38 2C 31 3A 98 35 3A A0 35 3A 8A 00 BA 0D 84 03 |8,1:.5:.5:......|
000005A0: 99 22 4C CF 22 AA C7 28 33 34 29 AA 22 24 22 AA |."L."..(34)."$".|
000005B0: C7 28 33 34 29 AA 22 2C 38 22 00 D5 0D 8E 03 99 |.(34).",8"......|
000005C0: 22 11 11 4F 50 45 4E 35 2C 34 3A 43 4D 44 35 3A |"..OPEN5,4:CMD5:|
000005D0: 4C 49 53 54 22 00 ED 0D 98 03 99 22 11 11 50 52 |LIST"......"..PR|
000005E0: 49 4E 54 23 35 3A 43 4C 4F 53 45 35 22 00 12 0E |INT#5:CLOSE5"...|
000005F0: A2 03 99 22 11 11 4C CF 22 AA C7 28 33 34 29 AA |..."..L."..(34).|
00000600: 22 49 4E 44 45 58 22 AA C7 28 33 34 29 AA 22 2C |"INDEX"..(34).",|
00000610: 38 22 00 1B 0E AC 03 99 22 93 22 00 37 0E B6 03 |8"......".".7...|
00000620: 97 31 39 38 2C 35 3A 81 49 B2 30 A4 34 3A 97 36 |.198,5:.I.0.4:.6|
00000630: 33 31 AA 49 2C 31 33 00 62 0E E8 03 97 36 33 32 |31.I,13.b....632|
00000640: 2C 38 32 3A 97 36 33 33 2C 38 35 3A 97 36 33 34 |,82:.633,85:.634|
00000650: 2C 37 38 3A 97 36 33 35 2C 31 33 3A 97 31 39 38 |,78:.635,13:.198|
00000660: 2C 35 00 00 00 20 56 AC AA B2 00 00 2B FF 8D 00 |,5... V.....+...|
....N.. 53281,1 :. FOR COM. 64.$.X...I..
.."......READING DISK DIRECTORY.".V....P
$(100).E....1,8,0,"$".Y.... LOAD ARRAY P
$......#1,B$:.ST..0.270...H..B$..G(34).1
90...R.P$."".P....#1,B$:.B$..G(34).P$.P$
.B$:.220......#1,B$:.B$.G(32).230.....P$
(X).P$:.X;"."......#1,B$:.B$.."".250.)..
..ST.0.X.X.1:.180.0... 1.?.... D} MENU.
H.".N.10.J.,..".":..12)".. MENU ..
."...6...10)".FOR ";P$(0);".":....@..N.1
0.N.10...J..N.100.N.100.G.T..J.(N.9).N:.
J;"- ";P$(J):.J...^..:."PRESS.......>. F
OR NEXT SCREEN"...H..".<. FOR LAST SCREE
N".&.R..".B. TO EXIT TO BASIC".>.|..".L.
TO LOAD ONLY".X....".P. PRINT LISTING "
.S....".D. PRINT DIRECTORY"......".E. ER
ASE PROGRAMM".....Z$."":.Z$:.Z$."".400..
....Z$.">".N.N.10:.300.V....Z$."<".N.N.1
0:.300......Z$."B".."INDEX STILL PRESENT
":.......Z$."L"..470.".B..Z$."R"..470:.5
40.3.D..Z$."P"..470.D.F..Z$."D"..470.U.H
..Z$."E"..470.^.L..400...V.. SELECT AND
PRINT LOAD......".PROGRAM #"
;......S:.".................".F....S.1.S
.X.480......C(P$(S)).12.P$(S).H(P$(S),12
)."*"......600......"LOAD".G(34).P$(S).G
(34).",8,1...".'....710.:.... LOAD AND R
UN.M.&..631,13:.632,82:.633,85:.634,78:.
635,13:.198,5.S.0.....:.. LOAD ONLY...D.
.631,13:.198,1...X..Z$."E"..700...B..Z$.
"P"..800.I.L..Z$."D"..900.R.V..520......
"OPEN15,8,15:PRINT#15,".G(34)."S0:".P$(S
).G(34)."...". .F..A$:.A$."".710.).H..55
0.Q. .."LOAD".G(34).P$(S).G(34).",8,1...
".D.*..A$:.A$."".810...R.."OPEN5,4:CMD5:
LIST..."...\..631,13:.198,1:.5: 5:......
."LO".G(34)."$".G(34).",8".U...."..OPEN5
,4:CMD5:LIST"......"..PRINT#5:CLOSE5"...
..."..LO".G(34)."INDEX".G(34).",8"......
".".7....198,5:.I.0.4:.631.I,13.B....632
,82:.633,85:.634,78:.635,13:.198,5... V.
....+...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL