|
|
;[FC][最终任务mapper1切页程序]
! {, C" n; y3 Q% n) b( {$ G .ORG $CD9B
# e) ]+ H/ [& f" a2 n, @5 fBANK_START:( N3 M, n+ L) Z# e
STA $70 a! e& E C6 C) X0 S; o7 [; i
TXA) F; S+ @* h5 @6 z* [# b
ASL: j6 _1 K( j |, ]" d. k* `
TAX6 ?+ x0 X3 n" ]4 J9 r
PORT_SET:% E' X8 D7 x( C( f
LDA BANK_DATA,X" N# d6 M% L: q. x6 L/ K7 j
STA $6E6 a: u6 a* B* l; S; g( T. }# `' |
LDA $CDB8,X7 ~" j' F1 B( S; j- X
STA $6F. @7 I" x4 ?% V1 O
LDY #$00: L/ I2 t" X8 E, R7 `
LDX #$05
4 j9 ^4 K3 f. ^5 G! m8 w1 { LDA $70
( E& t; @ }' Z# ~% A; Z1 o: HPORT_WRITE:
* N2 o, l+ p ~- I3 A! B STA ($6E),Y3 B7 ~, n$ k) r3 b/ r( O3 v
LSR
$ C, t" o: c6 k7 C4 A% s DEX
/ u6 N& k$ ?8 P5 N* W% a BNE PORT_WRITE8 x( G8 ~' a0 s0 \
RTS
6 Q" H: q1 N) X3 S: |- I
3 r1 r# P- {# O, A. o) i& d 0 I+ T1 a/ {7 c1 }! }
BANK_DATA:% V9 p0 b/ B1 }; l/ F
.BYTE $00,$80,$FF,$BF,$00,$C0,$FF,$FF! c# H0 y7 Q& W
7 W O# a. j- M( i; { ) H: z5 |) r+ }8 c& ?) D" j
;[FC][最终任务mapper1转mapper4切页程序]
* _& k3 Y+ R, b0 F V" ] .ORG $BFD2 ;初始化跳转) B/ n6 \, p. I* r' y
JSR $FFC0% b1 W( I7 a: N# w p1 o: Y
/ l/ n$ X! \3 \* G; F$ M: ^0 k9 |! N( D$ E
.ORG $FFC0 ;切页
* ?3 x* [% I& e LDA #$063 n6 p; g9 W7 a8 O7 m" e0 ~
STA $8000
* F1 G1 {* E5 D( e$ h9 _; G' W: r LDA #$0E) | }8 T) Y0 z+ K/ t, [* w
STA $8001) z; g0 j2 ]& s. v
JSR $8000
$ J0 `# A! i! I' r: {; Z' I RTS ! C2 Q& ? B5 Y$ D9 X- ?
9 p2 X& _9 w+ m4 A: J
.ORG $8000 ;数据复制4 v8 B# m+ H; n6 s" f+ F
LDA #$801 p7 K0 H: ]4 ^) D9 k
STA $A001 ;启用SRAM# n% S3 G# U* v7 M
PHA
* O6 ~7 M8 s, m& f0 ?; D TXA7 N6 x: B8 O3 b7 T
PHA
( N( \& p2 I0 I( z3 D2 O1 x; w4 V LDX #$00
# Q% R, k3 N; W9 ^0 M' g( FDATACOPY: ;数据复制7 t8 X! q; y5 q: Q1 l5 v3 C, S
LDA $8100,X9 V$ z+ K2 c0 e" E
STA $7200,X
% R* D0 l( n! \- a% w5 U INX
1 ~( v* J! H, z. q! g CPX #$00
G- [; z/ p) t: N BNE DATACOPY v p0 z# P, T- B
PLA
1 c# _; |1 H5 M TAX3 j+ n& c. g% s/ C8 _. B
PLA
- H: z. v$ c" h' z. |5 a; u* u% u5 X RTS
6 M, q* S2 u3 o
) R: Y2 ?1 p# `8 s. c .ORG $CD9B ;跳转到转换的切页程序
$ s Z$ t$ |6 L STA $70
n. K9 @3 B* M0 [ JSR $7200% g4 I" A& ~7 s+ D0 Z$ U# N0 O. O
RTS5 |# g9 V e- a/ B) J6 L4 L
2 f( x7 L8 x7 p* x5 y .ORG $7300
l- [! S( v! G' ^M1_TO_M4: ;切页程序
9 I- @* j. {6 h; m5 s CPX #$00
1 g; S' I' P$ j0 X' d BEQ REG_SET0 I$ y. b6 m7 f& I
CPX #$01
" V2 @1 p+ [$ v* Y5 E BEQ PPU_BANK_00007 W, A4 d* B% D4 w7 J' a
CPX #$024 G) u' ?( X" f
BEQ PPU_BANK_1000
0 b' e6 ]! E( b2 f CPX #$03+ U9 }, P7 v- }' J! Z3 d
BEQ PRG_BANK
5 P4 [8 a! j, n: M1 W: X3 `( i/ DREG_SET:
; y2 E! h& \) X( X D3 M STA $A000
! @" k$ t9 k( z RTS+ S2 `) h4 S* i' D l5 f9 ~) x
.ORG $7320
5 n( o+ G5 d! N9 P6 Y4 _) p0 VPRG_BANK: ;PRG切页
- i& m) F' t% [7 r. i/ G8 i PHA
. [6 p$ l- Y& ~* ^5 y( d LDA #$06
T! s/ @" n0 h w3 U STA $8000
% r5 H, [/ P& R/ W) e, u! T PLA
$ _$ c' R, ~8 ~* P3 G6 D* L ASL
8 @" s6 |0 I' w( v3 T7 s STA $80012 d8 M! p& ?2 R0 c' y) z) H
ORA #$010 [; r% ?' F0 t) H" h0 C# u
PHA
5 o9 ^9 ? q4 w LDA #$07( q7 M. E) a7 M8 T% c) V- R5 |
STA $8000; X9 R% Q+ z1 ]; S1 @9 G3 w
PLA; m. m* K* i, L' z6 n* G" C, r$ D
STA $80010 n+ x$ i9 |2 D" f* @
RTS- Y- b2 d7 }; @3 i1 _4 Q- r* h
.ORG $7340
. q* A9 ]" O7 h4 q( W! zPPU_BANK_0000: ;精灵切页$ Z4 d3 g- U8 ?6 c( A5 M
PHA
( C) ]2 p- o% @1 l% o" \7 V0 Y9 g$ J ASL
/ Z3 x4 J$ R0 c6 {5 _ ASL
4 Q' r4 Z; f( d2 L+ w PHA, L' N+ P% D4 B! x$ R
LDA #$00- f* _! i) t/ q( g4 |3 r' x
STA $80003 A- o8 D( z, N; b) c4 }
PLA# m. [1 i' W8 T
STA $8001$ O. v* d3 q! p* ]
ADC #$02
7 h; H1 l5 ]2 c) r" T8 `6 J PHA* v, o! L& Z8 }
LDA #$018 E$ |" V1 S2 `/ E h6 Y. y) u {
STA $8000
( K) N2 B1 u* M% k+ r PLA6 V& w- p9 H. G" F: J5 x/ `* M' o- z
STA $8001
& S! \5 w0 S. } x* J! J PLA' o: e1 }& O* M, r" G O9 U
RTS
, k4 o6 q& k3 V& b9 b2 m- ] 9 M4 O: M7 ~& Q" I- O5 q ~
.ORG $7360
B! m/ _! u, J# S1 i# }# A8 D; oPPU_BANK_1000: ;背景切页' m+ t8 A2 d5 _+ G1 a
PHA- { K* \5 a/ C' Z ~+ w1 O( K
ASL
: i* d6 r: F- z' \) {8 ~! G0 | ASL+ \3 |& v( e% t% W! \, ]0 N
PHA
. @0 ~) [9 E+ u3 M! K LDA #$029 N' y6 O' p5 Z; @2 @3 C
STA $8000
a4 y4 n% B3 L, s, k PLA% I' ?- k, r2 w8 T
STA $8001
3 w) ~: K$ `+ @/ i2 @5 s7 p4 N6 F ADC #$01 {4 C1 s3 F6 N1 @4 q7 h }0 u
PHA& k: A' s; y! w9 W1 y! |$ f
LDA #$03
: B( d1 ?% R# w" d STA $8000, s' d' C0 ]: ^* a) [
PLA4 Q' H1 U* e- M$ T
STA $8001" G0 F" A/ d6 ~- m3 m
ADC #$01, L" ]/ ?- Z1 ]) F5 h; t
PHA a" m3 u0 [- r+ P4 [& }. n
LDA #$04
9 q# `. `+ h. G, W STA $80000 F& J( L/ P* W3 z2 ?5 A7 R* r; o# N
PLA
{3 c* t% A. x6 V5 y. x6 N) ]; a STA $8001! B1 B+ x% o& o5 o. |
ADC #$01
- `( A8 J# ?' x6 Q5 U PHA
/ w$ A$ @, A! a. K9 f- { LDA #$05' w' e4 o4 V, n- J
STA $8000" d. J7 X8 P0 q2 O+ l
PLA `. d+ c7 R/ q0 L0 V
STA $80015 J# R8 X+ w$ f1 B9 {
PLA' h5 {3 ~' q4 L/ b7 b
RTS+ r/ Z9 L8 J8 m" z2 C4 p
$ ~5 v# m6 H7 Y5 v- e8 k
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看，没有账号？立即注册
×
|
IP卡
狗仔卡
发表于 2017-5-20 21:24:33
提升卡
置顶卡
变色卡
显身卡