00000000: 01 04 23 04 64 00 86 41 24 28 31 35 29 2C 42 24 |..#.d..A$(15),B$|
00000010: 28 33 29 2C 58 24 28 31 35 30 30 29 2C 43 28 32 |(3),X$(1500),C(2|
00000020: 35 35 29 00 48 04 6E 00 99 22 93 43 52 4F 53 53 |55).H.n..".CROSS|
00000030: 2D 52 45 46 20 20 20 20 4A 49 4D 20 42 55 54 54 |-REF JIM BUTT|
00000040: 45 52 46 49 45 4C 44 22 00 75 04 78 00 51 24 B2 |ERFIELD".u.x.Q$.|
00000050: C7 28 33 34 29 3A 53 24 B2 22 20 20 20 20 20 22 |.(34):S$." "|
00000060: 3A 42 24 28 31 29 B2 51 24 3A 42 24 28 33 29 B2 |:B$(1).Q$:B$(3).|
00000070: C7 28 35 38 29 00 A6 04 82 00 85 22 56 41 52 49 |.(58)......"VARI|
00000080: 41 42 4C 45 53 20 4F 52 20 4C 49 4E 45 53 22 3B |ABLES OR LINES";|
00000090: 5A 24 3A 43 32 B2 35 3A 8B C6 28 5A 24 29 B2 37 |Z$:C2.5:..(Z$).7|
000000A0: 36 A7 43 32 B2 36 00 D0 04 8C 00 81 4A B2 31 A4 |6.C2.6......J.1.|
000000B0: 32 35 35 3A 43 28 4A 29 B2 34 3A 82 4A 3A 81 4A |255:C(J).4:.J:.J|
000000C0: B2 34 38 A4 35 37 3A 43 28 4A 29 B2 36 3A 82 4A |.48.57:C(J).6:.J|
000000D0: 00 08 05 96 00 8B 43 32 B2 35 A7 81 4A B2 36 35 |......C2.5..J.65|
000000E0: A4 39 30 3A 43 28 4A 29 B2 35 3A 82 4A 3A 81 4A |.90:C(J).5:.J:.J|
000000F0: B2 33 36 A4 33 38 3A 43 28 4A 29 B2 37 3A 82 4A |.36.38:C(J).7:.J|
00000100: 3A 43 28 34 30 29 B2 38 00 26 05 A0 00 43 28 33 |:C(40).8.&...C(3|
00000110: 34 29 B2 31 3A 43 28 31 34 33 29 B2 32 3A 43 28 |4).1:C(143).2:C(|
00000120: 31 33 31 29 B2 33 00 53 05 AA 00 85 22 50 52 4F |131).3.S...."PRO|
00000130: 47 52 41 4D 20 4E 41 4D 45 22 3B 50 24 3A 9F 31 |GRAM NAME";P$:.1|
00000140: 2C 38 2C 33 2C 22 30 3A 22 AA 50 24 AA 22 2C 50 |,8,3,"0:".P$.",P|
00000150: 2C 52 22 00 70 05 B4 00 A1 23 31 2C 41 24 2C 42 |,R".p....#1,A$,B|
00000160: 24 3A 8B C6 28 42 24 29 B3 B1 34 A7 A0 31 3A 90 |$:..(B$)..4..1:.|
00000170: 00 7D 05 BE 00 8B 42 B2 30 A7 32 34 30 00 A9 05 |.}....B.0.240...|
00000180: C8 00 99 4C 24 3B 3A 4B B2 58 3A 81 4A B2 42 A4 |...L$;:K.X:.J.B.|
00000190: 31 A9 AB 31 3A 99 22 20 22 3B 41 24 28 4A 29 3B |1..1:." ";A$(J);|
000001A0: 3A 58 24 B2 41 24 28 4A 29 00 CA 05 CD 00 8B 43 |:X$.A$(J)......C|
000001B0: 32 B2 36 AF C3 28 58 24 29 B3 35 A7 58 24 B2 22 |2.6..(X$).5.X$."|
000001C0: 20 22 AA 58 24 3A 89 32 30 35 00 D7 05 CE 00 58 | ".X$:.205.....X|
000001D0: 24 B2 58 24 AA 4C 24 00 FF 05 D2 00 8B 58 24 28 |$.X$.L$......X$(|
000001E0: 4B 29 B1 B2 58 24 A7 58 24 28 4B AA 4A 29 B2 58 |K)..X$.X$(K.J).X|
000001F0: 24 28 4B 29 3A 4B B2 4B AB 31 3A 89 32 31 30 00 |$(K):K.K.1:.210.|
00000200: 1D 06 DC 00 58 24 28 4B AA 4A 29 B2 58 24 3A 82 |....X$(K.J).X$:.|
00000210: 4A 3A 58 B2 58 AA 42 3A 99 3A 42 B2 30 00 3B 06 |J:X.X.B:.:B.0.;.|
00000220: E6 00 8F 20 47 45 54 20 4E 45 58 54 20 4C 49 4E |... GET NEXT LIN|
00000230: 45 2C 20 54 45 53 54 20 45 4E 44 00 5C 06 F0 00 |E, TEST END.\...|
00000240: A1 23 31 2C 41 24 2C 42 24 3A 8B C3 28 41 24 29 |.#1,A$,B$:..(A$)|
00000250: AA C3 28 42 24 29 B2 30 A7 35 33 30 00 72 06 FA |..(B$).0.530.r..|
00000260: 00 8F 20 47 45 54 20 4C 49 4E 45 20 4E 55 4D 42 |.. GET LINE NUMB|
00000270: 45 52 00 92 06 04 01 A1 23 31 2C 41 24 3A 4C B2 |ER......#1,A$:L.|
00000280: C3 28 41 24 29 3A 8B 4C B2 31 A7 4C B2 C6 28 41 |.(A$):.L.1.L..(A|
00000290: 24 29 00 B2 06 0E 01 A1 23 31 2C 41 24 3A 41 B2 |$)......#1,A$:A.|
000002A0: C3 28 41 24 29 3A 8B 41 B2 31 A7 41 B2 C6 28 41 |.(A$):.A.1.A..(A|
000002B0: 24 29 00 F0 06 18 01 43 B2 43 32 3A 43 31 B2 AB |$).....C.C2:C1..|
000002C0: 31 3A 4C B2 41 AC 32 35 36 AA 4C 3A 4C 24 B2 C4 |1:L.A.256.L:L$..|
000002D0: 28 4C 29 3A 8B C3 28 4C 24 29 B3 36 A7 4C 24 B2 |(L):..(L$).6.L$.|
000002E0: C8 28 53 24 2C 36 AB C3 28 4C 24 29 29 AA 4C 24 |.(S$,6..(L$)).L$|
000002F0: 00 06 07 22 01 8F 20 47 45 54 20 42 41 53 49 43 |...".. GET BASIC|
00000300: 20 53 54 55 46 46 00 26 07 2C 01 A1 23 31 2C 41 | STUFF.&.,..#1,A|
00000310: 24 3A 41 B2 C3 28 41 24 29 3A 8B 41 B2 31 A7 41 |$:A..(A$):.A.1.A|
00000320: B2 C6 28 41 24 29 00 3D 07 36 01 43 39 B2 43 28 |..(A$).=.6.C9.C(|
00000330: 41 29 3A 8B 43 39 B1 43 31 A7 33 38 30 00 4E 07 |A):.C9.C1.380.N.|
00000340: 40 01 4B B2 30 3A 8B 42 B2 30 A7 33 36 30 00 67 |@.K.0:.B.0.360.g|
00000350: 07 4A 01 81 4A B2 31 A4 42 3A 8B 41 24 28 4A 29 |.J..J.1.B:.A$(J)|
00000360: B2 4D 24 A7 33 37 30 00 81 07 54 01 8B 41 24 28 |.M$.370...T..A$(|
00000370: 4A 29 B3 4D 24 A7 82 4A 3A 4B B2 42 3A 89 33 36 |J).M$..J:K.B:.36|
00000380: 30 00 A0 07 5E 01 81 4B B2 42 A4 4A A9 AB 31 3A |0...^..K.B.J..1:|
00000390: 41 24 28 4B AA 31 29 B2 41 24 28 4B 29 3A 82 4B |A$(K.1).A$(K):.K|
000003A0: 00 B5 07 68 01 42 B2 42 AA 31 3A 41 24 28 4B AA |...h.B.B.1:A$(K.|
000003B0: 31 29 B2 4D 24 00 CA 07 72 01 43 B2 43 32 3A 43 |1).M$...r.C.C2:C|
000003C0: 31 B2 AB 31 3A 4D 24 B2 22 22 00 D8 07 7C 01 8B |1..1:M$.""...|..|
000003D0: 43 32 B2 35 A7 34 32 30 00 FE 07 86 01 8B 41 B2 |C2.5.420......A.|
000003E0: 31 33 37 B0 41 B2 31 33 38 B0 41 B2 31 34 31 B0 |137.A.138.A.141.|
000003F0: 41 B2 31 36 37 A7 43 B2 36 3A 89 34 37 30 00 11 |A.167.C.6:.470..|
00000400: 08 90 01 8B 41 B2 34 34 B0 41 B2 33 32 A7 34 37 |....A.44.A.32.47|
00000410: 30 00 25 08 9A 01 8B 43 39 B3 B1 36 A7 43 B2 39 |0.%....C9..6.C.9|
00000420: 3A 89 34 37 30 00 39 08 A4 01 8B 43 39 B2 43 A7 |:.470.9....C9.C.|
00000430: 43 B2 AB 31 3A 43 31 B2 34 00 46 08 AE 01 8B 43 |C..1:C1.4.F....C|
00000440: B1 36 A7 34 37 30 00 65 08 B8 01 8B 43 B3 30 AF |.6.470.e....C.0.|
00000450: 43 39 B1 43 31 AF 43 39 B1 36 A7 43 31 B2 43 39 |C9.C1.C9.6.C1.C9|
00000460: 3A 89 34 36 30 00 80 08 C2 01 8B 43 32 B2 35 A7 |:.460......C2.5.|
00000470: 8B C3 28 4D 24 29 B1 32 B0 43 B1 30 A7 34 37 30 |..(M$).2.C.0.470|
00000480: 00 8D 08 CC 01 4D 24 B2 4D 24 AA 41 24 00 AC 08 |.....M$.M$.A$...|
00000490: D6 01 91 43 39 AA 31 89 31 39 30 2C 34 38 30 2C |...C9.1.190,480,|
000004A0: 34 38 30 2C 34 38 30 3A 89 33 30 30 00 C0 08 E0 |480,480:.300....|
000004B0: 01 42 24 B2 42 24 28 43 39 29 3A 43 24 B2 22 22 |.B$.B$(C9):C$.""|
000004C0: 00 D6 08 EA 01 A1 23 31 2C 41 24 3A 8B 41 24 B2 |......#1,A$:.A$.|
000004D0: 22 22 A7 31 39 30 00 E5 08 F4 01 8B 41 24 B2 42 |"".190......A$.B|
000004E0: 24 A7 33 30 30 00 F5 08 FE 01 8B 41 24 B3 B1 51 |$.300......A$..Q|
000004F0: 24 A7 34 39 30 00 10 09 08 02 41 24 B2 42 24 3A |$.490.....A$.B$:|
00000500: 42 24 B2 43 24 3A 43 24 B2 41 24 3A 89 34 39 30 |B$.C$:C$.A$:.490|
00000510: 00 25 09 12 02 A0 31 3A 85 22 50 52 49 4E 54 45 |.%....1:."PRINTE|
00000520: 52 22 3B 5A 24 00 44 09 1C 02 43 B2 33 3A 5A B2 |R";Z$.D...C.3:Z.|
00000530: 36 3A 8B C6 28 5A 24 29 B2 38 39 A7 43 B2 34 3A |6:..(Z$).89.C.4:|
00000540: 5A B2 31 32 00 73 09 26 02 9F 32 2C 43 3A 98 32 |Z.12.s.&..2,C:.2|
00000550: 3A 98 32 2C 22 43 52 4F 53 53 20 52 45 46 45 52 |:.2,"CROSS REFER|
00000560: 45 4E 43 45 20 2D 20 50 52 4F 47 52 41 4D 20 22 |ENCE - PROGRAM "|
00000570: 3B 50 24 00 8D 09 30 02 58 24 B2 22 22 3A 81 4A |;P$...0.X$."":.J|
00000580: B2 31 A4 58 3A 41 24 B2 58 24 28 4A 29 00 A0 09 |.1.X:A$.X$(J)...|
00000590: 35 02 8B 43 32 B2 36 A7 4B B2 36 3A 89 35 38 30 |5..C2.6.K.6:.580|
000005A0: 00 C4 09 3A 02 81 4B B2 31 A4 C3 28 41 24 29 3A |...:..K.1..(A$):|
000005B0: 8B CA 28 41 24 2C 4B 2C 31 29 B3 B1 22 20 22 A7 |..(A$,K,1).." ".|
000005C0: 82 4B 3A 90 00 ED 09 44 02 42 24 B2 C8 28 41 24 |.K:....D.B$..(A$|
000005D0: 2C 4B AB 31 29 3A 43 24 B2 CA 28 41 24 2C 4B AA |,K.1):C$..(A$,K.|
000005E0: 31 29 3A 8B 58 24 B2 42 24 A7 36 30 30 00 13 0A |1):.X$.B$.600...|
000005F0: 4E 02 98 32 3A 59 B2 30 3A 58 24 B2 42 24 3A 98 |N..2:Y.0:X$.B$:.|
00000600: 32 2C 58 24 3B C8 28 53 24 2C 35 AB C3 28 58 24 |2,X$;.(S$,5..(X$|
00000610: 29 29 3B 00 26 0A 58 02 59 B2 59 AA 31 3A 8B 59 |));.&.X.Y.Y.1:.Y|
00000620: B3 5A A7 36 32 30 00 38 0A 62 02 59 B2 31 3A 98 |.Z.620.8.b.Y.1:.|
00000630: 32 3A 98 32 2C 53 24 3B 00 51 0A 6C 02 98 32 2C |2:.2,S$;.Q.l..2,|
00000640: C8 28 53 24 2C 36 AB C3 28 43 24 29 29 3B 43 24 |.(S$,6..(C$));C$|
00000650: 3B 00 5E 0A 76 02 82 4A 3A 98 32 3A A0 32 00 00 |;.^.v..J:.2:.2..|
00000660: 00 |. |
..#.D..A$(15),B$(3),X$(1500),C(255).H.N.
.".CROSS-REF JIM BUTTERFIELD".U.X.Q$.
G(34):S$." ":B$(1).Q$:B$(3).G(58)...
..."VARIABLES OR LINES";Z$:C2.5:.F(Z$).7
6.C2.6.P....J.1.255:C(J).4:.J:.J.48.57:C
(J).6:.J......C2.5..J.65.90:C(J).5:.J:.J
.36.38:C(J).7:.J:C(40).8.&. .C(34).1:C(1
43).2:C(131).3.S...."PROGRAM NAME";P$:.1
,8,3,"0:".P$.",P,R".P....#1,A$,B$:.F(B$)
..4. 1:..}....B.0.240...H..L$;:K.X:.J.B.
1..1:." ";A$(J);:X$.A$(J).J.M..C2.6.C(X$
).5.X$." ".X$:.205.W.N.X$.X$.L$...R..X$(
K)..X$.X$(K.J).X$(K):K.K.1:.210.....X$(K
.J).X$:.J:X.X.B:.:B.0.;.... GET NEXT LIN
E, TEST END.\....#1,A$,B$:.C(A$).C(B$).0
.530.R.... GET LINE NUMBER......#1,A$:L.
C(A$):.L.1.L.F(A$)......#1,A$:A.C(A$):.A
.1.A.F(A$).....C.C2:C1..1:L.A.256.L:L$.D
(L):.C(L$).6.L$.H(S$,6.C(L$)).L$...".. G
ET BASIC STUFF.&.,..#1,A$:A.C(A$):.A.1.A
.F(A$).=.6.C9.C(A):.C9.C1.380.N.@.K.0:.B
.0.360.G.J..J.1.B:.A$(J).M$.370...T..A$(
J).M$..J:K.B:.360. .^..K.B.J..1:A$(K.1).
A$(K):.K...H.B.B.1:A$(K.1).M$.J.R.C.C2:C
1..1:M$."".X.|..C2.5.420......A.137.A.13
8.A.141.A.167.C.6:.470......A.44.A.32.47
0.%....C9..6.C.9:.470.9....C9.C.C..1:C1.
4.F....C.6.470.E....C.0.C9.C1.C9.6.C1.C9
:.460...B..C2.5..C(M$).2.C.0.470...L.M$.
M$.A$...V..C9.1.190,480,480,480:.300....
.B$.B$(C9):C$."".V....#1,A$:.A$."".190..
....A$.B$.300......A$..Q$.490.....A$.B$:
B$.C$:C$.A$:.490.%... 1:."PRINTER";Z$.D.
..C.3:Z.6:.F(Z$).89.C.4:Z.12.S.&..2,C:.2
:.2,"CROSS REFERENCE - PROGRAM ";P$...0.
X$."":.J.1.X:A$.X$(J). .5..C2.6.K.6:.580
.D.:..K.1.C(A$):.J(A$,K,1).." "..K:....D
.B$.H(A$,K.1):C$.J(A$,K.1):.X$.B$.600...
N..2:Y.0:X$.B$:.2,X$;H(S$,5.C(X$));.&.X.
Y.Y.1:.Y.Z.620.8.B.Y.1:.2:.2,S$;.Q.L..2,
H(S$,6.C(C$));C$;.^.V..J:.2: 2...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL