[FC][精灵碰撞学习源码]

yandagui

1. ;[FC][MMC3 精灵碰撞]
   
2. ;FlameCyclone 20230710
   ! M% K! W$ h0 J8 C  j: k
3. 
   
4. ;文件头
   
5. ;======================================================================
   9 H8 i. J: y, }  W+ W9 A. r0 x
6. .INESPRG 4                                              ;16KB PRG 数量
   5 a& O' h' t5 U  G9 j
7. .INESCHR 1                                               ;8KB CHR 数量
   / `/ t+ E; [4 j! c  _# x* \
8. .INESMAP 4                                                   ;mapper 4
   
9. .INESMIR 1                                     ;命名表镜像 0水平 1垂直
   
10. 
    
11. ;必要条件
    
12. ;1.持有CHR ROM
    
13. ;2.背景Tile和精灵Tile必须使用不同的图案表, 如背景图案$0000, 精灵图案$1000
    
14. ;3.精灵内存(OAM)不为空
    $ y3 W# i7 I9 M( o( K
15. 
    
16. ;==================================================
    5 w& i- m1 v( h9 S2 }
17. ;NES端口常量
    
18. PPU_CTRL                =   $2000   ;PPU控制寄存器
    
19. PPU_MASK                =   $2001   ;PPU掩码寄存器
    / q3 F- _) w7 M' f/ _% v
20. PPU_STATUS              =   $2002   ;PPU状态寄存器：读取后PPU_SCROLL和PPU_ADDRESS被复位，下一个写到PPU_SCROLL的数据是水平的，写到PPU_ADDRESS的数据是高位
    
21. PPU_OAM_ADDR            =   $2003   ;精灵RAM地址：用来设置通过PPU_OAM_DATA访问的256字节精灵RAM地址。每次访问PPU_OAM_DATA后该地址增加1
    / n" p/ W! t9 r, }- E3 H
22. PPU_OAM_DATA            =   $2004   ;精灵RAM数据：用来读/写精灵内存。地址通过PPU_OAM_ADDR来设置，每次访问后地址增加1
    
23. PPU_SCROLL              =   $2005   ;屏幕滚动偏移：第一个写的值会进入垂直滚动寄存器（若>239，被忽略）。第二个值出现在水平滚动寄存器
    
24. PPU_ADDRESS             =   $2006   ;VRAM地址：设置PPU_DATA访问的VRAM地址。第一个写地址的高6位。第二个写低8位。每次访问PPU_DATA后地址增加
    5 \& s3 c% F5 Z$ @. t$ {% E: Q! R0 e: y
25. PPU_DATA                =   $2007   ;VRAM数据：用来访问VRAM数据，通过PPU_ADDRESS设置的地址在每次访问之后会增加1或32
    
26. OAM_DMA                 =   $4014   ;DMA访问精灵RAM：通过写一个值xx到这个端口，引起CPU内存地址为$xx00－$xxFF的区域传送到精灵内存
    
27. APU_STATUS              =   $4015   ;声音通道切换
    
28. JOY1_FRAME              =   $4016   ;手柄1 + 选通
    $ i  c- k7 e* h- s0 @5 V5 Q2 c
29. JOY2_FRAME              =   $4017   ;手柄2 + 选通
    
30. 
    
31. ;==================================================
    
32. ;MMC3端口常量
    
33. MMC3_BANK_CTRL          =   $8000
    
34. MMC3_BANK_DATA          =   $8001
    
35. MMC3_MIRRORING          =   $A000
    7 V4 a2 v  K( T! D! @# i% r3 i# x
36. MMC3_PRG_RAM_PROTECT    =   $A001
    
37. MMC3_IRQ_LATCH          =   $C000
    
38. MMC3_IRQ_RELOAD         =   $C001
    
39. MMC3_IRQ_DISABLE        =   $E000
    
40. MMC3_IRQ_ENABLE         =   $E001
    
41. 
    + ~9 z0 M0 d: B- [
42. ;==================================================
    
43. ;程序块配置
    
44. BANK_DATA_MASK          = $07
    
45. ;--------------------------------------------------
    % {6 i9 t" f+ N
46. RESET_BANK              = $07
    
47. RESET_ADDR              = $FC00
    , y8 n# K/ {+ v! P4 A
48. 
    , G! m3 D5 ^7 h& a/ ~. @8 G+ B
49. ;==================================================
    
50. ;图像块配置
    ( J! A8 ?- b, U* |
51. CHR_DATA_BANK           = $08
    # O) t6 f7 a( I' n5 g6 G
52. 
    1 m$ `+ j* q) f! [
53. ;==================================================
    
54. ;零页内存地址配置
    
55. Use_Ram_Addr            = $80
    
56. PPU_Ctrl_Buf            = Use_Ram_Addr
    
57. PPU_Msak_Buf            = PPU_Ctrl_Buf + $01
    
58. PPU_Scroll_H            = PPU_Msak_Buf + $01
    
59. PPU_Scroll_V            = PPU_Scroll_H + $01
    
60. FC_Data_L               = PPU_Scroll_V + $01
    
61. FC_Data_H               = FC_Data_L + $01
    ! a0 @/ d* S# E8 C$ K% ^
62. FC_Data_Buf             = FC_Data_H + $01
    
63. ;==================================================
    - V5 G: {/ t% Z3 r# ^
64. 
    
65. GAMEPAD_MERGE_FLAG = $04
    
66. 
    . w$ O9 ~! n  a9 E8 T" c
67. Gamepad_Keep            =       FC_Data_Buf + 1
    
68. Gamepad_Once            =       Gamepad_Keep + 2
    
69. Gamepad_Temp            =       Gamepad_Once + 2
    9 a1 I+ i/ S4 }8 ?1 X0 a
70.                                 
    
71. Gamepad_0_State         =       Gamepad_Temp + 2
    
72. Gamepad_1_State         =       Gamepad_0_State + 1
    
73. Gamepad_0_Value         =       Gamepad_1_State + 1
    
74. Gamepad_1_Value         =       Gamepad_0_Value + 1
    
75. Gamepad_Port_Value      =       Gamepad_1_Value + 1
    
76. Gamepad_Merge           =       Gamepad_Port_Value + 1
    " _8 j4 j- I- P
77. 
    6 s7 G2 a" R1 Z2 Z
78. ;==================================================
    8 t/ I/ t0 W& F8 ]$ e8 h5 }
79. IRQ_Index               =       Gamepad_Merge + $01
    1 Z; N8 s- }7 A2 p7 h  e2 `+ A1 u
80. Sprite_0_Y              =       IRQ_Index + $01
    
81. Sprite_0_Tile           =       Sprite_0_Y + $01
    
82. Sprite_0_Mode           =       Sprite_0_Tile + $01
    & Q) v( H( o- W# w5 |* i
83. Sprite_0_X              =       Sprite_0_Mode + $01
    , C% t9 ?! i/ E
84. Sprite_0_Hit_Move_Direction           =       Sprite_0_X + $01
    . i; o( S. L+ q2 I8 K- I- ]
85. ;==================================================
    ( ]9 l  q1 r: T; [( j
86. 
    1 E2 k) n& w  E2 A1 _: \5 v
87. ;CHR图形数据
    / b  T7 n/ M* e! H! f1 l
88. ;==================================================
    : p8 n" o3 B: W- o8 R  \
89. .BANK CHR_DATA_BANK
    
90. .INCBIN "chr_bank/chr_data.chr"
    0 f# X( {, f* C5 D$ G+ j
91. 
    2 \+ q9 Z. _# \+ ^3 V3 m) l$ X
92. .BANK RESET_BANK & BANK_DATA_MASK
    / I9 F5 c- N$ r6 Z
93. .ORG RESET_ADDR
    
94. 
    2 _& p  s% u2 I) `2 F; n
95. ;--------------------------------------------------
    
96. Attributes_Data
    / I. _: k1 \; }/ }6 w/ ?( W4 W
97. ;命名表属性
    6 P  e0 S6 e9 V& d1 E2 k7 R
98. .DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
    
99. .DB $50,$50,$50,$50,$50,$50,$50,$50,$FF,$FF,$FF,$FF,$BB,$AA,$AA,$AA
    
100. .DB $0F,$0F,$0F,$0F,$0B,$0A,$0A,$0A,$AA,$AA,$AA,$AA,$AA,$AA,$AA,$AA
     
101. .DB $AA,$AA,$AA,$AA,$AA,$AA,$AA,$55,$55,$55,$55,$55,$55,$55,$55,$55
     3 _) O5 P: s* }7 w
102. ;--------------------------------------------------
     2 e2 U; r- m4 q! g% S- b5 s' B" t
103. ;调色板数据
     / Q; ?. c" ~5 u9 p+ p
104. Palette_Data
     
105. .DB $0F,$27,$20,$0F,$0F,$24,$20,$0F,$0F,$21,$20,$0F,$0F,$25,$20,$0F
     
106. .DB $0F,$24,$20,$0F,$0F,$24,$20,$0F,$0F,$24,$20,$0F,$0F,$24,$20,$0F
     
107. 
     9 [' Z4 f! f( c# B5 a# }" y+ r
108. ;==================================================
     
109. ;命名表初始化
       K: N' W% e( p! C# e
110. Init_Name_Table
     
111. LDA #$20
     
112. STA PPU_ADDRESS
     / z/ g0 R* A* C- W
113. LDA #$00
     0 {6 K$ }0 Q, V; @( b0 J
114. STA PPU_ADDRESS
       x- ^  t( D/ y7 j, ]/ ~
115. LDA #$00
     
116. LDY #$00
     & }5 _  Q' O# Z8 c8 B0 j; y% t
117. LDX #$10
     
118. Init_Name_Table_Write
     
119. STA PPU_DATA
     
120. INY
     - w6 e) D* e4 V4 |
121. BNE Init_Name_Table_Write
     
122. DEX
     
123. BNE Init_Name_Table_Write
     
124. RTS
     $ K) p/ ]8 P6 C
125. 
     
126. ;==================================================
     " H& A) |( U. |# r& D1 J! [
127. ;调色板初始化
     
128. Init_Palette
     
129. BIT PPU_STATUS
     
130. LDA #$3F
     + e* t$ p! u( l3 |' z6 f+ A
131. STA PPU_ADDRESS
     
132. LDA #$00
     & {" o4 ]0 n2 c/ ^5 ?
133. STA PPU_ADDRESS
     
134. LDX #$00
     
135. Init_Palette_Write
     + D; e( y5 D6 ~5 O. M( e
136. LDA Palette_Data,X
     & s0 t5 Y) e; Z! A; W
137. STA PPU_DATA
     8 i  y/ ], O7 S% @1 J
138. INX
     
139. CPX #$20
     
140. BCC Init_Palette_Write
     
141. RTS
     
142. 
     7 \; F' ~$ g! [" Y# W; K4 j6 |7 Y
143. ;==================================================
     1 n- O4 A- \1 M7 t9 D
144. ;设置命名表属性
     / O+ l8 ]- n- _; m6 ~4 |
145. Init_NameTable_Attributes
     
146. BIT PPU_STATUS
       F* J' x( d4 f2 t% K: }, i  J1 S
147. LDA #$23
     
148. STA PPU_ADDRESS
     
149. LDA #$C0
     
150. STA PPU_ADDRESS
     / _, `+ L/ r1 U0 b% d' h
151. LDX #$00
     - t1 z- w. Y0 I, s
152. Init_NameTable_Attributes_Write
     
153. LDA Attributes_Data,X
     
154. STA PPU_DATA
       _1 m+ Q6 w1 e2 D
155. INX
     
156. CPX #$40
     , C, N9 ~2 S; t+ ~
157. BCC Init_NameTable_Attributes_Write
     % _+ h$ T" u# W
158. RTS
     4 j; Z) B: j; _& @8 a% x
159. 
     2 O& e( D* d, g9 _! B
160. ;==================================================
     
161. ;初始化命名表文本
     7 z3 C8 f5 q, W9 b' H* e/ v' d
162. Init_Name_Table_Text
     8 Y8 @- ^8 o! f; y
163. BIT PPU_STATUS
     ( l& D8 }/ u8 l1 c! {
164. LDA #$20
     
165. STA PPU_ADDRESS
     5 y; w8 o  n* G8 [4 C# J4 W  c( S
166. LDA #$00
     
167. STA PPU_ADDRESS
     ! z; R3 N5 Z5 p( w5 |) C
168. LDA #$00
     
169. STA FC_Data_Buf
     
170. LDY #30
     
171. Init_Name_Table_Text_Write
     9 t. ?+ R: g- V+ _
172. LDX #32
     ) ~5 ?, C: L4 E% q% O
173. Init_Name_Table_Text_Write_Char
     & P* H% ?( w- H5 n3 X: b
174. LDA #'0'
     6 W' b+ k. [" s& C: i; W
175. CLC
     
176. ADC FC_Data_Buf
     # Q& \) b, w! I( \4 x1 U4 y, ]2 s
177. STA PPU_DATA
     
178. DEX
       }, E8 l5 v3 ?8 E& O6 D. G* [
179. LDA #$14
     
180. STA PPU_DATA
     ( O$ U7 s- N% o  P) ~9 X& c
181. DEX
     ) G" G) w  @$ G3 w
182. BNE Init_Name_Table_Text_Write_Char
     
183. INC FC_Data_Buf
     2 Y; r! N# {3 c* g; w* k# N7 x
184. DEY
     
185. BNE Init_Name_Table_Text_Write
     
186. RTS
     9 l/ d$ R/ T  X, |4 Q
187. 
     ) d7 J. b; h, b7 }/ s, `3 g
188. ;==============================
     
189. Init_OAM_Ram;初始化精灵内存
     , b5 v$ M* E1 a3 ]& g
190. LDX #$00
     4 B) L& z$ _+ K3 f( X5 }& h
191. LDA #$00
     
192. STA PPU_OAM_ADDR
     5 X$ Z9 Q% F; _$ B  ~! Y$ ~
193. LDA #$F8
     * |. H" s# N& _# C/ O! ?
194. Init_OAM_Ram_Write
     
195. STA PPU_OAM_DATA
     
196. INX
     $ M$ X0 x2 W: w4 e$ G, }( I, ]* c
197. BNE Init_OAM_Ram_Write
     
198. RTS
     
199. 
     
200. GamepadProcess;手柄处理
     
201. JSR GamepadDatacan
     
202. LDA <Gamepad_0_Value
     
203. STA <Gamepad_0_State
     : v) I% v4 Y2 f) T6 @- |
204. LDA <Gamepad_1_Value
     # d  C, T$ B& X
205. STA <Gamepad_1_State
     
206. JSR GamepadDatacan
     ; B2 U1 Y+ B0 d8 K
207. LDX #$01
     / a2 d! X! Y4 g0 Y+ {$ j7 `
208. GamepadMergeCheck;合并手柄输入检查
     $ r+ S2 Q' m) F- h
209. LDA <Gamepad_0_Value,X
     $ _# N. \/ c" a- R3 B" Z
210. CMP <Gamepad_0_State,X
     
211. BEQ GamepadMergeInput
     
212. LDA <Gamepad_Temp,X
     
213. STA <Gamepad_0_Value,X
     ) D' f6 t* A- [" F( @& w- \1 \. l
214. GamepadMergeInput;合并手柄输入
       r: s$ F4 d, g. p; |
215. DEX
       ~8 a( _8 M8 Y7 y; ]
216. BPL GamepadMergeCheck
     
217. LDA <Gamepad_Merge
     
218. AND #GAMEPAD_MERGE_FLAG
     
219. BNE GamepadStateProcess
     
220. LDA <Gamepad_0_Value
     # d5 Q9 ^# I; C) {$ v+ D& ~3 Q
221. ORA <Gamepad_1_Value
     . O; f" g& R8 u( E
222. STA <Gamepad_0_Value
     ' V8 o7 O, Q5 K9 t: r/ G
223. GamepadStateProcess;手柄状态处理
     
224. LDX #$01
     ( ~# K7 \6 i: p! ]$ ]3 a
225. GamepadStateSave;手柄状态保存
     : c& Z/ a9 f3 c( B$ m
226. LDA <Gamepad_0_Value,X
     1 c+ R* ~/ K9 V# J( \4 P+ r0 b
227. TAY
     
228. EOR <Gamepad_Temp,X
     
229. AND <Gamepad_0_Value,X
     & ]. {  _2 E1 [$ U& h% Y( |
230. STA <Gamepad_Once,X
     
231. STY <Gamepad_Keep,X
     ( v7 {1 B: d; l8 ?9 L7 L( q% F
232. STY <Gamepad_Temp,X
     
233. DEX
     
234. BPL GamepadStateSave
     " Q1 E  Z5 s6 _! E/ D
235. RTS
     ' ]2 ~. \9 e  ?7 X( z3 h/ [' r' t% d
236. 
     
237. GamepadDatacan;手柄数据扫描
     " L1 Y) q4 j: ?0 l+ n7 k
238. LDX #$01
     
239. STX $4016
     
240. DEX
     
241. STX $4016
     : H7 c6 E  R: ^2 a% Z1 y# ^; w/ @5 s
242. LDY #$08
     , R) k$ R. R" B6 @4 p
243. GamepadPortScan;手柄端口扫描
     
244. LDA $4016
     3 z) T/ k/ F0 r2 f& |# S) w" _' b
245. STA <Gamepad_Port_Value
     
246. LSR A
     + `5 h6 ?  e! V  L" |4 ^3 V. d
247. ORA <Gamepad_Port_Value
     
248. LSR A
     3 s: m& M! Y! k1 j4 I9 g5 d% \
249. ROL <Gamepad_0_Value
     
250. LDA $4017
     + l" {1 s/ D, ?0 \3 E/ _
251. STA <Gamepad_Port_Value
     7 G$ S% t. d0 V1 a6 ^! X
252. LSR A
     8 Q2 ^+ z& y/ x, h/ E$ O
253. ORA <Gamepad_Port_Value
     
254. LSR A
     
255. ROL <Gamepad_1_Value
     # r( l9 [" ~2 |% M
256. DEY
     / K5 k% h7 O: ?
257. BNE GamepadPortScan
     6 G' d  z% s3 f/ ^: z! c# p& H
258. RTS
     $ Y9 x. }& R: [$ C% W3 E$ T, E1 ~
259. 
     
260. ;==================================================
     
261. ;PPU处理
     
262. PPU_Process
     
263. LDA #$00
     2 F6 F/ U2 |% _
264. STA PPU_MASK
     
265. 
     7 C! ~! h# s9 _. ]8 ~
266. BIT PPU_STATUS
     - o! @/ X2 ]( B# D% `, y$ l, A
267. LDA #$20
     : K; d9 p) x* b
268. STA PPU_ADDRESS
     8 X; z% ^5 G% O  {4 v$ G
269. LDA #$00
     
270. STA PPU_ADDRESS
     
271. 
     6 p" R5 @2 X! a$ Q; a) l0 r9 T
272. STA PPU_SCROLL
     % c; f7 q; A! G: y- p' B' z7 y9 E
273. STA PPU_SCROLL
     
274. 
     
275. LDA PPU_Msak_Buf
     5 x+ t7 q0 N2 Q- @/ j
276. STA PPU_MASK
     2 v8 P% o1 _$ c. r9 w: K  _$ e4 ~
277. 
     
278. RTS
     # t. Z/ `0 {  V2 ]1 c
279. 
     
280. ;==============================
     
281. Time_For_Vblank;延时等待
     
282. LDA PPU_STATUS
     + F) d8 i: m  O) H- x; L# V6 v
283. BPL Time_For_Vblank
     ( B* T) _- ^9 ]6 Q
284. RTS
     0 Q8 s* t, j% ^# i6 f, i. U
285. 
     9 f* }# }" U) _& E) a
286. ;==================================================
     3 w# v0 m. z) l' r! K
287. ;初始化MMC3
     * k& Y; c) O9 P/ k
288. Init_MMC3
     0 U# _8 v7 [) f3 M+ Z$ f
289. STA MMC3_IRQ_DISABLE
     / E( c5 t0 v4 [6 ]" \! b) F& u
290. 
     8 ~- {1 g: W4 W+ H
291. ;设置MMC3水平镜像
     
292. LDA #$01
     : q8 M2 u4 v. w- l1 _
293. STA MMC3_MIRRORING
     
294. 
     
295. LDX #$05
     
296. Init_MMC3_Chr_Bank_Write
     
297. STX MMC3_BANK_CTRL
     ! ^! p3 V1 ^+ }
298. LDA MMC3_Chr_Bank_Data,X
     
299. STA MMC3_BANK_DATA
     
300. DEX
     . X4 A* s% j1 d$ j
301. BPL Init_MMC3_Chr_Bank_Write
     
302. RTS
     
303. ;--------------------------------------------------
     6 ^( I: ^6 H+ {* @  D- F$ a) S
304. MMC3_Chr_Bank_Data
     
305. .DB $00,$02,$04,$05,$06,$07
     
306. 
     1 f) ?* p( ^: n) n
307. ;==================================================
     
308. ;重置中断处理
     % G9 |2 |! q  Y$ l
309. ResetProgram
     
310. SEI
     
311. CLD
     
312. LDA #$00
     / B( z4 ^) I/ o+ n8 a
313. STA PPU_CTRL
     6 O/ z. D% z! b
314. STA PPU_MASK
     
315. STA PPU_STATUS
     
316. STA JOY2_FRAME
     
317. STA APU_STATUS
     . {" I$ H5 C2 a9 S5 K' N
318. 
     ) E) X& b( R9 b1 z
319. LDA #$C0
     
320. STA JOY2_FRAME
     
321. 
     
322. ;等待vblank
     + ^  V/ D8 D6 F+ v% F* k6 x  q
323. LDX #$02
     # y% r! r5 f) Y6 I, g
324. Vblank_Wait_1
     
325. BIT PPU_STATUS
     ' ~# R& f; u1 s6 _. @1 p; T% s6 @
326. BPL Vblank_Wait_1
     
327. Vblank_Wait_2
     * J; s  g# ~  a$ y* ]3 `
328. BIT PPU_STATUS
     
329. BMI Vblank_Wait_2
     
330. DEX
     
331. BNE Vblank_Wait_1
     2 y3 m; b* V1 @
332. 
     ' s1 ?& H. {* @0 a# ~* Q( |) K) t
333. LDX #$FF
     
334. TXS
     + n& B* m, Q; Q  {
335. 
     ) Y1 o- N, v  P; f7 \
336. ;初始化MMC3
     
337. JSR Init_MMC3
     " u) v% K7 n3 R7 l  Q
338. 
     
339. ;==============================
     / c+ g$ \- u0 a  ?% C
340. ;RAM初始化
     
341. Nes_Ram_Init
     
342. LDY #$00
     
343. LDX #$08
     + n- \( x, p4 q) u9 Q
344. LDA #$00
     
345. STA <$00
     ! z; T+ V+ |2 F3 S
346. STA <$01
     ( x" T$ ^/ z0 v
347. Nes_Ram_Init_Write
     ! M  C9 b& w. |. r
348. STA [$00],Y
     
349. INY
     $ D. e5 p( Q' L" f& i
350. BNE Nes_Ram_Init_Write
     
351. INC <$01
     
352. DEX
     
353. BNE Nes_Ram_Init_Write
     
354. 
     + R6 l* u5 F& I8 q& D; ?  x
355. ;初始化命名表
     
356. JSR Init_Name_Table
     
357. 
     
358. ;初始化调色板
     8 F! h& F0 {. N5 p7 v3 k7 i" k5 _
359. JSR Init_Palette
     
360. 
     ! v9 C2 d5 U* |+ Z, m2 W% ^
361. ;初始化命名表属性
     & v" l7 ^5 l" i4 u1 A0 O0 S0 B" f5 k
362. JSR Init_NameTable_Attributes
     
363. 
     1 E+ R, Y3 K  J* ?# S: A( Y; O+ v
364. ;初始化精灵内存
     + T' ^3 S5 z. Z" P
365. JSR Init_OAM_Ram
     ( i) k3 M/ b2 `, e3 e
366. 
     . B: q+ m5 M& X, X  o' ^7 R
367. ;在屏幕上写点东西
     " F" @: I# s4 q/ ?; K8 V- j0 E
368. JSR Init_Name_Table_Text
     4 h' B  u* J" U1 k  {: C1 K% M, D
369. 
     0 f) l- V( G3 @  b: B* c, e
370. JSR Time_For_Vblank
       c: q3 a% f$ _6 D# r
371. ;开启PPU控制
     
372. LDA #$80
     
373. STA PPU_Ctrl_Buf
     ( G3 E1 O8 m2 @  k( a1 X/ A) h. X
374. STA PPU_CTRL
     + J9 N3 o2 [, X
375. 
     
376. ;开启PPU显示
     
377. LDA #$1E
     6 n$ _( ]! h) w0 Z0 X  `' Y
378. STA PPU_Msak_Buf
     ! e. \7 M# P) m* H; f9 A' |' ]- p, J
379. 
     ( `+ u" h8 T$ p4 Y& [) U6 {/ F
380. LDA #77
     
381. STA Sprite_0_Y
     0 C4 @4 y0 L( s: @  b1 d8 x
382. LDA #$1E
     
383. STA Sprite_0_Tile
     
384. LDA #$20
     , r( E$ |3 y4 p2 x
385. STA Sprite_0_Mode
     , P" y- S- _; J' Z
386. LDA #$00
     $ d" A: J8 e$ U7 f) Q
387. STA Sprite_0_X
     
388. 
     
389. CLI
     / b% p6 v( T7 `! _
390. JMP Loop
     - i; S1 T8 c) E- j
391. 
     
392. ;==============================
     3 p3 r4 Q5 }) P
393. ;死循环, 等待NMI中断
     ' h1 [, {- e4 t$ O9 F9 \
394. Loop
     
395. JMP Loop
     
396. 
     
397. ;==================================================
     
398. ;NMI中断处理
     
399. NmiProgram
     7 U, \& E8 X( h) B  S7 q0 x
400. PHA
     
401. TXA
     
402. PHA
     6 u1 J# t  n# s3 G! B
403. TYA
     # p7 l; M& i8 [* G- _) i
404. PHA
     
405. 
     
406. BIT PPU_STATUS
     3 K( t  F, f2 f6 u! T- x( j
407. 
     $ }/ @' _( F  I  J' ?
408. ;关闭PPU控制
     9 v" S  F2 z' [% [: M
409. LDA #$00
     1 M7 M  Z+ S4 M# h5 C' Y
410. STA PPU_CTRL
     9 T  O& \. X+ _+ |) ]8 y# Y- Q" e: C
411. 
     
412. ;处理PPU
     
413. JSR PPU_Process
     $ J8 h" \! c; C: W. a- C/ c8 h
414. 
     * k9 E' g) d" }: K/ B( t
415. LDA #$00
     
416. STA PPU_OAM_ADDR
       c8 D" `: K! ]9 M
417. LDA <Sprite_0_Y
     3 u! j2 o- ]8 Q4 O  d
