> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1A 08 64 00 9E 37 30 30 3A 2E 4F 50 54 20 |....d..700:.OPT |
00000010: 4F 4F 3A AC B2 24 43 30 30 30 00 2A 08 6E 00 43 |OO:..$C000.*.n.C|
00000020: 4C 53 20 B2 20 24 45 35 34 34 00 3A 08 78 00 43 |LS . $E544.:.x.C|
00000030: 52 41 20 B2 20 24 44 43 30 45 00 4B 08 82 00 49 |RA . $DC0E.K...I|
00000040: 52 51 4C 20 B2 20 24 30 33 31 34 00 5C 08 8C 00 |RQL . $0314.\...|
00000050: 49 52 51 48 20 B2 20 24 30 33 31 35 00 6C 08 96 |IRQH . $0315.l..|
00000060: 00 56 49 43 20 B2 20 24 44 30 30 30 00 7C 08 A0 |.VIC . $D000.|..|
00000070: 00 53 52 32 20 B2 20 24 44 30 31 36 00 8C 08 AA |.SR2 . $D016....|
00000080: 00 52 5A 49 20 B2 20 24 44 30 31 32 00 9C 08 B4 |.RZI . $D012....|
00000090: 00 49 4D 52 20 B2 20 24 44 30 31 41 00 AC 08 BE |.IMR . $D01A....|
000000A0: 00 49 52 52 20 B2 20 24 44 30 31 39 00 BC 08 C8 |.IRR . $D019....|
000000B0: 00 53 52 31 20 B2 20 24 44 30 31 31 00 E2 08 DC |.SR1 . $D011....|
000000C0: 00 53 54 41 52 54 20 4C 44 41 20 23 30 30 3A 53 |.START LDA #00:S|
000000D0: 54 41 20 24 44 30 32 30 3A 53 54 41 20 24 44 30 |TA $D020:STA $D0|
000000E0: 32 31 00 09 09 FA 00 4A 53 52 20 43 4C 53 3A 4C |21.....JSR CLS:L|
000000F0: 44 41 20 23 38 3A 53 54 41 20 53 52 32 3A 4A 53 |DA #8:STA SR2:JS|
00000100: 52 20 53 45 54 53 50 52 53 00 16 09 04 01 4A 53 |R SETSPRS.....JS|
00000110: 52 20 49 52 51 91 00 2A 09 0E 01 53 C0 44 42 59 |R IRQ..*...S.DBY|
00000120: 20 4A 4D 50 20 53 C0 44 42 59 00 48 09 22 01 49 | JMP S.DBY.H.".I|
00000130: 52 51 91 20 53 45 49 3A 4C 44 41 20 23 30 3A 53 |RQ. SEI:LDA #0:S|
00000140: 54 41 20 24 44 43 30 45 00 56 09 2C 01 53 54 41 |TA $DC0E.V.,.STA|
00000150: 20 31 36 33 38 33 00 6D 09 36 01 4C 44 41 20 23 | 16383.m.6.LDA #|
00000160: B3 49 52 51 3A 53 54 41 20 49 52 51 4C 00 84 09 |.IRQ:STA IRQL...|
00000170: 40 01 4C 44 41 20 23 B1 49 52 51 3A 53 54 41 20 |@.LDA #.IRQ:STA |
00000180: 49 52 51 48 00 99 09 4A 01 4C 44 41 20 23 32 34 |IRQH...J.LDA #24|
00000190: 39 3A 53 54 41 20 52 5A 49 00 AC 09 54 01 4C 44 |9:STA RZI...T.LD|
000001A0: 41 20 23 31 3A 53 54 41 20 49 4D 52 00 CF 09 5E |A #1:STA IMR...^|
000001B0: 01 4C 44 41 20 53 52 31 3A AF 20 23 31 32 37 3A |.LDA SR1:. #127:|
000001C0: 53 54 41 20 53 52 31 3A 43 4C 49 3A 52 54 53 00 |STA SR1:CLI:RTS.|
000001D0: E2 09 68 01 53 45 54 53 50 52 53 20 4C 44 58 20 |..h.SETSPRS LDX |
000001E0: 23 30 00 FA 09 72 01 53 45 54 4C 4F 4F 50 31 20 |#0...r.SETLOOP1 |
000001F0: 4C 44 41 20 54 41 42 31 2C 58 00 17 0A 7C 01 49 |LDA TAB1,X...|.I|
00000200: 4E 58 3A 43 50 58 20 23 31 37 3A 42 4E 45 20 53 |NX:CPX #17:BNE S|
00000210: 45 54 4C 4F 4F 50 31 00 3A 0A 86 01 4C 44 41 20 |ETLOOP1.:...LDA |
00000220: 23 32 35 35 3A 53 54 41 20 56 49 43 AA 32 31 3A |#255:STA VIC.21:|
00000230: 53 54 41 20 56 49 43 AA 32 39 00 45 0A 90 01 4C |STA VIC.29.E...L|
00000240: 44 58 20 23 30 00 6C 0A 9A 01 53 45 54 4C 4F 4F |DX #0.l...SETLOO|
00000250: 50 32 20 4C 44 41 20 54 41 42 32 2C 58 3A 53 54 |P2 LDA TAB2,X:ST|
00000260: 41 20 32 30 34 30 2C 58 3A 49 4E 58 00 84 0A A4 |A 2040,X:INX....|
00000270: 01 43 50 58 20 23 38 3A 42 4E 45 20 53 45 54 4C |.CPX #8:BNE SETL|
00000280: 4F 4F 50 32 00 98 0A AE 01 4C 44 58 20 23 30 3A |OOP2.....LDX #0:|
00000290: 4C 44 41 20 23 32 35 35 00 BD 0A B8 01 53 45 54 |LDA #255.....SET|
000002A0: 4C 4F 4F 50 33 20 53 54 41 20 24 33 46 43 30 2C |LOOP3 STA $3FC0,|
000002B0: 58 3A 49 4E 58 3A 43 50 58 20 23 36 33 00 CE 0A |X:INX:CPX #63...|
000002C0: C2 01 42 4E 45 20 53 45 54 4C 4F 4F 50 33 00 F7 |..BNE SETLOOP3..|
000002D0: 0A CC 01 4C 44 41 20 23 30 3A 53 54 41 20 24 33 |...LDA #0:STA $3|
000002E0: 46 43 30 3A 53 54 41 20 24 33 46 43 31 3A 53 54 |FC0:STA $3FC1:ST|
000002F0: 41 20 24 33 46 43 32 00 FF 0A D6 01 52 54 53 00 |A $3FC2.....RTS.|
00000300: 1F 0B E0 01 49 52 51 20 4C 44 41 20 23 31 39 3A |....IRQ LDA #19:|
00000310: 53 54 41 20 53 52 31 3A 4C 44 59 20 23 32 31 00 |STA SR1:LDY #21.|
00000320: 37 0B EA 01 4C 4F 4F 50 31 20 44 45 59 3A 42 4E |7...LOOP1 DEY:BN|
00000330: 45 20 4C 4F 4F 50 31 00 4A 0B F4 01 42 49 54 20 |E LOOP1.J...BIT |
00000340: 30 32 3A 4C 44 58 20 23 32 31 00 64 0B FE 01 4C |02:LDX #21.d...L|
00000350: 4F 4F 50 32 20 44 45 43 20 53 52 32 3A 49 4E 43 |OOP2 DEC SR2:INC|
00000360: 20 53 52 32 00 80 0B 08 02 4E 4F 50 3A 4E 4F 50 | SR2.....NOP:NOP|
00000370: 3A 4E 4F 50 3A 4E 4F 50 3A 4E 4F 50 3A 4E 4F 50 |:NOP:NOP:NOP:NOP|
00000380: 00 A0 0B 12 02 4E 4F 50 3A 4E 4F 50 3A 4E 4F 50 |.....NOP:NOP:NOP|
00000390: 3A 4E 4F 50 3A 4E 4F 50 3A 4E 4F 50 3A 4E 4F 50 |:NOP:NOP:NOP:NOP|
000003A0: 00 B9 0B 1C 02 42 49 54 20 30 32 3A 44 45 58 3A |.....BIT 02:DEX:|
000003B0: 42 4E 45 20 4C 4F 4F 50 32 00 DC 0B 26 02 4C 44 |BNE LOOP2...&.LD|
000003C0: 41 20 23 32 37 3A 53 54 41 20 53 52 31 3A 4C 44 |A #27:STA SR1:LD|
000003D0: 41 20 23 31 3A 53 54 41 20 49 52 52 00 EC 0B 30 |A #1:STA IRR...0|
000003E0: 02 4E 4F 50 3A 4E 4F 50 3A 4E 4F 50 00 FA 0B 3A |.NOP:NOP:NOP...:|
000003F0: 02 4A 4D 50 20 24 46 45 42 43 00 06 0C 3F 02 54 |.JMP $FEBC...?.T|
00000400: 41 42 31 20 B2 AC 00 27 0C 44 02 3A 20 20 20 20 |AB1 ...'.D.: |
00000410: 20 20 20 2E 42 59 54 45 20 32 34 31 2C 32 35 30 | .BYTE 241,250|
00000420: 2C 34 31 2C 32 35 30 00 48 0C 4E 02 3A 20 20 20 |,41,250.H.N.: |
00000430: 20 20 20 20 2E 42 59 54 45 20 38 39 2C 32 35 30 | .BYTE 89,250|
00000440: 2C 31 33 37 2C 32 35 30 00 62 0C 58 02 3A 20 20 |,137,250.b.X.: |
00000450: 20 20 20 20 20 2E 42 59 54 45 20 31 33 37 2C 32 | .BYTE 137,2|
00000460: 35 30 00 7C 0C 62 02 3A 20 20 20 20 20 20 20 2E |50.|.b.: .|
00000470: 42 59 54 45 20 31 33 37 2C 32 35 30 00 A0 0C 6C |BYTE 137,250...l|
00000480: 02 3A 20 20 20 20 20 20 20 2E 42 59 54 45 20 32 |.: .BYTE 2|
00000490: 35 2C 32 35 30 2C 37 33 2C 32 35 30 2C 31 39 33 |5,250,73,250,193|
000004A0: 00 AC 0C 71 02 54 41 42 32 20 B2 AC 00 CE 0C 76 |...q.TAB2 .....v|
000004B0: 02 3A 20 20 20 20 20 20 20 2E 42 59 54 45 20 32 |.: .BYTE 2|
000004C0: 35 35 2C 32 35 35 2C 32 35 35 2C 32 35 35 00 F0 |55,255,255,255..|
000004D0: 0C 80 02 3A 20 20 20 20 20 20 20 2E 42 59 54 45 |...: .BYTE|
000004E0: 20 32 35 35 2C 32 35 35 2C 32 35 35 2C 32 35 35 | 255,255,255,255|
000004F0: 00 00 00 |... |
....D..700:.OPT OO:..$C000.*.N.CLS . $E5
44.:.X.CRA . $DC0E.K...IRQL . $0314.\...
IRQH . $0315.L...VIC . $D000.|. .SR2 . $
D016.....RZI . $D012.....IMR . $D01A....
.IRR . $D019...H.SR1 . $D011.....START L
DA #00:STA $D020:STA $D021.....JSR CLS:L
DA #8:STA SR2:JSR SETSPRS.....JSR IRQ..*
...S.DBY JMP S.DBY.H.".IRQ. SEI:LDA #0:S
TA $DC0E.V.,.STA 16383.M.6.LDA #.IRQ:STA
IRQL...@.LDA #.IRQ:STA IRQH...J.LDA #24
9:STA RZI...T.LDA #1:STA IMR.O.^.LDA SR1
:. #127:STA SR1:CLI:RTS...H.SETSPRS LDX
#0...R.SETLOOP1 LDA TAB1,X...|.INX:CPX #
17:BNE SETLOOP1.:...LDA #255:STA VIC.21:
STA VIC.29.E...LDX #0.L...SETLOOP2 LDA T
AB2,X:STA 2040,X:INX.....CPX #8:BNE SETL
OOP2.....LDX #0:LDA #255.....SETLOOP3 ST
A $3FC0,X:INX:CPX #63.N.B.BNE SETLOOP3..
.L.LDA #0:STA $3FC0:STA $3FC1:STA $3FC2.
..V.RTS.....IRQ LDA #19:STA SR1:LDY #21.
7...LOOP1 DEY:BNE LOOP1.J...BIT 02:LDX #
21.D...LOOP2 DEC SR2:INC SR2.....NOP:NOP
:NOP:NOP:NOP:NOP. ...NOP:NOP:NOP:NOP:NOP
:NOP:NOP.....BIT 02:DEX:BNE LOOP2...&.LD
A #27:STA SR1:LDA #1:STA IRR...0.NOP:NOP
:NOP...:.JMP $FEBC...?.TAB1 ...'.D.:
.BYTE 241,250,41,250.H.N.: .BYT
E 89,250,137,250.B.X.: .BYTE 137,2
50.|.B.: .BYTE 137,250. .L.:
.BYTE 25,250,73,250,193...Q.TAB2 ...N.V
.: .BYTE 255,255,255,255.....:
.BYTE 255,255,255,255...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL