TILEMAP:
db $C0,$E0,$E8,$80,$A0,$A0,$80,$82,$A2,$A2,$82,$84,$A4,$C4,$E4,$86


XOff:
	db $00,$10,$20,$30
	db $00,$10,$20,$30
	db $00,$10,$20,$30
	db $00,$10,$20,$30
YOff:
	db $00,$00,$00,$00
	db $10,$10,$10,$10
	db $20,$20,$20,$20
	db $30,$30,$30,$30
Tilemap:
	db $80,$82,$84,$86
	db $A0,$A2,$A4,$A6
	db $C0,$C2,$C4,$C6
	db $E0,$E2,$E4,$E6


SUB_GFX:
	%GetDrawInfo()

	STZ $04

	LDA !1602,x
	CMP #$03
	BCS +

	LDA #$80
	STA $04

	+


	LDA !15F6,x
	STA $02


	LDA !157C,x
	BEQ +

	PHX

	LDX #$0F
	-
    LDA $00
	CLC
	ADC XOff,x
    STA $0300|!Base2,y
    LDA $01
	CLC
	ADC YOff,x
    STA $0301|!Base2,y
    LDA.w Tilemap,x
	SEC
	SBC $04
    STA $0302|!Base2,y
	PHX
	LDX $03
    LDA $02
	ORA $64
    STA $0303|!Base2,y
	PLX
	INY #4
	DEX
	BPL -

	BRA ++

	+

	PHX

	LDX #$0F
	-
    LDA $00
	CLC
	ADC #$30
	SEC
	SBC XOff,x
    STA $0300|!Base2,y
    LDA $01
	CLC
	ADC YOff,x
    STA $0301|!Base2,y
    LDA.w Tilemap,x
	SEC
	SBC $04
    STA $0302|!Base2,y
	PHX
	LDX $03
	LDA $02
	ORA $64
	ORA #$40
    STA $0303|!Base2,y
	PLX
	INY #4
	DEX
	BPL -

	++
	PLX

	LDY #$02
	LDA #$0F
	JSL $01B7B3|!BankB
	RTS