|
|
;[FC][最终任务mapper1切页程序]
2 s( }- L% B2 ]( C .ORG $CD9B
Z: ~4 Y3 y3 S9 H3 V# ~) H8 IBANK_START:
. p* n) k( ^) a* g$ K: q; K' k$ { STA $70
: Z. V/ p2 k0 Q b TXA A1 ] _/ i9 V' d" N0 R1 @
ASL' Y( V# U2 N* X! E
TAX
; C- P' }2 w5 A" U9 |/ xPORT_SET:
8 J) D4 X( \4 Q" \$ r LDA BANK_DATA,X& T9 h- T9 J; i6 p. B' U! m: Q
STA $6E4 A5 a7 M, |; J/ B1 |
LDA $CDB8,X
* q& L" a3 [# G7 @" I! h& P5 t STA $6F
, u" Q' q U! H: L* r( D LDY #$00
* w: v9 o3 M$ h: g LDX #$056 O! e1 ` ~/ v, \; R9 m
LDA $70
' h: @+ I5 V& ]: w$ L3 wPORT_WRITE:
" q* M# Y* [1 j8 O* T/ A6 T STA ($6E),Y1 b5 v* X7 c" U: v& _
LSR
' G' X+ u8 j" Q+ S4 w: M, O/ I% c DEX
, F9 s- C: y, h G2 a7 L. L BNE PORT_WRITE
1 Y, R/ n9 T' A: x6 c RTS
' F: t+ ], p2 y8 w* ~0 Q
* ~; I, q1 Q1 E1 i2 K 7 R' d6 q( a( n" d* ~9 f
BANK_DATA:+ y3 Q7 I i/ x$ H. z6 ^4 o
.BYTE $00,$80,$FF,$BF,$00,$C0,$FF,$FF) v% Z4 v3 D4 s" {6 b
# a. T7 d; [; m: n$ I
: l: H s7 B, A! J; L; M1 v;[FC][最终任务mapper1转mapper4切页程序]
7 V4 U$ `" ^# k4 q .ORG $BFD2 ;初始化跳转7 x2 b" o4 L2 h8 g. h0 @ ^
JSR $FFC09 n( J+ F' U2 M
4 z) _: {3 D$ \7 c
+ n/ U& q- |+ x1 M7 y( r" Q' F .ORG $FFC0 ;切页
! _) P; d- `( `. h& ] LDA #$06
* }* W/ B) d2 w' @, t C STA $8000: G8 v% B" [+ ?) y4 d
LDA #$0E
; q$ J, @. P: G, e1 `) G3 ?' H STA $8001
) ?+ s6 g/ x+ _6 { JSR $80001 R& w0 J3 x* C- x+ z
RTS 8 n+ _7 m" b$ B0 o4 [: {6 S
R i7 I" C6 A+ }
.ORG $8000 ;数据复制
! s- ^/ E! f4 o$ n LDA #$80' Q- }; d; M3 O* Y; y7 s
STA $A001 ;启用SRAM
! U( |) V1 Y3 [8 j7 s8 J' ~. J3 B PHA
& s) `" L8 ]* Q) d( @2 \4 n5 Z TXA# ~# I# {' d5 h% V7 N, \: B1 o6 D+ {
PHA8 Y6 E, g" B6 h
LDX #$00
4 V/ P& H; X- BDATACOPY: ;数据复制! u: U9 F+ Y( b: n
LDA $8100,X& b6 ?" }' a5 [* B* Q
STA $7200,X
8 K# _! \& J6 b! W! {2 R1 ~ INX {+ G* x8 A1 i/ @* m
CPX #$00
- [1 v1 \ s* L9 F9 m3 R9 t$ Z BNE DATACOPY
' R, ^! |2 F) o! l$ T+ C" P: ` PLA* U! W2 |6 Z1 m# _ s2 S
TAX
& p% |1 \) ]( O5 o; |. | PLA
3 I' u( y+ _8 N8 T7 D% ~" s RTS# S* [1 z6 j+ ]' V/ t9 u6 W" ^$ r' l
% X) w; w6 V$ b$ n, z' b. r .ORG $CD9B ;跳转到转换的切页程序
7 h& {3 F4 w8 V4 D1 o4 u8 Q1 M STA $70
+ N: f- z& u/ v5 X: Y U- k3 \ JSR $7200
( U7 f6 _, C5 A RTS, I; F/ Q. s5 h' b
4 v+ t4 h/ `# L+ k; @ .ORG $73002 v, P( H h) | A; G/ \
M1_TO_M4: ;切页程序: Y2 j. D% p6 R; E2 @3 _ z
CPX #$00" p/ [# f6 ]0 _3 k
BEQ REG_SET
* x( n( Z9 B4 b3 L5 _7 U/ O4 C CPX #$01
2 q" @8 x7 H& u2 a7 s BEQ PPU_BANK_0000+ c; O' t0 g' E& u* _2 b* `
CPX #$02, @- P$ t5 J& M
BEQ PPU_BANK_1000
3 N+ N: y0 ]: L1 N; I3 B0 s CPX #$03' n! [2 B3 i( I, H! L
BEQ PRG_BANK
3 w# Q8 W; I* ]; r- u- n& PREG_SET:5 ?0 ?7 Y) A1 V, v5 @5 x; {6 y& w
STA $A000
3 y9 Y- ^' O% N! F& X RTS
c9 I# D; t0 S" W) D! x4 S5 d2 _ ` .ORG $7320
( b! } q( i4 bPRG_BANK: ;PRG切页) g2 W/ M) M. y- K0 c
PHA
, e. P, N9 V( U5 r9 K: @/ H LDA #$06
% q* B% N1 \. Q' m( ]6 X! ? STA $8000
* K& A/ `4 t# b5 f, d3 u PLA" @9 r4 u1 v: {- Z# ?
ASL
( B5 L j0 a( o& p! L) ~ STA $8001
8 F( s2 O/ s0 Z( R6 C6 ] ORA #$010 S# r' l4 y, o n- R
PHA7 u! w6 d; k; _; w4 A( H3 i
LDA #$07
7 G( \ K, Q. h, \1 } STA $8000
, Y% u+ s* G3 w$ U L7 V PLA
9 g2 E( ` }# t4 i STA $8001
/ x1 j3 l: O9 u) E8 E) ~7 l RTS/ S" o% I" D/ C) k6 V; _7 q/ ~
.ORG $7340
* r; y, y+ Y! }4 ^, gPPU_BANK_0000: ;精灵切页
% V9 x1 g; \1 }1 K j3 L% t PHA9 Q% S; m# p( K/ O3 R- u
ASL. L& \) ?: h X( K
ASL9 _, O+ L2 \" M& f$ j# g6 R
PHA% z; R0 L% P6 L5 }& I. }
LDA #$00
& f3 s8 [% @7 U3 d1 `; j STA $8000* ?4 ^; e; O: K, K3 g5 y
PLA- u5 O3 T" H" O; y
STA $80016 c+ w7 J e& T1 V6 u# A4 t$ a+ w9 `( x
ADC #$02
: J4 q! d# u- G PHA* o A( @, W& U
LDA #$01% n1 v ?# _1 B8 S
STA $8000, ~& ]5 Q B B T/ m$ u7 P' S% Q
PLA v- o3 ~9 C# {& d9 E1 s
STA $8001
5 D" h% b L Z+ K% Q6 U PLA
* F2 o" ?: i) T, E+ L RTS
+ \, X. }# B' N
- R3 I! C& y. T# I7 y0 w8 l' k0 c+ [; g .ORG $73609 l$ R% v$ m4 _$ M/ g. @& L
PPU_BANK_1000: ;背景切页' K! n+ B r6 C* C# T* x' o
PHA4 O& D0 W. P1 H: h) u6 D. t
ASL S5 N2 y: E( v0 [7 U Y
ASL
8 l9 n5 n/ ~- ~& j* G PHA: ~% |& X# V) F1 x& _
LDA #$025 v" Z; X% W( S5 q# w# g
STA $8000; e. B0 v7 A) p
PLA
+ }. x- M1 F1 a" S; U* I4 F STA $8001
) g% D' J$ O8 f8 V4 F ADC #$01. y' c6 E7 C% E) S
PHA
7 L" x* J5 L! o6 q$ P" I7 Z$ |! U LDA #$03' w7 ^: k4 I5 z0 Q& W& T' x
STA $8000
W8 J( u H, A% c PLA
/ f) `( E. y- T6 Y% G STA $8001
( y" h, n4 w. ]1 M6 r+ X! \ ADC #$010 d+ o) J3 h8 @7 r1 P1 U0 H6 ]
PHA
+ b- x' m! ~, D* |3 W5 `$ e LDA #$041 H8 M" q5 B- h5 [
STA $8000
7 W2 i, R1 F" @$ s/ V( g( x- H PLA
! }- H7 Y* `! h: x# S STA $8001
, C5 j6 O0 P6 ~7 C2 @- q ADC #$01. X8 O% b& F- q* N/ b
PHA, R( u/ |* b h) V1 a' [* n, l
LDA #$05. b* B9 i ~4 |' p, Y0 |
STA $8000
- F$ i) m0 y: C9 N PLA& x' I0 z. ~1 c
STA $8001 w4 \( T' W& ~5 Q0 c7 _2 l, Y
PLA5 E9 e h: |+ x5 T* k' v
RTS
1 ?! d! y8 r$ t0 n; N2 K1 s9 r& K! Z# Q5 I
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看，没有账号？立即注册
×
|
IP卡
狗仔卡
发表于 2017-5-20 21:24:33
提升卡
置顶卡
变色卡
显身卡