|
|
;[FC][最终任务mapper1切页程序]
* r; K, S% W1 H, q- F .ORG $CD9B, H. R/ R3 F$ j- W5 k
BANK_START:0 `& G6 J' b. i# b& f, F5 i
STA $706 D. x0 _2 q; h, B2 _' m7 v
TXA( G6 T7 B* m& T, o5 r
ASL
; k8 s5 Y1 H2 ?$ F TAX
S3 s; N$ f. x0 v/ pPORT_SET:
. i6 h$ i" Z, T( p8 V* j9 t. z3 k" B! G LDA BANK_DATA,X
0 K/ \3 P1 |; M& P X STA $6E) K+ |5 T6 ?: w8 u3 k# ]
LDA $CDB8,X9 A4 O* w1 }+ c* l9 ]
STA $6F2 B, i8 r: A- c3 S* W
LDY #$00
$ c4 {9 g) c0 l: F. O7 q! Q LDX #$05
; a; E$ w( @! ]7 S LDA $709 f/ h9 x) q8 u" M+ W( s' H
PORT_WRITE:
* d! q {9 {. c) h9 T( ` STA ($6E),Y6 P8 a m2 }( S E% X
LSR* [4 \+ x! y% T o9 _+ G' v u
DEX
- _6 z( V7 G" [, ?3 h3 Z- R2 q* { BNE PORT_WRITE" w; q' T' f8 R6 F/ Z( J
RTS# t; Q- j5 ]8 F/ M7 n
! ?( ^) q( T+ T * }! Z! j, J* `9 ^; B0 G1 k2 i" _4 R3 \
BANK_DATA:/ ^9 V7 v& K' t5 j9 u3 h5 U3 n
.BYTE $00,$80,$FF,$BF,$00,$C0,$FF,$FF0 C" N) b% p0 h
7 u/ J3 i* G3 z/ y5 f) F
2 Q7 N6 D0 G0 D;[FC][最终任务mapper1转mapper4切页程序]+ `9 m) }+ s1 t, S8 ~
.ORG $BFD2 ;初始化跳转
$ W% Z9 F- E2 d- K6 f8 @% ? JSR $FFC0; T$ n: B/ n' |( B5 I+ w9 M) m
% R# w4 P$ v# t4 i# p+ \6 O# t$ }) V
.ORG $FFC0 ;切页
b& |$ ~* L- p LDA #$06
, j! j# l- l( X3 g/ M STA $8000+ f" O5 B% \) E$ x- t4 R1 O+ D
LDA #$0E
+ F3 |( H7 s7 B: ` STA $8001; k$ `! Q( S/ w/ @
JSR $8000+ v! y- F' i# N" j( E/ ^
RTS ) a! i2 T8 B9 v% q
3 T8 @, P" A7 B( n, z! L
.ORG $8000 ;数据复制( b9 j. ~8 S* {
LDA #$80$ ]$ ]5 m* o q" R& o* K# P
STA $A001 ;启用SRAM& i8 `2 x) v4 e4 g$ |; e9 C
PHA
) ? `3 X1 m+ f/ N* t TXA
1 ]7 h! V0 P: v# N9 H PHA
- q) D) ~( O& t) m1 x3 [2 j% S LDX #$006 b; T! z( ^2 I% E4 [. P
DATACOPY: ;数据复制
" t: e6 C! y8 _1 M LDA $8100,X
7 ?# [/ N: v) N5 | STA $7200,X
- R$ F k- Z% N- K2 W8 ~5 z INX
' a) M( Y8 s1 u' x8 I CPX #$006 w f5 Y, S- a
BNE DATACOPY, |* h9 J: Q9 H
PLA9 p0 S, \; E6 J5 `3 _# r
TAX$ h+ \, o/ d0 |, B
PLA
4 Q, N+ H& s2 d RTS/ R; Y7 f: h2 y N: J% @$ q! J
) L) ~- K- p* g8 Q9 u% C4 P& A
.ORG $CD9B ;跳转到转换的切页程序
; m! T! \+ s- ^' \4 `8 N8 ^ STA $70
! f4 ^8 U# i$ G) t JSR $72000 e) g/ Q4 P0 m8 L6 D$ V9 p
RTS
) w' k$ ]* x& f6 I9 _ T8 n9 {, Y- l
: P5 L+ }$ y( F0 l$ b" I .ORG $7300
& N2 B) U2 U6 Q- F- h- [' y1 Q% Z' FM1_TO_M4: ;切页程序
]7 Z" t$ C1 r CPX #$00& l* d+ j+ q! T4 q1 s
BEQ REG_SET
Y. x6 n: j" v5 I& s/ F. A% D" w CPX #$016 C( a) r1 D S- j% Z0 a/ t1 I; {
BEQ PPU_BANK_0000
! w' R, \3 T. D# R CPX #$02
; R+ v/ F# b. F/ {! | BEQ PPU_BANK_1000# [/ G; G6 ~' H4 ^$ G6 e
CPX #$032 I2 b# k& g0 R4 a
BEQ PRG_BANK
% T+ E, H( R- v# y( kREG_SET:
6 i5 G+ X3 c# T! T* M: o0 d STA $A000
) I2 E" E# s! f1 j5 l6 L+ ]" ~. w- {# m RTS" x6 a7 s; O+ C j G0 }0 {5 ]
.ORG $7320" Y( D1 }& c. t [; M0 e! x
PRG_BANK: ;PRG切页/ b& m7 I! B$ l8 u5 n% g& g* b) q
PHA
# i5 [( v% T4 p0 F: p7 c LDA #$06" k C' s( p7 m, C
STA $8000+ M+ t2 q( A% w: S4 t
PLA R3 e: E! l% F! o6 S" @$ k
ASL
" ~5 Q) @$ Y( }9 ^: k0 ~ STA $80010 a4 k# _2 F& T8 J4 n
ORA #$01
! H% `* d; d' l PHA
! r* s. K, \$ M9 ?3 P8 ]" m LDA #$07
) x% j) `. K% J STA $80009 y1 v0 M8 d5 k+ T9 Y1 P
PLA5 e- H* P" B3 J3 R0 V5 u
STA $8001
% F# L w* _! y$ K' E RTS- a; M9 {5 n) D4 P% U
.ORG $7340
) X# {0 S; O1 @( UPPU_BANK_0000: ;精灵切页
0 z! [9 j0 x% C. r1 j PHA0 w, Y. D4 J. c/ B
ASL
4 e$ b8 K* a1 {0 h) ^ ASL
$ P9 b% S8 ]1 C2 d' }) n+ k PHA
& X0 L! F; _' O' ]$ ?" P LDA #$00/ p0 u( |6 z( C6 U: p6 X
STA $8000
! b. l0 b7 z& J& h: B) [ PLA# w g; [; `+ z9 q
STA $8001
$ w1 a) Z- w: |0 ? ADC #$02+ i F7 e4 Z6 t
PHA
) c' y# r2 b+ g9 b" ~7 `9 ` LDA #$01
; k7 w+ M9 M3 d" @8 ~ STA $80002 _& T( C+ _3 {
PLA
x8 q: c8 o6 P STA $8001$ j, i) _0 M9 n4 j- S1 O6 q
PLA
( h3 R7 P* z% _3 k( u& `- h: F RTS
2 N; e1 A, G0 G1 T3 o$ [5 D 3 ?- K8 L* V% Q# `
.ORG $7360
! t- x% C. `% Z' z% g2 g" ?PPU_BANK_1000: ;背景切页
- ?9 V0 ^. x- q* |+ e" { PHA
+ @' ]$ n3 H0 K O& W$ B b ASL' j/ ?* _4 X( F* `8 L4 @) @" @
ASL
* t' v' P) B" w/ u4 i' v0 H- j+ ? PHA
$ N0 x) Y* \; T, s' [ LDA #$02
7 l: K+ Y* E# I3 V- o" I: } STA $8000* y G0 Z0 F' l {7 ?0 @" |
PLA
: v8 B+ j4 x: D STA $8001% z6 U& c" b" R. H% i
ADC #$019 u" @! E7 m0 T( A
PHA
7 ?( Z! H- ?4 S/ _. J+ _ D LDA #$03
; V* q& z' K% u% Z [ STA $8000
- S2 `; q+ x3 B H5 u0 J PLA
, z( l( F) N3 i M3 \. p) u STA $8001* D* _! n$ x( O( V: e& s
ADC #$01
X. n: @( C2 }. v, y. j PHA- s: H8 A! u0 T
LDA #$04
; o% b, B7 W) l/ \ STA $8000
: I6 f9 Z0 @0 H. I' _6 ? PLA
/ Z$ H, e! x/ F5 N1 O. | STA $8001
* Q0 F8 U+ h) i, b8 C ADC #$01
- B6 @% g+ F3 h PHA/ G% e( F' X) N( H4 x- \* o. `
LDA #$05. U3 }% w! e* y; d: y% O' f# k, X
STA $8000
/ p0 o6 g! j1 P, W7 | PLA" K( x( |5 e& f
STA $8001* F+ Q9 |* n% r+ ]. U% Y0 K. K7 H
PLA& x# S9 @; Q8 r: s( D1 O% l1 ?
RTS
3 v' h ~8 C! D! D+ b k* T0 q! `; e$ ~3 A4 L
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看，没有账号？立即注册
×
|
IP卡
狗仔卡
发表于 2017-5-20 21:24:33
提升卡
置顶卡
变色卡
显身卡