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

yandagui

先祝福大家五一快乐， 虽然来晚了哈, 废话就不多说了
1.选择键切换子弹（为了更快杀死对方）
2.杀死对方自己加命

1. ;[FC][魂斗罗][互相伤害][END]
   % }, s; z& d* A
2. ;20200505
   4 O) x) l3 L* ~* n2 [' _$ }
3. 
   
4. .ORG $8960
   : e* |+ e. d3 E; {# {4 s" ^
5. 
   : c; |* y4 r0 C7 W4 V+ W
6. P1_STATUE          = $90      ;状态
   ; C: ^+ ^. n1 B" i) l- q
7. P1_INVINCIBLE_A    = $AE      ;透明无敌
   
8. P1_INVINCIBLE_B    = $B0      ;闪烁无敌
   
9. P1_REST            = $32      ;P1剩余生命
   
10. LIVE_VALUE         = $01      ;活着数值
    
11. P1_ACTION          = $D6      ;趴下
    
12. P1_FACE            = $D8      ;P1面向
    
13. LAY_VALUE          = $17      ;趴下数值
    ' g$ W7 F- I  a; T; p5 R% m1 d& T( ]
14. JUMP_VALUE         = $08      ;趴下数值
    
15. DIVING_VALUE       = $18      ;潜水数值
    
16. P1_X               = $0334    ;P1 X坐标
    5 f% |; W5 x% s9 K1 Y0 o3 {# [7 U
17. P2_X               = $0335    ;P2 X坐标
    ' t4 K  s+ r; z
18. P1_Y               = $031A    ;P1 Y坐标
    
19. P2_Y               = $031B    ;P2 Y坐标
    % C$ ?  e0 [6 n0 S- |0 z+ ?$ Z
20. Bullet_X           = $03C8    ;子弹X坐标
    + f$ _' i4 F. x1 J8 S
21. Bullet_Y           = $03B8    ;子弹Y坐标
    ; |6 v5 P. P( r; y
22. Bullet_Owner       = $0448    ;子弹所属者
    
23. Hit_Offet_X        = $01C0    ;命中误差X
    
24. Hit_Offet_Y        = $01C1    ;命中误差Y
    ! k# S2 n: }' e7 F+ o4 a+ F
25. State_Offet_X      = $01C2    ;动作误差X
    : T" g0 {  ^6 B; @" b
26. State_Offet_Y      = $01C3    ;动作误差X
    ' W6 G8 q) j$ c4 x, M
27. Offet_X_Check      = $01C4    ;坐标差X
    
28. Offet_Y_Check      = $01C5    ;坐标差Y
    ) A( l5 z1 B. V+ c6 p) C( F
29. Reg_X_Temp         = $01C6    ;寄存器X暂存
    
30. Reg_Y_Temp         = $01C7    ;寄存器Y暂存
    & l6 z# [$ r- A6 ]: d
31. OFFET_X_STAND      = $06      ;坐标差X值
    3 ]6 i# A2 J! e+ t% c
32. OFFET_Y_STAND      = $10      ;坐标差Y值
    
33. OFFET_X_LAY        = $10      ;趴下坐标差X值
    
34. OFFET_Y_LAY        = $07      ;趴下坐标差Y值
    
35. OFFET_X_JUMP       = $08      ;跳跃坐标差X值
      a2 U; d3 e. r) d' e0 v4 B0 b
36. OFFET_Y_JUMP       = $08      ;跳跃坐标差Y值
    
37. STATE_X_DIVING     = $02      ;潜水动作误差X值
    
38. STATE_Y_LAY        = $04      ;趴下动作误差X值
    
39. 
    7 e( `; d! t+ `3 h! _4 \* J
40. ;武器切换
    7 B- r# ^2 }5 y/ ?8 o
41. Btn_Once = $F5       ;单次按键
    
42. ;========================================
    
43. ChangeWeapon:
    ; W* v8 U& Z" j. N
44. LDA Btn_Once,X
    
45. CMP #$20
    
46. BNE ChangeWeaponEnd
    
47. LDA $AA,X
    , D2 U/ j& e% ?& O5 z
48. ORA #$10
    
49. STA $AA,X
    
50. CMP #$14
    / |! K/ r4 R( ]# a% q8 X  H
51. BNE WeaponSet
    9 F4 r0 \) T) W8 H, S! y
52. LDA #$0F
    2 I4 Q8 m7 O/ z7 P; j* ]/ `7 y
53. STA $AA,X
    6 m" {2 {% l- @. A3 P: w6 F/ @
54. WeaponSet:
    
55. INC $AA,X
    9 d/ g; p) l" K/ |4 h" g
56. ChangeWeaponEnd:
    ! ]4 X1 Y- K! [5 }  f, ]
57. LDA $AA,X
    ! E+ V' Z! \) s7 S! r# Y$ }
58. AND #$0F
    
59. RTS
    
60. 
    7 |4 l3 O6 \  h# R
61. .ORG $89A0
    
62. 
    
63. ;互相伤害
    
64. ;========================================
    ; N8 I- U3 @; z' Y& b; l7 ]3 L
65. Hurt_Player:
    $ z- S$ N7 t3 ~: S& Y: A* J
66. STX Reg_X_Temp
    
67. STY Reg_Y_Temp
    
68. JSR CheckInvalidState
    # v( J/ _$ E+ n$ c8 P8 L
69. BCS HurtPlayerEnd
    , e% `% C3 [! r
70. LDA Bullet_Owner,X
    7 Q, Z+ s  p: o; c
71. EOR #@0000001
    
72. TAY
    
73. JSR GetHitOffset
    ) ~0 ~: j# q$ i: b0 C0 C6 d* g
74. JSR GetOffet_X
    % d, q% j- N4 v9 s+ j
75. JSR GetOffet_Y
    0 L4 Q% k2 q  W, a! ]# J2 [
76. JSR Check_Hit
    : \  W# q! ~* `3 N
77. BCC HurtPlayerEnd
    * C4 Q1 F  A/ h' \) H
78. JSR Kill_Player
    
79. HurtPlayerEnd:
    
80. LDX Reg_X_Temp
    9 C4 H; }: l- ]- S2 j: v' [
81. LDY Reg_Y_Temp
    
82. LDA $0438,X
    % B# Z8 J( Q+ O8 g
83. RTS
    
84. 
    : f) W2 z5 v4 h; A* V
85. ;检查无效状态
    , @& i4 l/ U8 R; c. \; Y
86. ;========================================
    , c( f+ }2 o  Z3 p3 k5 W6 j: C
87. CheckInvalidState:
    
88. LDA Bullet_Owner,X
    
89. EOR #@0000001
    
90. TAY
    
91. LDA P1_STATUE,Y
    
92. CMP #LIVE_VALUE
    
93. BNE SetInvalidState
    
94. LDA P1_ACTION,Y
      T3 r/ W$ Q# d5 H3 f3 ?! ]
95. CMP #DIVING_VALUE
    , k3 {, M' ?  `8 n* w4 s- B
96. BNE CheckStateEnd
    % D! f3 }% h* O6 `& T6 q
97. SetInvalidState:
    
98. SEC
      N' m! p  R& R' L
99. RTS
    1 M% ~1 \* X$ V8 t' Q" _
100. CheckStateEnd:
     ; b# I0 ?: f! g3 I) o% x
101. CLC
     # Q1 v0 h* @; y6 h, m
102. RTS
     
103. 
     # [9 g. y9 Q4 u6 O# W$ |
104. ;设置命中误差
     8 g( a4 C+ r# j4 j
105. ;========================================
     
106. GetHitOffset:
     
107. LDA #OFFET_X_STAND
     5 P6 F3 f' ~7 Z* f" h+ J3 b
108. STA Offet_X_Check
     
109. LDA #OFFET_Y_STAND
     " O2 O! z% c8 C* L
110. STA Offet_Y_Check
     & l0 H+ }* K7 s. y& V" {% b& v. R" H
111. LDA #$00
     
112. STA State_Offet_X
     
113. STA State_Offet_Y
     9 \+ ~9 x3 B% k$ k% V- \: F1 Y6 Z
114. GetHitOffset_Diving:
     ( j; v) t0 A7 h; c& F
115. LDA P1_ACTION,Y
     
116. AND #DIVING_VALUE
     / r* @, H, n' D
117. CMP #DIVING_VALUE
     
118. BNE GetHitOffset_Lay
     6 c) O  f2 o" y! ^
119. LDA #STATE_X_DIVING
     
120. STA State_Offet_X
     
121. LDA P1_FACE,Y
     
122. AND #$40
     
123. BEQ GetHitOffset_Lay
     & a1 m4 l1 o) e- M
124. LDA #$00
     6 _7 Y$ d6 O, O' F$ D) I) o
125. SEC
     
126. SBC State_Offet_X
     
127. STA State_Offet_X
     
128. GetHitOffset_Lay:
     & P9 q$ Y% K3 `6 s6 L, @
129. LDA P1_ACTION,Y
     ( T' n$ S; _' f$ n4 u) v+ ?* [
130. CMP #LAY_VALUE
     1 @# A: J* x; U) V, D1 E1 n6 ]2 @
131. BNE GetHitOffset_Jump
     
132. LDA #OFFET_X_LAY
     ; s+ ~3 {; ^2 F$ v2 y4 t
133. STA Offet_X_Check
     
134. LDA #OFFET_Y_LAY
     
135. STA Offet_Y_Check
     : k, Z8 n, b! ^, D% D( c2 D
136. LDA #STATE_Y_LAY
     
137. STA State_Offet_Y
     4 A/ A$ [8 b% k
138. RTS
     
139. GetHitOffset_Jump:
     ( g. f5 J8 M' y7 c7 u6 `' i
140. LDA P1_ACTION,Y
     . L" N) Z/ w; F) T9 C% c$ z  V/ H$ W  b
141. AND #@11110110
     
142. BNE GetHitOffsetEnd
     
143. LDA P1_ACTION,X
     
144. AND #JUMP_VALUE
     4 t. _* l& _1 }1 A# G7 n! z
145. BEQ GetHitOffsetEnd
     
146. LDA #OFFET_X_JUMP
     6 h3 k' v+ k) T% Y4 G/ ^  G: \
147. STA Offet_X_Check
     
148. LDA #OFFET_Y_JUMP
     & d/ C4 |. _* s3 L
149. STA Offet_Y_Check
     ) O+ x  }% i7 p. X) b
150. RTS
     " y5 o# x% ]3 K
151. GetHitOffsetEnd:
     # m* C7 K0 X& l) w/ }9 U
152. RTS
     & x5 h' z( M) k! _6 _7 r
153. 
     
154. 
     
155. ;获取子弹与角色X坐标差
     ! v5 Q8 y: B' m" m! n
156. ;========================================
     ; g2 x8 U, u; F4 X- W
157. GetOffet_X:
     1 c% Z. Q! d+ S8 _
158. LDA Bullet_X,X
     
159. SEC
     " w" S$ Y1 S4 G! O$ V) a) d
160. SBC State_Offet_X
     / Z( O. x$ v* ], _
161. CMP P1_X,Y
     
162. BCC GetOffet_X_Set
     
163. LDA Bullet_X,X
     3 U! N% A/ f& ~! N, d8 R" d
164. SEC
     7 k% W6 n4 V( w! Z. _& y$ d
165. SBC State_Offet_X
     
166. SEC
     " m( g5 ~3 _9 [! z9 T! `9 e
167. SBC P1_X,Y
     " }/ n) @6 H: Y# R
168. STA Hit_Offet_X
     2 m! o" z, X" {. ^! Z0 T3 S
169. RTS
     
170. GetOffet_X_Set:
     9 i4 J5 t+ I+ v% l
171. LDA P1_X,Y
     
172. CLC
     & _- Q0 {# h9 `
173. ADC State_Offet_X
     
174. SEC
     " b4 R  Z0 L* G
175. SBC Bullet_X,X
     . l( `" J$ [3 s2 y
176. STA Hit_Offet_X
     
177. RTS
     7 y5 A1 r5 ?$ ^5 r  {- T+ ]
178. 
     
179. ;获取子弹与角色Y坐标差
     ( F$ `6 [1 D: p7 }8 _
180. ;========================================
     
181. GetOffet_Y:
     3 |" E: J& Z5 U
182. LDA Bullet_Y,X
     . [/ o# _' [( r; f; n
183. SEC
     ! o" {2 @  v& y( q( R' S4 V  c
184. SBC State_Offet_Y
     - P3 }+ Q8 A9 U* u( e! }- d2 |
185. CMP P1_Y,Y
     . l: Q# s9 d' S6 Z8 N# {! I
186. BCC GetOffet_Y_Set
     
187. LDA Bullet_Y,X
     
188. SEC
     
189. SBC State_Offet_Y
     . m" l/ t$ S! q8 ]6 q$ ?/ t+ W
190. SEC
     
191. SBC P1_Y,Y
     & a- l2 N: f( r9 i7 Q1 }
192. STA Hit_Offet_Y
     + f9 V6 Q+ b* Q6 u
193. RTS
     . G$ S: {, `& ~; c2 V
194. GetOffet_Y_Set:
     
195. LDA P1_Y,Y
       E' j2 x. N" F8 ]6 |7 q
196. CLC
     
197. ADC State_Offet_Y
     
198. SEC
     . Y4 z! q0 X6 W# t" E
199. SBC Bullet_Y,X
     % j" s; c# l! `+ d
200. STA Hit_Offet_Y
     6 V( }: W2 k. m0 p
201. RTS
     3 \! a+ a. @% n+ Z) T
202. 
     ) w, i9 a4 j" C3 q4 N
203. ;检查命中
     8 S& H1 U& X' k+ X6 G$ O. ?* V
204. ;========================================
     % r% @! j3 _9 T  \) k  Z/ t7 c0 ]
205. Check_Hit:
     
206. LDA Hit_Offet_X
     
207. CMP Offet_X_Check
     5 T8 c' {) n  l0 P
208. BCS Check_Hit_End
     - ^5 G% @$ y7 _; ?6 F
209. LDA Hit_Offet_Y
     6 A9 b: N( A. r1 ]- ?
210. CMP Offet_Y_Check
     
211. BCS Check_Hit_End
     ' G6 O  W  ^8 v, K: x
212. SEC
     6 _# \2 I  J' {/ V* U
213. RTS
     
214. Check_Hit_End:
     
215. CLC
     
216. RTS
     , ~1 G" `* }# C' {3 C0 J. B, L
217. 
     
218. ;杀死对方
       k# G. R2 P. M! m
219. ;========================================
     
220. Kill_Player:
     $ s# P( }, b* r0 m' [
221. LDA Bullet_Owner,X
     0 |" _! B8 m$ W- r
222. EOR #@0000001
     ( ^2 D& }5 A: B
223. TAX
     
224. LDA P1_STATUE,X
     
225. CMP #LIVE_VALUE
     
226. BNE Kill_Player_End
     ) W( C& k. ?+ q
227. LDA P1_INVINCIBLE_A,X
     8 t7 ~# J1 g% {. `; w8 {
228. ORA P1_INVINCIBLE_B,X
     
229. BNE Kill_Player_End ;无敌状态不处理
     3 X5 n5 Z. H) ~3 J9 }1 F
230. JSR $D474 ;角色死亡
     
231. LDX Reg_X_Temp
       T2 p. }1 e& M) c  Y
232. LDA Bullet_Owner,X
     * K" e' [9 w' d" {
233. TAX
     9 q# a& e! t' U1 [) T! ~$ }
234. INC P1_REST,X
     
235. LDX Reg_X_Temp
     
236. JSR $E2FE ;子弹消除
     $ e! ~6 p: E/ m3 G: F; l' u9 [& U
237. Kill_Player_End:
     
238. RTS

复制代码

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

yes007007

感谢分享{:4_132:}

看稀奇

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

dabayu

多谢分享，修改辛苦了
6 x9 e; C" ~; f# V9 Y( U% [

afti

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

shower

感谢大神分享！

liuqi459120528

厉害了啊，感谢分享

leos

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

g00dgame

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

xuxiaoxin850127

谢谢分享！

nanayaka

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

leshui

这个有意思