|
|
;[FC][最终任务mapper1切页程序]' Z7 Q" g9 y; t. o z
.ORG $CD9B
9 @8 J- R! Z w- E7 r. tBANK_START:
! k" }: f9 v0 [( F9 B% b STA $70
/ T% D( Q) L# r TXA
$ o$ I. T- F! M5 |) r ASL
7 C; K. s5 K" r2 x) Z. j TAX
$ M6 H& H' i% i. o' E6 }& `, J, `PORT_SET:
& a/ h, p% B2 o$ [$ V& A: s LDA BANK_DATA,X
/ Z% D- {5 K8 S( W, T STA $6E
: E: q- T1 j8 N. N/ l LDA $CDB8,X4 [' \" \- U [
STA $6F
, U! Z4 J) z/ Y0 d6 Z" }: P LDY #$00% U: o0 Q; J3 P, b+ _2 e
LDX #$05
. z3 |2 z6 w- `8 [4 o: J; S5 O LDA $70
& o* O& j* t. V* `; I) r2 @+ \PORT_WRITE:
- a; b* R6 M* X& i, J a STA ($6E),Y
, R7 B* \0 g0 E5 h# r8 e$ t4 f LSR9 a; ]/ ?/ N) T$ z4 W
DEX3 N# p$ D$ A; C! e
BNE PORT_WRITE$ \, J1 Y8 o6 ~! x; d* r
RTS
9 E% s: D$ P z/ ] 4 z- j y* F3 k- n0 P
/ W/ L% _- A/ j ]' j5 Y: J9 A5 \BANK_DATA: e. c2 t2 }# A' }% s: r
.BYTE $00,$80,$FF,$BF,$00,$C0,$FF,$FF
2 k3 C- u, f: ^1 l
( b) E0 s: I6 r, s+ j8 c- Z
" I6 G) @5 o* _/ r9 f;[FC][最终任务mapper1转mapper4切页程序]
4 e7 [1 S, [0 v r6 w+ E .ORG $BFD2 ;初始化跳转
, A5 u, K9 s7 q5 b) m. p JSR $FFC0
0 t# T& q( w& H, f* Y
( f J2 s/ J; H; s- u6 n
) u' v" A {# F5 g+ f) o( p .ORG $FFC0 ;切页 P, l3 v8 ~3 f- ]9 f6 f* @( \
LDA #$06
: q: Y+ T/ t8 Q8 j* b7 M3 `# J STA $8000
0 m/ j* U1 q* x4 G5 u LDA #$0E
* k- s0 Y* ]% g4 w STA $80016 F# v9 h# g' m% c5 @' T+ E5 e
JSR $8000% E( @! w% D% [1 Q. w
RTS 8 [% d' a* ~! l0 q( D/ B
$ L5 R6 z: J( U7 S% e: ^
.ORG $8000 ;数据复制
& u( R( y8 _( \6 @ LDA #$80
6 I0 {2 a% S: { STA $A001 ;启用SRAM
0 g! C$ I8 n$ [+ C PHA- A" s, }3 ~8 u/ O8 e4 A
TXA
: P: ?) n& } z+ K PHA
! g8 I) B6 J4 G( Q LDX #$006 p0 ~5 C7 n7 h' \. _! U2 s- z
DATACOPY: ;数据复制8 f5 ?: v+ l# H6 z$ ]; t; v! A
LDA $8100,X
1 g2 N+ N. Y5 j) G% {% ]0 v STA $7200,X& C* ]5 r. f! q* Y! Z: W0 p
INX
$ \6 i; o* U: r! S$ N CPX #$00! N( t2 a8 K6 B; c
BNE DATACOPY
0 @6 a$ u; v$ E( Q8 r, i1 |- d; O) Q PLA1 A% O _ L5 n; w& s5 b6 F
TAX& `% u9 v4 P P# W* W' k
PLA
4 a& }, C0 z" A& d y8 T! K' E RTS
2 X5 H5 i1 A- a/ _7 U1 e1 X
) D0 Y* g- `( Z1 Y! r4 V .ORG $CD9B ;跳转到转换的切页程序$ J5 p# W3 Y4 z" W, v/ p F
STA $70& b* a( b: l e" k
JSR $72005 Q4 @5 I4 Z, }
RTS) @" I/ h4 `7 k7 r; r* @. e! M
- [4 d# w- |. Y# W .ORG $7300
?( i) ]9 v+ j) yM1_TO_M4: ;切页程序
3 O! J% S3 O( U, n CPX #$00( h& z7 M2 \& [7 c- Y! o! k9 z$ @
BEQ REG_SET; E/ H) x0 O* W7 p0 }% K& z6 A0 ? M
CPX #$01
8 c2 t3 k b7 c" R BEQ PPU_BANK_0000! @' R5 {: V; N* h( W. Z% c8 I
CPX #$02
# G* t. x* Q1 n( R1 ` BEQ PPU_BANK_1000
$ @/ a6 m; C4 B CPX #$03
6 `( m; f6 `* m" { BEQ PRG_BANK4 R- ^ |2 @3 f5 [8 @" g; \# C( L2 X
REG_SET:/ f6 j9 \1 u9 E0 o
STA $A000" `0 J* M2 h' ^+ j
RTS" C u! F' x9 j/ ~7 x2 b
.ORG $7320
) b$ D9 J/ |- [. H9 S1 ?PRG_BANK: ;PRG切页: B. V8 o- _3 k6 y# ], e; n) b3 I
PHA& b$ P$ l9 P* u9 h' A
LDA #$06$ ~1 u5 I5 d# D' O; E
STA $8000, k5 l; K6 a# ]( Y3 |' a8 r
PLA
6 O7 C5 @4 `6 z9 } ASL0 j7 m l+ {9 x) n
STA $8001) f* Q, N) c8 w8 y" s6 [
ORA #$01
: |8 s* j! @4 \. P D PHA& m& W6 `6 i( f3 A" B0 M
LDA #$079 W6 O0 f3 h) B; q% o2 {3 p! a
STA $8000
; V1 {3 @" I7 S& N# ~+ r# @ PLA
- X9 r \( z4 N+ O9 O STA $8001
, z1 s1 g1 H0 m; B9 N, x: P0 B/ Z RTS5 X* h2 a& p% A
.ORG $7340
" o' [0 E, M1 E5 G/ ], l! UPPU_BANK_0000: ;精灵切页
& D7 z" g- n$ J: T' Z PHA$ J6 d# ?$ p4 w# U, ]& n
ASL3 c; t0 }; E0 z) v: t" T
ASL
; n: f+ Z! h1 o6 E( W PHA
9 q, P3 v9 J( v% e4 s2 N LDA #$00
6 O7 W2 ?) E5 G2 G" ~ C# \ STA $8000: o# F+ [6 s4 I, B# u% Q2 Z2 Y
PLA
4 v- \2 p" X" ^ M STA $8001
; g# K4 ?# B- n) v2 p4 ]( E/ f ADC #$024 ~, ^) E1 d2 e# n4 c. z- C9 ^) X
PHA
* M; ?2 u7 h. \# I% n LDA #$01
# b/ ]5 ]) S" O8 B, o% m2 l4 v5 l STA $8000
1 u G8 u3 s+ F4 S# i PLA+ J1 Q3 k% J2 c$ n& w- Q# X: n4 K! D
STA $80012 h) A/ g2 R& {! R
PLA( J$ b! ~" @# N, k
RTS
0 P a w) S6 G2 I3 ?
; s3 t' `6 E+ N C .ORG $7360$ J( b% [3 l1 Q8 t4 |8 n
PPU_BANK_1000: ;背景切页
0 }& O3 N+ ^4 W& ` PHA+ v6 W, y& v8 W9 t7 R
ASL
3 z2 T$ E- k8 o0 A ASL
) D3 R- j3 E, x5 R2 g) v3 U4 p; R( W PHA2 }. w0 b1 ^2 l- H8 M# V4 f/ I
LDA #$02) b5 O, T; v/ f& d7 p1 l. m
STA $8000
1 d1 N8 [3 s* {4 ]$ z! z PLA: c$ F( ?/ w7 X1 [
STA $8001
" J9 N/ r+ B, H* g% |1 J' Q5 P( B G ADC #$01% \1 ?/ B) S6 i2 N
PHA
6 j5 Y" J" @! i" { LDA #$03' s; M5 z/ W, ]
STA $8000) E% c! s: Q& W8 I' H, t
PLA
2 n# l6 a8 ~0 x4 N3 _0 F STA $8001
- X/ R- P7 I1 a" n8 i4 G7 F( A6 B ADC #$01. d P& I8 q0 c$ A2 ?
PHA
# ~) ]" B9 B+ `8 y/ z* k" ? LDA #$04: b4 S; I4 D* N6 _0 x
STA $8000. @7 X6 c' N/ S1 V7 U0 W0 \
PLA h! G9 J" Z; k* c% g" G, J+ R
STA $8001
7 A: X9 j8 V! p; A6 x X ADC #$01
( ?) e. b) l9 t! R# ^ PHA
0 W, d0 B2 y2 p LDA #$05
8 l/ m" j' N7 P T8 p7 ] STA $8000; ?- Q% j: q) _- `
PLA
; [$ `, ^# k4 O L' M6 W STA $80017 t3 d) W7 k+ c e4 \, r) T
PLA
# x( @! T' G1 J RTS! E) E( s, [1 A6 X; o: D
9 P* w0 \# G: U; b- ? |
本帖子中包含更多资源
您需要 登录 才可以下载或查看，没有账号？立即注册
×
|
IP卡
狗仔卡
发表于 2017-5-20 21:24:33
提升卡
置顶卡
变色卡
显身卡