|
|
;[FC][最终任务mapper1切页程序]3 S! v1 ]# Z& Y% B
.ORG $CD9B
: A' d# m8 P: a0 sBANK_START:
" }) e# r& C- `! }; z1 N STA $70
5 z0 t8 G5 V7 Z3 x TXA f9 K2 Q. S( B9 X% f( C
ASL
! q5 v& [. z n# s TAX( }0 i5 O: U, B- U; i) Y. X4 r
PORT_SET:; f5 [+ P# o$ T: `1 y- Y
LDA BANK_DATA,X9 c4 u4 w+ j( A8 M$ `( k
STA $6E
9 S1 ^9 i5 h% P LDA $CDB8,X. D! C5 q- e' ^9 q7 z( e
STA $6F5 }& w( l r( h( H
LDY #$00
- Z8 ?9 D+ \* L: r( i7 @ LDX #$054 C7 T1 Q2 |$ K$ l& u9 u
LDA $703 s3 D1 _$ W' W8 ] M: D2 @4 L
PORT_WRITE:
% R: e" l5 [6 p8 r, n1 g* l9 L STA ($6E),Y( ~* s- b' o" ^7 b9 m
LSR& J7 B1 K$ m) b) ~/ a9 K
DEX
" j& N% N2 v1 Q: t2 F7 r5 L% q BNE PORT_WRITE; L- E8 \* \, q% H1 T" C
RTS
+ B' K9 L7 E, ]' @
/ e/ U& _( P- l$ @
; q* l% M: s) K8 ]" i1 _" {' _BANK_DATA:( D$ S4 F( ~; ^
.BYTE $00,$80,$FF,$BF,$00,$C0,$FF,$FF
+ r G5 k$ \$ ?0 I: i* r % G' D+ ?" i. |- p$ T1 H" H
x! }- u& ~" z8 ` s
;[FC][最终任务mapper1转mapper4切页程序]# }2 K) k% u) W; P5 P
.ORG $BFD2 ;初始化跳转) Q$ h5 c9 A+ ~& G4 h- R
JSR $FFC0* ?) `' P0 A& C6 R& F
" X, A% U, p4 h' r) B7 m" R% a
2 X# E. W" J( W% V .ORG $FFC0 ;切页8 P* r1 j+ }/ I7 U: j' ]
LDA #$06 w! l9 p' l2 h
STA $8000 j3 ~* U& q* ^% d% G
LDA #$0E
% k" @, A7 v5 |7 u3 T STA $8001
( ?0 _. A2 k% R2 g$ s% u- f JSR $80009 q3 l1 `6 k/ S5 d
RTS 0 [ T5 c7 Z) O9 f
- L1 [3 ]+ n" H. ^+ Y7 h2 F3 ^ .ORG $8000 ;数据复制! H$ c7 w2 v p9 ], Z
LDA #$80
7 w9 o9 [+ D/ n" M' ~ STA $A001 ;启用SRAM& l3 ^$ L) w6 [; y! Q0 c
PHA
# A3 ^* l% }) [. V$ Y5 J( j# O3 e t TXA
! `: i; {) x- N" V- Q) R9 N6 C PHA
, c# b0 Z0 x7 ]" m8 T LDX #$00# K; ?9 x' [/ A1 ?1 J* m, w8 c
DATACOPY: ;数据复制6 C" x- N' N0 u6 h# G3 J: h* u5 ?
LDA $8100,X
4 Q9 [% f( b& H* o- v& s STA $7200,X7 W% M4 x; i$ @7 O6 G6 R
INX
- h# W) H# V! \1 Z8 [# P0 ] CPX #$00
$ t1 J. J9 p5 ] BNE DATACOPY4 p$ Z' G- B& [0 C. ~2 w
PLA
8 N2 x9 Z) G$ @) x8 a/ T& h6 o TAX
" T2 [( V, E+ u1 S A# e PLA
3 w1 l1 K+ U; S, r3 V5 K6 R RTS
" e; `( i( k2 f3 m Z( \* N- `7 a 9 B3 v; _# _* h" F% x& |+ |$ p' s
.ORG $CD9B ;跳转到转换的切页程序
4 B% A, B8 u. t: }7 } STA $70
! W8 {2 @( I" r, ]1 V2 n JSR $7200
" f" {7 X+ K" g RTS d2 x0 `+ J; G0 d% h3 O7 m5 U
* _( E) U: L @$ h: M" M- d& I .ORG $73000 N9 U8 V) V" H" X' t$ H Z+ H
M1_TO_M4: ;切页程序
7 D9 b! G: f/ K CPX #$00
* C# C* H# ]6 J BEQ REG_SET
8 o/ p7 O# L3 _$ G CPX #$013 V9 b' _( w! b: i2 d
BEQ PPU_BANK_00009 g0 ?/ Y$ Y/ ~( J
CPX #$02$ M8 ^$ N. }0 K! Z5 Y7 T
BEQ PPU_BANK_1000
4 ?+ [% B7 c4 t% D CPX #$03- P1 Q5 g* _- V; R: S, d
BEQ PRG_BANK
; d! z y( D! m6 }$ mREG_SET:2 q3 {, D) S0 b& P4 m* Y- ~. X
STA $A000
`# d2 \. d* B7 E, M( j6 | RTS
' m3 s( ]* i+ }8 ^) A .ORG $73201 T, a) K3 y3 `! m
PRG_BANK: ;PRG切页2 C s) G5 Z# I I3 A7 ~2 q( L
PHA9 M! N H! d$ Z" w% `
LDA #$06; u& Z; }9 T3 u' c5 ~! J
STA $8000/ G; {3 @7 Z5 E9 [ @1 F" ]
PLA
! f! A1 _. w; v l, L ASL
* m) { v1 Y" S$ H STA $8001# f: n' E( w- J4 Z
ORA #$01
! q* i; F2 X9 _, W4 i$ ^* b PHA8 E1 v/ k) ]1 f5 u0 E$ n
LDA #$07
: Z0 ?% S4 {) Z+ @2 Q8 u STA $8000
$ `$ }+ I! n8 g! I9 S) _ PLA
& _- `" y4 H1 z; H* @) @6 \ STA $8001+ [* |$ n9 T4 X8 O- `. U
RTS$ v* u4 {( L+ F5 x( ]: ^
.ORG $7340( x( t+ s1 S5 j% d
PPU_BANK_0000: ;精灵切页
, k" O9 c% k' R; l! m" y PHA2 p% x6 A% q! c( ] _' v. r
ASL
* r; L) r0 J) X/ n ASL
' C6 V' ?7 ~' C3 ]* r0 R PHA. V% g8 r8 n0 L, O% z1 T; B
LDA #$00- I3 I0 v y% o* G, a3 b
STA $8000
7 P' }4 K/ T: v! P PLA' _/ e4 n5 T [% A* c2 l( t0 j
STA $8001
1 k0 L( k% Q" M# l; w$ k+ g( G: }3 @6 t ADC #$02
- N& B3 a' {' ^8 s& m1 ]4 I PHA
+ x5 Q8 t3 {2 M7 S LDA #$01
4 C' s$ k, V; K, M. G0 u STA $8000! [1 |; v6 `/ j% G
PLA( ^" j8 [& t% E) ?2 z# W
STA $8001
2 d) X! R2 B4 _( }6 f* C PLA0 C* }3 c* Q" V& t; g8 j3 Q
RTS$ }8 [( j7 p2 }( X, Q3 g6 G. F% h
2 ]: p% \5 w/ K4 t( N1 Y& s( B .ORG $7360# `: Z" N! D: u/ t
PPU_BANK_1000: ;背景切页1 m. F5 j! b/ I) f& J$ D$ N
PHA
+ X: o, ]8 F i$ c3 M ASL8 A0 Q7 M7 n0 b/ N+ \
ASL; I# Z s" N4 Q
PHA. H# R* l' u' |3 y/ q' l
LDA #$02
# L4 I: s; t7 l; D: b STA $8000
$ `# r0 L) d1 e1 v. C PLA$ o: r1 E( J. @
STA $8001
8 b0 I! u' M! O7 `6 u. A ADC #$01; E$ p# r; H; b
PHA4 g' ]5 O1 B# q; x W
LDA #$03 t0 d, U4 U) m: I- N
STA $8000
) c" P! S3 Z7 L% M; K/ \; _ PLA. \% w0 K( A. ^7 V2 v4 e
STA $80011 s9 @$ T: W# j
ADC #$011 W+ h# p% a$ f9 J" y
PHA2 f* z3 m# z# D! v$ ^
LDA #$041 V2 W7 V+ ^6 K; F6 s. K& F
STA $8000
3 q2 T' |3 W" v. Q/ Q5 Q: }/ r PLA
; H: W4 f1 @- R- Z STA $8001/ b& d6 ]9 C" V
ADC #$01: v; |" i) D7 i4 [
PHA# W% P3 {' w0 r/ E
LDA #$05
% J8 q) K m/ h/ k( `) } STA $8000
6 Z' O g9 A: a, m: J! o' k PLA1 F ~' x0 f( `& z; q6 ^ M
STA $8001) F( m7 F8 F; I
PLA" U% C2 c* v- N+ X2 h1 _7 X1 V
RTS; w% k0 A: J1 \/ i- ^* B
+ q: |; v, C o8 T/ d- m. _: r |
本帖子中包含更多资源
您需要 登录 才可以下载或查看，没有账号？立即注册
×
|
IP卡
狗仔卡
发表于 2017-5-20 21:24:33
提升卡
置顶卡
变色卡
显身卡