|
|
;[FC][最终任务mapper1切页程序]
" A2 H- R5 B% v% t7 e o1 J .ORG $CD9B$ U4 K7 A2 @5 d* H9 c" k6 ?: V
BANK_START:
8 F0 v g4 j m' h* s STA $70
/ m! A) f2 N9 T TXA
* f6 d' J1 I' {6 h* o. z N( F ASL/ U* A3 P n2 r6 \1 ~! O) @8 Z
TAX
4 ]. r9 F5 C( x/ ~PORT_SET:
6 ~0 U0 G" }- E3 x LDA BANK_DATA,X
3 x1 {" Z- ]; w3 Q" A4 _& B2 e STA $6E" s7 n. E) v- w- S
LDA $CDB8,X
# g( Q x0 |6 M1 f6 i" G STA $6F9 z I( A& M4 v4 b7 E7 w4 ?
LDY #$00- o% Z8 a/ \" z
LDX #$05
4 a1 t; ?) c& T; y! ]/ P, G LDA $70
* g$ K5 Y5 P4 g. n+ VPORT_WRITE:
. C1 r7 o6 C) r: y( ? STA ($6E),Y4 l* n; o W" M; ?& ^; {
LSR
% W1 E! T& R4 l. M: k DEX" \1 S, ~, C1 n3 ~) J; m6 H; Q
BNE PORT_WRITE
# O5 T6 X1 z, k RTS/ t2 M% n" `$ y4 U
1 Q1 g$ Q4 N6 A! k2 K
9 d' ?1 a: E5 @+ w+ G& zBANK_DATA:+ _, S$ a6 l. f' M$ x: B
.BYTE $00,$80,$FF,$BF,$00,$C0,$FF,$FF1 {7 k! ?+ v! ?
: U8 }: x5 Y4 v( T
+ O! _* O- ]" I
;[FC][最终任务mapper1转mapper4切页程序]
) R8 U( b# S9 v& \& D$ d+ T .ORG $BFD2 ;初始化跳转
& Y' }/ ?( A" R1 y) R) Z2 V2 t JSR $FFC0
1 l% I7 s1 e' A2 s1 b! `, P% F$ l5 }( O! L
, D; G% I; q" M9 m$ j3 `
.ORG $FFC0 ;切页5 M4 H2 h5 `9 h/ j; X& q
LDA #$06, F, k0 W5 O1 c3 }# L0 ?% [* e" K$ L' K
STA $80009 p: {& B! h0 R0 R: B0 c7 a5 R/ |7 U
LDA #$0E
# u6 O9 w& `. U STA $80013 D! d! m1 [, I
JSR $80009 _0 O9 f9 y- b, ^9 _
RTS
$ f4 E% c# B: a. y' c
7 O" W( w& V2 |+ X .ORG $8000 ;数据复制( R. a. H, h. x F8 c+ S
LDA #$80
( o' ^) j$ }2 d! M' v9 Z% K; u6 G STA $A001 ;启用SRAM
: f7 r0 R# u( k% |* @: C PHA* t' e/ R; ?$ j* b
TXA
& w+ A. ? K' g$ O. o PHA# P# M* S9 r2 [9 `7 b+ x' a5 o: ^
LDX #$007 r5 \, w" d- L6 j
DATACOPY: ;数据复制
# D) X! Q+ e' |( J4 X2 R LDA $8100,X; \( a# w, w- q# l) o7 U! m& J3 u
STA $7200,X( Q* ^8 I- T) ?8 Y# _, |( _
INX3 [/ f# V, `7 Z$ [- q
CPX #$00
9 E. G, f5 {. z" I2 e1 m BNE DATACOPY
- S f- \+ V6 L W0 c6 e; a PLA5 l; }- T( w7 M
TAX. {9 I, l" Q0 {' F3 B9 ]$ F
PLA
% F$ R2 w; t. ` RTS
7 j: A9 x/ k9 f, f5 E- @7 a- S 8 x6 c( A `2 y, V5 r3 z* Q- i8 M
.ORG $CD9B ;跳转到转换的切页程序0 ?4 Q* r1 @4 U" s' i
STA $70; P9 w9 I: c4 F: k8 s" i8 t% h
JSR $7200: I# b5 W5 S& d2 z
RTS
4 B# v+ U) e% C1 B4 v8 N+ c ! U6 E% K/ T: Q4 p
.ORG $7300
6 y$ o& e% [, r7 q+ M) j FM1_TO_M4: ;切页程序) B) A8 ]3 _$ @8 O
CPX #$00. O( r) p" `" R# n# ^% U8 K* w8 j
BEQ REG_SET1 Q; Y: @0 ]$ Y$ {- L; f8 S
CPX #$01! ]; D: @3 q! T# G
BEQ PPU_BANK_0000
+ k( H' ^; y R CPX #$02- B3 b/ _# p6 R1 U, u3 l
BEQ PPU_BANK_1000( k8 P; l9 r* n) \+ b ?) \
CPX #$035 i" K' ]! G |# j
BEQ PRG_BANK! I' [( I- Y4 T# H9 G7 l$ G6 L
REG_SET:! P% l1 r1 W6 W2 Z* N% T* i
STA $A000
2 ~5 U) Y( g. }1 r; [$ o/ i. R4 Z RTS- W6 m6 C' F& `9 G
.ORG $7320
# M1 K( J* }6 c' Z: E" a% C8 @PRG_BANK: ;PRG切页
% a9 |6 r% ]0 g; |5 t- L# a& s PHA
# E: J, `8 r/ E LDA #$06
- n( A. {+ S; ~& Y STA $8000
! Q% ~0 s; c5 {' s' m$ x# b PLA2 ^/ v) C! P. q' S% g
ASL
( S. e5 \$ `9 d STA $8001
& x6 X" Z& p4 r2 P* }$ k ORA #$01+ B: e: E7 g9 N( b# C1 t& L
PHA
% S. p& n; n7 T5 K8 }5 i LDA #$078 U! S+ j2 Q% x/ L7 J2 v
STA $8000: V- ?" W5 b5 d% Q9 J3 O( A
PLA% G+ Z# K' C3 F; s# L
STA $8001
7 `( W$ D) [4 ]) ^( b RTS/ d, [. t3 F' I/ r
.ORG $7340
* W4 l8 X5 g: L. o6 ?0 J) l; GPPU_BANK_0000: ;精灵切页/ P( m; H0 W O" {3 L8 C0 c0 `6 m
PHA, _* Y9 v; R9 w t" r# J
ASL
4 o8 @+ l" K k+ } ASL1 V( C& G5 }6 u; I$ J6 x
PHA
, N4 H) e: P( R) B LDA #$00
; r! M- q3 L1 E3 o5 N STA $8000: x% V5 ]( P! `& b) ~+ \7 }
PLA2 y0 U$ G4 @4 X- d
STA $8001
: l% d; }) g- ?; V. S ADC #$02
' C& \) l+ j8 b) G7 R- b PHA
, t$ R6 b1 B$ R! E0 g LDA #$01/ h+ ?3 b+ w7 C
STA $8000( l t, ?9 t! b* Z- f2 v
PLA4 | p8 C4 S& E c
STA $8001" x, f+ K, ? r8 g
PLA
" T% k/ x; ?6 c' `2 B1 S RTS
* r9 Q$ f( W8 Y8 @ i* o2 P+ N; z
.ORG $7360
4 K, {8 b% b ] {0 l+ i# j9 ]2 b ]PPU_BANK_1000: ;背景切页
7 ]* I. L; H7 z @# D2 Z PHA
) C$ Y, C: K4 k4 K& a5 Y ASL
* I( O$ g% I. N7 ~. k$ { ASL5 E% o& m4 g6 L. Z/ n |
PHA
/ [' _# Q& G; Y/ Z# R5 V' k T8 m Q LDA #$02- W; h% R/ z9 |4 i
STA $8000. e- I( y" P. y9 Z# V! r
PLA
7 U$ m1 D$ w6 L) u STA $8001
! c( `1 L7 r; J ADC #$01% C# r9 C3 C( F. f( B- Q/ `! S
PHA
8 l4 W1 M! o9 Y B6 K3 b LDA #$03
' y& a+ Q, n" h% z; y K$ q STA $8000" g8 Z9 J. a9 M1 v
PLA/ l' ^6 ^# [4 t3 |% m
STA $8001' D3 k8 \- y# n/ [) Y3 {; h4 x$ Q- |
ADC #$01
0 }1 C( E! U. V' p PHA
9 v% M" m4 r/ _& e) R$ d; M LDA #$04
: Q' J0 h/ y4 I, [$ l STA $8000
: u: R; h6 I u' G$ p( G PLA
* P3 ^4 F; } W- {5 }. o) y STA $8001
; E* T% ~7 `4 ~+ \# |$ U9 [ ADC #$01
; h1 c& B! _3 S! e9 u/ X: \$ p# M' C PHA; o3 t, l' |, C* y
LDA #$053 f9 q7 }" s* g2 r
STA $8000% ?% n& `" o% p1 w# r: C
PLA
8 u/ z9 T: L5 ~0 v$ y8 f STA $8001! I( c8 u2 V# h6 W- o3 @/ \
PLA7 x1 |% c! Z- W) C7 i3 P% i
RTS
; H# [9 t, K! d, r% l* e/ I( r* B: f6 K% e
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看，没有账号？立即注册
×
|
IP卡
狗仔卡
发表于 2017-5-20 21:24:33
提升卡
置顶卡
变色卡
显身卡