|
|
;[FC][最终任务mapper1切页程序]( S/ z% a- x% f+ A% F- O2 V. o
.ORG $CD9B& q/ _% C8 U8 L- T' |. t% `# h [2 B7 p
BANK_START:
6 @* s7 I3 ]" S# M/ b) c! e STA $70# U4 ^; U; b3 v( @/ m7 v* }
TXA& g' J S$ A. @
ASL
$ ^& R5 T4 v) C TAX
+ l2 P& I% e$ C0 ]( v" p+ qPORT_SET:
2 B) K- R! q* z9 F% G+ I8 L+ k LDA BANK_DATA,X' m) |8 M J! J/ v( E
STA $6E f/ n9 D% M: g4 Z. x5 r: e
LDA $CDB8,X9 W. O: }8 D9 Y3 a7 U
STA $6F
8 Q D( R, l: a0 n LDY #$00; I# P0 @& u/ S: ^" w! c! K
LDX #$05
2 H- R4 D7 ~) q4 J5 D* U LDA $70; r( y4 ^% b9 b6 a: b4 y/ ?
PORT_WRITE:2 R" A9 k$ e* y8 B5 t8 w8 }
STA ($6E),Y( W) y% l3 t" D( t
LSR
, E }. t+ l( h, ~# { DEX. v7 E- r6 Z2 Y% f7 |# V4 |5 P
BNE PORT_WRITE
- w% _, Q9 a6 @$ ~ RTS- D- i6 U/ m1 o+ S9 _ A0 W; P
" y6 M/ i( h L1 ?' I8 T- q9 J3 p
* C5 s1 |. K* J# E% o0 a: W
BANK_DATA:3 a# t% e" ^/ {1 f0 r
.BYTE $00,$80,$FF,$BF,$00,$C0,$FF,$FF
4 p) w! o3 ~* H+ V / u+ v( U5 @: j8 X; C
F5 C" O* L2 T! ^+ Z( V- E
;[FC][最终任务mapper1转mapper4切页程序]
/ Y3 s; }+ o. w4 S" V" f .ORG $BFD2 ;初始化跳转
+ D; R$ O6 W' V JSR $FFC0
8 q+ [; ^* }8 {* r. |! X8 A1 f
4 o7 S/ \) k: P# R+ J) n5 u, u
# h/ \4 Q& x6 {/ L .ORG $FFC0 ;切页
7 a4 \; S. y, I& W( X LDA #$06' N/ O, I, A) R2 ~
STA $8000
3 w9 a; {4 ?7 }, o+ ~4 v LDA #$0E+ X9 [# g9 _4 G* q, m2 c& p
STA $8001
6 L3 }6 j9 m+ I' C* F4 ?/ D @1 W JSR $80007 H7 f% b7 O! A! q) c
RTS + ?6 G6 y2 ]7 R/ {* o5 U
5 H2 u3 j& e2 q; d
.ORG $8000 ;数据复制
$ b6 s2 |# l& [0 M' G LDA #$808 X" g% e( E7 B, ^8 q( @/ A- D+ k
STA $A001 ;启用SRAM
5 R: v* R# z/ m0 U' U) W8 P2 f PHA
) V9 m4 v- ~% c, e7 G1 K TXA
2 ]& }; K7 D' M7 ? PHA f: ~. o/ z6 B
LDX #$00' Q* {: S$ M! X- \8 Y4 |% U. A
DATACOPY: ;数据复制" T# W, Q, w2 n; t/ I) `
LDA $8100,X2 Y, s) L& e8 t b3 m* S: d
STA $7200,X6 o! i+ E# h% J& @% o& x' U
INX
# T8 a$ ^7 h* Q8 q- R0 Z6 [ CPX #$00
- B/ e* Y) A/ C0 j' S8 o- W0 _% l BNE DATACOPY
1 N; U/ G7 L& c) _, u PLA
9 a* t. u* x( K: c# ? TAX
( U0 V* K: ^5 N4 V7 y' N PLA* O( G8 T# b: g$ y. T
RTS7 [1 Z7 b) C/ g, f
; j4 Z- Q4 x) \2 t
.ORG $CD9B ;跳转到转换的切页程序: k( i" y. W ?' o
STA $70
I% L" N0 E6 W1 W4 _+ S2 r JSR $7200$ k2 ?7 @3 Z3 T! n: }
RTS
( ~$ i( G( f, f. R, U2 j, ]+ _: n' S' g
, D( D6 e7 c/ v .ORG $7300; `- H& K8 S$ Q; s' E: q
M1_TO_M4: ;切页程序
- @8 x/ @3 O1 b$ p, A CPX #$00
) }, r* | E$ E Q8 N0 x BEQ REG_SET! ~8 P6 W1 w, J7 F; H1 E
CPX #$01& Q6 d1 ~6 {" b! x- n
BEQ PPU_BANK_0000# y& j6 X% E. U% N4 h
CPX #$02
1 Z5 j9 M8 z3 I$ Y/ F BEQ PPU_BANK_1000
5 ~7 N( R- }1 _+ D2 u& A' p CPX #$03
5 o0 R$ I5 s8 c$ S+ U5 @1 p BEQ PRG_BANK/ {3 l4 G1 x% v
REG_SET:7 F% l6 w! R l9 s7 c& Y! k
STA $A000+ i" {0 ^* t v& A/ R% h. d5 q. c
RTS
; @2 Q" n& ~) | .ORG $73204 b2 {$ b+ G% W( l4 f- T: ]
PRG_BANK: ;PRG切页' Z4 d; ^8 F3 ^- Q' V ^; Q; M3 r* T% W
PHA: \! i9 b e4 N( v6 b1 p, E
LDA #$06
+ B* A2 Q k8 b3 _7 D STA $8000
# c' k, M0 h, O q! L6 \) Y8 I2 z PLA8 c& x8 y* N% y8 ]
ASL( j3 ~( e0 y- B- w) S* K
STA $80013 }9 j- W# n0 F: {" {$ d$ [4 g, V
ORA #$018 _2 p) Q% v9 {+ c- F; A }: ^1 Y& R
PHA
$ ?0 l% s* P9 s3 @, D LDA #$07
: f9 g% [. g2 e' F+ V' v8 ? STA $8000
( j3 o4 y9 ^: j8 n2 {. A: L PLA8 {5 H0 Q# M7 X
STA $8001
6 B) N- v' e% y8 b2 C RTS; K! s- t- Z- d' q2 @
.ORG $7340
$ N) ]* \8 P7 r. o( dPPU_BANK_0000: ;精灵切页
& R- E+ s6 m; V L" V PHA
" r* J( R% I h' B) o ASL* ^4 Y0 }4 s. v# a0 z: Z
ASL* m q3 F1 x: r, e X
PHA) I$ |# V2 }$ z3 n1 Q9 q6 S; F
LDA #$00" e" z& Q5 W2 ^/ x: @: U. q+ _1 l
STA $8000
5 Z! I5 ?" U) O {+ F1 l& C PLA/ B+ S+ t6 s4 }) N. v
STA $8001: K2 S- N d6 Y$ m5 d, K" s+ J) I
ADC #$02
7 s9 y2 B7 t3 x& x PHA
1 e6 d- P5 ? l+ H$ | LDA #$01
" ?* a9 X: g; v- f; I: K$ r STA $8000% V% Z1 K. T D1 B8 v
PLA7 U/ ^+ U! n9 B& Y& d1 R
STA $8001
8 b5 g8 P4 ?% A) ^5 Z7 t& k PLA) Y: |3 V, [# @; B, T0 `$ S3 J; O
RTS
[ |$ W4 w) }( w( v9 Y ) g) X" g1 B. {" K9 W Z
.ORG $7360
$ R- r- s* p- E Z# {PPU_BANK_1000: ;背景切页9 D6 Y5 |& @8 w4 q" f$ x
PHA' v2 K0 F" J. i, }& w
ASL
# R& X) D1 o1 C ASL
& D3 M+ B' m5 Q* L- J4 M7 ~ PHA8 `! a1 q" v+ o
LDA #$02
! l( v7 g+ d; r& J: o+ l1 x7 f" v# F STA $8000 m9 A2 D! n& A& ~+ L# |1 x
PLA
) Z# ]8 b/ C( R y6 u) n: Z: v STA $8001
' Z) j4 w. ]. Z7 o' C c! F ADC #$01
( |1 h( F9 g6 b6 n9 a6 R PHA
# |& T. e* {+ e6 V) F7 M LDA #$03
& b: D# C4 x$ |" I" Q* K STA $8000
9 e5 h- x! C) ]3 {% S PLA, W- d& G: v! W: G8 t* @
STA $8001
' s+ t9 J1 p1 M7 C* [. \1 i6 G ADC #$01
* Z6 I$ l3 e/ {, x; {2 f7 p9 W PHA
W) K! b+ v5 I5 a% ~1 w4 w LDA #$04$ f2 p8 {6 l) v) K, @) u
STA $8000
8 Z- U1 e6 O; @5 D9 p9 K PLA! Q5 E& G3 R) X) @: H( v
STA $8001- z% O4 T) n* h* S
ADC #$017 \! d5 }* c, x% {# C! A& p/ p
PHA$ m7 J: B6 e* m8 `1 D9 E6 i7 I
LDA #$05$ F7 E1 w9 Y7 Y* x( J
STA $8000+ w7 e6 A8 X' y+ s0 j5 Q
PLA U6 R' I! F1 O$ A& f
STA $8001. _: B+ }3 s2 L3 O- _9 B
PLA
, i1 I& D1 Z# e# ^ RTS
6 t+ F0 L9 p) j! C$ U" z, `# t8 W" N# T7 D5 l2 q
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看，没有账号？立即注册
×
|
IP卡
狗仔卡
发表于 2017-5-20 21:24:33
提升卡
置顶卡
变色卡
显身卡