diff --git a/src/parse.prefs.a b/src/parse.prefs.a index 36ed0ef45..b56373d71 100644 --- a/src/parse.prefs.a +++ b/src/parse.prefs.a @@ -69,7 +69,7 @@ kCheat +STAY $00 ldy #0 lda ($00),y - beq .RTS + beq PREFRTS tay clc adc $FE @@ -79,9 +79,9 @@ kCheat sta ($FE),y bne - stx $FE - bcc .RTS + bcc PREFRTS inc $FF -.RTS rts +PREFRTS rts ;------------------------------------------------------------------------------ ; pref_get @@ -123,7 +123,7 @@ pref_get + !word $FDFD ; SMC bcs .useDefaultValue ; if pref key is not found, use default value ldx .store1+1 - beq .RTS ; if no OKVS to validate against, we're done + beq PREFRTS ; if no OKVS to validate against, we're done +STAY + +STAY PTR ldy #0 diff --git a/src/ui.attract.dhgr.a b/src/ui.attract.dhgr.a index 5bedb9844..31f5812b6 100644 --- a/src/ui.attract.dhgr.a +++ b/src/ui.attract.dhgr.a @@ -14,7 +14,7 @@ DHGRTitleSlideshow bit MachineStatus ; only run DHGR slideshow if we have 128K bvs + -- rts +DHGRRTS rts + jsr LoadDHGRTransition ; load transition effect code at $6000 jsr BlankDHGR ; switch to DHGR mode with initial blank screen jsr okvs_iter ; cycle through all listed DHGR files @@ -25,7 +25,7 @@ DHGRTitleSlideshow DHGRActionSlideshow bit MachineStatus ; only run DHGR slideshow if we have 128K - bvc - + bvc DHGRRTS jsr LoadDHGRTransition ; load transition effect code at $6000 jsr BlankDHGR ; switch to DHGR mode with initial blank screen jsr okvs_iter ; cycle through all listed DHGR files @@ -36,7 +36,7 @@ DHGRActionSlideshow DHGRSingle bit MachineStatus ; only show DHGR screenshots if we have 128K - bvc - + bvc DHGRRTS +STAY + jsr BlankDHGR ; switch to DHGR mode with initial blank screen jsr LoadDHRFile ; load DHGR file at $4000/main and $4000/aux