|
|
;[FC][最终任务mapper1切页程序]
( X4 E a8 {! b' e6 q: R J- P0 T) q .ORG $CD9B, H% o0 Z+ F! y% p
BANK_START:
4 v2 x E, X* w STA $70! Y7 z9 J$ z4 \2 J% C% e
TXA3 H. N0 T- g9 f
ASL
( d' c! Z0 z3 t TAX
. @! D/ e7 ?) V f4 F: ZPORT_SET:0 A1 ` T1 Y8 _! \" W! Q) R) g
LDA BANK_DATA,X) ?) i4 k6 g7 I5 ]/ h
STA $6E
5 P& Y. q; K; L- A* `0 c LDA $CDB8,X
5 q8 ~( q3 ]; L+ p; N; x4 e1 j9 | STA $6F" Z5 E& s3 f) y2 `4 @
LDY #$00
( ^8 y2 Z1 E; b$ O LDX #$05. ^- |& T3 v" u9 i" A
LDA $70
{# @, l7 X7 w+ S8 T7 A8 \PORT_WRITE:) ]+ x' b* ^' B1 D) S$ x
STA ($6E),Y
9 u4 k5 T0 k% V. t7 | LSR* @% C% b! o3 p. k. Q1 R5 _$ _% a
DEX
& r7 E. A- a, t E A: N5 c BNE PORT_WRITE
0 H6 H9 |+ v( s) R# { RTS
+ F: ?: y+ r/ h# Z6 M
9 Z. C: P+ j% p
8 e4 E1 {' P% D# [4 G9 eBANK_DATA:# U3 ^3 P/ \! K* q9 L* K2 E9 z' O
.BYTE $00,$80,$FF,$BF,$00,$C0,$FF,$FF( v+ b& h; {7 d# u* i Y j
0 `: f% M; g8 H* H* e
8 Z, x! Y8 I( I3 s8 `;[FC][最终任务mapper1转mapper4切页程序]- K5 v6 ]. W8 A0 [
.ORG $BFD2 ;初始化跳转" c! S. K2 L- T3 u" u( x0 V
JSR $FFC0- O8 V+ P* }8 U2 U
/ t- D b- ~" A6 C) X( v" ]
# r8 Y& {6 k0 S6 X6 Z, W- z$ n .ORG $FFC0 ;切页# b4 Q0 s2 S( @3 D* t
LDA #$06
& I: [! n- T, f" |- G9 M STA $8000
6 i5 R) @- @/ M9 J LDA #$0E8 m8 c' U8 }+ d. R% X
STA $8001
0 o: \' R7 ~; R m! w b5 n JSR $8000* N. m- |. ]. W% G( E
RTS " i5 J9 b' N5 a! T% b
1 {* W( g2 |, j, a8 g% F' z
.ORG $8000 ;数据复制( v! o: Y* U; o8 A5 T
LDA #$80
6 e+ m/ ~) K( J; i STA $A001 ;启用SRAM2 y) d' G, p* m; E+ |) N) [
PHA5 o" G2 D/ J/ t& h$ x2 l- X* w0 h" a
TXA. `2 w9 t! {) C# W2 L6 }2 [+ ~
PHA. `1 D& J8 `3 _2 e& e
LDX #$003 s; G+ N7 r N7 q" F- s6 v
DATACOPY: ;数据复制7 p6 M$ w# G- [ W
LDA $8100,X8 Y+ C7 l9 W+ _. w
STA $7200,X
# d3 d+ P9 Q/ B k3 k2 i INX
# a7 e: d# n% b- ~ CPX #$00
7 l; ~9 j$ c) Y; j$ I6 w6 a! ^ BNE DATACOPY
+ t v, I1 |. I) g+ r# t$ ^; Z PLA9 O) z) b# H! {) E: m' _ @
TAX
5 x. X8 I+ ?1 e, ] PLA% _1 O+ ?. Q# z K
RTS* z$ }0 s- w6 a7 E% M
: c2 u) ^. F+ ?+ [( Z8 Y
.ORG $CD9B ;跳转到转换的切页程序& @' Q \2 T* {
STA $70% D' ~ @5 m. [
JSR $7200
5 `& E/ R5 p. E1 f* c2 A; A% p RTS
7 L% Y0 v1 K/ d9 n
, \) D1 k7 b. P1 e; i: V5 t! Z& j .ORG $7300
) M G! c" ]( l$ X4 H! wM1_TO_M4: ;切页程序" e7 y! o2 j5 ?- M/ P, G
CPX #$00. s% A, n: ^+ `9 n, v% @0 }
BEQ REG_SET: v7 J }! s+ N
CPX #$01
2 h% \) e& E0 D. Z; t- r BEQ PPU_BANK_0000
. f* `2 j; k ?% X CPX #$02
0 U, _# E9 n2 t& t* F$ g- _ BEQ PPU_BANK_10006 a" C9 d6 j5 j3 n0 c
CPX #$03/ ?( t9 P! S( @1 F7 E9 i" h
BEQ PRG_BANK) E) g8 n' i' G2 c
REG_SET:9 r/ @# e# Y3 a. Q
STA $A0009 V5 E m+ X2 V
RTS
o8 p$ |; g9 g8 d9 d .ORG $7320- ?0 H" q1 ^/ N& u" n' z
PRG_BANK: ;PRG切页
/ z6 \3 l0 ?3 F/ {/ B* X' M+ l PHA1 F2 p2 y2 d( E5 r$ n% b) i6 h
LDA #$06
+ p- o G! l9 J6 _+ d- v STA $8000! ?, ]- z( e' y) J% @
PLA
) Y0 u2 u* O/ q4 \0 G ASL
5 T( @8 P4 Y0 K6 q# w, o9 Q$ W: V( O- A STA $8001
9 Y& q6 J/ C! ~3 A( V ORA #$01
' N0 _2 I( `2 I/ i3 Q; R( c PHA% i) i6 ?1 f/ Q9 t. F- f
LDA #$07
" w$ ], c ~ }: c3 O6 H7 p: P STA $8000
4 F* G: _/ M7 n0 t0 w PLA
% |, o9 T8 D- `1 q7 ]9 [ STA $8001/ @! D/ F. C2 [
RTS
6 Q$ l; V- i. [& I4 r8 ] .ORG $7340
% R! q8 B6 x' x6 a' V+ q5 hPPU_BANK_0000: ;精灵切页
, O( B6 s% h% B4 C0 r PHA
& R5 l# W1 ?; t# v ASL
0 B( b7 v8 R% V. z7 t ASL1 Q# W, c0 x( ]* H
PHA# a, Y. }/ Y* j
LDA #$00
2 x+ K% s" I) Z STA $8000
$ ]8 t* {6 s _- e8 i5 [ PLA( p2 z$ ?: w8 \$ \% q1 b( T
STA $8001# ]7 i3 I# M3 Y" R: e' m
ADC #$02) n0 N6 L1 n) |+ ?6 G$ }: H, S
PHA
$ D$ X% ~% ?4 h# N+ G" t8 L. R# w! b LDA #$01
8 ]* N9 |# T1 I, g5 P STA $8000
. j& H% D! E$ n PLA
6 I2 q7 s1 ]4 |+ w; g/ L# I STA $8001) U2 h: v/ ~4 N5 z, a1 y0 t' p2 t
PLA
/ q) e# m0 W% |: n U- W RTS+ e; q7 _6 u1 o) ~$ ~' z
, ?2 f9 K x1 i, A* V
.ORG $73608 g% o: j$ x( |
PPU_BANK_1000: ;背景切页" h: R2 v( Q. C$ J2 Q( m
PHA
- t! K% M$ g% Z, x ASL
; U) d7 k" e) s5 t( H* c ASL
1 C2 ?4 U5 E9 F& h/ S PHA
) U! o" L5 T+ o2 S, ?+ F% t LDA #$02
p/ c1 v, X1 u" U4 U, J: @3 E STA $80001 ]3 ?2 ]! h0 y2 |
PLA
0 R7 o2 j) H i7 { STA $8001# D5 y4 m3 C0 D; b9 h# a' m
ADC #$019 E, [2 x3 `6 B5 V
PHA2 N( j, J4 k7 ^/ P* h- }( ~
LDA #$03
' ]/ p0 a8 ~# J6 C$ W' q: i6 @7 @ STA $8000* ?; O8 a5 S! T8 t' ]* x: q1 k
PLA# Z+ \! Y7 n6 ~3 h
STA $80011 v: S9 z) l- b4 ^ ^: ~; n1 w/ N
ADC #$01
8 z& p. |2 X3 J5 r' N PHA* g% j J) ^+ n* d. _
LDA #$043 J5 q0 c2 q6 T5 u8 i
STA $8000
' W1 J& V. c8 q% W+ x PLA
* x$ {8 o0 H+ V' f STA $8001
# T8 y% |7 b1 K ADC #$01
: n. n- ]3 o% u6 m4 A7 t PHA
0 V# q- y, x) ` LDA #$05$ d5 ]* s; C- v# Z Z
STA $8000
9 \5 @* V `- a8 _$ X0 b PLA- P+ U" `9 I- E( n3 R. t; `
STA $8001
! r, x4 W1 Q0 o' |% }+ o8 d PLA0 N; L* s5 k! R. |6 t
RTS y: X8 D8 g# O: u. J) J$ n0 ]
: p: l" i& o& F% P0 P2 A
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看，没有账号？立即注册
×
|
IP卡
狗仔卡
发表于 2017-5-20 21:24:33
提升卡
置顶卡
变色卡
显身卡