Moved IRQ hooking / unhooking from startup code to constructor / destructor to avoid linking in the hooking / unhooking code (and callirq) for the majority of cc65 prorams not linking in interruptors.
git-svn-id: svn://svn.cc65.org/cc65/trunk@5985 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
49
libsrc/atari/irq.s
Normal file
49
libsrc/atari/irq.s
Normal file
@@ -0,0 +1,49 @@
|
||||
;
|
||||
; IRQ handling (ATARI version)
|
||||
;
|
||||
|
||||
.export initirq, doneirq
|
||||
.import callirq
|
||||
|
||||
.include "atari.inc"
|
||||
|
||||
; ------------------------------------------------------------------------
|
||||
|
||||
.segment "INIT"
|
||||
|
||||
initirq:
|
||||
lda VVBLKI
|
||||
ldx VVBLKI+1
|
||||
sta IRQInd+1
|
||||
stx IRQInd+2
|
||||
lda #6
|
||||
ldy #<IRQStub
|
||||
ldx #>IRQStub
|
||||
jsr SETVBV
|
||||
rts
|
||||
|
||||
; ------------------------------------------------------------------------
|
||||
|
||||
.code
|
||||
|
||||
doneirq:
|
||||
lda #6
|
||||
ldy IRQInd+1
|
||||
ldx IRQInd+2
|
||||
jsr SETVBV
|
||||
rts
|
||||
|
||||
; ------------------------------------------------------------------------
|
||||
|
||||
.segment "LOWCODE"
|
||||
|
||||
IRQStub:
|
||||
cld ; Just to be sure
|
||||
jsr callirq ; Call the functions
|
||||
jmp IRQInd ; Jump to the saved IRQ vector
|
||||
|
||||
; ------------------------------------------------------------------------
|
||||
|
||||
.data
|
||||
|
||||
IRQInd: jmp $0000
|
||||
Reference in New Issue
Block a user