CROSS REF.64
FILE INFORMATION
FILENAME(S): CROSS REF.64
FILE TYPE(S): PRG
FILE SIZE: 1.6K
FIRST SEEN: 2025-11-30 21:11:25
APPEARS ON: 1 disk(s)
FILE HASH
ac7f8b5f44cebea176af76060d98d55a81b092de8a4ef050245e898b341c9860
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| LEEG | CROSS REF.64 | PRG | DuncanTwain | 9 | 4 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 22 08 64 00 86 41 24 28 31 35 29 2C 42 24 |..".d..A$(15),B$| 00000010: 28 33 29 2C 58 24 28 35 30 30 29 2C 43 28 32 35 |(3),X$(500),C(25| 00000020: 35 29 00 47 08 6E 00 99 22 93 43 52 4F 53 53 2D |5).G.n..".CROSS-| 00000030: 52 45 46 20 42 59 20 4A 49 4D 20 42 55 54 54 45 |REF BY JIM BUTTE| 00000040: 52 46 49 45 4C 44 22 00 66 08 6F 00 99 22 11 12 |RFIELD".f.o.."..| 00000050: 50 55 54 20 44 49 53 4B 20 49 4E 20 44 52 49 56 |PUT DISK IN DRIV| 00000060: 45 20 5B 30 5D 22 00 93 08 78 00 51 24 B2 C7 28 |E [0]"...x.Q$..(| 00000070: 33 34 29 3A 53 24 B2 22 20 20 20 20 20 22 3A 42 |34):S$." ":B| 00000080: 24 28 31 29 B2 51 24 3A 42 24 28 33 29 B2 C7 28 |$(1).Q$:B$(3)..(| 00000090: 35 38 29 00 CB 08 82 00 85 22 11 12 56 92 41 52 |58)......"..V.AR| 000000A0: 49 41 42 45 4C 45 4E 20 4F 46 20 12 52 92 45 47 |IABELEN OF .R.EG| 000000B0: 45 4C 53 22 3B 5A 24 3A 43 32 B2 35 3A 8B C6 28 |ELS";Z$:C2.5:..(| 000000C0: 5A 24 29 B2 38 32 A7 43 32 B2 36 00 F5 08 8C 00 |Z$).82.C2.6.....| 000000D0: 81 4A B2 31 A4 32 35 35 3A 43 28 4A 29 B2 34 3A |.J.1.255:C(J).4:| 000000E0: 82 4A 3A 81 4A B2 34 38 A4 35 37 3A 43 28 4A 29 |.J:.J.48.57:C(J)| 000000F0: B2 36 3A 82 4A 00 2D 09 96 00 8B 43 32 B2 35 A7 |.6:.J.-....C2.5.| 00000100: 81 4A B2 36 35 A4 39 30 3A 43 28 4A 29 B2 35 3A |.J.65.90:C(J).5:| 00000110: 82 4A 3A 81 4A B2 33 36 A4 33 38 3A 43 28 4A 29 |.J:.J.36.38:C(J)| 00000120: B2 37 3A 82 4A 3A 43 28 34 30 29 B2 38 00 4B 09 |.7:.J:C(40).8.K.| 00000130: A0 00 43 28 33 34 29 B2 31 3A 43 28 31 34 33 29 |..C(34).1:C(143)| 00000140: B2 32 3A 43 28 31 33 31 29 B2 33 00 82 09 AA 00 |.2:C(131).3.....| 00000150: 85 22 4E 41 41 4D 20 56 41 4E 20 48 45 54 20 50 |."NAAM VAN HET P| 00000160: 52 4F 47 52 41 4D 4D 41 22 3B 50 24 3A 9F 31 2C |ROGRAMMA";P$:.1,| 00000170: 38 2C 33 2C 22 30 3A 22 AA 50 24 AA 22 2C 50 2C |8,3,"0:".P$.",P,| 00000180: 52 22 00 9E 09 B4 00 A1 23 31 2C 41 24 2C 42 24 |R"......#1,A$,B$| 00000190: 3A 8B C6 28 42 24 29 B3 34 A7 A0 31 3A 90 00 AB |:..(B$).4..1:...| 000001A0: 09 BE 00 8B 42 B2 30 89 32 34 30 00 DA 09 C8 00 |....B.0.240.....| 000001B0: 99 4C 24 3B 3A 4B B2 58 3A 81 4A B2 42 A4 31 A9 |.L$;:K.X:.J.B.1.| 000001C0: AB 31 3A 99 22 20 22 3B 41 24 28 4A 29 3B 3A 58 |.1:." ";A$(J);:X| 000001D0: 24 B2 41 24 28 4A 29 AA 4C 24 00 02 0A D2 00 8B |$.A$(J).L$......| 000001E0: 58 24 28 4B 29 B1 B2 58 24 A7 58 24 28 4B AA 4A |X$(K)..X$.X$(K.J| 000001F0: 29 B2 58 24 28 4B 29 3A 4B B2 4B AB 31 3A 89 32 |).X$(K):K.K.1:.2| 00000200: 31 30 00 20 0A DC 00 58 24 28 4B AA 4A 29 B2 58 |10. ...X$(K.J).X| 00000210: 24 3A 82 4A 3A 58 B2 58 AA 42 3A 99 3A 42 B2 30 |$:.J:X.X.B:.:B.0| 00000220: 00 3F 0A E6 00 8F 20 47 45 54 20 4E 45 58 54 20 |.?.... GET NEXT | 00000230: 4C 49 4E 45 20 2C 20 54 45 53 54 20 45 4E 44 00 |LINE , TEST END.| 00000240: 60 0A F0 00 A1 23 31 2C 41 24 2C 42 24 3A 8B C3 |`....#1,A$,B$:..| 00000250: 28 41 24 29 AA C3 28 42 24 29 B2 30 89 35 33 30 |(A$)..(B$).0.530| 00000260: 00 76 0A FA 00 8F 20 47 45 54 20 4C 49 4E 45 20 |.v.... GET LINE | 00000270: 4E 55 4D 42 45 52 00 96 0A 04 01 A1 23 31 2C 41 |NUMBER......#1,A| 00000280: 24 3A 4C B2 C3 28 41 24 29 3A 8B 4C B2 31 A7 4C |$:L..(A$):.L.1.L| 00000290: B2 C6 28 41 24 29 00 B6 0A 0E 01 A1 23 31 2C 41 |..(A$)......#1,A| 000002A0: 24 3A 41 B2 C3 28 41 24 29 3A 8B 41 B2 31 A7 41 |$:A..(A$):.A.1.A| 000002B0: B2 C6 28 41 24 29 00 F4 0A 18 01 43 B2 43 32 3A |..(A$).....C.C2:| 000002C0: 43 31 B2 AB 31 3A 4C B2 41 AC 32 35 36 AA 4C 3A |C1..1:L.A.256.L:| 000002D0: 4C 24 B2 C4 28 4C 29 3A 8B C3 28 4C 24 29 B3 36 |L$..(L):..(L$).6| 000002E0: A7 4C 24 B2 C8 28 53 24 2C 36 AB C3 28 4C 24 29 |.L$..(S$,6..(L$)| 000002F0: 29 AA 4C 24 00 0A 0B 22 01 8F 20 47 45 54 20 42 |).L$...".. GET B| 00000300: 41 53 49 43 20 53 54 55 46 46 00 2A 0B 2C 01 A1 |ASIC STUFF.*.,..| 00000310: 23 31 2C 41 24 3A 41 B2 C3 28 41 24 29 3A 8B 41 |#1,A$:A..(A$):.A| 00000320: B2 31 A7 41 B2 C6 28 41 24 29 00 41 0B 36 01 43 |.1.A..(A$).A.6.C| 00000330: 39 B2 43 28 41 29 3A 8B 43 39 B1 43 31 89 33 38 |9.C(A):.C9.C1.38| 00000340: 30 00 52 0B 40 01 4B B2 30 3A 8B 42 B2 30 89 33 |0.R.@.K.0:.B.0.3| 00000350: 36 30 00 6B 0B 4A 01 81 4A B2 31 A4 42 3A 8B 41 |60.k.J..J.1.B:.A| 00000360: 24 28 4A 29 B2 4D 24 89 33 37 30 00 85 0B 54 01 |$(J).M$.370...T.| 00000370: 8B 41 24 28 4A 29 B3 4D 24 A7 82 4A 3A 4B B2 42 |.A$(J).M$..J:K.B| 00000380: 3A 89 33 36 30 00 A4 0B 5E 01 81 4B B2 42 A4 4A |:.360...^..K.B.J| 00000390: A9 AB 31 3A 41 24 28 4B AA 31 29 B2 41 24 28 4B |..1:A$(K.1).A$(K| 000003A0: 29 3A 82 4B 00 B9 0B 68 01 42 B2 42 AA 31 3A 41 |):.K...h.B.B.1:A| 000003B0: 24 28 4B AA 31 29 B2 4D 24 00 CE 0B 72 01 43 B2 |$(K.1).M$...r.C.| 000003C0: 43 32 3A 43 31 B2 AB 31 3A 4D 24 B2 22 22 00 DC |C2:C1..1:M$.""..| 000003D0: 0B 7C 01 8B 43 32 B2 35 89 34 32 30 00 02 0C 86 |.|..C2.5.420....| 000003E0: 01 8B 41 B2 31 33 37 B0 41 B2 31 33 38 B0 41 B2 |..A.137.A.138.A.| 000003F0: 31 34 31 B0 41 B2 31 36 37 A7 43 B2 36 3A 89 34 |141.A.167.C.6:.4| 00000400: 37 30 00 15 0C 90 01 8B 41 B2 34 34 B0 41 B2 33 |70......A.44.A.3| 00000410: 32 89 34 37 30 00 29 0C 9A 01 8B 43 39 B3 B1 36 |2.470.)....C9..6| 00000420: A7 43 B2 39 3A 89 34 37 30 00 3D 0C A4 01 8B 43 |.C.9:.470.=....C| 00000430: 39 B2 43 A7 43 B2 AB 31 3A 43 31 B2 34 00 4A 0C |9.C.C..1:C1.4.J.| 00000440: AE 01 8B 43 B1 36 89 34 37 30 00 69 0C B8 01 8B |...C.6.470.i....| 00000450: 43 B3 30 AF 43 39 B1 43 31 AF 43 39 B1 36 A7 43 |C.0.C9.C1.C9.6.C| 00000460: 31 B2 43 39 3A 89 34 36 30 00 84 0C C2 01 8B 43 |1.C9:.460......C| 00000470: 32 B2 35 A7 8B C3 28 4D 24 29 B1 32 B0 43 B1 30 |2.5...(M$).2.C.0| 00000480: 89 34 37 30 00 91 0C CC 01 4D 24 B2 4D 24 AA 41 |.470.....M$.M$.A| 00000490: 24 00 B0 0C D6 01 91 43 39 AA 31 89 31 39 30 2C |$......C9.1.190,| 000004A0: 34 38 30 2C 34 38 30 2C 34 38 30 3A 89 33 30 30 |480,480,480:.300| 000004B0: 00 C4 0C E0 01 42 24 B2 42 24 28 43 39 29 3A 43 |.....B$.B$(C9):C| 000004C0: 24 B2 22 22 00 DA 0C EA 01 A1 23 31 2C 41 24 3A |$.""......#1,A$:| 000004D0: 8B 41 24 B2 22 22 89 31 39 30 00 E9 0C F4 01 8B |.A$."".190......| 000004E0: 41 24 B2 42 24 89 33 30 30 00 FA 0C FE 01 8B 41 |A$.B$.300......A| 000004F0: 24 B2 B3 B1 51 24 89 34 39 30 00 15 0D 08 02 41 |$...Q$.490.....A| 00000500: 24 B2 42 24 3A 42 24 B2 43 24 3A 43 24 B2 41 24 |$.B$:B$.C$:C$.A$| 00000510: 3A 89 34 39 30 00 2A 0D 12 02 A0 31 3A 85 22 50 |:.490.*....1:."P| 00000520: 52 49 4E 54 45 52 22 3B 5A 24 00 49 0D 1C 02 43 |RINTER";Z$.I...C| 00000530: B2 33 3A 5A B2 36 3A 8B C6 28 5A 24 29 B2 38 39 |.3:Z.6:..(Z$).89| 00000540: A7 43 B2 34 3A 5A B2 31 32 00 77 0D 26 02 9F 32 |.C.4:Z.12.w.&..2| 00000550: 2C 43 3A 98 32 3A 98 32 2C 22 43 52 4F 53 53 20 |,C:.2:.2,"CROSS | 00000560: 52 45 46 45 52 45 4E 43 45 20 2D 50 52 4F 47 52 |REFERENCE -PROGR| 00000570: 41 4D 20 22 3B 50 24 00 91 0D 30 02 58 24 B2 22 |AM ";P$...0.X$."| 00000580: 22 3A 81 4A B2 31 A4 58 3A 41 24 B2 58 24 28 4A |":.J.1.X:A$.X$(J| 00000590: 29 00 B5 0D 3A 02 81 4B B2 31 A4 C3 28 41 24 29 |)...:..K.1..(A$)| 000005A0: 3A 8B CA 28 41 24 2C 4B 2C 31 29 B3 B1 22 20 22 |:..(A$,K,1).." "| 000005B0: A7 82 4B 3A 90 00 DE 0D 44 02 42 24 B2 C8 28 41 |..K:....D.B$..(A| 000005C0: 24 2C 4B AB 31 29 3A 43 24 B2 CA 28 41 24 2C 4B |$,K.1):C$..(A$,K| 000005D0: AA 31 29 3A 8B 58 24 B2 42 24 89 36 30 30 00 04 |.1):.X$.B$.600..| 000005E0: 0E 4E 02 98 32 3A 59 B2 30 3A 58 24 B2 42 24 3A |.N..2:Y.0:X$.B$:| 000005F0: 98 32 2C 58 24 3B C8 28 53 24 2C 35 AB C3 28 58 |.2,X$;.(S$,5..(X| 00000600: 24 29 29 3B 00 17 0E 58 02 59 B2 59 AA 31 3A 8B |$));...X.Y.Y.1:.| 00000610: 59 B3 5A 89 36 32 30 00 29 0E 62 02 59 B2 31 3A |Y.Z.620.).b.Y.1:| 00000620: 98 32 3A 98 32 2C 53 24 3B 00 42 0E 6C 02 98 32 |.2:.2,S$;.B.l..2| 00000630: 2C C8 28 53 24 2C 36 AB C3 28 43 24 29 29 3B 43 |,.(S$,6..(C$));C| 00000640: 24 3B 00 4F 0E 76 02 82 4A 3A 98 32 3A A0 32 00 |$;.O.v..J:.2:.2.| 00000650: 00 00 |.. |
..".D..A$(15),B$(3),X$(500),C(255).G.N..
".CROSS-REF BY JIM BUTTERFIELD".F.O.."..
PUT DISK IN DRIVE [0]"...X.Q$.G(34):S$."
":B$(1).Q$:B$(3).G(58).K...."..V.AR
IABELEN OF .R.EGELS";Z$:C2.5:.F(Z$).82.C
2.6......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.K. .C(34).1:C(143)
.2:C(131).3......"NAAM VAN HET PROGRAMMA
";P$:.1,8,3,"0:".P$.",P,R"......#1,A$,B$
:.F(B$).4. 1:.......B.0.240.Z.H..L$;:K.X
:.J.B.1..1:." ";A$(J);:X$.A$(J).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
LINE , TEST END.`....#1,A$,B$:.C(A$).C(B
$).0.530.V.... 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$..."
.. GET BASIC STUFF.*.,..#1,A$:A.C(A$):.A
.1.A.F(A$).A.6.C9.C(A):.C9.C1.380.R.@.K.
0:.B.0.360.K.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$.N.R.C.
C2:C1..1:M$.""...|..C2.5.420......A.137.
A.138.A.141.A.167.C.6:.470......A.44.A.3
2.470.)....C9..6.C.9:.470.=....C9.C.C..1
:C1.4.J....C.6.470.I....C.0.C9.C1.C9.6.C
1.C9:.460...B..C2.5..C(M$).2.C.0.470...L
.M$.M$.A$...V..C9.1.190,480,480,480:.300
.D...B$.B$(C9):C$."".Z....#1,A$:.A$."".1
90......A$.B$.300......A$...Q$.490.....A
$.B$:B$.C$:C$.A$:.490.*... 1:."PRINTER";
Z$.I...C.3:Z.6:.F(Z$).89.C.4:Z.12.W.&..2
,C:.2:.2,"CROSS REFERENCE -PROGRAM ";P$.
..0.X$."":.J.1.X:A$.X$(J)...:..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.
).B.Y.1:.2:.2,S$;.B.L..2,H(S$,6.C(C$));C
$;.O.V..J:.2: 2...
> CLICK IMAGE PREVIEW FOR FULL MODAL