_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

Multiple names: XREF, CROSS REFERENCE

FILE INFORMATION

FILENAME(S):
• XREF<br>• CROSS&nbspREFERENCE

FILE TYPE(S): PRG

FILE SIZE: 2.2K

FIRST SEEN: 2025-11-30 21:23:13

APPEARS ON: 2 disk(s)

FILE HASH

0e944a95b2c6e485ff5db1d20b4c32f31c7a807f850d05a970f7da9ac8b72dcf

FOUND ON DISKS (2 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
C64 HULP 18 1 XREF PRG DuncanTwain 6 2 DOWNLOAD FILE
C64 HULP 13 2 CROSS REFERENCE PRG DuncanTwain 22 7 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 2D 08 0A 00 8F 20  46 52 4F 4D 20 43 4F 4D  |..-.... FROM COM|
00000010: 50 55 54 45 21 27 53 20  46 49 52 53 54 20 42 4F  |PUTE!'S FIRST BO|
00000020: 4F 4B 20 4F 46 20 50 45  54 2F 43 42 4D 00 5B 08  |OK OF PET/CBM.[.|
00000030: 14 00 8F 20 50 52 4F 47  52 41 4D 20 42 59 20 4A  |... PROGRAM BY J|
00000040: 49 4D 20 42 55 54 54 45  52 46 49 45 4C 44 20 28  |IM BUTTERFIELD (|
00000050: 57 48 4F 20 45 4C 53 45  3F 21 29 00 77 08 1E 00  |WHO ELSE?!).w...|
00000060: 8F 20 50 41 47 45 53 20  31 34 36 20 54 48 52 4F  |. PAGES 146 THRO|
00000070: 55 47 48 20 31 35 30 00  7D 08 28 00 8F 00 A0 08  |UGH 150.}.(.....|
00000080: 64 00 86 20 41 24 28 31  35 29 2C 42 24 28 33 29  |d.. A$(15),B$(3)|
00000090: 2C 58 24 28 31 35 30 30  29 2C 43 28 32 35 35 29  |,X$(1500),C(255)|
000000A0: 00 CA 08 6E 00 99 22 93  43 52 4F 53 53 2D 52 45  |...n..".CROSS-RE|
000000B0: 46 45 52 45 4E 43 45 20  20 20 20 4A 49 4D 20 42  |FERENCE    JIM B|
000000C0: 55 54 54 45 52 46 49 45  4C 44 00 F7 08 78 00 51  |UTTERFIELD...x.Q|
000000D0: 24 B2 C7 28 33 34 29 3A  53 24 B2 22 20 20 20 20  |$..(34):S$."    |
000000E0: 20 22 3A 42 24 28 31 29  B2 51 24 3A 42 24 28 33  | ":B$(1).Q$:B$(3|
000000F0: 29 B2 C7 28 35 38 29 00  28 09 82 00 85 22 56 41  |)..(58).(...."VA|
00000100: 52 49 41 42 4C 45 53 20  4F 52 20 4C 49 4E 45 53  |RIABLES OR LINES|
00000110: 22 3B 5A 24 3A 43 32 B2  35 3A 8B C6 28 5A 24 29  |";Z$:C2.5:..(Z$)|
00000120: B2 37 36 A7 43 32 B2 36  00 52 09 8C 00 81 4A B2  |.76.C2.6.R....J.|
00000130: 31 A4 32 35 35 3A 43 28  4A 29 B2 34 3A 82 4A 3A  |1.255:C(J).4:.J:|
00000140: 81 4A B2 34 38 A4 35 37  3A 43 28 4A 29 B2 36 3A  |.J.48.57:C(J).6:|
00000150: 82 4A 00 8A 09 96 00 8B  43 32 B2 35 A7 81 4A B2  |.J......C2.5..J.|
00000160: 36 35 A4 39 30 3A 43 28  4A 29 B2 35 3A 82 4A 3A  |65.90:C(J).5:.J:|
00000170: 81 4A B2 33 36 A4 33 38  3A 43 28 4A 29 B2 37 3A  |.J.36.38:C(J).7:|
00000180: 82 4A 3A 43 28 34 30 29  B2 38 00 A8 09 A0 00 43  |.J:C(40).8.....C|
00000190: 28 33 34 29 B2 31 3A 43  28 31 34 33 29 B2 32 3A  |(34).1:C(143).2:|
000001A0: 43 28 31 33 31 29 B2 33  00 D5 09 AA 00 85 22 50  |C(131).3......"P|
000001B0: 52 4F 47 52 41 4D 20 4E  41 4D 45 22 3B 50 24 3A  |ROGRAM NAME";P$:|
000001C0: 9F 31 2C 38 2C 33 2C 22  30 3A 22 AA 50 24 AA 22  |.1,8,3,"0:".P$."|
000001D0: 2C 50 2C 52 22 00 F2 09  B4 00 A1 23 31 2C 41 24  |,P,R"......#1,A$|
000001E0: 2C 42 24 3A 8B C6 28 42  24 29 B3 B1 38 A7 A0 31  |,B$:..(B$)..8..1|
000001F0: 3A 90 00 FF 09 BE 00 8B  42 B2 30 89 32 34 30 00  |:.......B.0.240.|
00000200: 2E 0A C8 00 99 4C 24 3B  3A 4B B2 58 3A 81 4A B2  |.....L$;:K.X:.J.|
00000210: 42 A4 31 A9 AB 31 3A 99  22 20 22 3B 41 24 28 4A  |B.1..1:." ";A$(J|
00000220: 29 3B 3A 58 24 B2 41 24  28 4A 29 AA 4C 24 00 56  |);:X$.A$(J).L$.V|
00000230: 0A D2 00 8B 58 24 28 4B  29 B1 B2 58 24 A7 58 24  |....X$(K)..X$.X$|
00000240: 28 4B AA 4A 29 B2 58 24  28 4B 29 3A 4B B2 4B AB  |(K.J).X$(K):K.K.|
00000250: 31 3A 89 32 31 30 00 74  0A DC 00 58 24 28 4B AA  |1:.210.t...X$(K.|
00000260: 4A 29 B2 58 24 3A 82 4A  3A 58 B2 58 AA 42 3A 99  |J).X$:.J:X.X.B:.|
00000270: 3A 42 B2 30 00 94 0A E6  00 8F 20 3A 20 47 45 54  |:B.0...... : GET|
00000280: 20 4E 45 58 54 20 4C 49  4E 45 2C 20 54 45 53 54  | NEXT LINE, TEST|
00000290: 20 45 4E 44 00 B5 0A F0  00 A1 23 31 2C 41 24 2C  | END......#1,A$,|
000002A0: 42 24 3A 8B C3 28 41 24  29 AA C3 28 42 24 29 B2  |B$:..(A$)..(B$).|
000002B0: 30 89 35 33 30 00 CB 0A  FA 00 8F 20 47 45 54 20  |0.530...... GET |
000002C0: 4C 49 4E 45 20 4E 55 4D  42 45 52 00 EB 0A 04 01  |LINE NUMBER.....|
000002D0: A1 23 31 2C 41 24 3A 4C  B2 C3 28 41 24 29 3A 8B  |.#1,A$:L..(A$):.|
000002E0: 4C B2 31 A7 4C B2 C6 28  41 24 29 00 0B 0B 0E 01  |L.1.L..(A$).....|
000002F0: A1 23 31 2C 41 24 3A 41  B2 C3 28 41 24 29 3A 8B  |.#1,A$:A..(A$):.|
00000300: 41 B2 31 A7 41 B2 C6 28  41 24 29 00 49 0B 18 01  |A.1.A..(A$).I...|
00000310: 43 B2 43 32 3A 43 31 B2  AB 31 3A 4C B2 41 AC 32  |C.C2:C1..1:L.A.2|
00000320: 35 36 AA 4C 3A 4C 24 B2  C4 28 4C 29 3A 8B C3 28  |56.L:L$..(L):..(|
00000330: 4C 24 29 B3 36 A7 4C 24  B2 C8 28 53 24 2C 36 AB  |L$).6.L$..(S$,6.|
00000340: C3 28 4C 24 29 29 AA 4C  24 00 5F 0B 22 01 8F 20  |.(L$)).L$._.".. |
00000350: 47 45 54 20 42 41 53 49  43 20 53 54 55 46 46 00  |GET BASIC STUFF.|
00000360: 7F 0B 2C 01 A1 23 31 2C  41 24 3A 41 B2 C3 28 41  |..,..#1,A$:A..(A|
00000370: 24 29 3A 8B 41 B2 31 A7  41 B2 C6 28 41 24 29 00  |$):.A.1.A..(A$).|
00000380: 96 0B 36 01 43 39 B2 43  28 41 29 3A 8B 43 39 B1  |..6.C9.C(A):.C9.|
00000390: 43 31 89 33 38 30 00 A7  0B 40 01 4B B2 30 3A 8B  |C1.380...@.K.0:.|
000003A0: 42 B2 30 89 33 36 30 00  C0 0B 4A 01 81 4A B2 31  |B.0.360...J..J.1|
000003B0: A4 42 3A 8B 41 24 28 4A  29 B2 4D 24 89 33 37 30  |.B:.A$(J).M$.370|
000003C0: 00 DA 0B 54 01 8B 41 24  28 4A 29 B3 4D 24 A7 82  |...T..A$(J).M$..|
000003D0: 4A 3A 4B B2 42 3A 89 33  36 30 00 F9 0B 5E 01 81  |J:K.B:.360...^..|
000003E0: 4B B2 42 A4 4A A9 AB 31  3A 41 24 28 4B AA 31 29  |K.B.J..1:A$(K.1)|
000003F0: B2 41 24 28 4B 29 3A 82  4B 00 0E 0C 68 01 42 B2  |.A$(K):.K...h.B.|
00000400: 42 AA 31 3A 41 24 28 4B  AA 31 29 B2 4D 24 00 23  |B.1:A$(K.1).M$.#|
00000410: 0C 72 01 43 B2 43 32 3A  43 31 B2 AB 31 3A 4D 24  |.r.C.C2:C1..1:M$|
00000420: B2 22 22 00 31 0C 7C 01  8B 43 32 B2 35 89 34 32  |."".1.|..C2.5.42|
00000430: 30 00 57 0C 86 01 8B 41  B2 31 33 37 B0 41 B2 31  |0.W....A.137.A.1|
00000440: 33 38 B0 41 B2 31 34 31  B0 41 B2 31 36 37 A7 43  |38.A.141.A.167.C|
00000450: B2 36 3A 89 34 37 30 00  6A 0C 90 01 8B 41 B2 34  |.6:.470.j....A.4|
00000460: 34 B0 41 B2 33 32 89 34  37 30 00 7E 0C 9A 01 8B  |4.A.32.470.~....|
00000470: 43 39 B3 B1 36 A7 43 B2  39 3A 89 34 37 30 00 92  |C9..6.C.9:.470..|
00000480: 0C A4 01 8B 43 39 B2 43  A7 43 B2 AB 31 3A 43 31  |....C9.C.C..1:C1|
00000490: B2 34 00 9F 0C AE 01 8B  43 B1 36 89 34 37 30 00  |.4......C.6.470.|
000004A0: BE 0C B8 01 8B 43 B3 30  AF 43 39 B1 43 31 AF 43  |.....C.0.C9.C1.C|
000004B0: 39 B1 36 A7 43 31 B2 43  39 3A 89 34 36 30 00 D9  |9.6.C1.C9:.460..|
000004C0: 0C C2 01 8B 43 32 B2 35  A7 8B C3 28 4D 24 29 B1  |....C2.5...(M$).|
000004D0: 32 B0 43 B1 30 89 34 37  30 00 E6 0C CC 01 4D 24  |2.C.0.470.....M$|
000004E0: B2 4D 24 AA 41 24 00 05  0D D6 01 91 43 39 AA 31  |.M$.A$......C9.1|
000004F0: 89 31 39 30 2C 34 38 30  2C 34 38 30 2C 34 38 30  |.190,480,480,480|
00000500: 3A 89 33 30 30 00 19 0D  E0 01 42 24 B2 42 24 28  |:.300.....B$.B$(|
00000510: 43 39 29 3A 43 24 B2 22  22 00 2F 0D EA 01 A1 23  |C9):C$.""./....#|
00000520: 31 2C 41 24 3A 8B 41 24  B2 22 22 89 31 39 30 00  |1,A$:.A$."".190.|
00000530: 3E 0D F4 01 8B 41 24 B2  42 24 89 33 30 30 00 4E  |>....A$.B$.300.N|
00000540: 0D FE 01 8B 41 24 B3 B1  51 24 89 34 39 30 00 69  |....A$..Q$.490.i|
00000550: 0D 08 02 41 24 B2 42 24  3A 42 24 B2 43 24 3A 43  |...A$.B$:B$.C$:C|
00000560: 24 B2 41 24 3A 89 34 39  30 00 7E 0D 12 02 A0 31  |$.A$:.490.~....1|
00000570: 3A 85 22 50 52 49 4E 54  45 52 22 3B 5A 24 00 9D  |:."PRINTER";Z$..|
00000580: 0D 1C 02 43 B2 33 3A 5A  B2 36 3A 8B C6 28 5A 24  |...C.3:Z.6:..(Z$|
00000590: 29 B2 38 39 A7 43 B2 34  3A 5A B2 31 32 00 CB 0D  |).89.C.4:Z.12...|
000005A0: 26 02 9F 32 2C 43 3A 98  32 2C 22 43 52 4F 53 53  |&..2,C:.2,"CROSS|
000005B0: 20 2D 20 52 45 46 45 52  45 4E 43 45 20 2D 20 50  | - REFERENCE - P|
000005C0: 52 4F 47 52 41 4D 20 22  3B 50 24 00 E5 0D 30 02  |ROGRAM ";P$...0.|
000005D0: 58 24 B2 22 22 3A 81 4A  B2 31 A4 58 3A 41 24 B2  |X$."":.J.1.X:A$.|
000005E0: 58 24 28 4A 29 00 09 0E  3A 02 81 4B B2 31 A4 C3  |X$(J)...:..K.1..|
000005F0: 28 41 24 29 3A 8B CA 28  41 24 2C 4B 2C 31 29 B3  |(A$):..(A$,K,1).|
00000600: B1 22 20 22 A7 82 4B 3A  90 00 32 0E 44 02 42 24  |." "..K:..2.D.B$|
00000610: B2 C8 28 41 24 2C 4B AB  31 29 3A 43 24 B2 CA 28  |..(A$,K.1):C$..(|
00000620: 41 24 2C 4B AA 31 29 3A  8B 58 24 B2 42 24 89 36  |A$,K.1):.X$.B$.6|
00000630: 30 30 00 58 0E 4E 02 98  32 3A 59 B2 30 3A 58 24  |00.X.N..2:Y.0:X$|
00000640: B2 42 24 3A 98 32 2C 58  24 3B C8 28 53 24 2C 35  |.B$:.2,X$;.(S$,5|
00000650: AB C3 28 58 24 29 29 3B  00 6B 0E 58 02 59 B2 59  |..(X$));.k.X.Y.Y|
00000660: AA 31 3A 8B 59 B3 5A 89  36 32 30 00 7D 0E 62 02  |.1:.Y.Z.620.}.b.|
00000670: 59 B2 31 3A 98 32 3A 98  32 2C 53 24 3B 00 96 0E  |Y.1:.2:.2,S$;...|
00000680: 6C 02 98 32 2C C8 28 53  24 2C 36 AB C3 28 43 24  |l..2,.(S$,6..(C$|
00000690: 29 29 3B 43 24 3B 00 A3  0E 76 02 82 4A 3A 98 32  |));C$;...v..J:.2|
000006A0: 3A A0 32 00 CF 0E BC 02  8F 20 43 52 4F 53 53 20  |:.2...... CROSS |
000006B0: 52 45 46 45 52 45 4E 43  45 20 48 41 53 20 41 20  |REFERENCE HAS A |
000006C0: 54 57 4F 46 4F 4C 44 20  50 55 52 50 4F 53 45 00  |TWOFOLD PURPOSE.|
000006D0: 18 0F C6 02 8F 20 31 2E  20 4C 49 53 54 20 54 41  |..... 1. LIST TA|
000006E0: 52 47 45 54 20 4C 49 4E  45 53 20 46 4F 52 20 54  |RGET LINES FOR T|
000006F0: 48 45 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |HE              |
00000700: 20 46 4F 4C 4C 4F 57 49  4E 47 20 20 53 54 41 54  | FOLLOWING  STAT|
00000710: 45 4D 45 4E 54 53 20 3A  00 63 0F CB 02 8F 20 20  |EMENTS :.c....  |
00000720: 20 20 47 4F 54 4F 2C 20  47 4F 53 55 42 2C 20 54  |  GOTO, GOSUB, T|
00000730: 48 45 4E 2C 20 4F 52 20  52 55 4E 20 20 20 20 20  |HEN, OR RUN     |
00000740: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000750: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000760: 20 20 3A 00 B2 0F D0 02  8F 20 32 2E 20 4C 49 53  |  :...... 2. LIS|
00000770: 54 20 4C 49 4E 45 4E 55  4D 42 45 52 53 20 49 4E  |T LINENUMBERS IN|
00000780: 20 57 48 49 43 48 20 20  20 20 20 20 20 20 20 20  | WHICH          |
00000790: 20 20 20 20 20 43 45 52  54 41 49 4E 20 56 41 52  |     CERTAIN VAR|
000007A0: 49 41 42 4C 45 53 20 41  52 45 20 50 52 45 53 45  |IABLES ARE PRESE|
000007B0: 4E 54 00 F2 0F D5 02 8F  20 20 20 4E 4F 54 45 20  |NT......   NOTE |
000007C0: 54 48 41 54 20 56 41 52  49 41 42 4C 45 53 20 41  |THAT VARIABLES A|
000007D0: 52 45 20 53 4F 52 54 45  44 20 20 20 20 20 20 20  |RE SORTED       |
000007E0: 20 20 20 41 4C 50 48 41  42 45 54 49 43 41 4C 4C  |   ALPHABETICALL|
000007F0: 59 21 00 2E 10 DA 02 8F  20 53 49 4E 43 45 20 54  |Y!...... SINCE T|
00000800: 48 45 20 50 52 4F 47 52  41 4D 20 49 53 20 49 4E  |HE PROGRAM IS IN|
00000810: 20 42 41 53 49 43 20 49  54 20 20 20 20 20 20 20  | BASIC IT       |
00000820: 20 49 53 20 53 4C 4C 4F  4F 4F 57 57 21 21 00 51  | IS SLLOOOWW!!.Q|
00000830: 10 E4 02 8F 20 49 54 20  49 53 2C 20 48 4F 57 45  |.... IT IS, HOWE|
00000840: 56 45 52 2C 20 56 45 52  59 20 55 53 45 46 55 4C  |VER, VERY USEFUL|
00000850: 21 00 6F 10 EE 02 8F 20  41 53 20 4F 46 20 4E 4F  |!.o.... AS OF NO|
00000860: 56 45 4D 42 45 52 20 31  31 2C 20 31 39 38 33 00  |VEMBER 11, 1983.|
00000870: A7 10 F8 02 8F 20 41 44  41 50 54 49 4F 4E 20 46  |..... ADAPTION F|
00000880: 4F 52 20 43 42 4D 36 34  2C 20 43 4F 4D 4D 45 4E  |OR CBM64, COMMEN|
00000890: 54 20 41 4E 44 20 4B 45  59 49 4E 47 20 53 50 20  |T AND KEYING SP |
000008A0: 44 45 20 4A 4F 4E 47 00  00 00 15                 |DE JONG....     |
..-.... FROM COMPUTE!'S FIRST BOOK OF PE
T/CBM.[.... PROGRAM BY JIM BUTTERFIELD (
WHO ELSE?!).W.... PAGES 146 THROUGH 150.
}.(... .D.. A$(15),B$(3),X$(1500),C(255)
.J.N..".CROSS-REFERENCE    JIM BUTTERFIE
LD...X.Q$.G(34):S$."     ":B$(1).Q$:B$(3
).G(58).(...."VARIABLES OR LINES";Z$:C2.
5:.F(Z$).76.C2.6.R....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(143).2:C(131).3.U...."PROGRAM N
AME";P$:.1,8,3,"0:".P$.",P,R"......#1,A$
,B$:.F(B$)..8. 1:.......B.0.240...H..L$;
:K.X:.J.B.1..1:." ";A$(J);:X$.A$(J).L$.V
.R..X$(K)..X$.X$(K.J).X$(K):K.K.1:.210.T
...X$(K.J).X$:.J:X.X.B:.:B.0...... : GET
 NEXT LINE, TEST END......#1,A$,B$:.C(A$
).C(B$).0.530.K.... GET LINE NUMBER.....
.#1,A$:L.C(A$):.L.1.L.F(A$)......#1,A$:A
.C(A$):.A.1.A.F(A$).I...C.C2:C1..1:L.A.2
56.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$)...6.C9.C(A):.C9.C1.380..
.@.K.0:.B.0.360...J..J.1.B:.A$(J).M$.370
.Z.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$.#
.R.C.C2:C1..1:M$."".1.|..C2.5.420.W....A
.137.A.138.A.141.A.167.C.6:.470.J....A.4
4.A.32.470.~....C9..6.C.9:.470......C9.C
.C..1:C1.4......C.6.470......C.0.C9.C1.C
9.6.C1.C9:.460.Y.B..C2.5..C(M$).2.C.0.47
0...L.M$.M$.A$...V..C9.1.190,480,480,480
:.300.....B$.B$(C9):C$.""./....#1,A$:.A$
."".190.>....A$.B$.300.N....A$..Q$.490.I
...A$.B$:B$.C$:C$.A$:.490.~... 1:."PRINT
ER";Z$.....C.3:Z.6:.F(Z$).89.C.4:Z.12.K.
&..2,C:.2,"CROSS - REFERENCE - PROGRAM "
;P$...0.X$."":.J.1.X:A$.X$(J)...:..K.1.C
(A$):.J(A$,K,1).." "..K:..2.D.B$.H(A$,K.
1):C$.J(A$,K.1):.X$.B$.600.X.N..2:Y.0:X$
.B$:.2,X$;H(S$,5.C(X$));.K.X.Y.Y.1:.Y.Z.
620.}.B.Y.1:.2:.2,S$;...L..2,H(S$,6.C(C$
));C$;...V..J:.2: 2.O.... CROSS REFERENC
E HAS A TWOFOLD PURPOSE...F.. 1. LIST TA
RGET LINES FOR THE               FOLLOWI
NG  STATEMENTS :.C.K..    GOTO, GOSUB, T
HEN, OR RUN                             
          :...P.. 2. LIST LINENUMBERS IN
 WHICH               CERTAIN VARIABLES A
RE PRESENT...U..   NOTE THAT VARIABLES A
RE SORTED          ALPHABETICALLY!...Z..
 SINCE THE PROGRAM IS IN BASIC IT       
 IS SLLOOOWW!!.Q.... IT IS, HOWEVER, VER
Y USEFUL!.O.... AS OF NOVEMBER 11, 1983.
..... ADAPTION FOR CBM64, COMMENT AND KE
YING SP DE JONG....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL