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

yandagui

先祝福大家五一快乐， 虽然来晚了哈, 废话就不多说了
1.选择键切换子弹（为了更快杀死对方）
% g6 Q  |- c2 m  X# X8 d* y2.杀死对方自己加命
# O) K5 k( h4 Q4 v

1. ;[FC][魂斗罗][互相伤害][END]
   8 s( f( E2 i) [0 B
2. ;20200505
   
3. 
   
4. .ORG $8960
   
5. 
   0 ]9 V* M9 }( K8 ^% o$ e, e2 `1 V
6. P1_STATUE          = $90      ;状态
   
7. P1_INVINCIBLE_A    = $AE      ;透明无敌
   ; f, E! |  l5 j( a# \0 M' i
8. P1_INVINCIBLE_B    = $B0      ;闪烁无敌
   8 B: {+ [9 ^& i
9. P1_REST            = $32      ;P1剩余生命
   ; f! d4 }# |( P7 ?9 h& G
10. LIVE_VALUE         = $01      ;活着数值
    6 o# U! K) K. C6 \. q# s) K, H* D' n
11. P1_ACTION          = $D6      ;趴下
    
12. P1_FACE            = $D8      ;P1面向
    ; Y+ r; z" \: H% {/ X+ B1 L; a  y
13. LAY_VALUE          = $17      ;趴下数值
    7 n, a, I4 D- N" ]
14. JUMP_VALUE         = $08      ;趴下数值
    , h) d& M4 Q) J- e" t; x" }
15. DIVING_VALUE       = $18      ;潜水数值
    
16. P1_X               = $0334    ;P1 X坐标
    
17. P2_X               = $0335    ;P2 X坐标
    
18. P1_Y               = $031A    ;P1 Y坐标
    9 ^: v/ T" w! \" L8 d( `7 K
19. P2_Y               = $031B    ;P2 Y坐标
    
20. Bullet_X           = $03C8    ;子弹X坐标
    
21. Bullet_Y           = $03B8    ;子弹Y坐标
    
22. Bullet_Owner       = $0448    ;子弹所属者
    $ W+ E5 S  ~( a
23. Hit_Offet_X        = $01C0    ;命中误差X
    ' L% v, U" t1 y, c; o
24. Hit_Offet_Y        = $01C1    ;命中误差Y
    
25. State_Offet_X      = $01C2    ;动作误差X
    ( \  x" j+ r' m9 [
26. State_Offet_Y      = $01C3    ;动作误差X
    ' y# y* m/ H" F
27. Offet_X_Check      = $01C4    ;坐标差X
    5 V3 U$ r  \: p4 K0 z! k
28. Offet_Y_Check      = $01C5    ;坐标差Y
    
29. Reg_X_Temp         = $01C6    ;寄存器X暂存
    
30. Reg_Y_Temp         = $01C7    ;寄存器Y暂存
    
31. OFFET_X_STAND      = $06      ;坐标差X值
    7 i1 @0 x9 U; H) B0 D7 Q6 L( e
32. OFFET_Y_STAND      = $10      ;坐标差Y值
    3 S) a9 @" i8 c+ G( i+ i# B3 u
33. OFFET_X_LAY        = $10      ;趴下坐标差X值
    
34. OFFET_Y_LAY        = $07      ;趴下坐标差Y值
    
35. OFFET_X_JUMP       = $08      ;跳跃坐标差X值
      G. c" t. M% \4 R7 o8 Z9 m- r
36. OFFET_Y_JUMP       = $08      ;跳跃坐标差Y值
    , r. u' `% X* ?
37. STATE_X_DIVING     = $02      ;潜水动作误差X值
    8 D$ Q; o$ l& x' \, h  ^& d' E
38. STATE_Y_LAY        = $04      ;趴下动作误差X值
    
39. 
    ! T9 k9 o. t" x* D; p
40. ;武器切换
    % e# j" Z# r. V' A$ F+ P6 q  x
41. Btn_Once = $F5       ;单次按键
    & m  u# d# p9 C5 q) o4 k
42. ;========================================
    
43. ChangeWeapon:
    * J. D% d- l$ Z. b1 e# d4 |) L0 J
44. LDA Btn_Once,X
    
45. CMP #$20
    
46. BNE ChangeWeaponEnd
    3 ~+ U; m" M, \0 Z
47. LDA $AA,X
    & Z3 x- k; K* o& K% a. x6 p1 ^6 A
48. ORA #$10
    0 Y1 s! ]6 A; e# n0 I0 [
49. STA $AA,X
    
50. CMP #$14
    
51. BNE WeaponSet
    
52. LDA #$0F
    
53. STA $AA,X
    
54. WeaponSet:
    7 U' h9 @, b( `, t) Z& N# Y
55. INC $AA,X
    * @% A8 l) ~4 D: ^: O
56. ChangeWeaponEnd:
    0 I( L& C6 f) b1 G0 n; Y1 ]
57. LDA $AA,X
    ' y0 Y: K( f% }. E, m- ^
58. AND #$0F
    ; c" k" Y) N3 X' e* R+ z( w
59. RTS
    # G* S  {2 T" b; \2 T; g
60. 
    
61. .ORG $89A0
    * w2 q0 v1 n2 Y8 K7 O$ y
62. 
    7 i( d( _* `6 v% a8 y: a; S
63. ;互相伤害
    1 a5 v  Y  L7 R( y4 y
64. ;========================================
    & e2 e, W. f( [6 l' M2 h; m
65. Hurt_Player:
    
66. STX Reg_X_Temp
    
67. STY Reg_Y_Temp
    2 S6 ]& ]! `" W+ L& a) X
68. JSR CheckInvalidState
    
69. BCS HurtPlayerEnd
    . \3 r& l1 j: _  D" e
70. LDA Bullet_Owner,X
    
71. EOR #@0000001
    
72. TAY
    
73. JSR GetHitOffset
    2 o+ X$ A; ]8 P$ w$ Z& k
74. JSR GetOffet_X
    ) z! e& R& K& d# r* t% g
75. JSR GetOffet_Y
    / m/ p0 V4 j) f) c$ e+ {
76. JSR Check_Hit
    
77. BCC HurtPlayerEnd
    - _' a1 I1 I2 A) N
78. JSR Kill_Player
    ! I1 N! R& @6 c9 B9 u/ A- O, {
79. HurtPlayerEnd:
    
80. LDX Reg_X_Temp
    
81. LDY Reg_Y_Temp
    
82. LDA $0438,X
    9 Q8 H5 S/ y- g. [/ T4 s! t
83. RTS
    ; ?/ u4 u  C; L8 q
84. 
    
85. ;检查无效状态
    
86. ;========================================
    # f- I/ a) o/ r& l1 Q* D, W
87. CheckInvalidState:
    
88. LDA Bullet_Owner,X
    
89. EOR #@0000001
    
90. TAY
    $ F7 W: `& L# I0 P
91. LDA P1_STATUE,Y
    % H  N6 b3 Q1 w2 C+ z0 _* `* e! Y
92. CMP #LIVE_VALUE
    
93. BNE SetInvalidState
    ' Y5 S6 y; H3 n$ L. N; y/ N
94. LDA P1_ACTION,Y
    
95. CMP #DIVING_VALUE
    $ V2 h3 {# k* e, d' P! G
96. BNE CheckStateEnd
    
97. SetInvalidState:
    % W7 q# e% c! A" w4 n* p
98. SEC
    
99. RTS
    + A; ?- }$ O) A
100. CheckStateEnd:
     
101. CLC
     & ?6 L$ B1 N1 t5 |5 ?5 ^4 ^4 w9 w5 `
102. RTS
     
103. 
     
104. ;设置命中误差
     ! L& e' q0 z/ k7 z1 u: C
105. ;========================================
     0 `/ E: I( B# N' `5 O2 f
106. GetHitOffset:
     
107. LDA #OFFET_X_STAND
     . I5 f) n; K- y2 C) }  M2 G! a
108. STA Offet_X_Check
     
109. LDA #OFFET_Y_STAND
     
