TB/KEYWORDS
FILE INFORMATION
FILENAME(S): TB/KEYWORDS
FILE TYPE(S): PRG
FILE SIZE: 735b
FIRST SEEN: 2025-11-30 16:59:31
APPEARS ON: 1 disk(s)
FILE HASH
749d05e298704dae0286a5a99fb59641615ab807b43ce91540cbb59da5abe30b
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| BASIC UTILITIES | TB/KEYWORDS | PRG | High Voltage Complete C64 Collection | 9 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1B 08 00 00 8F 20 4B 45 59 57 4F 52 44 53 |....... KEYWORDS| 00000010: 28 41 55 47 32 35 2F 38 34 29 3A 00 21 08 01 00 |(AUG25/84):.!...| 00000020: 3A 00 3F 08 02 00 8F 20 31 20 53 54 41 54 45 4D |:.?.... 1 STATEM| 00000030: 45 4E 54 2C 30 20 46 55 4E 43 54 49 4F 4E 53 00 |ENT,0 FUNCTIONS.| 00000040: 45 08 03 00 3A 00 61 08 04 00 8F 20 4B 45 59 57 |E...:.a.... KEYW| 00000050: 4F 52 44 20 43 48 41 52 41 43 54 45 52 53 3A 20 |ORD CHARACTERS: | 00000060: 38 00 67 08 05 00 3A 00 8C 08 06 00 8F 20 4B 45 |8.g...:...... KE| 00000070: 59 57 4F 52 44 20 20 52 4F 55 54 49 4E 45 20 20 |YWORD ROUTINE | 00000080: 4C 49 4E 45 20 20 20 20 53 45 52 23 00 B0 08 07 |LINE SER#....| 00000090: 00 8F 20 4B 45 59 57 4F 52 44 53 20 4B 57 52 44 |.. KEYWORDS KWRD| 000000A0: 53 20 20 20 20 34 39 34 30 20 20 20 20 30 35 39 |S 4940 059| 000000B0: 00 B6 08 08 00 3A 00 BC 08 0A 00 3A 00 CE 08 74 |.....:.....:...t| 000000C0: 00 2E C6 20 22 4B 45 59 57 4F 52 44 D3 22 00 DF |... "KEYWORD."..| 000000D0: 08 5C 04 2E 57 B0 44 20 4B 57 52 44 53 AB 31 00 |.\..W.D KWRDS.1.| 000000E0: F8 08 4C 13 4B 57 52 44 53 20 4A 53 52 20 24 41 |..L.KWRDS JSR $A| 000000F0: 41 44 37 20 3B 99 20 8E 00 14 09 4E 13 4C 44 59 |AD7 ;. ....N.LDY| 00000100: 20 23 30 20 20 20 20 3B 4B 45 59 57 B0 44 20 49 | #0 ;KEYW.D I| 00000110: 4E 44 45 58 00 38 09 50 13 4B 57 52 31 20 20 4C |NDEX.8.P.KWR1 L| 00000120: 44 58 20 23 30 20 20 20 20 3B 43 4F 4C 55 4D 4E |DX #0 ;COLUMN| 00000130: 20 43 4F 55 4E 54 45 52 00 5B 09 52 13 4B 57 52 | COUNTER.[.R.KWR| 00000140: 32 20 20 4C 44 41 20 53 4B 57 2C 59 20 3B A1 20 |2 LDA SKW,Y ;. | 00000150: 4B 45 59 57 B0 44 20 43 48 41 52 00 76 09 54 13 |KEYW.D CHAR.v.T.| 00000160: 42 45 51 20 4B 57 52 34 20 20 3B 53 4B 49 50 20 |BEQ KWR4 ;SKIP | 00000170: 41 54 20 9B 20 80 00 92 09 56 13 50 48 50 20 20 |AT . ....V.PHP | 00000180: 20 20 20 20 20 3B 94 20 53 54 41 54 55 53 20 52 | ;. STATUS R| 00000190: 45 47 00 AF 09 58 13 AF 20 23 24 37 46 20 20 3B |EG...X.. #$7F ;| 000001A0: 4D 41 4B 45 20 4C 4F 57 45 52 20 43 41 53 45 00 |MAKE LOWER CASE.| 000001B0: CA 09 5A 13 4A 53 52 20 24 41 42 34 37 20 3B 99 |..Z.JSR $AB47 ;.| 000001C0: 20 43 48 41 52 41 43 54 45 52 00 E9 09 5C 13 49 | CHARACTER...\.I| 000001D0: 4E 59 20 20 20 20 20 20 20 3B 42 55 4D 50 20 4B |NY ;BUMP K| 000001E0: 57 B0 44 20 49 4E 44 45 58 00 09 0A 5E 13 49 4E |W.D INDEX...^.IN| 000001F0: 58 20 20 20 20 20 20 20 3B 42 55 4D 50 20 43 4F |X ;BUMP CO| 00000200: 4C 20 43 4F 55 4E 54 45 52 00 21 0A 60 13 50 4C |L COUNTER.!.`.PL| 00000210: 50 20 20 20 20 20 20 20 3B 4C 4F 4F 50 20 8B 20 |P ;LOOP . | 00000220: A8 00 39 0A 62 13 42 50 4C 20 4B 57 52 32 20 20 |..9.b.BPL KWR2 | 00000230: 3B 80 20 4F 46 20 57 B0 44 00 59 0A 64 13 4B 57 |;. OF W.D.Y.d.KW| 00000240: 52 33 20 20 43 50 58 20 23 24 30 41 20 20 3B 99 |R3 CPX #$0A ;.| 00000250: 20 53 50 41 43 45 53 20 A4 00 76 0A 66 13 42 45 | SPACES ..v.f.BE| 00000260: 51 20 4B 57 52 31 20 20 3B 50 41 44 20 A4 20 31 |Q KWR1 ;PAD . 1| 00000270: 30 20 B0 20 32 30 00 8D 0A 68 13 43 50 58 20 23 |0 . 20...h.CPX #| 00000280: 24 31 34 20 20 3B 43 4F 4C 55 4D 4E 53 00 9A 0A |$14 ;COLUMNS...| 00000290: 6A 13 42 45 51 20 4B 57 52 31 00 A8 0A 6C 13 4A |j.BEQ KWR1...l.J| 000002A0: 53 52 20 24 41 42 33 46 00 B0 0A 6E 13 49 4E 58 |SR $AB3F...n.INX| 000002B0: 00 BD 0A 70 13 42 4E 45 20 4B 57 52 33 00 D6 0A |...p.BNE KWR3...| 000002C0: 72 13 4B 57 52 34 20 20 4A 4D 50 20 24 41 41 44 |r.KWR4 JMP $AAD| 000002D0: 37 20 3B 99 20 8E 00 DC 0A 74 13 3B 00 00 00 |7 ;. ....t.;... |
....... KEYWORDS(AUG25/84):.!...:.?.... 1 STATEMENT,0 FUNCTIONS.E...:.A.... KEYW ORD CHARACTERS: 8.G...:...... KEYWORD R OUTINE LINE SER#...... KEYWORDS KWRD S 4940 059.....:.....:.N.T..F "KEY WORDS"...\..W.D KWRDS.1...L.KWRDS JSR $A AD7 ;. ....N.LDY #0 ;KEYW.D INDEX.8.P .KWR1 LDX #0 ;COLUMN COUNTER.[.R.KWR 2 LDA SKW,Y ;. KEYW.D CHAR.V.T.BEQ KWR4 ;SKIP AT . ....V.PHP ;. STATUS R EG...X.. #$7F ;MAKE LOWER CASE.J.Z.JSR $AB47 ;. CHARACTER...\.INY ;BUMP K W.D INDEX...^.INX ;BUMP COL COUNTE R.!.`.PLP ;LOOP . ..9.B.BPL KWR2 ;. OF W.D.Y.D.KWR3 CPX #$0A ;. SPACES ..V.F.BEQ KWR1 ;PAD . 10 . 20...H.CPX # $14 ;COLUMNS...J.BEQ KWR1...L.JSR $AB3F ...N.INX...P.BNE KWR3.V.R.KWR4 JMP $AAD 7 ;. ....T.;...
> CLICK IMAGE PREVIEW FOR FULL MODAL