> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 3D 08 00 00 8F 20 2A 2A 2A 2A 2A 2A 20 50 |..=.... ****** P|
00000010: 4C 55 53 20 45 49 47 48 54 20 2D 2D 20 49 41 4E |LUS EIGHT -- IAN|
00000020: 20 42 45 4E 4E 45 54 54 20 2D 2D 20 31 38 20 4A | BENNETT -- 18 J|
00000030: 41 4E 20 38 34 20 2A 2A 2A 2A 2A 2A 2A 00 58 08 |AN 84 *******.X.|
00000040: 0A 00 50 31 24 B2 C7 28 31 34 37 29 AA C7 28 31 |..P1$..(147)..(1|
00000050: 37 29 AA C7 28 32 39 29 00 6C 08 14 00 50 32 24 |7)..(29).l...P2$|
00000060: B2 C7 28 31 37 29 AA C7 28 32 39 29 00 A2 08 1E |..(17)..(29)....|
00000070: 00 42 24 B2 C7 28 31 38 30 29 3A 45 24 B2 C7 28 |.B$..(180):E$..(|
00000080: 31 36 30 29 AA C7 28 34 34 29 AA C7 28 35 36 29 |160)..(44)..(56)|
00000090: AA C7 28 34 34 29 AA C7 28 34 39 29 AA C7 28 35 |..(44)..(49)..(5|
000000A0: 38 29 00 D2 08 28 00 45 58 24 B2 42 24 AA 42 24 |8)...(.EX$.B$.B$|
000000B0: AA 42 24 AA 42 24 AA 42 24 AA 42 24 AA 42 24 AA |.B$.B$.B$.B$.B$.|
000000C0: 42 24 AA 42 24 AA 42 24 3A 45 24 B2 45 24 AA 45 |B$.B$.B$:E$.E$.E|
000000D0: 58 24 00 05 09 32 00 47 24 B2 C7 28 31 36 30 29 |X$...2.G$..(160)|
000000E0: AA C7 28 34 34 29 AA C7 28 35 36 29 AA C7 28 35 |..(44)..(56)..(5|
000000F0: 38 29 3A 47 24 B2 47 24 AA 45 58 24 AA 42 24 AA |8):G$.G$.EX$.B$.|
00000100: 42 24 AA 42 24 00 19 09 3C 00 81 5A B2 31 A4 38 |B$.B$...<..Z.1.8|
00000110: 3A 87 20 41 28 5A 29 3A 82 00 3A 09 46 00 83 35 |:. A(Z):..:.F..5|
00000120: 2C 33 37 2C 38 39 2C 31 30 31 2C 31 33 33 2C 31 |,37,89,101,133,1|
00000130: 36 35 2C 31 39 37 2C 32 32 39 00 4B 09 50 00 9F |65,197,229.K.P..|
00000140: 31 35 2C 38 2C 31 35 2C 22 49 22 00 5A 09 5A 00 |15,8,15,"I".Z.Z.|
00000150: 9F 35 2C 38 2C 35 2C 22 23 22 00 67 09 64 00 54 |.5,8,5,"#".g.d.T|
00000160: B2 31 38 3A 53 B2 31 00 87 09 6E 00 98 31 35 2C |.18:S.1...n..15,|
00000170: 22 55 31 3A 22 3B 35 3B 30 3B 54 3B 53 3A 54 31 |"U1:";5;0;T;S:T1|
00000180: B2 54 3A 53 31 B2 53 00 99 09 78 00 98 31 35 2C |.T:S1.S...x..15,|
00000190: 22 42 2D 50 22 3B 35 3B 30 00 D6 09 82 00 99 50 |"B-P";5;0......P|
000001A0: 31 24 C7 28 31 38 29 22 20 2A 2A 20 44 49 52 45 |1$.(18)" ** DIRE|
000001B0: 43 54 4F 52 59 20 2A 2A 20 22 C7 28 31 34 36 29 |CTORY ** ".(146)|
000001C0: 22 20 20 54 52 41 43 4B 22 3B 54 22 20 53 45 43 |" TRACK";T" SEC|
000001D0: 54 4F 52 22 3B 53 00 02 0A 8C 00 99 3A 99 3A A1 |TOR";S......:.:.|
000001E0: 23 35 2C 54 24 2C 53 24 3A 54 B2 C6 28 54 24 AA |#5,T$,S$:T..(T$.|
000001F0: C7 28 30 29 29 3A 53 B2 C6 28 53 24 AA C7 28 30 |.(0)):S..(S$..(0|
00000200: 29 29 00 12 0A 96 00 81 4C B2 31 A4 38 3A 99 20 |))......L.1.8:. |
00000210: 4C 3B 00 27 0A A0 00 98 31 35 2C 22 42 2D 50 22 |L;.'....15,"B-P"|
00000220: 3B 35 3B 41 28 4C 29 00 33 0A AA 00 81 58 B2 31 |;5;A(L).3....X.1|
00000230: A4 31 36 00 3E 0A B4 00 A1 23 35 2C 41 24 00 48 |.16.>....#5,A$.H|
00000240: 0A BE 00 99 20 41 24 3B 00 53 0A C8 00 82 58 3A |.... A$;.S....X:|
00000250: 99 3A 99 00 5A 0A D2 00 82 4C 00 99 0A DC 00 99 |.:..Z....L......|
00000260: 20 50 32 24 20 C7 28 31 38 29 22 20 53 45 4C 45 | P2$ .(18)" SELE|
00000270: 43 54 20 4E 4F 2E 20 4F 52 20 48 49 54 20 27 4E |CT NO. OR HIT 'N|
00000280: 27 20 46 4F 52 20 4E 45 58 54 20 42 4C 4F 43 4B |' FOR NEXT BLOCK|
00000290: 20 22 20 C7 28 31 34 36 29 00 D1 0A E6 00 8B 53 | " .(146)......S|
000002A0: B2 32 35 35 A7 99 20 C7 28 31 39 29 20 50 32 24 |.255.. .(19) P2$|
000002B0: 20 A3 32 30 29 22 45 4E 44 20 4F 46 20 46 49 4C | .20)"END OF FIL|
000002C0: 45 20 20 20 20 20 20 20 20 20 20 22 3A 89 32 35 |E ":.25|
000002D0: 30 00 E7 0A F0 00 81 44 B2 31 A4 32 30 30 3A 82 |0......D.1.200:.|
000002E0: 3A 97 31 39 38 2C 30 00 FA 0A FA 00 A1 4F 24 3A |:.198,0......O$:|
000002F0: 8B 4F 24 B2 22 22 A7 32 35 30 00 1A 0B 04 01 8B |.O$."".250......|
00000300: 4F 24 B2 22 4E 22 AF 53 B2 32 35 35 A7 54 B2 31 |O$."N".S.255.T.1|
00000310: 38 3A 53 B2 31 3A 89 31 31 30 00 2A 0B 0E 01 8B |8:S.1:.110.*....|
00000320: 4F 24 B2 22 4E 22 A7 31 31 30 00 3A 0B 18 01 8B |O$."N".110.:....|
00000330: 4F 24 B2 22 51 22 A7 35 36 30 00 53 0B 22 01 4F |O$."Q".560.S.".O|
00000340: B2 C5 28 4F 24 29 3A 8B 4F B3 31 B0 4F B1 38 A7 |..(O$):.O.1.O.8.|
00000350: 32 35 30 00 78 0B 2C 01 99 50 31 24 20 A3 39 29 |250.x.,..P1$ .9)|
00000360: 22 20 2A 2A 2A 20 20 2A 20 4F 50 54 49 4F 4E 53 |" *** * OPTIONS|
00000370: 20 2A 20 20 2A 2A 2A 22 00 98 0B 36 01 99 50 32 | * ***"...6..P2|
00000380: 24 20 A3 31 35 29 22 31 29 20 22 C7 28 31 38 29 |$ .15)"1) ".(18)|
00000390: 22 20 2C 38 3A 20 20 22 00 B8 0B 40 01 99 50 32 |" ,8: "...@..P2|
000003A0: 24 20 A3 31 35 29 22 32 29 20 22 C7 28 31 38 29 |$ .15)"2) ".(18)|
000003B0: 22 20 2C 38 2C 31 3A 22 00 CB 0B 4A 01 A1 49 24 |" ,8,1:"...J..I$|
000003C0: 3A 8B 49 24 B2 22 22 A7 33 33 30 00 E4 0B 54 01 |:.I$."".330...T.|
000003D0: 8B 49 24 B3 B1 22 31 22 AF 49 24 B3 B1 22 32 22 |.I$.."1".I$.."2"|
000003E0: A7 33 33 30 00 F0 0B 5E 01 49 B2 C5 28 49 24 29 |.330...^.I..(I$)|
000003F0: 00 F9 0B 68 01 99 50 31 24 00 11 0C 72 01 98 31 |...h..P1$...r..1|
00000400: 35 2C 22 55 31 3A 22 3B 35 3B 30 3B 54 31 3B 53 |5,"U1:";5;0;T1;S|
00000410: 31 00 26 0C 7C 01 98 31 35 2C 22 42 2D 50 22 3B |1.&.|..15,"B-P";|
00000420: 35 3B 41 28 4F 29 00 38 0C 86 01 52 24 B2 22 22 |5;A(O).8...R$.""|
00000430: 3A 81 58 B2 31 A4 31 36 00 58 0C 90 01 A1 23 35 |:.X.1.16.X....#5|
00000440: 2C 41 24 3A 8B 41 24 B3 B1 C7 28 31 36 30 29 A7 |,A$:.A$...(160).|
00000450: 52 24 B2 52 24 AA 41 24 00 5F 0C 9A 01 82 58 00 |R$.R$.A$._....X.|
00000460: 8E 0C A4 01 52 B2 C3 28 52 24 29 3A 8B 52 B1 31 |....R..(R$):.R.1|
00000470: 30 A7 99 22 46 49 4C 45 4E 41 4D 45 20 49 53 20 |0.."FILENAME IS |
00000480: 54 4F 4F 20 4C 4F 4E 47 22 3A 89 35 31 30 00 B4 |TOO LONG":.510..|
00000490: 0C AE 01 8B 52 B3 31 A7 99 22 4E 4F 20 53 55 43 |....R.1.."NO SUC|
000004A0: 48 20 46 49 4C 45 4E 41 4D 45 20 3F 3F 3F 22 3A |H FILENAME ???":|
000004B0: 89 35 31 30 00 CE 0C B8 01 8B 49 B2 31 A7 52 24 |.510......I.1.R$|
000004C0: B2 52 24 AA C8 28 47 24 2C 31 36 AB 52 29 00 E8 |.R$..(G$,16.R)..|
000004D0: 0C C2 01 8B 49 B2 32 A7 52 24 B2 52 24 AA C8 28 |....I.2.R$.R$..(|
000004E0: 45 24 2C 31 36 AB 52 29 00 06 0D CC 01 99 50 31 |E$,16.R)......P1|
000004F0: 24 22 4E 45 57 20 46 49 4C 45 4E 41 4D 45 20 49 |$"NEW FILENAME I|
00000500: 53 20 22 3B 52 24 00 1D 0D D6 01 98 31 35 2C 22 |S ";R$......15,"|
00000510: 55 31 20 35 20 30 22 3B 54 31 3B 53 31 00 32 0D |U1 5 0";T1;S1.2.|
00000520: E0 01 98 31 35 2C 22 42 2D 50 22 3B 35 3B 41 28 |...15,"B-P";5;A(|
00000530: 4F 29 00 4E 0D EA 01 81 48 B2 31 A4 31 36 3A 98 |O).N....H.1.16:.|
00000540: 35 2C CA 28 52 24 2C 48 2C 31 29 3B 3A 82 00 65 |5,.(R$,H,1);:..e|
00000550: 0D F4 01 98 31 35 2C 22 55 32 20 35 20 30 22 3B |....15,"U2 5 0";|
00000560: 54 31 3B 53 31 00 7E 0D FE 01 99 50 32 24 22 46 |T1;S1.~....P2$"F|
00000570: 49 4E 49 53 48 45 44 20 2D 20 22 52 24 22 00 9C |INISHED - "R$"..|
00000580: 0D 08 02 99 50 32 24 22 48 49 54 20 27 43 27 20 |....P2$"HIT 'C' |
00000590: 54 4F 20 43 4F 4E 54 49 4E 55 45 22 00 AF 0D 12 |TO CONTINUE"....|
000005A0: 02 A1 43 24 3A 8B 43 24 B2 22 22 A7 35 33 30 00 |..C$:.C$."".530.|
000005B0: BF 0D 1C 02 8B 43 24 B2 22 43 22 A7 31 30 30 00 |.....C$."C".100.|
000005C0: D0 0D 26 02 84 31 35 2C 41 2C 42 24 2C 43 2C 44 |..&..15,A,B$,C,D|
000005D0: 00 E2 0D 30 02 99 20 50 31 24 41 3B 42 24 3B 43 |...0.. P1$A;B$;C|
000005E0: 3B 44 00 ED 0D 3A 02 A0 31 3A A0 31 35 00 00 00 |;D...:..1:.15...|
..=.... ****** PLUS EIGHT -- IAN BENNETT
-- 18 JAN 84 *******.X...P1$.G(147).G(1
7).G(29).L...P2$.G(17).G(29).....B$.G(18
0):E$.G(160).G(44).G(56).G(44).G(49).G(5
8).R.(.EX$.B$.B$.B$.B$.B$.B$.B$.B$.B$.B$
:E$.E$.EX$...2.G$.G(160).G(44).G(56).G(5
8):G$.G$.EX$.B$.B$.B$...<..Z.1.8:. A(Z):
..:.F..5,37,89,101,133,165,197,229.K.P..
15,8,15,"I".Z.Z..5,8,5,"#".G.D.T.18:S.1.
..N..15,"U1:";5;0;T;S:T1.T:S1.S...X..15,
"B-P";5;0.V....P1$G(18)" ** DIRECTORY **
"G(146)" TRACK";T" SECTOR";S......:.:.
#5,T$,S$:T.F(T$.G(0)):S.F(S$.G(0))......
L.1.8:. L;.'. ..15,"B-P";5;A(L).3....X.1
.16.>....#5,A$.H.... A$;.S.H..X:.:..Z.R.
.L...... P2$ G(18)" SELECT NO. OR HIT 'N
' FOR NEXT BLOCK " G(146).Q....S.255.. G
(19) P2$ .20)"END OF FILE ":.25
0......D.1.200:.:.198,0......O$:.O$."".2
50......O$."N".S.255.T.18:S.1:.110.*....
O$."N".110.:....O$."Q".560.S.".O.E(O$):.
O.1.O.8.250.X.,..P1$ .9)" *** * OPTIONS
* ***"...6..P2$ .15)"1) "G(18)" ,8: "
...@..P2$ .15)"2) "G(18)" ,8,1:".K.J..I$
:.I$."".330...T..I$.."1".I$.."2".330...^
.I.E(I$)...H..P1$...R..15,"U1:";5;0;T1;S
1.&.|..15,"B-P";5;A(O).8...R$."":.X.1.16
.X....#5,A$:.A$..G(160).R$.R$.A$._....X.
....R.C(R$):.R.10.."FILENAME IS TOO LONG
":.510......R.1.."NO SUCH FILENAME ???":
.510.N....I.1.R$.R$.H(G$,16.R)...B..I.2.
R$.R$.H(E$,16.R)...L..P1$"NEW FILENAME I
S ";R$...V..15,"U1 5 0";T1;S1.2....15,"B
-P";5;A(O).N....H.1.16:.5,J(R$,H,1);:..E
....15,"U2 5 0";T1;S1.~....P2$"FINISHED
- "R$"......P2$"HIT 'C' TO CONTINUE"....
..C$:.C$."".530......C$."C".100.P.&..15,
A,B$,C,D...0.. P1$A;B$;C;D...:. 1: 15...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL