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

yandagui

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

复制代码