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

yandagui

先祝福大家五一快乐， 虽然来晚了哈, 废话就不多说了
) r. p% R; J) I* V: r$ K1.选择键切换子弹（为了更快杀死对方）
  v9 R+ d1 f( M( k$ ]8 q6 ?2.杀死对方自己加命
+ Z. h3 ]' [$ P9 {( J& ~' t

1. ;[FC][魂斗罗][互相伤害][END]
   4 R2 k6 T' m! L; [- ?( K3 z8 |& y
2. ;20200505
   ' R$ `$ N9 x! W
3. 
   2 |- O& p% k* L, H: K* ?6 ~
4. .ORG $8960
   ; D* f4 `, `4 B4 _
5. 
   
6. P1_STATUE          = $90      ;状态
   
7. P1_INVINCIBLE_A    = $AE      ;透明无敌
   
8. P1_INVINCIBLE_B    = $B0      ;闪烁无敌
   1 J; F" p3 A- }7 R+ `7 Y3 F4 v
9. P1_REST            = $32      ;P1剩余生命
   % S2 y" X' K. g! y/ [1 m; v/ A
10. LIVE_VALUE         = $01      ;活着数值
    
11. P1_ACTION          = $D6      ;趴下
    
12. P1_FACE            = $D8      ;P1面向
    + H' @, R" B6 n# ^' S. f3 P
13. LAY_VALUE          = $17      ;趴下数值
    
14. JUMP_VALUE         = $08      ;趴下数值
    2 a2 M4 m$ ~: P+ Z
15. DIVING_VALUE       = $18      ;潜水数值
    1 L' ]5 A: J% K/ ]( h# ?. ?
16. P1_X               = $0334    ;P1 X坐标
    $ W, F9 U3 h0 r3 w, s* X1 \
17. P2_X               = $0335    ;P2 X坐标
    
18. P1_Y               = $031A    ;P1 Y坐标
    
19. P2_Y               = $031B    ;P2 Y坐标
    8 D4 }  k) K% q  v" w- E
20. Bullet_X           = $03C8    ;子弹X坐标
    
21. Bullet_Y           = $03B8    ;子弹Y坐标
    : i  d" z$ S! Y4 C
22. Bullet_Owner       = $0448    ;子弹所属者
    9 x6 u, R( _- H5 K2 g
23. Hit_Offet_X        = $01C0    ;命中误差X
    0 }; r- n$ T/ s* o4 u' w% l2 M7 _
24. Hit_Offet_Y        = $01C1    ;命中误差Y
    
25. State_Offet_X      = $01C2    ;动作误差X
    2 N; m1 a2 ^0 ^4 v0 k$ k
26. State_Offet_Y      = $01C3    ;动作误差X
    / m+ e" {* C, y, b7 E
27. Offet_X_Check      = $01C4    ;坐标差X
    
28. Offet_Y_Check      = $01C5    ;坐标差Y
    
29. Reg_X_Temp         = $01C6    ;寄存器X暂存
    % }. [! Z0 j" D; D6 R
30. Reg_Y_Temp         = $01C7    ;寄存器Y暂存
    
31. OFFET_X_STAND      = $06      ;坐标差X值
    9 v0 G# C* R' A5 ?- c2 o" C
32. OFFET_Y_STAND      = $10      ;坐标差Y值
    
33. OFFET_X_LAY        = $10      ;趴下坐标差X值
    ' t( {, I" O5 `2 p( K. T# `
34. OFFET_Y_LAY        = $07      ;趴下坐标差Y值
    
35. OFFET_X_JUMP       = $08      ;跳跃坐标差X值
    " g' D- o3 t% k# E, W; p+ M
36. OFFET_Y_JUMP       = $08      ;跳跃坐标差Y值
    
37. STATE_X_DIVING     = $02      ;潜水动作误差X值
    $ L' |4 W% V+ a8 z7 O
38. STATE_Y_LAY        = $04      ;趴下动作误差X值
    
39. 
    
40. ;武器切换
    / M' f+ h& u8 h+ D
41. Btn_Once = $F5       ;单次按键
    ; C7 u0 V6 l  O( H
42. ;========================================
    
43. ChangeWeapon:
    
44. LDA Btn_Once,X
    6 h; H! F4 b9 |: u6 T7 P# t, W9 @2 i* k# H
45. CMP #$20
    
46. BNE ChangeWeaponEnd
    
47. LDA $AA,X
    
48. ORA #$10
    
49. STA $AA,X
    
50. CMP #$14
    3 g" F- f7 R2 I) x* f# @9 s. j
51. BNE WeaponSet
    * V/ C# z9 x' [) |5 G5 F2 z
52. LDA #$0F
    
53. STA $AA,X
    , }: o7 A- S8 O& i) n3 N
