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

yandagui

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

复制代码