1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
|
;
; IRQ handling (PCE version)
;
.export initirq, doneirq, IRQStub, __nmi
.import __INTERRUPTOR_COUNT__, callirq_y
.include "pce.inc"
.include "extzp.inc"
; ------------------------------------------------------------------------
.segment "ONCE"
; a constructor
;
initirq:
rts
; ------------------------------------------------------------------------
.code
; a destructor
;
doneirq:
rts
; ------------------------------------------------------------------------
IRQStub:
phy
; Save the display-source flags (and, release the interrupt).
;
ldy VDC_CTRL
sty vdc_flags
ldy #<(__INTERRUPTOR_COUNT__ * 2)
beq @L1
phx
pha
jsr callirq_y
pla
plx
@L1: ply
__nmi: rti
|
