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

yandagui

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

复制代码

& @: l; h4 W5 A9 s