|
|
;[FC][最终任务mapper1切页程序]6 v1 L: y+ w0 h
.ORG $CD9B* J: |8 T4 q# w/ I0 B4 d# m5 ?
BANK_START:
( m; e7 ^1 y, c STA $70
?/ x/ |& t0 j TXA1 f, Z% h$ ?- f
ASL
) d% g1 J4 }; T) P TAX
9 Y* F9 I1 e& n2 \PORT_SET:$ q5 \2 v% s" l3 Y6 ^0 a3 S+ a; B/ W
LDA BANK_DATA,X
) P8 v" f2 e6 N. p STA $6E
* |/ L0 x3 d" v7 E0 g LDA $CDB8,X
3 M. a( L# i# F- J/ `2 i& L& ? STA $6F, ]1 T4 i5 w1 }& r. I( f/ P
LDY #$00
/ v7 s# M* a2 H& U LDX #$051 ?$ ]. i" P8 ~ V" f3 o! @
LDA $70
# f6 J6 d% G6 x5 J @PORT_WRITE:
2 B0 w! E2 O1 d# _' o STA ($6E),Y
& ?# E4 ~) C7 F: g% F6 t- R2 H; {) r7 f LSR ]$ ^- d; U7 t" e. F
DEX
, U* @: a4 K$ j, o9 b BNE PORT_WRITE1 T% a( D! w/ E8 K, ]
RTS
1 i* M& h, ^- m- k6 a
& h7 o) q5 W8 \9 d! L/ b 4 ~( F# n$ l) `: k1 ^
BANK_DATA:
- ^. X! p+ U0 O, H0 N .BYTE $00,$80,$FF,$BF,$00,$C0,$FF,$FF' y, r: W( X) z3 \0 C( b1 S1 T
$ z+ y% j4 a, |0 G2 o
0 ?2 v5 @6 S+ D
;[FC][最终任务mapper1转mapper4切页程序]% k( L" {( z" ~, z
.ORG $BFD2 ;初始化跳转/ U5 c$ k/ G0 w1 e$ W1 p" @
JSR $FFC0' A! \' J- H5 A7 e0 _
! r5 K/ }7 W5 L- q9 X( H A5 J/ M1 m
?- h% v: K8 z" u# X
.ORG $FFC0 ;切页1 t) G( b- ]. A6 Y) ^' N( p9 t
LDA #$06, M; J* s3 Y& O6 T
STA $8000
1 i& g. t2 q' ~9 ^5 Z LDA #$0E
# [& F1 g; P/ s- w4 g STA $8001& A1 g. c X$ w! v: {8 o0 H% |6 x
JSR $8000
# C/ Y6 Q9 P" l# S% R+ B RTS
d. \* h# j4 H; D
: M5 N6 t! n$ E" P .ORG $8000 ;数据复制
3 Q X! U5 R5 C% D LDA #$80. K8 z! v3 V1 T$ l( R
STA $A001 ;启用SRAM* P3 d' J' n7 E; S, @% u' @
PHA0 X* g3 C# T8 q7 R4 d+ V. {0 v4 F. Y
TXA9 A# l# L% g( J, j. K
PHA
l6 Y0 M+ Q- y LDX #$00! I7 O) l% y' ~
DATACOPY: ;数据复制$ }' ^% h! m1 s- B' V$ H+ y2 ~( T7 \; B
LDA $8100,X* Q& P* {0 b7 y+ \8 j6 T; b% S
STA $7200,X
3 o7 x2 m" B. c- x# @' C% ^ INX
! X( o( i5 l$ v8 Q" t9 A CPX #$00
& Q; M. h; e0 C: ~ BNE DATACOPY
( a3 x" C* R1 ?2 C6 d PLA
$ \4 w' N+ g) Q3 D7 T. P; E& a) f TAX' M+ U3 a& t6 E0 ]6 {3 ~* {2 q) @
PLA6 m' @! Z* L( d/ A2 I
RTS8 c! n* f$ c+ m/ ?+ W% d1 ^
2 q' X( q+ A. W: [
.ORG $CD9B ;跳转到转换的切页程序% j7 |/ g+ w! J0 d8 e4 M; f, j
STA $70
! w8 d$ p# u9 Z0 W; |0 K# Z, a JSR $7200
' Q: W! J0 p/ |! V) \3 a RTS
4 ?4 g. _2 r; g
+ n P3 M. Z, I' H .ORG $7300* f: ^9 e2 @; b3 `( s1 `& ?, t6 f0 G
M1_TO_M4: ;切页程序& j' E: n2 ]9 P4 p) i7 D9 M
CPX #$00- Z y+ x1 h6 E& D9 d( ?
BEQ REG_SET$ O6 W" X4 O9 @$ [- x
CPX #$01
. v7 e& h0 W1 L BEQ PPU_BANK_00003 S! m" ^1 a; ^" M4 r9 G: _0 v
CPX #$022 c( e) ?' |! S8 ^1 s9 r/ q
BEQ PPU_BANK_1000% L* ]& B: _9 C$ v, G! b% v( l! m
CPX #$03
* p# l! \/ l* z- M$ q BEQ PRG_BANK
7 {/ `% L+ {$ bREG_SET:
! e3 D% z5 q) ] STA $A000, h& K8 a) n( S, D. w1 b @: G4 i
RTS
& f/ M* o: h5 @2 I1 j# V$ y% e .ORG $7320, v+ x% p: e# l2 \: g$ }1 @
PRG_BANK: ;PRG切页
, p2 o. I; K' n/ q( G# @ PHA( r. V. `# @) \ x( A" q
LDA #$066 h# {# E; X% Q8 ?0 D. m8 ]
STA $8000
0 J0 J5 d7 E0 n, A4 S PLA; W4 ]' R) a: B) m2 I% d
ASL
) y& }8 ~# K; {8 u' n0 u- C STA $80013 C& h P9 L6 W
ORA #$01; ^! D: t$ o$ {9 ^6 ?# p/ z
PHA
( p! _) a9 t6 n) p; b G LDA #$071 p! H7 x3 t$ h$ {( u2 ?
STA $8000
( V9 V' U$ E. M9 P9 N PLA0 H ^- y" |0 b H5 b. M
STA $8001! f; i6 G8 y% U7 \7 C8 }$ ]
RTS/ h* d# }+ R, |! `
.ORG $7340
0 y- N) E& A p' {. CPPU_BANK_0000: ;精灵切页
# G0 J- ~8 F( V# B/ s3 B9 b5 i PHA5 C2 v w/ A9 B5 W
ASL' |% \7 o8 [6 M* v
ASL
" I9 w% I( Y' v4 M! H/ R( d PHA
2 l8 `6 w/ Q$ {( |4 L" [ LDA #$00
8 x, ~9 |- g( i, M& p; l5 V6 R" d9 [( e STA $80009 p7 f4 B/ {/ [7 S* ]
PLA2 u( k$ c2 Q, v4 G
STA $8001
& V, f3 Z' I1 X+ N$ ^# j ADC #$029 r) y1 D' e1 l8 y
PHA" ?7 ?: C q: l; ^' g$ W4 y
LDA #$01
4 m$ h, ]( ~% u, H3 ^ STA $8000
8 L$ _5 i# Q( t* b% e% T8 ` PLA, q, w; Q' E) ~- t% J0 v6 M1 O+ r9 b& c* A
STA $8001
* p$ b6 }. z8 v5 s* U PLA# T E9 z* g0 a1 H% `4 X
RTS- A5 m+ H) X- j8 _) t
8 N) \+ h9 ~6 V+ ^
.ORG $7360) Z+ W) \# [0 ~6 J
PPU_BANK_1000: ;背景切页
+ ^- L# g% c% \" M PHA
: {. g. `( m7 [! X0 D2 \ ASL) | O# @" p& q% ?3 M4 Y% r
ASL
w9 }! y; T# p0 c, T PHA' V1 z( E( o; a+ N, |& ^" z
LDA #$02 [) H* V, V+ ], ~
STA $8000
8 z0 v u* y" v0 h, I( }* U PLA; \9 L! R# c1 p
STA $8001
, F2 \5 j0 {3 @+ w" S% z( X( N2 o ADC #$01
3 s! e* `4 Q$ _4 V8 ` PHA2 c- a9 s7 Y: D# {1 O M1 R3 I5 s
LDA #$03
( f# K' u0 t4 ]$ w1 q4 n STA $8000
1 B" z4 Q% `$ g+ k H PLA
' N4 i# O6 Q+ G9 n i8 W/ T STA $8001
( \: M% n2 | M& Q! g+ d! q( C ADC #$017 y5 r Y& x/ Q' s' U
PHA
! m: ^. v9 M! s1 T1 F0 k LDA #$04# P1 v) ?) d4 T: h
STA $8000/ i3 M& w( _8 A' u
PLA
/ z1 G9 ]1 N! A$ A, ?! y# R STA $8001' C3 s. o& C& G
ADC #$01$ R1 W8 o# f- _9 \
PHA) t6 V/ |% ~* I) ^, x! u6 d2 K1 o
LDA #$05
a' E+ _' ^3 l8 _" | STA $80007 s" _ V8 e. l; |# s" t
PLA- ^8 i, M0 a M j- O; }: n+ i: [
STA $80016 a8 T# y. r: ~! s6 K
PLA3 x/ b( Y- [8 m2 U0 X
RTS( P/ ^- o" K: u! G# J i) [
% v7 w' g# _/ j, e/ i2 U
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看，没有账号？立即注册
x
|
IP卡
狗仔卡
发表于 2017-5-20 21:24:33
提升卡
置顶卡
变色卡
显身卡