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

yandagui

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

复制代码

7 \4 D# J) D. ~" U" E# B- _