6@
FILE INFORMATION
FILENAME(S): 6@
FILE TYPE(S): PRG
FILE SIZE: 4K
FIRST SEEN: 2025-12-02 00:16:03
APPEARS ON: 1 disk(s)
FILE HASH
faae1acd34ce294b673f06d39888aba68a1b6e3d7cf23d5e1488745b7986c14e
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 18A | 6@ | PRG | Maestro | 14 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 10 08 E8 03 54 41 42 31 B2 24 31 30 30 30 |......TAB1.$1000|
00000010: 00 1F 08 F2 03 54 41 42 33 B2 24 31 31 30 30 00 |.....TAB3.$1100.|
00000020: 2E 08 FC 03 54 41 42 32 B2 24 31 32 30 30 00 3A |....TAB2.$1200.:|
00000030: 08 06 04 53 50 45 45 44 B2 33 00 47 08 10 04 4D |...SPEED.3.G...M|
00000040: 45 53 53 B2 24 41 41 00 5D 08 1A 04 4C 49 4E 45 |ESS.$AA.]...LINE|
00000050: B2 31 30 32 34 AA 28 31 36 AC 34 30 29 00 70 08 |.1024.(16.40).p.|
00000060: 24 04 52 41 53 B2 24 33 32 AA 28 31 36 AC 38 29 |$.RAS.$32.(16.8)|
00000070: 00 7C 08 2E 04 56 B2 35 33 32 34 38 00 8E 08 38 |.|...V.53248...8|
00000080: 04 4D 45 53 53 41 47 45 B2 24 34 30 30 30 00 94 |.MESSAGE.$4000..|
00000090: 08 42 04 21 00 A0 08 4C 04 AC B2 24 34 39 30 30 |.B.!...L...$4900|
000000A0: 00 A6 08 56 04 21 00 B3 08 60 04 4C 44 41 20 23 |...V.!...`.LDA #|
000000B0: 32 35 35 00 C0 08 6A 04 53 54 41 20 56 AA 32 31 |255...j.STA V.21|
000000C0: 00 CB 08 74 04 4C 44 58 20 23 30 00 D6 08 7E 04 |...t.LDX #0...~.|
000000D0: 4C 44 41 20 23 30 00 E8 08 88 04 48 48 20 53 54 |LDA #0.....HH ST|
000000E0: 41 20 32 30 34 30 2C 58 00 F0 08 92 04 49 4E 58 |A 2040,X.....INX|
000000F0: 00 FB 08 9C 04 43 50 58 20 23 38 00 06 09 A6 04 |.....CPX #8.....|
00000100: 42 4E 45 20 48 48 00 0C 09 B0 04 21 00 1D 09 BA |BNE HH.....!....|
00000110: 04 4A 53 52 20 49 4E 49 54 4D 45 53 53 00 28 09 |.JSR INITMESS.(.|
00000120: C4 04 4C 44 58 20 23 30 00 36 09 CE 04 53 54 58 |..LDX #0.6...STX|
00000130: 20 24 44 30 32 30 00 49 09 D8 04 53 53 20 4C 44 | $D020.I...SS LD|
00000140: 41 20 24 31 38 30 30 2C 58 00 59 09 E2 04 53 54 |A $1800,X.Y...ST|
00000150: 41 20 24 30 34 30 30 2C 58 00 69 09 EC 04 4C 44 |A $0400,X.i...LD|
00000160: 41 20 24 31 39 30 30 2C 58 00 79 09 F6 04 53 54 |A $1900,X.y...ST|
00000170: 41 20 24 30 35 30 30 2C 58 00 8D 09 00 05 4C 44 |A $0500,X.....LD|
00000180: 41 20 24 31 41 30 30 AB 31 36 30 2C 58 00 A1 09 |A $1A00.160,X...|
00000190: 0A 05 53 54 41 20 24 30 36 30 30 AB 31 36 30 2C |..STA $0600.160,|
000001A0: 58 00 B1 09 14 05 4C 44 41 20 24 31 43 30 30 2C |X.....LDA $1C00,|
000001B0: 58 00 C1 09 1E 05 53 54 41 20 24 44 38 30 30 2C |X.....STA $D800,|
000001C0: 58 00 D1 09 28 05 4C 44 41 20 24 31 44 30 30 2C |X...(.LDA $1D00,|
000001D0: 58 00 E1 09 32 05 53 54 41 20 24 44 39 30 30 2C |X...2.STA $D900,|
000001E0: 58 00 F5 09 3C 05 4C 44 41 20 24 31 45 30 30 AB |X...<.LDA $1E00.|
000001F0: 31 36 30 2C 58 00 09 0A 46 05 53 54 41 20 24 44 |160,X...F.STA $D|
00000200: 41 30 30 AB 31 36 30 2C 58 00 14 0A 50 05 4C 44 |A00.160,X...P.LD|
00000210: 41 20 23 38 00 2C 0A 5A 05 53 54 41 20 4C 49 4E |A #8.,.Z.STA LIN|
00000220: 45 AA 35 34 32 37 32 AB 34 30 2C 58 00 37 0A 64 |E.54272.40,X.7.d|
00000230: 05 4C 44 41 20 23 30 00 49 0A 6E 05 53 54 41 20 |.LDA #0.I.n.STA |
00000240: 4C 49 4E 45 AB 34 30 2C 58 00 51 0A 78 05 49 4E |LINE.40,X.Q.x.IN|
00000250: 58 00 5C 0A 82 05 42 4E 45 20 53 53 00 69 0A 8C |X.\...BNE SS.i..|
00000260: 05 4C 44 41 20 23 24 46 46 00 77 0A 96 05 53 54 |.LDA #$FF.w...ST|
00000270: 41 20 24 30 38 30 30 00 85 0A A0 05 53 54 41 20 |A $0800.....STA |
00000280: 24 30 38 30 31 00 93 0A AA 05 53 54 41 20 24 30 |$0801.....STA $0|
00000290: 38 30 32 00 99 0A B4 05 21 00 A6 0A BE 05 53 45 |802.....!.....SE|
000002A0: 54 49 52 51 20 21 00 AE 0A C8 05 53 45 49 00 BB |TIRQ !.....SEI..|
000002B0: 0A D2 05 4C 44 41 20 23 24 37 46 00 C9 0A DC 05 |...LDA #$7F.....|
000002C0: 53 54 41 20 24 44 43 30 44 00 D7 0A E6 05 4C 44 |STA $DC0D.....LD|
000002D0: 41 20 24 44 43 30 44 00 E5 0A F0 05 4C 44 41 20 |A $DC0D.....LDA |
000002E0: 23 B3 49 52 51 00 F2 0A FA 05 53 54 41 20 24 33 |#.IRQ.....STA $3|
000002F0: 31 34 00 00 0B 04 06 4C 44 41 20 23 B1 49 52 51 |14.....LDA #.IRQ|
00000300: 00 0D 0B 0E 06 53 54 41 20 24 33 31 35 00 18 0B |.....STA $315...|
00000310: 18 06 4C 44 41 20 23 31 00 26 0B 22 06 53 54 41 |..LDA #1.&.".STA|
00000320: 20 24 44 30 31 41 00 34 0B 2C 06 53 54 41 20 24 | $D01A.4.,.STA $|
00000330: 44 30 31 39 00 41 0B 36 06 4C 44 41 20 23 52 41 |D019.A.6.LDA #RA|
00000340: 53 00 4F 0B 40 06 53 54 41 20 24 44 30 31 32 00 |S.O.@.STA $D012.|
00000350: 5C 0B 4A 06 4C 44 41 20 23 24 31 42 00 6A 0B 54 |\.J.LDA #$1B.j.T|
00000360: 06 53 54 41 20 24 44 30 31 31 00 72 0B 5E 06 43 |.STA $D011.r.^.C|
00000370: 4C 49 00 81 0B 68 06 AF 59 20 4C 44 41 20 31 39 |LI...h..Y LDA 19|
00000380: 37 00 8D 0B 72 06 43 4D 50 20 23 36 30 00 98 0B |7...r.CMP #60...|
00000390: 7C 06 42 4E 45 20 AF 59 00 A9 0B 86 06 4A 4D 50 ||.BNE .Y.....JMP|
000003A0: 20 52 45 4C 4F 43 41 54 45 00 AF 0B 90 06 21 00 | RELOCATE.....!.|
000003B0: BA 0B 9A 06 58 B9 20 42 52 4B 00 CF 0B A4 06 4C |....X. BRK.....L|
000003C0: 41 53 54 43 48 41 52 20 42 59 54 20 24 46 46 00 |ASTCHAR BYT $FF.|
000003D0: DB 0B AE 06 43 20 42 59 54 20 33 00 E1 0B B8 06 |....C BYT 3.....|
000003E0: 21 00 EB 0B C2 06 49 52 51 20 21 00 F5 0B CC 06 |!.....IRQ !.....|
000003F0: 43 4D 50 20 30 00 FF 0B D6 06 43 4D 50 20 30 00 |CMP 0.....CMP 0.|
00000400: 09 0C E0 06 43 4D 50 20 30 00 17 0C EA 06 4C 44 |....CMP 0.....LD|
00000410: 41 20 24 44 30 31 31 00 22 0C F4 06 AF 20 23 32 |A $D011.".... #2|
00000420: 32 33 00 30 0C FE 06 53 54 41 20 24 44 30 31 31 |23.0...STA $D011|
00000430: 00 3D 0C 08 07 4C 44 41 20 23 32 31 36 00 48 0C |.=...LDA #216.H.|
00000440: 12 07 AF 20 23 24 46 30 00 52 0C 1C 07 B0 41 20 |... #$F0.R....A |
00000450: 58 B9 00 60 0C 26 07 53 54 41 20 24 44 30 31 36 |X..`.&.STA $D016|
00000460: 00 6B 0C 30 07 4C 44 58 20 23 35 00 73 0C 3A 07 |.k.0.LDX #5.s.:.|
00000470: 44 45 58 00 7F 0C 44 07 42 4E 45 20 AC AB 31 00 |DEX...D.BNE ..1.|
00000480: 87 0C 4E 07 4E 4F 50 00 94 0C 58 07 4A 53 52 20 |..N.NOP...X.JSR |
00000490: 46 41 44 45 00 9A 0C 62 07 21 00 A6 0C 6C 07 4C |FADE...b.!...l.L|
000004A0: 44 58 20 23 24 42 00 AE 0C 76 07 44 45 58 00 BA |DX #$B...v.DEX..|
000004B0: 0C 80 07 42 4E 45 20 AC AB 31 00 C5 0C 8A 07 4C |...BNE ..1.....L|
000004C0: 44 41 20 23 30 00 D3 0C 94 07 53 54 41 20 24 44 |DA #0.....STA $D|
000004D0: 30 32 31 00 E1 0C 9E 07 53 54 41 20 24 44 30 32 |021.....STA $D02|
000004E0: 32 00 EF 0C A8 07 53 54 41 20 24 44 30 32 33 00 |2.....STA $D023.|
000004F0: FD 0C B2 07 4C 44 41 20 24 44 30 31 31 00 08 0D |....LDA $D011...|
00000500: BC 07 B0 41 20 23 33 32 00 16 0D C6 07 53 54 41 |...A #32.....STA|
00000510: 20 24 44 30 31 31 00 23 0D D0 07 4C 44 41 20 23 | $D011.#...LDA #|
00000520: 24 44 38 00 31 0D DA 07 53 54 41 20 24 44 30 31 |$D8.1...STA $D01|
00000530: 36 00 3E 0D E4 07 4C 44 41 20 23 24 31 44 00 4C |6.>...LDA #$1D.L|
00000540: 0D EE 07 53 54 41 20 24 44 30 31 38 00 59 0D F8 |...STA $D018.Y..|
00000550: 07 4A 53 52 20 52 4F 4C 4C 00 68 0D 02 08 4A 53 |.JSR ROLL.h...JS|
00000560: 52 20 53 43 52 4F 4C 4C 00 77 0D 0C 08 49 4E 43 |R SCROLL.w...INC|
00000570: 20 20 24 44 30 31 39 00 85 0D 16 08 4A 4D 50 20 | $D019.....JMP |
00000580: 24 45 41 33 31 00 8B 0D 20 08 21 00 98 0D 2A 08 |$EA31... .!...*.|
00000590: 53 43 52 4F 4C 4C 20 21 00 A3 0D 34 08 4C 44 41 |SCROLL !...4.LDA|
000005A0: 20 58 B9 00 AB 0D 3E 08 53 45 43 00 BA 0D 48 08 | X....>.SEC...H.|
000005B0: 53 42 43 20 23 53 50 45 45 44 00 C3 0D 52 08 AF |SBC #SPEED...R..|
000005C0: 20 23 37 00 CE 0D 5C 08 53 54 41 20 58 B9 00 DA | #7...\.STA X...|
000005D0: 0D 66 08 42 43 43 20 53 43 31 00 E2 0D 70 08 52 |.f.BCC SC1...p.R|
000005E0: 54 53 00 E8 0D 7A 08 21 00 F6 0D 84 08 53 43 31 |TS...z.!.....SC1|
000005F0: 20 44 45 43 20 43 00 00 0E 8E 08 4C 44 41 20 43 | DEC C.....LDA C|
00000600: 00 0C 0E 98 08 42 4E 45 20 4E 4F 5A 00 17 0E A2 |.....BNE NOZ....|
00000610: 08 4C 44 41 20 23 33 00 21 0E AC 08 53 54 41 20 |.LDA #3.!...STA |
00000620: 43 00 2F 0E B6 08 4A 53 52 20 A2 43 48 41 52 00 |C./...JSR .CHAR.|
00000630: 35 0E C0 08 21 00 3F 0E CA 08 4E 4F 5A 20 21 00 |5...!.?...NOZ !.|
00000640: 45 0E D4 08 21 00 50 0E DE 08 4C 44 59 20 23 30 |E...!.P...LDY #0|
00000650: 00 65 0E E8 08 53 43 32 20 4C 44 41 20 4C 49 4E |.e...SC2 LDA LIN|
00000660: 45 AA 31 2C 59 00 74 0E F2 08 53 54 41 20 4C 49 |E.1,Y.t...STA LI|
00000670: 4E 45 2C 59 00 7C 0E FC 08 49 4E 59 00 89 0E 06 |NE,Y.|...INY....|
00000680: 09 43 50 59 20 23 31 31 39 00 95 0E 10 09 42 43 |.CPY #119.....BC|
00000690: 43 20 53 43 32 00 9B 0E 1A 09 21 00 AC 0E 24 09 |C SC2.....!...$.|
000006A0: 4C 44 41 20 4C 41 53 54 43 48 41 52 00 B4 0E 2E |LDA LASTCHAR....|
000006B0: 09 43 4C 43 00 C0 0E 38 09 41 44 43 20 23 32 38 |.CLC...8.ADC #28|
000006C0: 00 D1 0E 42 09 53 54 41 20 4C 41 53 54 43 48 41 |...B.STA LASTCHA|
000006D0: 52 00 E1 0E 4C 09 53 54 41 20 4C 49 4E 45 AA 33 |R...L.STA LINE.3|
000006E0: 39 00 E9 0E 56 09 43 4C 43 00 F5 0E 60 09 41 44 |9...V.CLC...`.AD|
000006F0: 43 20 23 38 34 00 05 0F 6A 09 53 54 41 20 4C 49 |C #84...j.STA LI|
00000700: 4E 45 AA 37 39 00 0D 0F 74 09 43 4C 43 00 19 0F |NE.79...t.CLC...|
00000710: 7E 09 41 44 43 20 23 38 34 00 2A 0F 88 09 53 54 |~.ADC #84.*...ST|
00000720: 41 20 4C 49 4E 45 AA 31 31 39 00 32 0F 92 09 52 |A LINE.119.2...R|
00000730: 54 53 00 38 0F 9C 09 21 00 44 0F A6 09 A2 43 48 |TS.8...!.D....CH|
00000740: 41 52 20 21 00 52 0F B0 09 4A 53 52 20 A1 43 48 |AR !.R...JSR .CH|
00000750: 41 52 00 5D 0F BA 09 AF 20 23 24 33 46 00 6E 0F |AR.].... #$3F.n.|
00000760: C4 09 53 54 41 20 4C 41 53 54 43 48 41 52 00 7E |..STA LASTCHAR.~|
00000770: 0F CE 09 53 54 41 20 4C 49 4E 45 AA 33 39 00 86 |...STA LINE.39..|
00000780: 0F D8 09 43 4C 43 00 92 0F E2 09 41 44 43 20 23 |...CLC.....ADC #|
00000790: 38 34 00 A2 0F EC 09 53 54 41 20 4C 49 4E 45 AA |84.....STA LINE.|
000007A0: 37 39 00 AA 0F F6 09 43 4C 43 00 B6 0F 00 0A 41 |79.....CLC.....A|
000007B0: 44 43 20 23 38 34 00 C7 0F 0A 0A 53 54 41 20 4C |DC #84.....STA L|
000007C0: 49 4E 45 AA 31 31 39 00 CF 0F 14 0A 52 54 53 00 |INE.119.....RTS.|
000007D0: D5 0F 1E 0A 21 00 E4 0F 28 0A 49 4E 49 54 4D 45 |....!...(.INITME|
000007E0: 53 53 20 21 00 F6 0F 32 0A 4C 44 41 20 23 B3 4D |SS !...2.LDA #.M|
000007F0: 45 53 53 41 47 45 00 03 10 3C 0A 53 54 41 20 4D |ESSAGE...<.STA M|
00000800: 45 53 53 00 15 10 46 0A 4C 44 41 20 23 B1 4D 45 |ESS...F.LDA #.ME|
00000810: 53 53 41 47 45 00 24 10 50 0A 53 54 41 20 4D 45 |SSAGE.$.P.STA ME|
00000820: 53 53 AA 31 00 2C 10 5A 0A 52 54 53 00 32 10 64 |SS.1.,.Z.RTS.2.d|
00000830: 0A 21 00 3E 10 6E 0A A1 43 48 41 52 20 21 00 49 |.!.>.n..CHAR !.I|
00000840: 10 78 0A 4C 44 59 20 23 30 00 5A 10 82 0A 4C 44 |.x.LDY #0.Z...LD|
00000850: 41 20 28 4D 45 53 53 29 2C 59 00 67 10 8C 0A 43 |A (MESS),Y.g...C|
00000860: 4D 50 20 23 24 46 46 00 73 10 96 0A 42 4E 45 20 |MP #$FF.s...BNE |
00000870: A1 43 31 00 84 10 A0 0A 4A 53 52 20 49 4E 49 54 |.C1.....JSR INIT|
00000880: 4D 45 53 53 00 92 10 AA 0A 4A 4D 50 20 A1 43 48 |MESS.....JMP .CH|
00000890: 41 52 00 9C 10 B4 0A A1 43 31 20 21 00 A9 10 BE |AR......C1 !....|
000008A0: 0A 49 4E 43 20 4D 45 53 53 00 B5 10 C8 0A 42 4E |.INC MESS.....BN|
000008B0: 45 20 AC AA 34 00 C4 10 D2 0A 49 4E 43 20 4D 45 |E ..4.....INC ME|
000008C0: 53 53 AA 31 00 CC 10 DC 0A 52 54 53 00 D2 10 E6 |SS.1.....RTS....|
000008D0: 0A 21 00 F4 10 F0 0A 21 4D 45 53 53 41 47 45 20 |.!.....!MESSAGE |
000008E0: 42 59 54 20 32 36 2C 32 37 2C 32 38 2C 32 39 2C |BYT 26,27,28,29,|
000008F0: 33 30 2C 30 00 FA 10 FA 0A 21 00 05 11 04 0B 46 |30,0.....!.....F|
00000900: 41 44 45 20 21 00 12 11 0E 0B 4C 44 41 20 23 24 |ADE !.....LDA #$|
00000910: 44 37 00 1A 11 18 0B 4E 4F 50 00 22 11 22 0B 4E |D7.....NOP.".".N|
00000920: 4F 50 00 2E 11 2C 0B 4C 44 41 20 23 31 39 00 3C |OP...,.LDA #19.<|
00000930: 11 36 0B 53 54 41 20 24 44 30 31 38 00 47 11 40 |.6.STA $D018.G.@|
00000940: 0B 4C 44 58 20 23 30 00 51 11 4A 0B 43 4D 50 20 |.LDX #0.Q.J.CMP |
00000950: 30 00 5B 11 54 0B 43 4D 50 20 30 00 63 11 5E 0B |0.[.T.CMP 0.c.^.|
00000960: 4E 4F 50 00 6B 11 68 0B 4E 4F 50 00 71 11 72 0B |NOP.k.h.NOP.q.r.|
00000970: 21 00 7C 11 7C 0B 4C 4F 4F 50 20 21 00 86 11 86 |!.|.|.LOOP !....|
00000980: 0B 4A 53 52 20 4B 00 90 11 90 0B 4A 53 52 20 4B |.JSR K.....JSR K|
00000990: 00 9A 11 9A 0B 4A 53 52 20 4B 00 A4 11 A4 0B 4A |.....JSR K.....J|
000009A0: 53 52 20 4B 00 AE 11 AE 0B 4A 53 52 20 4B 00 B8 |SR K.....JSR K..|
000009B0: 11 B8 0B 4A 53 52 20 4B 00 BE 11 C2 0B 21 00 CD |...JSR K.....!..|
000009C0: 11 CC 0B 4C 44 41 20 54 41 42 31 2C 58 00 DC 11 |...LDA TAB1,X...|
000009D0: D6 0B 4C 44 59 20 54 41 42 32 2C 58 00 E6 11 E0 |..LDY TAB2,X....|
000009E0: 0B 43 4D 50 20 30 00 F0 11 EA 0B 43 4D 50 20 30 |.CMP 0.....CMP 0|
000009F0: 00 F8 11 F4 0B 4E 4F 50 00 06 12 FE 0B 53 54 59 |.....NOP.....STY|
00000A00: 20 24 44 30 32 33 00 15 12 08 0C 4C 44 59 20 54 | $D023.....LDY T|
00000A10: 41 42 33 2C 58 00 23 12 12 0C 53 54 41 20 24 44 |AB3,X.#...STA $D|
00000A20: 30 32 32 00 31 12 1C 0C 53 54 59 20 24 44 30 32 |022.1...STY $D02|
00000A30: 31 00 42 12 26 0C 4C 44 59 20 54 41 42 31 AA 31 |1.B.&.LDY TAB1.1|
00000A40: 2C 58 00 50 12 30 0C 53 54 59 20 24 44 30 32 32 |,X.P.0.STY $D022|
00000A50: 00 59 12 3A 0C 21 4E 4F 50 00 61 12 44 0C 4E 4F |.Y.:.!NOP.a.D.NO|
00000A60: 50 00 69 12 4E 0C 4E 4F 50 00 7A 12 58 0C 4C 44 |P.i.N.NOP.z.X.LD|
00000A70: 59 20 54 41 42 33 AA 31 2C 58 00 88 12 62 0C 53 |Y TAB3.1,X...b.S|
00000A80: 54 59 20 24 44 30 32 31 00 96 12 6C 0C 42 49 54 |TY $D021...l.BIT|
00000A90: 20 24 30 30 30 30 00 9E 12 76 0C 49 4E 58 00 A6 | $0000...v.INX..|
00000AA0: 12 80 0C 49 4E 58 00 B7 12 8A 0C 4C 44 59 20 54 |...INX.....LDY T|
00000AB0: 41 42 32 AA 31 2C 58 00 C5 12 94 0C 53 54 59 20 |AB2.1,X.....STY |
00000AC0: 24 44 30 32 33 00 CD 12 9E 0C 4E 4F 50 00 D5 12 |$D023.....NOP...|
00000AD0: A8 0C 4E 4F 50 00 DD 12 B2 0C 4E 4F 50 00 E5 12 |..NOP.....NOP...|
00000AE0: BC 0C 4E 4F 50 00 ED 12 C6 0C 4E 4F 50 00 F9 12 |..NOP.....NOP...|
00000AF0: D0 0C 43 50 58 20 23 33 32 00 06 13 DA 0C 42 4E |..CPX #32.....BN|
00000B00: 45 20 4C 4F 4F 50 00 0E 13 E4 0C 52 54 53 00 14 |E LOOP.....RTS..|
00000B10: 13 EE 0C 21 00 1A 13 F8 0C 21 00 22 13 02 0D 4B |...!.....!."...K|
00000B20: 20 21 00 31 13 0C 0D 4C 44 59 20 54 41 42 31 2C | !.1...LDY TAB1,|
00000B30: 58 00 39 13 16 0D 4E 4F 50 00 41 13 20 0D 4E 4F |X.9...NOP.A. .NO|
00000B40: 50 00 49 13 2A 0D 4E 4F 50 00 57 13 34 0D 53 54 |P.I.*.NOP.W.4.ST|
00000B50: 59 20 24 44 30 32 32 00 66 13 3E 0D 4C 44 59 20 |Y $D022.f.>.LDY |
00000B60: 54 41 42 32 2C 58 00 74 13 48 0D 53 54 59 20 24 |TAB2,X.t.H.STY $|
00000B70: 44 30 32 33 00 83 13 52 0D 4C 44 59 20 54 41 42 |D023...R.LDY TAB|
00000B80: 33 2C 58 00 91 13 5C 0D 53 54 59 20 24 44 30 32 |3,X...\.STY $D02|
00000B90: 31 00 99 13 66 0D 49 4E 58 00 A1 13 70 0D 4E 4F |1...f.INX...p.NO|
00000BA0: 50 00 A9 13 7A 0D 4E 4F 50 00 B1 13 84 0D 4E 4F |P...z.NOP.....NO|
00000BB0: 50 00 B9 13 8E 0D 4E 4F 50 00 C1 13 98 0D 4E 4F |P.....NOP.....NO|
00000BC0: 50 00 C9 13 A2 0D 4E 4F 50 00 D1 13 AC 0D 4E 4F |P.....NOP.....NO|
00000BD0: 50 00 D9 13 B6 0D 4E 4F 50 00 E5 13 C0 0D 42 49 |P.....NOP.....BI|
00000BE0: 54 20 24 45 41 00 ED 13 CA 0D 52 54 53 00 F3 13 |T $EA.....RTS...|
00000BF0: D4 0D 21 00 FE 13 DE 0D 52 4F 4C 4C 20 21 00 09 |..!.....ROLL !..|
00000C00: 14 E8 0D 4C 44 58 20 23 30 00 16 14 F2 0D 4C 44 |...LDX #0.....LD|
00000C10: 41 20 54 41 42 31 00 20 14 FC 0D 53 54 41 20 54 |A TAB1. ...STA T|
00000C20: 00 2D 14 06 0E 4C 44 41 20 54 41 42 32 00 39 14 |.-...LDA TAB2.9.|
00000C30: 10 0E 53 54 41 20 54 AA 31 00 46 14 1A 0E 4C 44 |..STA T.1.F...LD|
00000C40: 41 20 54 41 42 33 00 52 14 24 0E 53 54 41 20 54 |A TAB3.R.$.STA T|
00000C50: AA 32 00 58 14 2E 0E 21 00 6C 14 38 0E 52 31 20 |.2.X...!.l.8.R1 |
00000C60: 4C 44 41 20 54 41 42 31 AA 31 2C 58 00 7B 14 42 |LDA TAB1.1,X.{.B|
00000C70: 0E 53 54 41 20 54 41 42 31 2C 58 00 8C 14 4C 0E |.STA TAB1,X...L.|
00000C80: 4C 44 41 20 54 41 42 32 AA 31 2C 58 00 9B 14 56 |LDA TAB2.1,X...V|
00000C90: 0E 53 54 41 20 54 41 42 32 2C 58 00 AC 14 60 0E |.STA TAB2,X...`.|
00000CA0: 4C 44 41 20 54 41 42 33 AA 31 2C 58 00 BB 14 6A |LDA TAB3.1,X...j|
00000CB0: 0E 53 54 41 20 54 41 42 33 2C 58 00 C3 14 74 0E |.STA TAB3,X...t.|
00000CC0: 49 4E 58 00 CE 14 7E 0E 42 4E 45 20 52 31 00 D4 |INX...~.BNE R1..|
00000CD0: 14 88 0E 21 00 DE 14 92 0E 4C 44 41 20 54 00 EF |...!.....LDA T..|
00000CE0: 14 9C 0E 53 54 41 20 54 41 42 31 AA 24 46 45 00 |...STA TAB1.$FE.|
00000CF0: FB 14 A6 0E 4C 44 41 20 54 AA 31 00 0C 15 B0 0E |....LDA T.1.....|
00000D00: 53 54 41 20 54 41 42 32 AA 24 46 45 00 18 15 BA |STA TAB2.$FE....|
00000D10: 0E 4C 44 41 20 54 AA 32 00 29 15 C4 0E 53 54 41 |.LDA T.2.)...STA|
00000D20: 20 54 41 42 33 AA 24 46 45 00 31 15 CE 0E 52 54 | TAB3.$FE.1...RT|
00000D30: 53 00 41 15 D8 0E 54 20 42 59 54 20 30 2C 30 2C |S.A...T BYT 0,0,|
00000D40: 30 00 47 15 E2 0E 21 00 4D 15 EC 0E 21 00 5C 15 |0.G...!.M...!.\.|
00000D50: F6 0E 52 45 4C 4F 43 41 54 45 20 21 00 64 15 00 |..RELOCATE !.d..|
00000D60: 0F 53 45 49 00 72 15 0A 0F 4A 53 52 20 24 45 35 |.SEI.r...JSR $E5|
00000D70: 34 34 00 80 15 14 0F 4A 53 52 20 24 46 44 41 33 |44.....JSR $FDA3|
00000D80: 00 8E 15 1E 0F 4A 53 52 20 24 45 35 41 30 00 9B |.....JSR $E5A0..|
00000D90: 15 28 0F 4C 44 41 20 23 24 33 31 00 A8 15 32 0F |.(.LDA #$31...2.|
00000DA0: 53 54 41 20 24 33 31 34 00 B5 15 3C 0F 4C 44 41 |STA $314...<.LDA|
00000DB0: 20 23 24 45 41 00 C2 15 46 0F 53 54 41 20 24 33 | #$EA...F.STA $3|
00000DC0: 31 35 00 CE 15 50 0F 4C 44 41 20 23 32 37 00 DC |15...P.LDA #27..|
00000DD0: 15 5A 0F 53 54 41 20 24 44 30 31 31 00 E7 15 64 |.Z.STA $D011...d|
00000DE0: 0F 4C 44 41 20 23 30 00 F4 15 6E 0F 53 54 41 20 |.LDA #0...n.STA |
00000DF0: 56 AA 32 31 00 00 16 78 0F 4C 44 41 20 23 32 33 |V.21...x.LDA #23|
00000E00: 00 0E 16 82 0F 53 54 41 20 24 44 30 31 38 00 1B |.....STA $D018..|
00000E10: 16 8C 0F 4C 44 41 20 23 32 34 30 00 29 16 96 0F |...LDA #240.)...|
00000E20: 53 54 41 20 24 44 30 31 41 00 36 16 A0 0F 4C 44 |STA $D01A.6...LD|
00000E30: 41 20 23 24 33 34 00 42 16 AA 0F 53 54 41 20 24 |A #$34.B...STA $|
00000E40: 30 31 00 4D 16 B4 0F 4C 44 58 20 23 30 00 62 16 |01.M...LDX #0.b.|
00000E50: BE 0F 50 4F 50 20 4C 44 41 20 53 43 52 45 45 4E |..POP LDA SCREEN|
00000E60: 2C 58 00 71 16 C8 0F 53 54 41 20 31 30 32 34 2C |,X.q...STA 1024,|
00000E70: 58 00 79 16 D2 0F 49 4E 58 00 85 16 DC 0F 42 4E |X.y...INX.....BN|
00000E80: 45 20 50 4F 50 00 95 16 E6 0F 4A 4D 50 20 31 30 |E POP.....JMP 10|
00000E90: 32 34 AA 34 30 00 9B 16 F0 0F 21 00 A8 16 FA 0F |24.40.....!.....|
00000EA0: 53 43 52 45 45 4E 20 21 00 DB 16 04 10 42 59 54 |SCREEN !.....BYT|
00000EB0: 20 22 20 49 4E 54 52 4F 20 42 59 20 41 4E 44 59 | " INTRO BY ANDY|
00000EC0: 20 50 41 52 54 52 49 44 47 45 20 4D 41 52 43 48 | PARTRIDGE MARCH|
00000ED0: 20 27 39 30 2E 2E 2E 2E 2E 20 22 00 EB 16 0E 10 | '90..... ".....|
00000EE0: 4C 44 41 20 23 B3 24 35 30 30 30 00 F7 16 18 10 |LDA #.$5000.....|
00000EF0: 53 54 41 20 24 30 32 00 07 17 22 10 4C 44 41 20 |STA $02...".LDA |
00000F00: 23 B1 24 35 30 30 30 00 13 17 2C 10 53 54 41 20 |#.$5000...,.STA |
00000F10: 24 30 33 00 23 17 36 10 4C 44 41 20 23 B3 24 30 |$03.#.6.LDA #.$0|
00000F20: 38 30 31 00 2F 17 40 10 53 54 41 20 24 30 34 00 |801./.@.STA $04.|
00000F30: 3F 17 4A 10 4C 44 41 20 23 B1 24 30 38 30 31 00 |?.J.LDA #.$0801.|
00000F40: 4B 17 54 10 53 54 41 20 24 30 35 00 51 17 5E 10 |K.T.STA $05.Q.^.|
00000F50: 21 00 5D 17 68 10 4C 4F 4F 50 59 20 21 00 6B 17 |!.].h.LOOPY !.k.|
00000F60: 72 10 5A 31 20 4C 44 59 20 23 30 00 7E 17 7C 10 |r.Z1 LDY #0.~.|.|
00000F70: 52 32 20 4C 44 41 20 28 24 30 32 29 2C 59 00 8E |R2 LDA ($02),Y..|
00000F80: 17 86 10 53 54 41 20 28 24 30 34 29 2C 59 00 9C |...STA ($04),Y..|
00000F90: 17 90 10 49 4E 43 20 24 30 34 30 30 00 A4 17 9A |...INC $0400....|
00000FA0: 10 49 4E 59 00 AF 17 A4 10 42 4E 45 20 52 32 00 |.INY.....BNE R2.|
00000FB0: BB 17 AE 10 49 4E 43 20 24 30 33 00 C7 17 B8 10 |....INC $03.....|
00000FC0: 49 4E 43 20 24 30 35 00 D3 17 C2 10 4C 44 41 20 |INC $05.....LDA |
00000FD0: 24 30 33 00 E0 17 CC 10 43 4D 50 20 23 24 46 46 |$03.....CMP #$FF|
00000FE0: 00 EB 17 D6 10 42 4E 45 20 5A 31 00 F1 17 E0 10 |.....BNE Z1.....|
00000FF0: 21 00 FE 17 EA 10 4C 44 41 20 23 24 33 37 00 0A |!.....LDA #$37..|
00001000: 18 F4 10 53 54 41 20 24 30 31 00 12 18 FE 10 43 |...STA $01.....C|
00001010: 4C 49 00 18 18 08 11 21 00 26 18 12 11 4A 4D 50 |LI.....!.&...JMP|
00001020: 20 24 30 38 32 30 00 00 00 | $0820... |
......TAB1.$1000.....TAB3.$1100.....TAB2
.$1200.:...SPEED.3.G...MESS.$AA.]...LINE
.1024.(16.40).P.$.RAS.$32.(16.8).|...V.5
3248...8.MESSAGE.$4000...B.!. .L...$4900
...V.!...`.LDA #255...J.STA V.21.K.T.LDX
#0.V.~.LDA #0.....HH STA 2040,X.....INX
.....CPX #8.....BNE HH.....!.....JSR INI
TMESS.(.D.LDX #0.6.N.STX $D020.I.X.SS LD
A $1800,X.Y...STA $0400,X.I...LDA $1900,
X.Y...STA $0500,X.....LDA $1A00.160,X...
..STA $0600.160,X.....LDA $1C00,X.A...ST
A $D800,X.Q.(.LDA $1D00,X...2.STA $D900,
X...<.LDA $1E00.160,X...F.STA $DA00.160,
X...P.LDA #8.,.Z.STA LINE.54272.40,X.7.D
.LDA #0.I.N.STA LINE.40,X.Q.X.INX.\...BN
E SS.I...LDA #$FF.W...STA $0800... .STA
$0801.....STA $0802.....!.....SETIRQ !..
.H.SEI...R.LDA #$7F.I...STA $DC0D.W...LD
A $DC0D.....LDA #.IRQ.....STA $314.....L
DA #.IRQ.....STA $315.....LDA #1.&.".STA
$D01A.4.,.STA $D019.A.6.LDA #RAS.O.@.ST
A $D012.\.J.LDA #$1B.J.T.STA $D011.R.^.C
LI...H..Y LDA 197...R.CMP #60...|.BNE .Y
.....JMP RELOCATE.....!.....X. BRK.O...L
ASTCHAR BYT $FF.....C BYT 3.....!...B.IR
Q !...L.CMP 0...V.CMP 0.....CMP 0.....LD
A $D011.".... #223.0...STA $D011.=...LDA
#216.H.... #$F0.R....A X..`.&.STA $D016
.K.0.LDX #5.S.:.DEX..D.BNE ..1...N.NOP.
..X.JSR FADE...B.!...L.LDX #$B...V.DEX..
...BNE ..1.E...LDA #0.S...STA $D021.....
STA $D022.....STA $D023.....LDA $D011...
...A #32...F.STA $D011.#.P.LDA #$D8.1.Z.
STA $D016.>...LDA #$1D.L...STA $D018.Y..
.JSR ROLL.H...JSR SCROLL.W...INC $D019.
....JMP $EA31... .!...*.SCROLL !...4.LDA
X....>.SEC...H.SBC #SPEED.C.R.. #7.N.\.
STA X..Z.F.BCC SC1...P.RTS...Z.!.....SC1
DEC C.....LDA C.....BNE NOZ.....LDA #3.
!...STA C./...JSR .CHAR.5...!.?.J.NOZ !.
E.T.!.P...LDY #0.E...SC2 LDA LINE.1,Y.T.
..STA LINE,Y.|...INY.....CPY #119.....BC
C SC2.....!...$.LDA LASTCHAR.....CLC...8
.ADC #28.Q.B.STA LASTCHAR...L.STA LINE.3
9...V.CLC...`.ADC #84...J.STA LINE.79...
T.CLC...~.ADC #84.*...STA LINE.119.2...R
TS.8...!.D....CHAR !.R...JSR .CHAR.]....
#$3F.N.D.STA LASTCHAR.~.N.STA LINE.39..
.X.CLC.....ADC #84.....STA LINE.79.....C
LC.....ADC #84.G...STA LINE.119.O...RTS.
U...!...(.INITMESS !...2.LDA #.MESSAGE..
.<.STA MESS...F.LDA #.MESSAGE.$.P.STA ME
SS.1.,.Z.RTS.2.D.!.>.N..CHAR !.I.X.LDY #
0.Z...LDA (MESS),Y.G...CMP #$FF.S...BNE
.C1... .JSR INITMESS.....JMP .CHAR......
C1 !.....INC MESS...H.BNE ..4.D.R.INC ME
SS.1.L...RTS.R...!.....!MESSAGE BYT 26,2
7,28,29,30,0.....!.....FADE !.....LDA #$
D7.....NOP.".".NOP...,.LDA #19.<.6.STA $
D018.G.@.LDX #0.Q.J.CMP 0.[.T.CMP 0.C.^.
NOP.K.H.NOP.Q.R.!.|.|.LOOP !.....JSR K..
...JSR K.....JSR K.....JSR K.....JSR K..
...JSR K...B.!.M.L.LDA TAB1,X...V.LDY TA
B2,X.....CMP 0.....CMP 0.....NOP.....STY
$D023.....LDY TAB3,X.#...STA $D022.1...
STY $D021.B.&.LDY TAB1.1,X.P.0.STY $D022
.Y.:.!NOP.A.D.NOP.I.N.NOP.Z.X.LDY TAB3.1
,X...B.STY $D021...L.BIT $0000...V.INX..
...INX.....LDY TAB2.1,X.E...STY $D023.M.
..NOP.U...NOP.....NOP.....NOP...F.NOP...
P.CPX #32...Z.BNE LOOP.....RTS.....!....
.!."...K !.1...LDY TAB1,X.9...NOP.A. .NO
P.I.*.NOP.W.4.STY $D022.F.>.LDY TAB2,X.T
.H.STY $D023...R.LDY TAB3,X...\.STY $D02
1...F.INX...P.NOP...Z.NOP.....NOP.....NO
P.A...NOP.I...NOP.Q...NOP.Y...NOP.....BI
T $EA...J.RTS...T.!.....ROLL !.....LDX #
0.....LDA TAB1. ...STA T.-...LDA TAB2.9.
..STA T.1.F...LDA TAB3.R.$.STA T.2.X...!
.L.8.R1 LDA TAB1.1,X.{.B.STA TAB1,X...L.
LDA TAB2.1,X...V.STA TAB2,X...`.LDA TAB3
.1,X...J.STA TAB3,X.C.T.INX.N.~.BNE R1.T
...!.....LDA T.....STA TAB1.$FE.....LDA
T.1.....STA TAB2.$FE.....LDA T.2.).D.STA
TAB3.$FE.1.N.RTS.A.X.T BYT 0,0,0.G...!.
M...!.\...RELOCATE !.D...SEI.R...JSR $E5
44.....JSR $FDA3.....JSR $E5A0...(.LDA #
$31...2.STA $314...<.LDA #$EA.B.F.STA $3
15.N.P.LDA #27...Z.STA $D011...D.LDA #0.
..N.STA V.21...X.LDA #23.....STA $D018..
...LDA #240.)...STA $D01A.6. .LDA #$34.B
...STA $01.M...LDX #0.B...POP LDA SCREEN
,X.Q.H.STA 1024,X.Y.R.INX.....BNE POP...
..JMP 1024.40.....!.....SCREEN !.....BYT
" INTRO BY ANDY PARTRIDGE MARCH '90....
. ".....LDA #.$5000.....STA $02...".LDA
#.$5000...,.STA $03.#.6.LDA #.$0801./.@.
STA $04.?.J.LDA #.$0801.K.T.STA $05.Q.^.
!.].H.LOOPY !.K.R.Z1 LDY #0.~.|.R2 LDA (
$02),Y.....STA ($04),Y.....INC $0400....
.INY.....BNE R2.....INC $03.G...INC $05.
S.B.LDA $03...L.CMP #$FF...V.BNE Z1.....
!.....LDA #$37.....STA $01.....CLI.....!
.&...JMP $0820...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL