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

yandagui

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

复制代码