418. STA PPU_OAM_DATA
     
419. LDA <Sprite_0_Tile
     
420. STA PPU_OAM_DATA
     & j; S2 k% x! a1 p* \+ f- |
421. LDA <Sprite_0_Mode
     
422. STA PPU_OAM_DATA
     
423. LDA <Sprite_0_X
     
424. STA PPU_OAM_DATA
     
425. 
     
426. ;开启PPU控制
     ) ?+ j& L( a2 E
427. LDA PPU_Ctrl_Buf
     
428. STA PPU_CTRL
     
429. 
     * ?+ j; B7 f* [- L, V( w8 G
430. ;屏幕滚动
     9 d0 L5 i: r+ i* H; F' p+ T) H
431. LDA <PPU_Scroll_H
     
432. STA PPU_SCROLL
     
433. LDA #$00
     # L5 G1 T  [+ \" M9 l4 f) \
434. STA PPU_SCROLL
       }) P" n( k' N7 n
435. 
       L) Q; `1 z" M# u( b. L1 O
436. ;手柄处理
     
437. JSR GamepadProcess
     
438. 
     
439. INC <PPU_Scroll_H
     - W8 z7 d7 F( x1 Y' w* h
440. 
     $ p6 j' z3 _& G5 k2 N$ }5 t9 ~$ \/ Z
441. ;启动0号精灵碰撞检测
     
442. LDA #$01
     7 P) Z% ?# y) j( a+ Q
443. STA Sprite_0_Hit_Move_Direction
     7 W6 ^3 D! n6 d9 u6 r6 R2 W
444. JSR Sprite_Hit_Test
     # w. @. ]# ?3 U: w
445. 
     
446. PLA
     : P' ]. {, E: V
447. TAY
     
448. PLA
       r7 y! h  b+ @, ?4 [) e
449. TAX
     0 {4 E0 o1 A$ h4 |8 F
450. PLA
     
451. RTI
     / l8 e( L6 f: W
452. 
     0 V" u9 w" O( @: a6 C: p6 E; S4 d0 J
453. ;==============================
     / b% ^  h" P& I# x( h( n
454. ;0号精灵碰撞测试
       D" R8 w: b! Z/ b
455. Sprite_Hit_Test
     1 [7 k( ~) b7 C5 M
456. 
     
457. ;------------------------------
     , X6 c- k1 G! L3 Y( y2 _$ F
458. ;等待0号精灵碰撞状态取消
     
459. LDA PPU_STATUS
     5 C- u/ C2 o5 \+ S9 J* e
460. ASL A
     
461. BMI * - 4
     
462. 
       F) _- {% r! `5 [8 f& N
463. ;------------------------------
     2 n: H1 Q; K0 W0 W( x  T4 v
464. ;等待0号精灵碰撞发生
     
465. LDA PPU_STATUS
     
466. ASl A
     
467. BPL * - 4
     4 |$ k4 E: F6 B  N' Z; |
468. 
     
469. ;------------------------------
     4 k" i' [0 w" \- I3 A: \
470. ;行消隐等待
     
471. Sprite_Hit_Scroll_Wait
     * y% H! Z  K+ v8 f) T
472. LDX #$28
     5 h* V  _8 J) n! _& W; k; @" b5 K
473. DEX
     
474. BNE * - 1
     
475. 
     ) P8 ]: \# j* e3 X# K
476. LDA Sprite_0_Hit_Move_Direction
     
477. AND #$01
     
478. BNE Sprite_Hit_Scroll_Set_Right
     + F% S8 C' K, S9 Y# [
479. 
     
480. ;------------------------------
     
481. ;分割画面向左滚动
     
482. Sprite_Hit_Scroll_Set_Left
     
483. LDA PPU_STATUS
     
484. LDA <PPU_Scroll_H
     $ P  |' v6 k* q
