[FC][魂斗罗][互相伤害][END]

yandagui

先祝福大家五一快乐， 虽然来晚了哈, 废话就不多说了
1 |- q1 Z+ z* s0 ]' {5 e4 k2 C1.选择键切换子弹（为了更快杀死对方）
2.杀死对方自己加命

1. ;[FC][魂斗罗][互相伤害][END]
   
2. ;20200505
   - J  B* D) \2 ~/ {& q% E  }6 Z
3. 
   . s& a3 \( q. m1 `$ I/ o
4. .ORG $8960
   6 H2 F( E- }; I# y4 t/ @4 H
5. 
   ( ]3 L* G/ h; M& i
6. P1_STATUE          = $90      ;状态
   
7. P1_INVINCIBLE_A    = $AE      ;透明无敌
   
8. P1_INVINCIBLE_B    = $B0      ;闪烁无敌
   , T$ c  g1 B- P. k
9. P1_REST            = $32      ;P1剩余生命
   - T4 e  d: M# C1 ]
10. LIVE_VALUE         = $01      ;活着数值
    
11. P1_ACTION          = $D6      ;趴下
    " s+ D! Y# A! c/ R
12. P1_FACE            = $D8      ;P1面向
    
13. LAY_VALUE          = $17      ;趴下数值
    
14. JUMP_VALUE         = $08      ;趴下数值
    
15. DIVING_VALUE       = $18      ;潜水数值
    
16. P1_X               = $0334    ;P1 X坐标
    
17. P2_X               = $0335    ;P2 X坐标
    
18. P1_Y               = $031A    ;P1 Y坐标
    7 Y& ^& [( M" R1 a
19. P2_Y               = $031B    ;P2 Y坐标
    9 ^- L/ y  \3 E% c+ |4 K5 o
20. Bullet_X           = $03C8    ;子弹X坐标
    
21. Bullet_Y           = $03B8    ;子弹Y坐标
    ( m0 m$ H' ?( B- t+ p
22. Bullet_Owner       = $0448    ;子弹所属者
    & l' S7 W% N2 d9 b1 C; a& h& ~7 e
23. Hit_Offet_X        = $01C0    ;命中误差X
    2 t6 o( j" [0 ^1 e3 z
24. Hit_Offet_Y        = $01C1    ;命中误差Y
      L& R& f! u! E  T3 C8 v
25. State_Offet_X      = $01C2    ;动作误差X
    8 Q9 X8 {( ?" j) k
26. State_Offet_Y      = $01C3    ;动作误差X
    
27. Offet_X_Check      = $01C4    ;坐标差X
    & v' y. I1 q& `
28. Offet_Y_Check      = $01C5    ;坐标差Y
    ; U6 V" ^; @) O% t. {, I' d  h. m
29. Reg_X_Temp         = $01C6    ;寄存器X暂存
    1 X# G- A& h; D2 [7 x' y
30. Reg_Y_Temp         = $01C7    ;寄存器Y暂存
    
31. OFFET_X_STAND      = $06      ;坐标差X值
    
32. OFFET_Y_STAND      = $10      ;坐标差Y值
    
33. OFFET_X_LAY        = $10      ;趴下坐标差X值
    
34. OFFET_Y_LAY        = $07      ;趴下坐标差Y值
    
35. OFFET_X_JUMP       = $08      ;跳跃坐标差X值
    8 e% `+ \4 n/ Q" f
36. OFFET_Y_JUMP       = $08      ;跳跃坐标差Y值
    6 c" m% L( H; ~( B1 t3 m# x7 P
37. STATE_X_DIVING     = $02      ;潜水动作误差X值
    
38. STATE_Y_LAY        = $04      ;趴下动作误差X值
    + ]) s2 f: G5 X& t  {
39. 
    " [/ L" }( G2 {3 \1 O6 u- _3 l4 j
40. ;武器切换
    
41. Btn_Once = $F5       ;单次按键
    4 }3 n/ k$ D1 q5 w$ o) c3 i0 f+ m
42. ;========================================
    3 h6 g; ]' k& P6 o
43. ChangeWeapon:
    # M+ B' O" \0 |, I% K: f/ m1 e
44. LDA Btn_Once,X
    
45. CMP #$20
    3 A1 r& T2 [! ~. M( d
46. BNE ChangeWeaponEnd
    
47. LDA $AA,X
    * ?* K/ |; x5 }6 E: }4 u
48. ORA #$10
    
49. STA $AA,X
    5 X6 ]8 s0 R) `) a9 Y9 d
