|
|
;[FC][最终任务mapper1切页程序]
6 w3 `2 K. Z$ d; K9 m* |7 m .ORG $CD9B9 r% d2 U% }2 `: p! O! l/ z
BANK_START:5 V/ L( s1 M5 y2 v. p1 U$ l
STA $70# t$ m+ J3 x9 D
TXA
0 W# _( I; L6 a x c ASL
! D( X9 t* \" x6 F" H TAX
! S$ X; N; {+ e2 D' uPORT_SET:
4 e8 P& A: m. J$ M( ^8 F% c LDA BANK_DATA,X- v# I7 D/ Q! K0 T9 u
STA $6E
4 y" L% `7 Q9 A" K& D' n LDA $CDB8,X1 v. M3 ~4 h. M
STA $6F0 ]- y2 |- ^6 n1 ~
LDY #$00
' o4 z& D r9 Q# ^' G8 R9 ^ LDX #$05
2 B/ J+ ]* W7 p% E* `& v LDA $70
- g' J3 ]0 l' j0 e) Y3 |6 @' APORT_WRITE:9 W( b5 b" V% R6 t \
STA ($6E),Y. x C2 f2 U" P
LSR& A5 f0 c- B1 x$ F% e
DEX+ d2 r+ c! D* F0 V* Q
BNE PORT_WRITE
5 \5 r4 \( h; M( o6 o: n RTS1 P4 `/ s9 D$ k, l0 z
& M0 b' e; o1 a* y. W
% V& E0 R8 P# k8 \2 o- OBANK_DATA:) C9 L5 b: Y4 n3 q/ d- h+ ^
.BYTE $00,$80,$FF,$BF,$00,$C0,$FF,$FF# V. l! h+ `" F- z- I5 V8 f3 J
) B# w# m3 w% X7 \- n
; G' M3 e P0 h8 t1 O
;[FC][最终任务mapper1转mapper4切页程序]
0 |7 T( v' i, u4 [ .ORG $BFD2 ;初始化跳转
7 W" n0 ?3 e7 l. }% L6 H/ t JSR $FFC0
; V; X2 J$ a) `5 W& @# k
8 v/ d4 T% s, E4 Q* W: d# W; G# f2 K$ m6 G1 }: E4 l
.ORG $FFC0 ;切页+ D9 q# P; s# \* E2 d) n
LDA #$063 p0 I% g3 C- R5 P: `
STA $8000
$ G5 M4 j% z+ u/ `! _, { LDA #$0E
$ `7 r% b( X, A, { STA $8001# x C8 b+ `0 v5 O5 P
JSR $8000: H0 @2 v- N( E, R
RTS
, Y4 h% S+ X2 Q" b7 j' V9 u
1 d' y4 ]0 d5 R) \0 l1 v .ORG $8000 ;数据复制
! B, g [" j/ N9 T/ _8 K LDA #$80& u/ Y$ f6 N- n6 |+ v
STA $A001 ;启用SRAM
! @- K C3 n( {* H% l8 q+ _. l PHA
& s( y, r) F; v1 T1 j* o0 K5 J5 E TXA7 i! j" h/ f; x/ _: s$ I
PHA
: M$ c3 h: N/ V n+ _ LDX #$00
. x0 G$ ]' W/ n" W; H! HDATACOPY: ;数据复制& W2 J: n3 P& o# M0 i, L9 v& L' \" }
LDA $8100,X
3 ]+ l6 ~7 X. A, q STA $7200,X3 X7 h) \* x! W) t
INX
; _* R. T: f5 [" i! Z9 v j! q# T CPX #$00
+ ?. r3 p7 o4 T O- s BNE DATACOPY
7 K4 c2 ~4 ?1 L7 J" @& S9 G PLA
% f s' [! L; {% X TAX6 ^& X# ^2 g+ V
PLA# T4 O( P) C/ k; M" T% l
RTS( y$ P4 ?+ h, x+ R4 A( @
, h9 y+ Z* C& T .ORG $CD9B ;跳转到转换的切页程序
1 X- a$ [5 R# X1 k' ~& `6 ]7 U- _$ } STA $70
# z' M" l7 e8 x1 ~3 c" J4 S JSR $7200) j9 a6 l4 Q/ m, f8 L8 k
RTS) w: b: e* m1 M% D
7 u0 @# ~) C2 Z! e7 }6 Z .ORG $7300
) [* S1 P! M8 {* g7 f) {M1_TO_M4: ;切页程序' A5 k4 z3 Z7 R
CPX #$008 n/ Y7 Q& Y6 r+ p7 N
BEQ REG_SET
+ Z( m1 s& s2 `/ g CPX #$01, ~3 I; p+ [. O1 n6 S0 B
BEQ PPU_BANK_0000
+ e* f+ o' R% l. Z$ w CPX #$02
" P# a" Y+ `' }8 ~2 e% k+ U- t0 h$ S BEQ PPU_BANK_10005 Q/ {9 d' A5 c
CPX #$03' s* M4 b' [8 V
BEQ PRG_BANK
6 n; T. {1 G# X. bREG_SET:) D6 [! Q; T+ Z' [$ X( y; Q/ A% ^
STA $A000) `+ R, G+ u" k, M+ b9 K2 x
RTS
$ A4 k7 n8 W+ W# }/ `) b .ORG $7320
; i$ g+ i% K" y/ pPRG_BANK: ;PRG切页
, O g! e/ Y+ t8 f6 Z PHA
) w$ ?6 L/ R) J4 e# N& ?' \# r& L LDA #$06
5 [" [ B$ v, |& @ STA $80005 I( v% W4 e+ W/ x0 k
PLA
% Y! M7 W* `) j# ~& U ASL; k; e V( c6 _: t7 F# ?+ r
STA $8001
$ k3 s+ ?- V1 q! D ORA #$01% |# }# M& s+ B2 |
PHA
* Q( f( Q: F4 l+ y6 Q# P LDA #$07
/ S$ u! W( V! f8 z! n STA $8000+ s- e! a: X$ `
PLA
3 L& x& [* }4 B2 F' t# ]; b' K STA $8001
) N+ r6 d+ _7 h RTS; E( V3 W! X4 x. P( s0 Q# o
.ORG $73409 `: I7 {) k" _
PPU_BANK_0000: ;精灵切页& W! y' _5 S1 Z5 b) L. v
PHA
9 g2 Y# P) }1 J8 A ASL; I+ e5 I- j/ d! S
ASL
! h3 n- S$ u% ?* d6 H7 T5 B- }2 I. e PHA7 e+ N; L, x; [9 [6 v7 f
LDA #$00& b2 ^3 I; b x1 f- {, F
STA $80004 {# _' p8 k# W# T& I2 G
PLA. _+ r- d2 O+ N) a( y2 y% {
STA $80019 i8 F7 c* O/ s" ^
ADC #$02( x- d. Y2 m) n$ B3 s
PHA
. r2 Z' M5 c( A& }; l6 u; J/ S" B7 z LDA #$01
, X( ~& b& m2 _) i3 W STA $80009 @8 h, {% I2 |$ I3 J N4 I4 H3 B
PLA
! b, V" W5 [7 |* @2 A+ D9 v7 w& X STA $80019 x4 o! k% q E2 j& @0 `: o. @
PLA
% F" I7 @) Z% F6 D1 g RTS5 @8 v+ q9 F& q
( A4 j- J9 o$ p$ u! b# h X .ORG $73603 Z# G" y$ H3 I( {( e
PPU_BANK_1000: ;背景切页
5 D9 z) n# M7 R. z PHA
/ A* Y/ a/ C2 z ASL
, m& c& P& I+ H ASL
/ i Q' I# B& W/ I8 k1 t- M9 B PHA
$ W. {- u+ S: V- |) z" Y/ G( o LDA #$021 I4 o( w& f# m' S
STA $8000+ t) Z& n3 c! I
PLA
4 n7 t( f, `1 X7 D4 j; D C STA $8001
\- X W4 _; x. ] ADC #$01) g D0 s2 g8 \1 e
PHA
& a! P2 \7 M# q* A& `5 J# w* @ LDA #$035 ]# E5 Q) l# A0 R5 h) ^
STA $8000
0 M4 |2 X0 q4 h) s I3 j( w1 B PLA
! I* ~7 H5 T, H" C6 I( D7 x8 i' z0 w STA $8001
3 Q5 M _6 V( l! u6 t* `7 r ADC #$01
" @9 K$ n0 A9 C, A: {" g1 P5 Z" x PHA
& Q. {5 @& } a% y" `. e% O LDA #$04
1 ~7 O4 w: S* i/ f, |) \ A STA $80009 Q9 g9 \/ F5 F2 S+ `6 ?3 J+ ?. J
PLA
9 N: e/ j# Q: \! U" S t STA $8001
- k1 ~9 z+ P; A, w# D5 q! V ADC #$01& I& x. p* i3 J" h4 S$ ^8 v
PHA& _/ Q0 C/ w0 ?* p
LDA #$05
2 x* m" p; F7 P. F STA $8000. p. G2 I" u/ d9 P
PLA9 J3 P+ q* p" \) p
STA $80018 K4 n- \4 V* R2 e2 Y7 S" t
PLA/ g3 m' N) r" T
RTS
( y7 k Y( l7 a6 G! ?
0 c6 p" q2 c" o; E |
本帖子中包含更多资源
您需要 登录 才可以下载或查看，没有账号？立即注册
×
|
IP卡
狗仔卡
发表于 2017-5-20 21:24:33
提升卡
置顶卡
变色卡
显身卡