|
|
;[FC][最终任务mapper1切页程序]4 |1 n4 q/ Q5 y1 @9 |
.ORG $CD9B: a: y6 ~( c. ~5 R8 z: [4 I' ~
BANK_START:. y* i# t+ Y# J. M5 b( \; w- t
STA $70
4 S, F ~: ?" d( H# l5 u TXA
6 K# H. X" u7 K ASL' Y+ |/ ?/ i* P" {
TAX
# }% v* V0 ^( C0 l$ oPORT_SET:
3 k% v/ P G( L' S8 Q+ j3 N LDA BANK_DATA,X5 a- e, G" U3 r) G ? m
STA $6E
1 \- A9 @- H0 r LDA $CDB8,X* }8 w4 {3 D* r9 k8 }
STA $6F
; ~9 }1 O) L, s$ t LDY #$00
% Y# {2 f A1 i+ L& d* z LDX #$05
( U( a* T( c4 C6 G! W" m; L# I4 s LDA $70
$ e. W# r1 N+ R0 IPORT_WRITE:' U Z7 s% O( q9 h8 e/ u* B+ E
STA ($6E),Y e' c. A- v7 ]( g k5 Z( g
LSR
. _7 F$ F; F* h9 B DEX
; F; r, p+ X6 C1 B* \" b/ o; z/ V' G+ T BNE PORT_WRITE
& A6 S. d8 i% v) i3 `) p RTS
C( V! f* D9 q! ]% ?4 b" N 4 p5 f" i, S$ V% M/ @: S0 ^4 z7 r
4 p1 n, X2 G& Q! Y- nBANK_DATA:
9 p6 j- l8 c1 @) E) A+ X .BYTE $00,$80,$FF,$BF,$00,$C0,$FF,$FF$ c" Q! J; y/ E; p8 I) o
# \( b& ^% Y, Y( I( h% y / C- z- K# k2 I$ y
;[FC][最终任务mapper1转mapper4切页程序]$ E5 S3 H- j! Q& w# {) R& x# N
.ORG $BFD2 ;初始化跳转
4 M( ?3 E y+ k6 N JSR $FFC0! d2 U0 w4 U/ b- g2 z+ Q
" A5 L8 K- s! J8 j! Q9 S$ l8 q# G/ n
- q/ A* S* i2 `7 l& ~/ b9 y1 v .ORG $FFC0 ;切页: v* U* P1 k$ S" ~- b) R
LDA #$065 @0 s7 ~: w) j4 k& b+ T7 ?+ _
STA $8000. h) |& I0 I5 M7 O) a0 L
LDA #$0E# B; r- K$ [. n2 @! H7 D# q
STA $8001# n4 _& l# c% U1 u! m. b
JSR $80007 f/ e( g: G" s1 e% U5 c
RTS 2 d7 A: Z" z4 {! `
8 p5 ^' `- Y: L' ~6 g
.ORG $8000 ;数据复制
5 ?" Z* X1 S$ ` LDA #$80: d g' }% U Y& ^
STA $A001 ;启用SRAM
. C$ s4 t9 f/ N8 Y7 | PHA, `5 N3 ?' r+ m: M+ D
TXA
6 X. ^. s. h0 ]! W. ^' g PHA
4 _5 V' ] C* U LDX #$003 T5 W) s3 N9 B0 D, F. X; C
DATACOPY: ;数据复制
. w @$ a; ?# o3 K, p LDA $8100,X
' d2 K# i" S' _ E& x* G6 q STA $7200,X
4 k/ S( O) [; F6 L5 v% B" {. | INX* }/ l( K* ]: V& w7 e3 {
CPX #$00& U8 v6 e8 i) X2 S; g4 [, s
BNE DATACOPY
2 G* G9 N# D+ W PLA' G. S$ E" J2 f- K1 Z- h N' r
TAX6 ]* {6 s9 K; n4 b3 G
PLA
/ R2 p9 V8 H8 i8 { RTS
& l/ O2 }2 k/ w7 |* ? _ 1 O8 e2 \# x' U8 w2 {6 k) I* q$ F& i
.ORG $CD9B ;跳转到转换的切页程序
& h# U0 C/ c4 Y3 L' ^1 M STA $70
0 ~0 I' ]( A0 R) b. r7 J JSR $72007 m5 S) R. }" f+ `+ t( B
RTS; T/ @; b" E3 P# K
" T `( v+ |7 u4 J5 d7 C0 G
.ORG $7300% |* T, H% f6 ^$ Q% z) t% K0 h: m
M1_TO_M4: ;切页程序$ c; j/ |# }) k `) |7 Y3 ]; Y! }
CPX #$000 [. C! [/ |$ m- N
BEQ REG_SET
Y" Z" w7 c7 ]6 f CPX #$01
6 B X; `/ K" Y. x; B BEQ PPU_BANK_0000
) ]; e! B, w: x3 H3 c& F! t CPX #$021 v8 k5 Y7 d' F2 m0 S- B- M
BEQ PPU_BANK_10005 N6 c0 e' P* u6 a8 u% ?
CPX #$03* j' d" {. y% Y# t
BEQ PRG_BANK
" U, s( ?. O+ z6 YREG_SET:
) [0 ?% m. Z, A/ t+ f8 u" H; v STA $A000
- u, N. p( p( q8 L* h5 ^ RTS
+ m' o0 z" g3 m3 a" a: [4 X9 v3 l .ORG $7320
$ }; _) D& m* u- B# d, oPRG_BANK: ;PRG切页
2 j) N$ B6 [ J( e7 [' B PHA" S2 q* D g a5 D
LDA #$06
8 S* E/ h7 t7 U/ k STA $8000
" n8 |6 T% t. F7 @ PLA8 D6 m) W; U/ d3 d3 Q
ASL- @+ y1 C. p' E& P
STA $8001
t3 j% |" [3 E, u ORA #$01
; x* H" S5 W; ]! T) Z' }& ` PHA
! L9 z- Q3 |' Y; t |/ d' ~* v LDA #$07- B* ~: l0 o0 N# }! m) P @
STA $8000
* F) F. i3 m5 \ q PLA
- ?6 m }. q) K& h# H* z* o- y" u/ V STA $80019 Q( f( F* X& e1 Y/ H ]2 p
RTS6 k8 d. `5 v4 E. A! A- j$ P' [
.ORG $7340& c Q. {) a9 a. I+ k1 z- H
PPU_BANK_0000: ;精灵切页1 t. }, _: `7 r& x2 Y
PHA
! A5 K4 E9 |: p9 |% S9 K) e ASL
% H8 b- x) F1 T+ ` ASL; U# _* {* L5 }+ `8 {
PHA! G; j7 v1 f# f! o
LDA #$00
7 z2 G s2 F4 J8 ^1 i STA $8000
O2 M& w% ]& p9 A- ~ PLA% @5 m2 N/ u2 f9 ?
STA $8001
8 j9 S# ^2 i: T ADC #$02
0 W$ g0 h% }6 `% H* i Y5 [4 L! [ PHA( w4 I5 [/ g8 k' {: Z
LDA #$01' }3 Q$ P7 T: t% N7 E a
STA $80009 B5 P- }; g/ W D3 t6 k0 o0 D
PLA
: E9 y5 S, B% \' r+ p; o. A STA $8001) h$ {( r: `' D- B% P" x
PLA
' j/ T* `* O/ ~0 X2 W+ g0 C+ F RTS
' b9 ~0 \* u( c' x% d3 ~
5 c4 N/ ^8 O; }, d, g* J$ J( a8 E0 u .ORG $7360
; C: E5 L% _- WPPU_BANK_1000: ;背景切页
* V4 X: t$ J; H( \1 s PHA
, t0 [5 @8 z6 q* _6 o! F5 x& y ASL
6 e: H a3 A" X Z' @ ASL
1 s7 I: c2 }; \* N+ v PHA) A* u! A' n- a
LDA #$02- g/ T- y! e" w" ~5 Y- o- [( i
STA $8000
1 n" ~! I2 U1 U. r4 k PLA! D$ Z6 |6 u8 U4 Q7 W# D* X
STA $80018 i( b9 n3 N4 a! D( d: ?
ADC #$01
. C0 h" Y- V/ J$ a% \ PHA
1 ?4 |7 p' V. t) @ LDA #$031 C' \( B- f2 o5 C
STA $8000
! F5 ` D8 G$ C' J: ]( ` PLA- n8 m4 h! N/ A! s6 \0 `
STA $8001# {9 o \2 V0 x! v6 U
ADC #$015 p% B4 `# j( K% J$ e
PHA
# x2 |0 j: e) }% { LDA #$04
- e- Y# n; w- a- g STA $80002 M3 c- ^' T- k8 b* p% R
PLA
2 d$ r2 Y, y& H STA $80015 s+ s( { ~6 l% F. X' h- A* _/ _9 B
ADC #$016 U. t+ m" V- W3 J
PHA% \3 O# C: @- q2 s% d4 E
LDA #$05
( q- A( n& I U4 b: q7 d5 r STA $8000
2 Y0 g8 N& Q+ p* k PLA
: S1 l- t: K" m STA $8001
" F0 U0 a) R, ^$ }: h PLA
, V ` D$ u4 u& O* d5 y# ? RTS2 G% Z8 {) |% @( I% {
% \5 T3 ?% g8 b! H& y5 q5 B$ K4 x
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看，没有账号？立即注册
×
|
IP卡
狗仔卡
发表于 2017-5-20 21:24:33
提升卡
置顶卡
变色卡
显身卡