Advertisement
Guest User

Untitled

a guest
Sep 17th, 2016
103
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.80 KB | None | 0 0
  1. SHOOTFIRE:
  2. PHY
  3. JSR SUB_HORZ_POS
  4. TYA
  5. STA $157C,x
  6. PLY
  7. LDA #$01
  8. STA $C2,x
  9.  
  10. STZ $1534,x
  11. LDY #$01 ; number of projectiles to spawn
  12. - TYA ; \
  13. STA $00 ; / get number within loop
  14. PHY
  15. JSR .spawnfireball ; spawn fireball
  16. PLY
  17. DEY
  18. BPL -
  19. RTS
  20.  
  21. .spawnfireball
  22. LDY #$07 ; number of slots to check for (#$07 = 8 slots; leaves the last 2 slots for Mario's fireballs)
  23. - LDA $170B,y
  24. BEQ Extra1
  25. DEY
  26. BPL -
  27. RTS
  28. Extra1:
  29. LDA #$02
  30. STA $170B,y
  31.  
  32. LDA $E4,x
  33. STA $171F,y
  34. LDA $14E0,x
  35. STA $1733,y
  36. LDA $D8,x
  37. STA $1715,y
  38. LDA $14D4,x
  39. STA $1729,y
  40.  
  41. PHY
  42. LDY $157C,x
  43. LDA .fireball_xspeed,y
  44. PLY
  45. STA $1747,y
  46. PHY
  47. LDY $00
  48. LDA .fireball_yspeed,y
  49. PLY
  50. STA $173D,y
  51.  
  52. LDA #$06
  53. STA $1DFC
  54. LDA #$FF
  55. STA $176F,y
  56. RTS
  57. .fireball_xspeed
  58. db $16,$EA
  59. .fireball_yspeed
  60. db $00,$FB
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement