|
|
;[FC][最终任务mapper1切页程序]
5 O' v$ B( @7 Q7 N/ ^3 M& D .ORG $CD9B
9 V, @- u! X& H7 L( c) cBANK_START:
_2 H8 Z' m$ ?! p STA $703 Q4 E3 l, U5 Y! q- I6 E& y3 Z$ }
TXA
* W3 ~9 T+ \; i5 T' w! x( K& L ASL* V8 q/ h8 K$ U( W/ ^
TAX
" s7 a* J! ^0 f* m( A( L- DPORT_SET:
5 j; R8 D0 e- F+ ^% E+ W LDA BANK_DATA,X: M3 R3 a% r4 ^6 L
STA $6E! m4 x: E6 e: w* Y2 C( i
LDA $CDB8,X8 D6 ], {3 c, \4 L) l9 Y; `
STA $6F5 K( j/ U8 B9 o' C& I
LDY #$00
* e' v6 ]8 \$ g, g6 j- j1 \- i LDX #$051 p0 N: \. |! a/ i
LDA $709 s& D0 S8 W# b# r6 W
PORT_WRITE:
0 h( N. C# Q$ A8 N STA ($6E),Y
9 y- J0 ]' ^) } LSR) S7 B+ K& D. R3 q! s( B1 q
DEX5 {7 ^3 s' b' _% o1 Y2 t
BNE PORT_WRITE
3 c: r3 u g: L9 o- K7 E RTS6 x/ T( T% b/ _
4 E- _/ Z% m1 ^! c [
, v4 [, Z; }" _7 F. `( s! N
BANK_DATA:" S: q7 {. f; z6 c3 C% @
.BYTE $00,$80,$FF,$BF,$00,$C0,$FF,$FF3 G6 k4 v2 M# M q9 M
- ?* Y, L: E$ I' i* I
8 C2 @/ s' _0 k. L6 A;[FC][最终任务mapper1转mapper4切页程序]1 u2 G0 G3 h0 k( }3 b0 V: l& H/ z
.ORG $BFD2 ;初始化跳转
: a; y1 {0 d: j JSR $FFC0
: y' a) Y/ J' d; C+ v9 y
" `& A+ V6 m" G: @* h8 e" U) V: [5 X$ C) C+ w3 d$ X9 Z- l
.ORG $FFC0 ;切页# {; u3 t8 R2 a
LDA #$068 f7 [8 F* R, [1 N$ P6 F
STA $8000
: Q: ~/ y* r: H; B LDA #$0E
" l Z2 k3 ^; m2 [3 d6 D STA $80018 |6 i4 u% A) M+ H9 C' p. x
JSR $8000
; g2 ~6 `+ X+ s; @6 d# _: I RTS " F6 K* O) Z/ O1 t
) B* L2 G) m6 X1 t, ?; O- B .ORG $8000 ;数据复制
7 A8 d6 E8 J' S, K) N( u LDA #$809 b) f- x3 e1 \
STA $A001 ;启用SRAM
8 N/ g* k' ]( ~4 o7 h! a# F PHA% z' G% J. P: d8 w& R: S: `
TXA5 l$ X6 h& M& X" m) j2 x
PHA
0 v, `( b9 c* n% V# k4 h k LDX #$00
& Q; k) E" w9 C; J! M' fDATACOPY: ;数据复制/ w Z) ]% Y3 p! l) I
LDA $8100,X2 `$ B3 [) T- B5 i
STA $7200,X* l/ i5 @) }$ T3 \7 K
INX/ Y% z! U$ `2 w/ X& y7 H1 A5 C/ M
CPX #$001 j, j q2 |1 |) q% H3 b
BNE DATACOPY
% O8 A# T/ O9 a' t8 L7 T PLA2 f2 y+ N' J6 `% \
TAX/ }, l8 U- F# r9 V
PLA6 u4 M' }$ d+ L3 l: r1 R' M9 V
RTS! }: |3 K2 y K, B* u- K P3 o: n
% P5 a8 r$ n- }( L( L( k' S .ORG $CD9B ;跳转到转换的切页程序) S* ^$ p4 |+ V: {
STA $70+ j+ i3 q2 Y: Q3 l
JSR $72007 v3 d" L9 Y I( H& C/ D2 v
RTS
8 n. g; X& {. H7 ~, ^
3 S- A/ S9 G, J .ORG $7300- P- o5 |/ ~) F4 w" r
M1_TO_M4: ;切页程序* M. j& R! {7 v3 N: |
CPX #$006 W, e% c" R" T. P
BEQ REG_SET
' S' }: h: p9 \ CPX #$011 Y, W) L8 _3 k% \- R
BEQ PPU_BANK_0000; a- |" S" b6 y1 b( A
CPX #$02
4 ]3 L6 F e5 }1 B E X' Y9 Z BEQ PPU_BANK_1000
& I: I3 }; j9 n9 A% p. Z CPX #$03
! n$ A6 {* z2 ^/ f BEQ PRG_BANK
( }. [( N7 i3 ]6 V8 @REG_SET:
$ \5 h) u( v1 v. r STA $A000/ x' z9 n5 W- Z2 X; T3 ^
RTS/ |) V4 s/ f+ Q3 \3 u0 u
.ORG $7320. {3 k% a$ o0 H/ m
PRG_BANK: ;PRG切页4 H! r- x; Z0 @: V0 l
PHA' s- }1 Q4 N2 V, K7 N
LDA #$06
& e. o) c+ n. p STA $8000: S* o- V3 j$ f7 M9 N! {( B o9 v' X+ W
PLA
# ]5 [: \2 R8 E ASL
' n' d% o7 W3 s: ^" A! G' M8 S STA $80012 j2 [0 ?; ]6 F1 ~; Z( m ~
ORA #$01
$ K$ }4 D) Z2 |8 N5 h* t PHA
: X! U$ \# {( F" E) Y4 } LDA #$07- z2 y+ H' ]- l% t9 p6 q6 E+ ?* q
STA $8000
. V) v; \; f1 U( f PLA: m$ f S" O2 q7 {
STA $8001
+ O' o2 ]# g: b/ J# T. o+ b5 w+ U! p% B RTS
3 W* Q' ]! y Q8 g+ P6 S .ORG $7340
6 \) Y c# k7 L4 VPPU_BANK_0000: ;精灵切页( c4 k2 L' d3 _( z: }1 q$ v
PHA
; _5 B/ Q4 d7 \. r6 }5 l ASL( I3 ?- I' V8 R
ASL2 \# c" T2 n# j) F; _# F
PHA
: {( s3 o% a/ w4 L$ t6 l8 g LDA #$00
# m6 u* ^5 }( r- s STA $8000
% u% s. p1 H, @6 `* F9 p PLA
( Z" k4 }' t, k$ v6 ]5 O STA $8001% v m6 p9 q( \2 a4 i+ d
ADC #$02# h4 D/ q0 F% _7 @8 d5 a [7 t. F+ ^
PHA
8 Y. X. B. H* S y" e9 M3 s! ? LDA #$01
/ _5 l7 d" _2 T& ` STA $8000
I1 C3 N2 W5 `- m PLA
6 T* O4 d0 ]9 } V$ J5 x7 K STA $80010 ~$ m1 Z4 K% Q$ W6 \7 `: E% a6 X( J
PLA
! S8 M. ]: b" T# A X% j8 R RTS1 N! L) M* o+ J, N# u4 `; e; X% }7 D
, ^; W$ `7 y2 f" L2 h- k) b+ C .ORG $7360
! i/ {5 Z/ z iPPU_BANK_1000: ;背景切页
) m6 z4 h4 u1 T' t: v8 Q* u- z7 D PHA
) a8 v6 O9 [( Q2 I/ j ASL! l! p& z/ J9 p3 y8 b' c# i. \
ASL7 j5 }4 x- i# K7 h7 F3 q0 z3 p, E
PHA4 e$ F+ p7 Y; D
LDA #$02- }5 }+ c* v! r- w: t5 Q5 c
STA $8000' v: C: c- H9 ?7 q8 C
PLA
5 e) `1 h C% g/ g: B! @4 W STA $8001+ L2 T, W$ g' b! m4 ^9 z4 F' N
ADC #$01
+ j, q. ]1 G2 B$ s/ v PHA
8 A& G5 B( e; V( x3 { d$ b; h LDA #$03
7 s* y' q! [/ Y l4 x' X STA $8000
$ S9 q& H, \( J& q+ F6 ^ PLA
2 d0 Y2 S/ e! ?" x STA $80014 M& D* H2 h# O1 k8 k' B4 a
ADC #$018 Q) s' v. P' M% C' d9 B
PHA
) S# O0 n$ X0 l( C, n' P LDA #$04
7 V: r* X# u4 ?6 n STA $8000
# i* C+ b* \* J* m/ U, R+ P4 P% e PLA6 V7 Z) j9 A& `$ ?
STA $8001
. R6 G- i, r- } ADC #$017 z; v8 [: \0 u$ z4 d" k8 W/ l1 d
PHA) I0 C( e- x8 J" b
LDA #$05
" C0 P% \; W W' ` STA $8000! h& N. m, U2 v# Y/ |1 }, D
PLA
! J6 m5 z: y& Z8 Y+ O2 v STA $80014 b4 n$ {) K$ M, S
PLA$ V1 f2 n7 ^0 e' h9 y, \
RTS
4 `. E0 \/ a; B
) j) s4 |, q' d, L9 _5 Z0 e; X7 s3 } |
本帖子中包含更多资源
您需要 登录 才可以下载或查看，没有账号？立即注册
×
|
IP卡
狗仔卡
发表于 2017-5-20 21:24:33
提升卡
置顶卡
变色卡
显身卡