|
|
;[FC][最终任务mapper1切页程序]& l2 c! W& h5 {1 Z$ S
.ORG $CD9B
* a8 X5 y2 r' W. j+ Z h IBANK_START:
, l Q- i1 k! `: }& g STA $70
, V& O" V, q4 P* m0 E: P TXA
6 c: Y( [" D! Z ASL
7 f' x; W( e3 F$ t7 B5 M TAX5 \- \4 w, ^) H2 l0 h0 U
PORT_SET:* x6 [/ X, _$ w6 i
LDA BANK_DATA,X
6 _4 @* F" D D9 w) K! { STA $6E
9 I. o! s& s' `2 K LDA $CDB8,X
$ X, d: [" z, g6 P* s9 E1 M STA $6F
" x6 _' ?/ d! {. F LDY #$00
' x& }' f( w" |+ y LDX #$05
8 r8 l( R4 l: k2 P LDA $70- z# j! T8 e# @4 q. f0 b
PORT_WRITE:
( K: r1 v5 `0 ?1 q& _ STA ($6E),Y
7 [- [6 f/ V0 m# R! y$ [, |3 g LSR, X4 t2 S3 F' e% C1 h: m7 M
DEX w. V- J7 M- s
BNE PORT_WRITE
. d( G! d& O2 i. b( ~; n! z RTS: [9 `$ o' a9 i5 P5 Q& z
$ N9 w7 f) `( v
2 n* y) F+ p8 t1 D7 {+ P' Q' wBANK_DATA:" A- {" y( e; @* u Q
.BYTE $00,$80,$FF,$BF,$00,$C0,$FF,$FF( t& o5 d; S8 {$ ^" f1 N3 g
+ M% G+ l2 n# R# U2 P h
1 i% V- C+ m: |/ _;[FC][最终任务mapper1转mapper4切页程序]; j1 a+ P( t% D3 p' e
.ORG $BFD2 ;初始化跳转
5 {. E7 {) D1 J: t1 E8 C JSR $FFC0
" }' g( b8 {. Y/ X+ c
( ~& n, g* U! l m
3 `, l8 m7 J: [2 ~6 R3 P/ ` .ORG $FFC0 ;切页
! J: Y( B- F/ g% z$ M. ~ LDA #$06
7 m# m8 ?5 E. m8 Q( t. u1 E0 K9 B: U STA $8000- r! W, o8 N9 p7 p: K+ Z
LDA #$0E
T, p; A$ t E8 C: w4 `4 r$ | STA $8001
# S d: a: ^1 H3 D1 G JSR $80008 |; T: {: y/ p& b1 M2 {" [
RTS 8 X4 T6 H: u5 v( i) x
9 C$ H1 y, ~5 L" K; w
.ORG $8000 ;数据复制# h5 y& m) A+ p) g+ T# u4 ]
LDA #$80
* { i- }& a$ A0 m- w/ C STA $A001 ;启用SRAM* O! o9 w4 S& _. [0 e4 c
PHA
$ \* o: ^- ^) W2 i4 Y4 D0 s. k. p TXA
9 s' U/ v) J5 x8 D PHA
, O+ t1 n+ {; K) D0 L4 ? LDX #$00) C# W H& T' r- [
DATACOPY: ;数据复制' x | t" a, g& v5 |1 U/ m; Y
LDA $8100,X0 Q1 H# ?% S6 Q8 j) X3 s
STA $7200,X4 y: M& _- B" T+ x* _
INX+ @, x5 e9 b) b- ?/ d9 m. Z
CPX #$00
: |0 U( p- |4 x3 k6 l& \6 v BNE DATACOPY
% O' w; \; c5 H8 H9 t& F$ Z PLA1 {' \- j: I7 N7 L* i
TAX
; W Q4 f: q3 { x7 W4 g PLA8 }- ]* i& T8 y( l) C+ C3 @6 g0 h' A( k
RTS+ F6 M! a, R. G: j! f. v9 v- Y4 Z
! ^- e) | S5 ~
.ORG $CD9B ;跳转到转换的切页程序) A: o9 i' J: a: f# y, `
STA $70
8 Z) s: [+ X( ?$ f+ o' A8 a: S JSR $7200; d) u0 Z- \$ H# k! t
RTS4 x" _& M, v* f. D3 D# X1 G
' ^6 M+ h s" Y Q+ o .ORG $7300% S/ r/ e+ y- F3 q: p% V C
M1_TO_M4: ;切页程序
( ]1 o$ t2 D! X- A7 K* i CPX #$00% ~' f* v1 Z4 {" N$ X
BEQ REG_SET
3 `! y4 y" r6 m$ ^ CPX #$017 p- T- b4 y" J- |
BEQ PPU_BANK_0000
: ~( W) ~# x( S. F, j7 @ CPX #$02
) Y* V' q# q+ z" p BEQ PPU_BANK_1000
+ k6 p. p8 w+ o* O$ K CPX #$032 g( l4 z4 x" Y+ d
BEQ PRG_BANK# J* E. Q3 o3 l6 K6 b! v6 S3 ]
REG_SET:9 r" o- g, }: ~+ y0 p
STA $A000
4 _9 I+ d' j& x: }. s RTS
7 t( u$ r& R2 u* Z .ORG $7320+ o/ O0 ?. v. I! ~) p: w1 A
PRG_BANK: ;PRG切页* `$ p8 m: F: M
PHA3 d' x) r u7 o: l( P8 u5 v
LDA #$06+ n0 L F4 Y, ]( m1 }+ [7 @
STA $8000
+ X: H$ S9 e. o7 H PLA D8 v) t. G0 `5 Z* Q
ASL
: z R! i \1 E; G STA $8001% C3 S3 m, }2 Y7 v+ V$ ~
ORA #$013 o1 ]* L3 H! j" d3 B
PHA
, F/ X, T4 l4 U/ Y0 P LDA #$07: V8 w) I" k* r R Y/ W
STA $8000
1 _$ C: {3 k# s$ V3 C PLA
4 Q& J! `+ g( L$ |( ~ @ STA $8001
5 ?: ~+ k. K/ r6 R RTS
- p$ i0 B/ }6 { .ORG $7340, c0 o, q" o) c+ R
PPU_BANK_0000: ;精灵切页
7 R: z# a, B4 @. ~* ` PHA
' U6 v7 a; _" s: H8 R: @' {. ] ASL- F1 L( i, `! [! o
ASL
2 n( |& }" m$ U PHA' ~! B9 S% ]8 c% h
LDA #$002 s/ [" u: G% N- s. P: M
STA $8000
, q) B8 X2 k7 C9 F4 v8 h* Q: W PLA8 \9 K3 \0 U2 |
STA $8001
2 f) A b, x0 @/ X* M! I) F ADC #$024 t+ @# T# G/ w3 Q
PHA0 ]9 x- M: Z$ o% A# l z3 e& e# ^7 T' T
LDA #$01# ~: o8 n6 t0 X* P
STA $8000
5 ~% A8 ]# j+ S" x! ?2 n0 Q" ` PLA6 G. C. T1 C% K) M
STA $8001" Y! L# Z K4 P/ A8 d0 D& o
PLA
1 G9 S4 V7 F8 E, Q$ U RTS
0 p/ k6 \4 p" H5 A4 v$ N+ I2 f* g
% n% M- r! l4 g: K4 ^8 R' ^+ c9 y* S .ORG $7360. s# N" u' o- {& [( [
PPU_BANK_1000: ;背景切页
0 F1 h9 z3 i1 b6 t& p. } PHA; r$ x& ?1 T! F4 b) c, [
ASL
2 g; C& E$ ?! d) E6 `. @7 H ASL
2 \! u/ S; F& `$ f PHA- F, c1 @, _8 D) u/ W
LDA #$02* \. ^5 y* a3 K$ ^3 D: i) B
STA $8000; _: m$ P4 w( W- ^& @
PLA& @1 j% U, @: i6 e" h! N5 M" }; _
STA $8001
# R) A k( g+ P# k( i+ g ADC #$01
3 Z5 |( j+ y/ \5 x" x- L PHA
+ N: S2 v! L( E! O0 F, ?. V7 h LDA #$03
3 `) K: R c3 z1 ]6 z4 D: F STA $8000
" X# [, E/ g8 A PLA9 ^7 x7 g1 y& M1 Q) o3 m: d
STA $8001
; N9 n. }! N' ?. T1 J ADC #$01' v. E8 ~) ?: P2 b
PHA' b: @7 T0 ?- z9 f9 \ b- J
LDA #$04: W* ]0 O W: }! \0 ~2 d
STA $8000
" M0 i0 u0 C6 U( ~) e1 V( m PLA
5 A% s4 b' `8 j4 e) Y S& h STA $8001
( q- m8 m+ X8 h4 [* N# W ADC #$01
/ v2 Z; ^$ a+ K7 `* [ PHA4 l. K- W- d7 @ O3 p( Y# ]( o1 K
LDA #$05' }; ~8 }' |* k( g+ c' B
STA $8000
' U2 i$ A/ Q" u S5 G6 _+ ?& J- | PLA$ m$ @3 C; D: v" t+ C3 ]& C+ R
STA $8001
/ u% L$ ~4 N- i, y PLA
1 k9 A+ C) M5 S RTS
7 M9 \! C& K4 w& M- ]
0 b) z J0 F) d0 | t7 q |
本帖子中包含更多资源
您需要 登录 才可以下载或查看，没有账号？立即注册
×
|
IP卡
狗仔卡
发表于 2017-5-20 21:24:33
提升卡
置顶卡
变色卡
显身卡