50. CMP #$14
    0 q$ Q% w% m6 v% N; O# ?% U! ?
51. BNE WeaponSet
    
52. LDA #$0F
    
53. STA $AA,X
    2 {  D$ L0 @% B5 e
54. WeaponSet:
    ( ^3 F. v+ Z7 @3 d1 ]  E; O% ^/ p
55. INC $AA,X
    ( `8 v0 g8 k& s* ^* z- c
56. ChangeWeaponEnd:
    . F" `4 a1 Q2 _( {6 q! K) V
57. LDA $AA,X
    2 s+ I/ X: [! |6 t* v1 D- o. k( f
58. AND #$0F
    
59. RTS
    
60. 
    7 e* R+ U# W; x! v8 f  j
61. .ORG $89A0
    1 o$ G9 @; F# L( F- a- C! r
62. 
    ( j( J4 Z' `! {( p( i! _4 n' m& e0 d, \
63. ;互相伤害
    & p' x* U% W, x2 [5 M  g5 g
64. ;========================================
    ' P" B$ R6 g8 A& A, u0 I; ]) X
65. Hurt_Player:
    6 c; ^0 Z' H' ?
66. STX Reg_X_Temp
    
67. STY Reg_Y_Temp
    4 Q  c5 J/ C8 `# A" G" I
68. JSR CheckInvalidState
    0 z  |9 i: v4 `# I7 A4 V7 P  b
69. BCS HurtPlayerEnd
    
70. LDA Bullet_Owner,X
    
71. EOR #@0000001
    
72. TAY
    
73. JSR GetHitOffset
    . \! s; y; b; [- M& t
74. JSR GetOffet_X
    
75. JSR GetOffet_Y
    9 y) y2 j) d& @6 }4 y. P; }
76. JSR Check_Hit
      }. |+ ?: N: G3 b) x
77. BCC HurtPlayerEnd
    
78. JSR Kill_Player
    ' C. {1 S* a& x3 {1 C; Z- w
79. HurtPlayerEnd:
    5 N$ B2 _8 U3 I# U
80. LDX Reg_X_Temp
    : `. t& B3 B4 d$ U0 Q
81. LDY Reg_Y_Temp
    
82. LDA $0438,X
    ; I$ T5 d3 m& H, B; C
83. RTS
    * X2 m- d8 R# q& R
84. 
    5 I/ h4 h1 P' h
85. ;检查无效状态
    1 |  s$ H6 l( U' C
86. ;========================================
    
87. CheckInvalidState:
    
88. LDA Bullet_Owner,X
    * x4 G: Q7 `" {( c9 M& I* w  y8 z
89. EOR #@0000001
    $ D. w& ]* x, d5 f  o) s1 x
90. TAY
    * `5 \! x3 E" L- ?% H( I
91. LDA P1_STATUE,Y
    * c+ G8 E: M# T7 N% N- G! X9 c
92. CMP #LIVE_VALUE
    
93. BNE SetInvalidState
    ( t/ z% S$ d* u
94. LDA P1_ACTION,Y
    
95. CMP #DIVING_VALUE
    
96. BNE CheckStateEnd
    7 j+ n2 }2 s. E  I9 g
97. SetInvalidState:
    2 N8 F+ o% b7 i
98. SEC
    
99. RTS
    
100. CheckStateEnd:
     
101. CLC
     
102. RTS
     ! f3 _, D1 k- u0 G! q. U4 ~3 q
103. 
     
104. ;设置命中误差
     ' @3 ^: F% ]5 g6 l& _+ P
105. ;========================================
     
106. GetHitOffset:
     0 S' J3 q" X9 G0 s
107. LDA #OFFET_X_STAND
     ; @# ?1 M* E+ y: c+ {( {* F* @4 C
108. STA Offet_X_Check
     
109. LDA #OFFET_Y_STAND
     
110. STA Offet_Y_Check
     
111. LDA #$00
     8 u0 a" u; i( D1 n6 H& E9 c
112. STA State_Offet_X
     
113. STA State_Offet_Y
     
114. GetHitOffset_Diving:
     
115. LDA P1_ACTION,Y
     $ e# I% E: Y2 j2 p
116. AND #DIVING_VALUE
     
117. CMP #DIVING_VALUE
     ; b4 ]" n& k3 x/ s# L, B1 m
118. BNE GetHitOffset_Lay
     3 m5 I2 E0 k0 K) p5 h) S' k5 L
119. LDA #STATE_X_DIVING
     - Y5 _: {+ C' w$ Z5 U7 x+ Y
120. STA State_Offet_X
     ! u  C. c8 V+ x- G  ^
121. LDA P1_FACE,Y
     7 L1 a4 `4 a% N( f& L; u& p
122. AND #$40
     . y2 j) r9 ^4 Y- ]
