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

yandagui

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

复制代码

0 }' r! _! ?" z% p/ z- r3 u% c