|
|
;[FC][最终任务mapper1切页程序]
$ J* K2 G7 t5 s: Z( n8 M- M .ORG $CD9B
. P; G# N z1 p7 u K9 f# J1 `BANK_START:# C3 h+ b$ E( o& W3 I
STA $701 W: c0 F( I% F1 `, h
TXA
' x, f$ N0 V$ u- y- j* x ASL3 E8 d; L0 V& w& d$ y' j
TAX
" ?! S0 l' A+ A: d1 x6 M6 bPORT_SET:
" d" T( V! W; u; c* { LDA BANK_DATA,X; q2 i; G0 n0 @! ~# P1 T' v
STA $6E
) I8 F" c, V) |1 g1 Z( ~ LDA $CDB8,X
/ w8 d; N# `/ I8 b: } STA $6F
) E3 \; X0 T! E! k LDY #$00
U2 T- z% p) q- R LDX #$05
* t- W- T: m$ D/ D% J4 i, @ LDA $70
7 Q) d& Y4 y$ }/ u; S( z' k( DPORT_WRITE: Q2 t6 ~- \( e* o3 P2 g w J
STA ($6E),Y6 b6 G: F5 ^5 d# S$ q6 p) T* v* D
LSR
1 w7 t# A# E5 o6 V0 @' E4 x; [ DEX
! ~2 k, [ | |2 v BNE PORT_WRITE F! H7 G8 y$ j8 ?4 I
RTS0 k4 d; D+ | ~0 g
) S) Q8 m5 l3 ]" {' P4 G2 {
# E$ y: v- X' g3 Y# r1 j" tBANK_DATA:
7 F/ J. |9 c5 X% y0 H .BYTE $00,$80,$FF,$BF,$00,$C0,$FF,$FF, v1 `& m0 l# C* d- T$ q% F4 a
. ]% g) a$ `$ Q, N9 C# x; ] 6 u* B7 M: A9 i: Z- N9 ^( ]
;[FC][最终任务mapper1转mapper4切页程序]: c. A5 _& r8 C
.ORG $BFD2 ;初始化跳转* M( ? ~5 G, B4 \& V
JSR $FFC0
; Y4 h) ^5 N9 V( n0 j7 `) u
3 |' K9 n; }" }0 P% P, l U- X) r
.ORG $FFC0 ;切页
" W/ q M+ F' a8 ^( ? LDA #$06
0 T$ U I3 N# \4 E1 r STA $8000. b3 f! W! w% t
LDA #$0E' C$ c/ ~6 S/ V: b% G
STA $8001
4 I) p" |, k% Q/ R' k JSR $8000+ l0 ]2 I- G+ O: v
RTS 2 X9 e; O& `& X+ G0 B! S9 q
' u$ ~. L) j4 G3 L3 J" x .ORG $8000 ;数据复制, a' s) d8 j% |# o Y8 H7 M, U
LDA #$80
( z7 N1 e! @2 @. m: _ STA $A001 ;启用SRAM
U9 r' u5 r% Z. A: v PHA( V/ h& K$ I2 T; I7 R% h6 [
TXA
" ~# F' E' v2 q A PHA& I* B0 T+ p# c) [# e) T
LDX #$00
/ x/ x& F. V. i" F2 w3 @* e7 NDATACOPY: ;数据复制
5 ?& m+ l5 \! t2 R5 ~ LDA $8100,X. J F* Z/ \' E5 x& Y1 ~
STA $7200,X
$ V' B9 Y0 X8 Q2 h, ]" @) \8 A+ S INX, h3 _: h# b3 J1 b* p2 f) w* A
CPX #$00
9 _9 n! G1 c- _( ^ BNE DATACOPY- ?; H1 d. W* t
PLA
4 q7 ?' r0 r2 m1 T, r( \) y TAX
6 U6 @" r( L. [# w# v8 ^8 [* B PLA/ b4 K% {; \! R+ T( N, t/ w. I
RTS
) o: w2 ~2 z2 S$ Y % R9 q: F( |! b- U
.ORG $CD9B ;跳转到转换的切页程序6 p) \' H) y' }; n! K
STA $70
* }; S* u. o: C, o0 a) q' K- |/ j, J JSR $7200# D y7 f. C3 _- D" I# G
RTS& O1 K- _7 y$ }1 P) H$ c* `
# C* I* w$ P% |0 x9 r5 G7 f .ORG $7300) Z9 j9 i' M* Q" Y& S$ g% Y5 k
M1_TO_M4: ;切页程序$ e7 P# m% {6 C2 |- Z% D6 R5 n
CPX #$00
& W+ ]) }) i& ^2 T( S e BEQ REG_SET b' w0 D/ n+ W2 H' M" n! M9 ~+ W$ }
CPX #$01
6 I/ H$ O1 x0 O) J7 Y! ^2 C _ BEQ PPU_BANK_00001 m( v F M2 i5 h. X, [
CPX #$02" F% \* K7 j. C! i6 u9 {6 P! l0 l3 C
BEQ PPU_BANK_1000# l% X5 z6 K2 {% h# f
CPX #$03
V |' q. v, {# M( ]9 U BEQ PRG_BANK
r* e. w% [& w( m8 xREG_SET:+ g& g$ P$ o6 K; b% G
STA $A0003 q' f; d& \, R7 f, a- }$ K
RTS
6 @9 g4 ~% I% `: ^# t0 @ .ORG $73201 ~4 p9 u( f' i1 z# x7 C
PRG_BANK: ;PRG切页4 z l7 _: ?) _1 S
PHA
2 D$ |. n% B# |: L, L1 M LDA #$06
" [4 z2 N) t5 f STA $8000 X8 J4 L# M) \' I* u
PLA' h$ v# @0 F N; b! Q9 L! n/ [3 }
ASL
( b) }, |! {- P; ]6 D' X STA $8001- a! n( l) ^3 Y$ I/ S
ORA #$01& G4 Q; o' q( w, ?
PHA
1 _. w- u g3 u1 n( e7 S! M LDA #$07
( @- q$ W; Q9 c* l STA $8000% ?, A% ^9 h9 F- D6 z( Q
PLA4 c! E; z% U0 s2 ~
STA $8001
& D( b( ]4 P4 h RTS
, f4 L. l1 ~! f M .ORG $7340/ p- \: a. U9 l3 u
PPU_BANK_0000: ;精灵切页
: A: u: N# o' ~! r) N/ i( W6 A PHA
+ {% |' I9 T" K) A$ b. E ASL0 ~+ ~2 n$ M$ q' P7 t1 O
ASL
' [1 e+ v/ q$ |) E- \6 p PHA9 B0 k: ]2 ]: B ^1 m
LDA #$00
: ^3 T4 b0 J* D1 h- A& Z STA $80002 P# ^) i) ?9 a6 c# d% G$ N
PLA- M: ?" Z6 ?2 a2 i5 _% z; A
STA $80016 d s0 \1 D% _! [4 z, A" K
ADC #$02
( h2 \9 c% x: o9 K6 g9 N PHA& k! U% y: H q
LDA #$012 R1 j; ]# R1 p' w' a: `0 @5 M/ {
STA $80002 I+ ~# }7 c4 F, r
PLA
' u3 u9 U/ }" V+ F3 }+ U STA $8001( E* Y9 L& E2 V6 F4 X$ Q7 |; z
PLA+ W0 d$ H/ w# w# o5 e% G. a
RTS
5 c1 k' v" o; G/ ` 5 `8 \' S4 Z8 Y# a% X$ h
.ORG $7360# }8 A# b$ Q1 Q. w# ^" f
PPU_BANK_1000: ;背景切页1 r' S5 C' e, ]4 I
PHA
6 d- ?+ N% M/ o ASL( r/ w' l# _) s" y! w
ASL4 P+ A: y8 N) \
PHA
- }5 c& S7 @6 Q7 I2 Y0 J; A& t6 A LDA #$02, [% A; }6 w# t$ d& e9 y
STA $8000
4 z* _9 {% [& B+ J0 l$ r PLA
7 j9 i& _& _% _1 m9 ? STA $80019 ]8 {* t0 m* N
ADC #$01( O8 N% T% |9 y4 R
PHA
: c5 U$ B* t- \2 J S' A LDA #$03
/ s& o; R4 u. A# P' x STA $8000; a4 m4 A) h9 A- ]2 e
PLA5 f+ _0 y8 f8 {, [# s
STA $80018 F: {9 h' C, ^
ADC #$018 |, s; {% u* t- t' L; S' c
PHA
' d; r$ i$ u( H LDA #$04
( l/ t- [$ V7 B8 Q9 Y; l STA $8000
$ m% A w( ] E- C3 l5 n% D PLA
9 x3 z7 c) ]; j8 B- X: F3 o STA $8001" D% s" A) V& `) E' v5 O/ w K
ADC #$01. r) s5 o/ l g9 ?# K+ t/ ^
PHA
+ ]' V% y5 J/ t4 E LDA #$05% n( w) y4 t0 L$ o0 @
STA $8000 |1 ^3 ~9 G7 X8 I# z3 M
PLA
: W* C# P4 {* E STA $8001
: E4 \' L) D, J; k PLA+ m3 ~% M' T1 J: A
RTS! g8 Z: w* R5 B3 L$ j% n
; U; H% ^) p- l$ A! t2 t1 u
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看，没有账号？立即注册
×
|
IP卡
狗仔卡
发表于 2017-5-20 21:24:33
提升卡
置顶卡
变色卡
显身卡