|
|
;[FC][最终任务mapper1切页程序]+ z1 z3 g+ y# Q E9 u8 {, R
.ORG $CD9B
, E' n' R8 l0 X& m$ MBANK_START:
* z- P6 T( }3 U" t- L: G9 N STA $70
* x* u" R+ I: f TXA
- i4 Q5 H, j1 n3 S; G# o4 N ASL/ c L$ V8 J. S' y
TAX
9 n- p! Z5 r |+ e/ I; N z( FPORT_SET:$ Y% a: S* w a
LDA BANK_DATA,X
0 e' T, ?- z2 u* z. O- s# ] STA $6E
( F8 U- a; i) M0 B" ^ LDA $CDB8,X
8 S) ` N4 p9 t3 y' C" Y; y STA $6F1 Z5 `) j: d2 k: @. Z: _, g$ r
LDY #$002 z2 |+ f( F, a) ^/ D& I8 a
LDX #$051 V: B$ _4 a1 y# X% p
LDA $70
* y7 `5 c% F, Z4 {$ BPORT_WRITE:
% p h3 g9 h$ {0 W STA ($6E),Y- {( X" n7 y4 H0 m5 y" [- k5 `
LSR
* ~! k: H3 B' d( d DEX
4 K$ Y- m- `! @% d, u9 u _+ a" v- m BNE PORT_WRITE
# b# F' P L: f8 x; Z/ y/ q RTS2 q( E% o8 F" ~) v
) S8 k$ `, Q7 B) b " C2 }6 w# b) ?6 |8 X
BANK_DATA:
3 K: U3 l+ x7 [: y .BYTE $00,$80,$FF,$BF,$00,$C0,$FF,$FF
7 y% J6 n- ~$ t' G: M
3 a$ z$ T" W2 a; J . D/ g% y* X- c$ p! r
;[FC][最终任务mapper1转mapper4切页程序]9 z) W0 _" u3 z) C
.ORG $BFD2 ;初始化跳转
" Z+ @! E. g$ `8 p JSR $FFC05 @1 j( O/ i2 |% i
4 n. _1 A* {9 A' _5 T
$ d% T0 s* o$ F, p+ t4 n; s .ORG $FFC0 ;切页
# z& D! S, f. J3 ?; y LDA #$06! T# z+ d* q: ^/ U
STA $8000
* A1 q" k3 `3 r1 m% L' l LDA #$0E
: F) L& z+ u# k0 e5 F STA $8001$ l" {+ ]) ]" z9 \7 T b- r# {
JSR $80009 t( E) j" W( x& A
RTS
$ B" w; U7 L! y/ c5 O! U
" V4 X4 `) v: K% J5 E/ R9 o4 \- ^ .ORG $8000 ;数据复制0 b9 D- b3 s8 E: N6 [ C
LDA #$80
% U. r; |& t) N; E8 W STA $A001 ;启用SRAM
. ~) b. x% O9 P* y* u# ~ PHA) T. z0 c, T) s) K, Z
TXA; k( _; X, |% ~4 M
PHA+ t' ?. O" N8 f# R7 F
LDX #$00* B9 s4 W( u1 Z7 g, d
DATACOPY: ;数据复制
/ t" ]9 ^# m7 [# I4 ~ LDA $8100,X* V& y, ]& t0 e
STA $7200,X3 W1 @) @8 [8 Z0 Y3 N+ [
INX
1 [+ r. N1 }3 [* E( @( v6 t( t CPX #$00: J, \- |0 N0 P7 W* d2 X" m/ l
BNE DATACOPY0 `6 p/ r- k% F
PLA6 ?- q5 Y, @3 A& H, ]. S8 n
TAX
8 ^+ X" j3 ]2 s5 ^7 n$ R, z# B PLA% Y* Y- w( G% t, G: N# O
RTS: K4 p* f) ]& D2 P: c8 A' S
) t* S2 t2 B0 W: l .ORG $CD9B ;跳转到转换的切页程序
9 Y' X1 g8 Y- f& L6 w+ S, [& A3 B STA $70
; n( H* k' w( ~ JSR $7200
% [( ]5 f6 M: n3 \* E% Y, M# m7 o RTS% w, |2 m$ {6 R5 s2 W ^0 T; m. I# C
( e7 g# \; P7 ^9 K5 R% S+ b$ }
.ORG $7300
7 \( v; d- U; m8 ?5 `M1_TO_M4: ;切页程序
b9 w! K6 S$ F CPX #$006 ~) P* I# Y; y+ U
BEQ REG_SET
7 a; ?1 x8 x5 Y% T! p- H6 B- ^% c CPX #$01
$ P5 m; C* h0 }3 O- J( \- E BEQ PPU_BANK_00003 h& ?, z& X9 M$ {; ]. `% B8 |
CPX #$02. X6 v0 Q; M8 I
BEQ PPU_BANK_1000# i# e5 L3 I3 t' b/ Y
CPX #$03
3 G3 i s) X/ _ BEQ PRG_BANK2 C/ l. \2 I. K$ L6 }4 k6 u
REG_SET:/ y* w2 [- O, ?# L- M4 G
STA $A000
1 T. r- Y0 ^0 ?) V RTS
% l- a7 r0 T4 }: c# l7 v .ORG $7320
9 q; K& M9 X* u+ @PRG_BANK: ;PRG切页. y. e/ R0 w! ?# H! Q
PHA
' g8 X T0 V% W W; t LDA #$06
0 ^5 \- K- l+ D STA $8000! }; j" L; J4 Y% b- D
PLA
% E8 x1 q& W9 ]6 {2 b5 P) _6 K0 } ASL
8 [$ {1 p' d- R6 k8 ` STA $8001
/ n) U* c3 {( V& o+ i! | ORA #$01& t! c6 f/ i' E4 Q. l
PHA% [# Y4 m F0 {: O; \ m: W6 ]& N
LDA #$07# K3 B! J' o9 h
STA $8000
5 Q" e. N+ m3 p! z" K2 _ PLA
, H0 _6 Z _) t7 i STA $8001( N* `3 N E5 \ P/ M7 n, N& @
RTS
+ t: M; V& j( m) w7 [: ^. X$ A .ORG $7340: t( Z- {* E1 ]! _
PPU_BANK_0000: ;精灵切页# P2 \5 r9 F. l0 h+ C7 t
PHA5 w- H) E7 E8 @$ w! o: l" i$ C
ASL
0 A& C6 F$ a9 l( W F$ w ASL3 n( _/ e) M0 e0 r% z$ ~; V) x$ c
PHA% T: a% M+ l0 e4 ^* B/ q3 E3 O
LDA #$009 T% M+ I" W+ P. `5 L
STA $80001 h- k3 I" H- K: g! X7 M# ~" |
PLA
7 |* z) c) F- u! h! C! k1 j STA $80015 X0 t. a. _6 b) a* r) h
ADC #$02
8 z8 Z* U9 \# H9 p6 [ PHA
6 g! T' b, e# H2 K7 G LDA #$01% a! G1 R( z' J/ u% s o: c% o
STA $8000( r! \' g o. E7 q6 m) a
PLA
4 M- N/ ^' a) V4 g STA $8001
: M( e4 I& ?+ u; _! B$ n1 F4 O- V% v: S PLA
X7 p, { C2 K RTS3 f+ M( C: ?* ]. _: u9 D9 O4 u9 C
- ~0 O1 K* g D W( E& F; p. h .ORG $7360) ^ \! }6 l' h
PPU_BANK_1000: ;背景切页
1 A! R% x3 R7 _- ~! O PHA
1 V, R0 s. x0 \7 ^, q, E1 K+ D5 t; t ASL
2 @) a+ ~2 [ E5 g ASL/ T ~% {1 W# A8 y) c; a
PHA
6 u7 Q4 H- t$ E x4 s LDA #$02
; S% Y- i+ `6 j) v( u STA $8000! `( q8 ^9 W, l/ j8 V# z% }
PLA
8 z; G3 h* B: u7 T) k2 p STA $8001
& @& ^2 @: y* ?9 l% L7 M0 ] ADC #$01% W, Z0 e+ U1 ?7 z" P8 A, ]
PHA$ C, J6 V7 o9 \' P4 K% O
LDA #$03
2 F* E7 ^5 E% \( t- j) Q# s STA $8000
' f; d5 H- F& v7 r! d PLA8 h9 X1 h8 G! `+ f3 u
STA $8001" P& I8 ]/ v7 I% b! d( B
ADC #$01
- h; g% X* y; T+ t4 F PHA9 M$ P; A: A2 |
LDA #$04
; ^# P* N: |% x: g STA $8000- Y" s1 y. t3 C- h# [
PLA( ?: \ m- _& K. j* o5 V' V
STA $80017 `( m+ A2 W7 q; X
ADC #$01
J( M0 \, t& x# _8 X PHA
0 t) j4 _' X( a( z! q# m' F# e LDA #$051 k! \2 N+ i6 [6 k) X/ m6 N! O9 g
STA $8000+ u5 s8 s' `: R* v: {+ M4 A
PLA
1 o5 v# n. ]. H2 G: ] STA $80010 m: V6 Q/ c; V
PLA
# T) u6 t/ s$ {+ ]% x0 f; H0 X! B RTS# A9 @3 ^0 B6 g4 g4 Y2 }7 w
6 N7 F+ T8 O, O l2 h7 x# U
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看，没有账号？立即注册
×
|
IP卡
狗仔卡
发表于 2017-5-20 21:24:33
提升卡
置顶卡
变色卡
显身卡