Guest User

Untitled

a guest
Jan 21st, 2018
62
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 8.10 KB | None | 0 0
  1. ;-----------------------INIT------------------------------;
  2.  
  3. CODE_129F96: 74 86 STZ $86,x
  4. CODE_129F98: 74 79 STZ $79,x
  5. CODE_129F9A: A9 00 LDA #$00
  6. CODE_129F9C: 95 B1 STA $B1,x
  7. CODE_129F9E: 9D 2F 04 STA $042F,x
  8. CODE_129FA1: 95 A8 STA $A8,x
  9. CODE_129FA3: 95 9F STA $9F,x
  10. CODE_129FA5: 9D 4A 04 STA $044A,x
  11. CODE_129FA8: 95 5B STA $5B,x
  12. CODE_129FAA: 9D 38 04 STA $0438,x
  13. CODE_129FAD: 9D 53 04 STA $0453,x
  14. CODE_129FB0: 9D CD 04 STA $04CD,x
  15. CODE_129FB3: 9D D7 04 STA $04D7,x
  16. CODE_129FB6: 9D 5C 04 STA $045C,x
  17. CODE_129FB9: 9D 77 04 STA $0477,x
  18. CODE_129FBC: 9D 80 04 STA $0480,x
  19. CODE_129FBF: 9D 65 04 STA $0465,x
  20. CODE_129FC2: 9D 02 07 STA $0702,x
  21. CODE_129FC5: 9D 00 0D STA $0D00,x
  22. CODE_129FC8: 95 47 STA $47,x
  23. CODE_129FCA: 20 7A 9F JSR CODE_129F7A
  24. CODE_129FCD: 20 DA C1 JSR CODE_12C1DA
  25. CODE_129FD0: C8 INY
  26. CODE_129FD1: 98 TYA
  27. CODE_129FD2: 95 6F STA $6F,x
  28. CODE_129FD4: B9 B0 97 LDA $97B0,y ;\ Something with X speed?
  29. CODE_129FD7: 95 3D STA $3D,x ;/
  30. CODE_129FD9: BD 6E 04 LDA $046E,x
  31. CODE_129FDC: 29 40 AND #$40
  32. CODE_129FDE: F0 02 BEQ CODE_129FE2
  33. CODE_129FE0: 16 3D ASL $3D,x ; Multiply X speed.
  34. CODE_129FE2: 60 RTS
  35.  
  36. CODE_129F7A: B4 90 LDY $90,x ; Put sprite numbers in Y?
  37. CODE_129F7C: B9 45 CC LDA $CC45,y
  38. CODE_129F7F: 29 7F AND #$7F
  39. CODE_129F81: 95 65 STA $65,x
  40. CODE_129F83: B9 8C CC LDA $CC8C,y
  41. CODE_129F86: 9D 6E 04 STA $046E,x
  42. CODE_129F89: B9 1A CD LDA $CD1A,y
  43. CODE_129F8C: 9D 89 04 STA $0489,x
  44. CODE_129F8F: B9 D3 CC LDA $CCD3,y
  45. CODE_129F92: 9D 92 04 STA $0492,x
  46. CODE_129F95: 60 RTS
  47.  
  48. CODE_12C1DA: A5 28 LDA $28 ;\
  49. CODE_12C1DC: F5 29 SBC $29,x ; | Subtract players X postion by sprites, and store to $0F
  50. CODE_12C1DE: 85 0F STA $0F ;/
  51. CODE_12C1E0: A5 14 LDA $14 ;\ Players X postion high byte
  52. CODE_12C1E2: A0 00 LDY #$00 ; | put #$00 in Y
  53. CODE_12C1E4: F5 15 SBC $15,x ; | sprites X postion high byte
  54. CODE_12C1E6: B0 01 BCS CODE_12C1E9 ; | if its greater return
  55. CODE_12C1E8: C8 INY ;/ Increase Y
  56. CODE_12C1E9: 60 RTS
  57.  
  58. ;-----------------------MAIN----------------------------;
  59.  
  60. CODE_12AEC3: A5 EE LDA $EE ;\ If $EE is 0
  61. CODE_12AEC5: F0 03 BEQ CODE_12AECA ;/ branch
  62. CODE_12AEC7: 4C 3B A8 JMP CODE_12A83B ; other wise jump
  63.  
  64.  
  65. CODE_12AECA: A0 FC LDY #$FC ;\
  66. CODE_12AECC: A5 10 LDA $10 ; |
  67. CODE_12AECE: 29 20 AND #$20 ; |
  68. CODE_12AED0: F0 02 BEQ CODE_12AED4 ; | Every couple of frames change X speed
  69. CODE_12AED2: A0 04 LDY #$04 ; |
  70. CODE_12AED4: 94 3D STY $3D,x ;/
  71. CODE_12AED6: A9 F8 LDA #$F8 ;\ Consistant Y speed
  72. CODE_12AED8: 95 47 STA $47,x ;/
  73. CODE_12AEDA: 20 97 B4 JSR CODE_12B497 ; Apply speed?
  74.  
  75. CODE_12AEDD: A5 ED LDA $ED
  76. CODE_12AEDF: 29 08 AND #$08
  77. CODE_12AEE1: 05 EE ORA $EE
  78. CODE_12AEE3: D0 47 BNE CODE_12AF2C
  79. CODE_12AEE5: C2 10 REP #$10
  80. CODE_12AEE7: AC F6 02 LDY $02F6
  81. CODE_12AEEA: AD 29 04 LDA $0429
  82. CODE_12AEED: 99 00 08 STA $0800,y
  83. CODE_12AEF0: 99 04 08 STA $0804,y
  84. CODE_12AEF3: AD 2C 04 LDA $042C
  85. CODE_12AEF6: 99 01 08 STA $0801,y
  86. CODE_12AEF9: 18 CLC
  87. CODE_12AEFA: 69 08 ADC #$08
  88. CODE_12AEFC: 99 05 08 STA $0805,y
  89. CODE_12AEFF: A9 8A LDA #$8A
  90. CODE_12AF01: 99 02 08 STA $0802,y
  91. CODE_12AF04: A9 9A LDA #$9A
  92. CODE_12AF06: 99 06 08 STA $0806,y
  93. CODE_12AF09: A5 10 LDA $10
  94. CODE_12AF0B: 29 20 AND #$20
  95. CODE_12AF0D: 49 20 EOR #$20
  96. CODE_12AF0F: 0A ASL A
  97. CODE_12AF10: 09 22 ORA #$22
  98. CODE_12AF12: 99 03 08 STA $0803,y
  99. CODE_12AF15: 99 07 08 STA $0807,y
  100. CODE_12AF18: 5A PHY
  101. CODE_12AF19: C2 20 REP #$20
  102. CODE_12AF1B: 98 TYA
  103. CODE_12AF1C: 4A LSR A
  104. CODE_12AF1D: 4A LSR A
  105. CODE_12AF1E: A8 TAY
  106. CODE_12AF1F: E2 20 SEP #$20
  107. CODE_12AF21: A9 00 LDA #$00
  108. CODE_12AF23: 99 20 0A STA $0A20,y
  109. CODE_12AF26: 99 21 0A STA $0A21,y
  110. CODE_12AF29: 7A PLY
  111. CODE_12AF2A: E2 10 SEP #$10
  112. CODE_12AF2C: 60 RTS
  113.  
  114.  
  115. CODE_12A83B: BC 41 04 LDY $0441,x
  116. CODE_12A83E: 30 06 BMI CODE_12A846
  117. CODE_12A840: B1 CC LDA ($CC),y
  118. CODE_12A842: 29 7F AND #$7F
  119. CODE_12A844: 91 CC STA ($CC),y
  120. CODE_12A846: 74 51 STZ $51,x
  121. CODE_12A848: 9E 2F 04 STZ $042F,x
  122. CODE_12A84B: 60 RTS
  123.  
  124. CODE_12B497: 20 EF C1 JSR CODE_12C1EF ;\ uh..
  125. CODE_12B49A: 4C EA C1 JMP CODE_12C1EA ;/
  126.  
  127.  
  128. CODE_12C1EA: 8A TXA
  129. CODE_12C1EB: 18 CLC
  130. CODE_12C1EC: 69 0A ADC #$0A
  131. CODE_12C1EE: AA TAX
  132. CODE_12C1EF: B5 3D LDA $3D,x
  133. CODE_12C1F1: 18 CLC
  134. CODE_12C1F2: 7D CD 04 ADC $04CD,x
  135. CODE_12C1F5: 48 PHA
  136. CODE_12C1F6: 0A ASL A
  137. CODE_12C1F7: 0A ASL A
  138. CODE_12C1F8: 0A ASL A
  139. CODE_12C1F9: 0A ASL A
  140. CODE_12C1FA: 85 01 STA $01
  141. CODE_12C1FC: 68 PLA
  142. CODE_12C1FD: 4A LSR A
  143. CODE_12C1FE: 4A LSR A
  144. CODE_12C1FF: 4A LSR A
  145. CODE_12C200: 4A LSR A
  146. CODE_12C201: C9 08 CMP #$08
  147. CODE_12C203: 90 02 BCC CODE_12C207
  148. CODE_12C205: 09 F0 ORA #$F0
  149. CODE_12C207: 85 00 STA $00
  150. CODE_12C209: A0 00 LDY #$00
  151. CODE_12C20B: 0A ASL A
  152. CODE_12C20C: 90 01 BCC CODE_12C20F
  153. CODE_12C20E: 88 DEY
  154. CODE_12C20F: 84 02 STY $02
  155. CODE_12C211: BD 08 04 LDA $0408,x
  156. CODE_12C214: 18 CLC
  157. CODE_12C215: 65 01 ADC $01
  158. CODE_12C217: 9D 08 04 STA $0408,x
  159. CODE_12C21A: B5 29 LDA $29,x
  160. CODE_12C21C: 65 00 ADC $00
  161. CODE_12C21E: 95 29 STA $29,x
  162. CODE_12C220: 26 01 ROL $01
  163. CODE_12C222: E0 0A CPX #$0A
  164. CODE_12C224: B0 17 BCS CODE_12C23D
  165. CODE_12C226: A9 00 LDA #$00
  166. CODE_12C228: 9D A4 04 STA $04A4,x
  167. CODE_12C22B: B5 90 LDA $90,x
  168. CODE_12C22D: C9 1B CMP #$1B
  169. CODE_12C22F: F0 0C BEQ $0C
  170. CODE_12C231: C9 0F CMP #$0F
  171. CODE_12C233: F0 08 BEQ CODE_12C23D
  172. CODE_12C235: C9 10 CMP #$10
  173. CODE_12C237: F0 04 BEQ CODE_12C23D
  174. CODE_12C239: A4 EB LDY $EB
  175. CODE_12C23B: F0 08 BEQ CODE_12C245
  176. CODE_12C23D: 46 01 LSR $01
  177. CODE_12C23F: B5 15 LDA $15,x
  178. CODE_12C241: 65 02 ADC $02
  179. CODE_12C243: 95 15 STA $15,x
  180. CODE_12C245: A6 12 LDX $12
  181. CODE_12C247: 60 RTS
Add Comment
Please, Sign In to add comment