|
|
;[FC][最终任务mapper1切页程序], l1 W2 p g- D% w% n
.ORG $CD9B( d) g+ |4 W" u
BANK_START:
2 b* F6 @, @0 w) X8 T# h5 f STA $700 b4 O+ j" z O' m& B# u
TXA
$ `2 a0 S( D. |. J1 n ASL
4 I" R1 h3 c( J. B* D' \0 Z' O9 l& ~ TAX
4 [+ s" X4 [2 cPORT_SET:
' S. V3 A5 }4 f1 p' }0 a LDA BANK_DATA,X9 z/ L9 D5 d* z! \) s% B
STA $6E0 D% L8 _" I; X: ~; C6 g$ _0 ?
LDA $CDB8,X
6 P" g6 e1 V5 K$ M% F! Q, S8 K( B1 h5 E STA $6F( w; C7 c9 w& s, @: o) o
LDY #$00( H% ?. K* T+ N7 \' h
LDX #$05
) t P+ o8 ?, ]3 _" I LDA $709 U; |( X5 f2 Q9 y, H& I8 q
PORT_WRITE:
. i7 @6 C/ q) C6 {; b/ W STA ($6E),Y8 }, h& o' {/ b0 o
LSR9 F+ A7 B& v4 h% P7 T, e4 K
DEX: A: H! T5 d1 N @8 X% Z) u
BNE PORT_WRITE& q/ S, c7 e- o) ~; E) t
RTS2 @0 i8 m. |9 {# o
0 n6 M4 I' L! e; S4 }, a4 g$ C9 b
8 t* F9 q' `2 M$ E4 G. y% w0 R dBANK_DATA:
2 l' w/ q# {2 A/ u .BYTE $00,$80,$FF,$BF,$00,$C0,$FF,$FF2 l- F9 p; v* o) O% R
9 R- g! U& z2 r" ~; p8 R
0 y6 b. S$ ^, F* u
;[FC][最终任务mapper1转mapper4切页程序]
: [) J, D, ?( P9 h; [; N+ _ .ORG $BFD2 ;初始化跳转
0 F. b8 C4 O! h4 P+ j$ h1 ^: I JSR $FFC0/ R) Q4 I+ L$ |* B+ y8 Y- P( c0 |
5 w4 f4 N" m: A3 \/ W+ _9 G& V7 Q
" v6 x* [' ?4 N" Y
.ORG $FFC0 ;切页
: P; ~9 p$ Y2 f2 u: t$ P; R) ^/ h LDA #$064 I x5 r, D+ E) P A) N0 ?8 g, F
STA $8000
4 U7 @9 N; d- g5 Y$ |' ?3 |, U LDA #$0E. I& {0 G) [! N
STA $80018 G* H; q3 x* ]0 J9 Q: a
JSR $8000
& e& r' r/ ~6 A1 U6 \ RTS
' o4 w; p4 T$ }- b . `) S6 F) z; O
.ORG $8000 ;数据复制' S+ ]+ n4 {/ a* c1 C: G9 B4 g5 Q
LDA #$80
4 U: D" u- t& b0 \ STA $A001 ;启用SRAM
. u- ~& ]: S. z0 N) S% H PHA
8 u& X( o$ B! `5 h TXA8 Y0 T9 P9 F2 Q, {- j: i- Z* o' D1 s
PHA
& C9 m% ^1 |5 X. C8 S8 G LDX #$00" Q# N( r5 n' \' J- ?6 T s
DATACOPY: ;数据复制
$ u0 f' W* n& P4 U LDA $8100,X
; X: c1 J5 x8 R# F! i3 L& m STA $7200,X3 x4 m7 t5 F$ a. u
INX' t% ^3 K# Z- B# o5 C
CPX #$006 c" H& l# K' F$ g. a
BNE DATACOPY
% Z$ R! k. j6 s2 g) z( k/ e7 @ PLA, W7 V" X* |) K
TAX$ l' y- D I% V: A) c0 c# C. ?
PLA
& N0 W4 A( R, S( a; {" |) j# N2 R RTS7 O: u: a% M( ] Z0 S4 H' U
+ z& Q. j: J/ @- n
.ORG $CD9B ;跳转到转换的切页程序7 T0 e% c! }8 z1 Q
STA $70! @* ^1 p& f" x6 v+ I# J/ G+ E5 s
JSR $72006 m5 \# X, n; [. I; ^, ^& Y0 v
RTS& \8 P7 P' ]/ G
* w* [9 f# s! J .ORG $73002 }- t' w) ]! d& V& n
M1_TO_M4: ;切页程序# D9 F0 \; @' _; n* F {
CPX #$00! x: }6 X5 C5 R0 x$ R- F0 z0 P
BEQ REG_SET, j, K3 Z8 h8 x% f- C
CPX #$011 [# r& c/ @) b8 x; G: C
BEQ PPU_BANK_0000+ c2 ~: t; M" A% I9 S4 E% V
CPX #$02 @& n; y: a- j% K% f
BEQ PPU_BANK_1000$ N. s: V& M& f$ \
CPX #$031 f O# j/ q* l+ ^$ b7 R. q
BEQ PRG_BANK
9 z/ ]7 e7 d* E; @REG_SET:
2 K: j" B# p& Z! }, J& U" O5 K. g( ^4 \ STA $A000
( H9 @9 { Q6 w$ I/ s RTS$ U( X g5 H0 F/ d8 I
.ORG $7320/ o( j: S5 x& P7 z7 w- u
PRG_BANK: ;PRG切页
, N0 \- _$ M, j- ?! ]( x PHA
, \) f7 U' Z0 g) X' t LDA #$06: t- ?6 m$ O) `; e
STA $8000; `# ]. _/ H. ^* e z% z R
PLA
# ^. h |& ~) L) h8 L ASL
4 U+ n( N7 X2 u$ C STA $8001
6 {4 \, L5 u; l D ORA #$01- p( v+ C/ i3 u& Q' z+ C
PHA5 I) n. p' j& g/ P7 l; ?! m( q$ p
LDA #$07/ P3 l+ \5 u1 t" V; v0 Q
STA $8000
6 L5 q% a+ P% \# Z& Y6 `. B PLA9 Q4 a. G6 S6 M4 u5 y) ]4 U
STA $8001, c/ K4 ]3 N+ C+ ~: G2 {+ u) K
RTS
" a4 S6 y2 V3 O; t) ? .ORG $7340- Y& M3 N: O% z/ T3 M
PPU_BANK_0000: ;精灵切页
* z* A+ j1 b/ O" ]) g$ E# J9 j PHA5 V# Z; ~1 z0 F2 Q- z+ N$ p2 G0 L: L
ASL
! I1 s% L5 {/ V7 v. ~" Y* |2 o ASL j e- I) w4 c8 f
PHA
0 \7 \: g( Q" J& s LDA #$00+ n$ H; Q+ E# y4 U2 l! A8 k
STA $8000
: x9 M9 z1 \: v' w; k PLA1 y" E$ H) b9 B6 o/ v2 i
STA $8001
+ ~) e5 r/ v% P9 |( O% \ ADC #$02
7 y2 |: U# ~, d PHA
8 p) i, k9 J0 L, k- Y/ _8 e3 n LDA #$01
- t5 Y2 p. P# k' v) g STA $8000+ s! B- d# S/ N+ ]- n
PLA! `* m4 v& |8 Q. G5 q
STA $8001
, \2 V' M; R- N# H PLA6 b6 O$ i' \1 ], g5 A; o
RTS
2 w# K3 |! r3 y- c9 j( `$ v$ l
. K) _$ Z0 g W* d# Y: A$ i .ORG $7360
: ^& @: w5 S/ q& ?. kPPU_BANK_1000: ;背景切页
5 t2 @. }4 r* j1 K& r1 V PHA
5 R3 A h8 I" L5 J- y# U( H) O3 u ASL
& u+ k* p/ S0 h$ Q ASL
6 _9 b1 n' w# ~- w7 N PHA
9 o3 Z, k# N. w2 `, u" k- J LDA #$02- Z W! {. S4 _6 h* K! }9 B' x
STA $8000
9 w' } E* @7 O9 [% H PLA) u! C N5 `& Q* O4 p+ h$ ^ q8 T
STA $8001
! j5 ?; j3 s3 \- b ADC #$01; ]2 g- t! x% {. F4 }
PHA9 |( e) M) u/ h1 `5 E; `
LDA #$039 e% P0 P3 t- z6 m. X9 s' u/ {9 j
STA $8000" A' X- d7 @ Y! Z+ P+ e
PLA9 a& p- b( q( w
STA $80016 }& p; t& |* G7 x8 @6 Q" ^
ADC #$01 C0 K) W: i: {
PHA
0 s' V/ D! S4 {5 d LDA #$04+ @9 m8 R: K6 f% \$ P3 I, p
STA $80008 f% r6 h0 y8 {7 J4 A* ~+ a) U
PLA
5 u+ B/ _8 U7 ^ STA $8001
1 v! x/ k1 n- p$ H8 C ADC #$01
( Y% J0 _& p0 a8 k4 N PHA
. n) ?( ?" M) Z6 d LDA #$05
+ K# [& j/ q% H STA $8000
2 {6 ~$ M& m O! {- }: p+ F PLA
; q$ i- s; A5 r: R* o STA $8001
3 V# h" g% A8 T; w$ [ PLA: \6 m) j! }: w
RTS! L: {( \0 r+ @& D
9 i# l* b2 K6 L) |2 F
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看，没有账号？立即注册
×
|
IP卡
狗仔卡
发表于 2017-5-20 21:24:33
提升卡
置顶卡
变色卡
显身卡