|
|
;[FC][最终任务mapper1切页程序]6 `! w1 Y* K4 ?$ a/ e
.ORG $CD9B4 o# ]% t3 }( C8 r1 m% s8 S
BANK_START:* F3 m( h, i% c0 ^, R, N
STA $703 W8 A$ k$ M i6 ]
TXA, G6 y; f8 \6 _/ \( l. |
ASL
9 @" h1 S0 r m6 d E o3 _6 ]; } TAX5 J- C3 n( e l, [/ F
PORT_SET:
8 m5 b; I2 K" p0 C) x# ]+ l LDA BANK_DATA,X# j( [+ Q: \" f
STA $6E
8 R6 n6 M& D9 l! O/ A$ x- s LDA $CDB8,X: g" Z/ ?* W* X/ D9 Z8 H& n
STA $6F i; j! S; q Q
LDY #$008 A$ p: j o$ @0 E
LDX #$054 O/ x' ?- B$ r! d, J7 D: Z; L6 Z. _
LDA $70
, c- N7 l4 z- W4 F. VPORT_WRITE:
4 l+ k* a6 T/ V+ u% ~ M. H STA ($6E),Y
' A$ p2 ]6 V; }# n. u5 Y5 M; z* |) \' i c LSR i$ g6 J- `& H
DEX. Y3 V+ ?! x1 a: o, Y- V; X; S
BNE PORT_WRITE
2 q4 a- W- d7 V* u' ~! q RTS
( h! S8 Y, D/ V7 z% S- s
8 A; }5 o7 a1 t8 S $ y$ E4 e: T" A# c+ Z3 ?6 x s
BANK_DATA:+ n9 T& `* B) ~1 D7 p
.BYTE $00,$80,$FF,$BF,$00,$C0,$FF,$FF- i3 _/ y+ J% C! a. J
2 ^/ z: b# g" J7 }4 r0 \
4 j- s* s3 h1 _5 f0 R& ?;[FC][最终任务mapper1转mapper4切页程序]
2 a* \8 ~# w' z5 L R .ORG $BFD2 ;初始化跳转
4 Q j3 B8 x+ h; Q0 ?; Z JSR $FFC0. {& f C) N& y% D' d6 F
% F- \' U' ^6 t L" c5 ?
+ b, Y8 K8 Y" E' y9 U+ x+ o/ [ .ORG $FFC0 ;切页
6 n! Z* _: [$ M7 C M9 O: { LDA #$06* D7 h- R9 t, O6 n+ A9 R4 U6 z! V
STA $8000
! Q7 r; e- l. F6 H* {% u LDA #$0E, j( V0 B3 M' f
STA $8001; K! m1 J2 K2 ^6 x8 R
JSR $8000
9 h4 }; x! t7 f, b8 A& | RTS + i. i, S0 |- C5 {( y) c
+ Q: x; }# s! v# N; M .ORG $8000 ;数据复制
& O! n: a! |+ m1 _: G LDA #$80
5 v4 `* m; X4 [ STA $A001 ;启用SRAM# H( H2 f; R; H
PHA7 k+ X' S! C( Z7 b' n
TXA
5 O* @2 P4 _3 o$ j& B* b7 g PHA
8 ]2 O/ }% r" M, T LDX #$00
$ H4 _" Q1 F" b; JDATACOPY: ;数据复制
+ p2 t+ g% O G" j5 `1 m9 G( O LDA $8100,X
( O4 C. n& F: [ STA $7200,X
" E0 x" d* ~; P( k/ L; F INX1 d: V* `, |2 x
CPX #$00
8 B* W3 [# i( U- N BNE DATACOPY
" X4 [$ f, C& p1 u' G$ t1 u PLA8 r/ T+ b4 S/ b& b' ~
TAX
0 `2 E* H! l1 N PLA3 m F j, D/ v9 @0 x& b
RTS+ c: K, F* m5 u2 z
2 \& w# }* Y: I
.ORG $CD9B ;跳转到转换的切页程序: o1 N7 H; }2 N" C; o6 d0 b, @
STA $70; e8 `8 z/ {! l1 F1 m
JSR $7200
, C% V' N8 H' C* s RTS- o: e( k9 v" X- T* i/ O
& k' ~* B" [ C, X& ^* d .ORG $7300
8 A! E$ K: u, zM1_TO_M4: ;切页程序- D8 f! Q$ ]1 r/ _, f3 o, ]
CPX #$008 A$ C9 N F3 x% U6 `
BEQ REG_SET
/ M8 k7 z: C* P3 T& u, o CPX #$01
. c! {0 U# u+ D3 W2 M BEQ PPU_BANK_0000
4 z/ c: M8 u% {& N" @, G CPX #$02
5 q! o* x; S$ z2 E BEQ PPU_BANK_1000; I5 B+ i( e, f. f: B2 _, H
CPX #$03+ [2 M& G3 q z$ N. G" R) S, m' w3 p
BEQ PRG_BANK" r& i9 z: `) y2 a& t
REG_SET:
, U y( j% L8 O; ^/ Z" K/ p9 { STA $A000! [6 }) F, ~7 O4 O
RTS% {; K. Y2 v: w. g% `
.ORG $7320
* E) T$ u2 o& w: F O4 g5 Q: uPRG_BANK: ;PRG切页
- o5 U2 x8 a7 Z5 a PHA# k/ Z+ @) I. b& j2 Y) m! w: U
LDA #$06% h* T' u( ?+ r0 D
STA $8000
) D1 q+ Y: }8 } PLA0 C; Q. M" a/ \* S
ASL
2 n0 ~( O/ G/ G2 ^ STA $8001- O9 @% r, c8 D8 T5 P8 r
ORA #$01
# c. }8 E; X- Q+ D PHA
$ V# m! H$ @" Z$ O; U LDA #$07* F# j& A: |; E6 v
STA $80007 y j% V* o& R6 E% b) M9 u+ ?# C% G
PLA: S9 z& n; D( l8 Y
STA $8001
$ N% K* ]& T8 B9 V6 E: c RTS
& s. ]3 D+ |# F) i2 W/ T1 ] .ORG $7340! ]( l3 C* R3 x7 J# G( u2 h; Q
PPU_BANK_0000: ;精灵切页
- Y+ d: _0 p3 h6 z PHA
4 y |0 u1 L* V1 s Y* j ASL
$ I; ]/ i1 B: S4 H/ H5 p ASL6 w1 U( u% }- }. _" C5 e! |/ }
PHA2 c4 o# Y3 h: B* D
LDA #$00% p a, p3 T. C3 p7 H
STA $8000/ i' L) B; o3 I2 z/ y7 \; x
PLA
( [# x0 a/ ~4 q8 h STA $8001
& v% `' ~+ s1 \( R" _ ADC #$02: U# @8 r# `. G
PHA9 H- Z. j& ]; b$ z
LDA #$01; o% |, A$ U3 d* g
STA $80008 O$ m$ L |2 d
PLA) {6 z6 u% g# z$ _, V W
STA $8001
1 M4 ~9 H3 v. z% |( Y7 D. H- \ PLA
4 Z; ^* y, J B6 U u RTS* B! m( {. ?; F. o
/ N B" q# G+ D) ~) h) N
.ORG $7360
, [8 y" {" o4 ^) nPPU_BANK_1000: ;背景切页( t L( k9 v5 Q* T
PHA
& S, c9 F& H) Y/ f: j ASL% G8 X" q$ k2 t6 `" Z
ASL- U, W, q/ Z6 X
PHA% d. G3 m. h% ~9 ] N* V
LDA #$02. T( f! x9 X0 X% r1 m9 O8 p. d
STA $8000
% ]2 E) R# q6 m PLA1 p' |) L; O/ `. a5 ^0 p) ?6 s; K
STA $80019 {" H- c; C* T. n7 @7 }2 i |# o
ADC #$01
, P0 {4 y' M7 ?, p$ s; ` ? PHA& Y2 W, I, r/ z" g$ F+ x3 @- U
LDA #$03/ J5 ~9 G' e) X5 R
STA $8000
+ T3 C- @" m; D5 z( X' ]) p* f PLA
/ _5 U+ x7 N% Z: e5 M! n, q! ?; c STA $8001 a; I$ Z& j; R: A. H1 [- z: u
ADC #$01
: v' [2 `7 q' R( ] PHA( ^1 l7 t. k5 Q' p9 V1 W9 I
LDA #$04$ a; M9 [1 P" P: o
STA $8000
8 U2 q4 e( ]& w$ u2 V$ Q0 L PLA
7 j _# P* I8 z$ }3 z7 {4 K STA $8001
& b, W/ c/ Q0 g& L* @& ^+ t8 ^ ADC #$01
% B9 j2 V9 }0 n; w8 K PHA
% {( ]2 I9 W7 r4 x" K5 @ LDA #$055 h. j. X+ ?- ^: g
STA $8000
- p+ W& J3 Q: J6 m PLA
8 l; Q" i5 Z; K; b/ e3 k STA $8001
0 s# F, ^5 G% G& X5 q9 \ PLA
- W H/ c; M/ p% N RTS2 u1 R& T) ^; `5 j) E
2 ]7 K3 v$ I9 d% z d D: B% q |
本帖子中包含更多资源
您需要 登录 才可以下载或查看，没有账号？立即注册
×
|
IP卡
狗仔卡
发表于 2017-5-20 21:24:33
提升卡
置顶卡
变色卡
显身卡