|
|
;[FC][最终任务mapper1切页程序]
, s! s' v% O8 f6 V/ ~ .ORG $CD9B
8 K8 @; D' s# O ~7 d5 I9 W9 k3 {# l# TBANK_START:
; Q' F6 L( ~! B6 a* u: ^; @ STA $70
: y4 \9 S2 O* s TXA! `# n i. R& v$ b; p
ASL
& i2 S9 A* |8 H U; O TAX6 ]0 e6 F8 T+ g: M( V! E
PORT_SET:
0 v! `/ c5 m% F# U" ~8 ]9 q LDA BANK_DATA,X
# H2 x( r+ t( b- [! O' r5 Y# O STA $6E9 K s+ ~6 z5 ~+ J+ n. T
LDA $CDB8,X$ D7 w& B X) U5 |
STA $6F
0 [ n# F- H; K5 P6 E Q, R$ s LDY #$008 [9 a) F6 W- t* h8 `* `
LDX #$054 v6 m! v- D5 L! W" V% _
LDA $70, K4 @* X2 J8 ?4 ?4 ]
PORT_WRITE:
3 M2 P5 n, ]; P! A! V B STA ($6E),Y3 K+ B/ W3 A7 n
LSR' [: Y. I) }0 i% U& s U& m
DEX
% E* X+ ^. B0 D$ V BNE PORT_WRITE0 s3 z( I8 T" ~9 s
RTS `/ u* B0 P5 O' x) m8 {" Y
0 C0 I- R* p! Z6 {( P4 b
! J: Q2 Y8 m1 A; UBANK_DATA:8 h8 }: E7 y! `( j
.BYTE $00,$80,$FF,$BF,$00,$C0,$FF,$FF$ v# B) n: t) M/ r4 p
1 L' \& E: c" C4 t' ?) f* G9 ^0 \
7 x" p& S6 r2 u6 n# w& k( ^6 N;[FC][最终任务mapper1转mapper4切页程序]0 `8 y! K, S! {
.ORG $BFD2 ;初始化跳转1 Z6 i% {8 `1 y5 U! M2 C, K
JSR $FFC0: r4 t2 S( h. b( ]
7 [6 X( T% R( N3 C: {
' m6 e4 c- E( p p$ H
.ORG $FFC0 ;切页) g2 z$ E+ S J
LDA #$06
- g- ^8 q' S* n7 }" r( o STA $8000
4 q7 B h K: ?5 F) K7 K LDA #$0E' @5 q7 V( f% b! n
STA $8001& x: c% ]3 \8 Z1 h2 G
JSR $8000
: ~4 `' |4 Q4 y: Y; H$ d- C1 ` RTS 1 l7 P1 [" q. @. d0 [
* O) a/ T( U, f1 s .ORG $8000 ;数据复制( c6 W3 G! |8 @+ H3 b8 ^8 U! N4 C
LDA #$802 p, d" i/ f& F) c
STA $A001 ;启用SRAM
. I% e, _: B2 f7 q6 T) j: K PHA. {3 T# ]- h) G- n
TXA
: g, A* _% M/ R PHA
1 g; o2 X) u9 |* W, q: d$ b LDX #$001 ]. u" ?% E& R) ?9 m8 Q, N
DATACOPY: ;数据复制
% X, ]$ Z6 O6 _3 Z D* h3 { LDA $8100,X d5 t( c- V! \/ Q4 ]
STA $7200,X
( r, C# Y6 A+ Q" ~6 f3 H& ^3 o+ x INX6 J( f- ~1 Q% M
CPX #$00
0 [$ R1 N M) F5 [ BNE DATACOPY
/ }- v- N8 f0 S. }" j4 A$ a/ f PLA
* ]- { |; A- O TAX
) V( i3 l" Z5 x3 R6 f PLA
. ], X# C) |) Z _8 z5 A7 K RTS
- Y/ s! w; k( y3 W, p5 | * `: F* }, x5 Q2 g2 n
.ORG $CD9B ;跳转到转换的切页程序
. `5 m6 P: A* P- Q9 X STA $70
; L; |0 [0 n' \& ?# r, k JSR $7200
2 K" F: u" H4 X! D0 z) p Q1 | RTS
( I2 {) A( B: U, J
$ ^3 m/ t% L% P ^) [ .ORG $73009 _% ]& s1 q$ }& x3 p, [
M1_TO_M4: ;切页程序
1 T- T/ N, X# D1 n# U8 ~ CPX #$00* S5 Q- i( W# J+ G# F( e
BEQ REG_SET8 f/ ^1 n- y m+ N7 o( L' J
CPX #$01
4 j2 M1 R+ ~9 {, x. m BEQ PPU_BANK_0000
$ W. l, ?6 G: h' P1 K' ~3 X' D CPX #$027 a4 u: y& e; @
BEQ PPU_BANK_1000
. }% Q8 S/ C- W0 g6 H$ F CPX #$03
& A) j. Z) E" I/ Q BEQ PRG_BANK
7 O9 X! Z. u5 C) ^( h5 OREG_SET:0 @* T7 W0 m6 H6 ?, [; y
STA $A000
# i# @0 x. n" Y; ?$ t RTS3 _$ p- M* v$ ?/ l$ _$ p* q1 x6 v
.ORG $7320
, W6 G8 k2 R/ k2 \" w0 o, F, s8 \PRG_BANK: ;PRG切页
+ g1 j; t2 y' ~% o+ j$ `4 ?( ] PHA
- n& V9 l ^7 s9 l LDA #$06, W7 y7 R! s& W8 [2 F2 D
STA $8000
9 @1 S/ X- _" X3 O$ L! E PLA& l8 D: N/ I$ t4 B) i
ASL8 A& S) C# S$ L) F
STA $80017 L& e# P( _& u, g6 o% [+ D
ORA #$01. P7 \( a g* l; k0 z( j/ a
PHA
# P8 U) n+ R9 Y% y8 ~ LDA #$07
0 |# R; H1 K: M: ~$ C3 c" f4 ]& I STA $8000 ^% `- f+ X0 o$ q( I/ x9 \' J; v
PLA
( P9 ]& n5 l3 v, n STA $8001
$ ^7 s: V0 M( o( Q RTS, R1 l) L( [2 ?2 H, _. b7 w8 Z
.ORG $7340
H; o2 d, A5 c8 g: [( X# e7 RPPU_BANK_0000: ;精灵切页, g( U/ a( \' Y8 e6 m+ D
PHA
, v2 O3 Z% D6 W3 a" D, u- a ASL2 |# D1 g" Y) G$ u) z) g7 W5 a
ASL
$ [! ] f+ R1 z0 m# w- |5 [, W2 @: t+ W PHA
0 s- }6 N" S2 [% T! k' ~ LDA #$00
) G) n; p3 V F" o1 j+ R- _ STA $80003 B$ g7 q9 n& |3 c
PLA
( n' t/ f' S6 t7 w8 h STA $8001
0 {3 b4 N6 I$ D4 P' Q1 ? | ADC #$02 ~. _- |' v2 h& a1 ~ t( v
PHA
F0 W% ]5 q0 ~ LDA #$018 v1 Z e! _4 `5 w+ X
STA $80006 S1 P! }8 k* E! M( h
PLA4 T3 M) u1 A; s; i( z
STA $8001
/ U$ O# z/ H- X# w PLA2 s0 C# p: y7 S! @% X
RTS' o9 E) P. ~- A l! n. Z0 a
% b' e4 S4 |2 A .ORG $7360
; Q/ [3 i) t8 g& h2 l! {' jPPU_BANK_1000: ;背景切页
& z- M$ f5 a( d" }) l" F; K PHA
. H' _3 e0 Q, Y @9 d, ?. } ASL
* I0 m! ]& J4 q- J ASL
: d. D- N. T. ~& |4 | PHA3 I% ]! r' {" L; n
LDA #$02. C4 }: h2 q7 j6 e% I# N2 R
STA $8000* k1 S0 z E G+ `, s# ]
PLA. e) z- Q# x" Z7 y( K0 r* i* P
STA $8001( j, J6 C- O; |; l/ H) e0 k
ADC #$01: _; e4 K- g; u+ S" J2 p
PHA1 l/ w! M8 p8 ]' {. _
LDA #$03
4 F( j {3 T% `) q STA $8000
2 L6 k! s5 J! t1 j PLA
5 u3 g0 O+ `5 F+ G6 r STA $8001% e" p# B( f3 D% f+ H8 b
ADC #$01
. P3 z" y" f$ `0 a/ g1 e- o( f PHA
* f) L* S* w" q% p4 c0 k LDA #$04
2 C; Y6 g, A- D9 I- X% F$ V STA $8000
% V( Y+ ^* H1 j; }+ p/ S PLA
3 S7 C4 S- q& i7 S; o1 g2 ? STA $8001
N% b- s. p% _' a( W% T ADC #$01
: W8 Q+ U. T: P" U3 L7 B1 j PHA
* y+ `9 J. Q! _( K( y- I LDA #$05
% d% ~/ Y- B6 f# Z1 v. }. s STA $8000
3 p9 S4 P8 e2 r0 i" P9 @ PLA
! r& C3 g' V: J0 }- k6 t: t# } STA $80012 d* i& y3 x6 ^9 R7 Q, j- g
PLA
6 @& h- ~4 d H: F. h% I' U RTS
/ _# c) G5 S* g* \
+ l5 A' k) Y) c |
本帖子中包含更多资源
您需要 登录 才可以下载或查看，没有账号？立即注册
×
|
IP卡
狗仔卡
发表于 2017-5-20 21:24:33
提升卡
置顶卡
变色卡
显身卡