GOTO XREF
FILE INFORMATION
FILENAME(S): GOTO XREF
FILE TYPE(S): PRG
FILE SIZE: 1.9K
FIRST SEEN: 2025-12-01 19:06:57
APPEARS ON: 1 disk(s)
FILE HASH
fb3667583409bb6f38ab6f09aa173d21d9983ddf29c03c94d245898f9eed8d1c
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| ICE | GOTO XREF | PRG | Icebreaker | 29 | 9 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 1C 25 1C 64 00 8F 20 2D 2D 2D 2D 2D 2D 2D 2D |..%.d.. --------|
00000010: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000020: 2D 2D 2D 2D 2D 00 2B 1C 6E 00 8F 00 4B 1C 78 00 |-----.+.n...K.x.|
00000030: 8F 20 20 20 42 41 53 49 43 20 50 52 4F 47 52 41 |. BASIC PROGRA|
00000040: 4D 20 47 4F 54 4F 20 58 52 45 46 00 51 1C 82 00 |M GOTO XREF.Q...|
00000050: 8F 00 6F 1C 8C 00 8F 20 20 20 20 20 20 42 59 20 |..o.... BY |
00000060: 52 4F 42 45 52 54 20 57 2E 20 42 41 4B 45 52 00 |ROBERT W. BAKER.|
00000070: 75 1C 96 00 8F 00 99 1C A0 00 8F 20 2D 2D 2D 2D |u.......... ----|
00000080: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000090: 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 9F 1C AA 00 8F 00 |---------.......|
000000A0: C0 1C B4 00 8F 20 50 52 49 4E 54 20 41 20 43 52 |..... PRINT A CR|
000000B0: 4F 53 53 20 52 45 46 45 52 45 4E 43 45 20 4F 46 |OSS REFERENCE OF|
000000C0: 00 DE 1C BE 00 8F 20 47 4F 54 4F 20 26 20 47 4F |...... GOTO & GO|
000000D0: 53 55 42 20 52 45 46 45 52 45 4E 43 45 53 00 E4 |SUB REFERENCES..|
000000E0: 1C C8 00 8F 00 08 1D D2 00 8F 20 2D 2D 2D 2D 2D |.......... -----|
000000F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000100: 2D 2D 2D 2D 2D 2D 2D 2D 00 0E 1D DC 00 3A 00 2C |--------.....:.,|
00000110: 1D E6 00 99 22 93 22 3B A6 31 34 29 3B 22 47 4F |....".";.14);"GO|
00000120: 54 4F 20 58 52 45 46 22 3A 99 3A 99 00 44 1D F0 |TO XREF":.:..D..|
00000130: 00 99 22 46 49 4C 45 20 4E 41 4D 45 22 3A 20 85 |.."FILE NAME": .|
00000140: 20 46 4C 24 00 61 1D FA 00 86 20 47 54 28 35 30 | FL$.a.... GT(50|
00000150: 30 29 2C 4C 4C 24 28 35 30 30 29 3A 20 47 4E B2 |0),LL$(500): GN.|
00000160: 30 00 80 1D 04 01 99 22 93 53 43 41 4E 4E 49 4E |0......".SCANNIN|
00000170: 47 20 46 49 4C 45 2E 2E 2E 2E 2E 22 3A 99 3A 99 |G FILE.....":.:.|
00000180: 00 95 1D 0E 01 9F 20 31 35 2C 38 2C 31 35 3A 20 |...... 15,8,15: |
00000190: 8D 20 37 39 30 00 B1 1D 18 01 9F 20 35 2C 38 2C |. 790...... 5,8,|
000001A0: 35 2C 22 30 3A 22 AA 46 4C 24 AA 22 2C 50 2C 52 |5,"0:".FL$.",P,R|
000001B0: 22 00 C2 1D 22 01 8D 20 37 39 30 3A 20 8D 20 37 |"...".. 790: . 7|
000001C0: 35 30 00 DC 1D 2C 01 8D 20 37 35 30 3A 20 8B 20 |50...,.. 750: . |
000001D0: 56 AA 56 31 B2 30 20 A7 20 35 36 30 00 09 1E 36 |V.V1.0 . 560...6|
000001E0: 01 8D 20 37 35 30 3A 20 4C 4E B2 56 31 AA 28 32 |.. 750: LN.V1.(2|
000001F0: 35 36 AC 56 29 3A 20 4C 4E 24 B2 22 20 22 AA CA |56.V): LN$." "..|
00000200: 28 C4 28 4C 4E 29 2C 32 29 00 13 1E 40 01 8D 20 |(.(LN),2)...@.. |
00000210: 37 36 30 00 23 1E 4A 01 8B 20 56 B2 30 20 A7 20 |760.#.J.. V.0 . |
00000220: 33 30 30 00 45 1E 54 01 8B 20 56 B2 31 33 37 20 |300.E.T.. V.137 |
00000230: B0 20 56 B2 31 34 31 20 B0 20 56 B2 31 36 37 20 |. V.141 . V.167 |
00000240: A7 20 33 38 30 00 58 1E 5E 01 8B 20 56 B3 B1 32 |. 380.X.^.. V..2|
00000250: 30 33 20 A7 20 33 32 30 00 71 1E 68 01 8D 20 37 |03 . 320.q.h.. 7|
00000260: 36 30 3A 20 8B 20 56 B3 B1 33 32 20 A7 20 33 33 |60: . V..32 . 33|
00000270: 30 00 8B 1E 72 01 8D 20 37 36 30 3A 20 8B 20 56 |0...r.. 760: . V|
00000280: B3 B1 31 36 34 20 A7 20 33 33 30 00 95 1E 7C 01 |..164 . 330...|.|
00000290: 4C 54 B2 AB 31 00 AD 1E 86 01 8D 20 37 36 30 3A |LT..1...... 760:|
000002A0: 20 8B 20 56 B2 33 32 20 A7 20 33 39 30 00 C5 1E | . V.32 . 390...|
000002B0: 90 01 8B 20 56 B3 34 38 20 B0 20 56 B1 35 37 20 |... V.48 . V.57 |
000002C0: A7 20 34 33 30 00 D7 1E 9A 01 8B 20 4C 54 B3 30 |. 430...... LT.0|
000002D0: 20 A7 20 4C 54 B2 30 00 FA 1E A4 01 4C 54 B2 28 | . LT.0.....LT.(|
000002E0: 31 30 AC 4C 54 29 AA C5 28 43 24 29 3A 20 8D 20 |10.LT)..(C$): . |
000002F0: 37 36 30 3A 20 89 20 34 30 30 00 0D 1F AE 01 8B |760: . 400......|
00000300: 20 56 B2 34 34 20 A7 20 56 B2 31 33 37 00 1E 1F | V.44 . V.137...|
00000310: B3 01 8B 20 4C 54 B3 30 20 A7 20 33 33 30 00 35 |... LT.0 . 330.5|
00000320: 1F B8 01 5A B2 47 4E 3A 20 8B 20 47 4E B2 30 20 |...Z.GN: . GN.0 |
00000330: A7 20 35 33 30 00 5C 1F C2 01 81 20 58 B2 30 20 |. 530.\.... X.0 |
00000340: A4 20 47 4E AB 31 3A 20 8B 20 B5 28 4C 54 29 B3 |. GN.1: . .(LT).|
00000350: B1 47 54 28 58 29 20 A7 20 35 30 30 00 7D 1F CC |.GT(X) . 500.}..|
00000360: 01 8B 20 C9 28 4C 4C 24 28 58 29 2C C3 28 4C 4E |.. .(LL$(X),.(LN|
00000370: 24 29 29 B2 4C 4E 24 20 A7 20 34 39 30 00 A4 1F |$)).LN$ . 490...|
00000380: D6 01 8B 20 C3 28 4C 4C 24 28 58 29 29 B1 32 34 |... .(LL$(X)).24|
00000390: 36 20 A7 20 4C 54 B2 4C 54 AA 30 2E 31 3A 20 89 |6 . LT.LT.0.1: .|
000003A0: 20 35 30 30 00 BA 1F E0 01 4C 4C 24 28 58 29 B2 | 500.....LL$(X).|
000003B0: 4C 4C 24 28 58 29 AA 4C 4E 24 00 CF 1F EA 01 58 |LL$(X).LN$.....X|
000003C0: B2 47 4E 3A 20 82 20 58 3A 20 89 20 33 33 30 00 |.GN: . X: . 330.|
000003D0: EB 1F F4 01 8B 20 4C 54 B1 47 54 28 58 29 20 A7 |..... LT.GT(X) .|
000003E0: 20 82 20 58 3A 20 89 20 35 33 30 00 04 20 FE 01 | . X: . 530.. ..|
000003F0: 5A B2 58 3A 20 81 20 59 B2 47 4E 20 A4 20 5A 20 |Z.X: . Y.GN . Z |
00000400: A9 20 AB 31 00 37 20 08 02 47 54 28 59 AA 31 29 |. .1.7 ..GT(Y.1)|
00000410: B2 47 54 28 59 29 3A 20 4C 4C 24 28 59 AA 31 29 |.GT(Y): LL$(Y.1)|
00000420: B2 4C 4C 24 28 59 29 3A 20 4C 4C 24 28 59 29 B2 |.LL$(Y): LL$(Y).|
00000430: 22 22 3A 20 82 20 59 00 5A 20 12 02 47 54 28 5A |"": . Y.Z ..GT(Z|
00000440: 29 B2 B5 28 4C 54 29 3A 20 4C 4C 24 28 5A 29 B2 |)..(LT): LL$(Z).|
00000450: 4C 4C 24 28 5A 29 AA 4C 4E 24 00 71 20 1C 02 8B |LL$(Z).LN$.q ...|
00000460: 20 4C 54 B2 B5 28 4C 54 29 20 A7 20 99 20 4C 54 | LT..(LT) . . LT|
00000470: 2C 00 84 20 26 02 47 4E B2 47 4E AA 31 3A 20 89 |,.. &.GN.GN.1: .|
00000480: 20 33 33 30 00 99 20 30 02 A0 20 35 3A 20 A0 20 | 330.. 0.. 5: . |
00000490: 31 35 3A 20 9F 20 34 2C 34 00 B1 20 3A 02 8D 20 |15: . 4,4.. :.. |
000004A0: 38 32 30 3A 20 8B 20 47 4E B2 30 20 A7 20 37 33 |820: . GN.0 . 73|
000004B0: 30 00 C2 20 44 02 81 20 58 B2 30 20 A4 20 47 4E |0.. D.. X.0 . GN|
000004C0: AB 31 00 EB 20 4E 02 8B 20 50 47 B2 35 36 20 A7 |.1.. N.. PG.56 .|
000004D0: 20 81 20 59 B2 31 20 A4 20 31 30 3A 20 98 34 3A | . Y.1 . 10: .4:|
000004E0: 20 82 20 59 3A 20 8D 20 38 32 30 00 0D 21 58 02 | . Y: . 820..!X.|
000004F0: 53 24 B2 C9 28 22 20 20 20 20 20 22 AA C4 28 47 |S$..(" "..(G|
00000500: 54 28 58 29 29 2C 35 29 AA 22 20 2D 22 00 29 21 |T(X)),5)." -".)!|
00000510: 62 02 8B 20 53 24 B3 B1 4C 24 20 A7 20 4C 24 B2 |b.. S$..L$ . L$.|
00000520: 53 24 3A 20 89 20 36 33 30 00 46 21 6C 02 53 24 |S$: . 630.F!l.S$|
00000530: B2 22 20 20 20 20 20 20 20 22 3A 20 8F 20 37 20 |." ": . 7 |
00000540: 53 50 41 43 45 53 00 51 21 76 02 98 34 2C 53 24 |SPACES.Q!v..4,S$|
00000550: 3B 00 72 21 80 02 42 B2 30 3A 20 81 20 59 B2 30 |;.r!..B.0: . Y.0|
00000560: 20 A4 20 B5 28 C3 28 4C 4C 24 28 58 29 29 AD 36 | . .(.(LL$(X)).6|
00000570: 35 29 00 93 21 8A 02 41 B2 42 AA 31 3A 20 42 B2 |5)..!..A.B.1: B.|
00000580: 41 AA 36 35 3A 20 8B 20 42 B1 32 35 35 20 A7 20 |A.65: . B.255 . |
00000590: 36 38 30 00 B7 21 94 02 43 24 B2 CA 28 4C 4C 24 |680..!..C$..(LL$|
000005A0: 28 58 29 2C 42 2C 31 29 3A 20 8B 20 43 24 B2 22 |(X),B,1): . C$."|
000005B0: 22 20 A7 20 36 38 30 00 E1 21 9E 02 43 B2 C6 28 |" . 680..!..C..(|
000005C0: 43 24 29 3A 20 8B 20 43 B1 34 37 20 AF 20 43 B3 |C$): . C.47 . C.|
000005D0: 35 38 20 A7 20 42 B2 42 AA 31 3A 20 89 20 36 36 |58 . B.B.1: . 66|
000005E0: 30 00 09 22 A8 02 4C 4E 24 B2 CA 28 4C 4C 24 28 |0.."..LN$..(LL$(|
000005F0: 58 29 2C 41 2C 42 AB 41 29 3A 20 8B 20 4C 4E 24 |X),A,B.A): . LN$|
00000600: B2 22 22 20 A7 20 37 31 30 00 30 22 B2 02 8B 20 |."" . 710.0"... |
00000610: 59 B1 30 20 A7 20 98 34 2C 22 20 20 20 20 20 20 |Y.0 . .4," |
00000620: 20 20 22 3B 3A 20 8F 20 38 20 53 50 41 43 45 53 | ";: . 8 SPACES|
00000630: 00 44 22 BC 02 98 34 2C 4C 4E 24 3A 20 50 47 B2 |.D"...4,LN$: PG.|
00000640: 50 47 AA 31 00 4C 22 C6 02 82 20 59 00 58 22 D0 |PG.1.L"... Y.X".|
00000650: 02 82 20 58 3A 20 98 34 00 71 22 DA 02 99 22 93 |.. X: .4.q"...".|
00000660: 44 4F 4E 45 22 3A 99 3A 99 3A 20 A0 20 34 3A 20 |DONE":.:.: . 4: |
00000670: 80 00 85 22 E4 02 53 24 B2 53 24 AA 43 24 3A 20 |..."..S$.S$.C$: |
00000680: 89 20 37 36 30 00 95 22 EE 02 8D 20 37 36 30 3A |. 760.."... 760:|
00000690: 20 56 31 B2 56 00 A7 22 F8 02 A1 23 35 2C 43 24 | V1.V.."...#5,C$|
000006A0: 3A 20 8D 20 37 39 30 00 BC 22 02 03 8B 20 43 24 |: . 790.."... C$|
000006B0: B2 22 22 20 A7 20 56 B2 30 3A 20 8E 00 CB 22 0C |."" . V.0: ...".|
000006C0: 03 56 B2 C6 28 43 24 29 3A 20 8E 00 EC 22 16 03 |.V..(C$): ..."..|
000006D0: 84 31 35 2C 45 4E 2C 45 4D 24 2C 45 54 2C 45 53 |.15,EN,EM$,ET,ES|
000006E0: 3A 20 8B 20 45 4E B2 30 20 A7 20 8E 00 10 23 20 |: . EN.0 . ...# |
000006F0: 03 99 22 93 12 44 49 53 4B 20 45 52 52 4F 52 22 |.."..DISK ERROR"|
00000700: 3A 20 99 20 45 4E 3B 45 4D 24 3B 45 54 3B 45 53 |: . EN;EM$;ET;ES|
00000710: 00 21 23 2A 03 A0 20 35 3A 20 A0 20 31 35 3A 20 |.!#*.. 5: . 15: |
00000720: 80 00 65 23 34 03 98 34 2C 22 4C 49 53 54 20 4F |..e#4..4,"LIST O|
00000730: 46 20 47 4F 54 4F 2F 47 4F 53 55 42 20 52 45 46 |F GOTO/GOSUB REF|
00000740: 45 52 45 4E 43 45 53 20 49 4E 20 50 52 4F 47 52 |ERENCES IN PROGR|
00000750: 41 4D 3A 20 22 3B C7 28 33 34 29 3B 46 4C 24 3B |AM: ";.(34);FL$;|
00000760: C7 28 33 34 29 00 75 23 3E 03 98 34 3A 20 50 47 |.(34).u#>..4: PG|
00000770: B2 32 3A 20 8E 00 00 00 |.2: .... |
..%.D.. -----------------------------.+.
N...K.X.. BASIC PROGRAM GOTO XREF.Q...
..O.... BY ROBERT W. BAKER.U.......
.. -----------------------------.......
..... PRINT A CROSS REFERENCE OF...... G
OTO & GOSUB REFERENCES...H.....R.. -----
------------------------.....:.,....".";
.14);"GOTO XREF":.:..D...."FILE NAME": .
FL$.A.... GT(500),LL$(500): GN.0......"
.SCANNING FILE.....":.:....... 15,8,15:
. 790...... 5,8,5,"0:".FL$.",P,R".B."..
790: . 750...,.. 750: . V.V1.0 . 560...6
.. 750: LN.V1.(256.V): LN$." ".J(D(LN),2
)...@.. 760.#.J.. V.0 . 300.E.T.. V.137
. V.141 . V.167 . 380.X.^.. V..203 . 320
.Q.H.. 760: . V..32 . 330...R.. 760: . V
..164 . 330...|.LT..1...... 760: . V.32
. 390.E.... V.48 . V.57 . 430.W.... LT.0
. LT.0.....LT.(10.LT).E(C$): . 760: . 4
00...... V.44 . V.137...... LT.0 . 330.5
...Z.GN: . GN.0 . 530.\.B.. X.0 . GN.1:
. .(LT)..GT(X) . 500.}.L.. I(LL$(X),C(LN
$)).LN$ . 490...V.. C(LL$(X)).246 . LT.L
T.0.1: . 500.....LL$(X).LL$(X).LN$.O...X
.GN: . X: . 330...... LT.GT(X) . . X: .
530.. ..Z.X: . Y.GN . Z . .1.7 ..GT(Y.1)
.GT(Y): LL$(Y.1).LL$(Y): LL$(Y)."": . Y.
Z ..GT(Z)..(LT): LL$(Z).LL$(Z).LN$.Q ...
LT..(LT) . . LT,.. &.GN.GN.1: . 330.. 0
. 5: 15: . 4,4.. :.. 820: . GN.0 . 73
0.B D.. X.0 . GN.1.. N.. PG.56 . . Y.1 .
10: .4: . Y: . 820..!X.S$.I(" ".D(G
T(X)),5)." -".)!B.. S$..L$ . L$.S$: . 63
0.F!L.S$." ": . 7 SPACES.Q!V..4,S$
;.R!..B.0: . Y.0 . .(C(LL$(X)).65)..!..A
.B.1: B.A.65: . B.255 . 680..!..C$.J(LL$
(X),B,1): . C$."" . 680..!..C.F(C$): . C
.47 . C.58 . B.B.1: . 660.."..LN$.J(LL$(
X),A,B.A): . LN$."" . 710.0"... Y.0 . .4
," ";: . 8 SPACES.D"...4,LN$: PG.
PG.1.L"F.. Y.X"P.. X: .4.Q"Z..".DONE":.:
.: 4: ..."..S$.S$.C$: . 760.."... 760:
V1.V.."...#5,C$: . 790.."... C$."" . V.
0: ..K"..V.F(C$): ..."...15,EN,EM$,ET,ES
: . EN.0 . ...# .."..DISK ERROR": . EN;E
M$;ET;ES.!#*. 5: 15: ..E#4..4,"LIST O
F GOTO/GOSUB REFERENCES IN PROGRAM: ";G(
34);FL$;G(34).U#>..4: PG.2: ....
> CLICK IMAGE PREVIEW FOR FULL MODAL