|
|
;[FC][最终任务mapper1切页程序]
* M" k' x. T; q! u .ORG $CD9B
/ @* y" d/ D x: ^+ ?/ eBANK_START:
c0 O, h- c& @8 ]/ }2 L* K& D STA $700 B# V5 ?+ l( P F# [
TXA. G8 X, N3 U2 A! l1 c
ASL' y7 A8 ^: ^- t8 E' q7 J5 K. m& L
TAX7 h% C4 U. x+ W9 `$ W
PORT_SET:
: A: N8 ~0 O9 d/ W LDA BANK_DATA,X! T( c) p5 g5 T8 X4 s7 \
STA $6E: _+ k0 u4 g* `. I0 E* f
LDA $CDB8,X
; A" a5 I8 c% y4 c3 B" S/ z STA $6F& p- ?$ B% E5 Y" w2 M% ?
LDY #$00
( N; V8 p* x( D! X& P& i LDX #$05
* \" L5 D. j8 e% [5 L LDA $70
+ G2 E/ U* U* L$ Z mPORT_WRITE:/ o0 `; u0 [2 C" \/ G$ o
STA ($6E),Y
& ]3 G6 [; g8 o% a3 ?: W: l LSR
7 d9 l W$ x( k6 T- Q+ S' R. ` DEX1 F$ X( |+ P8 S3 L
BNE PORT_WRITE
0 i6 G f+ p) i; o% M! g+ R RTS
8 s# s3 m& W- c3 Z2 u: I% F # N) ?2 z8 j8 d i( u, I$ `
- b8 J4 J- a3 Z6 F; K! B4 h5 m. u
BANK_DATA:
7 ^0 w* K% X" O( s0 u .BYTE $00,$80,$FF,$BF,$00,$C0,$FF,$FF
2 x! `* k( X7 G6 y1 J ) L1 M# N ~% V4 S
4 i7 i1 ^: x( \/ r
;[FC][最终任务mapper1转mapper4切页程序]1 E/ J/ P8 K K) l
.ORG $BFD2 ;初始化跳转. b u! G" }: s2 c# p4 E) q
JSR $FFC0
G0 o- ~2 f0 t5 p2 E9 ^! n# z- m$ Z7 B8 a1 C+ C! R
b) J5 Q) y) s5 P .ORG $FFC0 ;切页" J8 _* n3 D/ z; ]" e& c
LDA #$06
) f% c- p9 q" a$ ~" I6 N STA $8000 K/ |) j& m/ h7 E0 f
LDA #$0E
' e0 t4 |9 A" A1 V: Z' h5 y STA $8001- Y! A( l( `0 k1 ]% q3 P
JSR $8000) x5 X6 d: ^% Q1 B
RTS ! y9 h, f8 B! M' Y& y7 `
6 W- N6 ~ W& }
.ORG $8000 ;数据复制
" d& P1 P( u5 A4 F) Y6 ~" D# n LDA #$804 q% Q, m( m) N
STA $A001 ;启用SRAM
4 y. o, J+ p; M7 C( P6 V PHA
6 O* }/ M8 ?2 ^5 v" r/ { TXA& V. m& z1 {7 P
PHA# d% }# C4 A3 [' y
LDX #$009 {& U E0 H7 O% P$ Q& F2 |
DATACOPY: ;数据复制
Q% P/ F; p9 Q2 H LDA $8100,X
2 h5 U. h6 E# q: ?) w4 V STA $7200,X/ ?1 z5 K9 n% Q/ t
INX
4 K6 g) |+ G J6 B2 k$ J CPX #$00% w! k5 h, C7 S! x
BNE DATACOPY
4 s9 C- n8 w j& H% T* J PLA& b: [: T3 F7 b
TAX
( ?+ z# |8 g5 j# A2 h) X PLA
, Q! E& A: t+ u RTS
& @/ o& ?; B3 u$ \# a& I0 M5 e " T0 z+ T/ V, U- c* `2 G2 ]+ a
.ORG $CD9B ;跳转到转换的切页程序7 x, c+ S2 ~) J3 F; Q& q
STA $70: Z/ T$ `0 Z0 X; ]) K8 U; {
JSR $7200
: L" T5 x. v0 o4 \2 e+ N RTS
5 B- l6 F9 |4 D+ T- R 2 ?/ L# Q: b; S- y
.ORG $7300
- b# J6 W0 h( s5 H! u+ K. ~M1_TO_M4: ;切页程序3 |. F$ E& |9 |
CPX #$00
5 ~6 H( ^( @' C/ a4 P8 R BEQ REG_SET
% h& C/ z9 v3 A: g5 ~, c CPX #$01
% ^% a8 F$ k* M) Y BEQ PPU_BANK_0000
, j+ ^/ R8 [5 _5 w. P5 v CPX #$02
9 L9 B H9 Z2 K% Q" ` BEQ PPU_BANK_1000
: P! s3 U0 U% P7 k. | CPX #$03
4 }7 e. s. }; o BEQ PRG_BANK
5 b, f0 C: ^2 @, c/ ]; A2 H4 CREG_SET:1 X* a8 [$ ^$ R# i% o) `" \) H0 Y
STA $A000
6 |6 x) F" d+ X" B RTS
* d7 o) y( G8 P9 ~4 u8 r .ORG $7320
! K0 j+ \5 k6 @$ bPRG_BANK: ;PRG切页 ]" |# U* B5 U0 ]5 x [8 \
PHA
# ]6 Q, p' |5 P0 ? LDA #$06
- M: }* j, H) N, ` STA $8000) m( t+ E3 M: V F, Y% i! n
PLA
& W* U$ g8 P2 l ASL
! J w+ l# A3 v3 S4 Q% q3 d. p% @ STA $8001
6 f6 v! q9 R$ o4 {4 @. D, l* e ORA #$019 K0 `3 b; D1 m/ G- P. ~* N
PHA3 z F$ N4 N A) \# I
LDA #$07
. ?$ A! b7 y2 x5 V* x" v STA $8000
( m6 h0 \) k/ T. g8 h7 G6 f PLA7 e$ E" t& D; p
STA $8001
, h8 X( ?+ R W7 X! j RTS4 W3 M* a8 v+ Q4 K1 H
.ORG $7340
& ]6 q8 \& `# S9 D; U, YPPU_BANK_0000: ;精灵切页
, k# ]+ a( R, N$ T- N& ?( | PHA% Z( l, `0 v3 j' T% J9 C
ASL3 K: g/ d5 p# @
ASL; l. R p# D. G V5 Q3 s6 G
PHA
) U, j" M2 A0 ?- @$ K LDA #$00. h/ N6 j: I2 X+ p7 z7 G+ r8 r W
STA $80002 } l; i+ `) z. E6 _
PLA
8 b" o: q& H& p, j STA $8001
. V- _# _$ P: U$ I) A! y: j( I ADC #$02
' w. ~+ h& V3 R7 a6 i PHA) T) p- B$ B6 B0 m. {8 T
LDA #$01 X H, A e3 A+ P$ a
STA $8000; A( M; w) l: a. |, M
PLA3 x- Y9 H6 }! |9 T/ m. ?5 Z1 ?
STA $8001
% g# I0 Z9 r+ a/ W; W# u' e PLA) e' W. ~* q) Z! C6 w
RTS( T' {8 ~8 J7 x9 a
; i1 z" u+ m4 V .ORG $7360
, @# t$ `% K1 ?0 r. L0 L3 PPPU_BANK_1000: ;背景切页
/ l! U) y# o, v# a PHA% \3 y+ Q3 {- {3 B- x. X$ c0 C3 Q3 V
ASL
+ @' |% }9 b) t R: e6 g ASL9 N* T5 o- b8 d3 h* k2 J
PHA T x4 a3 J1 G( ?8 L
LDA #$02
. P8 r' T$ s% y$ n% t& t1 b8 u STA $8000" ~4 L' e( a/ {0 Y
PLA, ~/ K0 {9 y& Q" H; r
STA $8001* W$ E0 S7 r% ^4 _0 y2 R6 A7 F4 ^
ADC #$01$ t* t( n& P, Z6 u9 |
PHA
9 S: B$ U; b+ g5 Z: z$ G" H" R2 X LDA #$03, k( O, C: Y7 f0 e" p( D. @
STA $8000* U E% H& v, j4 Y6 X( M
PLA/ R1 K5 Y* s# c9 R5 z4 ^7 Z' W
STA $8001
- s& L9 s- {& v' @; W' H ADC #$01
" i% Z; l1 R/ U4 r" z& R) \. H9 y PHA( i+ ^+ y! D( B: F5 H6 B
LDA #$04! h' m/ v8 r0 D* M$ a
STA $8000
s# y6 G! ]7 S4 g) ?- E6 d PLA- p" l; e2 J& z: O1 q
STA $8001
; M3 i2 Q2 K6 A5 S ADC #$015 b% R* I" y7 E2 E& R
PHA
2 y+ Y, y+ W& K4 y' u LDA #$05& j9 t# Y( F, S! Q8 [3 T" P
STA $8000
4 D( ?% V$ ^8 P9 F# P% v PLA
/ e U6 p- g0 Z6 \4 M" }+ }$ F STA $80017 N/ ~) s2 ]* p' M8 B$ ~( y
PLA
& K, l2 H% U- ?0 `. e3 T- n RTS
8 Y+ J& ~3 [$ l7 h: d5 i* Z) N2 [. z: i7 ^6 r; N$ [; i9 V/ I
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看，没有账号？立即注册
×
|
IP卡
狗仔卡
发表于 2017-5-20 21:24:33
提升卡
置顶卡
变色卡
显身卡