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

yandagui

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

复制代码