54. WeaponSet:
    : j% V: q2 w2 R% M1 ^, Z0 E
55. INC $AA,X
    ; {3 R, `$ z$ W# r% I6 v
56. ChangeWeaponEnd:
    
57. LDA $AA,X
    
58. AND #$0F
    
59. RTS
    6 @0 [) Y$ }# b8 ?( b' |
60. 
    ' p. r0 m5 N& r5 D, a
61. .ORG $89A0
    1 d: v  G8 m* ?" B5 d7 M6 m
62. 
    
63. ;互相伤害
    : |5 a- z; n3 O' p: n
64. ;========================================
    9 |7 c  e( D! d1 M4 X. a; N: k  u
65. Hurt_Player:
    
66. STX Reg_X_Temp
    8 Q" a: _( H" A" ~% W
67. STY Reg_Y_Temp
    ) A8 E; d7 p* V
68. JSR CheckInvalidState
    . n+ ?7 Z- ^" Z; j( u  |6 M
69. BCS HurtPlayerEnd
    
70. LDA Bullet_Owner,X
    * r1 N9 m8 \8 b9 B2 }
71. EOR #@0000001
    , L# V8 _6 A7 D
72. TAY
    & ^- N3 v* D4 z; ^1 c" q2 ]& |
73. JSR GetHitOffset
    * u1 x1 I/ b+ d7 y' f2 ^
74. JSR GetOffet_X
    ; u0 q, o) s8 Z) m% ]1 X1 u
75. JSR GetOffet_Y
    7 N) _) p$ e4 e' }/ O4 d8 Q7 L: W
76. JSR Check_Hit
    ( Z5 z% n4 n5 s$ ?; q/ v& a  [
77. BCC HurtPlayerEnd
      q, r# S" C, W4 [
78. JSR Kill_Player
    
79. HurtPlayerEnd:
    
80. LDX Reg_X_Temp
    
81. LDY Reg_Y_Temp
    & m/ J6 z$ d7 b: v6 \( L7 i
82. LDA $0438,X
    ! E  i, k' N' ^4 X
83. RTS
    
84. 
    $ w. I  i9 I0 s! k+ U5 L
85. ;检查无效状态
    8 E+ l0 M9 @. F# d" S: W
86. ;========================================
    : N: I" O: b3 u/ `0 C
87. CheckInvalidState:
    " \0 m* n# u+ L2 a, e7 \0 j4 F
88. LDA Bullet_Owner,X
    
89. EOR #@0000001
    8 y+ n! v2 g# z+ C9 ?( E, m
90. TAY
    , @$ P6 ^+ S6 V7 A$ y6 G) y
91. LDA P1_STATUE,Y
    2 U# j9 r( D5 U4 B3 f9 h% O
92. CMP #LIVE_VALUE
    7 Z2 p* E) L3 h; W# C+ S% C8 Q. T
93. BNE SetInvalidState
    : [8 W% K7 K) E/ E  a" l; S% @* w
94. LDA P1_ACTION,Y
    
