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

yandagui

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

复制代码