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

yandagui

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

复制代码