Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- LoadPlayingField:
- LDA $2002
- LDA #$20
- STA $2006
- LDA #$C0
- STA $2006
- LDA PLAYFIELD_ptr
- ASL A
- TAY
- LDA playfield_pointer_table, y
- STA AddrLow
- LDA playfield_pointer_table+1, y
- STA AddrHigh
- LDA #$00
- STA MetaRow
- .MetaRowLoop:
- LDA #$00
- STA MetaTile
- LDY #$00
- .MetaTileLoop:
- LDA [AddrLow],y
- STA $2007
- CLC
- ADC #$01
- STA $2007
- CLC
- ADC #$01
- STA $2007
- CLC
- ADC #$01
- STA $2007
- INY
- .InnerLoop:
- LDA MetaTile
- CMP #$07
- BEQ .OuterLoop
- INC MetaTile
- CMP #$07
- BNE .MetaTileLoop
- .OuterLoop:
- LDA MetaRow
- CMP #$05
- BEQ .End
- INC MetaRow
- CMP #$05
- BNE .MetaRowLoop
- .End:
- RTS
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement