|
|
;[FC][最终任务mapper1切页程序]
# U/ V3 _3 I/ G. X .ORG $CD9B
0 c' G# ]/ f7 M3 i/ K" {3 X' mBANK_START:
0 u- ?# g: O9 ?+ N STA $70, \8 Q* g [9 U. k: r
TXA
1 N7 r+ o, `4 ~6 } ASL
; o6 s( X; ]: H TAX
" g1 K% Z3 i. l% RPORT_SET:+ W+ C- H$ {6 E' G) r' \: L2 F' p
LDA BANK_DATA,X- q7 z2 a4 c3 t3 I% O, O" `8 j
STA $6E
' c; k" @6 q9 v; S! L/ g3 x LDA $CDB8,X
8 }0 ?/ t9 Z7 p2 N, R- M" c; W STA $6F
1 t4 ^6 R. S2 ^& N$ J/ \ LDY #$00& t( g! k3 @- P$ }0 t
LDX #$05
' y+ E3 C1 e" E LDA $70; L9 g9 h9 W* b" o: u2 {% b
PORT_WRITE:
& ~5 Y4 F/ b- k; m8 r+ J% B STA ($6E),Y
: W' b0 I# H `6 w6 n. V LSR
) x0 ?& u3 C- O' P, ?6 U6 M DEX
, F3 f* |8 }4 I' G BNE PORT_WRITE& X) y0 T) r8 e4 { T5 |
RTS/ [! ? L! Z6 F$ k4 }+ W
( G; Y: V0 g6 y7 E& Y H
5 { d! k I; `. G* n+ j* eBANK_DATA:
! g( h$ v) F9 ?! [- q! j .BYTE $00,$80,$FF,$BF,$00,$C0,$FF,$FF8 J% Q: j& x E' g% M
/ h' Y7 F5 \; D5 D8 |
, l* F7 K3 q V6 C1 W2 w- L;[FC][最终任务mapper1转mapper4切页程序]
2 S& T9 ]& E) R' V3 S- X .ORG $BFD2 ;初始化跳转4 R1 s. k3 `* k7 P+ z( q
JSR $FFC00 H8 |2 U5 \. `1 F* J5 K
3 e& b) L' P; p! I# z. ^
* m: f' p& V. t6 k .ORG $FFC0 ;切页& V: f2 y1 l# Z1 z# Q( _7 `
LDA #$063 ?) L. [: e4 @+ v" d( Y$ h5 P( K
STA $8000& b9 h5 I( p; M( m, ]+ I# g
LDA #$0E9 L4 _; p' _' J6 s7 ?' H
STA $8001
+ c6 K; Z9 B' g$ L! _6 T: M JSR $8000. D j2 E( Y0 g9 M6 B9 M
RTS
$ |; g; I" i% P( x9 `
8 L7 a! e- S% G, i8 p. O. q .ORG $8000 ;数据复制. B8 \2 _' i& C( q' }4 I( g
LDA #$803 N/ ]$ d% f: q. s
STA $A001 ;启用SRAM2 D+ g9 V' `" b
PHA9 l- R) P' i: c# E: p/ {
TXA) ]" M, h; X0 F: E9 M1 P6 w
PHA, Y0 R* B( E% e% n" ^ y4 e
LDX #$00& b# a- A+ Y. X5 r# f! w, Y& P
DATACOPY: ;数据复制( _7 |7 B, h& q# y( P. G6 S2 j
LDA $8100,X
$ z9 ]. v4 x. i4 B+ C8 t STA $7200,X; k* W+ X' f$ g8 p6 s! B; h
INX9 N: I8 X; M& k! D; f6 K
CPX #$00/ k- G) _" v! m: C
BNE DATACOPY
( J; g* F( B. f, R1 v PLA: D$ j6 v( ?2 e- S! c! @& w
TAX
. o' z- g6 A) u; i% \7 ] PLA$ \3 o7 l9 S# m6 D9 d
RTS6 ]( R9 x0 D5 b+ ~+ O: s# r
6 B1 C) G0 R! M" o# f2 B .ORG $CD9B ;跳转到转换的切页程序
1 D$ w8 z7 Q7 c. v b: v STA $70& C! y6 D# ?1 `, ^8 O9 Z& p! R1 d# F
JSR $72002 D7 r" h% A1 Z2 z' l$ z- G& z& K6 x
RTS' {9 F% m$ v% J0 ~
+ r' s1 ~' j/ g, Y+ X" T1 r9 S
.ORG $7300* T6 {9 c) @& _- w
M1_TO_M4: ;切页程序" D) x& N9 V' O8 j, v/ y, K
CPX #$00, K/ j" @2 _8 c @6 o2 V
BEQ REG_SET
& Z1 `, a | H7 g b; U CPX #$01
) m, u7 c# Z* j- N2 X7 d: A BEQ PPU_BANK_00003 K$ Y8 a9 R2 @
CPX #$02
8 ~; Z5 G5 ~' ~! ~( b* ^' p BEQ PPU_BANK_1000 k0 q, X: }+ c+ q! @. p
CPX #$038 b. | b7 m2 C. s
BEQ PRG_BANK
1 u. I2 R1 _* a$ }! q+ CREG_SET:
1 V+ ?6 ~8 d1 w8 a3 | STA $A000
( p# B, v# y# k$ o# C1 g6 w. ] RTS) s% F& _. x& }: q4 a
.ORG $7320
: `8 K. U. r9 z6 k: NPRG_BANK: ;PRG切页: d! B3 ^" G1 \! _
PHA2 }" u. L& c( I+ s) P
LDA #$06
. n6 n0 c' e2 ` [9 A5 N STA $8000
! R5 t6 x* V. `, } PLA/ O' E+ n" A9 F$ v/ \ T
ASL t3 A, Q1 j+ N
STA $8001
% h! V; e4 I6 e! t4 q: C ORA #$01. a3 [. ]' d% b" q2 h/ b" L
PHA8 {$ G$ d9 O s1 v2 Q
LDA #$07
* F0 A8 b/ s2 {5 g4 o STA $8000
4 K3 W7 V, {6 w# b0 W* Z PLA7 o0 T! i5 s L( f3 P7 o% U& U
STA $8001$ }+ f" M+ E$ b9 t& x- ~3 M* z
RTS
4 b* k$ ?. {: W! x3 B .ORG $7340/ Q g; V' K% p! ~( z r6 w0 G; L
PPU_BANK_0000: ;精灵切页
* e6 V9 T8 r* Q$ C; Z: @8 b. ] PHA5 F$ p' Y% H" y9 J/ ~/ n6 L
ASL
3 t3 }0 _: y: X/ o ASL- I" t2 ]9 ~9 v; _* ]" F: k
PHA+ R( {+ b/ K1 x! j9 Q
LDA #$00
3 C' i: J- _9 o1 X( W6 T5 Y STA $8000
/ V& a- ^+ q$ R s PLA8 \, u0 I5 q7 g8 }2 e! [6 c
STA $8001
3 G6 z# |( A3 y, m* @1 j V ADC #$026 z; q& J5 n& {
PHA
, s! p4 W! B$ f3 M5 i LDA #$01 n5 b% B% [0 q7 ~1 z
STA $8000
: X+ U) N/ W( g PLA
! |# K O0 e' l2 Y. u9 K STA $8001
8 E8 u3 I' F3 ?( G% `$ W' ^ PLA" n# H0 k5 i# w6 @5 x* I& ]
RTS2 ^& g1 J" s' W, D$ P% X/ s
, J/ b0 p5 `% d a/ K .ORG $73605 x0 G* R6 m7 D$ y& a0 I5 a
PPU_BANK_1000: ;背景切页
# w/ o* R8 f, G1 e' u2 R PHA
p( S2 s7 g7 C% k# w. Q% v ASL
8 @: k$ _$ B8 x6 O- j; q( r ASL6 q; i, F. c: {0 C* I& f! E' [9 p" N
PHA
" N1 ?7 u+ h, i% H! H" ~, k2 @8 a: C8 Y LDA #$02
! t# \6 p1 e5 ] STA $8000
/ g/ G$ \3 l+ o PLA6 F+ s& D1 F3 ~3 Q+ j; ]
STA $8001
& W7 q7 M A6 X' x9 r% H1 T7 |- d ADC #$01
/ U! u# x$ {% m! C% H4 X PHA; m) F9 R* Q# r/ P$ T0 H: t( Q! L
LDA #$03. |) ?6 S8 q- s/ h; p; f
STA $8000+ X. g2 z1 e, S9 k/ |
PLA
3 N1 e4 n, N- C, B5 L STA $8001
5 m+ S- h6 s% q ADC #$01
2 j# b0 n+ n! y7 j4 c5 s. \ PHA, `" h! n9 ~9 S5 g) s" G
LDA #$04
: ]+ C4 }' b% S. t* ~* N* _ F STA $8000
0 W1 `9 m& r5 r1 S' F: Q/ z PLA- K+ d7 ]0 M5 j8 U
STA $8001, h& A# g6 V9 w2 w% O
ADC #$01
7 q$ I' A0 K4 \" g5 N' P PHA
8 u' t3 g/ ?* I1 R% u7 I# _ LDA #$05. U. E2 k& |- w4 W0 ]- S4 s6 @
STA $80007 N0 h4 E) r$ J8 g) M4 m* H
PLA
* w0 }$ W6 `% b. _ STA $8001
$ W1 J# v; b* N* V, h5 n, F9 ^# u/ X PLA0 z0 f. c7 R [/ r! P
RTS
" _# R5 K" D% a8 e
$ E4 U2 g: @: y* Y+ J+ t# ` |
本帖子中包含更多资源
您需要 登录 才可以下载或查看，没有账号？立即注册
×
|
IP卡
狗仔卡
发表于 2017-5-20 21:24:33
提升卡
置顶卡
变色卡
显身卡