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

yandagui

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

复制代码

/ m. g3 \! w! d3 a& {) n. C