|
|
;[FC][最终任务mapper1切页程序]% t0 m; W7 v3 x* T) |$ ^( q
.ORG $CD9B
' @' r& j5 V" R6 J* iBANK_START:
5 w; X5 Q2 T& ]7 G6 W# c STA $70. N/ ^6 S7 W% b% O c: x- J- P0 P; P
TXA
5 m$ d5 W9 F3 M) } ASL9 X8 r9 Z+ [, b+ R; v, r6 p. W4 `
TAX2 w$ ^" s+ v" c
PORT_SET:3 F4 p2 t) `' K- x2 j! k
LDA BANK_DATA,X
- e4 l# W* S- `1 a2 w9 e STA $6E
X; ~" c( ~& ]; i8 _ LDA $CDB8,X
* _2 I. k0 M! C0 w7 z. n STA $6F
|) A5 J U7 T4 k r4 g LDY #$00
9 m# t# ]# G+ g* ^- p+ Z2 t LDX #$054 U6 w0 l, {2 j' H
LDA $70
# n; U% M- t" U0 ?& }/ m; w- ZPORT_WRITE:0 J$ J' _! D- y9 l4 N
STA ($6E),Y
0 h7 _8 `9 S+ b& l3 o9 f" [ LSR6 K# G! k# k% t, |7 m* C! m1 _
DEX$ J; w$ D9 n! q. g
BNE PORT_WRITE- o5 n/ f* R t/ x
RTS
, l5 W! h b6 @; H
. E- x$ U7 @% v0 i; R$ V- C+ c 2 Y: A) X, R+ q0 V2 w$ l
BANK_DATA:
7 ^2 f }& |% G .BYTE $00,$80,$FF,$BF,$00,$C0,$FF,$FF
6 B/ K" Z) b# R* I# a8 G* ~
7 |1 U. p9 Z+ c8 H
8 G2 k+ s2 b2 B# l: |;[FC][最终任务mapper1转mapper4切页程序]( E+ y' _8 Y) d
.ORG $BFD2 ;初始化跳转
; \4 D& B; r3 e/ \. [9 J) \ JSR $FFC0
/ C5 L, j- W3 i4 ^0 M% Z+ D/ r7 |/ y9 F6 D( f; j+ W$ ~
* d: [, l, G. T* U: {% j
.ORG $FFC0 ;切页
- [, s! ]( l+ Z; h% Q LDA #$06- J1 R9 O; e- D H2 p$ V
STA $8000
9 s5 e3 b. a1 h1 m LDA #$0E
% z$ I# U0 _5 I, { STA $8001; p E. E" y# I
JSR $8000
( k9 a) T4 T& f0 P& V, ] RTS 0 Q- r9 o1 q* Y
1 T! x6 Q$ v* r4 B( z3 ~2 ?# m4 T .ORG $8000 ;数据复制 v* \ X( f2 h* f2 A3 V2 k
LDA #$80
( N0 b" ~& s7 _4 s7 o) M STA $A001 ;启用SRAM
9 p7 l6 t% [) r, W PHA3 B/ B3 c. q/ K" V& M0 Z0 B% }
TXA* b) {$ T8 h" B+ c9 g
PHA
# R9 @4 A% H1 n' n4 i! l$ } LDX #$00* a6 |# I% j. @1 V0 Y. q0 U
DATACOPY: ;数据复制
3 l$ A5 ~8 h( M: Z- o! f8 Q" R LDA $8100,X- T6 r: } V4 B" T i, n* W
STA $7200,X
, ?* W9 h; U/ h3 s6 ^% l INX
3 Y/ ~7 S/ |+ `" g! ?9 P. s CPX #$008 |- z3 k( l$ T a' {6 w
BNE DATACOPY# X. E" n& ]/ D2 ^! O" k
PLA
$ p* M* o0 q1 m: ` TAX
3 R( r7 X. @% j9 Y. w1 N PLA& T2 k; W g; U
RTS
, H( f- |) ^6 K1 H- l! U8 A6 h % M/ r8 h" B& V9 ~+ b
.ORG $CD9B ;跳转到转换的切页程序
6 U# L7 a" a. U7 M; p- Z6 _9 U. v STA $70
! _9 i; u P0 u JSR $7200
' P, y P, L$ t4 z$ \+ [1 D- [ RTS
" d' g2 ?8 a3 v- `% m! H
$ u- _$ M+ W- S! K .ORG $7300
& z7 j! |: ~( n; N6 P9 h" {M1_TO_M4: ;切页程序
5 k$ i0 h7 {3 s, C CPX #$00
$ T D4 g, B4 } BEQ REG_SET
* _ A8 H& |5 u* P3 n0 d CPX #$013 @" c5 U3 V$ q3 q# y
BEQ PPU_BANK_00004 A& B- F2 K* O* k( c7 v) Q& v
CPX #$02
( f: U- P# ~6 E BEQ PPU_BANK_10000 h* o: J; y$ {) w0 q
CPX #$03
& z: ]' S. C% s5 O% U BEQ PRG_BANK% x4 ]$ W% ]2 \$ H6 ~
REG_SET:
6 E1 R- d4 D: g& ? STA $A000$ O- ]" s. B1 G) u0 ^" f
RTS
! w0 ] [) c: `4 X) y/ ~ .ORG $7320" g4 `* ?! d. F4 Y
PRG_BANK: ;PRG切页
2 a1 u% f. A1 ~0 F6 M0 W. g8 K% x PHA l7 ?! _6 R! P& K% u5 D1 O
LDA #$06
6 t( y. a+ M8 U8 V7 U STA $80000 y" v" i( y( T/ w0 d) o( T/ E+ u1 M
PLA- e+ s6 E) b$ u6 h- I4 P
ASL% P3 C$ ^: C8 A/ C
STA $8001
: i* h. J# |4 L J. ~6 R1 ?# x ORA #$01
1 S* w( U. [/ m* Q+ ^ PHA
2 [: _* k! `/ |! n# j9 m LDA #$073 S$ M' M- s4 X3 d0 N3 Y
STA $8000
3 N0 b3 `2 F% o$ e3 Z% I% w0 r PLA9 d# {3 u3 p; n c$ B" M
STA $8001
; l/ o, ^' F$ ?9 }9 y# u RTS
8 g G* d- Q' Z1 f9 T .ORG $7340
8 F3 v; B6 O+ u+ bPPU_BANK_0000: ;精灵切页
! v" t- b, x; F& p PHA0 S# i* e! z* M7 H/ o5 W4 u
ASL
$ Z* [- d$ Z# v& E: G: y ASL
3 B( N, s- e3 S0 m. r4 w; y& G PHA* L. _& t! v9 O$ J0 O3 ^ v C
LDA #$00 @! {4 w( h1 M. a9 J( L- \, w
STA $8000: ?9 z2 g3 I z6 e3 w
PLA
0 r {* S" e; A' r: w& a4 I+ \ STA $8001
& Y" W$ l! T2 y2 f+ O ADC #$029 ?. v9 p2 t: u2 F V
PHA1 ~) h' Y) a: Y/ f6 w5 _. q3 s+ ?
LDA #$01- w0 E+ Y/ |4 B
STA $8000/ L/ I! N9 y+ q4 _
PLA* @) T" z& e; l) }
STA $80018 @" `/ n/ e0 o/ E, O. S
PLA5 C( t, y2 O3 |
RTS
, E1 M5 B; _: _' {3 U6 s
6 d N+ m5 v& l7 o# ~3 q2 m .ORG $7360
, N9 } [- W! f* tPPU_BANK_1000: ;背景切页
h# A2 x/ N* ]$ ~3 u# N PHA% f2 v _) m$ m
ASL! A' k& B Q m1 _
ASL
9 r+ C$ M! h% P: z" { PHA
& L5 z2 D/ M, C+ H% l* q3 f LDA #$02
. S$ B% W; a$ |# } STA $8000( d6 O" q c8 c" D
PLA e" ]$ {) s/ O% {$ |7 b5 b8 y
STA $80016 M9 u. Z" ]2 L, R$ d8 |' L
ADC #$01
, \: W8 p. j( l' n* f( } PHA
; ]% s/ U1 j) G2 B: G7 _' N5 K6 z LDA #$03
& ^4 C) U2 w1 d$ w6 h) b w STA $8000
3 M" b# b, q4 ~2 K; | PLA
6 m d( r$ L5 @, U- z, j6 @ STA $8001; K) ?6 l8 G+ d' f7 P3 c8 U3 J( X1 i
ADC #$012 r* v1 U, C. R2 m$ h0 I( R0 F8 f
PHA
7 T7 ~# u9 B0 g LDA #$04
2 O `6 u& Y) y( u STA $8000+ w- E( c- l) c
PLA
7 |1 \& `, g" s( F STA $8001
3 D M( Y, S! x% R ADC #$01
: c8 ~+ i6 {1 P" [. I& v2 q. Q* e PHA- d) J7 P8 ^. M, g' F
LDA #$05
0 h0 T& \; w/ K/ {3 ?" i STA $8000
, ?0 x2 g) l3 m- U# U3 Q PLA4 W' B6 [# Z; g* ^/ _0 A* G
STA $8001
) a" n# h$ v& y3 a9 ?8 d& ^ PLA
. ^2 a3 O8 r9 ^9 j RTS
1 k# W# k0 ?' P+ N
6 r+ x6 K& ^! Z( K |
本帖子中包含更多资源
您需要 登录 才可以下载或查看，没有账号？立即注册
×
|
IP卡
狗仔卡
发表于 2017-5-20 21:24:33
提升卡
置顶卡
变色卡
显身卡