|
|
;[FC][最终任务mapper1切页程序]
$ ?4 E) ^, N: H) o .ORG $CD9B6 e% w( W' D7 _0 }
BANK_START:
" w" p9 z, A) s/ ]1 F STA $708 p% Z @8 O$ b4 t! ~. d
TXA
, o3 O2 s" [, \0 W) O, d ASL
: ?3 D1 Q/ ~! e3 Y- t7 P TAX6 d( G2 h' C0 ^8 c" @3 h
PORT_SET:
! `3 R# j% A! E* K: [ LDA BANK_DATA,X
6 F# S: W, F2 Z- m+ `# |, G( k STA $6E! |$ Z$ g; y& H/ t& Y6 m7 f
LDA $CDB8,X# {) |3 c% _! W) x/ G, D
STA $6F1 B+ c- o; u9 m3 N' B: l" W' O$ M
LDY #$003 [$ b6 g/ o; S0 F/ r
LDX #$05
7 `. ~6 G$ M& X LDA $703 S- @# ]4 Y" T- ]: Q
PORT_WRITE:3 ~. r4 u. _% x5 k6 b8 p+ {: `$ R
STA ($6E),Y4 Z* d( g, X# d7 `4 [
LSR
/ L' x& m2 [( ]: T# O, k: j DEX
; F" C/ D# c5 Z. p! {& F BNE PORT_WRITE
, J6 T) A4 l1 W ^: A/ J RTS
- _' \: u3 ]1 }, N 2 Z) h- _6 @8 z% c" [" f
* e! l$ v5 O! M" C$ `- ^BANK_DATA:
$ r" L3 d6 H* h* s' O! L5 O( h .BYTE $00,$80,$FF,$BF,$00,$C0,$FF,$FF
6 d* o' \$ q- y5 N% r! y & T0 p. S6 F& l, ~- o
/ a/ \) s2 M' d- e! q3 Q6 @$ C;[FC][最终任务mapper1转mapper4切页程序]
( Z, c2 f# j1 M8 f3 u% Y .ORG $BFD2 ;初始化跳转0 U& W. \$ \% k. z1 Z* E
JSR $FFC0
+ A g4 C- ?6 ]2 }7 B* o- m& c7 p; H4 l/ q3 y( Z3 p) t0 {# g* _( ~
) h+ z' q# U& M, f .ORG $FFC0 ;切页9 m- R3 M3 l3 {2 T
LDA #$06
) t2 a! K; H+ y: g' ^ STA $8000
% h- J8 c/ f, M- U LDA #$0E5 l# r; {* q$ J% h* C" t
STA $8001
# T+ ^8 c8 ?" n C9 G JSR $8000! W# U2 q% m7 g* {
RTS " O3 g- L$ L( J9 c* @
7 |4 k( c+ K% f& ^( ~6 `
.ORG $8000 ;数据复制1 B: O' m1 ~! l2 @% x5 L) I" b
LDA #$808 j# s. H$ v% Q4 y7 n7 K3 I& I8 x/ X
STA $A001 ;启用SRAM
6 L& H5 O. [* y- a' W% K( }1 o: s" W PHA9 S1 X) _! u/ e9 A2 q
TXA
* d! @/ m+ K: u; a PHA8 \ L$ m5 R$ _
LDX #$00. w4 [% B/ t; y _5 T
DATACOPY: ;数据复制
+ i! e) A" y/ g" \ LDA $8100,X) M! k d( t/ ~0 a$ u6 P9 u2 I
STA $7200,X! O9 M# O: B6 F; [: c
INX
' k0 t: w) x: X; |5 d CPX #$008 a+ O% i2 z! F; I
BNE DATACOPY8 M, u/ l) L) i' ]1 M' _" k5 H. \
PLA
j( l6 I0 }, `. x- E7 t TAX4 u N r! _# \! x) n6 D0 b" q% `
PLA
% |' ]# J7 i2 l2 s- h RTS
0 H" {; h2 u7 e4 X+ o1 z
3 [, d: c0 v9 _7 z, Z .ORG $CD9B ;跳转到转换的切页程序
3 m& M0 ^& w' o$ \) s4 r STA $70; r) P6 J# L6 e/ \7 T
JSR $7200! g. P$ \& h: i. W5 N" q- }
RTS
; d; h( t1 x& y2 I
; N7 p; @/ p7 k3 E4 | .ORG $73001 {' {" R; Q' E2 V3 Y- b
M1_TO_M4: ;切页程序
) U/ ?% b- {& I+ o$ w! I7 } CPX #$00( g* ~! e- W) L2 Z* B* q
BEQ REG_SET5 S& @: s8 a8 u0 P; t
CPX #$01
9 I/ e/ Q, s2 j BEQ PPU_BANK_0000
, S6 u g3 f6 U! \8 [. O CPX #$02
$ j1 ^" b- a: d7 o. A/ h% H" o BEQ PPU_BANK_1000
% P9 l/ F# Z1 J6 C0 Y CPX #$03
3 z: X, ~) L* q; w9 @4 o @ BEQ PRG_BANK/ D0 G' | ?# C/ B8 k1 C, {0 H4 ~) r
REG_SET:
4 _9 `' R7 u2 u+ K7 S STA $A000
0 c8 K2 g4 {! G# o5 m( G RTS- J" E, `3 j- f9 I$ e/ X* U' j0 ?: _
.ORG $73202 {8 _$ }$ |, Q. u' l: Q
PRG_BANK: ;PRG切页
3 z* N P8 v7 f- \- D: \" a PHA# R1 X% }8 n" b5 I( w
LDA #$06
$ `$ x) y' U: a' m" A STA $8000# j' `+ @) A8 v4 k/ N: A
PLA
8 X3 G4 A4 z" z0 W$ ] ASL* C0 b# }9 t9 D0 }5 B8 ?0 Y. m
STA $8001
$ p/ B. m3 O. }- Z7 ~% @ ORA #$01
o: T: b, u! Q+ Y+ c) T PHA6 W2 d0 H4 v( k2 w5 W
LDA #$07
% Y8 j( ]# z$ ? STA $8000
/ K$ b+ o8 l) r* T! h2 t PLA9 r. X# h9 w9 ]3 q; Z4 _
STA $8001" N& i; w* F* Z2 Z
RTS1 ~$ v& K8 F1 c4 a
.ORG $7340
. V! W# U. h, d. f# `PPU_BANK_0000: ;精灵切页
; J0 F7 d1 R9 C6 e, B" K6 C PHA4 i& v9 h j* [& {0 n8 h% w0 _
ASL
* J& f5 C8 B. ~ ASL9 J4 \4 g x8 o3 i2 h( {0 z
PHA
2 n8 m2 Z' W4 x' D" o' X LDA #$00
2 O* A! \7 b1 y; p STA $8000) E, I2 S9 M1 A4 z' L" w" x/ X
PLA X" n* f C( y# Q0 Z: f" k
STA $8001) L' |6 T: b$ T8 ]+ ?
ADC #$02, C$ ~) g& G/ F0 ] H7 Z" `8 V( K
PHA
& Y. i0 S) f" Z' \5 q; q" h3 y4 |" R LDA #$013 Q$ T* M: @0 Q
STA $8000
8 s/ S# M: ?7 W5 A3 @7 T. {0 K+ B) U PLA
+ I1 D& g7 H' d" Y4 C9 t1 D4 e% x STA $8001
7 R! s0 j$ M1 X PLA
7 E7 w1 y9 d2 y" j RTS2 Y. ?$ I- q9 B7 i
2 k0 S l& V9 _( L2 p .ORG $73605 _: ?5 R( P- M b
PPU_BANK_1000: ;背景切页( K. h# N: e) L# j& ^4 B
PHA4 p# `% @' N! n: ]4 r" C8 D& G1 H+ ~
ASL: L9 q5 @' H* E2 s( d
ASL
# `2 v3 g+ r2 s, v PHA3 g3 v% g* e, O
LDA #$02
; o( Z3 w0 f4 k) W STA $80003 c# }" T) X2 [5 y- C, P
PLA
; Q( t3 }5 s- b3 D, l3 ? STA $8001! P! h. J1 x: q0 v' D2 \# z3 |
ADC #$01+ g, K3 o, _4 N7 t& ~, x
PHA; m, g M' C4 q/ N4 k5 n% j+ O
LDA #$03
/ T9 v9 |5 r" O$ Y( e8 h. j0 x STA $8000
0 [0 T' z: w& m& w7 ~! A+ o PLA
! X ?% G1 C" g STA $8001
2 @: D1 S, U: W% q4 z ADC #$01. B+ |) g: [) P+ S# c! w
PHA. k9 ~' Z/ M% L# x8 a+ P
LDA #$04
6 d* ]* \" y) W STA $8000
6 F0 ^4 ]* k5 t! u( W4 V) D PLA2 j6 D9 n4 n6 G, i$ S0 c
STA $8001
0 |$ {$ {9 Z; h1 ? ADC #$01- n+ X; g" F+ w t( T4 J
PHA
$ I0 {% t% G2 O5 { LDA #$05
! L+ n2 J% @* h STA $80001 Z6 i, X W( J& k8 d) u
PLA
) X- c' l2 B7 S L: S STA $8001
7 x. W* }8 k) M1 l PLA. Q6 J' r, @+ U! y
RTS0 ^8 G3 ?, W4 H
0 M5 k$ q0 f7 I
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看，没有账号？立即注册
×
|
IP卡
狗仔卡
发表于 2017-5-20 21:24:33
提升卡
置顶卡
变色卡
显身卡