|
|
;[FC][最终任务mapper1切页程序]% D# F0 W0 g" }2 Q
.ORG $CD9B
( Q/ ]( U7 j) K9 x5 \( ^7 {BANK_START:* x' _; ~' l6 t. y
STA $70: S3 K/ B+ P7 i, ]; A0 T
TXA2 T7 b b' n# c+ P) n
ASL% P- H% W: q* L# L" \
TAX4 _0 S* }. N" f9 T
PORT_SET:
9 R* P; X8 ^5 l' H5 q9 V# { LDA BANK_DATA,X4 Y/ M* ?: c# G" S2 @+ X
STA $6E0 b/ i: u5 D: p/ q5 b: @/ U
LDA $CDB8,X
+ s; `9 {% b; e" T* Q/ l' L STA $6F) m' T* m. I, `- Q! Q
LDY #$00
* s. a4 @) d8 l" o LDX #$05
9 N- `5 ]( z+ Y LDA $70
" o4 t6 @1 |/ \/ NPORT_WRITE:7 @% d a. |! ~) g# _5 r9 n
STA ($6E),Y
5 _8 ~2 u* N7 f2 G LSR8 m0 p& D; R( u0 k0 c. o
DEX z5 `$ S0 X8 @* r' w3 C& U0 w6 F
BNE PORT_WRITE1 Y6 L& P! z( M) \" d
RTS
. f: a E7 X+ W: E4 s8 s' m6 V6 z
! t* V8 t: c C7 ?& P. D ; x0 @' {* o+ ]* x4 T
BANK_DATA:$ u, p7 b- N9 G# W
.BYTE $00,$80,$FF,$BF,$00,$C0,$FF,$FF6 M! J6 f+ Y+ @5 | ^
1 _- b& v4 B5 }7 A
+ w* e- b2 a& G# y
;[FC][最终任务mapper1转mapper4切页程序]: l) n7 N9 Q4 K# k. a9 q
.ORG $BFD2 ;初始化跳转
; |0 b9 k4 ~. J4 K JSR $FFC0
; }. ] \, J4 ~1 v+ F
8 U4 v9 C3 R" E8 W4 {' C/ p
9 ~' H/ b: t7 A6 u; ~0 a& N: Z .ORG $FFC0 ;切页% s' u0 v8 v! p0 D( T
LDA #$06) F0 O' I. g. B' u* H
STA $8000
; i. }3 @) v6 D6 |; E O LDA #$0E$ y$ o; o$ z9 M$ j; Y1 j% E
STA $80010 U9 y) Q8 L( i4 E) T3 j
JSR $8000
( M5 |2 r; |+ Z+ ^ RTS
2 p: u$ O7 x& k$ |; o 9 A2 E9 P' @/ P/ k1 y
.ORG $8000 ;数据复制
; u* u9 \9 E% O* Z LDA #$80
$ [7 h, F- j: Z p2 @( u( j# F STA $A001 ;启用SRAM1 Y' P4 a2 N* \3 `& F" t* X a( Y
PHA2 e- E- h+ ?% v+ F7 ]7 D7 L
TXA
6 }$ Y% i1 \; B- E+ s* Y PHA' M* j( }3 d. N- K0 a8 L9 s
LDX #$00
/ k+ Z9 I: z( I8 U0 HDATACOPY: ;数据复制; [. x& A6 X! _# Y' Q+ T
LDA $8100,X' S+ e/ T* T- a) M& T' A$ f
STA $7200,X( h2 D% A8 O) q6 Z- Z+ m8 P7 ?
INX
9 E# Q1 @& t/ _ CPX #$008 ^+ c$ ^0 k% y/ _
BNE DATACOPY0 G8 F7 {% N, C) m4 D* n( M) g% A
PLA
; o p: E0 N# \7 m ^4 l, b* {' B TAX! P8 l6 w( G; U4 a8 x7 ?
PLA
' n' x8 e. e7 ? @ RTS* g% b( ?" d+ i
8 d9 J+ v$ j/ ]/ l/ V" K: v
.ORG $CD9B ;跳转到转换的切页程序
5 a: n0 B1 l* P+ ^5 ] STA $70
- H( I- R" V5 s$ M/ N* S: f4 M JSR $7200; u! x# \* }$ F6 _
RTS
! P# F1 e- t3 z2 V
7 F& T$ r. j6 {1 h$ O .ORG $7300" T# ~* }! G4 c* H# L# {
M1_TO_M4: ;切页程序
# |9 k, c3 A8 R L+ e$ I* y3 X2 u( } CPX #$00
: H& R+ j% j; r) F BEQ REG_SET
$ X2 }$ P! Z$ `, j CPX #$01
) d8 D6 w( [ g4 J) Z v; [ BEQ PPU_BANK_0000
_. g! K) G' g9 [% N% K$ c CPX #$02/ E( N# ?2 Z5 o; G1 q8 P9 K
BEQ PPU_BANK_1000
8 I3 R, Q+ e* e7 g CPX #$03
: n" N6 X. y: P. A6 r8 L' x BEQ PRG_BANK3 H+ ? \& g" ?# Q" K
REG_SET:+ D8 V; ^6 i, }, x) J3 _1 W- D
STA $A000
& M: M3 E9 ?7 @$ g+ w. t RTS( t* ~' V0 K7 ~0 m# U6 M! [& j. [
.ORG $7320
% ~3 T! L/ g' S4 O- QPRG_BANK: ;PRG切页
) E; |/ I( e9 F# l& e PHA
8 @9 t3 p( j A% n- E/ P. g/ V LDA #$069 b% ]. e$ f/ U- ~6 s/ o
STA $8000: @5 W" m: G& S" _* W
PLA6 A: l$ S' U+ [# ?$ L7 o& X
ASL- z. v& p p- R$ E* \
STA $80010 q, i1 k6 ]. g% [- K* m, Y& w
ORA #$01
( U6 ^0 ~+ d" R5 @+ J PHA
0 z% e, f# V8 Y LDA #$072 @; P/ p* t, i% s
STA $8000: p$ G' T+ l. k l. U, I
PLA+ A% k5 Q: f. Z- j5 z, L
STA $8001& X7 {% Z( W( h& ?/ h1 @$ M, G3 b
RTS; h* ` B. I' B/ {) G/ R
.ORG $7340! T' s1 G" l. I( S: z( e9 N
PPU_BANK_0000: ;精灵切页% |# ~2 G! L& n' n- C
PHA2 w2 ?) o; [7 G E" k% ?
ASL3 V2 z" }- K8 o% C/ W
ASL
: c8 y# z) `' ~ PHA- g) } S2 ^4 z
LDA #$00- X, |, Y; w8 @; u: P' b
STA $8000
" |% p8 P' Y! G g- T PLA
( k7 k9 j9 q) G4 P STA $8001
7 P: z: S; }& N7 j1 @9 ~ ADC #$02
- q' `& [6 X6 x. r$ ~* c/ P. ]- I PHA
* ~6 a8 R4 z) c2 W3 P LDA #$01
+ W4 C0 A% m4 s3 U# O: }4 M. m" d STA $8000
! \6 S& z" a0 f; a5 P9 Y PLA8 z3 y/ y. G4 v/ z, H1 g& y
STA $8001
! |* z/ ^$ B* c5 D PLA! W6 _+ T" L& _$ C1 D+ H4 c1 u
RTS
, A5 V# M2 I. y j7 F' l " S8 _" O* J/ A. O
.ORG $7360
( ~$ b3 Z9 ? B- WPPU_BANK_1000: ;背景切页
: y# J7 O0 Y* `7 V# D% C PHA
2 Y$ X7 F9 q, Y6 r* J" I i. ?( ~ ASL0 `: ]* _4 }# p) J3 u, Z- \
ASL/ |) b+ f. S# ^
PHA
7 S$ e. `* {0 \+ R LDA #$02
( z- \0 N8 h. M$ E8 Y STA $8000# p. K3 Z& n4 W" E; j, D% U5 `! e
PLA! K1 u1 y0 j' \: d0 A4 \
STA $8001
/ t3 i4 z) [& C; h9 }% Y# O ADC #$01. l1 A7 V+ E8 h/ }0 ?& B
PHA" T4 o% Y' P ?" n1 C# G5 i0 G
LDA #$03
1 A: d' f4 o$ x STA $8000
, ?$ }# x& H; ?+ k! ~ PLA/ H5 o0 ]8 E$ O7 m
STA $80015 M% q0 l6 v- K' ?
ADC #$01: H$ S4 a( E7 `" V) B' m
PHA5 X; L. b7 m: w1 R C
LDA #$04% e% i+ D1 Z5 E0 e
STA $8000( @: E+ V5 ]( }& q" x9 H1 d; S
PLA$ w: R( ?2 S& h
STA $8001
, E* \( k _$ J/ K3 P6 j ADC #$01
6 i5 @ K( u( _2 U8 W PHA
" m. v8 a9 [; H' a$ f" v LDA #$05* y! \1 w4 d7 ?) b7 l
STA $8000
7 @9 k: ^8 Y: x; O4 Y PLA
* Y. ^2 g, a5 `9 t$ i' |7 G" | STA $8001
/ H8 I) H3 w9 W9 H' A& Z PLA4 T/ v, }0 k) B6 Q0 g6 j
RTS3 C% \, Y' B3 L+ ?
@$ t+ x8 ]. B& h |
本帖子中包含更多资源
您需要 登录 才可以下载或查看，没有账号？立即注册
×
|
IP卡
狗仔卡
发表于 2017-5-20 21:24:33
提升卡
置顶卡
变色卡
显身卡