95. CMP #DIVING_VALUE
    & e- J9 j1 S7 v, [, {4 b2 v/ h' h  u6 r6 s
96. BNE CheckStateEnd
    
97. SetInvalidState:
    & f( H4 B8 [: D! y' i
98. SEC
    : V! S; n1 Q3 O2 C( e
99. RTS
    
100. CheckStateEnd:
     ' i, |  \5 |+ d
101. CLC
     
102. RTS
     6 `6 I$ G* X* C5 r$ F+ d4 i. g8 D
103. 
     " b' B$ K* R. Q* k9 ?* Y3 |
104. ;设置命中误差
       g8 W0 b& |) L
105. ;========================================
     
106. GetHitOffset:
     4 C+ M. w2 ?  d& I( d7 d. l1 d4 C
107. LDA #OFFET_X_STAND
     7 @9 m% R% d. P) `: g
108. STA Offet_X_Check
     - A0 Z' ?7 K! }/ \7 F; Y3 |( b
109. LDA #OFFET_Y_STAND
     
110. STA Offet_Y_Check
     4 Z/ h5 }6 W' s2 W- W" `
111. LDA #$00
     ; M+ c& l% i* k6 F- a; z& T
112. STA State_Offet_X
     ( ]# X  {. K# ]! P
113. STA State_Offet_Y
     
114. GetHitOffset_Diving:
     
115. LDA P1_ACTION,Y
     1 w2 D% @) T& d; u
116. AND #DIVING_VALUE
     
117. CMP #DIVING_VALUE
     % B/ ?. o; y! C
118. BNE GetHitOffset_Lay
     
119. LDA #STATE_X_DIVING
     
120. STA State_Offet_X
     
121. LDA P1_FACE,Y
     ' V; ^& X) N- K8 q6 [' ^- z
122. AND #$40
     
123. BEQ GetHitOffset_Lay
     7 h! u6 l! [' s
124. LDA #$00
     
125. SEC
     5 ?: K: u2 H  C% M1 @" x
126. SBC State_Offet_X
     
127. STA State_Offet_X
     
128. GetHitOffset_Lay:
     ) O* n9 L8 T( N
129. LDA P1_ACTION,Y
     
130. CMP #LAY_VALUE
     
131. BNE GetHitOffset_Jump
     & I! \1 V/ L# o
132. LDA #OFFET_X_LAY
     $ {' q' h+ f0 d7 ~4 s$ R4 U- P
133. STA Offet_X_Check
     " i4 E1 Y3 D* n
134. LDA #OFFET_Y_LAY
     
135. STA Offet_Y_Check
     3 |" O3 A. |* u8 d( U) }' g- b5 b
136. LDA #STATE_Y_LAY
     $ X' A. M1 J5 R% v; z% Y
137. STA State_Offet_Y
     & q+ t9 Q1 i& z# k
138. RTS
     
139. GetHitOffset_Jump:
     
140. LDA P1_ACTION,Y
     
141. AND #@11110110
     
142. BNE GetHitOffsetEnd
     
143. LDA P1_ACTION,X
     
144. AND #JUMP_VALUE
     # I7 J7 j8 W7 l( \: Z0 ~) ^
145. BEQ GetHitOffsetEnd
     
146. LDA #OFFET_X_JUMP
     
147. STA Offet_X_Check
     
148. LDA #OFFET_Y_JUMP
     / q/ t! k% V, D/ T+ m* g" Y
149. STA Offet_Y_Check
     ) D, Y# M5 x! L' k
150. RTS
     6 {1 ^4 m* [" A$ x
151. GetHitOffsetEnd:
     9 ?6 d. C& r/ q) g) W
152. RTS
     % y/ r; p  S7 l: f. R. g4 n
153. 
     . e2 h5 K8 }. H6 z1 `% H
154. 
     . J8 f  J; D- ]! H
155. ;获取子弹与角色X坐标差
     
156. ;========================================
     : q; d+ m+ f% U4 h
157. GetOffet_X:
     
158. LDA Bullet_X,X
     # v+ f5 w0 Q: n3 h, h
159. SEC
     ) v% U9 R* N1 p& B: Y0 R" k) ]
160. SBC State_Offet_X
     ! z) y/ X5 r/ [, J1 J
161. CMP P1_X,Y
     " _0 z. h. ]% _3 I+ g
162. BCC GetOffet_X_Set
     
163. LDA Bullet_X,X
     
164. SEC
     * w! @0 Z: |0 ~. l' s8 P! d1 n5 a
165. SBC State_Offet_X
     3 X, m; N8 z3 p2 h. T8 f# g8 P: z
166. SEC
     , ~" h- }7 [4 R; T
167. SBC P1_X,Y
     
168. STA Hit_Offet_X
     ' g) {  p7 O6 v9 {9 G
169. RTS
     
170. GetOffet_X_Set:
     
171. LDA P1_X,Y
     4 i: o6 J- I7 t5 I
172. CLC
     " l9 F1 F# L5 ~7 N7 Z
173. ADC State_Offet_X
     8 D9 {; l7 \9 Q
174. SEC
     ( z( K9 X& M) s: i5 C. q( x, Y" n
175. SBC Bullet_X,X
     
176. STA Hit_Offet_X
     % B0 H( A, P' r  ~
177. RTS
     
178. 
     " E8 l: a6 T8 a4 S
179. ;获取子弹与角色Y坐标差
     8 o6 q. l% Z4 f+ D# U4 V# K! C
180. ;========================================
     8 L# a8 L2 K8 q/ h) D2 G  @
181. GetOffet_Y:
     , o/ Z6 L! e3 k2 r5 e2 `
182. LDA Bullet_Y,X
     ! s) z3 T/ `: M- i4 ?
183. SEC
     5 C4 R# s! N; h7 M1 o  u- Y
184. SBC State_Offet_Y
     $ m) E( W" Q2 x% A$ R. E" C# j
185. CMP P1_Y,Y
     
186. BCC GetOffet_Y_Set
     
187. LDA Bullet_Y,X
     
188. SEC
     3 Z* @* i5 B6 G
189. SBC State_Offet_Y
     
190. SEC
     
191. SBC P1_Y,Y
     
192. STA Hit_Offet_Y
     
193. RTS
     $ j: m  S4 e, m& \" B
194. GetOffet_Y_Set:
     4 r: d( }. u9 r& ?
195. LDA P1_Y,Y
     2 v1 b& k2 X% k/ Y2 [6 I" J
196. CLC
     
197. ADC State_Offet_Y
     3 R) F, U3 Y1 z' i
198. SEC
     5 {2 b) N/ f+ V6 t6 z
199. SBC Bullet_Y,X
     
200. STA Hit_Offet_Y
     , C. P/ s3 V8 p
201. RTS
     
202. 
     
203. ;检查命中
     
204. ;========================================
       C/ [# E3 x! r3 B6 C0 r5 x
205. Check_Hit:
     
206. LDA Hit_Offet_X
     ' k  |) o' R& p; W
207. CMP Offet_X_Check
     
208. BCS Check_Hit_End
     
209. LDA Hit_Offet_Y
     ; C! u  G5 H$ o9 M' t" {$ W8 l
210. CMP Offet_Y_Check
     
211. BCS Check_Hit_End
     ) ?5 ^7 {6 u% e
212. SEC
     8 n# T0 Z8 q& V0 V" _9 e' j% \
213. RTS
     
214. Check_Hit_End:
     
215. CLC
     
216. RTS
     
217. 
     
218. ;杀死对方
     
219. ;========================================
     
220. Kill_Player:
     
221. LDA Bullet_Owner,X
     8 K" h3 N2 ?. D* S, M6 m, _9 F
222. EOR #@0000001
     
223. TAX
     $ K, _6 |5 F" S6 q; P2 e* }
224. LDA P1_STATUE,X
     
225. CMP #LIVE_VALUE
     
226. BNE Kill_Player_End
     
227. LDA P1_INVINCIBLE_A,X
     
228. ORA P1_INVINCIBLE_B,X
     
229. BNE Kill_Player_End ;无敌状态不处理
     ; d- Y0 `' M/ P+ N% N& ~% x' n
230. JSR $D474 ;角色死亡
     
231. LDX Reg_X_Temp
     . z$ ^, D6 u; ^/ @
232. LDA Bullet_Owner,X
     % u8 Q3 r, {& P0 W
233. TAX
     
234. INC P1_REST,X
     0 H( c" G) Q1 K0 B+ Q: B* I  h. k
235. LDX Reg_X_Temp
     
236. JSR $E2FE ;子弹消除
     
237. Kill_Player_End:
     ! U" z* o& y5 I, i3 T: y
238. RTS

复制代码

. t4 X; ^6 |% M; E9 {% L

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

yes007007

感谢分享{:4_132:}

看稀奇

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

dabayu

多谢分享，修改辛苦了
" e0 i, G7 k1 C: q/ M

afti

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

shower

感谢大神分享！

liuqi459120528

厉害了啊，感谢分享

leos

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

g00dgame

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

xuxiaoxin850127

谢谢分享！

nanayaka

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

leshui

这个有意思