485. STA PPU_SCROLL
     
486. LDA #$00
     
487. STA PPU_SCROLL
     & p' A" A! V  Q# b' L' G
488. RTS
     ! o4 a4 @: A( _* C, h: v
489. 
     
490. ;------------------------------
     
491. ;分割画面向右滚动
     
492. Sprite_Hit_Scroll_Set_Right
     ( e. P4 i7 A' C
493. LDA PPU_STATUS
     
494. LDA #$00
     
495. SEC
     
496. SBC <PPU_Scroll_H
     $ _$ w6 s! D0 \; b4 Q
497. STA PPU_SCROLL
       o6 r, A/ m3 m  V. E
498. LDA #$00
     
499. STA PPU_SCROLL
     ) d) @. s: ?3 Q; v$ A3 d& [, q
500. RTS
     ! D' _% ]7 h+ i: |8 h
501. 
     
502. ;==================================================
     
503. ;IRQ中断处理
     & F* p8 K' I: _6 X6 u% ?
504. IrqProgram
     
505. PHA
     
506. TXA
     
507. PHA
     , t0 K5 m, L, h
508. TYA
     : H6 F" p* K4 c- A+ F/ B+ Z; n5 b% I  E
509. PHA
     5 l$ t8 u- [0 g% q9 N0 g
510. 
     
511. ;关闭IRQ
     ) D: `. ~. w2 [! q
512. STA MMC3_IRQ_DISABLE
       c( X  d7 g2 g' o: b3 D3 x
513. 
     5 X1 H6 A2 Y- l2 H! `" e8 O
514. ;允许下个IRQ触发
     
515. STA MMC3_IRQ_ENABLE
     1 r: D1 L( @8 ^2 O- t5 a
516. 
       d& n) Q* `9 A* V& x8 v
517. ;IRQ处理, 15线后继续触发
     ' e- x# j. N, m2 w) _9 U: v- K6 n# h
518. LDA #15
     
519. STA MMC3_IRQ_LATCH
     
520. 
     
521. LDA <IRQ_Index
     
522. BNE * + 4
     
523. INC <PPU_Scroll_H
     
524. 
     
525. ;设置屏幕滚动
     
526. LDA <IRQ_Index
     
527. AND #$01
     
528. BEQ Irq_Scroll_Right
     
529. 
     
530. Irq_Scroll_Left
     * B2 O8 b/ W' z8 a/ Z7 J" A
531. BIT PPU_STATUS
     
532. LDA <PPU_Scroll_H
     " E. I( T" a4 c" K
533. STA PPU_SCROLL
     2 i; G  ~# s8 D: B" c
534. STA PPU_SCROLL
     
535. JMP Irq_Scroll_Over
     # m5 ~6 X) R  t2 x2 d+ L
536. 
     
537. Irq_Scroll_Right
     % T! q- v4 |+ L; T) z
538. SEC
     
539. SBC <PPU_Scroll_H
     
540. STA PPU_SCROLL
     4 ?! _5 c6 F" u3 q% `
541. STA PPU_SCROLL
     " N3 }5 n+ w" v: e
542. Irq_Scroll_Over
     # n( U& R  B- M" o5 h- I) E
543. 
     1 h7 e4 @  j+ i) W4 ?  K# ?
544. INC <IRQ_Index
     
545. 
     
546. LDA <IRQ_Index
     ' A* y- _4 x" z
547. CMP #14
     - K: C/ f* z8 w0 m6 @3 k9 x/ k) Q
548. BCC * + 5
     
549. ;关闭IRQ
     & E( l# V1 \, t* H; n' P
550. STA MMC3_IRQ_DISABLE
     
551. 
     
552. IrqProgramEnd
     
553. PLA
     " Y  E' a1 G2 s
554. TAY
     
555. PLA
     
556. TAX
     1 ^) m8 h" u4 {& z7 d7 [
557. PLA
     6 i5 j0 g# `' n9 ?
558. RTI
     9 l: F% C- G9 L7 a6 u/ l
559. 
     
560. ;==================================================
     ' ]; u' t) T* T4 |7 f9 j: C
561. ;中断表
     9 H- y2 I' q3 i* m( S) Q
562. .ORG $FFFA
     ; A( }& M; D9 G
563. .WORD NmiProgram
     : l% t; Q( E3 N7 j( F; p, w+ \% ^
564. .WORD ResetProgram
     8 e* R1 M8 D6 p
565. .WORD IrqProgram

复制代码

0 m4 i, O" {, `2 Q6 ~