|
|
;[FC][最终任务mapper1切页程序]
$ H* \8 e* Z# Y .ORG $CD9B
& o" k/ W% {& T# o! S0 [BANK_START:
! f! \1 t& p/ x5 t STA $70
2 T8 h3 x! L& z, O TXA
( s: C6 q! p5 W' k+ `+ | ASL
) B8 A. ^( C. S( M/ t TAX
' M3 J$ W9 G0 APORT_SET:: o- b: x7 e, X
LDA BANK_DATA,X7 L+ ~( O: T" C, l2 }& o7 F: S' p
STA $6E. ^8 L# _/ H9 i
LDA $CDB8,X
9 ]$ A1 Y. n% f l% Z* f v STA $6F8 @% v! n& o2 }$ h
LDY #$00
! ]. `% C$ U7 v7 _* F. Q0 z% @ LDX #$056 d# z$ r5 [! P. G! E. h
LDA $70) P+ E" l& m4 P3 O5 a
PORT_WRITE:
) d. n3 d3 M5 W5 g! Y$ W STA ($6E),Y
2 E3 g, v ]! G3 g/ Q2 i2 n LSR
5 [* Z0 S3 K6 g0 y; Z. U1 D DEX$ z9 J% l8 x6 g: ]
BNE PORT_WRITE
( e" R! j, V. A3 I0 R RTS! s3 N' i8 T' y/ A
! V1 X7 m# K0 |4 }3 w
1 w2 ]: X+ \ E+ Q s1 bBANK_DATA:: w3 M0 \8 V# C( q
.BYTE $00,$80,$FF,$BF,$00,$C0,$FF,$FF+ o8 R, M1 l. O y+ m9 n
0 l5 E, T4 f+ e( J" d6 M1 z
8 W3 q! P: y5 u& d9 A8 a" k9 R;[FC][最终任务mapper1转mapper4切页程序]
# N1 r1 T3 _! c! b: { .ORG $BFD2 ;初始化跳转5 f! J1 ^+ A6 T | f
JSR $FFC0
# H0 @5 Q9 ?% A, S4 E- R+ A6 _7 b
! e" d" w2 N1 W# ]& `
! i) u: w8 X: N$ Q. a3 n4 R .ORG $FFC0 ;切页
* S; p' [/ O# [ M' U LDA #$06
9 r8 n' C' x4 Q6 Y6 Q( G( S+ X STA $8000/ Z. Y& P. M; }6 R: ~6 |
LDA #$0E ]4 Y; C1 p6 X5 ]; i- g Z) x
STA $80015 T7 X( u4 R* `$ [) X8 l( a
JSR $8000
, g1 Z6 O! B9 t9 y RTS
( t* |6 L5 R5 d) l4 _5 l ) e4 C5 ]. P' Z9 C5 X+ C
.ORG $8000 ;数据复制
& r( ` T4 Y; H& @, v/ k& o LDA #$80( W$ ^1 A4 [ z2 D' y# K
STA $A001 ;启用SRAM% E0 Z# W0 C5 U: y7 @+ p" e
PHA# x+ x- c) _4 f9 J" e
TXA
% T3 `$ t& Y' H N( r, M' n3 m# D PHA
2 j* h3 U/ T6 B! y: m O: N LDX #$00/ y; j) A. ?" \5 e
DATACOPY: ;数据复制) v% `- [; a% R' D% P
LDA $8100,X! h+ w8 H- t$ w
STA $7200,X
" i. z2 n! F& a I6 G# } INX5 B' d2 b9 ?3 u! y
CPX #$00
% k; l6 V1 b/ p6 _& m: P1 D BNE DATACOPY- R2 ?$ p4 }& h' @! R% Y9 a) r: }
PLA
# a/ a. j; r' d0 I( {& f, w4 G TAX
2 v8 ^" y. }; }5 Q& V2 d$ j$ D PLA: x" d9 j0 Y9 o
RTS% V! ^- F/ F0 Q E0 c
( V3 o* T" q- v0 l/ i
.ORG $CD9B ;跳转到转换的切页程序7 Z2 p, d3 |5 P4 `& z. P' U
STA $70* {( z m" D# n$ {7 N/ B2 C
JSR $7200# s6 U$ W( U0 g: y
RTS8 [! ?7 @" d6 B+ u8 t
( D2 J i+ k( T .ORG $73001 M- A1 `& ]) i6 J0 q0 \! J
M1_TO_M4: ;切页程序
& \) n( L9 ~+ R: X1 E CPX #$00
6 D* q! A# d2 `9 M4 { BEQ REG_SET
& u! J# q. i w+ p2 a5 E CPX #$010 o, _- [3 b9 T [3 V4 P$ ?
BEQ PPU_BANK_0000
4 p; g; T' T3 O1 j( `* L% [ CPX #$02
' X7 ]/ H( {! d+ ?1 y BEQ PPU_BANK_1000# L! x1 ~1 M9 [8 [1 D2 D7 r
CPX #$03
' M( z3 `$ K# y \) Q+ X M BEQ PRG_BANK
4 ]3 h t# E( \" V, {, g; ]REG_SET:
' o4 W4 Y) O8 j, U# z STA $A000# \$ J: @7 Z* k" ]$ E3 I0 I# c) M* D
RTS3 Z* j; a w h( h! N
.ORG $7320
; `6 s8 f% w! q4 F) m7 G9 X m. hPRG_BANK: ;PRG切页
2 d) D% z6 O$ i* ^ PHA
# X5 q6 `: _" ^) }. G LDA #$06
: c: m* z) q7 L STA $8000
* [5 `$ ]5 q7 K& j7 ?& \5 r PLA
6 R% S" v5 M2 G ASL* _, C5 l/ J( A, c: N) o2 p
STA $80015 y( }# }/ Z4 g1 J R+ T# x5 P* G
ORA #$01- c$ f+ G0 ]2 C! G U) s
PHA# [. }% |7 R1 U
LDA #$07 c$ u$ J$ r- ^! x) e, m
STA $8000# N! A0 M6 Z/ o
PLA
! B8 `' \8 E. b; U4 z STA $8001
/ B/ [3 ^' v/ N/ o9 O RTS" k c3 G# Q0 Y6 d5 k. ?
.ORG $73406 T. D- x8 J2 g
PPU_BANK_0000: ;精灵切页+ t% u3 [: l) d3 ^( P
PHA! B6 \/ i, s! E- {" a* T/ r$ b1 C+ M
ASL
7 y$ T" j5 Z) a/ Q4 ]( U) A ASL
7 i9 W8 H% @+ Z% F PHA
2 Y! x; m. }/ h- Q, e LDA #$00
: c( f7 h) |9 J- m STA $80002 i& @3 g5 r3 M o a
PLA
( }" ]& U0 d9 q# v0 H* D STA $8001
$ {2 Q$ y( ^1 H4 ]- M4 F7 \) C ADC #$02
1 s d% p! T6 C# `/ i PHA' t2 q. R% H( Y0 ?$ C2 j
LDA #$01) Z" F) A* D: y M' }9 n' e
STA $8000* s& a6 B" e. H3 T
PLA
. i# j+ O: O, x2 P7 R. ~' t STA $80016 D S: e* a& w G* ?% }- D
PLA, i4 \3 ]% B* Q6 X* k& W$ _; C
RTS$ m* J& P5 o8 f
% y& \, `+ I1 P
.ORG $7360$ R( F5 o I: V4 k- t
PPU_BANK_1000: ;背景切页
: h0 V% ]- x- C' ^% D PHA2 i+ D# p% L% ?) q( Q9 \) p" g/ q$ [. l
ASL1 k3 s6 L6 g& \* I5 N y. P
ASL
8 o5 c' f2 G2 }4 J7 V8 m1 q PHA. d8 |/ i% b6 S
LDA #$02$ r( W7 b6 N' Y, t+ F
STA $8000. f! |, ~: P. H. M* }
PLA8 M+ x0 Q7 _4 r) E
STA $8001
' `" l2 ~2 ^0 n4 P3 W ADC #$017 c) t( r2 V1 @. Z
PHA/ o! X$ s5 W* E! n
LDA #$03- B l/ A* O$ r2 Y" q" O# R/ N/ l$ e
STA $8000/ C5 d% \. g) O6 x5 D
PLA
* n2 K9 ?9 t( o0 Y STA $8001& p+ A% u3 {+ K( ] `
ADC #$01* h# P+ V/ ~6 |! p
PHA
5 k6 h2 \3 _. V- R! W$ Q* K LDA #$04
$ o) O' V, X, x5 m) J STA $8000
' L0 w7 f& A' x PLA
+ e& b& j" j9 n: G Y STA $8001* K% V7 s- m) h! H2 l( V( E* f
ADC #$01& J3 C) ^3 w2 X; C3 T0 L$ Y7 @5 w
PHA
3 z3 ^) {8 K. u$ J# @$ n LDA #$056 v2 O5 ~& x2 @2 P6 W+ t5 L8 d
STA $8000
( O# L: D0 B1 d8 _ F1 n" S PLA
& Z5 X% i) k9 W) T' ~ STA $8001
. e' n3 V6 p3 b) I9 t* S: f; E PLA
3 H$ x* ?" V+ G8 I+ P4 Q5 N! F' B RTS
1 G& H+ r, v% K/ m7 j' h+ m; j2 j+ E1 z. V
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看，没有账号？立即注册
×
|
IP卡
狗仔卡
发表于 2017-5-20 21:24:33
提升卡
置顶卡
变色卡
显身卡