Aga 2 flashing

This commit is contained in:
cassidy
2021-04-22 17:05:04 -04:00
parent 6a34b5cbc4
commit 452a2db03d
2 changed files with 20 additions and 0 deletions

View File

@@ -106,3 +106,20 @@ ConditionalGTFlash:
INY #2
INX #2 : CPX.b #$10 : BNE --
RTL
;================================================================================
ConditionalRedFlash:
REP #$20
LDA.l DisableFlashing : BEQ +
LDA $00,X
LDA.w #$1D59 : LDA $7EC5DA
LDA.w #$25FF : LDA $7EC5DC
LDA.w #$0000
RTL
+
LDA $00
LDA.w #$1D59 : STA $7EC5DA
LDA.w #$25FF : STA $7EC5DC
LDA.w #$001A
RTL

View File

@@ -753,6 +753,9 @@ JML DDMConditionalLightning
;--------------------------------------------------------------------------------
org $07FACB ; <- 3FACB - Bank0E.asm : 4773 (REP #$20 : LDA #$F531, Y)
JSL.l ConditionalGTFlash : BRA + : NOP #11 : +
;--------------------------------------------------------------------------------
org $0AFF48 ; <- 57F48 - Bank0A.asm : 4935 (REP #$20 : LDA $7EC3DA)
JSL.l ConditionalRedFlash : BRA + : NOP #13 : +
;================================================================================
; Ice Floor Toggle
;--------------------------------------------------------------------------------