;Tables for Frames:
;###############  Tables for FPP1   #############
PROPERTIES_Flash1: db $05,$05,$45,$45,$0B,$0B
TILEMAP_Flash1: db $C0,$E0,$A0,$EE,$88,$8A
XDISP_Flash1: db $F0,$00,$00,$F0,$F0,$00
YDISP_Flash1: db $00,$00,$10,$10,$20,$20

;###############  Tables for FPP2   #############
PROPERTIES_Flash2: db $05,$05,$05,$05,$0B,$0B
TILEMAP_Flash2: db $C4,$86,$A4,$A6,$8C,$8E
XDISP_Flash2: db $F0,$00,$F0,$00,$F0,$00
YDISP_Flash2: db $00,$00,$10,$10,$20,$20

FlashGFX:

JSR MainFlash_Start

RTS

;########################################################################


MainFlash_Start:
LDA $14
LSR A
LSR A
LSR A
AND #$01
MainFlash_Frame_1:
CMP #$00
BNE MainFlash_Frame_2
JSR Flash1_Start
RTS

MainFlash_Frame_2:
CMP #$01
BNE MainFlash_End_Code
JSR Flash2_Start

MainFlash_End_Code:
RTS

;########################################################################
FlashTable:
    db $08,$08,$0C,$0C,$0C,$06,$06,$06

Flash1_Start:
JSR GetDrawInfo

PHX
LDX #$05
Loop_Flash1:
LDA $00
CLC
ADC XDISP_Flash1,x
STA $0300,y

LDA $01
CLC
ADC YDISP_Flash1,x
STA $0301,y

LDA TILEMAP_Flash1,x
STA $0302,y

LDA PROPERTIES_Flash1,x
ORA $64
STA $0303,y

INY
INY
INY
INY

DEX
BPL Loop_Flash1
PLX

LDY #$02
LDA #$05
JSL $01B7B3
RTS


;########################################################################



Flash2_Start:
JSR GetDrawInfo

PHX
LDX #$05
Loop_Flash2:
LDA $00
CLC
ADC XDISP_Flash2,x
STA $0300,y

LDA $01
CLC
ADC YDISP_Flash2,x
STA $0301,y

LDA TILEMAP_Flash2,x
STA $0302,y

LDA PROPERTIES_Flash2,x
ORA $64
STA $0303,y

INY
INY
INY
INY

DEX
BPL Loop_Flash2
PLX

LDY #$02
LDA #$05
JSL $01B7B3
RTS