123. BEQ GetHitOffset_Lay
     
124. LDA #$00
     : ?! u) X( n0 y7 Q" k3 B+ P
125. SEC
     
126. SBC State_Offet_X
     
127. STA State_Offet_X
     
128. GetHitOffset_Lay:
     ; ]$ X7 e. ], I
129. LDA P1_ACTION,Y
     9 b5 m+ M5 N" p6 _- S
130. CMP #LAY_VALUE
     ' R0 B. C9 s. R
131. BNE GetHitOffset_Jump
     
132. LDA #OFFET_X_LAY
     
133. STA Offet_X_Check
     ! S' e2 A# K0 ~" F2 g7 G& T! N8 c
134. LDA #OFFET_Y_LAY
     0 g6 D; J& s. x( ]) r0 D2 S
135. STA Offet_Y_Check
     3 X& i- ?0 V, @: K5 h
136. LDA #STATE_Y_LAY
     
137. STA State_Offet_Y
     
138. RTS
     ! L# c$ W( q; \7 T  R+ T0 S
139. GetHitOffset_Jump:
     ' z' ?& g) e* `& C2 f2 p
140. LDA P1_ACTION,Y
     
141. AND #@11110110
     8 }" Z( M* P2 D5 V+ `% x& C$ a+ B
142. BNE GetHitOffsetEnd
     
143. LDA P1_ACTION,X
     7 ^+ Q$ ~$ a7 ^  k" @4 c
144. AND #JUMP_VALUE
     
145. BEQ GetHitOffsetEnd
     
146. LDA #OFFET_X_JUMP
     
147. STA Offet_X_Check
     
148. LDA #OFFET_Y_JUMP
       d+ e4 f8 O( l
149. STA Offet_Y_Check
     * k4 ~, l+ f( F5 _0 v' P/ ]6 J
150. RTS
     0 B$ d9 o; |  v# c* O
151. GetHitOffsetEnd:
     # r1 a* }( t; v7 Z0 Z( D/ C
152. RTS
     
153. 
     ' y0 q8 a3 Z' i3 O) q' _
154. 
     # g6 [! o2 S  l. O2 A
155. ;获取子弹与角色X坐标差
     
156. ;========================================
     3 n: n4 i8 a8 d3 G8 s7 Q2 s
157. GetOffet_X:
     
158. LDA Bullet_X,X
     % }5 r  N2 _% `
159. SEC
     
160. SBC State_Offet_X
     
161. CMP P1_X,Y
     
162. BCC GetOffet_X_Set
     
163. LDA Bullet_X,X
     
164. SEC
     
165. SBC State_Offet_X
     
166. SEC
     
167. SBC P1_X,Y
     
168. STA Hit_Offet_X
     
169. RTS
     
170. GetOffet_X_Set:
     6 m% t( g  x" x+ R) p
171. LDA P1_X,Y
     7 a9 I) j  R2 @& p1 [5 u4 U
172. CLC
     
173. ADC State_Offet_X
     
174. SEC
     
175. SBC Bullet_X,X
     
176. STA Hit_Offet_X
     
177. RTS
     % o" G* a2 \( w4 `
178. 
     ' n8 p2 S- }! l7 z# Q
179. ;获取子弹与角色Y坐标差
     9 s% r, J1 P3 a4 r
180. ;========================================
     ' ^( ?; A0 O9 ^+ `
181. GetOffet_Y:
     
182. LDA Bullet_Y,X
     . E! M; w8 B( }9 |1 r$ l
183. SEC
     9 f! v6 i5 E) a0 N! L
184. SBC State_Offet_Y
     
185. CMP P1_Y,Y
     
186. BCC GetOffet_Y_Set
     