110. STA Offet_Y_Check
     # x" g5 z" J  M7 h
111. LDA #$00
     2 B8 J2 F% ^0 \7 i
112. STA State_Offet_X
     
113. STA State_Offet_Y
     ( T4 Y( C& L+ l+ z
114. GetHitOffset_Diving:
       R' S1 Y( e5 Y. q( @" h: i: V$ Z
115. LDA P1_ACTION,Y
     6 b0 ~, Z5 G" b
116. AND #DIVING_VALUE
     2 x/ u0 Z6 v( K% [  k, X  o
117. CMP #DIVING_VALUE
     
118. BNE GetHitOffset_Lay
     
119. LDA #STATE_X_DIVING
     : A0 m7 }( r0 A! Q
120. STA State_Offet_X
     - W) i# u" X; q, I7 w! r* R
121. LDA P1_FACE,Y
     
122. AND #$40
     5 }( w6 I! G, n3 Z- M  O
123. BEQ GetHitOffset_Lay
     1 w3 d. \- u, a7 A% E2 X# s
124. LDA #$00
     
125. SEC
     7 N8 D1 ~/ `0 E/ Q# d" {7 {
126. SBC State_Offet_X
     , _! Y$ ~& j: n+ i5 h+ _4 P" K
127. STA State_Offet_X
     
128. GetHitOffset_Lay:
     $ R( d( a; z6 {; R( ]
129. LDA P1_ACTION,Y
     , i$ k8 s, u  R6 e( j* p( P
130. CMP #LAY_VALUE
     
131. BNE GetHitOffset_Jump
     
132. LDA #OFFET_X_LAY
     * }/ q+ A3 ^, X9 s2 S9 H# g" m9 W
133. STA Offet_X_Check
     6 G1 w# |" w) s: y2 S: q
134. LDA #OFFET_Y_LAY
     
135. STA Offet_Y_Check
     
136. LDA #STATE_Y_LAY
     
137. STA State_Offet_Y
     
138. RTS
     ' N9 |7 q+ c+ S8 D, S. @* N
139. GetHitOffset_Jump:
     
140. LDA P1_ACTION,Y
     0 ?( {+ j0 I0 G$ O7 i8 n1 `2 g4 z+ n! l
141. AND #@11110110
     3 Z) ~. l7 Z) X. g% }$ j
142. BNE GetHitOffsetEnd
     5 q+ @, ]9 |+ V2 ^( N
143. LDA P1_ACTION,X
     
144. AND #JUMP_VALUE
     1 J" _$ W7 m9 [5 D+ o- W* a
145. BEQ GetHitOffsetEnd
     3 n- [$ ~( ~& J
146. LDA #OFFET_X_JUMP
     1 x; o6 E* C8 e( z$ L  K7 P- T
147. STA Offet_X_Check
     & r" r* f9 [, i! p5 I2 K+ h  m7 _
148. LDA #OFFET_Y_JUMP
     
149. STA Offet_Y_Check
     & N% Z. y( z9 A% e  m; w
150. RTS
     
151. GetHitOffsetEnd:
     
152. RTS
     ! b+ o5 E4 K6 S  i5 c8 W4 o) B
153. 
     . ^5 p+ ~0 m4 x! g2 @$ r
154. 
     
155. ;获取子弹与角色X坐标差
     
156. ;========================================
     
157. GetOffet_X:
     9 G0 E9 w$ R; M9 F, n# S2 f
158. LDA Bullet_X,X
     4 z& G7 A; c! _" S0 I
159. SEC
     
160. SBC State_Offet_X
     
161. CMP P1_X,Y
     
162. BCC GetOffet_X_Set
     / K9 }6 H8 J. k) K! x1 Q. {
163. LDA Bullet_X,X
     * x9 i) R7 e# I$ J5 y, n- U
164. SEC
     9 Z1 f- ?% N7 z7 d9 j" Y  L9 f
165. SBC State_Offet_X
     
166. SEC
     
167. SBC P1_X,Y
     $ s& a# [: C2 ?4 T9 O0 x% ~
168. STA Hit_Offet_X
     
169. RTS
     
170. GetOffet_X_Set:
       ~! Z; l/ J# g/ K( Y
171. LDA P1_X,Y
     
172. CLC
     4 ^5 l$ i) W+ [( w3 _, U; U
173. ADC State_Offet_X
     
174. SEC
     2 M* _0 V/ ~& C* J. L
175. SBC Bullet_X,X
     
176. STA Hit_Offet_X
     
177. RTS
     
178. 
     - I' R5 K2 U+ N  l: ^0 M2 V+ w/ W
179. ;获取子弹与角色Y坐标差
     $ Z+ l0 G4 f" j1 @$ v
180. ;========================================
     
181. GetOffet_Y:
     
182. LDA Bullet_Y,X
     + i: J# e7 s" d  m) L! D) M, g) w
183. SEC
     
184. SBC State_Offet_Y
     
185. CMP P1_Y,Y
     
186. BCC GetOffet_Y_Set
     ) s0 R! U) L) O2 }6 P: k; o  Q
