|
|
;[FC][最终任务mapper1切页程序]
7 S+ e! @* Z p0 p .ORG $CD9B
% R9 }( w G# ?! o- F: i" X4 s& _7 iBANK_START:/ E! i/ R' T9 f( g3 |2 ~6 E
STA $709 G$ F. R$ {0 Y
TXA# ?( B b' b( |4 C$ [8 f0 H' L
ASL0 F$ \( F5 z$ t4 Q
TAX8 i8 y! |2 a& O- Y
PORT_SET:7 x! g9 S: u7 c/ L
LDA BANK_DATA,X- j3 W' k. n7 L ~
STA $6E9 S! P( U @, A5 S
LDA $CDB8,X0 Q2 W8 m8 G: z( ]0 [) j
STA $6F1 [+ N9 K7 {+ w
LDY #$00
; h7 n8 s" a) Z: q LDX #$056 l) F3 j: F9 r% g
LDA $70
5 R" r4 R8 D3 N- i, UPORT_WRITE:4 W9 N7 F& x+ W) |( i
STA ($6E),Y
' b. }7 {& q6 h* X: u3 c LSR! z1 I: l: s7 |
DEX
" \- a" J8 f; P& y3 I+ e; Z BNE PORT_WRITE5 o- d( K, t( r3 U, n2 e
RTS2 R8 t) A/ [' c9 R
4 v7 p% u( k1 |
% O9 W/ D5 p2 p# _2 |# N
BANK_DATA:5 t( u3 d9 j) w5 O
.BYTE $00,$80,$FF,$BF,$00,$C0,$FF,$FF( H# Q# O9 \9 p$ ^& L, `
, f r$ g$ R6 g& e+ O. {+ m6 u 0 A" w, z) `) h [+ H
;[FC][最终任务mapper1转mapper4切页程序]
+ \" ?: e; k0 d .ORG $BFD2 ;初始化跳转) A/ v, Q0 K6 m0 X# l( C, t
JSR $FFC02 t9 ~+ l" S/ M7 S- z# V
7 X2 Z9 z4 Z" [0 _1 W
+ U; P4 E: j) ?: ]; E. ]" I# V8 T8 h .ORG $FFC0 ;切页
$ r5 b; Z. w% t3 d6 U0 R- Q LDA #$06
: V4 S |" h; d: d8 U# S STA $80008 c, A. F8 N5 ^7 \- ]3 p" |
LDA #$0E
" i0 p+ q* U9 E8 v STA $80013 ?6 F x8 |4 q0 [$ d
JSR $8000: k; q: p h5 u& b4 M; |& g$ J' Q
RTS / ~ o! O! \ q& C
) L5 M# ^# ]9 f$ o' j: _: H
.ORG $8000 ;数据复制
7 L/ l) P/ V4 Y/ L( R- J" S* [ LDA #$80
! y: f0 E6 ]. `, m, l7 X9 n STA $A001 ;启用SRAM% z) n" O1 Y% ?3 `& h- [
PHA
( [. z0 U* b: f( u+ }8 a8 J+ d TXA
/ @. A% ? y- c4 P PHA
) c: _/ i' J& R3 c8 m7 a9 a$ P LDX #$00( E9 I+ ]& ~' n
DATACOPY: ;数据复制& n \" `6 t( l* f
LDA $8100,X
+ @5 j0 W! Y) ]: N. u6 |. ?( s STA $7200,X; B$ G+ V; {9 |2 d' L
INX
! K3 B% p3 Y& Z/ F7 k* T0 W1 Y) K CPX #$00* i# T2 a; o# I- x
BNE DATACOPY) I; ?$ @' q* P# c
PLA% F/ A& ?) M$ |0 W1 T. ?( `
TAX
$ b' r. [5 I( g0 w% Q PLA
2 N3 b3 E) f3 ?$ _& r RTS- @6 O* ^" w' @8 u$ ^5 [
7 `! N; K! ], R2 |2 ^* q7 B .ORG $CD9B ;跳转到转换的切页程序
7 `- X% m* j4 U; Q0 ^ STA $70
/ R _% K: O( P: g# v JSR $72001 B3 ^/ x1 z, m3 @ ^6 A( I
RTS
& p% @7 @) E& B5 m/ |. G+ |, \6 v( [ W! Y+ h' E/ Z- h7 [
.ORG $7300
* s; W, u3 Z( `" Z7 h9 yM1_TO_M4: ;切页程序
+ p! ^: F; U7 |! w* {" p+ W$ r* Q: p CPX #$00
/ W: ]- F7 N9 c; |/ G- Z% c$ U, O BEQ REG_SET- r+ B$ R; {3 ^" t6 K9 m
CPX #$01 P* P! x' E& C9 Q
BEQ PPU_BANK_00007 [' X+ X5 S, n4 i7 l9 h* j9 L
CPX #$026 A4 B% U; p1 r- j
BEQ PPU_BANK_1000
. z9 k+ x! i7 l4 o1 l CPX #$03
' H5 v9 o v" ~ BEQ PRG_BANK
% b- [* _/ r0 P& b. BREG_SET:2 u, P7 w) A( X" _" L
STA $A000
; l) `$ s/ N' b2 X! r. M8 f RTS5 U0 b, w' |* t
.ORG $7320
* O* O" ?: r9 M/ RPRG_BANK: ;PRG切页
0 @3 R4 ^# y) U) L7 L. F5 ` PHA
) }) n' ]& c8 G+ l3 N LDA #$064 F8 U; T3 F2 d/ u- k* Z
STA $8000
$ T8 e8 l I# V3 v# R" r( h$ T PLA
U# B8 M2 l M% ~& P( R ASL
+ q. u1 J y: c" u STA $8001
# V# d' E5 G8 `; ?( }/ F1 m2 [ ORA #$01
1 e$ U( O( B- z: f: N u5 a PHA
3 _+ m& U% A' L$ C t# g LDA #$07 y) b9 G" k1 ^1 [6 r8 M- J
STA $8000# t, Y6 g/ F0 x. b3 O! s% W
PLA) b2 V4 ?2 t+ f3 S0 Q" z
STA $80016 t( o; R6 h1 p) j. Z7 O
RTS) f H" ~3 L2 J* D& ?
.ORG $7340
9 s# D2 `/ S$ ]& Q: J5 F4 MPPU_BANK_0000: ;精灵切页
; i; O/ s; m7 R PHA5 P; h3 I7 G" ^0 h+ p& r
ASL R% Z; o: {* k" i2 k$ L5 o# ` p
ASL4 Y& B$ d! r8 ^/ e4 |8 _
PHA
" [" O5 P5 R( K; e1 s LDA #$00
( f& I& Q; O' \. G+ s$ o4 Q7 m STA $80000 }. q% X0 C$ i3 R
PLA X. Z6 I8 }- o: C
STA $8001
' W3 f, Z% I5 [: w2 ]6 V ADC #$02
8 n/ `7 y9 S0 }7 D PHA
5 @/ [' t$ g ]+ l6 ~ LDA #$01" i5 S1 a* l' v: _# b
STA $8000
4 E0 y% Y) o& z$ L4 y; | PLA
7 e$ j) \# Y U% n STA $8001
7 a# ^9 t2 E1 e+ R4 V2 O PLA
9 R1 m( Y. h* U' q- o3 a RTS
; G: l. ?) V" Q; b, Z$ ^6 i0 u
8 J) y, k+ D2 K g; U1 [+ o+ d .ORG $73603 u% J$ I+ I6 N ^& I, H2 B
PPU_BANK_1000: ;背景切页. p4 X; l" ? M) D
PHA+ T" C$ g' \* Q' ^9 u" O, G
ASL
$ y3 C- M8 x9 V ASL
! i; Y5 H- p$ p: [( F% f* e0 \ PHA
5 n0 K) f" [( ^ LDA #$02. A( b a% P; n7 O
STA $8000# C& M$ o6 X7 q& j5 _) S8 y! m/ h
PLA8 B! o8 f% r7 V: N8 X4 u
STA $80014 a' x# X, N2 |* E) k- {$ I X
ADC #$01
4 F* ?) M& J( s: k5 K PHA& Z" u/ R% k) J, n; O7 t! Y
LDA #$03
+ y* V R+ j) q ]7 t4 U: L1 K" E) H STA $80005 z5 _: I: V5 a5 l
PLA0 t# Q) V8 B6 Z
STA $8001
: }* F7 i5 y$ l: q1 h ADC #$012 }0 _( S1 L& T" p+ R3 ]
PHA3 k1 t% w( M# X; r
LDA #$04% I* z5 r, g- H1 a9 Z9 `
STA $8000
+ X5 ^1 n+ @3 T @: t PLA; z& t& y/ z b' x4 y: G F
STA $8001$ N7 m' E3 e5 X2 j/ d
ADC #$01
; j; p8 w! o8 G ^! n PHA
+ A3 z7 {7 G) O6 l) y" q0 q LDA #$05
9 O. z7 c3 O3 ^$ s2 z! S/ e% [ STA $8000. @3 O$ S8 B7 R% ~
PLA( U' w- T- H9 n4 _, f
STA $8001
- i: _/ `1 B0 j- ~4 e7 q9 ?6 R$ V PLA
) t/ n. h3 H( I1 F7 t) [; v RTS; Y4 S9 ?- ?) D" {( n! i8 W
0 _, X+ n0 n( W2 I4 C
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看，没有账号？立即注册
x
|
IP卡
狗仔卡
发表于 2017-5-20 21:24:33
提升卡
置顶卡
变色卡
显身卡