Advertisement
Guest User

Untitled

a guest
Aug 18th, 2017
68
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.66 KB | None | 0 0
  1. LoadPlayingField:
  2. LDA $2002
  3. LDA #$20
  4. STA $2006
  5. LDA #$C0
  6. STA $2006
  7.  
  8. LDA PLAYFIELD_ptr
  9. ASL A
  10. TAY
  11. LDA playfield_pointer_table, y
  12. STA AddrLow
  13. LDA playfield_pointer_table+1, y
  14. STA AddrHigh
  15.  
  16. LDA #$00
  17. STA MetaRow
  18. .MetaRowLoop:
  19. LDA #$00
  20. STA MetaTile
  21. LDY #$00
  22. .MetaTileLoop:
  23. LDA [AddrLow],y
  24. STA $2007
  25. CLC
  26. ADC #$01
  27. STA $2007
  28. CLC
  29. ADC #$01
  30. STA $2007
  31. CLC
  32. ADC #$01
  33. STA $2007
  34. INY
  35. .InnerLoop:
  36. LDA MetaTile
  37. CMP #$07
  38. BEQ .OuterLoop
  39. INC MetaTile
  40. CMP #$07
  41. BNE .MetaTileLoop
  42. .OuterLoop:
  43. LDA MetaRow
  44. CMP #$05
  45. BEQ .End
  46. INC MetaRow
  47. CMP #$05
  48. BNE .MetaRowLoop
  49. .End:
  50. RTS
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement