|
|
;[FC][最终任务mapper1切页程序]7 G0 I8 I- m# G7 D' b1 P
.ORG $CD9B' ~1 c0 S2 j, E' r$ b/ o
BANK_START:
8 B3 F* A9 |, |9 e7 h STA $70& o+ [; ~- v( g1 ~
TXA
1 a" q2 t0 d6 V) g ASL
8 M3 \" [& Z' e+ s$ `. P0 Z TAX5 p2 C6 T5 D, r& |+ i4 S
PORT_SET:
# w% s4 V/ Q) J LDA BANK_DATA,X
; p; b/ o1 p3 F4 B* L- P STA $6E- @' {2 |8 J9 p2 m% d' V; c) `
LDA $CDB8,X3 d) U) @+ ?7 b9 B
STA $6F
% L/ t0 _( L8 c3 y* o( {1 t LDY #$005 u6 t2 W; x( d" E8 ]9 z
LDX #$05* N. g! r2 c" k, t
LDA $70
I- N' F0 N+ \3 xPORT_WRITE:
7 _: ~* p" w9 ? STA ($6E),Y+ @; H( u' X3 q8 R, V
LSR
2 i% G% D: m1 \4 g DEX" [( g) d- e3 a% J: b. X5 N" q$ Q
BNE PORT_WRITE
# ]- q' ?+ _% W% h4 F+ F RTS5 G. M: ~1 W! u% N; `8 K) b/ H
^: T8 u% Y3 m2 P4 [ 4 K \/ D- f( ?2 o. K
BANK_DATA:2 `4 S0 i/ O! H1 L; F* ^
.BYTE $00,$80,$FF,$BF,$00,$C0,$FF,$FF& R: }2 @3 {/ z" B3 X$ e
' B {6 H9 I5 Z0 Z
6 G/ ?3 @4 z: T4 D;[FC][最终任务mapper1转mapper4切页程序]
. L0 J5 F2 L# V* C- Q2 j .ORG $BFD2 ;初始化跳转
, E4 K# w9 o" ^5 g, G JSR $FFC0
# l8 N m: M8 `& |: K
- t1 M' u2 D$ A7 G2 u6 R& X
$ `2 ^) p( R" y* w: g9 V% t* Q .ORG $FFC0 ;切页1 r! E( P# `+ Q7 s* A
LDA #$06* T. `. D9 Q$ m- T$ p5 B" ^4 q
STA $8000
# }7 `2 w: A5 A! k3 w4 o* ~ LDA #$0E
, D$ \: `! E0 q6 u: `9 V1 L STA $8001
7 q: b9 }# ^6 n9 V JSR $8000 B- p# q- h# a2 U. O2 n* V
RTS
( `2 q; `- ?( ?$ F$ @ ( ~7 g# \* i+ e# T4 l
.ORG $8000 ;数据复制, k0 q6 Q P, h
LDA #$80
% z) M( h3 s$ c" d; p STA $A001 ;启用SRAM
+ t7 M5 u) u% ?/ ] PHA
; E' H7 \# e# u, _" ]; N2 u$ u TXA2 `" S; s: J$ ]- W0 G9 x
PHA' k X2 i1 s l: V6 w5 r
LDX #$00
5 G$ Y0 \0 _; `. P2 {, u7 @4 ~) gDATACOPY: ;数据复制+ h) {+ r+ e9 W
LDA $8100,X
9 \ j) N( S% |) V! D1 {- w7 w5 ] STA $7200,X
: u' L4 P+ u+ o! I! n3 V INX
}' R# y' B: q, G2 f M J' w6 O CPX #$00
$ P/ S6 ~- c0 a; _: i" C1 G BNE DATACOPY
8 d$ K2 K5 p6 Z$ U, c PLA
7 _* y! Z( P* _# H& m TAX1 b/ A: [5 k8 J9 M$ v
PLA
8 G9 u" ], B- Y# \% w RTS
5 h, K! e" N' d8 t% D
9 U o5 p+ v% n% i0 h2 Z/ ^- x# p0 k .ORG $CD9B ;跳转到转换的切页程序
0 H( k/ j, O3 N' e8 | s STA $70
; c) J- Y* H# m JSR $72004 |' U, Z# A: W2 E Q
RTS
6 x5 I& m: }; R. L2 M8 o) b
! P* F$ k* k, b5 M# ~/ n .ORG $7300
7 v9 h# A2 Z+ i+ Z/ Y' }! }M1_TO_M4: ;切页程序
9 {2 ^/ j8 \6 t0 R# S- ` CPX #$00. P7 b* O3 Z% W+ M
BEQ REG_SET
: w: S( l9 K: m) N8 ]3 Z% i CPX #$01
6 `. S- `9 c* @/ p8 g& j0 r BEQ PPU_BANK_0000
* T+ F( f: M( u# ^+ W2 W1 ? M CPX #$02
7 h" ?4 d6 P1 [& c( `9 U BEQ PPU_BANK_1000: m, P- J2 \ q/ n
CPX #$03* D3 `$ c+ d& a( v* ^
BEQ PRG_BANK
/ H$ c3 j3 f* \! wREG_SET:
7 m) s, @2 W( D7 E. w2 y+ } STA $A000 d0 Z4 E3 w( M" ^4 K% V5 A- |( H
RTS
. u# E! Q7 X/ `1 |& s5 { .ORG $73209 h; j( L9 B# w7 E% R
PRG_BANK: ;PRG切页
* w9 f$ M9 q( e7 T/ t8 c- Q3 l! P' D' L PHA0 t2 V. v+ M% W* }
LDA #$06( D+ j6 k1 e, T5 q
STA $8000
! Z N# z# y5 g J2 f: l/ d PLA
; m; ^1 A. D2 P1 H ASL2 Q* N# ]" H: M0 P
STA $80014 J" X( T+ y2 G& ]: {& t! ?
ORA #$01! a( h4 y, x' [5 ?
PHA7 z( D6 s- K. m; w
LDA #$07" l5 b" D, Y, _: p' T" v4 x5 k( q* O
STA $8000; R- i* R' r7 M% \ v$ ^7 c4 _0 N
PLA- j4 D. e0 t4 [0 E$ \4 t
STA $8001
3 ?8 O& t, J6 l; _ RTS6 M* s9 L n: w* C! \
.ORG $7340
# P' {* M4 U& p4 L4 Q1 S) E, B$ ]PPU_BANK_0000: ;精灵切页( V4 B4 X0 K* w! l h2 Y; y
PHA8 P2 @" a4 f. c& c! q/ L
ASL" ?4 ~% U9 B- I6 V! z/ X
ASL+ o1 `% \) z! U
PHA. `$ J2 {# ~ l
LDA #$00
7 F b( y3 B/ K$ ~8 Y3 v8 b Y- y STA $8000/ h4 {6 w3 c8 y0 t
PLA
+ k8 v8 y+ ^2 E. Y STA $8001( N/ S4 Q8 Z9 h7 k+ Y4 {
ADC #$02
8 m+ ~. \ T( Q' \4 ?! t3 b PHA
8 X2 Q# U7 k `' r& T( q. {% j LDA #$018 ~ y$ F0 T% w
STA $8000
, y$ ^4 Q+ B2 G6 f8 Y4 S PLA
! j: h1 x; C! e STA $8001# K: s6 L$ N% \+ y" X3 L
PLA
4 C3 i) Z- F: ?0 S RTS7 i/ j6 ?! a T) o. V# f5 _" o
1 D% O* I: F( d5 D- C0 j8 Y2 O .ORG $7360/ L, Z E$ H! T: Y9 O
PPU_BANK_1000: ;背景切页2 ~/ @# G0 `6 K# r% T+ k
PHA
9 p( X, |) J$ B6 B* [" J ASL
+ r: ~3 E- G+ P1 L! o ASL
3 b; n! Z: K- L, b1 G+ X3 q PHA
\$ ~: p: \. }' X/ l4 y8 B LDA #$02/ U- T0 @& s8 A! O
STA $8000
" N! T- i- W" Z# ^# _. W9 F PLA
7 P& z8 B& F; _7 y% Q, D2 l STA $8001% P4 b& F" C/ Y+ g- |2 W
ADC #$01
! _/ A3 y ?" o, m: x PHA
8 {0 D% \ Q# N6 P7 ~ LDA #$034 g% |. I2 g6 J9 v) E+ }; q
STA $8000
) |8 C8 b1 c. v9 P( @; Q PLA
' ]- Y' a0 x4 B% C4 ^9 X/ Q STA $80013 u- P, O2 U+ g
ADC #$01
! P5 y$ h& X! d5 s9 C' C, s PHA
4 l- Y( @# P7 N0 L5 n LDA #$04
; S/ J% m! L9 p9 C+ U& j* s9 }, `! V5 U STA $8000
3 u. p0 n+ A8 g$ _ PLA( p# `8 L% g- J- ~% T2 g
STA $80016 W U7 C5 p( z" r; W2 {+ r
ADC #$01* _/ Q3 v6 t; N+ P# K/ _
PHA
. y, \0 Q4 z/ f4 @: s LDA #$055 }+ @ O& K5 R/ r$ g
STA $80008 h5 m+ f1 ?$ D( b
PLA I. k0 y, p |- ?
STA $80015 p) m( {( w& w& D, X, {3 r1 u$ N
PLA
# [- T8 [4 z* h6 c7 h RTS
' j$ a' A# b' N* d8 [( ^$ A1 J
& Q( y9 R/ l1 O3 { |
本帖子中包含更多资源
您需要 登录 才可以下载或查看，没有账号？立即注册
×
|
IP卡
狗仔卡
发表于 2017-5-20 21:24:33
提升卡
置顶卡
变色卡
显身卡