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

yandagui

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

复制代码