187. LDA Bullet_Y,X
     , ~9 d, R. ]1 F# z; A
188. SEC
     
189. SBC State_Offet_Y
     $ _, T4 A+ F% \1 d0 |
190. SEC
     & e2 z! n7 T$ O, ?
191. SBC P1_Y,Y
     1 f* c, c7 N" E; J
192. STA Hit_Offet_Y
     / `0 E- |9 r' a8 Q* _- i9 Z+ R
193. RTS
     5 N0 Y/ X. t' h& }3 [+ I
194. GetOffet_Y_Set:
     % r! P" R7 O1 V, d5 m0 |
195. LDA P1_Y,Y
     ' Z+ V$ A& {# Q* O9 C4 }. c* w
196. CLC
     
197. ADC State_Offet_Y
     3 d0 `4 B; Z# c* W7 Q& {) Y2 S) u5 \
198. SEC
     1 h, }  I- F, g7 r
199. SBC Bullet_Y,X
     
200. STA Hit_Offet_Y
     
201. RTS
     + K1 _( }3 e+ ^
202. 
     & T6 l4 m! E8 L7 a6 ]" p/ F4 E; x
203. ;检查命中
     
204. ;========================================
     , ]8 m5 T- G! |, [' z/ X1 g8 ?
205. Check_Hit:
     
206. LDA Hit_Offet_X
       X. y) y2 z& X8 i7 `
207. CMP Offet_X_Check
     , j) k  P; W3 {' U5 [* d- I
208. BCS Check_Hit_End
     4 _7 W7 o$ @: o! w
209. LDA Hit_Offet_Y
     
210. CMP Offet_Y_Check
     ! g! }, b( D( J  N
211. BCS Check_Hit_End
     - |4 ?; t- s; Y& X: ~' U
212. SEC
     7 J. F; j  N. Z- y9 J
213. RTS
     4 _; f) T9 {; T- x
214. Check_Hit_End:
     ; S9 Y0 e/ w! x2 l% |
215. CLC
     
216. RTS
     
217. 
     ) [8 }, k+ N) P0 O; F3 {1 w
218. ;杀死对方
     $ w" P5 @4 Y# e. R! V6 A4 Y
219. ;========================================
     " e) l0 E5 Q7 H
220. Kill_Player:
     4 d! G' ~4 f4 G; A+ M' I  I( U
221. LDA Bullet_Owner,X
     
222. EOR #@0000001
     5 q+ T: W$ t# S- X; T7 \. {
223. TAX
       @! f/ C2 e/ m( V! H6 Q9 U  @& a
224. LDA P1_STATUE,X
     
225. CMP #LIVE_VALUE
     
226. BNE Kill_Player_End
     ' _4 ^7 _# q' a7 a4 K4 d5 z- M
227. LDA P1_INVINCIBLE_A,X
     ! F$ q0 ]4 ^( z1 J1 F  M8 k# S0 n  M& J
228. ORA P1_INVINCIBLE_B,X
     6 S6 O  {% q6 @( |# g% p
229. BNE Kill_Player_End ;无敌状态不处理
     7 E0 W5 R" R2 q, X
230. JSR $D474 ;角色死亡
     ; y6 Q# e4 h& K
231. LDX Reg_X_Temp
     / y0 I$ S. v! L5 ~1 I
232. LDA Bullet_Owner,X
     % L) M, B& [" p% C# x( |
233. TAX
     
234. INC P1_REST,X
     2 \2 I" Y# X0 t$ v0 h1 q
235. LDX Reg_X_Temp
     6 S. T7 w, c  J& p+ I: G7 l
236. JSR $E2FE ;子弹消除
     
237. Kill_Player_End:
     
238. RTS

复制代码

游客，如果您要查看本帖隐藏内容请回复

yes007007

感谢分享{:4_132:}

看稀奇

这就变成打黑枪了，有意思，谢谢

dabayu

多谢分享，修改辛苦了

afti

记得双截龙2这样干过，用1P打死2P可以奖命{:4_111:}

shower

感谢大神分享！

liuqi459120528

厉害了啊，感谢分享

leos

这都让你随心所欲的修改 这才是玩游戏啊

g00dgame

这个修改有点意思，感谢分享！

xuxiaoxin850127

谢谢分享！

nanayaka

魂斗罗内战么{:4_116:}

leshui

这个有意思