fix skip io1

This commit is contained in:
matthias@arch 2023-12-22 02:17:53 +01:00
parent 6c9a8bbc04
commit 1a5fc8cc1b

View File

@ -65,7 +65,7 @@ irq:
@irq_io1: @irq_io1:
lda IO1 + IO::IFR lda IO1 + IO::IFR
sta irq_via_ifr sta irq_via_ifr
bbr7 irq_via_ifr,@irq_io1 ; skip bbr7 irq_via_ifr,@irq_io2 ; skip
bbs2 irq_via_ifr,@irq_kb1 ; shit reg -> first 8 bits bbs2 irq_via_ifr,@irq_kb1 ; shit reg -> first 8 bits
bbs5 irq_via_ifr,@irq_kb2 ; timer -> last 3 bits bbs5 irq_via_ifr,@irq_kb2 ; timer -> last 3 bits
@irq_io2: @irq_io2:
@ -82,7 +82,8 @@ irq:
lda #$ff lda #$ff
sta IO1 + IO::IFR sta IO1 + IO::IFR
sta IO2 + IO::IFR sta IO2 + IO::IFR
bra @irq_return rti
; bra @irq_return
@irq_keypad: @irq_keypad:
jsr kp::read_irq jsr kp::read_irq
bra @irq_return bra @irq_return
@ -90,11 +91,11 @@ irq:
jsr spi_p::read jsr spi_p::read
bra @irq_return bra @irq_return
@irq_kb1: @irq_kb1:
Print "$3000" PrintNC "<30>"
jsr $3000 jsr $3000
bra @irq_return bra @irq_return
@irq_kb2: @irq_kb2:
Print "$3100" PrintNC "<31>"
jsr $3100 jsr $3100
bra @irq_return bra @irq_return
; @irq_dht: ; @irq_dht: