|
|
;[FC][最终任务mapper1切页程序]- e1 d; R* c: c8 K b! E
.ORG $CD9B
4 o2 C+ o! L! V2 d; N* K, |BANK_START:
- k. P0 v$ T S STA $70
' C# X0 R7 ?# A6 q TXA" {1 r% x$ K( w/ H5 H2 Y( Y
ASL$ P. d& ?/ S, q0 |9 [% [
TAX. ^) F( j) u5 K, @3 k7 m
PORT_SET:
& Y, Y4 W& N4 N- B; T- j( d LDA BANK_DATA,X
4 b3 C6 G' P# ?' u2 R! g3 D STA $6E5 k7 o$ l& k9 v) N" k; I2 [
LDA $CDB8,X
) _! |5 b D3 u STA $6F: } M7 N ?; @( @/ {
LDY #$001 x1 @7 m7 v" l3 z: W3 Q
LDX #$056 S- A- X1 D5 V$ ~) w8 G
LDA $70
: _! p1 ~1 ^. b7 G' _( z& jPORT_WRITE:- P0 k+ |& L! F7 `7 _; n
STA ($6E),Y2 J6 e( k# D$ u3 |3 J
LSR% w" c D: g5 f$ t/ `- h
DEX! Q6 p8 i: o; U& k. G; U1 |
BNE PORT_WRITE) G% L$ `- _/ R
RTS
0 G5 G4 W3 p; q* ~) @0 Z" U
1 y* E" h ~: T& M u$ f- c
1 f! A8 O% U3 @$ c; G9 F CBANK_DATA:
! D# v6 g$ K$ \! ?5 m- X .BYTE $00,$80,$FF,$BF,$00,$C0,$FF,$FF
6 _7 K8 g' Q. L' k3 D6 Y" o
& V6 Z5 I- M1 c( U8 G0 p! e4 n8 b ( v- C# T! j0 O7 I) L
;[FC][最终任务mapper1转mapper4切页程序]
0 L6 O ?+ R" f! Z5 `$ ^9 p; n .ORG $BFD2 ;初始化跳转6 W6 `4 {8 n; T5 B: e
JSR $FFC0
_7 u8 P+ N. B3 B% j& I+ @2 N, C g8 O8 Z' l" @
: S- s$ C4 f* F i9 m: { B .ORG $FFC0 ;切页- ]6 I% h( M6 L: Y& o* i; X
LDA #$06% ~4 C9 D7 |8 O: |
STA $8000
) C; `1 _( o0 r( ` LDA #$0E
: x% ^* i [* F8 g' R8 [& @4 f: J STA $8001& | Y- G& |" V ]6 D
JSR $8000. I+ a+ ?9 ?, X$ Y4 m2 x4 S# U
RTS ( q% _ E& L+ y! c7 Q6 K
K: `/ N$ ]/ B
.ORG $8000 ;数据复制- z. u3 h! C$ w$ I+ B" _- @& r
LDA #$801 j/ w4 \. K H# a
STA $A001 ;启用SRAM! v7 |8 E7 e8 Z. o
PHA$ A# O8 m: {: M2 i( E% [
TXA+ |- S% i4 [3 R/ z) w: B* e
PHA
! j K( z# F( N! e3 l. a1 X9 W- \0 a LDX #$00' M% ?, [, [- b, T$ X$ I
DATACOPY: ;数据复制
# `' z6 F+ a- w+ c% j: j LDA $8100,X' |8 k' T. a, _) T
STA $7200,X
$ p2 y2 }/ F( B+ | INX
! W8 Y3 B* G6 m3 t- \ b8 m CPX #$007 S5 E+ ~% b _' c0 o
BNE DATACOPY# a) Z5 x) a4 A
PLA
; O# I; X: m* [% t4 C3 S8 j5 j0 k. i1 ? TAX
# r9 \ ?( C$ J2 c PLA
; c. A! S! s1 Q, r RTS
! {" x4 {# [* O7 O1 l: T
$ K) a# h- [ k9 } .ORG $CD9B ;跳转到转换的切页程序
/ P7 |6 H$ X- D! V- n' f) B. Y STA $70
, J( ?8 k2 C- Y- {0 t JSR $7200
/ _% e5 J! h8 l) t RTS
5 ] U! @+ E7 P* D2 W8 i t$ A. W . k' l; A6 A" h! l7 _( m/ p
.ORG $7300" O# V s2 C8 u0 L+ R
M1_TO_M4: ;切页程序
8 \ f9 ]; a( O" g CPX #$00% b9 b# x- e! m$ C, i; a
BEQ REG_SET, j( o, s9 K7 y, W) P8 }# V
CPX #$01" Z, h( L) q- A$ f { v0 R2 c' i
BEQ PPU_BANK_0000
" |: J P. a0 ` p. T4 K; C6 a. J0 o CPX #$02
* p' _# B# G9 e' H# M5 I* R9 n# F BEQ PPU_BANK_1000$ B" z4 d+ j9 h* I# A! X' U
CPX #$033 Y$ K* x# R; X+ S8 a; N
BEQ PRG_BANK9 J0 x" i; Y/ D3 `# j0 }2 D
REG_SET:& x# c+ e4 `8 `2 ~
STA $A000
9 H' u/ w( `3 {8 h2 ]/ E/ _ RTS/ x3 f$ t9 w, J
.ORG $7320
9 |) p Q- I7 e. v! D5 ^PRG_BANK: ;PRG切页; j* D% l# z, `' ~$ G9 ]" N0 ?2 Z/ y
PHA2 Y9 g( V5 S3 k5 g
LDA #$062 e: o- M0 }2 Q t. ^8 l
STA $8000
, d' J2 ~$ E& M# M j, [ PLA
: F8 g2 A) O3 A/ |2 U ASL
2 n- |0 i: `; m$ ?1 s" {6 | STA $8001
V, w1 ^$ q$ H0 @ ORA #$01
! T! ^( q9 ]2 z6 f1 j! a* m' k% d PHA1 s7 n" a! v, U) a, [0 J
LDA #$07
2 H, ~7 `; \& w& U STA $80004 } _/ W7 ^/ b( c! O
PLA
2 u, N( u( T% B8 q STA $8001, g$ E; {6 E4 w" t2 |0 F/ U2 E6 r
RTS
7 q$ Z( J% l( w# Z8 E0 Y1 f8 X6 A .ORG $7340
: v; ~" h- R2 C: f2 P R3 r# \PPU_BANK_0000: ;精灵切页
2 x1 W# S) h, |1 K; _ PHA, F" }' w" j7 B! X
ASL
! U$ {0 b3 a; F h ASL; k: {' A! D, Y. J0 X8 I0 J8 \
PHA
0 k% o: ~; K7 w1 ?" m8 D LDA #$004 k B6 O, y$ L* U4 s, I5 X& g2 l
STA $8000
5 s* K/ M, f" J2 L8 K8 f+ X" S. \ PLA- C! H) t0 J P$ V
STA $8001
$ n3 x* P( ]! y( k& O: `' C ADC #$02, T* g/ P% H, k8 j8 ]$ A4 L
PHA
. L9 Z0 q) h: K$ @$ y8 N LDA #$013 s0 t7 n& K8 i9 i7 s4 b8 V
STA $8000
, J4 J' j7 Q' [. `3 j O) p PLA
0 k! V, o4 T2 [( w: T STA $8001
* R2 M, k, |; z9 v) D, [ PLA
, ~; O1 ]- V r: g1 E9 r | RTS
! R; o# \! m& W' X, J . \: g1 S4 o! W/ O
.ORG $7360
& F6 S& h' L" b C2 v5 Q' HPPU_BANK_1000: ;背景切页
4 ?* R5 O: _8 f% q9 L) G$ t% k PHA
9 @- V1 Z% [& H$ r' Y& \ ASL; t2 ^$ V4 H+ ]! c* `& f
ASL$ D7 M+ n& l7 K- d/ V
PHA
' B! v6 F5 s5 E LDA #$02
. j2 c3 N- V, J# _9 Y7 d. t STA $8000
5 k/ T. j8 w0 j+ V% a( M' T PLA
A2 M# a, p' p4 a @8 m STA $80010 R S+ J) j% q1 @4 ?& B# x
ADC #$01
. p) m% i% s8 M, _ PHA
) B6 k8 R/ T1 E8 T LDA #$03( g, Y c8 d* r- R; y0 H' B0 X6 [
STA $8000
( H1 ~3 l. \, U+ d H PLA2 t. B! @. p) T( d
STA $8001/ k- V/ c0 s2 F7 H, y' g8 o
ADC #$011 o$ X$ P- Q2 l7 [, g* t
PHA. F' i& c* s7 w6 W' f9 l$ U
LDA #$04
+ f$ U0 E9 t) ?1 e% J* u# z STA $8000( z& g% N8 ?' B/ M1 H: ]) I$ h6 }
PLA
6 d. [+ O7 e) Q( T! f( p, @. D STA $8001
7 R9 u, J C z, o$ f5 c }" e ADC #$011 b! p- b9 G3 e
PHA
# B- `' f( d, z: P+ }7 ` LDA #$05
( k: S' [0 \9 M4 {" {4 X STA $8000* T C1 m% Q* s) L8 p
PLA
# {( m4 O" u3 b: @5 i STA $8001. a' e# z d3 h
PLA
# t5 A- H' t7 P6 H RTS: G5 e- g( J+ q
. Y0 a" Y8 m% c! m& D5 J* [7 E4 H
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看，没有账号？立即注册
×
|
IP卡
狗仔卡
发表于 2017-5-20 21:24:33
提升卡
置顶卡
变色卡
显身卡