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

yandagui

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

复制代码

) u4 n& ?4 {9 q8 |; g* \  U