|
|
;[FC][最终任务mapper1切页程序]4 I. n4 k) K: c V# ~$ N% k5 W& T
.ORG $CD9B
1 c1 T1 t" r& L" MBANK_START:
& P. }) N& V6 f6 J5 D% w% f, @ STA $70
9 ^* z- g2 q- M TXA2 P* G8 U# r% M4 t, P) \( H
ASL; P! z& R) Z/ W; g9 `% H& L" L3 t+ M. [$ t5 i
TAX! t( W( b- T1 g% M/ i% b
PORT_SET:
' a$ O/ t. p* D' I* Y/ ?: q LDA BANK_DATA,X
% U4 k/ s# S* o5 i# o STA $6E
5 @# X7 M0 v8 ?' m; `$ H w% H! p LDA $CDB8,X
! s# l0 m. X* M STA $6F9 n0 \: v; Y* ^4 t- K2 @
LDY #$00' [# o1 ~0 c0 B% H( r0 g0 H2 B
LDX #$05
# p& ^0 A$ |& \9 S o/ L$ u: Z$ g k LDA $703 v" c E2 x( p$ _: W
PORT_WRITE:# H2 O1 n: h3 O( V
STA ($6E),Y
; P8 K8 r$ q; X LSR; _* V" w3 L c& p( \; Y7 d9 j" {
DEX
( }) H e6 L( b: V3 O; K BNE PORT_WRITE. _, F- H6 D2 y4 d
RTS# B! R- U) F' F4 _" G) K; Q; L' k
9 L# r7 K4 Q, k; w; a/ V
% e- B; I; k# J6 E6 K$ gBANK_DATA:
9 K+ G1 w8 B( p; l+ r, Y8 e. v .BYTE $00,$80,$FF,$BF,$00,$C0,$FF,$FF Z# C; n I: w% G
* |2 T! i/ k) f( J% u
+ ?% Z+ T% d# Y% T+ v& i;[FC][最终任务mapper1转mapper4切页程序]
4 w0 ^/ I2 l' m6 G .ORG $BFD2 ;初始化跳转* O( b7 t) m: U5 @8 T
JSR $FFC0( d( k/ P) J! C3 Y1 S
7 u m2 C4 f0 @8 u
5 R1 ?+ C. h Y0 f" i; Y* _
.ORG $FFC0 ;切页, n! x5 [ R) ?
LDA #$06
( p* b0 E" ?4 f/ E d& ] STA $8000' ?* s5 L* s) o$ u8 i5 C& _
LDA #$0E
! a% `! O6 k' H- r, ~+ g5 K$ f STA $8001
% x0 T( O( I. |2 D JSR $8000" J- Z; q. M' j
RTS
6 q. P B( h+ k' ?, |5 T1 i
2 ~# q5 Z7 n' ?, @5 k, N .ORG $8000 ;数据复制
0 d' u3 m- v R: x; n% n3 j J6 D LDA #$80
7 B2 R* |4 u" S6 T/ a9 H4 ]' A( _, R STA $A001 ;启用SRAM
2 Y/ @. E6 | O3 D. i6 P PHA
- y- n2 d2 |$ g9 T TXA
6 X* p- `$ k$ L. H" }+ U/ F, | PHA& y* a: d5 K1 s1 o
LDX #$00% Q/ R7 J7 L: I& D1 e
DATACOPY: ;数据复制 {: Q1 V# e7 o6 a6 O6 A: v: Z
LDA $8100,X) m z- o4 R4 z2 c, @
STA $7200,X
" X. ]' M. x2 g1 V0 V0 l# j) U% O6 `8 {4 K INX' D0 n9 N+ r! m0 z: F, { \5 ]
CPX #$00
- ~) w# k e# S" z0 W: H BNE DATACOPY
9 T5 b) l6 e, Q; e2 Y! J, ] PLA; t6 D, ~' ^4 ^ S- H8 [) D
TAX& _ G# A j4 K0 S
PLA
, W* ^' w4 P! p, X6 _ RTS
7 P( y! Q# q2 v- Q2 Q3 X8 h ) Q" _) B' I* F- n5 d X2 s
.ORG $CD9B ;跳转到转换的切页程序
* O3 T3 S: O% m STA $70
5 p2 u5 p' I/ n* d& f JSR $7200
! o7 ~2 U5 o/ e5 D- M RTS
+ O/ B5 O" D) T( n; k
$ b7 s J+ U: u! m N2 c .ORG $7300. V1 t% g: S+ z6 o' g/ g
M1_TO_M4: ;切页程序" S! i# L' u/ @8 f
CPX #$00
) g2 ^0 a" ^4 |0 Y$ F1 {' y/ B1 S( k BEQ REG_SET& y' n8 M+ _5 a* s+ }' k, X0 `$ ^
CPX #$017 I7 C3 _9 W# L0 k% R' [: P( |
BEQ PPU_BANK_0000
" a4 i3 x2 h! b2 W CPX #$02( ]. }, I3 u. I* j- S! _0 }
BEQ PPU_BANK_1000, o4 C8 p0 @1 F% |$ R |9 v- T. D
CPX #$034 f9 @. e# y6 T5 S* u. i! b
BEQ PRG_BANK+ Q, C; n8 Z: { }
REG_SET:
" b6 o& M% o3 @$ e! m( r7 ` STA $A000
# F$ l. w1 H3 ?1 R9 V1 B$ ~. ]) N RTS6 g5 j5 p. V# T
.ORG $7320: V. C0 }$ ]% M: ^3 T" f
PRG_BANK: ;PRG切页
9 [. i+ i: X( i: o) f' r PHA7 w1 B, {# ^( i0 u+ |) L! i
LDA #$06+ v7 {- r/ y a; L" S, |1 \( h
STA $8000
8 D& e2 ?3 P) R6 i. i( f8 l1 C, e PLA
: ^9 \( }8 I) C# M, q& v ASL' s- h4 G8 I& E# Z) i6 @7 I
STA $80014 O. W$ g3 x- ~
ORA #$01
. P; ~2 W! ^) r% Y$ r+ A, E PHA
, t0 g) f- G. {+ z8 n3 d LDA #$072 F4 x* E. k9 d$ V
STA $8000' {7 F3 Z: n/ @
PLA! H4 f1 H% r0 Z
STA $8001) _$ x4 U3 ~# P7 \* x4 |
RTS( [) I% D$ B7 ?+ d$ a9 c
.ORG $73405 t0 F$ G1 i2 u0 y
PPU_BANK_0000: ;精灵切页" j: P" `$ ]8 P
PHA
/ R2 @7 G5 X8 ^, o D ASL8 K2 B+ b T+ Q. o2 r! D8 p k
ASL
5 K6 }9 r* E: y* C) M. O( M8 t PHA* t/ m5 c) g9 @, X
LDA #$00' _. D) \. a# o1 x
STA $8000
* s6 a( T1 O- g G% } PLA
; v G3 w( S- t* q$ H# F& k STA $8001
6 m& O) n, y1 g ADC #$02% i! z9 P& |" q
PHA' p6 [" ^1 _* x& T' T
LDA #$01
Z' U5 y/ F! \ STA $8000
1 @" o: D- }( G1 o4 w& h/ ~ PLA
8 L4 K0 `- p% M p; S1 _( k+ F STA $80011 [) i V/ q# G) c) O" b
PLA
+ @2 c) Y- p2 q& ~! B0 Y) Q RTS' `1 s6 d. h6 |5 n" A
L5 |6 D/ Y; i' n) |0 E1 }, J
.ORG $7360
# F+ K8 ?4 F+ m+ \! `, J3 v2 M5 |PPU_BANK_1000: ;背景切页! e' x8 D0 ~- c* C; N! \8 q
PHA) i4 |& ?" V9 J6 r. Q, j3 Z2 ?
ASL
8 n. L, N1 j J8 q ASL5 S2 Z* e' A; d
PHA, X3 m+ A; u! M- d, B* `
LDA #$02
& X$ y* m9 Y3 a& P! X7 | STA $8000
: ^! x) ]) S6 a- a PLA7 c m( z! C! m( S
STA $8001
7 K: K c2 w! p. p, I. x T ADC #$01
, B8 n' u3 k& ?; g4 Y PHA. j( A: ?1 J( d9 {, i
LDA #$03+ v- `. M% X$ V( L, ^ M( O7 o; q
STA $8000+ e5 t2 J! f/ L5 _
PLA- R" G+ a6 j( z, F
STA $8001) Z7 d1 L! }% `& v0 O/ Q
ADC #$01
3 j- c2 S. z. ]/ N- j# i" B PHA
0 ?$ K+ S, j; L8 A. \6 O6 z LDA #$04) E3 |; Z8 ]4 ^, Q0 K: O: p" B
STA $8000% U. B* y3 [0 }7 ?$ y+ J
PLA
, |, ~" X. Y2 v+ i# R' E8 j STA $8001( u8 D v: ~; i U
ADC #$010 s# m( f$ ]7 E. `
PHA0 J" D, ^! X# D! Y7 m
LDA #$05. M$ S/ |: r! t8 |) Z5 C9 M" O: V$ K
STA $8000
0 X6 C/ H( \8 R& |% l$ h- I | PLA) i0 @( l5 W/ X. u2 h: \
STA $8001/ S& ~9 E3 c/ R8 d: ^
PLA
* a4 g% ~! r B4 S8 f RTS
) Y Q7 ^& M( u5 f3 H$ c. v) ? L: E2 z( L" H0 m; K3 a
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看，没有账号？立即注册
×
|
IP卡
狗仔卡
发表于 2017-5-20 21:24:33
提升卡
置顶卡
变色卡
显身卡