|
|
;[FC][最终任务mapper1切页程序]
5 U$ e( |6 Z5 s! q, N .ORG $CD9B
: L( {& v4 ^+ D6 B6 N, L. p h3 B% hBANK_START:
( ~( p0 M/ E3 Y STA $70
3 E8 i5 }2 N9 M3 Y r: _ TXA
2 [1 i' e* `8 u3 _2 \. H% n ASL5 D* N" _ t1 @% |: I
TAX/ D0 a" Q$ E$ B' ^/ P
PORT_SET:
( O& k9 s8 u/ |& X! n( ~ LDA BANK_DATA,X
3 w' ]$ L& }" }! U STA $6E
+ m) h# r, j6 f LDA $CDB8,X5 |( P& h0 \7 [% S6 R1 S5 L
STA $6F3 A X- n, I! z
LDY #$00
$ i9 l3 {3 F1 f- I/ r LDX #$05
9 ]4 D3 L# W1 V; \* ]3 e3 b7 D# i( }1 N LDA $70. q$ N7 T* ~4 R# O5 g/ Q0 {& R' \, ~
PORT_WRITE: v( N% `6 x6 h4 q% v5 w; z
STA ($6E),Y
& s8 K' d0 r; N5 a( [; h. p LSR Q: H1 f( {& m, u9 ~& W
DEX
8 s- |8 i# X, v6 {* d6 H BNE PORT_WRITE! g' J2 f3 h: N" m, l h
RTS
5 j) }1 Z: _( a: v8 T& B7 I" o% q# a 4 w% S1 ~- p% k6 w* H# \/ D+ f
) T3 S& l" r! N2 K7 \4 ~% T6 h" V2 @BANK_DATA:
4 K) T6 e' i1 \, S5 d* B" E. M .BYTE $00,$80,$FF,$BF,$00,$C0,$FF,$FF
& _1 L( [- ?* f. n( `1 H+ n% g T8 L 7 T5 O* R @7 C t! @* _! K# ]8 [. m
. R2 k% S* X u+ A0 D
;[FC][最终任务mapper1转mapper4切页程序]8 E& }. _9 @& _8 f2 u5 e/ N$ ^
.ORG $BFD2 ;初始化跳转8 C9 R1 d# n' Y" b
JSR $FFC0
! G7 e/ a1 X8 _ n
' l! X4 `0 b# Q* |) x9 W8 i9 {2 b2 [$ G& N3 f) o* b4 l
.ORG $FFC0 ;切页5 Y( J( {- `& `+ ^8 [4 q) g1 J
LDA #$06
6 M! y0 @- |! ]* J o STA $8000
$ |8 V5 `) s5 n" J8 z% z" D LDA #$0E* @3 P' U4 N: U* k# U' z1 w
STA $80011 Y3 O; ~8 L! f+ q
JSR $8000 f" o; a4 D! K! z W
RTS
3 m: a9 S, p: B1 A
5 v# x2 O+ u$ U .ORG $8000 ;数据复制
. o! k5 C) i3 A: G LDA #$804 g4 R6 e' W1 n! P; p: F. E
STA $A001 ;启用SRAM
7 [6 E$ b7 k% J) U# d# U5 m/ e% b2 w PHA
/ C- C H# g$ x2 T8 c- ?; s TXA* l: l( H. O! f
PHA
% N& h! h, l% ~ LDX #$002 V/ p; ?' k$ |9 Q5 P* m8 ^
DATACOPY: ;数据复制
+ m; E5 H$ O2 m7 X7 C8 n" ?% [. e j LDA $8100,X% X2 C% F) m1 z
STA $7200,X$ h4 g" N# Y$ {: u6 G" |- |
INX
+ `8 ~2 W# g T- Y) s+ i5 d* C CPX #$001 V! Y9 `# O$ G8 H/ ]
BNE DATACOPY1 G3 Y5 b0 q" ~8 z$ V/ K2 x1 w
PLA
. t+ {. j* x3 U8 n* } TAX# X" B6 m t5 E
PLA
. \! U5 |: q) W) x( p RTS1 P5 [$ |! a u4 [/ j
* ^7 t0 m9 z6 t
.ORG $CD9B ;跳转到转换的切页程序
: b+ c% Q2 V) T. t$ F1 ` STA $70
! x3 N) U% W2 U$ Q JSR $7200
% B' R6 u+ a! v% _2 @# p RTS8 P. t f1 F7 |% i3 s/ _" E
, U+ B# L( |: L+ x+ q .ORG $7300
0 G/ U0 X% T7 YM1_TO_M4: ;切页程序
+ `; ^/ S/ P( Y4 m2 ] r CPX #$00; @" K4 L* U h% a+ d5 K
BEQ REG_SET
1 S- L. t% w9 k: G CPX #$01
5 W' [ i8 }3 C3 a BEQ PPU_BANK_0000
7 w; `' g2 P5 j; | CPX #$02
6 B+ j3 ]. z; G* _: l! }6 z BEQ PPU_BANK_10007 J8 \8 o/ a- q$ ?
CPX #$03
0 T' }" t# m* W, [, ] BEQ PRG_BANK
6 o4 X. C8 P1 O: t* ~5 HREG_SET:
! |. K* ?8 N( s* I! M STA $A000
) H8 G% u# \) [% y2 m: {0 J RTS3 K" r8 n- t- c2 D0 @
.ORG $7320
$ F0 l3 v, _+ B& b, R* I2 }$ |/ APRG_BANK: ;PRG切页+ M6 V. `4 q8 C% T9 B
PHA z7 ^6 T5 j w
LDA #$06
I7 n) p6 f3 h& p* D0 F0 D. E STA $8000
5 g0 W/ i8 K( j6 g( a6 V% j PLA# W- e6 w, H! O2 C
ASL& S4 X) K: I( M
STA $8001
( u, p; t3 I9 F# Y9 C$ B% h; U; F ORA #$01# ~ A# W+ O7 E i0 ~+ I$ ^
PHA% D0 m4 i n9 k# U2 {1 z7 \8 ^
LDA #$07; H2 `. w+ `3 C4 y1 r0 q
STA $80004 c3 k! _. x/ Q, p
PLA
+ W4 |, {0 s3 @1 Z STA $8001
2 d5 F1 n& x: d! R# Q6 e! u RTS7 a% a8 V, e6 w) O! q
.ORG $7340! O4 p, i0 Q* Y4 g* L6 ]3 `- Y5 V
PPU_BANK_0000: ;精灵切页3 C4 n3 M2 @3 {4 R' p% Q1 u% }
PHA
' F* o; H" N F( } ASL
" \5 d6 ~+ E5 ?% j& N ASL
, V3 t6 G% a3 M, f* V9 k+ | PHA
7 S' ~+ W# l( Q3 i4 B! ` LDA #$00" e g& c: O/ x4 s) K5 [
STA $8000
) Z, k- O' C+ @+ E6 M& C8 V& W PLA o# {/ c) r! f0 N6 h5 S, S
STA $8001) X/ Q- |5 C k8 ^ C% ]
ADC #$025 N( o- \! t& j& \( m. k
PHA
$ o) U8 k: T) f) t2 r! _) V LDA #$01
3 s) H5 o! J4 ~$ }; u, J7 _ STA $8000% B/ \& _( {) H. X% s& e
PLA
- C: f9 H0 h; j( l STA $8001
1 z, j1 j, U6 ^- o! O PLA- }4 f3 W8 Q4 a
RTS! \# N4 q7 l9 _
0 C1 @" g3 e. M0 ~! e1 l .ORG $7360" ?) C3 o% X Z; F e
PPU_BANK_1000: ;背景切页# u- s* f1 S. M
PHA
6 L1 B0 |6 v0 i9 p ASL
& i4 s/ z0 Y! b; d: E( o ASL
0 F% [3 O& n6 z8 [ I3 | PHA
8 r0 |! }2 W" g0 B LDA #$024 B& ]" a3 @) D% g3 ^
STA $8000
! S; p5 U' Y4 ~# c+ Y PLA
5 J. m: ?5 v" P% s" T- c STA $8001% E* O$ `7 u. G, z, }
ADC #$019 U5 G+ _. j3 ^
PHA: L3 v; z4 |1 r/ E f P7 g
LDA #$03
3 F4 s. q7 O; O. t: p$ N STA $80006 d# T- @ G- T# l4 l% I
PLA; N3 A7 B- N) c
STA $8001
- g4 V0 f8 N' g/ W7 g ADC #$01
( V# H* C/ g) h9 q PHA, v8 F" j/ ?) W6 ?
LDA #$04! O2 E4 \) n! J: E' r0 }
STA $8000
7 x, R2 ]6 j4 B' W9 f4 {' h2 s PLA0 T( W$ t- N3 n2 K5 V: v! _
STA $8001
7 T) Y# D5 o) I' h; A- J ADC #$015 \. T7 q, } y0 H1 z. P3 N3 c
PHA' R; i# i# d' { x+ m, _# f
LDA #$05
* G8 p' e( {) Y& U5 o STA $8000
8 ?% s7 f7 @, F! t PLA" |3 A1 K+ b- b8 s, A, N) [, L; I
STA $80019 W0 t8 x0 @- M$ ~
PLA
9 H8 W) b0 H% y" D3 ^$ Y5 f RTS
$ r5 I9 z: a1 a7 |, [0 c( z2 _1 N- {: w2 }2 D
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看，没有账号？立即注册
×
|
IP卡
狗仔卡
发表于 2017-5-20 21:24:33
提升卡
置顶卡
变色卡
显身卡