|
|
;[FC][最终任务mapper1切页程序]
( R, x! \/ x y2 x' R5 c' @ .ORG $CD9B9 _) V, g/ e: [& ]
BANK_START:
. C. v0 j6 P- W STA $70
4 p6 _! j+ ?! j4 d TXA
g7 `: ~6 W- u ASL' }9 S8 _) T+ J1 a" j1 N/ D. G
TAX
* e+ t) d4 c. C" y# dPORT_SET:& K @9 }$ v4 w3 g
LDA BANK_DATA,X# T: I C. t- K+ b" J$ v; R) t) @
STA $6E
2 h" s5 {- I3 Q n* c. L LDA $CDB8,X
* E- n. H) l1 z8 T3 @ STA $6F
' n2 J/ h/ g+ ^* h LDY #$00
! g/ M3 j4 y3 F3 w3 @4 `$ D LDX #$05( E; K: N( Q; p' q: q4 I9 u
LDA $70
1 j5 ^0 n/ O. n3 dPORT_WRITE:
, y( z; \5 ]3 n6 v, [: a! X" Q STA ($6E),Y
! Y; Y1 n) }$ e2 i+ l3 T8 ?" ^8 J( ~ LSR6 y, i9 ?/ K8 g& \7 e
DEX# B" L: c: a( X! h# [2 K ]6 G) K
BNE PORT_WRITE
; b% ^8 T% I" v% W/ ~, Y8 l. }2 {" A RTS( Y/ |$ e" _9 S
" N( S" h4 a( T/ O
. T9 u4 ?1 g6 v( e1 c
BANK_DATA:
3 e& _8 Z( ~4 {* U5 j5 t/ X .BYTE $00,$80,$FF,$BF,$00,$C0,$FF,$FF1 C7 v0 l( g4 A6 C, g5 M$ @8 E& m8 n
- X' |; s" U) P
1 t! w( i/ ]" g: ~: L) g8 A2 q Y0 W;[FC][最终任务mapper1转mapper4切页程序]
0 R& {4 \* Y- A6 x4 e$ V .ORG $BFD2 ;初始化跳转: s& U/ Y- w" z! a9 i
JSR $FFC0! W6 r/ D: N% k2 B
2 P$ Q r* P5 Q8 T! E% A. ?; p
& U i9 R. B; S. \$ K* `# ] .ORG $FFC0 ;切页
" g: r7 X) V# T, V" C LDA #$06. y$ ~, @" m3 K2 N' } A( a
STA $8000
9 K5 L/ e# y# J LDA #$0E: n" |, `" E7 }8 ? _
STA $8001: |: ]) c2 ]4 a' W
JSR $8000$ e" Q9 Y& |: R& n
RTS
2 S8 ?* @. l' ~6 R* U 1 ~/ f* e$ k# c& C; \3 N# u/ {2 Z
.ORG $8000 ;数据复制
, M2 q" K6 ~+ u0 a% E LDA #$80
# D6 b) R. g% y! R( | STA $A001 ;启用SRAM
( `" U1 C2 h* U, ^+ l. t$ ? PHA- o6 A9 X% T6 E( i
TXA
V7 S: M9 q# ]7 A2 Q: c( K PHA
8 L/ E2 \; E0 s) | LDX #$00' l5 [) H+ b! f& W$ J
DATACOPY: ;数据复制
4 x. z4 B( u0 a. Y LDA $8100,X
2 z/ c0 ~' V5 R' J STA $7200,X
$ E0 P1 L# Y& L n INX
& J. y& |0 a. @2 N0 m3 D5 I CPX #$00
E. _. l* O( D; [' J! H BNE DATACOPY
7 y- w8 ^+ W4 v- B0 _ PLA
! |8 g! |% R7 g TAX
9 Q+ P7 o U2 s7 T6 w# a PLA& C& A* }, C* a8 G `* u% Y
RTS7 s6 k4 J& M& A6 K9 U
: V5 ?) O! D$ e2 I$ T0 @6 _. X .ORG $CD9B ;跳转到转换的切页程序
* G$ t8 u6 `+ o3 a+ F STA $70
' l' ], C. p5 n. P5 @: V" T JSR $7200, F8 L Z0 _( P \- `
RTS
4 H e6 W3 B( y
8 Y7 f9 E6 g6 d$ f, R8 P: u0 C .ORG $73000 |0 q$ k; A* k* P$ w; a6 s( u
M1_TO_M4: ;切页程序. ?4 O$ o- T' b' I; ~8 F
CPX #$00
6 B) l) a( s: q. k2 g. Q BEQ REG_SET
: N) m. l/ B8 l4 d CPX #$017 P8 x2 r* [- _# K
BEQ PPU_BANK_0000
3 G. a5 z2 s! A+ x CPX #$02
" I% B6 _& A+ D/ I& w9 ~ BEQ PPU_BANK_1000/ Y" q3 ~9 ?9 f
CPX #$03% z1 P5 k [. b% t; i
BEQ PRG_BANK
* y# c4 h4 Y* o+ WREG_SET:
. S! q, }3 H, Z' v" V STA $A000
7 T1 m" z8 [0 g2 y& d. Q RTS2 [$ |3 Q, M+ Z* x7 N
.ORG $7320' `9 F; s, I) M e! O: u
PRG_BANK: ;PRG切页8 r. T4 Q3 l; ~* ^) k0 @
PHA
" W y/ Z$ y1 m& M; W LDA #$06. |% K q2 i: {" F% j
STA $80005 f' h* F1 [4 }) S$ @% B5 A# `6 p
PLA7 W7 t& Y) M; A3 c* X" d
ASL
' E( w6 A) X# X. N- p% o, r STA $8001/ o0 {; L* ]/ F! a2 f* k
ORA #$01: C* x8 o2 ^& ]' e4 f' W
PHA2 I0 |+ Q. a# v- a- c- C
LDA #$07. O2 W9 W3 N' z+ F: b5 E1 L' N
STA $8000
7 W4 x; P9 D, n9 i6 D8 M7 i PLA2 L' z' U; B% h. K* n
STA $8001
8 d& |; Z* H- p Q$ T RTS
`; M- ]: d. \2 S; \3 w0 A .ORG $7340
% D& S0 J, e& H9 r3 }/ K4 G8 qPPU_BANK_0000: ;精灵切页5 u5 l) J& @; i
PHA3 w* C: A4 j! N) ?
ASL
; x) x6 c9 n% S ASL% U2 [) d+ p, o! Z, H
PHA
0 i5 e, Y# P' n. \% p* Q5 e LDA #$00
) T8 A9 b1 g X7 @( N STA $8000+ p- W2 W+ d- ^6 U; @
PLA7 t. D- q# O7 e
STA $8001
7 H0 A: R3 p6 k5 K0 D0 t/ u ADC #$02( I; N. C0 C6 H' C7 i, z
PHA
. t- f$ H0 U3 w+ T! M LDA #$01. V. ^3 h L+ j4 s
STA $8000
3 t: e7 X# C" n3 h. z9 L" {& l PLA
8 z k5 n1 i1 _" f, w7 O6 [% o STA $8001. i2 [3 ~ U X1 M7 l! J
PLA
& C! W ^' [( y6 ]3 \ RTS0 Y, P2 b+ e$ ?% z, }
; T' p/ e! {, G9 t! E
.ORG $7360' b: x( `1 ^' e& C6 a- _( o3 z
PPU_BANK_1000: ;背景切页6 b- @0 K# n# a% h) U% T5 Z
PHA
) H, l0 X( O# K9 t/ S; G/ z ASL3 V0 U% ], O8 s- l5 U3 e5 Z
ASL8 K1 Z8 [4 ~# F
PHA) z3 T* I, ?; x8 A
LDA #$02
2 ]. M/ ]1 l0 s STA $8000. w0 Q+ p# G& v: Y. H% f! f
PLA+ c# \; h8 P! e! l' a6 C. V
STA $8001* D+ r8 M7 Z% S* `. l% \
ADC #$01
' O+ M* h% W$ f PHA1 m& L' g& P0 ]! |& [
LDA #$03
$ \- L8 l( J5 X+ U' h! M STA $8000
2 v( o. H; ]3 r, \ PLA
, m4 F3 H, ~3 p/ e) ?& m STA $80010 L5 u$ U$ ^( J5 @/ F: p' H" \) }
ADC #$01
- o- k+ E5 T& X; t, Z* y& w! ~ PHA5 B |* o2 n* A h9 U% n" A
LDA #$048 e: K4 h" ?2 S8 l: [" N
STA $8000
' [; e0 M8 X6 V6 }' |7 e# Q/ p PLA
9 N+ Z; o: G" k/ N/ p0 Z7 i STA $8001
) w. S2 M) g4 I6 W. C1 N ADC #$01
- Q3 x7 i! O, { PHA9 r/ G" b* H1 r4 E- @0 k3 S
LDA #$05' B! y% B$ Q" m& [- |9 d( e
STA $80002 p) Q M* p) a+ P
PLA
5 K' i; Y5 D( ^1 w! N STA $8001 n# ]' u6 |/ t' r# [# K" j4 j
PLA
5 `- y9 O1 B$ Q) v" B& r) s) R RTS
/ @( E7 U6 Z( d! d
6 N p- V) e! c2 {- m3 s |
本帖子中包含更多资源
您需要 登录 才可以下载或查看，没有账号？立即注册
×
|
IP卡
狗仔卡
发表于 2017-5-20 21:24:33
提升卡
置顶卡
变色卡
显身卡