|
|
;[FC][最终任务mapper1切页程序]- b/ j' C0 n8 o2 s9 v' N6 Z% P. _
.ORG $CD9B! v4 y L# ^5 S, B9 r" z" m! }
BANK_START:7 Y! F0 c2 z P( {
STA $70: r9 i% B, F. ]# |* w* O
TXA( j& a" r8 G: J! Y z! h/ s: @
ASL
6 K) N/ `5 E# U! W% D0 z" _' |# a, ] TAX6 u* P' D7 a/ r7 k
PORT_SET:) [! _8 U! d6 o' F* Q- _
LDA BANK_DATA,X
, S' r+ N' u) [7 k STA $6E) s& c( H$ w5 ?0 F, O
LDA $CDB8,X* C8 [4 m2 e0 _# x, l# M
STA $6F
2 p2 c) a4 t: G LDY #$00
' K. F2 ?" W. f- @ LDX #$05* [9 D! J& B( c$ ^( H8 Q0 V: o
LDA $70- |" u1 J Y6 R/ d6 x" ?# D5 D" f
PORT_WRITE:0 o2 {; {9 u8 I, }- f
STA ($6E),Y
$ W! j& ~0 P( b, [# C4 ?. o4 F8 A LSR
) K3 L3 Q x9 B. J: o: ]( [. Y& g$ p DEX5 i& E: ?' @& a9 z7 l7 z( f# K
BNE PORT_WRITE
G7 y1 O* K } m RTS0 N$ m7 L# K6 L5 @! N
+ `, B4 p3 E* D; P& n- F0 X
: k$ u4 B" F& B } W: @$ pBANK_DATA:
2 R% C( W3 n3 z$ J .BYTE $00,$80,$FF,$BF,$00,$C0,$FF,$FF% i# D+ t" z8 C3 }7 C- |6 M% ^7 G4 Y
. _, P) w& I$ ] ^9 i8 D 6 ?/ g# \* Z; M$ q @# b
;[FC][最终任务mapper1转mapper4切页程序]& E, M/ V" \8 C4 i
.ORG $BFD2 ;初始化跳转5 t4 @% A# V4 D% F8 P# x& H$ z$ o
JSR $FFC0
; c( ]" t3 H4 t8 L
: `" p6 s O6 s1 `
' `/ \; f3 p. g0 a8 h$ a .ORG $FFC0 ;切页
9 n3 A: u2 k$ g' C! v) J/ F LDA #$06( Q/ b5 [( H5 ~3 ]( o0 f
STA $8000
, r. m, \2 b; H! |4 s0 k( F/ Z LDA #$0E' O6 e. W. v0 a
STA $8001
. T" {5 S( B+ o0 w JSR $8000
! E$ [& y* ?# f0 S RTS
9 ]. _5 j! K/ W$ z) H- M
" @9 c& k/ S' o, D .ORG $8000 ;数据复制
6 ~( r) ^' Z, Z LDA #$80. _8 d' W6 o# @) n. S; h0 D
STA $A001 ;启用SRAM
& @: Q0 l9 q8 A* v# | PHA
. c6 c4 x9 C5 s* s0 y4 H! D TXA+ Z0 b. O- i2 R7 V0 h; D& E
PHA
o2 b' G9 w% Y) s0 F) c5 N$ ?% ? LDX #$00+ ^" n* y+ i1 n; c
DATACOPY: ;数据复制
Z0 y7 @: P, Z LDA $8100,X
! n: r$ m5 w3 g3 {2 \5 f. N STA $7200,X
" [. c; l! g2 M; f- t7 w INX
n/ C; j9 H: H" U/ c, q2 | CPX #$004 t0 s3 | \8 a9 a% }# U1 R
BNE DATACOPY
, m' r% Q Y. M K PLA: I! s( V9 g: W \5 B k: s5 [2 q
TAX
1 N, k7 K/ e* l- z PLA; ]* \' |* `9 f1 V8 w
RTS
# M: ` i7 G- K8 G/ j! | 0 B# P- t, t% c
.ORG $CD9B ;跳转到转换的切页程序, u2 v- s' t3 u
STA $70$ L5 }5 x$ b% `7 w3 s
JSR $72004 s" y! l$ B R( X3 D+ n7 b
RTS, V: q! z. ?9 t+ k
" q$ R6 Z$ w! Z .ORG $7300 i5 Z& {. @5 u+ h/ P. O$ Z; l Q
M1_TO_M4: ;切页程序+ M+ d( T5 [, e" O1 Q7 A
CPX #$00
/ F. N& L9 Q1 Z, [( E0 D6 F9 W* Q BEQ REG_SET
0 ]: |5 {+ ^2 {8 j O" I CPX #$01
$ g0 P& o4 h0 }5 Z% ?) A# E0 a BEQ PPU_BANK_0000' n9 i! q% _# w) Q9 B( e
CPX #$02% T: h9 k# Y3 W! \5 n3 T3 \$ K
BEQ PPU_BANK_1000
5 ^! |7 K) \; E5 a3 n3 o3 K5 K9 D CPX #$03 ?2 _+ F& c. }0 I+ q) h" M9 X
BEQ PRG_BANK( L# i: t0 y7 M: v: C( B
REG_SET:
0 q! s) l% k% q( x" |$ i8 B STA $A000/ Z" x! s C$ i, `* @ G
RTS5 p' k8 \* p* h
.ORG $7320+ T$ B; O' o) W' K7 K
PRG_BANK: ;PRG切页
* j3 ~- \7 l# ^6 `" j1 K PHA/ Z! M3 C M0 @& N) k% Y$ M! ~9 ]
LDA #$06: Q% {8 o2 a5 }! u6 ~
STA $8000
- k1 {& k: }6 ~, o' a- n PLA
7 `. W* Q, V h X( C' d- L ASL# T+ m$ I: N% U( X6 P$ H
STA $8001
0 C! i/ M3 `- ~+ p+ ^0 J ORA #$01
2 @* }2 v, d' { PHA4 k- `* p/ L5 m: I v, g1 `
LDA #$07
6 f$ i2 R* ]' c# J: X2 v, o STA $8000! j, l" \% P3 `, W: D/ P* s
PLA* @/ J8 D- H" v4 Y
STA $8001( k, H" ?& o o9 d1 `5 ]+ r0 c0 L
RTS) D+ O- P k* n0 H4 h- u
.ORG $7340
; ?/ c. k2 j$ [( O1 l# NPPU_BANK_0000: ;精灵切页
5 X# f" f5 _# D PHA
4 {( y; B; Z; s7 @8 Q2 ]# n ASL
; ~! g# l# a$ R ASL8 Z d: E y- Q5 U- E, ?
PHA
. y" O9 J' Q# b2 t% i* F LDA #$00" i% d. S( P9 G4 C& p
STA $8000& i- i$ s. ]4 {; N( m& ?8 w
PLA
6 U4 Q% I$ V- r STA $8001
1 \% z- p+ Y* m% q& ?% m% v ADC #$02- |" s5 Z' Z2 S7 R) ^, Q2 k
PHA
- b+ z- z# b# I- C LDA #$015 _4 N6 w1 i8 r% ?+ ?
STA $8000
$ ~7 F: T0 c- K1 l1 _; E PLA! p. u6 _ s* _* S+ j0 B
STA $8001
- w1 ^3 d5 K1 p/ Z: H; \8 p PLA: i! i+ `3 w' R& s' }5 y& I! R
RTS
" ?( U g; l) _1 ]
; s, Y. s- i7 t! x3 m .ORG $7360
3 v. g' s3 k$ z6 N( T8 C; {PPU_BANK_1000: ;背景切页
# I4 W+ {* ?& s7 l9 ^* l PHA
7 d) ~/ R5 O" Y) h; L, F$ m, I ASL8 i& V1 E9 r" m
ASL
$ f' ? Z) ?% |5 y4 n PHA& k2 k# I4 p7 v# F1 c
LDA #$023 J" b d( {7 N
STA $8000
( @# b: u2 |+ i/ a2 q% \; ?6 H# s PLA
+ |, P8 I8 h! E& B$ |$ V+ V, F STA $8001, J$ ~- {0 D% d0 u1 {; j' H
ADC #$010 k2 H- N0 T4 K8 _' Q4 E1 p6 \
PHA% L" K& ^8 r$ p: C- j
LDA #$03
w4 K6 O* L/ `3 ?+ g+ g, x STA $8000- ^4 P ?1 _' s% X5 {
PLA
3 U4 o/ A/ N0 ^# D STA $8001& m C, k( b9 [3 A
ADC #$018 {$ \0 n& o+ E
PHA
3 Y/ ^4 f" `7 k LDA #$04+ P9 N3 _/ o" F- U% o
STA $8000' H& N+ }! `! v8 ?- l% p
PLA
! b s6 r; z1 N( [ STA $8001- j. ?! P* O; F) ?
ADC #$01
0 h# x) b) I9 n$ ^+ x4 | PHA7 m# a3 R3 I$ D; S) E/ s8 w
LDA #$05
* P0 [1 a" b1 l ]' S STA $8000
3 ^5 F8 `$ J* p. e2 W1 h* i PLA
( @ G" |" M( L) E STA $8001/ o7 \& T# {: w( p9 }! X& m
PLA
' H; b# a0 T/ a! B, _& U$ G% d) x RTS" u: ]$ P( h" n$ k7 `
/ U$ j1 z2 ~0 I4 ]
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看，没有账号？立即注册
×
|
IP卡
狗仔卡
发表于 2017-5-20 21:24:33
提升卡
置顶卡
变色卡
显身卡