LABELS
FILE INFORMATION
FILENAME(S): LABELS
FILE TYPE(S): PRG
FILE SIZE: 2.5K
FIRST SEEN: 2025-11-30 21:12:22
APPEARS ON: 1 disk(s)
FILE HASH
eb2afc6b086ee1de725794ad677ff267c1ae82f290cc74e6b4d066ef9c0f73b2
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| RANS ISK2 | LABELS | PRG | DuncanTwain | 10 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 29 08 00 00 8F 20 4C 41 42 45 4C 53 20 28 |..).... LABELS (| 00000010: 4A 2E 20 47 49 4C 4C 41 53 50 49 45 20 33 2F 38 |J. GILLASPIE 3/8| 00000020: 35 29 20 20 20 20 20 20 3A 00 2F 08 01 00 3A 00 |5) :./...:.| 00000030: 4F 08 02 00 8F 20 35 20 53 54 41 54 45 4D 45 4E |O.... 5 STATEMEN| 00000040: 54 53 2C 20 30 20 46 55 4E 43 54 49 4F 4E 53 00 |TS, 0 FUNCTIONS.| 00000050: 55 08 03 00 3A 00 72 08 04 00 8F 20 4B 45 59 57 |U...:.r.... KEYW| 00000060: 4F 52 44 20 43 48 41 52 41 43 54 45 52 53 3A 20 |ORD CHARACTERS: | 00000070: 32 34 00 78 08 05 00 3A 00 A0 08 06 00 8F 20 4B |24.x...:...... K| 00000080: 45 59 57 4F 52 44 20 20 20 20 20 52 4F 55 54 49 |EYWORD ROUTI| 00000090: 4E 45 20 20 4C 49 4E 45 20 20 20 53 45 52 20 23 |NE LINE SER #| 000000A0: 00 C7 08 07 00 8F 20 4C 2E 20 20 20 20 20 20 20 |...... L. | 000000B0: 20 20 20 3D 27 44 41 54 41 27 20 20 24 41 44 46 | ='DATA' $ADF| 000000C0: 38 20 20 20 30 37 33 00 EE 08 08 00 8F 20 4C 47 |8 073...... LG| 000000D0: 4F 54 4F 20 20 20 20 20 20 20 4C 47 4F 54 20 20 |OTO LGOT | 000000E0: 20 20 20 35 39 32 34 20 20 20 20 30 37 34 00 15 | 5924 074..| 000000F0: 09 09 00 8F 20 4C 47 4F 53 55 42 20 20 20 20 20 |.... LGOSUB | 00000100: 20 4C 47 4F 53 55 20 20 20 20 35 38 37 30 20 20 | LGOSU 5870 | 00000110: 20 20 30 37 35 00 3B 09 0A 00 8F 20 53 47 4F 54 | 075.;.... SGOT| 00000120: 4F 20 20 20 20 20 20 53 47 4F 54 20 20 20 20 20 |O SGOT | 00000130: 35 39 32 30 20 20 20 20 30 37 36 00 61 09 0B 00 |5920 076.a...| 00000140: 8F 20 53 47 4F 53 55 42 20 20 20 20 20 53 47 4F |. SGOSUB SGO| 00000150: 53 55 20 20 20 20 35 38 36 36 20 20 20 20 30 37 |SU 5866 07| 00000160: 37 00 67 09 0C 00 3A 00 8E 09 0D 00 8F 20 3D 3D |7.g...:...... ==| 00000170: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================| 00000180: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 94 |==============..| 00000190: 09 0E 00 3A 00 B8 09 78 00 2E 42 59 54 45 20 24 |...:...x..BYTE $| 000001A0: 34 43 2C 24 41 45 3A 20 2E C6 20 22 4C 47 4F 54 |4C,$AE: .. "LGOT| 000001B0: CF 4C 47 4F 53 55 C2 22 00 CD 09 79 00 2E C6 20 |.LGOSU."...y... | 000001C0: 22 53 47 4F 54 CF 53 47 4F 53 55 C2 22 00 E9 09 |"SGOT.SGOSU."...| 000001D0: 60 04 2E 57 B0 44 20 24 41 38 46 37 2C 4C CB 54 |`..W.D $A8F7,L.T| 000001E0: AB 31 2C 4C CB 53 55 AB 31 00 FF 09 61 04 2E 57 |.1,L.SU.1...a..W| 000001F0: B0 44 20 53 CB 54 AB 31 2C 53 CB 53 55 AB 31 00 |.D S.T.1,S.SU.1.| 00000200: 0C 0A EA 16 53 CB 53 55 20 53 45 43 00 1A 0A EC |....S.SU SEC....| 00000210: 16 2E 42 59 54 45 20 24 32 34 00 27 0A EE 16 4C |..BYTE $24.'...L| 00000220: CB 53 55 20 43 4C 43 00 38 0A F0 16 52 B0 20 54 |.SU CLC.8...R. T| 00000230: 36 20 20 20 20 20 20 20 00 4A 0A F2 16 4C 44 41 |6 .J...LDA| 00000240: 20 23 24 46 46 20 20 20 20 20 00 55 0A F4 16 53 | #$FF .U...S| 00000250: 54 41 20 54 35 00 67 0A F6 16 4C 44 41 20 23 33 |TA T5.g...LDA #3| 00000260: 20 20 20 20 20 20 20 00 79 0A F8 16 4A 53 52 20 | .y...JSR | 00000270: 24 41 33 46 42 20 20 20 20 00 8B 0A FA 16 4C 44 |$A3FB .....LD| 00000280: 41 20 24 37 42 20 20 20 20 20 20 00 93 0A FC 16 |A $7B .....| 00000290: 50 48 41 00 9F 0A FE 16 4C 44 41 20 24 37 41 00 |PHA.....LDA $7A.| 000002A0: A7 0A 00 17 50 48 41 00 B9 0A 02 17 42 49 54 20 |....PHA.....BIT | 000002B0: 54 36 20 20 20 20 20 20 20 00 C6 0A 04 17 42 50 |T6 .....BP| 000002C0: 4C 20 4C CB 53 31 00 D8 0A 06 17 4A 53 52 20 53 |L L.S1.....JSR S| 000002D0: 47 53 54 52 20 20 20 20 00 EB 0A 08 17 4C CB 53 |GSTR .....L.S| 000002E0: 31 20 4C 44 41 20 24 33 41 20 20 00 F3 0A 0A 17 |1 LDA $3A .....| 000002F0: 50 48 41 00 FF 0A 0C 17 4C 44 41 20 24 33 39 00 |PHA.....LDA $39.| 00000300: 07 0B 0E 17 50 48 41 00 1B 0B 10 17 4C 44 41 20 |....PHA.....LDA | 00000310: 23 24 38 44 20 20 20 20 20 20 20 00 23 0B 12 17 |#$8D .#...| 00000320: 50 48 41 00 2F 0B 14 17 4A 53 52 20 24 37 39 00 |PHA./...JSR $79.| 00000330: 40 0B 16 17 44 45 59 20 20 20 20 20 20 20 20 20 |@...DEY | 00000340: 00 51 0B 18 17 44 45 59 20 20 20 20 20 20 20 20 |.Q...DEY | 00000350: 20 00 61 0B 1A 17 4A 53 52 20 4C CB 54 31 20 20 | .a...JSR L.T1 | 00000360: 20 00 72 0B 1C 17 4A 4D 50 20 24 41 37 41 45 20 | .r...JMP $A7AE | 00000370: 20 20 00 78 0B 1E 17 3B 00 84 0B 20 17 53 CB 54 | .x...;... .S.T| 00000380: 20 53 45 43 00 92 0B 22 17 2E 42 59 54 45 20 24 | SEC..."..BYTE $| 00000390: 32 34 00 9E 0B 24 17 4C CB 54 20 43 4C 43 00 AE |24...$.L.T CLC..| 000003A0: 0B 26 17 52 B0 20 54 36 20 20 20 20 20 20 00 BF |.&.R. T6 ..| 000003B0: 0B 28 17 4C 44 41 20 23 24 46 46 20 20 20 20 00 |.(.LDA #$FF .| 000003C0: CA 0B 2A 17 53 54 41 20 54 35 00 DB 0B 2C 17 42 |..*.STA T5...,.B| 000003D0: 49 54 20 54 36 20 20 20 20 20 20 00 E8 0B 2E 17 |IT T6 .....| 000003E0: 42 50 4C 20 4C CB 54 31 00 F9 0B 30 17 4A 53 52 |BPL L.T1...0.JSR| 000003F0: 20 53 47 53 54 52 20 20 20 00 09 0C 32 17 4C CB | SGSTR ...2.L.| 00000400: 54 31 20 44 45 59 20 20 20 00 1A 0C 34 17 44 45 |T1 DEY ...4.DE| 00000410: 59 20 20 20 20 20 20 20 20 20 00 2B 0C 36 17 54 |Y .+.6.T| 00000420: 59 41 20 20 20 20 20 20 20 20 20 00 3C 0C 38 17 |YA .<.8.| 00000430: 4C 53 52 20 20 20 20 20 20 20 20 20 00 48 0C 3A |LSR .H.:| 00000440: 17 B0 41 20 23 24 34 30 00 53 0C 3C 17 53 54 41 |..A #$40.S.<.STA| 00000450: 20 54 34 00 60 0C 3E 17 43 4D 50 20 23 24 35 44 | T4.`.>.CMP #$5D| 00000460: 00 6D 0C 40 17 42 43 43 20 4C CB 54 32 00 78 0C |.m.@.BCC L.T2.x.| 00000470: 42 17 49 4E 43 20 54 34 00 8B 0C 44 17 4C CB 54 |B.INC T4...D.L.T| 00000480: 32 20 4C 44 41 20 24 37 41 20 20 00 96 0C 46 17 |2 LDA $7A ...F.| 00000490: 53 54 41 20 54 32 00 A2 0C 48 17 4C 44 41 20 24 |STA T2...H.LDA $| 000004A0: 37 42 00 AD 0C 4A 17 53 54 41 20 54 33 00 BE 0C |7B...J.STA T3...| 000004B0: 4C 17 4C 44 41 20 24 32 42 20 20 20 20 20 00 CA |L.LDA $2B ..| 000004C0: 0C 4E 17 4C 44 58 20 24 32 43 00 DB 0C 50 17 4C |.N.LDX $2C...P.L| 000004D0: 44 59 20 23 31 20 20 20 20 20 20 00 EE 0C 52 17 |DY #1 ...R.| 000004E0: 4C CB 54 33 20 53 54 41 20 24 35 46 20 20 00 02 |L.T3 STA $5F ..| 000004F0: 0D 54 17 53 54 58 20 24 36 30 20 20 20 20 20 20 |.T.STX $60 | 00000500: 20 20 00 13 0D 56 17 4C 44 41 20 28 24 35 46 29 | ...V.LDA ($5F)| 00000510: 2C 59 20 00 23 0D 58 17 42 45 51 20 4C CB 54 31 |,Y .#.X.BEQ L.T1| 00000520: 30 20 20 00 34 0D 5A 17 4C 44 59 20 23 34 20 20 |0 .4.Z.LDY #4 | 00000530: 20 20 20 20 00 45 0D 5C 17 4C 44 41 20 28 24 35 | .E.\.LDA ($5| 00000540: 46 29 2C 59 20 00 56 0D 5E 17 43 4D 50 20 23 24 |F),Y .V.^.CMP #$| 00000550: 35 46 20 20 20 20 00 66 0D 60 17 42 4E 45 20 4C |5F .f.`.BNE L| 00000560: CB 54 39 20 20 20 00 77 0D 62 17 49 4E 59 20 20 |.T9 .w.b.INY | 00000570: 20 20 20 20 20 20 20 00 88 0D 64 17 4C 44 41 20 | ...d.LDA | 00000580: 28 24 35 46 29 2C 59 20 00 99 0D 66 17 43 4D 50 |($5F),Y ...f.CMP| 00000590: 20 54 34 20 20 20 20 20 20 00 A9 0D 68 17 42 4E | T4 ...h.BN| 000005A0: 45 20 4C CB 54 39 20 20 20 00 B9 0D 6A 17 4C CB |E L.T9 ...j.L.| 000005B0: 54 34 20 49 4E 59 20 20 20 00 C9 0D 6C 17 4C 44 |T4 INY ...l.LD| 000005C0: 41 20 28 24 35 46 29 2C 59 00 D6 0D 6E 17 43 4D |A ($5F),Y...n.CM| 000005D0: 50 20 23 24 32 30 00 E3 0D 70 17 42 45 51 20 4C |P #$20...p.BEQ L| 000005E0: CB 54 34 00 F4 0D 72 17 4C 44 58 20 54 35 20 20 |.T4...r.LDX T5 | 000005F0: 20 20 20 20 00 05 0E 74 17 4A 53 52 20 24 37 39 | ...t.JSR $79| 00000600: 20 20 20 20 20 00 1A 0E 76 17 4C CB 54 35 20 43 | ...v.L.T5 C| 00000610: 4D 50 20 28 24 35 46 29 2C 59 00 2A 0E 78 17 42 |MP ($5F),Y.*.x.B| 00000620: 4E 45 20 4C CB 54 39 20 20 20 00 3B 0E 7A 17 49 |NE L.T9 .;.z.I| 00000630: 4E 59 20 20 20 20 20 20 20 20 20 00 43 0E 7C 17 |NY .C.|.| 00000640: 44 45 58 00 50 0E 7E 17 42 45 51 20 4C CB 54 36 |DEX.P.~.BEQ L.T6| 00000650: 00 5C 0E 80 17 4A 53 52 20 24 37 33 00 6C 0E 82 |.\...JSR $73.l..| 00000660: 17 42 4E 45 20 4C CB 54 35 20 20 20 00 81 0E 84 |.BNE L.T5 ....| 00000670: 17 4C CB 54 36 20 4C 44 41 20 28 24 35 46 29 2C |.L.T6 LDA ($5F),| 00000680: 59 00 94 0E 86 17 42 45 51 20 4C CB 54 37 20 20 |Y.....BEQ L.T7 | 00000690: 20 20 20 20 00 9C 0E 88 17 49 4E 59 00 B0 0E 8A | .....INY....| 000006A0: 17 43 4D 50 20 23 24 32 30 20 20 20 20 20 20 20 |.CMP #$20 | 000006B0: 00 BD 0E 8C 17 42 45 51 20 4C CB 54 36 00 C5 0E |.....BEQ L.T6...| 000006C0: 8E 17 44 45 59 00 D9 0E 90 17 43 4D 50 20 23 22 |..DEY.....CMP #"| 000006D0: 3A 22 20 20 20 20 20 20 20 00 EC 0E 92 17 42 4E |:" .....BN| 000006E0: 45 20 4C CB 54 39 20 20 20 20 20 20 00 12 0F 94 |E L.T9 ....| 000006F0: 17 4C CB 54 37 20 4C 44 59 20 23 32 3A 20 4C 44 |.L.T7 LDY #2: LD| 00000700: 41 20 28 24 35 46 29 2C 59 3A 20 53 54 41 20 24 |A ($5F),Y: STA $| 00000710: 33 39 00 39 0F 95 17 49 4E 59 3A 20 4C 44 41 20 |39.9...INY: LDA | 00000720: 28 24 35 46 29 2C 59 3A 20 53 54 41 20 24 33 41 |($5F),Y: STA $3A| 00000730: 3A 20 4C 44 41 20 24 35 46 00 45 0F 96 17 4C 44 |: LDA $5F.E...LD| 00000740: 58 20 24 36 30 00 4D 0F 98 17 43 4C 43 00 61 0F |X $60.M...CLC.a.| 00000750: 9A 17 41 44 43 20 23 34 20 20 20 20 20 20 20 20 |..ADC #4 | 00000760: 20 00 6E 0F 9C 17 42 43 43 20 4C CB 54 38 00 76 | .n...BCC L.T8.v| 00000770: 0F 9E 17 49 4E 58 00 87 0F A0 17 4C CB 54 38 20 |...INX.....L.T8 | 00000780: 53 54 41 20 24 37 41 00 93 0F A2 17 53 54 58 20 |STA $7A.....STX | 00000790: 24 37 42 00 A5 0F A4 17 4A 4D 50 20 24 41 38 46 |$7B.....JMP $A8F| 000007A0: 38 20 20 20 20 00 B6 0F A6 17 4C CB 54 39 20 4C |8 .....L.T9 L| 000007B0: 44 41 20 54 32 20 00 C8 0F A8 17 53 54 41 20 24 |DA T2 .....STA $| 000007C0: 37 41 20 20 20 20 20 20 00 D3 0F AA 17 4C 44 41 |7A .....LDA| 000007D0: 20 54 33 00 DF 0F AC 17 53 54 41 20 24 37 42 00 | T3.....STA $7B.| 000007E0: F1 0F AE 17 4C 44 59 20 23 31 20 20 20 20 20 20 |....LDY #1 | 000007F0: 20 00 03 10 B0 17 4C 44 41 20 28 24 35 46 29 2C | .....LDA ($5F),| 00000800: 59 20 20 00 0B 10 B2 17 54 41 58 00 13 10 B4 17 |Y .....TAX.....| 00000810: 44 45 59 00 26 10 B6 17 4C 44 41 20 28 24 35 46 |DEY.&...LDA ($5F| 00000820: 29 2C 59 20 20 20 00 2E 10 B8 17 49 4E 59 00 40 |),Y .....INY.@| 00000830: 10 BA 17 42 4E 45 20 4C CB 54 33 20 20 20 20 20 |...BNE L.T3 | 00000840: 00 52 10 BC 17 4C CB 54 31 30 20 42 49 54 20 54 |.R...L.T10 BIT T| 00000850: 36 20 00 64 10 BE 17 42 50 4C 20 4C CB 54 31 31 |6 .d...BPL L.T11| 00000860: 20 20 20 20 00 77 10 C0 17 43 4C 43 20 20 20 20 | .w...CLC | 00000870: 20 20 20 20 20 20 20 00 81 10 C2 17 52 B0 20 54 | .....R. T| 00000880: 36 00 94 10 C4 17 4C 44 41 20 23 B3 54 52 50 53 |6.....LDA #.TRPS| 00000890: 54 52 20 20 00 A5 10 C6 17 4C 44 59 20 23 B1 54 |TR .....LDY #.T| 000008A0: 52 50 53 54 52 00 B1 10 C8 17 53 54 41 20 24 37 |RPSTR.....STA $7| 000008B0: 41 00 BD 10 CA 17 53 54 59 20 24 37 42 00 C8 10 |A.....STY $7B...| 000008C0: CC 17 4C 44 59 20 23 36 00 D3 10 CE 17 53 54 59 |..LDY #6.....STY| 000008D0: 20 54 35 00 E0 10 D0 17 4A 4D 50 20 4C CB 54 32 | T5.....JMP L.T2| 000008E0: 00 F5 10 D2 17 4C CB 54 31 31 20 4A 4D 50 20 24 |.....L.T11 JMP $| 000008F0: 41 38 45 33 20 00 0C 11 D4 17 54 52 50 53 54 52 |A8E3 .....TRPSTR| 00000900: 20 2E C6 20 22 44 46 41 55 4C 54 22 00 1F 11 D6 | .. "DFAULT"....| 00000910: 17 53 47 53 54 52 20 53 54 59 20 24 31 34 20 00 |.SGSTR STY $14 .| 00000920: 31 11 D8 17 4A 53 52 20 24 41 44 39 45 20 20 20 |1...JSR $AD9E | 00000930: 20 00 43 11 DA 17 4A 53 52 20 24 42 36 41 33 20 | .C...JSR $B6A3 | 00000940: 20 20 20 00 55 11 DC 17 53 54 41 20 54 35 20 20 | .U...STA T5 | 00000950: 20 20 20 20 20 00 67 11 DE 17 53 54 58 20 24 37 | .g...STX $7| 00000960: 41 20 20 20 20 20 20 00 79 11 E0 17 53 54 59 20 |A .y...STY | 00000970: 24 37 42 20 20 20 20 20 20 00 8B 11 E2 17 4C 44 |$7B .....LD| 00000980: 59 20 24 31 34 20 20 20 20 20 20 00 9D 11 E4 17 |Y $14 .....| 00000990: 44 45 59 20 20 20 20 20 20 20 20 20 20 00 AF 11 |DEY ...| 000009A0: E6 17 44 45 59 20 20 20 20 20 20 20 20 20 20 00 |..DEY .| 000009B0: B7 11 E8 17 44 45 59 00 BF 11 EA 17 44 45 59 00 |....DEY.....DEY.| 000009C0: D1 11 EC 17 53 45 43 20 20 20 20 20 20 20 20 20 |....SEC | 000009D0: 20 00 DB 11 EE 17 52 B0 20 54 36 00 E3 11 F0 17 | .....R. T6.....| 000009E0: 52 54 53 00 E9 11 F2 17 3B 00 00 00 |RTS.....;... |
..).... LABELS (J. GILLASPIE 3/85)
:./...:.O.... 5 STATEMENTS, 0 FUNCTIONS.
U...:.R.... KEYWORD CHARACTERS: 24.X...:
. .... KEYWORD ROUTINE LINE SER #
.G.... L. ='DATA' $ADF8 073.
..... LGOTO LGOT 5924 074..
.... LGOSUB LGOSU 5870 075.;.
... SGOTO SGOT 5920 076.A...
. SGOSUB SGOSU 5866 077.G...:.
..... ================================..
...:...X..BYTE $4C,$AE: .F "LGOTOLGOSUB"
.M.Y..F "SGOTOSGOSUB"...`..W.D $A8F7,LKT
.1,LKSU.1...A..W.D SKT.1,SKSU.1.....SKSU
SEC......BYTE $24.'...LKSU CLC.8...R. T
6 .J...LDA #$FF .U...STA T5.G.
..LDA #3 .Y...JSR $A3FB .....LD
A $7B .....PHA.....LDA $7A.....PHA.
....BIT T6 .F...BPL LKS1.X...JSR S
GSTR .....LKS1 LDA $3A .....PHA.....
LDA $39.....PHA.....LDA #$8D .#...
PHA./...JSR $79.@...DEY .Q...DEY
.A...JSR LKT1 .R...JMP $A7AE
.X...;... .SKT SEC..."..BYTE $24...$.L
KT CLC...&.R. T6 ...(.LDA #$FF .
J.*.STA T5...,.BIT T6 .....BPL LKT1
...0.JSR SGSTR ...2.LKT1 DEY ...4.DE
Y .+.6.TYA .<.8.LSR
.H.:..A #$40.S.<.STA T4.`.>.CMP #$5D
.M.@.BCC LKT2.X.B.INC T4...D.LKT2 LDA $7
A ...F.STA T2...H.LDA $7B...J.STA T3...
L.LDA $2B .J.N.LDX $2C...P.LDY #1
...R.LKT3 STA $5F ...T.STX $60
...V.LDA ($5F),Y .#.X.BEQ LKT10 .4.Z.
LDY #4 .E.\.LDA ($5F),Y .V.^.CMP #$
5F .F.`.BNE LKT9 .W.B.INY .
..D.LDA ($5F),Y ...F.CMP T4 ...H.BN
E LKT9 ...J.LKT4 INY .I.L.LDA ($5F),
Y.V.N.CMP #$20...P.BEQ LKT4...R.LDX T5
...T.JSR $79 ...V.LKT5 CMP ($5F)
,Y.*.X.BNE LKT9 .;.Z.INY .C.|.
DEX.P.~.BEQ LKT6.\...JSR $73.L...BNE LKT
5 .....LKT6 LDA ($5F),Y.....BEQ LKT7
.....INY.....CMP #$20 .....BEQ
LKT6.E...DEY.Y...CMP #":" .....BN
E LKT9 .....LKT7 LDY #2: LDA ($5F),
Y: STA $39.9...INY: LDA ($5F),Y: STA $3A
: LDA $5F.E...LDX $60.M...CLC.A...ADC #4
.N...BCC LKT8.V...INX... .LKT8
STA $7A.....STX $7B.....JMP $A8F8 ...
..LKT9 LDA T2 .H...STA $7A .S...LDA
T3.....STA $7B.....LDY #1 .....LD
A ($5F),Y .....TAX.....DEY.&...LDA ($5F
),Y .....INY.@...BNE LKT3 .R...LKT
10 BIT T6 .D...BPL LKT11 .W...CLC
...B.R. T6...D.LDA #.TRPSTR ...F
.LDY #.TRPSTR...H.STA $7A...J.STY $7B.H.
L.LDY #6.S.N.STY T5...P.JMP LKT2...R.LKT
11 JMP $A8E3 ...T.TRPSTR .F "DFAULT"...V
.SGSTR STY $14 .1.X.JSR $AD9E .C.Z.JS
R $B6A3 .U...STA T5 .G...STX $7
A .Y...STY $7B .....LDY $14
.....DEY .....DEY .
....DEY.....DEY.Q...SEC .....R.
T6.....RTS.....;...
> CLICK IMAGE PREVIEW FOR FULL MODAL