|
|
;[FC][最终任务mapper1切页程序]# X# Z6 o# S. Y' d, [" a8 k
.ORG $CD9B1 W! o( B+ L* w7 _$ J
BANK_START:! \+ \6 c' T* g& d5 U9 I& ~
STA $70* |! F6 i2 n$ T
TXA
# A( c- m' X% l) K/ [. B, ? ASL" j% l3 f! M) |5 a
TAX
7 ~9 j# `( j; h5 OPORT_SET:
+ M8 H% d x4 N/ r LDA BANK_DATA,X' U3 \3 n, Y# u. t* K) g' \6 L
STA $6E
/ z+ [2 t# T& B u LDA $CDB8,X% c2 t) U: H6 F: X# D, [
STA $6F4 _. v$ [. T: ?9 Q: {
LDY #$00
: E% s* X- p. r3 F- h. h3 ? LDX #$056 {/ r' m, E6 f, C. B/ z
LDA $70+ M( w, C4 q0 F- b$ `
PORT_WRITE:
6 E# `8 {6 O2 `% G, x+ g STA ($6E),Y+ {6 \3 S: g$ E- [
LSR
3 S" L+ T4 S; h8 D- P DEX) a) ~, Q3 L8 }4 ^4 {( S$ }
BNE PORT_WRITE
& ?- T6 `: ?6 C/ s: V$ t RTS4 I8 L% H' d8 y5 `4 y' ^" i! I
" m. o9 E$ t& n. e- T
: @( ~2 V' f( c
BANK_DATA:
( I) U4 o* w8 n2 ]5 Z( p4 X .BYTE $00,$80,$FF,$BF,$00,$C0,$FF,$FF
/ \) b" e f2 s2 s- j2 r9 J2 R+ h6 N
0 t5 n/ ]4 G4 m, E- [ ; Y: H) v% z' {: E+ |# ?! o4 h( J' @+ Y
;[FC][最终任务mapper1转mapper4切页程序]* `# y$ G$ N1 @
.ORG $BFD2 ;初始化跳转
9 [. t2 p# O$ `0 R7 j JSR $FFC0
9 [: `! F2 l1 O0 C' B, h. a- ] `& F( e% E2 g2 M% m1 s: \% Q4 D2 q
3 H! d; R) @6 D7 q .ORG $FFC0 ;切页
5 n k, J1 Z: ^' |# o6 O! J LDA #$06# o/ v# h1 t# x! ~" q
STA $8000: E R) z; c! [& r5 U6 K
LDA #$0E
8 A. g4 T( {. l, J STA $80010 D3 ]2 E8 w9 R5 {
JSR $8000
! I( J! J ~* o; n9 T6 ?; o RTS ' |' |# d( @3 E' U
9 W- P7 {5 ]% w .ORG $8000 ;数据复制3 R6 }/ f M$ ^2 Y
LDA #$80
b" U$ c- c9 E8 P! x( b! _ STA $A001 ;启用SRAM+ E/ o6 q6 t1 @, X% s% t
PHA U# n) O3 U; S- J/ L
TXA
6 e' p7 N( h0 C5 b3 U PHA* X' J" L+ U' Q8 Y1 {5 @% j
LDX #$00 \6 ?+ C" S+ Q1 T1 [- _
DATACOPY: ;数据复制
( ] g4 D9 M. q- ?7 ~% L LDA $8100,X9 s& v y" p" |1 {# C# H& K- ?, f# K
STA $7200,X5 a1 P5 I. C2 R k
INX/ ?, u# c# c/ E/ c6 L
CPX #$00
) H, q7 g1 ]) y BNE DATACOPY' F p C5 I' W0 Y9 K5 B% S
PLA
: ^0 o& K8 Z* ]2 B# @) U! G' A8 ` TAX
2 i/ ^& G' s, y+ N/ l& \! ` PLA5 l; d7 i f, B! m
RTS+ k1 S Q* r8 [" {3 M
" \: T/ f. k" o, P% L/ N
.ORG $CD9B ;跳转到转换的切页程序5 m6 i3 g5 L$ J- O; S4 H4 \
STA $70
* Q, o) S1 ~: H* e& H9 _7 ~4 y9 e5 U JSR $72009 K7 j$ l2 k0 J1 R6 T9 u; D
RTS
' @( v J% L E: T. G ( N8 |5 r# J# v3 d5 J. b
.ORG $7300
' C" S2 H' Q8 F+ @) oM1_TO_M4: ;切页程序9 Y4 B) a) n9 O) Z7 A5 e
CPX #$00
. C: N7 r4 \5 n' }" v- q# h9 M5 b% Y BEQ REG_SET
% m/ L0 S2 z1 ]: n* E0 S# R7 d CPX #$01
& @ W& Y7 ?/ {6 U" C. ?& n: z BEQ PPU_BANK_0000
# n& _+ Y, `" D8 B9 w CPX #$02+ K+ \% B: i3 u: K4 M: L! x
BEQ PPU_BANK_1000' T/ J. @* R1 ]; X$ ~2 q" H
CPX #$03( b: Y% r0 U# r y$ c% b
BEQ PRG_BANK
" H' H" T0 a4 N" pREG_SET:
. `/ N# y/ q, G( l) ~ W$ r( d* ?/ W$ D STA $A000
8 h) }0 _3 ]7 ?9 l& Y4 c RTS
7 a5 c% E0 x% W/ p .ORG $7320) S) j9 D' u& ^
PRG_BANK: ;PRG切页: e5 G; C, O' ^: z4 Z) b; {
PHA
2 p* {* G" X- s3 } y& v7 p1 q LDA #$06 n& ~7 b; O- o& b
STA $8000
4 o8 T1 F; y6 d# O' l# T: p1 @ PLA
& T9 h S( M. C; D# K0 P# [ ASL
! }" g( q( M. x! H# ^' V3 |6 j STA $80013 }* `1 {! { @
ORA #$01
( }; A, R% p' C( n4 D PHA" y4 X7 E; n/ |( }4 h
LDA #$07
( L3 D5 u2 O: o( U% t STA $8000- l* c/ j% X8 z* M! O) I
PLA
- A1 o3 k) ?& z STA $80017 Y+ p2 P5 X( t) c. j
RTS/ A+ A2 G; k/ X0 o- e9 K
.ORG $7340+ i, Q5 x7 ^- I1 D9 S& J; u' |
PPU_BANK_0000: ;精灵切页
( Z2 k+ H5 k Q6 q. f PHA: j5 h2 R9 |4 n: x3 i( E- s" u
ASL
4 w$ {2 a# J3 K) I: ^ ASL
2 ~! f3 z& z) ^. D0 Q& F) h" r PHA) x) N% v0 ]* T8 Q
LDA #$00
1 `$ ?5 e" l* B9 c; h6 e STA $8000
. Q2 p! l# Y4 T6 X. L# w) H2 a PLA
# A( B' o9 v4 p, v7 ~5 w9 h3 X4 | STA $8001
1 ^. Q+ l, N- B' ] ADC #$025 l6 M v* C w
PHA
# |( @! R3 T6 N6 q LDA #$01
7 B" A$ Z% T+ d" p" t$ t STA $8000
|& M; `2 [3 K7 I PLA
# m* H4 d, k j1 f3 w STA $8001" e# H' {( F- Z; b6 U# }
PLA
( ^$ L8 u" p& `7 C- { RTS
, a4 f; q0 O# p1 u / l$ r- n) B8 m3 H' G( X' [0 V. N
.ORG $7360
! v8 h7 H& B+ gPPU_BANK_1000: ;背景切页
- G: `; ]" `/ T- ^* `8 v PHA6 n" w0 v/ D) E6 k% x
ASL! N, x" X; N: _* t
ASL/ {9 a' [. _+ H! f% k# [
PHA
0 E" U- h0 G$ V7 Y' n! a LDA #$02: B x' Q0 A1 K# Y0 A. j: Q4 k v: q
STA $8000
0 j4 p! {8 d# r+ Q. W( P# G PLA. S+ S4 f) i1 x' H* R) a
STA $8001
0 q* J2 r3 x6 q ADC #$017 j+ ?8 e" t4 n" [, f
PHA
) r+ q( J5 W% r N4 E/ a! d) S LDA #$03
; F+ [. E% W. W# J) T- R STA $8000( }# z7 Y+ v2 y& G) f- m/ P
PLA/ F) M& a! e0 i, _. v
STA $8001$ w; a6 _) a0 i! C4 E
ADC #$01% i n' f' g3 f6 V5 ]8 @
PHA+ J- c/ y( L9 t) R
LDA #$04& _' X. r7 e6 D: r# B
STA $8000
( o- m7 T% C+ p/ |% t PLA
7 M/ ~( y0 e% E$ d4 E! h STA $8001' x( K/ G/ ]8 V5 V
ADC #$01
$ A* H. a' P; o: @ PHA* z6 o7 i6 N# H/ W
LDA #$05
& T; I9 o& R1 q) G5 _5 l STA $80006 d, r6 i6 T/ _/ X
PLA9 i( }' d$ J4 T; s8 G
STA $8001
0 V- S8 N: K; c, J: A PLA( X. c: U6 m- O4 o( e
RTS: t% @- x" |. {. }5 \( W$ K) G9 d
& [" x3 j% f4 s/ C! ?/ Z |
本帖子中包含更多资源
您需要 登录 才可以下载或查看，没有账号？立即注册
x
|
IP卡
狗仔卡
发表于 2017-5-20 21:24:33
提升卡
置顶卡
变色卡
显身卡