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

yandagui

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

复制代码