00000000: 00 10 02 00 3B 20 41 20 53 48 4F 52 54 20 44 45 |....; A SHORT DE|
00000010: 4D 4F 20 46 4F 52 20 52 41 53 54 45 52 20 49 4E |MO FOR RASTER IN|
00000020: 54 45 52 52 55 50 54 53 00 02 00 3B 20 57 52 49 |TERRUPTS...; WRI|
00000030: 54 54 45 4E 20 42 59 20 50 45 54 45 52 20 4B 41 |TTEN BY PETER KA|
00000040: 4C 44 49 20 49 4E 20 31 39 38 3F 00 02 00 2A 24 |LDI IN 198?...*$|
00000050: 36 30 30 30 00 D3 45 49 00 CC 44 41 20 23 3C 49 |6000..EI..DA #<I|
00000060: 52 51 00 D3 54 41 20 24 33 31 34 00 CC 44 41 20 |RQ..TA $314..DA |
00000070: 23 3E 49 52 51 00 D3 54 41 20 24 33 31 35 00 00 |#>IRQ..TA $315..|
00000080: CC 44 41 20 23 31 00 D3 54 41 20 24 44 30 31 41 |.DA #1..TA $D01A|
00000090: 00 CC 44 41 20 24 44 30 31 31 00 C1 4E 44 20 23 |..DA $D011..ND #|
000000A0: 24 37 46 00 D3 54 41 20 24 44 30 31 31 00 CC 44 |$7F..TA $D011..D|
000000B0: 41 20 23 33 32 00 D3 54 41 20 24 44 30 31 32 00 |A #32..TA $D012.|
000000C0: CC 44 41 20 23 24 37 46 00 D3 54 41 20 24 44 43 |.DA #$7F..TA $DC|
000000D0: 30 44 00 CC 44 41 20 23 30 00 D3 54 41 20 35 33 |0D..DA #0..TA 53|
000000E0: 32 38 30 00 C3 4C 49 00 D2 54 53 00 02 00 4D 49 |280..LI..TS...MI|
000000F0: 2F 2E 42 20 31 30 34 00 48 4F 4C 2F 2E 42 20 31 |/.B 104.HOL/.B 1|
00000100: 36 00 02 00 49 52 51 2F 00 D3 45 49 00 CC 44 41 |6...IRQ/..EI..DA|
00000110: 20 24 44 30 31 39 00 D3 54 41 20 24 44 30 31 39 | $D019..TA $D019|
00000120: 00 CE 4F 50 3A 4E 4F 50 3A 4E 4F 50 3A 4E 4F 50 |..OP:NOP:NOP:NOP|
00000130: 00 C9 4E 43 20 35 33 32 38 30 00 CE 4F 50 3A 4E |..NC 53280..OP:N|
00000140: 4F 50 3A 4E 4F 50 3A 4E 4F 50 00 CE 4F 50 3A 4E |OP:NOP:NOP..OP:N|
00000150: 4F 50 3A 4E 4F 50 3A 4E 4F 50 00 CE 4F 50 3A 4E |OP:NOP:NOP..OP:N|
00000160: 4F 50 3A 4E 4F 50 3A 4E 4F 50 00 CE 4F 50 3A 4E |OP:NOP:NOP..OP:N|
00000170: 4F 50 3A 4E 4F 50 3A 4E 4F 50 00 CE 4F 50 3A 4E |OP:NOP:NOP..OP:N|
00000180: 4F 50 3A 4E 4F 50 3A 4E 4F 50 00 CE 4F 50 00 CC |OP:NOP:NOP..OP..|
00000190: 44 41 20 48 4F 4C 00 C3 4C 43 00 C1 44 43 20 23 |DA HOL..LC..DC #|
000001A0: 34 00 D3 54 41 20 24 44 30 31 32 00 D3 54 41 20 |4..TA $D012..TA |
000001B0: 48 4F 4C 00 C4 45 43 20 35 33 32 38 30 00 C3 4D |HOL..EC 53280..M|
000001C0: 50 20 23 30 00 C2 45 51 20 4F 55 54 00 CA 4D 50 |P #0..EQ OUT..MP|
000001D0: 20 24 45 41 38 31 00 4F 55 54 2F 00 CA 4D 50 20 | $EA81.OUT/..MP |
000001E0: 24 45 41 33 31 00 02 00 5D 2E 24 38 30 30 30 00 |$EA31...].$8000.|
000001F0: 01 |. |
....; A SHORT DEMO FOR RASTER INTERRUPTS
...; WRITTEN BY PETER KALDI IN 198?...*$
6000.SEI.LDA #<IRQ.STA $314.LDA #>IRQ.ST
A $315..LDA #1.STA $D01A.LDA $D011.AND #
$7F.STA $D011.LDA #32.STA $D012.LDA #$7F
.STA $DC0D.LDA #0.STA 53280.CLI.RTS...MI
/.B 104.HOL/.B 16...IRQ/.SEI.LDA $D019.S
TA $D019.NOP:NOP:NOP:NOP.INC 53280.NOP:N
OP:NOP:NOP.NOP:NOP:NOP:NOP.NOP:NOP:NOP:N
OP.NOP:NOP:NOP:NOP.NOP:NOP:NOP:NOP.NOP.L
DA HOL.CLC.ADC #4.STA $D012.STA HOL.DEC
53280.CMP #0.BEQ OUT.JMP $EA81.OUT/.JMP
$EA31...].$8000..
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL