hook IRQ early, fix Berzap MB config

This commit is contained in:
Peter Ferrie 2024-01-17 22:43:57 -08:00
parent 933432ea3e
commit 1f81a4f130
2 changed files with 12 additions and 5 deletions

View File

@ -165,6 +165,11 @@
jsr init ; initialize and relocate ProRWTS2 to $D400 in RAM bank 2 jsr init ; initialize and relocate ProRWTS2 to $D400 in RAM bank 2
; ProRWTS2 disk-data live at $D000-D3FF ; ProRWTS2 disk-data live at $D000-D3FF
sei ; we're about to overwrite ProDOS's IRQ handler sei ; we're about to overwrite ProDOS's IRQ handler
lda #<NOIRQ
sta $3FE
lda #>NOIRQ ; in case another routine re-enables them
sta $3FF
cli
ldx #$00 ; relocate program code to top of language card ldx #$00 ; relocate program code to top of language card
; since we end at $0000 now, adjust low offset to avoid destroying zpage ; since we end at $0000 now, adjust low offset to avoid destroying zpage
@FM lda FirstMover - (RELBASE & $FF),x @FM lda FirstMover - (RELBASE & $FF),x
@ -282,6 +287,8 @@ FoundMockingboardCallback
ora #$B0 ora #$B0
jmp ROM_COUT jmp ROM_COUT
NOIRQ rti
!src "src/4cade.branding.a" !src "src/4cade.branding.a"
!src "src/4cade.version.a" !src "src/4cade.version.a"

View File

@ -99,14 +99,14 @@ setopt
ldy #0 ldy #0
sty $382 ; joystick sty $382 ; joystick
ldx #2 ldx #2
iny ; Sound/Speech I iny
+READ_RAM2_NO_WRITE +READ_RAM2_NO_WRITE
bit MockingboardStuff bit MockingboardStuff
bmi + ; SC-01 bmi + ; Sounds / Speech (mono, SC-01)
ldx #0 dex
dey ; Sound II dey
bvc + ; no speech bvc + ; Sound II / A (stereo, no speech)
ldx #4 ldx #4
ldy #2 ; Mockingboard "C" ldy #2 ; Mockingboard "C"
+ stx $380 + stx $380