|
|
;[FC][最终任务mapper1切页程序]
Y* F1 m3 `- H" A .ORG $CD9B( j1 T ~0 q) s3 q
BANK_START:* a/ E6 J5 @& F$ `
STA $70
( L% i1 Z- b4 Y0 \* Q7 r1 S6 a$ y; L9 s TXA b1 x1 }6 L6 N; {- g- c) I
ASL5 T j9 n3 D0 A q
TAX( _6 g! Y4 w, P9 Y+ s$ M' ^3 ]6 }/ _
PORT_SET:
, _, i! v" v& o" {1 @ LDA BANK_DATA,X
) L( |9 Y* g( `7 [2 Z( } STA $6E
/ i+ V9 w/ b, U+ u8 Y9 G LDA $CDB8,X
K+ Q5 n" \3 L* A0 O; P2 O STA $6F
$ J- P3 v" D0 ?8 `8 W LDY #$00
9 ]9 | E4 ~7 K LDX #$05
; Q5 e: p5 \3 @+ z! V& X LDA $70
' P; A3 z' P, cPORT_WRITE:7 P! E8 k6 k D' m
STA ($6E),Y
8 b, t' e d9 G LSR
& f- ~( P% M( t+ W DEX% |3 j7 G% |3 k. C% H6 b
BNE PORT_WRITE
& |( @) H# L& ]' \2 Q- ]- h: q RTS
& P; L7 r: o/ R 9 C/ l' N# I( X; t1 E7 [) [2 A8 f
! w; c3 v' }9 J6 U a( c0 h# m
BANK_DATA:4 S3 ~( X6 F4 I- Q- ~7 z5 k
.BYTE $00,$80,$FF,$BF,$00,$C0,$FF,$FF" q, r# n& Z" u8 K
' X# }$ ^" |! W% m; L/ @3 q0 d
0 j" P6 u Y% y' T) i. x8 |;[FC][最终任务mapper1转mapper4切页程序]
: u+ T7 x% N* {2 [/ n; o8 |3 V+ N$ s .ORG $BFD2 ;初始化跳转/ U6 l3 [' Z& I2 [5 p0 A
JSR $FFC0
! A5 `, G5 @+ D
$ b% C7 C3 q5 W- I& g# Y( j4 E
) Q' r% A! l& e2 s .ORG $FFC0 ;切页
; B _6 A; L2 c' ~9 X8 W LDA #$06
9 c4 j. g2 E! f4 p: p/ B( E' w STA $8000, D& b! n9 |4 P2 A
LDA #$0E$ b2 w: Z# D$ \& h0 f1 I
STA $8001
0 N5 t; o% y' b! |: E* V JSR $8000
* j# @- l) g V3 r* }* \8 W RTS ! F/ G. e; O! H- y" i
* f2 d- G6 X# q+ c
.ORG $8000 ;数据复制
& B& m) I& A4 E LDA #$80
5 \5 M" V( ~7 G- W1 T3 ^ STA $A001 ;启用SRAM$ P0 K3 j" u6 i. G5 |$ J
PHA
% V; P. H9 R& V TXA
; Q( ` y) x# l4 V+ ?4 U0 |% u PHA
# ]9 }0 y. m3 w) d# x0 S LDX #$00
" V9 y7 z/ N0 Z6 ^: B. cDATACOPY: ;数据复制
, q' Q3 g7 d. T% \! c* k* V# C LDA $8100,X. s7 `6 r# y5 a! {. r x# f
STA $7200,X
$ ]9 v6 p: t* y/ ?# U INX
]3 }2 q* o7 X+ {# q; b8 d# `) M CPX #$00
2 d1 T1 o7 b8 I( r+ n BNE DATACOPY
; T6 }7 r, o/ F# s5 \ PLA5 b5 T/ ?1 s4 P% Y3 K. c
TAX8 ]. F- S# g/ P' K# y7 n2 ^! [
PLA0 u* @& k# v: f4 M/ n' K% t
RTS" j% R! v/ m. |! R4 p! L# ]
3 `0 n2 l: N' w1 D
.ORG $CD9B ;跳转到转换的切页程序" H# f- F! @% e2 l5 b+ d% c
STA $70
. c5 `$ x" P& h0 G/ ~1 a8 {. d! S JSR $7200/ O/ w) v/ v8 {! i3 C1 F2 ^
RTS7 ]: @/ M( B: Y) V( v( p' U6 B2 \
2 w0 H& \' G. b& |+ z, x+ A .ORG $7300
) E& F3 p& Y0 S+ zM1_TO_M4: ;切页程序0 W8 O% g9 O0 p5 t
CPX #$00, @+ z2 @6 L4 A0 K2 \; p
BEQ REG_SET
8 V7 H5 y% X2 K4 {% {2 t, ?+ T CPX #$01
8 d* n. @7 j& Z$ s BEQ PPU_BANK_00009 @( H# O- A3 n
CPX #$02
& w3 v6 N9 a2 D: d BEQ PPU_BANK_1000
2 a: w" M5 l/ e& {$ y CPX #$03
6 B& c- G+ E; N+ f3 [' H7 b( X BEQ PRG_BANK
. B: I& z" y" S4 G% Y1 {REG_SET:/ }" }+ s8 n+ ~ p3 e: O5 p
STA $A000, p: A8 d9 ~3 H$ r0 f; M
RTS
6 N3 J$ C; G4 x .ORG $73203 {: k9 c7 g* `. l
PRG_BANK: ;PRG切页0 }* l3 E& t: l1 p
PHA
0 i# _0 J3 \8 x3 L8 d LDA #$06
; N& G& m# x8 t1 |6 u$ A STA $80004 m, Q+ z, t6 E) k: M% Z
PLA
) s7 R' ~+ a Z3 o& s3 _' @ ASL6 G! w( w! n1 m
STA $8001
6 ?# ^) ?* `! v) P: u! v7 c+ R+ K ORA #$01. b$ }, ^! N% r4 o
PHA3 j) y! T$ H+ B p: D" m
LDA #$07( D" Z' z F- H, P) g
STA $8000
& w1 j8 k( `$ @/ c+ t PLA
. u; W& E f, n STA $8001
& `3 @7 o' T: W8 ?. Q. {5 V( H# x RTS4 ]3 _. N: _5 T, L c4 B
.ORG $7340& \- e$ f6 k5 z2 J* U+ `6 {
PPU_BANK_0000: ;精灵切页
% b1 v/ [7 M) c PHA
: M9 v8 R% o5 H) u5 H& A) p# O ASL
2 D3 R8 L& I7 @6 x7 G7 Y) ^ ASL
1 Z8 p- d6 u$ t+ v3 O5 z5 J5 ] PHA0 f5 G" ]: G, I9 C+ ^
LDA #$00
- i# F8 z9 G8 e X STA $8000" i! h) N" q, n+ S6 t2 }2 U( n9 O
PLA7 ?& j& C: Y8 z! }8 k* s
STA $8001. G& \' a. `8 V3 K
ADC #$02
1 I3 S' V& g" u" ]: l( r" a" z; l PHA
4 \* f3 }9 I. Y5 P' B$ [) h LDA #$01
, e% V, ]2 ?. Q; q5 F8 v STA $8000
9 U- ?3 R! i! p- S) e5 N PLA
w# ]! c5 j! @; e) [: s' J7 ^ STA $8001
3 d4 C- A3 f* k) | PLA F" y9 S, U c
RTS6 y, k0 \1 P4 ^8 \( W' e0 Z
( Q3 ?& x, t3 J D9 v9 C; D .ORG $73600 ]& u2 L" I+ y( ]: X' W# b+ x
PPU_BANK_1000: ;背景切页
" n1 |3 H u9 k; E2 B PHA) a2 K' s" T+ R
ASL
- a$ M+ ^( h- m- u5 d ASL
5 k- N, N0 w" b3 _, H. g8 e PHA6 Q2 @0 R/ d9 ~# F7 k
LDA #$02
6 y- z u/ [' y- b' d STA $8000# E- w1 B* B/ U7 [; H1 @
PLA
' I; { o5 X; A% ? STA $8001( _1 a. ~" k1 K" C1 [. ~3 C9 O1 T
ADC #$01% a' {0 [: Z7 h# c$ t/ Q
PHA( Z: w0 e: q! L0 n; I- |
LDA #$03
7 r# ~8 X8 B2 {# b5 e* g+ Z8 R7 D0 r) a STA $8000
, o7 {0 v9 D7 x6 t- @ PLA5 o9 |' p- q) C! g8 g. s+ W
STA $8001
, o8 x2 X6 {- A' p" S3 a' X ADC #$01; K% S2 h/ w1 d K
PHA9 t& B2 R6 S" s2 t% ]/ `' ?
LDA #$04
* V- C% `5 t& u" G STA $8000 t2 Z g* C+ C# J9 B; @; o# E
PLA
% Q# y1 B) V& ?; \ STA $8001" _* T/ S) d0 w5 ]6 u1 k
ADC #$01
9 x' |8 I: R a1 U" a PHA
C9 c; W/ k' q% V; E LDA #$05+ F& W7 b; Q, ~6 q; m
STA $8000
# {8 n F. F: v# H PLA
( A3 X6 x( t6 J& d/ [8 P! y STA $8001
% d( ~' |6 ?. o% P9 Z% ]/ i PLA) g# c2 _6 M0 D; L6 F6 t7 g8 ?
RTS) u) o* J; d1 P$ H
) m4 s) W* {* N/ a% u |
本帖子中包含更多资源
您需要 登录 才可以下载或查看，没有账号？立即注册
×
|
IP卡
狗仔卡
发表于 2017-5-20 21:24:33
提升卡
置顶卡
变色卡
显身卡