187. LDA Bullet_Y,X
     
188. SEC
     
189. SBC State_Offet_Y
     
190. SEC
     ! |* W3 c6 [0 _) u
191. SBC P1_Y,Y
     & [0 a: _3 n  b( m, l
192. STA Hit_Offet_Y
     
193. RTS
     
194. GetOffet_Y_Set:
     
195. LDA P1_Y,Y
     : v9 P% O0 ]7 x
196. CLC
     
197. ADC State_Offet_Y
     $ H" B8 W$ E* ?2 C5 F
198. SEC
     
199. SBC Bullet_Y,X
     
200. STA Hit_Offet_Y
     $ `+ [& H1 }7 \1 ~
201. RTS
     1 C3 f& w  j0 g) ^) Z
202. 
     ' f8 j# z% I+ ~0 r/ G  E
203. ;检查命中
     
204. ;========================================
     
205. Check_Hit:
     7 y) p/ h0 p9 c4 g
206. LDA Hit_Offet_X
     
207. CMP Offet_X_Check
     2 C" ^6 N' @. A/ {: c- d# F1 l' f
208. BCS Check_Hit_End
     
209. LDA Hit_Offet_Y
     
210. CMP Offet_Y_Check
     
211. BCS Check_Hit_End
     
212. SEC
     
213. RTS
     " H" m( B- z/ m' Z/ y7 L. Y; P) H
214. Check_Hit_End:
     
215. CLC
     
216. RTS
     
217. 
     
218. ;杀死对方
     
219. ;========================================
     
220. Kill_Player:
     
221. LDA Bullet_Owner,X
     
222. EOR #@0000001
     
223. TAX
     3 i8 d/ z" @* K5 l3 J$ L: C
224. LDA P1_STATUE,X
     
225. CMP #LIVE_VALUE
     ( d5 ~; I! Q" k8 x4 V
226. BNE Kill_Player_End
     
227. LDA P1_INVINCIBLE_A,X
     
228. ORA P1_INVINCIBLE_B,X
     
229. BNE Kill_Player_End ;无敌状态不处理
     
230. JSR $D474 ;角色死亡
     
231. LDX Reg_X_Temp
     
232. LDA Bullet_Owner,X
     , p. u0 k+ x3 B$ N) [
233. TAX
       J  q, T$ I- D8 U0 r/ |0 o
234. INC P1_REST,X
     
235. LDX Reg_X_Temp
     ( M7 w5 P3 j) J7 r2 i
236. JSR $E2FE ;子弹消除
     3 u0 g( f/ ?' h" M) L! j
237. Kill_Player_End:
     
238. RTS

复制代码

: x% r* Z! h/ }, k* R

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

yes007007

感谢分享{:4_132:}

看稀奇

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

dabayu

多谢分享，修改辛苦了
5 d0 b# ~* |) X, t3 q2 K

afti

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

shower

感谢大神分享！

liuqi459120528

厉害了啊，感谢分享

leos

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

g00dgame

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

xuxiaoxin850127

谢谢分享！

nanayaka

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

leshui

这个有意思