|
|
;[FC][最终任务mapper1切页程序]
# U- t7 O; } Q/ k4 Q .ORG $CD9B& r% @# b* ^2 M( I# h& U0 B
BANK_START:
8 a; C# x4 p) p4 U+ o/ U( \: | STA $70% u2 ~- \% e n- N1 m0 b" C
TXA, r, v9 z6 e: U3 x
ASL
& g0 u/ r+ T; \: C TAX5 ]$ h- ^3 f% w2 J1 K& y& F
PORT_SET:
# _5 n4 S* w+ o$ _- G2 w LDA BANK_DATA,X
# o& H' a4 B/ j! F4 t STA $6E' N/ l5 I6 |8 Q
LDA $CDB8,X% t) a" {2 F {0 a, t& @
STA $6F7 p; W5 ?" s7 N9 w
LDY #$00! B& G6 N# ], l. T8 B7 n8 n( a
LDX #$05 C4 ]$ R2 F7 e9 ?% U
LDA $70 N% m7 U- ^9 Q, v' r0 t
PORT_WRITE:3 z9 G) q4 q) A% c
STA ($6E),Y
& X! R7 x6 ?/ j$ O% v LSR
# y" N) y! d) |( I, A$ w8 L3 E DEX( }5 \0 P# r& l$ |- Y A; Y- S
BNE PORT_WRITE" D3 h6 z" A6 v: X
RTS
$ m$ Y8 m$ F! W3 u# q T
" ` ^8 Q; J2 {! Z7 B2 q
. b" V1 e, s7 b0 z9 z4 t8 uBANK_DATA:- G! m8 Z' A r4 [) d% K/ ^& r; ^8 J
.BYTE $00,$80,$FF,$BF,$00,$C0,$FF,$FF
2 W4 T. m" |1 p# ]
7 G$ p, q4 C' f1 H# R 1 o7 m/ v, X9 U9 X( X9 e( c) {
;[FC][最终任务mapper1转mapper4切页程序]# L M4 R d; [8 P2 u' m# D
.ORG $BFD2 ;初始化跳转
4 M | q, w5 b9 G# _7 [- K+ I1 h& | JSR $FFC0! r. i. M$ G' D7 ?2 Z+ H* t
3 S( b) S. @* ]( G$ r+ c; g( q7 s/ E2 d( Y( e d
.ORG $FFC0 ;切页
& G. E$ ?& R# I! l2 W& N LDA #$06- y5 t0 b R" X8 t F
STA $8000
) Y: b. W+ \, ]( X6 H! ` LDA #$0E. [" v% S! o: Z- c
STA $8001
# ]0 I, P" U4 \ JSR $8000
$ i2 ?) R; R" W; d& l' ] RTS
`- V5 z# v/ l6 h' f . b2 E) T1 F1 j$ O, m
.ORG $8000 ;数据复制( L+ k" g! ^4 J" J$ x7 R
LDA #$80. t5 [( l: k. Q
STA $A001 ;启用SRAM' R. C7 h3 R% {
PHA( T5 c$ z3 m0 v! {# j- E# z
TXA* U9 W* n2 g6 g/ ~7 E0 H
PHA; k% s- p$ P; G, o. d( h. h
LDX #$00
/ K# Q, D4 G( x x* zDATACOPY: ;数据复制
* v) I$ {3 `- t LDA $8100,X
$ X7 m8 W& u/ g( o& j5 Y) K STA $7200,X+ I9 C& v/ E( ]4 j
INX* ]( d0 ?' P( e4 a, b5 X
CPX #$004 S. @$ t" Z9 W/ M n
BNE DATACOPY" ?& K( A2 W- _' A
PLA
1 _+ C) f2 ]2 T/ o TAX
7 a) K5 d5 r0 n PLA4 o5 S- `( k8 f) _
RTS
) R& W% E1 h" ^# d, D1 b" o7 ~- @ 1 T: G c9 S9 j3 |, C& ~7 @
.ORG $CD9B ;跳转到转换的切页程序3 W, j$ T3 R, s# ~7 L
STA $70
0 O/ x% Y) b6 H/ |& K JSR $7200% p. \( u0 p1 t
RTS' S4 z8 f \# l* U9 V! o5 J2 X
3 i% ~, m! |: k .ORG $7300
7 \5 ?- P& t# E, }( O! ]3 nM1_TO_M4: ;切页程序, V W9 W( s. j
CPX #$00* |) N& B6 Z: N) D; G, W& _' g
BEQ REG_SET* g+ f& G4 j! [/ W, E* v
CPX #$01
5 G- ?$ Y7 ~/ H4 h, _( S) v BEQ PPU_BANK_0000
) a3 Z' |& o. G7 W8 P5 h' a CPX #$02- C4 R& S1 |7 F1 E
BEQ PPU_BANK_1000- f6 T) ~2 j6 ~/ ]3 J h u% t
CPX #$03( B( M/ ?% Z" X8 X4 b
BEQ PRG_BANK
& |9 Z* c* R" }9 k( L ]REG_SET:5 T+ n( p* j8 o1 I
STA $A000+ x; U2 z* g; ]1 G* ~
RTS: y% x$ O a: F$ n+ A
.ORG $7320* J7 B9 B1 ?5 Q; g+ o! j
PRG_BANK: ;PRG切页
- V: K* I2 i8 C$ u; S& l. h. x PHA
5 K' g e+ {2 m U2 ] LDA #$06
! S# a" }/ o. X1 g! F' ` STA $80003 ^/ N z) }# ]4 ?& z' w
PLA; H1 X$ B7 G& h3 F: z
ASL% e$ a# ?* x. Y v4 R+ U
STA $8001- c# g; M. o/ }" R% \- @* l
ORA #$017 B. ~' u9 H7 `, u3 i& h$ P8 h
PHA
8 S4 ]: z. n, V8 O LDA #$07- d/ m7 w) [& x( q! D7 ?3 N" |& l7 x3 l
STA $8000- o' M; a# t6 D. {1 t! D& P
PLA1 {/ \( [4 Y+ S3 C. L, o3 G4 G
STA $8001+ Y$ C1 _6 h5 c+ Q
RTS6 X) ]! O- n3 L \" l/ U# l
.ORG $7340
+ q& |, d+ O- g$ b/ Y% xPPU_BANK_0000: ;精灵切页
8 m: x' M5 Z+ A5 a5 }, i- L PHA
6 @3 C' ?4 d* S6 B4 O# x# C ASL
& F: Q2 Y8 E- g5 n ASL
" u5 L5 }, y- e4 ^. O, v PHA
6 x p0 v5 f9 j& G, N* | LDA #$00+ O* u) b" u2 b1 @$ z
STA $8000
+ U0 x# y2 s% c. |# {1 Y PLA! V/ V8 s: B: M+ w9 O5 w
STA $80014 z: [7 J9 V5 z5 u' n5 P1 E' m C
ADC #$022 I* ]$ f6 p8 n* `: B
PHA6 L8 v6 w4 L) P3 N4 a
LDA #$01/ x4 [+ w; d, {' ^2 }
STA $80000 @, {! e# U; @9 N! b
PLA
, }: @' ^: C. F; t0 r- f STA $8001
z& O0 m9 A9 u' }$ j$ d: Y PLA
& p$ e! U" a/ L# ^; n, U4 T RTS; X. S( N, I; c, f! Z u
: k! B% e1 w' l U
.ORG $73600 @% k; P: [2 o2 W
PPU_BANK_1000: ;背景切页# W9 Q7 J; J# `1 {: J$ ^
PHA
7 |4 q& l- E5 `' V- R: D* v3 E% B ASL
0 }6 g. G9 y# c5 Q ASL
, f. s5 Q0 w5 v" J PHA
# E! s* E2 z6 b1 n7 i a' q LDA #$02
3 @9 g3 {/ T8 Y9 X: I2 k A STA $8000( ~1 q: [/ ~5 W& l* W
PLA
3 Z% c- {+ r% R, M8 ?4 f. q STA $80012 h: U: Q# ~$ X2 s7 L5 J# Q
ADC #$01
% h) G- J6 W/ s) |& ]# y: d. P0 e6 k PHA
) H- d) e% O$ i LDA #$03+ p2 q5 G& U& l+ C" J
STA $8000/ X8 W% a) }# {5 Z- h! \
PLA0 G) v9 R7 u8 t
STA $8001
9 e/ r% m" \8 B( P7 P" F- b% K ADC #$01- F; S- O: `0 G: i8 _! p' I
PHA. L/ L% X' \$ j& q* P2 I: N
LDA #$04
$ i9 O. D2 N7 \, U! R. } STA $8000# Y& }* X2 h. R. S3 f) h" @
PLA- @3 j& W6 E* x) L) f& W6 Y0 c$ N
STA $8001* l% d e+ S( h$ E
ADC #$01
* q5 ~0 b. w" r! o" D PHA9 \; P4 s: W u' k
LDA #$05
- j" V) a' _4 b4 N* f STA $8000: \- L" o. e$ \' r: f
PLA! H6 j! t7 `( I- D2 t" A$ p) e
STA $8001
1 M! F8 D' r- I PLA% [0 }$ G' p, q7 W2 m% b
RTS
1 H& @2 p7 ^/ \' Z) G
% G) a$ A4 ?) S; Y# {, T3 n1 H |
本帖子中包含更多资源
您需要 登录 才可以下载或查看，没有账号？立即注册
×
|
IP卡
狗仔卡
发表于 2017-5-20 21:24:33
提升卡
置顶卡
变色卡
显身卡