|
|
;[FC][最终任务mapper1切页程序]; h) k; Z7 K0 h- w/ C1 N
.ORG $CD9B
9 D3 T2 } E+ n& eBANK_START:) M$ x+ T& G8 n- c5 q3 U" _6 q% ^
STA $705 Y( {* h6 Q4 p- H
TXA
+ ^+ h9 T. P3 N' p* e ASL3 S9 m. y% D3 O+ e# o& Z- o/ w V$ U
TAX
( Q+ q/ J4 a7 sPORT_SET:) t3 L) O* W9 L* M" T
LDA BANK_DATA,X; K. G, h3 ~) P$ C( \' q; n
STA $6E
5 y" a$ [5 f* I6 e LDA $CDB8,X) J# o8 R! N/ i2 o7 n# w' z
STA $6F( p/ o* w# M# g6 V
LDY #$00
9 g. w4 {- }% |5 _: z6 U$ k0 W LDX #$05& B. ^; Z L* f3 C% f0 W" ?
LDA $70' R% G& V) |4 I; }; W
PORT_WRITE:
" q: ~- M" b; F8 |- e STA ($6E),Y# m! ~1 h$ r* k. c3 g
LSR
. n# |0 q, E2 V DEX8 F {) g& r% z4 S" v0 `, [* _) d1 |# ?
BNE PORT_WRITE4 A2 ~% p, R* [/ x4 V
RTS
4 W4 n( b: ~# P$ b+ J8 ~% x9 x
$ \# A# d6 a3 ?
$ d5 O8 W) ^8 I M) y/ z+ a+ k6 iBANK_DATA:
4 O$ |, `( y, ` .BYTE $00,$80,$FF,$BF,$00,$C0,$FF,$FF
# z) d* I- S4 s O; N; I, j; r9 F3 R& k7 d o* v, G! I$ W3 ~8 S" W& x/ {
" {/ e/ ], |0 n# g; E% L
;[FC][最终任务mapper1转mapper4切页程序]
: u& A. L! I$ ]6 J- @' m2 M5 G .ORG $BFD2 ;初始化跳转1 k. J/ J. R8 n8 a( R* ]4 A
JSR $FFC05 B+ ` k. K3 j. O. U R2 n
7 f% z' L: j# X( C7 @+ g% z$ w* x3 ?4 n, U d
.ORG $FFC0 ;切页
5 f* b% }, ~ y% S LDA #$060 y2 h$ M4 F5 w. g8 Y+ T3 m
STA $8000; f" [0 Y, Q1 n" k y
LDA #$0E
* x- u, z! M# ]5 `" {- G$ u STA $8001
: I& R: f7 E4 ]; T; C5 P JSR $8000
: o# w9 n8 o; @$ ^' f# \7 b RTS
1 U/ m/ o8 D0 @' s( K4 W p* Y * h* D) W i* _
.ORG $8000 ;数据复制
/ s, Z! ?. ~& I9 T! o% j LDA #$80
( J3 }- q. B, P5 A1 `" p" F STA $A001 ;启用SRAM
) v5 K, b* I0 y. q; `" k6 ? PHA* U* `4 J- P* l- A+ H: r# o
TXA
& U6 m: `* A0 u1 j2 C PHA6 _, W7 O* D. f9 N5 c
LDX #$00
: Q8 M# f8 l' [8 H, RDATACOPY: ;数据复制( n* p B, _) R3 T9 n R& b2 M
LDA $8100,X( W- D* ?8 e: {6 [' K5 f
STA $7200,X2 h) c8 {) p1 m) }# S
INX
& m8 u. i. A+ {0 m& S CPX #$00
/ J, q/ B0 S" r) K: z BNE DATACOPY. b# f' p3 u2 ?' D/ z
PLA
- a/ f! d: I) ]0 j/ _ \ TAX! V6 d$ S$ s7 R- z$ w: \2 s# a
PLA0 K. P0 `+ T I/ ?. n: l
RTS
$ E: t6 n7 {( t, h Q0 v/ ^3 `5 M1 N( e
.ORG $CD9B ;跳转到转换的切页程序
2 f/ {" Z/ r5 v1 v STA $70, A; I3 l6 K- @* @; N" o2 d
JSR $7200& Y. P: K5 p3 q
RTS
: g i7 K( M5 ` s6 x, K ' X( c7 a }* G- P$ s7 M
.ORG $7300
5 S Q+ a- z- ?. V2 g0 Y( kM1_TO_M4: ;切页程序0 N( h' L- b. a5 d
CPX #$00
1 Z* _" Q: Y/ ?% P$ q- F5 } BEQ REG_SET
1 R" `+ `4 E5 m. A( A CPX #$01
' S) L9 V- y; j- N+ M2 h BEQ PPU_BANK_0000
9 D H% Y# |2 ^; F# Z: `- R" Z$ V CPX #$02
6 l$ \ {; r3 I3 C3 w5 T1 T2 s BEQ PPU_BANK_10009 [0 @, u8 x* E3 u8 b3 Z
CPX #$035 j! W" Z, e9 M9 M/ \# ~
BEQ PRG_BANK7 F x7 L4 H. q* K
REG_SET:4 b# ]3 P3 E- P6 W
STA $A000
9 v) ?) `6 {5 f0 U: y$ _ RTS( Q5 D b% Y: b9 J& ?% t
.ORG $73209 v/ O! R. E! D/ y
PRG_BANK: ;PRG切页/ _ a( ?/ O6 }, i/ `1 h
PHA
5 S9 g4 G2 T, g! y; f& p LDA #$06, w" T) i% L& z" n, v
STA $8000
! Q7 U7 C5 P9 |% P PLA
8 o$ M* e( A* u; D* R ASL4 B1 p8 p; F6 K5 {
STA $8001
8 t9 i' {7 ^9 R5 \! A' H6 T ORA #$01
, x5 {$ Y! k. Q" g: b6 L PHA
0 W! s# T6 K) Q4 K7 w% `) T" M' h4 n LDA #$07/ R& o- W1 y. n3 U/ L
STA $8000" w. y1 Y# k5 h- J% w" J- q! x
PLA
8 U- z& ], h$ d* B4 c7 C STA $8001
2 o# L# Y/ W/ d7 R0 ? RTS
. j1 I- {$ t4 g4 X5 g- _ .ORG $7340' j, `1 Y# j6 b
PPU_BANK_0000: ;精灵切页
4 h3 d7 S7 \6 X* ~# @/ c PHA
' P; e& U, S8 H! z6 r ASL1 S. E0 K( q! S
ASL
7 V6 b* }5 y" P: m: |& ~. s PHA3 }) L0 o: f1 ^- z. v) c
LDA #$00
; n# U7 ]9 _2 @) W% ~' _% I4 a STA $8000* N, Q( P0 Y& H
PLA, ]* k5 @+ m9 k- e0 D+ a a
STA $80010 I9 u6 W- c! V' R
ADC #$02
" A- l4 T! _4 r3 S( H; c; P k$ J/ Z PHA
+ |0 u) K+ i9 c8 f% K- \2 j LDA #$01
4 @' {. W! V+ `, s7 l/ Z; _ STA $80005 A; N8 A# u& D6 d( U
PLA
' `7 v4 Q5 M& U' C: E& E- D STA $8001
3 Y2 u: l& A- b+ `, A6 j" Z$ E PLA4 w9 k( b9 C+ E, `' h+ ^
RTS
' V* q) Z3 p, v% H$ u( y6 m * w7 h, V/ L% v7 m# r3 B
.ORG $73601 {# Z( `+ f. N8 n' P( z) y
PPU_BANK_1000: ;背景切页
# V6 u5 O5 M% V. @7 M PHA" X+ ]3 E: M0 ?. [* e+ f
ASL3 w* T3 w& V( I1 s
ASL
' Q8 E7 r" Z9 H' P, k. B% X PHA
/ o6 Q. N0 e4 h B! @ LDA #$02
* V. S( e: K. u4 q% U$ C0 I. T3 D STA $8000
8 j0 S# G' {6 w5 } PLA9 K9 c) O' V! b. J( I0 M" n5 I3 G
STA $8001
d$ u, e- q* k6 | ADC #$01/ J; m4 }# \. R) ]
PHA
, L. C, z" X! W0 a LDA #$03
+ n7 M# x* V9 s( v) s# m+ q STA $8000
; H9 L S o$ ?4 l" J PLA4 T* X$ m% P" ~5 C8 j/ u
STA $8001
5 c% z4 E1 p, o& s3 |% C ADC #$01
# ?, q) L- x4 [* X i. a8 T PHA6 s1 V/ v$ } i' j. H
LDA #$04
7 M2 @$ F% Y! L2 D: C STA $8000
& Y8 M7 Y! m: n PLA9 H0 Q! x* I- ?, e+ f4 }3 S* F
STA $8001
, |4 {4 k8 E8 _! R, ], ~ ADC #$01
$ x( i. f' q& {6 c PHA1 k2 O) M* e L% D! p3 s( a
LDA #$05/ Z2 R& P$ ^, Z# u* U+ v
STA $8000+ C2 G' g& R8 ]# a4 u
PLA3 V! m4 N- b# r! ?
STA $8001
, y# z* w% r# S$ B; w5 \ PLA) c& b5 }- U; u f& g
RTS# H0 K4 Q% ~5 o7 y
( h5 K+ Z' @3 M; u! K7 s
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看，没有账号？立即注册
x
|
IP卡
狗仔卡
发表于 2017-5-20 21:24:33
提升卡
置顶卡
变色卡
显身卡