|
|
;[FC][最终任务mapper1切页程序]
4 @: t+ P d+ ^" S9 ^0 S .ORG $CD9B6 V+ A! t4 R; f L/ h& Y! I
BANK_START:7 K( z: H- {/ T8 @2 a' Y
STA $70/ R/ E3 J1 C. A6 f/ J
TXA
( G7 X5 ^' L( [; w, a2 R4 A ASL: m- W, ]* ~2 x8 c9 Y& k
TAX7 B6 `4 q/ n; R/ L
PORT_SET:
% f* @7 \4 ]8 \+ i2 z% C2 W! ` LDA BANK_DATA,X
2 p2 `# g9 }* ]. Q0 B6 `8 \ STA $6E
, a! g1 l5 X; d/ k& A LDA $CDB8,X5 q" n: S/ h8 {, B( f# b
STA $6F
' \- g. j B+ Z0 _0 P LDY #$00
5 a* ^1 v# E* K) H. n LDX #$057 n& O& G4 B B" o8 c3 T' m3 X
LDA $70
0 }; C t- O$ W3 }7 R, @PORT_WRITE:3 [$ b% L& L3 S1 l1 |" _
STA ($6E),Y- x* N- c# s( K! P- R
LSR
8 Y( z4 [0 j7 T* k" F- d {0 `8 _# @5 f DEX- d$ e# b& T5 |6 N5 A8 h
BNE PORT_WRITE& R# m. n6 b) P* M" b
RTS- l# X- d3 a& |& x
* g; M0 H# Y" t/ F 8 V0 t9 b8 {2 I% `; q
BANK_DATA:
9 h- }- E* B9 ` .BYTE $00,$80,$FF,$BF,$00,$C0,$FF,$FF. V$ [1 K2 R! g) h+ {. f3 P4 `4 P
* R. w, l+ ~2 _1 m
. t9 v7 z' _. O
;[FC][最终任务mapper1转mapper4切页程序]% x. H7 B" l* b
.ORG $BFD2 ;初始化跳转
( p% W$ m. X8 J8 L" a JSR $FFC01 n W0 G/ o! X2 A# V5 P* B/ u3 R
- E2 i7 Z& c# O3 H A4 |
{7 Q, O O/ w# c J" _. Q/ T
.ORG $FFC0 ;切页- Z6 ^! u! j5 M' e' R- |8 B3 M2 _
LDA #$06 O' s+ F: C2 G& r% M5 L
STA $8000/ T+ ?! y% l7 U3 }' n1 L, K- V' ~
LDA #$0E
0 R, R! h7 U/ F+ }( y& _ STA $8001% C% d4 n/ ?8 @, L7 B
JSR $8000
- T$ U) K9 r6 u. K& g RTS & _; ?: f5 Z4 G& S
' o/ S3 o& o* V1 g b$ v. f- A .ORG $8000 ;数据复制
9 }/ e9 t3 i. C9 Z" A" c LDA #$80
& z- H4 B, W' d3 N STA $A001 ;启用SRAM$ \' T9 V/ c8 r8 V3 F
PHA
# _& ]6 b: J* J) [4 `9 R4 S4 \ TXA) K- L7 t. E7 Y
PHA
% V1 i7 ~$ D' t) v' l2 p/ ^, u/ M& n LDX #$00" h$ Q& n9 }+ _. j# f
DATACOPY: ;数据复制
# ]8 I; T" b H LDA $8100,X5 |4 g- v3 A6 ?. F
STA $7200,X
6 }3 w+ S4 N( X; d& y. F5 B5 Z INX
I0 Z& b! m, p5 J: V CPX #$00% J: o* ?0 c5 B+ K" H0 K1 d( Y# P$ H
BNE DATACOPY' g, P% n0 L4 D8 Z8 V0 W3 Z$ m/ Y
PLA
/ E2 K6 ~( }* ~, e TAX+ K9 q' f# V7 P3 d, P+ G# }
PLA
) U# E* ?5 @/ f! j& f) N( ~ RTS
" l& K9 x7 d/ v% Q' V / i. _5 L0 \" ~: }# M
.ORG $CD9B ;跳转到转换的切页程序
2 Z7 X- V1 O% g" m6 i" r! Y STA $70
* i2 A1 @- a- Q) R. L7 B2 I JSR $7200
$ T) E( J2 _1 j8 T6 h RTS
, v6 b& N6 F! H' G! W; _5 G
5 b5 e+ F9 ^: ?( r' J8 y# h# `$ b6 h .ORG $7300
. l5 c( y, a5 |3 I$ F4 aM1_TO_M4: ;切页程序: V" B4 I; F7 }3 X6 {- k
CPX #$000 G8 A; b7 Q% H0 F
BEQ REG_SET
? \( U, Z9 D$ u CPX #$01, w, V% @ B7 r. ^: n% Y" N' K
BEQ PPU_BANK_0000& O: r3 {! ~+ y4 ]8 n% Q
CPX #$02* p2 G9 ]: `' g! b. w: |: Q
BEQ PPU_BANK_1000+ [% p' U6 _, W9 f3 Z+ Z
CPX #$033 l: O# u) _$ E4 B; }, I# }! h' J$ M
BEQ PRG_BANK+ J) ]- `0 I0 V3 p! a
REG_SET:0 u% F, W9 H: U# r
STA $A0003 I0 l6 w4 E6 E4 [% A
RTS
8 _4 _/ N) j- G# d .ORG $7320/ }6 }& {5 a3 d$ z; ~/ A! b& D& I
PRG_BANK: ;PRG切页: v( O! }* z$ H; W
PHA0 m5 l5 ~/ m9 m) Q: z" i1 X
LDA #$06# i* Q$ J! A6 Q, X& x3 G
STA $8000% @# s: E, }3 s
PLA
8 E, o/ } C: T ASL2 _( {+ y, D9 v" O
STA $8001
( e* t! r1 Y% C9 s" W5 w ORA #$016 L6 S4 p. y3 N, z! ^: Z* i8 H" g* A
PHA! @& r0 }( i4 t; z2 F$ J( ?
LDA #$07& f2 O8 e4 c) }0 A. \7 K
STA $8000
2 N7 L# o$ N6 n5 B$ Z PLA
v7 O# ~1 U" K% u E6 L STA $8001
$ b8 Q- p. i7 m7 s. [ RTS1 a1 a& B- {6 L1 t! F$ `- i
.ORG $7340" X6 |5 y' L d8 \5 F2 m
PPU_BANK_0000: ;精灵切页
+ b5 }) F+ e/ H( X! N) h/ | PHA
8 L; N/ U& F2 E. y' F ASL" a% b7 ?1 v, G" p* p$ h, H6 N
ASL
) l1 m1 d( M4 m1 [ PHA; U. q6 k1 U* v' V$ N6 e; ^7 T
LDA #$00
$ k- B* B, ]: Q* {- s STA $8000% Y, q( i6 ^. D& D( q
PLA% F. Q& G' _3 p/ r5 I- S' l
STA $8001
- N" h! i7 k4 A6 s+ q# ? ADC #$02
4 q4 c7 o Z0 @) z( S PHA6 t7 I( ~5 D3 ^' R5 j4 F0 w
LDA #$01
% X, x5 Y, ~) G9 _. r& Z' R: j" Z: p STA $80007 J; g# p4 j9 w* E+ L
PLA# h! j M. [+ w* J7 r8 B
STA $80019 T/ E: h8 p( e- I* f
PLA
6 ^& j4 q' y& ~9 r: n- d( O RTS3 y" k1 d/ M& g; C4 x- {; q
- n" {5 c9 e& H7 B .ORG $7360
! Y! Q) [8 W. I) |2 B k- H9 M) ]PPU_BANK_1000: ;背景切页
# z7 a6 }/ b" c% [0 p8 t/ W% S PHA
; Z6 F& _8 }' S) N$ j+ k% {# S0 g( K ASL
! e3 F L) _) s- }4 ~$ J ASL' N8 M U& R' y- u
PHA" f. z$ m" N+ L# K
LDA #$027 z" x. d# O7 @% |( ?
STA $80005 T+ [5 @, `' s8 U7 P* f/ D( p
PLA
& {$ }& _9 t* M3 g STA $8001& }0 Q& M$ ~% k. g' ~2 o8 ^* M' Z
ADC #$016 A0 A0 Z/ b+ S& k
PHA& g: z; P8 B3 o3 Y9 z$ s8 K
LDA #$03! l1 x# z6 R2 ?/ z Q" U1 i
STA $80000 S$ G1 o/ `1 M; Y. i
PLA' p; V& @& p0 Z. \' U. T( g+ d
STA $8001
: F6 ^! C* O5 e: C ADC #$01% E0 m1 E4 R1 ~0 K
PHA; w5 E; M9 v$ O* ~% m1 }+ F O
LDA #$041 q# P3 I8 c( z& A- e3 B1 I, }, N; ]
STA $8000
3 b) y. J4 A3 t1 ]0 i! A/ d# N0 W PLA
7 k: ]. k6 o( Y5 y5 D; c- M STA $8001
2 Z8 X6 k8 M4 |( }5 K/ E0 K ADC #$014 l" D5 G' |% D, I
PHA" M. ?8 k- f0 a( i# e. J" A
LDA #$05& ~0 x0 X4 @, R t. p6 Z" L0 f
STA $8000
8 l# d; d* m, d' w: V* Y PLA
- ?3 l8 I! `6 B! r STA $8001
) q& l6 y. x O i6 L j PLA1 \# ^# t' e. |
RTS
. j6 a, b& C1 |. y ]/ w
7 _6 Z* l6 x# S/ g |
本帖子中包含更多资源
您需要 登录 才可以下载或查看，没有账号？立即注册
×
|
IP卡
狗仔卡
发表于 2017-5-20 21:24:33
提升卡
置顶卡
变色卡
显身卡