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

yandagui

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

复制代码