|
|
;[FC][最终任务mapper1切页程序]
! J% Z1 R" I6 X2 d* }: M6 D% R9 P9 ` .ORG $CD9B
" ]" }0 a, U2 e# BBANK_START:
. O% ~ A. {6 l1 N; t STA $70
# n1 X! q/ x7 o$ \$ l9 D0 _ TXA
0 f8 N! K- o1 z ASL
, I* I( p+ J3 [2 e% o TAX
$ i+ h6 V0 ]6 CPORT_SET:- G" _3 r0 Z0 f: ~; [
LDA BANK_DATA,X
6 G$ Y* W0 `# J5 e5 t3 t" @ STA $6E( a0 a$ j: v$ d; d3 ~
LDA $CDB8,X
% v% ^+ x/ J- V$ n STA $6F. R& _ q; X6 P5 x1 s; I6 O7 n4 W1 C
LDY #$00
: e2 d/ o. b% o) P( K LDX #$05
% [2 J: V9 T% }/ n- S* v) n: [ LDA $70' P& X( [& u- z* r# n# b
PORT_WRITE:9 W {% i% g8 \! O) J6 t! {$ i/ z
STA ($6E),Y: G7 @/ c8 a, i
LSR
+ h; D ?* Z6 k DEX- K/ }, e: ~# U5 B) }9 l* z
BNE PORT_WRITE! K2 G Y8 t" O' \5 O# o
RTS
' m- f4 Q0 x" S8 z3 C$ P0 u' r0 x- L
1 F# U; j6 G7 i1 S4 h
' a& r7 m- [" ~, C! iBANK_DATA:
% O L2 v, k$ T .BYTE $00,$80,$FF,$BF,$00,$C0,$FF,$FF5 I j4 Q1 M: D1 j% A7 y/ I6 f4 e8 H. e
" E, {' i5 p/ d; v" B0 o) \2 V
/ X" k3 o+ d- r+ L8 L% j4 [$ E
;[FC][最终任务mapper1转mapper4切页程序]1 |4 M V: H1 P( J2 S
.ORG $BFD2 ;初始化跳转) X2 D) y8 i0 _& K: J
JSR $FFC0
- g+ c7 O- C" P! ^7 B
7 B3 m" Q3 M: {4 h8 [: {' g" F' }1 q, M( D) `2 l
.ORG $FFC0 ;切页
" ?( w5 I% K- l& e/ c" C4 y; B LDA #$06
5 o* w4 |5 \$ T& r5 o g& f STA $8000
; T9 [$ g0 y: y# u! U" M LDA #$0E
# n6 {7 Z+ d4 {: v$ L1 K% S5 V STA $8001
6 v2 j# k# f$ ^& U/ `% A5 M! Q, D) t JSR $8000
6 z& f! T$ c0 n1 [) z) v# V4 C3 ? RTS
1 y) X3 D( I: a5 }; p+ m 6 B }+ H0 C# h
.ORG $8000 ;数据复制$ T2 a; Q$ Z# \- m1 \0 H
LDA #$80
- F% h$ S! _$ T1 H' ?! u( X STA $A001 ;启用SRAM# x' q" y6 t9 X. ?9 ~$ A8 ]
PHA
/ L9 s0 G& a/ j$ Z1 a9 l5 \ TXA
& P: E3 P8 A0 d" z PHA
H" g1 C) l1 v( p3 ~1 Y! u5 H LDX #$00
1 H6 w9 f T3 L- g7 q: J6 bDATACOPY: ;数据复制3 o; U* D2 [6 u2 ]/ {
LDA $8100,X
1 d5 t3 z* e1 [; \ STA $7200,X
/ G+ c9 ?! H: u5 J1 I INX' e: {: x, P' W% T# I- d
CPX #$00- a; w* \5 U5 \+ i
BNE DATACOPY+ w1 I2 }/ X' P! |: ~* Q8 P
PLA
2 e( X, M8 x: F; y TAX
0 F* {2 d+ ~5 ?( H/ M" z: h PLA* G2 C; ]7 Y* S3 W3 A: b5 b" N/ S
RTS' n/ @5 }+ P8 [
0 v- \# U v+ b
.ORG $CD9B ;跳转到转换的切页程序+ W" c/ [, Z6 J' ~2 v- k
STA $705 s! a/ ^# k2 b0 I6 {
JSR $72000 [$ w6 N; [& p/ H6 o& l
RTS- ]+ u0 ?% `/ p4 K5 A5 C, Q7 a
" P" t7 d |9 ^) O- N C) h
.ORG $7300
" h. m' r1 F a! o' ^M1_TO_M4: ;切页程序; G& r: _+ v; c6 L7 r
CPX #$00, C2 z0 M8 p/ `- q. I) Q
BEQ REG_SET: E9 g; D+ e* M; P$ l; G
CPX #$01$ {0 ?6 u" ~9 e1 B" }- p: B$ N$ G
BEQ PPU_BANK_0000; e4 m6 O( [( J$ m4 p! E
CPX #$02
2 c' I" Z1 g& b6 r BEQ PPU_BANK_10002 Y: C' f& E( [6 G- y$ ?* [
CPX #$03/ ^* }& d9 v, D9 e( h$ u5 ~& n
BEQ PRG_BANK, Z8 b( j( \) F0 i; A
REG_SET:' c0 E4 j% `% N( x+ p! Z& V
STA $A000
/ d' d- N0 b! k6 [/ i Q0 s RTS
* D1 y, |$ [# {4 I4 T .ORG $7320+ c u9 k2 i5 s8 o q$ U6 q3 p
PRG_BANK: ;PRG切页3 m3 k, J2 q7 w/ Q
PHA! g. |0 a4 S- m+ [' h- Z7 ?8 b
LDA #$06
4 U: U0 s% K8 M STA $8000' l2 \% s Q! O' U3 x, @8 J8 z N0 t
PLA8 T( l+ X* Z1 N/ i- D4 c
ASL7 h4 I* p; @' }% C H5 w3 p2 z
STA $8001/ I% o; L3 e7 d, |1 L" \: V
ORA #$01
' } j& o4 o6 h PHA4 N$ r# G* }$ C3 S$ ?
LDA #$07
, r J% W+ J4 Y2 f' j; j/ E5 P) P STA $80000 M! b4 Y$ v) c [# O" U
PLA
$ r) x/ D; H7 f6 n" n. \ STA $8001: U$ G6 C; E$ p- f8 k6 Q' h0 p
RTS
; q" H& O4 w9 [0 r" @. G# X .ORG $7340
4 z3 S/ {: b) I: K/ V; ]PPU_BANK_0000: ;精灵切页
0 p- z6 E7 D' @, B& ?; Y+ r' G PHA0 M s& C& R, C" |. b
ASL: E/ q( P7 b# f9 F( T
ASL
1 j% E! k0 T0 z3 N" f8 {( U PHA& l ^1 e# K+ P* {
LDA #$00( @0 i, ]$ ?9 `' n& `/ I8 ^- @
STA $8000
0 f! a) o+ X. v, v" v5 W- ~! C+ R PLA4 Z: H: M6 v% c" H7 F
STA $8001
/ z; O1 U* v' [: D9 z/ B4 \' @ ADC #$02
/ B% x1 \6 i1 {- q) I9 A; ?( r PHA
+ o8 V3 K$ g0 {" q LDA #$01+ D; r h7 i$ ~. r
STA $80009 B7 l7 O- E p+ o& ~) ]
PLA
( A: O3 g+ ?8 x STA $8001' c* q1 F# L9 w; y0 X, K! e, \- b+ m
PLA
7 T; z' L- l; T/ d7 c1 \ RTS
" p, B8 U1 \, D, v9 G8 s& l& ~ 9 R, M' _1 R! G b% w; ^' S& z
.ORG $7360( s- O; _( O6 J* ^9 @% G8 J: [ [
PPU_BANK_1000: ;背景切页
7 R- Q/ D! W, j1 [ PHA
v& C, r' e K9 P. P/ { ASL
, T9 ^! \* k+ W; Y B' {" u ASL' U% q- O5 i- G
PHA; ]+ s5 n( h; N h2 R9 h
LDA #$02& k2 Q, g3 |, {% \) y
STA $8000: |; v$ I1 k% N
PLA- J* ]: Q. u4 u% N, K$ o
STA $80011 w a& V7 u+ ~* N
ADC #$01
; |1 i* X) K0 X9 I! h8 Z PHA
: t/ q1 c! ~: h8 m6 E5 f" d LDA #$03* G c8 R) L6 k9 K: ~ J
STA $8000" S5 a l; |5 v8 H' a F( I
PLA& @* Q( Z5 I( |* S) ^# f, G; Q
STA $8001
: y9 Z! K* ?# `- @6 n: ]1 V ADC #$01
7 S0 r8 r" ^3 H9 U- w PHA7 O% S q7 k% k+ E2 z7 x/ n$ }( @5 a' p
LDA #$04
2 U7 F9 l7 _; b C$ e0 o7 E STA $8000
7 _; K6 F2 q: [$ O PLA
& A, t+ L$ ?* E, Z# A STA $8001
' w @! T0 t0 ~1 Q3 ], } ADC #$01! H: S& a) `: W% r3 m6 s6 s" r- o
PHA3 }- \$ @ M1 ^. M, g
LDA #$055 {' h% R7 ]! }8 a' ?& q
STA $8000; L# R$ n! t9 S9 }
PLA) o0 G6 s$ c% s$ Y2 b# n5 l* A$ r1 N
STA $8001
: F Y: s! C" r/ c+ d PLA
& l* k5 [# | A- v0 I5 Z5 } RTS
4 \1 _9 ^' U8 \" f* J( O
" n1 z+ [+ i! g0 l* X |
本帖子中包含更多资源
您需要 登录 才可以下载或查看，没有账号？立即注册
×
|
IP卡
狗仔卡
发表于 2017-5-20 21:24:33
提升卡
置顶卡
变色卡
显身卡