|
|
;[FC][最终任务mapper1切页程序]6 E, N% x c% e
.ORG $CD9B) u/ u% A# p) b: Q6 \8 p
BANK_START:
9 P, h& W! L( @) Y ^" g7 j2 ` STA $70
9 P" e7 [& ?2 u2 h TXA
3 @- O' ^* z$ S3 K! V: D ASL
' B: z J- E- [& H TAX
- m, S# Q) H& }PORT_SET:
4 E. W/ L0 b+ S$ d9 ` LDA BANK_DATA,X
5 i& k2 X) s( I" M& F1 O+ E STA $6E7 K: K: s2 H. x
LDA $CDB8,X
3 ~2 L( y0 \" e8 r2 L- i STA $6F
+ Y+ d& m/ E* ]0 s ~6 c; y LDY #$00
, h o9 { j' Y$ s LDX #$05; U |1 G6 i. s7 Q& w0 Y
LDA $70
5 k( ]% u" c3 }+ Z* d; YPORT_WRITE:
+ m' n) G% c( \/ F9 Z* M STA ($6E),Y7 l4 L# l0 b" k6 I& L, @2 B
LSR
- H& n2 M3 R/ ^* K DEX
( h8 K3 I9 h" v( q4 e& r BNE PORT_WRITE
2 ` b! ]6 n+ j! P0 ]6 G RTS% [4 |6 | a& @9 O) n
# t: R- {% W7 l, y7 d. G% Y. F
" h0 z! Z: v o* u/ i
BANK_DATA:( t, s- K4 r9 g# \; Z$ ~! n
.BYTE $00,$80,$FF,$BF,$00,$C0,$FF,$FF
& [ h2 d2 Y m- Y8 p
9 A6 P/ T5 e& N9 e ( n% t3 k2 ] d
;[FC][最终任务mapper1转mapper4切页程序]+ a/ }4 ?: {) N
.ORG $BFD2 ;初始化跳转
( a8 w0 ~% X- m# j0 Z) d! V JSR $FFC0- J# x3 j" ~4 s2 H- u
) q- H, t2 ?, {
& L. A! }- D; }2 Y .ORG $FFC0 ;切页" W2 G8 w$ C n5 B% A/ v# W
LDA #$06) k& t5 ^9 e! @: y: |+ [0 V
STA $8000
4 P( H6 c1 x8 l. F LDA #$0E
% E% L) }' E/ G" ^ STA $8001
+ c' a; u" [+ ~( P) x# S" Q JSR $8000
& b T& B1 J1 F+ q4 y9 _% ?+ N RTS - ` I; [; E; J) o
- N; _; [% t: ]- M
.ORG $8000 ;数据复制
* z7 s% y5 ]* t3 _' i LDA #$80+ v3 ]) I8 ^5 u
STA $A001 ;启用SRAM
- k% e# X; k0 j6 q8 F2 U" L! K3 b/ O' s PHA W, U u) R* ?9 J
TXA
& z$ L I- n& C G; v PHA8 d8 I5 ?9 x& c" Z4 r F6 P2 f" F7 O
LDX #$00$ Y% O- S! H4 Q' y) w" g2 U' r
DATACOPY: ;数据复制5 P1 ~4 g7 c/ D; D
LDA $8100,X+ R8 m$ W- `: h: k2 i" {
STA $7200,X O; k) S: {: I/ {! C1 n# K
INX- d- L! h( a/ n3 f% v3 b2 I
CPX #$00
8 f2 x1 Y1 @5 X! _. q/ d( O) `/ r BNE DATACOPY
" Q7 l! a3 M7 Q, L PLA
4 _: I4 g/ y8 }2 u3 M( G7 Y+ y2 q& [ TAX% x0 n u% [: V7 I
PLA
% f. f' W, \' w8 ^ RTS) `3 i4 Q% t g# U/ F: z" A
; E+ `2 N7 `$ F: y( W
.ORG $CD9B ;跳转到转换的切页程序2 _0 u: `, z( X' z& `, f; A$ [" N
STA $708 e& j& a5 F, U
JSR $7200
* P0 v" o8 N# U% g+ L RTS
. N5 d$ M: Q& x4 M6 p
4 g% W' Q9 u E7 j .ORG $73009 |1 }. [; F) V( D5 |2 `
M1_TO_M4: ;切页程序# S5 M+ Z! w% d; o% W3 S, b7 p
CPX #$005 e8 ^ k2 w) l6 [) F/ k/ l$ X$ M
BEQ REG_SET4 h" u" {: T' R' i! F+ Q p
CPX #$01/ f& d& v3 {8 F+ w& q, D+ T, Q4 }
BEQ PPU_BANK_0000
" z/ g) j3 q6 P6 T7 T( `2 U CPX #$02
# N/ ~: _/ s% S; L: W% p0 V1 p: L7 J" p BEQ PPU_BANK_1000
0 g. z: g h. I! L6 N" a1 [+ d1 o7 M% _! } CPX #$03
+ [7 l% S4 `) B) y5 l BEQ PRG_BANK' a6 c9 i# w& `9 {5 m! P
REG_SET:, b p* X5 w' F& ~. p. H& w
STA $A0000 o% Q s8 h' ?0 b% }1 y. n
RTS
|6 P* I& i( R" J .ORG $73209 n$ x+ g, R0 E6 m
PRG_BANK: ;PRG切页, B& O/ ~2 z% @) Z0 `
PHA
( U3 z* \- e- S9 L" r6 F LDA #$06
0 g- d) d8 v( @9 G/ u s) m STA $8000$ _1 I: Y+ j# k: L7 E
PLA
2 ]' T# ?( i6 W( G. }" O ASL F+ n4 b; r$ u5 c" [9 z+ a. l
STA $8001
- l% t2 z0 O; ?8 x: ?- { ORA #$01
' D9 Q9 e( Y# J7 S PHA* M) {; ?- j3 d
LDA #$07& c. j5 @2 C/ i8 G6 j) y) n
STA $8000" e/ j" S1 Q! y. D, _2 a. y V
PLA0 j, i, u; I# j* E) |
STA $8001; ]# o) ~( C3 b
RTS
6 G" x( K# C" B7 S) d7 H: R( Y4 d .ORG $7340
9 [. L& H8 b2 H4 }$ A! N3 O6 h) @3 iPPU_BANK_0000: ;精灵切页6 Z4 ]6 P: u% j! }- ~% h
PHA/ y. A9 D4 `) G5 r: Y4 z
ASL
; \5 Y M6 \4 Y" }( [' v ASL# M# e; A; Z* L# Q% ^$ F
PHA
; I) C, _6 C/ { LDA #$00
* u- j! S( z, b STA $8000, J- ?4 z) L# ]; d/ y( K4 F
PLA
+ E% G* E* x3 P1 V/ ^" B$ w X STA $8001" x" E- i5 O1 W# L& q& a' b
ADC #$02
8 \ R% K& s- }6 Q2 X7 g PHA
3 W4 l! I0 o( h) ~& X LDA #$01
, ?% p& ^3 z' u# @/ D+ j STA $8000
7 V/ W' `! z. H M1 p; n9 Q PLA8 K5 t, M, r" L
STA $8001
0 ^0 V$ F7 Z5 l. V9 E& x0 v+ c% z" }2 l PLA
4 m$ s5 I& h' d% h2 g+ a RTS9 T- }" r% P5 `& @% V& _$ e% M
1 h# b7 Y) g f8 W5 f- O .ORG $7360
% O1 g2 Z5 [, b. EPPU_BANK_1000: ;背景切页8 J4 ]' g% a9 d' J, t
PHA0 i/ q: y1 W( q- ~7 J5 J- n) U
ASL
5 b' V2 ]% f" o) i! d# R/ C' s% u ASL
' U0 K! W* J" f+ ], A$ q2 X; z7 j PHA
. L2 _6 {+ ^5 _" r( D* k% E) X0 A5 K LDA #$027 J7 c# A3 j2 q$ _
STA $80008 n( E* e$ o; P
PLA
- B: Z& n9 h7 i# |! w4 j( G8 F/ p9 @ STA $8001
+ e/ ~% \+ C1 ?. x7 B- W0 O ADC #$01
9 F. H; X" [" T, y! Z0 z PHA
* S# C6 u9 `% g! |. f/ u v! y LDA #$033 M. V$ u; S+ p( [8 r2 h! A
STA $8000
9 Q( Y! B; H7 _ PLA( n% T% ?+ A1 h7 K1 A" n' b, j
STA $8001
. Q9 w0 Z; q' g7 J ADC #$01
; e4 p( d p* y1 v PHA) q% v, w: h6 q( P3 T$ @7 \
LDA #$04
* Q0 c) d7 H+ }. W/ m6 W( b+ R- c STA $8000* M" E3 f% z. G3 s4 D5 g7 C# S9 t9 {
PLA W, e% ~2 C$ a {: m% p7 q
STA $8001
/ {0 I" e% B% T$ l) z! c7 M& a ADC #$01' \% ^" W5 T! ^% c) q4 d: K
PHA1 m: p6 O- y1 g9 E8 H3 A
LDA #$05
1 p' S6 z$ O6 e S; P! S STA $8000
9 W# y% B0 L, k5 I y# K1 f PLA
+ `' P# W) g4 @1 z4 X0 w# C, j2 H STA $80017 G, n2 b! ~; Y! {9 Q1 u
PLA
* w w% J. c4 H RTS6 m1 r( f; `$ R$ L9 {
( d2 l# L% O d0 H. o
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看，没有账号？立即注册
×
|
IP卡
狗仔卡
发表于 2017-5-20 21:24:33
提升卡
置顶卡
变色卡
显身卡