|
|
;[FC][最终任务mapper1切页程序]; O5 L' K; K- {& w! j) y" l
.ORG $CD9B+ x4 T5 \" P3 @/ A5 {% |
BANK_START:
! o/ w7 n' q8 U' F STA $705 K( l( K8 \1 v: K
TXA- u5 d( N5 ]5 X7 N( X. E& {
ASL
8 \; |8 [, e, _8 L6 F" [ TAX& e' S5 S, e! K
PORT_SET:' v v) l' t+ y4 b
LDA BANK_DATA,X
/ @: m, t& f# b/ p STA $6E
% H) @# e0 Y+ R0 F- [6 [/ Q LDA $CDB8,X1 q( _, a6 Y+ v) W7 Z) |$ @
STA $6F( j/ K# l" s2 e- V F5 K" H* T
LDY #$00' `3 b3 R1 h- M$ |
LDX #$05( `- Y' `% @# n" e) e7 H# o; q6 X
LDA $70
+ b0 H7 n5 n$ W+ o6 y$ uPORT_WRITE:3 U2 W" `, k: v# r$ d' M9 B
STA ($6E),Y' n2 q2 Z7 Z8 b2 q3 h1 C
LSR
2 ]$ q$ d4 C' P# o DEX
! k0 m& G1 K8 Y3 E" v: l- x) k BNE PORT_WRITE- o. I, b+ b0 Z* |
RTS/ E0 v7 A! }" x: c/ |/ x
$ _9 u, q% L _
+ [3 t% s* |# Y2 r3 Z1 x! TBANK_DATA:
7 n+ n. V/ ~1 u# c- N .BYTE $00,$80,$FF,$BF,$00,$C0,$FF,$FF; r% I8 G% e8 Y$ K4 S/ C: G* D4 K
7 r4 ^2 M' B2 ~. F; Q. I$ _
( z- \% ~3 N5 S1 b6 E;[FC][最终任务mapper1转mapper4切页程序] n, ^+ b3 E# @0 Q
.ORG $BFD2 ;初始化跳转
) q- j. v6 T' W- w4 [6 y JSR $FFC0
$ w5 j5 n9 q& j
' T- M* u& N' N Q. N4 f0 ~ e5 S) T2 n3 J
.ORG $FFC0 ;切页
& _) u4 Z: l3 v" b/ s2 h LDA #$06
, L6 [* X: ?) U STA $8000) {1 h; _% M- T3 H# ^
LDA #$0E
' [% K6 J* G7 z# R" E" \! C& u STA $8001
4 q/ Z! }, w: i2 U5 z. V JSR $8000
% }, g# `' U/ v T: m+ E RTS P' `* h" d5 b$ |7 K8 @
# F( I1 H J$ B3 }$ \" t .ORG $8000 ;数据复制7 N* B3 H& N- F+ d3 j
LDA #$80
- R9 `/ B2 K( E8 j& S: C" W STA $A001 ;启用SRAM
9 j, I( H$ Z2 a8 X8 f3 [ PHA ]: ~7 p) ~ I/ H" A) K$ ^( t
TXA7 p( {/ M8 p" h* ]: t. D
PHA
( Y! q! T+ P& n2 c LDX #$001 p! u# E' L7 Z0 {
DATACOPY: ;数据复制 A2 C; v1 d: A, u
LDA $8100,X
: t2 X4 m; v$ _4 ?. P0 x; M STA $7200,X& C' X5 E) v/ K9 X8 @- `; y+ R
INX5 ^+ V* Q+ C8 w
CPX #$00
( Z6 _% \6 t* o% D7 j, S. } BNE DATACOPY2 B3 F; Z+ i% V: D
PLA
* W$ Z D+ q& ^ TAX
! @ {4 X' @8 W4 S4 s e PLA; @5 @8 m4 b3 ]5 b$ X
RTS) a9 t" a5 _6 u* y! ~. V
; C, p0 u6 r& s- G' N
.ORG $CD9B ;跳转到转换的切页程序& ]. C# `1 S& r; _0 s- ^2 c( W+ J
STA $70' z8 U4 w, @$ [5 H
JSR $7200: v2 K. z$ t7 y8 y
RTS0 P( n0 r7 g6 b0 g+ }3 R
7 }. [0 e9 u5 R3 h! {
.ORG $7300
7 V' m7 N8 z1 A" NM1_TO_M4: ;切页程序
! a' `: \8 a$ V CPX #$00
0 U9 l: c! ~. I9 f9 i BEQ REG_SET
" F( X- ?! N6 p" Z7 N. s CPX #$01
* s8 Z8 t2 x0 g3 l+ F BEQ PPU_BANK_0000; U8 l6 q2 |' v. [4 _9 M' D
CPX #$021 ~) t5 v. M6 c
BEQ PPU_BANK_1000
. o3 s3 {7 E0 D' S: H CPX #$03
6 s3 ]; R8 l# i$ K0 r1 ] BEQ PRG_BANK
: b/ G" ]# E3 F& A- M, C1 VREG_SET:& g# q }4 y" z4 a/ r; H- J& f
STA $A0006 P3 ~6 w: `* F4 f! `* m
RTS! ^5 z, {# Q$ W8 p7 i; B
.ORG $73208 G2 k+ P2 W! o# x$ \/ |5 M5 J. [
PRG_BANK: ;PRG切页
' T( D9 v4 R8 E' P2 d$ Q$ t p- d PHA
7 `. ?; o5 W& G# m LDA #$06 X& _: {5 J: w) I' Y. u
STA $8000
. Z) ]( L* g) M2 P/ p PLA
7 Y, i2 n# m' f: f9 g% M2 x1 M ASL9 h7 x1 M) M7 W3 {: ]
STA $8001$ \# q- p6 u' R) b
ORA #$017 p `) P3 s' G, F9 ]" O5 s3 \
PHA( } o' z5 d( p3 i5 |
LDA #$07
9 a- y( A: u, `9 z STA $8000
* G D! W% V8 W& w# f# |0 s PLA- r4 H: }: l/ p/ ~0 i9 s
STA $8001- h# ~4 \2 R8 ]9 i* s3 F
RTS
4 U/ I( x- I+ J .ORG $7340
' M% _( p5 q- r; q3 X( N& FPPU_BANK_0000: ;精灵切页
$ Z7 H6 |2 q1 P7 h& ?, j PHA
9 E* E2 {% r* D; p ASL
0 b3 ]* ?4 h5 H ASL
$ [$ }; C" V3 k. f. j PHA: { C" [- M' S( X3 q
LDA #$00
! t# h4 S* ^$ r3 r' i& A$ f% V, b STA $8000
6 a# @' s5 q Y( ]- L7 t; N PLA& u1 M5 @6 Y2 a+ q5 j- B2 ]
STA $8001
$ |' m$ o2 C2 Z" n3 \% E ADC #$02
1 ~& R3 Y# U0 x( u% h6 M+ F PHA8 V( Q6 h6 W0 w0 n8 \* x2 l
LDA #$01
# M6 x8 y( f, {4 U6 b& L% H/ e# F STA $8000
: m$ K: t) l, l2 `1 v& Y PLA
! n! a7 x" j3 Q) l3 s/ b1 h STA $8001
6 R h) R% o0 n. E PLA: q' }, n, s) O' [8 v! G
RTS! z& ?5 ^+ {5 A( C# v
/ A, D$ y& ^6 s" p( i) v+ c
.ORG $7360
, I9 E8 T6 r* k$ ~* C WPPU_BANK_1000: ;背景切页
$ G) y& |, j. g/ {- A1 Q PHA1 I1 S b1 S" N0 q2 o% h4 ?# V
ASL; E' B/ }6 k- W4 C/ i7 K5 B
ASL& R' q0 r& N* h* C+ z, u$ {. O. @
PHA' c0 }8 k! V) U! k! A% g
LDA #$02% S: ^% y) k! w) c
STA $8000
8 R- Q8 p2 h: B1 \5 Y PLA
) C0 K% c h5 c, q3 L( Z STA $8001
0 \* @, h2 Q, V5 a. Y. Y; y ADC #$01
0 m% [# l( Q' O) \ PHA: x6 g6 W' u7 y t# a% j) R
LDA #$033 a0 Y& g. A& ^% j: K
STA $80004 h) h6 C1 u* X2 z
PLA
" m, \2 j) \( ~! F' A! d! t STA $80017 a- f8 X, D5 s/ z/ S
ADC #$01
! N. X; W m; G" Q! ?% B$ h PHA
8 G7 U. K1 U& n7 B8 P. a3 Q6 d8 L6 E LDA #$04( }: r) t* m1 m7 I/ o; Q
STA $80007 N P3 l2 r- F+ V
PLA' F) E$ |' \) a% C7 S' Y7 E! k
STA $8001* T- d0 | D# V* y
ADC #$01
' i0 q4 g9 A$ j: W PHA0 } x% X9 v5 X6 Z5 ^' W+ @8 b
LDA #$05
! s' @0 |6 k# Z* T STA $8000; m% y" i$ T1 s% G6 Y
PLA, ]5 t# m U3 C+ m
STA $8001
7 f* Q- a# F4 [2 G4 V0 c PLA* z* R" |% l2 e2 t0 ]* b
RTS
8 K6 F% @7 ?. Z! J! T. [: R$ o2 I/ H/ f3 i5 F, [8 X( R/ D6 [ X
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看，没有账号？立即注册
×
|
IP卡
狗仔卡
发表于 2017-5-20 21:24:33
提升卡
置顶卡
变色卡
显身卡