Advertisement
Erik557

Untitled

Jun 8th, 2016
89
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. SubGFX:
  2.     JSR GetDrawInfo
  3.    
  4.     LDA $14
  5.     LSR #3
  6.     AND #$01
  7.     ASL #3
  8.     STA $03
  9.    
  10.     PHX
  11.     LDX #$05
  12. .Loop
  13.     PHX
  14.     TXA
  15.     ORA $03
  16.     TAX
  17.    
  18.     LDA $00
  19.     CLC
  20.     ADC .XDisp,x
  21.     STA $0300,y
  22.    
  23.     LDA $01
  24.     CLC
  25.     ADC .YDisp,x
  26.     STA $0301,y
  27.    
  28.     LDA .Tilemap,x
  29.     STA $0302,y
  30.    
  31.     LDA .Props,x
  32.     STA $0303,y
  33.    
  34.     INY #4
  35.     PLX
  36.     DEX
  37.     BPL .Loop
  38.     PLX
  39.    
  40.     LDY #$02
  41.     LDA #$05
  42.     JSL $01B7B3
  43.     RTS
  44.    
  45. .Tilemap
  46.     db $C0,$E0,$A0,$EE,$88,$8A,$00,$00
  47.     db $C4,$86,$A4,$A6,$8C,$8E,$00,$00
  48. .XDisp
  49.     db $00,$10,$00,$10,$00,$10,$00,$00
  50.     db $00,$10,$00,$10,$00,$10,$00,$00
  51. .YDisp
  52.     db $00,$00,$10,$10,$20,$20,$00,$00
  53.     db $00,$00,$10,$10,$20,$20,$00,$00
  54. .Props
  55.     db $29,$29,$29,$29,$2B,$2B,$00,$00
  56.     db $29,$29,$29,$29,$2B,$2B,$00,$00
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement