|
|
本帖最后由 yandagui 于 2016-11-19 23:11 编辑 ! u7 f7 ^0 s( V% D w! F, _
$ ^* A) G0 e4 q* |. |
[FC][魂斗罗旋风终板END暂停显菜单]
. y9 O t2 \: o作者:FlameCyclone(flamecyclone.ys168.com)) N0 \. X' c- W. o `
时间:2016/11/19 21:46:00
! h0 o% r; C- W+ K更新日志:
! T- ]/ t5 [: A. P( f2016.11.19:加入暂停显菜单(共5页).1 P7 J- H6 G3 r: ]( ~5 `1 y
2016.11.12:加入无限跳跃.' Y8 k, F, o: A, N
2016.11.12:加入速度调节.1 T3 B. V* R( U* U: f7 T0 x- ~
2016.11.11:加入敌我子弹对消功能.
/ D7 `6 M2 O" }* A# W2016.11.11:加入全屏闪灭功能.4 J+ X* t5 E/ E$ p H; a
2016.06.08:加入全屏瞄准功能.# X2 ]% P9 O- i q: B& B* E1 s
2016.05.31:加入弹速调节功能.% [# k# M' E) Z. Q1 p& a+ j
2016.01.01:加入高难度模式.0 o) e$ B" v$ I C5 m" @2 K" `
2015.12.12:修复消除威胁不足,使得移动BOSS关卡(第2,4,5,6)正常通过.! y5 D2 O2 v' U( N5 h7 M0 z
2014.07.05:由于对打功能不完善,直接去除,更改为生命锁定.# {5 j1 l+ o, b
2014.07.05:双人切换功能优化.
! y! ~+ @2 C' D- z* m0 d* b2014.06.01:修复第三关浮空到BOSS前必须关闭浮空后跳跃才能见BOSS的麻烦.
v. y: S+ J" H7 j2014.06.01:取消生命锁定,改为生命锁定模式下剩余生命不会少于一条.0 B+ [# L2 P; i, |! l( B& t) p5 e
2014.01.18:修复GAME OVER字样只有G和O的错误,原来想拉大字母间距离,看来行不通.; d) M; X& x4 l% `: J4 q9 D6 [1 s
2014.01.18:浮空模式下,P2飞行高度未限制导致死亡,原来是指令本该用绝对X变址的被用成了绝对寻址.% P- O; b. u9 K3 }2 |
2014.02.08:拿手机无聊时又发现一些错误,所以修正生命剩余勋章显示的错误(某天用读卡器插在DVD上测试发现机器读不了卡,原因是目录级数超过三级,只有刻录成光盘来测试,结果发现生命勋章的显示竟然无压力!)* c5 ~8 r# d3 b' B) G
2014.02.13:加入自动演示通关.
8 T. ~( i* [ d. G内容:
1 a7 x& J! d0 V, y8 z+ b; c23.暂停菜单: 暂停后,自动显示菜单,选择键翻页,方向键和BA键进行各种功能的开关操作." o$ ? {9 W3 Y
22.无限跳跃: 暂停后,选择键4次,按下开启,开启后游戏时无限跳跃.
" C; @7 Q7 q! W" ~# s. C21.速度调节: 暂停后,选择键4次,按左右调节行走速度(0-3级).
6 X- y4 O6 l% n( L9 f! o5 c- u2 a20.子弹对消: 暂停后,选择键4次,再按A键切换,此时敌人子弹可以打掉.
8 `+ ?( t' b$ Z. M19.全屏闪灭: 暂停后,选择键4次,再按B键切换,开启后游戏时按选择键屏幕内敌人闪灭.
; I: l. `3 G8 @# D% y18.全屏瞄准: 暂停后,选择键2次,再按B开启/关闭,子弹对消开启时无效.* r9 M* X ]" n+ [
17.弹速调节: 暂停后,选择键3次,下开启,非暂停时按选择键调节,默认为1级,共5级.) C C |. U0 [7 i! k
16.困难模式: 暂停后,选择键3次,右键切换,我不相信你能够无伤通关.! X* q1 q9 _( q# l5 A
01.子弹切换: 暂停后,选择键0次,上=快S,下=快L,左=快M,右=快F,B=快普通,A=取消当前子弹加速状态.
4 `0 q/ U2 E0 b7 f D02.无敌锁定: 暂停后,选择键1次,上开启/关闭,不用讲了,金身无敌.
7 X" S& X! X2 L5 ?5 }, n) M- c+ H03.生命锁定: 暂停后,选择键1次,下开启/关闭,生命锁定为16条.& P2 @- Z4 Z5 Y# q+ S
04.角色双控: 暂停后,选择键1次,左开启/关闭,无非就是主机控制副机.. a: @! O! B# g2 d/ n
05.生命底限: 暂停后,选择键1次,右开启/关闭,锁定剩余生命数不少于1条.
2 D, P3 I5 b# J b' S, }06.一击必杀: 暂停后,选择键1次,再按B开启/关闭,即使是第8关BOSS,一发花生米依然要其老命.$ o+ }# X( n( m& c& |. ?0 B3 T
07.角色浮空: 暂停后,选择键1次,再按A开启/关闭,第三关浮空时按选择键向上卷画面轴.
% g9 @8 j& X" m. P08.弹数加强: 暂停后,选择键2次,上开启/关闭,此时所有子弹发射数为15发.' m+ Q/ \1 k3 C1 s
09.皮肤更换: 暂停后,选择键2次,下开启/关闭,主机开启时橙黄色,副机开启时为蓝色.2 d4 c8 o5 j" W* m* z2 w) o* A% O
10.混合子弹: 暂停后,选择键2次,左开启/关闭,此时连射时所有子弹混合.+ |. Z: e- x% U, _
11.敌人锁定: 暂停后,选择键2次,右开启/关闭,此时敌人原位跑不动.) o- Y: t, [$ s' h& f; `) H
12.跳过一关: 暂停后,选择键3次,再按B使用,使用后可以直接到下一关.
) \ n% \$ h( V7 q6 X% ]13.单双切换: 暂停后,选择键3次,再按A键切换单双人游戏模式.
1 G2 x9 F W' F. h' b8 R! O14.子弹方向: 暂停后,选择键3次,上开启/关闭,开启后发射的子弹攻击方向会随着操作的方向按键变化,第二关和第四关的小关建议关闭(开启的话打中敌人太难了哦)." o: {1 x4 M% {, q( w& X" e/ [
15.消除威胁: 暂停后,选择键3次,左开启/关闭,此时游戏时按B键使得移动物体被消除。
+ Y, ^$ b& _# c' K. U2 E8 E/ rA.做了一些汉化(小字体),剧情,关卡名及通关后的文字未汉化.4 [. f4 }' o" _$ M3 Q* W1 A
B.自动演示通关,双人合体打通关,演示时有背景音乐,通关后一样会有结尾及恐怖台词,之后游戏进入选关(相当于游戏自动开始了).注:通关后P1及P2会获得16条生命!也就是说看完演示自动开始后第一版有16条生命!
( b! A1 H/ S2 GC.生命显示加强:最大显示15个剩余生命勋章!电脑端请开启精灵超过8个(这样勋章不会闪烁),手机端认命了,不过不影响正常操作.- k8 w' G- M7 a- W. y
% s& r( g/ W: M: m1 y
如果有什么好的修改建议,恳请通过QQ(1490868135)联系我(也许我不在线,可以留言在QQ里)% O) J/ n. V Q4 ^' l! Y: q
欢迎大家转载,转载时必须注明出处.
- }5 [: C& R0 b0 R- I% @ }
" {7 T! m) f( w# N3 O. O. I, L' }4 R9 |$ K0 N7 Y$ p
9 X) v) _) d/ A. T- H+ e忙了一个星期,觉都没睡好,眼睛也疲惫不堪啊.终于找到解决方法了,目前VIRTUANES运行不了,请使用其他模拟器玩.( h q- R) s: L# \( @, V
这几天的劳动成果如下:- .ORG $B400
9 B; g* Y7 K F% x
' K' H5 ?: A3 U& l0 b% I0 Q; \+ p4 F- 9 O z; L- C, Y3 @% W
- PROREG:1 `( I' ? r9 ^0 A
- PHA
- J0 K1 N& w, ^! m - TXA5 p- h1 {# y2 W) a, y4 {0 c
- PHA
! D6 D% T6 D% y2 {3 [8 M - TYA. W3 V0 u' w$ s$ x4 @! W6 O& ~2 S
- PHA |0 S/ h# E/ m* Q* H
- LDA $25
. y6 o, k" C* E" m - CMP #$01
+ Q( o; \/ J! _* ^# P9 w - BNE RE4 Q9 M& ?& O7 W8 b6 c
- LDA $010A
2 v, D0 S( Z& M( m2 Q2 `5 E/ a - CMP #$00- e' m; Y" f$ m: y/ ~$ x% @
- BEQ P1
3 y) p( k$ i* ^7 s8 o3 w - 7 k% H; x( a u6 u$ H
- RE:% I# ^+ I* v6 X M) b5 L" V
- JMP PPUWRITE
5 a# J3 v) `$ T' J$ A2 @ -
8 x8 q% }5 u& P- S - P1: ; 条件判断
& v6 J7 `4 K4 f7 \, s- m - LDA $7FFF" A2 P. k o5 V& W! X! L' ~4 F
- CMP #$FF( k- C m& A" ] e
- BNE P1RP
3 X. V/ J: o1 k( W - LDA $7FA0
( Y' L7 M3 B$ T - CMP #$00" O5 Y4 p" X j `
- BNE P1CMP3 b5 h$ M7 x- S$ s
- LDA $2001" O Q) |, Y ]# S& {
- PHA
9 m# ?5 R9 ? [! e$ h+ Q - LDA #$00( _* h5 @$ S( h: Q
- STA $2001
% C& f3 U1 m3 _. V o7 c7 v - LDA #$FF
; z4 L4 K9 N, D% l3 m/ O - STA $7FA0
! k( Z1 Y' B# w8 z1 _& x/ W: G - JSR CLEANA
( T4 n' `- C9 S! [% e2 W4 C - PLA
1 Y& F) q1 n$ x5 G* Q - STA $20015 J- G# k+ o, i# z5 u
- JMP PPUWRITE; v5 E7 `, Z9 m
- P1CMP:1 a* D. f4 Y- S
- LDA $7FFF
7 r% s! Q2 R# y1 ~1 n - CMP #$00, n7 z7 i: s* z6 l9 Y0 G5 {
- BNE RE
) o D! C" d1 l5 h+ X9 [4 I; j. S3 s6 q - P1RP:3 _" I) w3 @) b: X1 Z) ^& v3 g9 Z
- LDA $2002
$ ~2 m) E- l% k+ ~# \4 f; T - LDA #$00
2 {8 v" [$ N7 q( Y2 l' ? - STA $2001- g6 R! S' k) h5 q6 U8 m! A
- LDA #$FF* g G! J; {4 P2 P7 d" @9 W/ h
- STA $7FFF7 `1 E- l4 i1 N7 i
- STA $7FA0% L4 M7 S+ k. c# z
- JSR COPYPPU, W2 J4 T0 N- P( d3 J" z# ?$ l2 E+ n
- PIRP2:
$ j4 K) Z- Y5 g! I! L. g4 V - JSR CLEANA
8 M/ j: V4 ^& h; U1 m% z$ V8 L - JMP PPUWRITE M6 R& ^" I$ \5 Q4 ]# H
- ) B# T, b8 J9 p0 b l; s7 w
- COPYPPU:
3 [& @) F3 n$ n3 v - L0:
( G* u b/ L, [- j- t, F - LDA $30" s {! z7 m/ ^9 M" Z! E
- CMP #$02
) F) J2 @5 o: I' Q; w* T4 A - BNE UNPROFC
7 X% ^: f3 B5 M% w" ]* r - LDA $FC
' I4 E* s1 r* u1 ] - STA $7EFC; x5 s; F) z" q/ Y: X
- LDA #$00( f5 ]4 f2 x3 M$ \3 G, I- K
- STA $FC
: j9 z1 i8 \; o - UNPROFC:
* Z7 P( I6 m" d: v7 W - LDA $FD
9 V8 u% t( C' `( l D2 W' J4 V2 C - STA $7EFD
" [2 J0 [9 g* q6 O7 c1 Z, p( J - LDA $FF$ U7 I% f9 E4 O, T* a$ z
- STA $7EFF0 |" f" m9 z$ r
- LDA #$00
1 r2 E: U1 x9 O0 X, d - STA $FD N( O2 J8 O# Y9 k- E
- LDA #$B0
. k h2 j9 b; y7 Z- ` - STA $FF; M4 t k% h$ G6 D
- LDA $07C11 J) V1 e+ o/ _
- STA $7FC1
, }: _2 c8 M) H - LDA #$3F
3 p8 @9 f2 t2 Q, {, w0 ?% q8 q( e - STA $2006# U' d5 x# {- C! O6 w, ^6 p3 f! J
- LDA #$01
( r+ D9 _! o+ q5 w- i9 ^1 H! I$ z - STA $2006
5 Q7 L$ J6 t4 n2 N ~. |# ~$ A* l v - LDA #$24
4 t, @6 L0 I) @: H$ i - STA $2007
/ ?' \& t& G; v2 y - LDA $07F6- Y. w ]; V1 D: n1 @
- STA $7FFE
& h! f4 o- r- x5 e& l" L - LDA $00FE. r$ m! @0 h6 r8 l$ ~
- STA $7FFD
) m: K1 l" w3 r: H& @4 @8 Z - LDX #$00; \; ?2 P3 u d0 m! p
- LDY #$00
z$ |# Y+ Z g) I! H: Y9 @3 } - LDA $BD8 j/ }$ I' w' ?4 F
- PHA
( r0 ]- A- S! P- w& M7 N - LDA $BC5 S( K* q# e5 a- F( B; g
- PHA
# G! T; }% |9 n; G - LDA $BB+ P9 o% c4 V4 M3 O
- PHA% j* r+ X# X5 V/ _8 p0 Y F
- LDA $BA2 {( e# N. r9 @: Z( h0 ]5 G
- PHA# ?" I9 c6 Y$ h3 I0 @; I
- LDA $B95 S h# v& {8 ?6 `
- PHA2 u9 l3 l; A( P" }
- LDA $B8* e' N2 j3 t$ @
- PHA/ k: A% p0 g9 d9 K" S ^( m7 R
- LDA #$001 N# W! m9 b# V* t
- STA $B8
+ E8 F/ h% R& ?6 E$ f" O - STA $B9& x0 b& z3 T2 o) d) U- q n0 y
- STA $BA! b }7 v" z- V1 x% d9 J5 _6 m
- STA $BB# B6 J( h' S- B7 q9 s+ i- W
- STA $BC, b* w' h9 ~( A. @$ i
- STA $BD p* B. Q4 @) o1 ?3 C4 y1 O
- LDA #$00, ?/ L( p# Y1 j+ e; b9 ~
- STA $BA
3 s- ~' T0 N) M+ u7 _( |8 p - LDA #$20# F( Y r8 c M5 A9 _6 M
- STA $BB
* F* G8 D3 ~, \; ]4 Y8 s# s0 ` - LDA #$00
: a. p( `- S4 R9 n6 G - STA $BC
6 y, D e1 W; {0 K# y% y - LDA #$60
- h, E+ X T) z; u - STA $BD( _6 D7 \1 y5 }
-
9 H. t5 Z7 U- z0 Z) V+ ? - L1: ; PPU复制8 k- {( T- V- _5 C+ t
- LDA $BB
/ \+ {& r5 [5 ^8 M6 N/ U( ] - CMP #$30
: D9 a$ G; p) g1 q - BNE L2( E/ p) Y3 g* |, k
- LDA $BA% f2 ~' N9 D! g3 E
- CMP #$00
- I: I9 b: Y- K0 j) j$ b: D - BEQ PROADPLA# q. `/ K% ^' n+ S! d; `
- : Z$ d" |* s! {) q7 T
- L2:7 r& g9 u) w: C6 ^8 U
- LDA $BB- y( u l$ R* K+ ?
- STA $20060 x. `7 S) g9 @
- LDA $BA4 B. R' ]8 l1 ?% U
- STA $2006$ ]& K" r& F% H- H2 ~, g1 U
-
( ?( H4 i( t: {" p& J1 J7 G- y - L3:$ u* Q7 W I' _% H* b
- LDA $20076 J; I4 k6 D0 y+ _! J# J" I
- LDA $2007/ P! L ~( Y: D" @* ~: j# a9 i; `
- STA ($BC),Y
% ?9 D$ ?3 [( t/ H% n" j
# o6 n# g1 D9 t) L- L4:8 ^- G. _& A+ ?9 b. k* N) R4 u
- LDA #$006 ]7 @' w9 u3 a1 p/ w- V
- STA $2000) S; `3 s. p0 R
- INX- J6 F% n3 y% O) e1 v/ | \ b% A! n5 ~
- INC $BA
4 K1 `6 S) ?4 a- @3 c& z - INC $BC
* Q9 b! b' M8 Y' i - CPX #$00- Q! B, h8 W8 K; I4 q# q0 d7 L7 \
- BNE L1
& H9 H2 s/ R2 f3 z" g) u- D8 l2 G - INC $BB' ?3 n, N5 H* K# v: _4 @: j9 D" g
- INC $BD
, I" T# p' f7 f7 k - JMP L1+ F2 c3 l0 g& e- ~; I0 g+ S c
- 4 _8 u$ w5 @: ]9 t' ~
- PROADPLA: ;出栈& b2 E1 o2 [# I+ }
- PLA& f8 A8 p7 D+ C4 b
- STA $B87 X9 t# L! T0 ^+ w7 C! V9 h9 _
- PLA
- W1 f3 \: G' J/ _$ `( C0 Z2 c N - STA $B9) c1 D6 u, P5 Q7 y/ u8 t
- PLA. b+ d) X! @" ` d
- STA $BA
9 V- M; H0 G4 C6 E# R - PLA
% b' g3 R. |. k) q* L - STA $BB
& y' s% x) p; A+ p, Y) y4 B8 N - PLA
% ?' }) a) j/ p. j- ? - STA $BC- l8 `1 [( i) L3 ?- `
- PLA
5 a) N" t$ g# |+ v - STA $BD/ |8 V7 V* M4 j) j
- CPRE:* H; R7 d) R: Y: A# ?4 Y0 E* |+ h
- RTS- @$ T8 J7 j, t$ ^
) [: P; `+ H9 F# l# u2 k5 `' f. w- CLEANA: ; PPU清空; B( Y- ~; W2 t N1 {
- LDA $BD! w+ Z0 `* d' \+ i$ o
- PHA
4 _$ _7 P2 R/ o# _ - LDA $BC
0 y. P4 `! m: I( l* A6 a; i - PHA' a0 K' A7 k- W; |! q) o m( d
- LDA $BB2 X% [6 J9 X7 ]5 F K% R9 ~0 ~
- PHA
+ d7 H$ Z, D: G( ? - LDA $BA+ g: H9 f; ^6 t: |8 F( c
- PHA
S0 M0 A2 v1 U y7 m - LDA $B9
- R) ?5 W n% H1 k2 E) M - PHA
; ~4 @2 _6 W7 c6 b9 t* \- P - LDA $B8
7 H, ?# I( Q& w( | - PHA
( t+ c* n+ ]2 t0 C- r- K - LDA #$00
; W6 o) R+ e( P4 I# g - STA $B8
* v! N. F& k4 b, U0 c4 V9 P - STA $B9 `/ ^) X. P* _+ O5 t5 U- o
- STA $BA
: e# x E: B9 r8 A) P - STA $BB% z" g) D8 W/ [8 j4 ?. h
- STA $BC
; E' o5 \- p, B+ L- | - STA $BD
l; q r' c! A7 t - LDX #$004 h. ]" e/ R5 O0 Y! m& ^5 \. T
- LDY #$00, u/ C. x# q/ x7 b
- LDA #$00( V! N# ^9 K( R! x$ Z
- STA $BA
3 [/ B) t3 W' w& c - LDA #$20
( |) o! `4 D( G: r- E: Z$ r - STA $BB4 Q1 c e0 a- K2 v) b* ^4 w
-
1 r6 _ ]. T$ _" g, o1 d5 ^ - CL1:& A' E, q6 h! J V8 e4 a; h
- LDA $BB
# _7 P! @/ [( S* [/ G - CMP #$303 ?1 X+ j ~6 Z7 ~4 ^+ u! d
- BNE CL2# S6 f7 y$ w+ d
- LDA $BA
, w* f: ~5 T/ d0 f+ i8 a* u - CMP #$00
4 @2 W+ U3 C( E8 d- g e5 g" N1 T/ k - BEQ FREEWRIYE
6 T( b9 J) J. L8 R: x* G -
' L3 b5 n l5 v- ~2 h9 { - CL2:
6 U" u1 y( I& H3 M% F) O/ X! T - LDA $BB
& e9 ^/ H& f0 ] Q. {8 g! M - STA $20069 ]: f- \- T- m* _2 J! x
- LDA $BA9 E M; ~ L* g
- STA $2006) y- H- `- T2 @+ c' m
-
9 ~. {+ h' r7 c% Q8 [1 } - CL3:6 A- ~: L6 D! Z& f- S) h
- LDA #$00( D8 d5 |% g( I$ @) C
- STA $2007* |5 N9 p/ c6 b \
: K+ _1 ]; A* C- CL4:
1 H) c. f' M( j+ [ - LDA #$00 j% C- q+ d+ V: j
- STA $2000
& J- ]7 w- ~& o8 R0 ` - INX
T |8 ?0 n R% f - INC $BA$ v/ U0 x1 _ \( B7 M
- CPX #$00! C" M; f4 ]( D# V j. J) V
- BNE CL1
- o5 `% }: n" x/ V3 J4 e9 C8 O - INC $BB$ n, ?! @: M( H
- JMP CL1
7 T# B5 k; d- }* k* _: X$ l - & c: b0 W, x5 H' z
- 7 h' \; b! i* P# n0 V5 m
- FREEWRIYE:
* H, u& I: h+ j8 C) h$ X( m - JSR FREE! M3 f ?' ~3 z( g& F2 T9 Q& E: G
. F' C5 c& b" U$ q) H: Q
9 |, ?/ {3 ]. Z N' z( M# D- 5 ?* Q1 _$ b- Q& J0 h3 ]
- 1 `3 d H, ]- ^7 J& i
- 9 l) M- B0 ^6 h8 q/ ^
- CLEANF: ; 恢复现场+ G! n) w5 ]! X0 L1 u
- LDA #$08
$ ?! O* I3 |! ?/ ^ B; [ - STA $FE0 F" t# z0 e" \' A! j/ T: ?: K+ |
- LDA #$00
! K# a2 G" w9 w - STA $07F6
/ k: G8 I- G$ N( g5 V+ \ - LDA #$241 ~9 b! U+ z S* J, W2 ?
- STA $7FC0
1 _# p9 u5 r2 Q f - PLA H9 m0 Q! b9 @ c
- STA $B89 z$ U) [2 g ^& l" x J" i
- PLA
% P0 e1 t( }$ `6 S$ j6 F - STA $B9
6 P! p2 [. m8 s8 w - PLA
7 ]$ T. N6 U: l0 B% b" [ - STA $BA
0 i! v) d" y' \. t% l - PLA
# |. B/ K( J$ m" H" ^7 ^( O - STA $BB2 V6 |5 w2 r/ G6 m3 {, P, ]) [6 q
- PLA+ \& X- e( b8 G9 A; V' V7 d
- STA $BC5 k6 j5 ~- K7 L! T
- PLA
: V0 p5 _* J0 ] [+ M - STA $BD
0 ^3 i2 Q) M. c X1 D - CLRF:
, y- n, y2 q5 E$ A& k- S. r - RTS
$ `. M) a/ {9 ^, j; t% M( e - # l) H" ^2 u9 C6 Z8 k9 Y
- W_DATA:
! r7 |) W! N% ?. G# ^# X - .BYTE $00,$01,$02,$03,$04
3 s5 j) L$ N i% o2 W* l -
2 ^8 W" k% g) c - W_PPU:
2 i/ ^% _0 r+ a1 |+ u3 G - .BYTE $98,$97,$90,$9D,$967 o6 q/ H2 x0 T0 E2 H
1 E6 g/ X3 ?- V& y. ?* `8 u; A7 Q0 @- P1_STRING:* l! {- S' {0 b! p6 q- A/ D5 b2 s; n: a
- .BYTE $9A,$82,$00 ;"P1"
2 ~8 J P4 u) f3 R/ m5 S# C0 T/ q \ - ( }. d0 G4 ~! h; h% ~$ T5 e
- P2_STRING:
% |- S/ x# T5 n& ~ - .BYTE $9A,$83,$00 ;"P2"
" `) L, L- t9 ?0 Q
3 a% h, |9 B$ z# N, \* T- WEAPON_STRING:
; ?7 l- |" Y: M% [% D7 A6 i - .BYTE $A1,$8F,$8B,$9A,$99,$98,$00 ;"WEAPON"' v6 m1 u4 o# z
5 A( D5 n9 b4 f8 ~' `' M- RELIFE_STRING:% [# O' }" l1 [1 Y A
- .BYTE $9C,$8F,$96,$93,$90,$8F,$00 ;"RELIFE": s, ~1 Y1 {4 h# y
* @$ _! \8 {; I s+ P3 k8 K- P1_PPU:
$ \. b* c; a1 H6 P! W- Q3 f$ u - LDX #$00& n* x2 ]/ j- @. `' M+ O9 ?
3 o! l8 L$ C- h0 q# h- P1_PPUW:
$ B# h1 i4 B. t4 o/ r$ s/ ~5 _/ y - JSR PPUADDR_PROCESS
( U; u- Y9 R0 K - LDA P1_STRING,X
$ U; `. h0 e7 S- \; C - STA $2007
0 k7 `* Y; L n0 O$ `* C( [ - INX
5 f6 U: p# `$ Q7 O' f& ` - INC $BA0 x0 H; y! Q7 U m7 `6 Y
- CPX #$03
* |1 U: |2 h; \. E - BCC P1_PPUW( ^9 A7 t# l6 f) F9 H
- LDX #$00/ N5 l: c( w% ~$ W% y+ Z3 H5 @
- RTS' F6 q) ^ Q/ |
- ; t( {2 u4 r$ ^
- P2_PPU:7 p, P9 U3 U1 k6 s" C( i, n
- LDX #$00
) }9 |% ^+ |. J; x - - S- [) j, x5 _9 J* f! p) _/ f
- P2_PPUW:
0 ^) [ l+ b/ b, m - JSR PPUADDR_PROCESS
+ g% R+ j. F5 ^ - LDA P2_STRING,X# g1 P8 b3 q# D9 a. m! D8 ]; J
- STA $2007
4 X" q/ T! R5 t3 {: \+ k - INX
8 W! K, \% J8 A( L' P - INC $BA
9 F+ J# e5 u0 T' z! r; Z - CPX #$03# W5 ~0 S6 G0 q0 D! x( M+ ^
- BCC P2_PPUW H E# u, s5 `* F
- LDX #$003 \3 D* j1 G: ^+ L: M: L5 z% _
- RTS' k1 ?" b! g# k$ R) Q
3 t* h ?4 Q$ o9 U9 O! p3 ?! y- 5 W1 {5 m7 p: c4 C* H: D5 t' L
- LDA $BB
: \2 r |" y& ~8 h; s0 Y1 y7 @3 @ - STA $20065 C4 h7 H" G1 F- a. G3 g* O
- LDA $BA
* s, H: |# ], O7 q - STA $2006
) D/ H, R7 S7 k - RTS) \9 ~1 w4 ? M r' S
6 E; k$ H7 `- {$ j8 K/ D; t-
3 x4 |& E7 a+ J. B: b- I! X) Y C) k - 2 d( P7 m/ e, D! z2 @8 x$ S
- PLAYERLIFE:
! b; f1 e- @% p. K7 @6 V& s- A - JSR LIFETODEC; B8 r) f) l; G+ {
- LIFEPPU1:
0 q2 d9 j( f$ W% V, C - LDX #$00
* v* t2 g$ D# p3 ?" w# p6 o; i - LIFEPPU1RE:
2 `6 M0 A; K% j j3 x4 o, b0 m - JSR PPUADDR_PROCESS
) i) o; B) M' P - LDA RELIFE_STRING,X
1 w: `* }& G" C: b# | - STA $2007' i7 I' v. n+ V# o' y8 Y7 s# X
- INX! @; {' e/ L& w% j" G( f8 d9 P
- INC $BA
/ P* q) [) g N4 p- O% f9 V0 O - CPX #$075 g% C9 ?" {, z8 a
- BCC LIFEPPU1RE
: I# s& F0 q3 J5 L - + Z3 I/ z1 b- P# g# _
- LIFEDEC: ;生命显示写入
2 R D8 l; \$ r2 l - LDX #$00
: k/ T- p+ M/ w - LIFEDECRE:
/ ]: X& g( g9 L6 Z - LDA $7A03,X
% J ~ ]. [6 R; x2 j - CLC
$ q3 m1 g0 m& D0 i - ADC #$81
/ _0 A, Z5 l/ k) ~1 i' B/ f9 B( X - STA $2007
8 y, C8 K; `, H - INX
) V4 i, S9 X2 c3 j# h/ H - INC $BA
+ _1 G/ f6 ]8 _" ~ ~ - CPX #$03
# C$ ]4 n* A6 C2 a& n7 E$ X - BCC LIFEDECRE8 o ?% y2 d) N# x! h W
- LDX #$00( q% K# r! S% T, r, e) X
- RTS
, n4 f* k5 q5 B% ], H
* u# f- I) U5 A" @/ B3 L- LIFETODEC: ;十进制转换
& u8 o) c, b |1 O6 X: u - LIFEL1: ;initialise9 n" N5 X& Z/ m+ U: C
- STA $7A00 ;$7A00=F3& B8 i3 ?! D4 v5 z9 y. p
- LDA #$00
3 Z$ C/ D5 a& A" U3 C, } - STA $7A03 ;$7A03=00+ F5 w. g4 U! F; ] O# h
- STA $7A04 ;$7A04=00
# V) c; u4 k5 Q6 A+ M' r - STA $7A05 ;$7A05=00+ j+ `- S) ^, H& v7 K
- LIFEL2: ;copy data $7A00 to 6001
, ` ~( _5 Z8 v9 d- [ - LDA $7A00
( E9 F2 n+ _# l4 T: ~- t - STA $7A01. a; [3 r, i$ d: A3 f
- ) z4 z v8 r) V, x, O
- LIFEL3: ;hundred7 u' i8 l6 O: n, K+ d2 |
- LDA $7A01
0 d9 i# v$ t( ~4 E3 C' X) k7 G - CMP #$64. w1 K( w" X6 W2 S9 m1 Y
- BCC LIFEL6 ;$7A01<100 goto L63 P5 `" [5 l- |& c: {% O
- LIFEL4:7 g7 H+ Z: Y; s8 v! g" T
- LDA $7A01% q5 |0 f. G- s. v8 {: Z, z' z
- SEC6 ?6 p9 z* u$ v2 H7 n( w6 X
- SBC #$64 ;$7A01=$7A01-100
$ ~$ R( o8 v" b- m" y9 z3 x - STA $7A01' k* O7 k$ q; D4 T( A! ~+ ^, B$ I
- INC $7A03 ;hundred++# S/ [" m% r2 B( G
- LIFEL5:" G' J/ K+ G B
- LDA $7A01
- B2 U. |9 I! h/ a, L, H8 o - CMP #$64# }! Q+ D" \) w2 X! X2 Q+ J
- BCS LIFEL4 ;$7A01>100 goto L4! x! r3 w# J5 _
* v, [) k& C0 m7 l( \, B6 k% c0 v, {- LIFEL6: ;decade
. n5 w7 i& ?& R, A; v. M - LDA $7A01+ z7 O% K/ M) d4 n
- CMP #$0A7 y3 r5 L: k2 g/ w
- BCC LIFEL9 ;$7A01<10 goto L98 ] Z, ~( W5 A
- LIFEL7:
, N4 g& u. O1 A1 R& i: `4 o# W; S7 U; V - LDA $7A01
' R6 _8 T4 N3 z; V& h - SEC
/ W; q+ [0 N7 v" f - SBC #$0A
+ J. Q" X* D4 g4 N - STA $7A01 ;$7A01=$7A01-109 n2 ]7 O1 W: T8 X( P0 C
- INC $7A04 ;decade++5 A" i, e( g5 h7 Q% p# u( Q
- LIFEL8:
% B: j, @ |5 j- c( a3 B; o% M" w - LDA $7A01- @# a( Z. N6 l. \
- CMP #$0A
, p! r* z4 x [0 o2 U8 S - BCS LIFEL7 ;$7A01>10 goto L7
% x( u; c( t/ C( u - ;unit
" S" C0 z2 L" c# H - LIFEL9:+ x. X6 s& C$ S9 Z: V" y8 D5 t
- LDA $7A01 ;$7A05=$7A01
, ?- l f9 e8 h; z. L* W _& j - STA $7A05 ;unit
& j% G4 Z* V4 L# e2 W0 R - RTS ;return- `1 y2 U8 H% {0 W' b
- / ] N0 u. M$ U- D2 e. k! t `
* {& Z& f" n* C& @
$ N6 _& G) H" C ?4 B7 I* ?- WEA: ;武器ppu写入
1 C/ r& b2 c1 k - LDX #$00! u1 }+ e. J9 `5 N& `9 U
- WEARE:
( P; |' u3 D5 `" f8 i- [ - JSR PPUADDR_PROCESS" ^: b4 c9 G3 z q' e
- LDA WEAPON_STRING,X0 Y& M9 x- p/ l, B1 Y3 Z
- STA $2007
2 C. h6 q/ p" B: b5 N4 t7 M - LDA #$00# T m9 s7 Q4 \
- STA $2000
+ U$ p! ~/ M% B0 g# i2 ? - INX9 J3 w( x% J2 ?9 @
- INC $BA0 l( ~$ e6 ]$ a
- CPX #$079 I/ ?4 M7 V% m5 n" B# \' H) G
- BCC WEARE
- A, u' X% F% d- ?9 h7 p
s5 K \9 q3 e9 \- READ_WEA:7 u) @0 ~0 a O. ]5 @$ |( [; P/ J
- LDA $B9
: U3 N" X3 G3 V - AND #$10; k: Y4 Y& x1 C# A( X7 p
- BEQ NWEA
, h1 R2 A, l7 w8 K+ S - SWEA:
, o1 F9 _0 U9 y* g - 8 t7 K; D/ a4 g: h" j
- LDA #$9D4 k: G* i2 y$ N% X- {
- STA $2007
) Y/ n: P( m! C5 c8 S - LDA #$00
1 m0 e* E5 p# M6 _8 x: N8 W8 J - STA $2000
2 N) j" o- N# I) H. T - INC $BA
' P! `$ ~( S* E8 ]4 e+ l - LDX #$00
. N3 i/ @. t$ x# x; ~% {# J* Y - JMP WEAREAD1 L, ^/ o, _1 L2 j3 Z5 m
- NWEA:- ^2 u% m9 ^4 e. H' ^
% ^ ^, S& H% s- LDA #$8D0 N; p1 H1 G( U4 s% Y' s1 h! W+ \: {
- STA $2007' x: I9 w! b/ L
- LDA #$00# g# {/ K, `: t! u7 F* ^$ q
- STA $20000 |8 P# k4 }8 S! x( k8 |3 O4 D8 S
- INC $BA
8 @4 w2 i# i1 t& S - LDX #$00
. h: `* O+ \% p8 T' N7 s. ? - WEAREAD:1 c- |/ `$ J5 o+ i
- LDA $B9. l2 {# W' [! j$ L
- AND #$EF4 A- w L" p0 t6 i: B- B9 M/ q
- CMP W_DATA,X
9 I5 M+ ~- p& E, d - BNE WEACMP
7 e) a- R% @, r! j' \8 n& p - 7 h/ l# k" z$ p# H* w" D
- LDA W_PPU,X8 z7 k6 F* b& L) z6 X, |
- STA $2007. `4 M$ V" J, H6 n- N
- LDA #$00 |/ m- M; @0 l% b- ?5 s4 o) ?
- STA $2000. Z4 A [& R+ v4 t; S, ~
- : W ~( m# n) W( g+ o0 u
- WEACMP:! E& d; X% X5 U; O
- INX, Q9 A' m, T$ `3 E7 P | B
- CPX #$05# g B& [ l: z* j) E& `
- BCC WEAREAD; p2 {3 ~5 V: \
- RTS
O- ^* E F/ E5 s2 u% j; O0 R - ; u3 }; m* S/ y: k# M4 I; M x
" Z% b [- q7 a- PPUWRITE:
8 C5 q9 N, ^8 _5 o - PLA0 n, {8 A8 X4 G
- TAY
" Q# x+ S) I! M8 z7 O - PLA5 `1 N- \! N5 X6 z+ m
- TAX9 n" o+ d% Z6 \1 j
- PLA
+ G1 ^% H: d- z/ X6 x3 `2 g - LDA $259 O+ q0 y" F+ M. t* {
- CMP #$00
' _+ k% a* Z& J4 A1 F - BEQ WP1$ b' S- N8 Z4 }/ `5 d6 J b
- LDA $257 P3 T2 @" N! j/ ^- _. t. {
- CMP #$01
2 ?8 r1 V. h; _$ V* { - BNE WRE% `7 y- q* V. c4 X% M( [9 X# O# g+ S- c
- LDA $F5,X
& Y0 n0 F, ]/ i - AND #$EF
( @* B. l R6 E" {; A - BEQ WRE) z& z" R$ P& A" W6 R
- LDA #$00
& \) v! ?/ ? D6 H/ s( \: r u1 v/ G - STA $7FA0
% d& W6 A, Z1 y8 P: A -
! V1 z+ O% M* ]& J4 v# B - WRE:
1 @6 Y/ V/ C0 h& c/ g& L$ T: Y - JMP $A000; @! ~9 C) B2 z6 I0 R
: T1 {" [$ B/ \/ e- WP1:4 ]4 y. z0 p) \( U) X8 m
- LDA $7FFF! x" i8 X3 D6 Q( _2 i
- CMP #$FF
" E: s* u# f! }' E& O j0 _ - BNE WRE
! D$ U* K/ A) ^+ }1 w3 y4 u3 m: L7 } - LDA #$00
% S, L7 Y- ?9 \3 t - STA $2001: k, W( C5 v5 F1 X$ i4 K- {
- LDA $BD
. R6 {- m6 f2 p4 c' |# F - PHA K6 t5 C/ k( N
- LDA $BC% |. d$ E" O9 M! o- f( k5 {7 A: A
- PHA* l1 S, J0 O6 ^( L9 L' ^' b; [% }
- LDA $BB' X4 ?% f7 p2 d5 B- P4 O; B% s
- PHA+ b' Q! b. e7 z, ^
- LDA $BA' e# a5 }, k& \% |2 b- [
- PHA0 U; S* s8 s4 J. F: k& Z2 m
- LDA $B9
( D0 n6 M* z! n# q' z% L - PHA Y+ g* D8 J* [7 k: G% ^
- LDA $B87 Y# e' A5 @- D! o9 ]# g/ |, g
- PHA) g/ o3 W. M0 b& Y! M
- LDA #$00
( F }: d" M4 ` - STA $B8
# y- L. K; s! P. u3 T- [+ R - STA $B9
5 y/ f O) U6 z. Z4 w, l - STA $BA
1 f0 i# `1 t! y- p - STA $BB' @7 W& k t3 v" h
- STA $BC
# D$ U8 [4 r8 v6 A1 x, i* Y/ ^ - STA $BD5 Q# A3 n% n% V
- LDA #$00
3 m: b9 ^/ }# Y - STA $7FFF
/ x9 t3 G2 R- N- @ g* V8 S - LDA $30: `% d! H+ n& F% z/ @, n
- CMP #$02
1 o+ a; [0 |5 p- Q - BNE UNPROCPL; s! e* k; f6 i. q
- LDA $7EFC
" f: P q* R& \$ S+ c0 t$ F - STA $FC$ I) Z2 L. o M# K2 D- {9 l
- LDA #$002 D& s ^5 i; e" A# w
- STA $A4
$ i2 C p: g$ T* z7 I' @* h - STA $A5; F4 }6 N3 c' {8 l
- UNPROCPL:
/ n% n) G. d% x# L* D - LDA $7EFD1 T( l; T' S' t; l/ a& {: x
- STA $FD4 v/ n; m6 D7 F5 h
- LDA $7EFF
# i9 v7 U* @1 v& d5 j3 B - STA $FF8 r8 g2 P9 [ R/ E
-
6 ]9 O1 |0 H8 [& v - WL0:# _! E7 x O/ m
- LDX #$00
; ~" C2 n; i+ z& W0 j% f - LDY #$00
! a2 W7 }; k E! k2 T+ w9 g - LDA #$00$ I4 V8 n$ g# D4 m
- STA $BA1 \6 ~; r# d$ A2 z# i$ c
- LDA #$20; s7 C( W" Z0 F+ w7 M5 R( {/ \( `
- STA $BB4 C" C- a" J9 ?* \
- LDA #$00& \6 L7 ^" T2 b
- STA $BC
2 F$ |+ W2 `! _6 a! m4 U: `* i - LDA #$60
4 \' I1 R8 C1 t! k1 l. e& N - STA $BD
- Z3 ^% K- C0 c2 X/ c) S i, F - ! X, f+ N( v, g$ M
- WL1:
5 Q: h4 } h! N: Q - LDA $BD0 D e' Y2 t4 q9 K, l3 e
- CMP #$70
a# q- O3 U, `6 L1 Q; X - BNE WL2- C4 m) |5 R# M' a
- LDA $BC
; t! |3 t. k$ [ - CMP #$002 W- Z7 J5 y" W }
- BEQ WLR
$ X/ f8 j% w% ?; b/ ~ - % |: h$ a# e- g5 @4 T1 H3 `
- WL2: n9 L: t! M0 `" \* r
- LDA $BD4 b/ z' _. F& o* z6 N( v( s3 m
- STA $2006) o3 I8 A# x6 e, |7 n
- LDA $BC
3 u* S, O1 ]) q# R - STA $2006- I/ m" @% o: ]8 p! N6 v
-
- n# f; \* l9 g4 c - WL3:
5 H5 Q* @. Q! }- P6 ~* T - LDA ($BC),Y. p& O$ m5 w- W6 ^8 m* Y! ~- o
- STA $2007
+ e; u5 B. i8 J: K, q
9 v7 @0 v( t& f" y- WL4:: J6 {5 x I" d5 T- ]7 ^
- LDA #$008 `) h" c) Z3 U: p9 D$ i7 W4 P2 G& y
- STA $2000- Q7 V0 I/ H. {+ D d8 M
- INX
* q# w- a! T0 I - INC $BA
+ w% V# `4 _5 a/ q. ` - INC $BC# K4 ]- i; l6 ]$ Y2 j
- CPX #$00
/ d0 B* t+ g4 a9 }& h - BNE WL1
: d H5 r2 A% d$ G4 n8 R - INC $BB$ h* h$ m) b8 b4 Q5 ^4 l5 f
- INC $BD9 p @! j7 ?4 P+ W) |8 G
- JMP WL1
6 u6 M4 z% Q, O; q9 P5 I! d) F -
( l, ?" f, P1 `* V0 ]2 t! m# i - WLR:7 _$ `) C( R* B, s( |
- LDA $7FFE3 |8 f+ z, h5 x3 ]$ s; M! ^2 \
- STA $07F6
/ I8 {+ k, M4 z" Y - LDA $7FFD
3 x# q7 j; @$ i - STA $00FE8 L6 R3 s5 p- Y5 X
- LDA $7FC1
0 l8 g3 c9 @) d) r - STA $07C1 m3 G4 v9 [3 J7 }
- LDA #$3F
( ?1 ]. b* G. `3 j3 }( E- t - STA $2006' t+ c: D! a4 q$ I5 o8 J) f; q
- LDA #$01
6 J, q m* j: j( t. e - STA $2006$ T3 |4 B$ }, o3 h3 g
- LDA $07C1
9 W% C' j. F/ J9 U- i - STA $2007
1 j2 e+ z3 x A. r6 V - LDA #$004 u0 l5 q1 f2 j6 E3 X7 a3 w* F7 G* H
- STA $2000
4 i# L7 V! Z3 i' T0 s* L# A- y - PLA4 [! B: L! v* r1 W* V% `/ I
- STA $B88 J; R/ a( J8 q. v; R
- PLA+ ]7 E$ V3 x8 I4 V5 o! f8 @4 F" ?
- STA $B9: w2 i. W- t6 a0 t1 n
- PLA) J# t, M( J) C/ i9 G& y. s% h2 c
- STA $BA
/ } M4 _' B8 r* d0 l9 S8 O: O4 a+ ]% r - PLA
0 t% z9 {& D+ R% A6 s - STA $BB
5 i4 W$ q* j8 A. M7 k - PLA
$ s; z6 e0 [- F: Y5 o, N - STA $BC
/ p8 o v4 }( |2 J - PLA. O+ z% _1 M6 e& k# O% g. L+ c
- STA $BD4 j6 g8 v$ X9 z$ }9 p: p
- JMP $A000
- ~: U7 I8 Y# K$ _2 ?6 g* U$ i - , y/ s2 M$ z! l" G" E/ x9 q1 m
- FREE: ; 暂存器保护
T7 T6 i" a( {- { - LDA $BD
3 U# ?3 \% H8 l8 F - PHA
# X$ ~$ p+ i: T* Q$ ` - LDA $BC9 y8 }/ D; e, g/ W
- PHA4 T- D, H+ M7 V7 B
- LDA $BB: \! o" K0 @- `. e
- PHA1 z6 E! g1 B/ c2 ^6 }7 H9 _8 i# x
- LDA $BA
1 k8 J7 {/ E9 ], Z* O - PHA9 {* V3 d8 ?" m$ |2 w( Q$ \
- LDA $B9
( m. G: z: Q3 `6 E - PHA) @$ S# T/ p0 f1 u3 c
- LDA $B8! ]: C# E ^; Z5 G. Z
- PHA
% d: a" H/ M: `" q; ]2 V5 T - LDA #$00
3 u0 R* g, K3 O$ u1 K4 \7 G - STA $B8/ Q$ {' s( Q& d% _: [& o- j
- STA $B9, P% {+ U4 V- l/ j& b/ ~
- STA $BA
7 h$ d* j$ y {" K/ S g - STA $BB! M9 W8 m: h# z, [3 T8 W
- STA $BC1 W8 T( d, o7 m) J4 j0 E- g( s c
- STA $BD/ l# c! ?2 O# w+ s% k
e% P' `8 A7 E$ ?9 K7 |3 \- WEAWRITE: ;武器ppu写入
% i. c1 d9 H4 d% w$ Y - LDX #$00% M/ x4 [; _1 T
- LDA $AA: q+ ]9 l1 C+ y. X
- STA $B9
1 B/ K0 y$ t1 M& ?) v3 V - WEAINI: ;地值初始化
. F& c& h P( @, H7 i+ M! _* Y9 q - LDA #$A4 [7 B" H( @$ i& x# ^: b% f
- STA $BA
; d- Z$ q# q, F8 K - LDA #$20
; d& n9 E% o* N$ }9 j" ]# Y - STA $BB! q* y( x( {1 j% l: l
. n1 e( t' |3 b) H! k9 p0 s4 o- + U" r0 n- d( u3 h+ H: N
- JSR WEA
* @7 o8 G/ u! I" L O3 p - LDX #$00 ;武器ppu写入
0 g/ Q/ ~ S0 A% K( S - LDA $AB
: v2 X' m9 l% p5 b2 k, M9 l3 r - STA $B9/ u# u+ i+ m: [9 b# I) u/ C) A
- LDA #$B3
! Y/ P3 d6 K5 Y8 `2 y3 l - STA $BA; _( I6 }) d; }0 e- y
- LDA #$206 W1 E6 w( t. l! d, ^2 J; J5 c8 f8 @5 l
- STA $BB
9 n R# B2 E/ v( R8 i4 A9 Q7 ~ - 3 [. s/ K, ~- r$ ]1 I4 W# `6 x# P
% | v, |' r$ W( Y- JSR WEA
! X }. O1 X' M - ( [+ M; E4 a& ~3 l# S' \
- LDX #$00
& E+ r+ _ G4 A - LDA #$E4
) M$ x" `8 i1 ~- j* I) Y" ] - STA $BA' Q9 [# D2 f. [
- LDA #$20
! T$ X5 Y! Y5 V( { - STA $BB
# i% j ?% ^# K, v
/ H# j; d2 F2 I! N
7 u$ _3 B: z* p0 O- LDA $32. d8 e) T9 U; Y; o) F
- JSR PLAYERLIFE! O" Y. V' C# t% G1 p
- % M$ |3 l' b# @" F! N' _" m
- LDX #$00
4 l* l, N m0 {( n3 k E - LDA #$F3( E: s$ Q! a2 }. o% r# N$ b
- STA $BA
K; m; ~. N1 q5 v; X - LDA #$20( O$ A& B" p# `9 @; X6 [
- STA $BB" w7 `: q8 c8 m6 q |+ Q
9 t' w+ }( A$ z$ |7 ^1 g5 M
5 d. M( V/ r, r- LDA $33
, c7 ~/ M/ n6 @; g m% q. ^! e - JSR PLAYERLIFE
9 S+ Z# z- h) R; t" S - % a2 i& ?4 z3 T
-
7 k1 O& c/ ^: v: n5 I0 u+ y6 i - JSR PLAYER_01_PPU
& \7 B, U: F+ r M - JSR PLAYER_02_PPU9 T7 V6 d# ]( T. L4 W3 _0 K2 Q
-
. d! i6 I& t+ U - ; S1 C% z) o9 P
- JSR PAGE_PPU
5 P' Y: c! Y4 _, E - JSR PAGESELECT
1 L/ L; V& [- {! q - : L3 V% E w4 |5 W' }0 i- G
; i: [- v4 V! A; q-
& T( S( E4 |+ ?/ l& |1 s- G -
* C1 k! V6 {- ?' t, T -
# l" @. o4 |7 [' a -
. a3 b1 P+ O# U0 { D - 0 A0 W. r5 S/ [) Z1 @ g
- ' _7 m5 v' P& d' @0 E
-
- p: h, i# L% T" q0 u! Y# h - 8 T4 [5 Z' y u- A l
-
5 c3 K, r0 @0 Z/ j* o, E' l5 x - 8 i c# D6 D' B! \! o1 |
-
& a2 l. Z% A# z1 t - PLAPRO: ;恢复现场
$ d" |: |4 v: p' g% l0 }) K! d0 f - PLA; [8 ], {1 G3 G6 F
- STA $B8
% n7 n. M" D1 t$ x - PLA
! s B: O- }! O1 [* H) m - STA $B9
, k) w8 a5 I1 M! R - PLA4 {( n4 n2 w) A
- STA $BA# e: W" N0 l2 x. M( M& C5 L
- PLA
' p. U8 |! ~ x - STA $BB% T! q1 Z: P" Y8 H
- PLA6 |3 R. a3 d* T j7 D D0 f' w
- STA $BC: F5 t0 E( F9 ^% \ a' t% ]+ Y% d
- PLA8 r2 m f) X$ l5 E' l$ D1 ?
- STA $BD
. t1 J+ P. S4 {1 k& I! V v% a - FREERTS:. x0 {. _; U" n# N% W3 ]7 \& x2 n/ z
- RTS
6 ^- _! N8 F# ~# } - ; `* v( _" F7 j
- INVINC_STRING: ;invincible
& U, _9 p4 V$ B* ?: X" k - .BYTE $93,$98,$A0,$93,$98,$8D,$80/ \ C r" s8 ~- `6 i& ^3 C
- - C+ d6 I: A; B7 ^/ X7 G
- INVINC_PPU:
" k- }9 }: W+ \5 m% L+ A - LDX #$006 P) N+ q# j R
- LDA #$627 R# V- U7 z/ Q; D! C, g
- STA $BA) n+ w" Z7 k, _. D) f6 w4 S9 I
- LDA #$21% @* S7 p: `! `
- STA $BB
" G& f0 @0 ?* \+ J) ]
/ ^; ^- K4 q- K# Q) f- " a' ]! a# }) d: \5 j
- JSR UP_PPU
! K" O5 i, Y* M0 @) M% }* A - JSR INVINC_WRITE
( f; ?7 b2 U9 r o5 g9 T - LDX #$00
@6 B8 j4 Q% [% `: y: y Z - LDA $07A0& I; g2 x2 b6 T& i4 H8 [0 S0 B
- AND #$019 l3 n, X0 u/ u7 |+ Q# Y, `
- JSR ON_OFF_PPU0 I6 f% J1 b+ R$ Z3 K4 r* B/ x
- LDX #$00
+ @- T+ |/ S# H - LDA #$71
6 n& s H4 u+ S9 x/ d - STA $BA
6 D$ V6 z% k( H$ V w V - LDA #$21
0 x0 M$ X6 k! K( w& y9 g/ Y/ u - STA $BB' u( H. f2 F+ |$ N9 g6 Q
4 ~ o( A. `6 z4 o {! u- # j5 {8 }8 ^" T0 \( ?) {* K/ ?1 q8 Z6 O
- JSR UP_PPU
& O* v4 W- R0 R$ g - JSR INVINC_WRITE$ D% Y" W9 |* u1 P3 `
- LDX #$00
6 ^, I% o, D V - LDA $07A1
% _8 p/ R' T( z - AND #$01) m4 X% z9 A* k) Z- s
- JSR ON_OFF_PPU0 V X/ }( l3 F) W/ t& m
- RTS
8 N) }, w Z" W. | - # M ^3 I9 ^ H' S3 v: \
- INVINC_WRITE:
" t$ O$ }$ R! b3 |. t, L - LDX #$00 \7 j# g3 g0 Y5 c5 w/ N& S; b
- INWRITE:
) P/ B; u) E: F' o - JSR PPUADDR_PROCESS; G, V+ T6 j a: Z* ?' E
- LDA INVINC_STRING,X; m$ h! |8 L1 L. P% H1 B2 o
- STA $2007
% q; F5 U! }# b* V5 b( D - LDA #$00! \. H3 r) C- \2 ?( ^2 |
- STA $2000) _# E; Z7 `8 U) ~7 G3 ^: f# n
- INC $BA+ |0 g W0 e; T
- INX0 M9 K) B# ]' _" O- V4 H4 w! p
- CPX #$07; Z, |% Z$ b5 Q. T
- BCC INWRITE
0 Y5 R: M" n- B: u- z - RTS
, @+ Q/ J9 ?; `$ U( l4 | -
* h; U2 ~" z0 T5 O - ON_STRING:
; f5 ~2 M. k3 o0 @, N - .BYTE $99,$98,$80# `+ h) M: @- n& n# x7 `
- + W, Y; ?" `8 x! E1 M7 @6 J
- OFF_STRING:6 t3 e/ ]% _) z( N6 w
- .BYTE $99,$90,$90
% a1 o! u3 ]" v2 T3 ?
8 j' t. R, j3 b. q2 ]: m5 v W- ON_OFF_PPU:7 N/ v! E( Z6 z" K
- BEQ OFFWR
0 E# _. {+ U+ V8 ~+ z I - ONWR:' L7 D3 W* |5 C# l
- JSR PPUADDR_PROCESS* V* A/ K" Y c! e+ ]$ o, k3 P
- LDA ON_STRING,X' v0 T. W) g5 a4 n" y
- STA $2007: a- H+ A& B! i+ E, Z8 b
- INC $BA( v' E6 `3 o; x4 q7 y( u
- INX6 \5 K6 |: a( h
- CPX #$03
b( n" F @+ f7 X3 F2 a0 Y - BCC ONWR
, F5 Q7 ?# ~: \$ W$ b, U - RTS) D9 w! M! {- ~
- OFFWR:
. z5 ], F+ R$ O+ U3 W J - JSR PPUADDR_PROCESS0 S( D1 B* \5 k$ y' g% Z
- LDA OFF_STRING,X
f6 f& x5 a5 | \. y( S - STA $20079 y% C( l: \* u% r
- INC $BA7 x, R$ w. m. N( Y- [& g' c, _6 y
- INX7 ~3 h6 r0 G) M3 a- Q( G
- CPX #$037 v1 C* n L8 p# o1 ?
- BCC OFFWR9 s' V! e9 d( G7 ]$ J6 f
- RTS3 j8 E3 D, Y# k% j E
- 8 S, f, z+ A7 Q' @1 p
- LIFELC15_STRING:
6 C3 q( o! o: g5 f! D: ^ - .BYTE $96,$93,$90,$8F,$82,$86,$808 U% O/ n) z( k! K' W
-
: f( Q4 D9 ^" ~' j q, E5 X4 l. ? - LIFELC15_WRITE:
( K$ H% I; e. Q - LDX #$009 ~# p) Q( P8 v" x" E/ A# a% U
- LIFELC15:
/ @. C( `# z# Q8 U8 D) y" m - JSR PPUADDR_PROCESS% Z9 H4 ^0 L1 m# ~
- LDA LIFELC15_STRING,X/ W D; p9 t' \7 M3 d$ e
- STA $20077 z$ z0 N- g" V2 l( j
- LDA #$00
! w) U5 R" n. a* u - STA $2000
5 r( W- N* `$ S% g) s+ { - INC $BA
! ]+ t7 p5 X2 V - INX
) B' ^5 d3 I8 @) W8 e - CPX #$07, S* d; Z0 u& V7 o# y' m3 y
- BCC LIFELC15
% T8 ~0 n; X/ d" m3 ?+ k5 e - RTS
; z9 `, x. u) A: \ E( T- w6 O - ' m; {/ M- h$ L% ]# q5 F8 ]
- LIFELC15_PPU:% c0 U) B2 Y8 a
- LDX #$00
2 c5 z: i/ u8 s% H2 s' o9 t2 o5 N - LDA #$A2
. N9 p4 v9 l; { - STA $BA0 ]8 M2 T2 m& H9 m
- LDA #$21
3 }8 I/ F; v8 f: R' E! H - STA $BB
- j( C% P4 r' n4 j: n. r - JSR DN_PPU+ |$ j1 `( @/ x) ~6 v3 z+ {& Q' k6 |
- JSR LIFELC15_WRITE1 p+ p1 F- W( `/ f) ?! w9 T
- LDX #$00
3 A3 y# [; O9 u" o3 x; h - LDA $07A0
* k/ J$ D; N+ K% e) p3 h - AND #$026 @' `+ s# Z/ G7 u$ H
- JSR ON_OFF_PPU: w' O2 P- i. b5 l6 Q9 t, j2 m
- LDX #$004 K! V* h! E* C' r
- LDA #$B1
4 D, f1 t0 `( N. \ - STA $BA
8 Z }% M8 c/ i$ K+ W* }5 ]7 ? - LDA #$21
]) {- z! z, T' q5 P7 M1 d# Y - STA $BB
) v3 o4 a7 u" E/ P - JSR DN_PPU/ |8 Z/ z: C, p+ _8 X1 y" Z$ K) E
- JSR LIFELC15_WRITE
8 G. M3 U5 Q) z$ T4 X! | - LDX #$00. S* y1 U1 h) i! e! l
- LDA $07A1/ j5 [1 z5 ]" I$ t' ~2 t5 P6 Y a
- AND #$02
* K1 M) S5 g8 Y3 } - JSR ON_OFF_PPU
5 q3 F8 \1 Q9 W7 l - RTS6 V4 D z2 K4 q4 o2 i# R w
- & B& \6 }+ C# T* e1 C, L4 H
- DOUCON_STRING:! e. Z5 @4 _" j# A
- .BYTE $8E,$99,$9F,$8D,$99,$98,$80' ]6 l5 e1 J: e3 _- v
- 2 E" q6 A3 B' j! ~8 Y1 J$ A* |/ C; M
- DOUCON_WRITE:
2 |" m: `, \( c" l& w - LDX #$00% K# A- U! ]# _7 q9 m$ `: Q
- DOUCON:0 S( J+ W" `8 z3 j
- JSR PPUADDR_PROCESS
/ i( \+ _+ Z2 I1 @3 J) M" O( ] - LDA DOUCON_STRING,X
8 N+ Y* |4 E' ?: r - STA $2007
2 ]% o2 [6 [* h1 s - LDA #$00, R2 T8 Z! s# \7 Z
- STA $20003 m& a: N" i. [! j
- INC $BA
2 K# X& z) _! I$ `5 h* `# }' g - INX
5 G3 ^9 p, `3 B' F6 T: t - CPX #$076 t( p* |/ C; t# a2 |; t
- BCC DOUCON
! \: [: P; r b) d. l - RTS7 l, [9 S7 v) v) x" g" _
- 9 g6 `$ P& i! I6 s* m7 ^- Q8 R: p
- DOUCON_PPU:; k. S; L1 _# Y: X+ q, l V2 d
- LDX #$00) q M4 q! k- J; D" w4 G
- LDA #$E2
" f- p$ g0 U% ` - STA $BA0 Y6 w( |( |6 P c
- LDA #$21
# D- f: j0 U6 Q% A - STA $BB6 o4 _3 m4 J- a& Y) ^, c. J1 b- `
- JSR LF_PPU
1 t4 b% k3 M- ?* y( G) F - JSR DOUCON_WRITE
' k/ y/ |. u2 H+ Q. l - LDX #$003 t( Y- G2 F$ I$ T! b5 H
- LDA $07A0
0 [ ~$ G. r! D7 z/ [4 e# X3 ] - AND #$04
. Y( J- I8 f9 A8 M5 Z: O - JSR ON_OFF_PPU. u+ L3 E. R6 Y, F7 Y: Q
- LDX #$00
6 n. _8 }' b' d3 l - LDA #$F1
* W( ]- l! h2 k - STA $BA
. j5 l! e. {; t% N6 g, z - LDA #$21
& [4 G2 @* V M% c+ |, q5 g/ R' I - STA $BB
& V+ n- n$ _4 o; T9 ]- a* f - JSR LF_PPU
% Y: m" }$ k S P - JSR DOUCON_WRITE0 \) a1 C- P* G' G- N( _& k; r
- LDX #$00
2 k) C' U$ s) d8 g - LDA $07A1
+ t/ j8 T4 h4 h' J& d; t - AND #$04
# P6 ^- u8 e5 o1 @, E R - JSR ON_OFF_PPU
, w9 g# g! I M$ H - RTS
6 U6 r; o0 @$ H( z; P9 C. V - # n8 u; y7 m! k& g+ W7 S3 q1 X9 z
- LIFELOW_STRING:4 y/ V8 e7 p2 k* z7 P. M8 u" p% S
- .BYTE $96,$93,$90,$96,$99,$A1,$80, E0 ^2 A7 T h7 ]0 D0 O
- : K$ M: ^7 a r; O) v! G( K+ o
- LIFELOW_WRITE:
* W$ i3 q7 Q( T( C+ A I7 A: |4 f - LDX #$00
0 c: P' ~) z2 ~ C% K - LIFELOW:! y( Z, g# d6 T6 U& E
- JSR PPUADDR_PROCESS
9 x& ^% W) [5 c$ I3 n - LDA LIFELOW_STRING,X! s, r. |# ~- S3 o. T- P0 @
- STA $2007! U" a _( f% Y$ |. y& G
- LDA #$009 L/ O3 M( r( J, T" t& _) U
- STA $2000% o9 v0 [ f% t- p3 n0 ^9 q
- INC $BA- X) A- o& K2 h4 E; M
- INX
# q' B! ]0 r3 d& j - CPX #$07
! V3 |& m# T4 C - BCC LIFELOW
6 D% H7 w9 G4 |- ?( h - RTS1 i/ |2 j, k( f4 ~4 s0 w5 ?9 w2 d
- , {& _, h2 l k; y' n
- LIFELOW_PPU: L1 g4 t, c7 k5 r% W
- LDX #$00% U2 k$ h8 L9 p# z
- LDA #$22
. `* b9 S- p* w' U( {. r8 w/ z7 V" t - STA $BA! F' v4 @1 A" D, X
- LDA #$22
* y. D8 v, `6 Y. a" x" Y2 T. h - STA $BB
$ d. Q1 C' s/ V6 F* S: _( ~
4 Q4 Y% T: @7 x5 ?- Q. S! k- 8 d) q: g2 @1 m9 a
- JSR RG_PPU* |& I; Z: J5 J
- JSR LIFELOW_WRITE+ a; D0 q3 [3 N% ]9 Z
- LDX #$00
: o5 i' G9 C- z) d# x! h: H - LDA $07A0- W( q7 X0 W* u7 A& S Y
- AND #$08
9 `6 R! W/ i( }/ g. V5 t. K - JSR ON_OFF_PPU; k% h" i6 ?! Z/ t6 |- t" F
- LDX #$00
5 @) F# x# N+ z8 H - LDA #$314 ~" {" k/ P' P/ v7 e% ?
- STA $BA) d9 w: L- p& w( D1 Q8 S! A
- LDA #$22, ~4 [2 p$ g( B$ o: e
- STA $BB2 |/ Q6 U; J- g" Q9 q$ l( D3 L
. G- F5 l; B P
. m% f) Y1 g( `6 {- JSR RG_PPU* M m, w7 {. z/ D' f. W0 T
- JSR LIFELOW_WRITE2 e! r' n5 w5 @3 E, q3 H
- LDX #$00$ d1 a6 o: N, b. }' Y
- LDA $07A1
2 E: o9 a9 S* P. Y* N" U1 J - AND #$08; X( S: m9 Y5 @" K y
- JSR ON_OFF_PPU
) ^8 ~8 C" N& e4 ~ - RTS, @, F2 k; P8 h$ j$ ]
- ! V! C/ c2 A3 F3 `
- KILLON_STRING:+ r) @4 z- j3 }+ `8 u
- .BYTE $95,$93,$96,$96,$99,$98,$80
. [, j' l7 z. R+ h- Q3 P3 V; d5 T -
% \5 Z) A. V0 q r3 L: H1 N - KILLON_WRITE:
2 Z$ k: c1 E4 n+ D3 Z7 D - LDX #$00) K9 L8 } {' s& p
- KILLON:- ^- L% z. ]- @2 @- d
- JSR PPUADDR_PROCESS* w( f# F9 P [
- LDA KILLON_STRING,X! ?. u# H6 v6 ~! a8 i
- STA $2007- h! s9 d% i y- D
- LDA #$008 @& J& S6 [: G4 P
- STA $2000% @4 t! _: t/ X1 H+ J3 I" X
- INC $BA: U( \: d( u) F# e9 Z- R1 z1 x% e5 X
- INX
0 n3 r2 J [2 Y% O2 R! t - CPX #$07- z5 p3 @5 M5 D7 X, K( O. R
- BCC KILLON! E# h' e; D4 _/ J9 e
- RTS
, c/ K9 i! Y5 q ` - ) v$ L# ~: e' U/ L) Y! y; E
- KILLON_PPU:
; {0 q- O- H+ T/ N4 N( W - LDX #$00
$ [ C1 a" s2 a - LDA #$62
. C* [+ D0 n# P. G2 P* c - STA $BA
, }" E, _2 H& P - LDA #$22
/ \* N# a8 C% m - STA $BB
2 N& U/ R6 X1 p
2 Y, g( ]$ x& ~' D7 y' q/ I) \0 W- : H, S6 G/ B, h
- JSR B_PPU
$ {% b; I; u7 `7 B! r - JSR KILLON_WRITE* N: _7 B% \: i
- LDX #$008 u" h3 _0 }2 B. @4 a
- LDA $07A0
2 U O4 K2 s7 R% U; o - AND #$10
5 Q& H; h7 O( A* ~) b( Q9 j - JSR ON_OFF_PPU& N: N% A2 k+ a, M
- LDX #$00# B7 f0 N6 C5 c3 J% l# e4 Z
- LDA #$71
* ~5 x( H! R, V% b. u - STA $BA2 W" s4 l6 ]2 A4 m k( w, H
- LDA #$22
( k* S% S% u6 r9 B2 d - STA $BB/ K( \. F- ~* L
' q. v' ^- ~, K4 S7 ?- ( k6 [5 F9 W, v4 e
- JSR B_PPU
1 i- f8 O" z8 v7 L3 J+ V - JSR KILLON_WRITE
$ N: b# L! a, X+ n* Q; T - LDX #$00! x8 U' i# ^ G1 w7 |: `2 n
- LDA $07A1* N; p" \. \" Q0 {( m
- AND #$108 W# v/ v" X9 o' \
- JSR ON_OFF_PPU
2 P% \4 ^6 H. B - RTS3 d+ U6 L. x0 p7 u, I: D
- ! v% U! w( q: a
- SKYFLY_STRING:2 l6 L$ D- S3 M v5 U
- .BYTE $9D,$95,$A3,$90,$96,$A3,$80
/ R3 J, ^: {$ v4 `( W -
+ }! m5 Q/ b# A, T - SKYFLY_WRITE:
, W$ K1 x$ Z7 `7 R6 w2 m% \7 Y: K - LDX #$00
9 ]" i7 {4 J1 C2 c+ l - SKYFLY:8 K* v( a% K1 N. r
- JSR PPUADDR_PROCESS
* _& j# u1 g9 Y - LDA SKYFLY_STRING,X' i4 j% a1 x3 J/ d9 p5 A7 y6 S+ c
- STA $20077 W' i1 s; m4 S7 v5 c9 X" M
- LDA #$007 t, u, K6 E9 `: } F1 C H8 R
- STA $2000
+ m& g: g8 G2 y, \1 }9 k - INC $BA
/ j z5 l$ w; p$ ~! @ - INX& V% M' |3 w/ E- m' n0 g- ]
- CPX #$07
+ p6 d5 l) x- |0 Z5 R - BCC SKYFLY8 P$ @3 S/ h5 v% i
- RTS: M. T! s& R, e Q1 C$ Z) Z9 q
0 J5 {, U8 E- q d* E- SKYFLY_PPU:* p' {2 ~& R2 a& W
- LDX #$001 S @( n( r* [' \
- LDA #$A2+ F4 i( o& t- ^
- STA $BA
: t( k1 ?: G) q' R- q - LDA #$22- J1 x; l# C( r* r
- STA $BB' @8 h1 |3 e A8 f" Z- S' f# l
- 9 X: g; Q P' Q. l
; ]8 I3 o: k0 m* p- JSR A_PPU. Q6 y$ _1 v; Z
- JSR SKYFLY_WRITE* T6 p2 z( G. g/ R0 \, |6 B
- LDX #$00
& B$ e) A5 t/ f: K; | - LDA $07A0
: @8 v& x U9 Y - AND #$20 H. a2 y3 p" b
- JSR ON_OFF_PPU+ f5 P2 [% ?; f1 V) r9 m
- LDX #$00
8 | c$ j8 ^% E - LDA #$B1
/ l7 U' T+ h* W# K - STA $BA
i7 I" Z X, M% T" p; R% x - LDA #$222 W) j( ], [; m/ w
- STA $BB- q; N: _/ {3 i8 R0 q
- 7 \! W& s8 A) b% L7 O# u# c
, K0 g( v1 n" }7 C: k" f% V: v- JSR A_PPU4 Q" V' s) x: I& C. J4 R: `9 U
- JSR SKYFLY_WRITE3 O9 L; o/ p9 e% r0 j2 p( W5 U
- LDX #$009 [7 ]* ]) m9 u) z& }# M
- LDA $07A1
/ k$ q& q+ }* R - AND #$20
$ }5 C& ]% i! X; _7 S - JSR ON_OFF_PPU
, r$ v: R5 x( i* ^: O( b$ b7 t - RTS
* ^+ D, P2 S1 U# [' D - 3 p3 k* [+ O& V5 \" H& e G1 {
- BULADD_STRING:$ [ @7 c4 m6 n: T' D* w
- .BYTE $8C,$9F,$96,$8B,$8E,$8E,$80
9 k2 C. z* t! l3 P4 `7 T - 0 [) k# i5 F' X6 f- g- l
- BULADD_WRITE:
% F( e. P0 i- t9 l' F; G) i) b - LDX #$00
J& y$ j7 v: } @$ R3 S - BULADD:
, h8 g e8 B7 m& N$ E - JSR PPUADDR_PROCESS2 i. }4 X9 Y+ P9 [& ^
- LDA BULADD_STRING,X
$ [/ m/ z+ R; z; Z$ g+ w - STA $2007. t2 H# ?5 R/ e! A; }& B9 J
- LDA #$008 O: _, c1 i, t
- STA $2000
3 ~2 x1 [- q2 `9 S+ u/ r6 o1 @' K - INC $BA Z6 O$ g i) I/ k' p
- INX/ i8 Z* p% ?* l) x9 Q# J
- CPX #$076 @1 d6 ^5 \4 f ^+ ?0 `- _
- BCC BULADD& t$ l/ x2 Q% a2 P' P
- RTS1 w: y) \* o' g# i/ J, B+ Q% h
- ! r3 }9 Z" h* ]3 y( t( p
- BULADD_PPU:
- i% s8 a( J1 m& ` - LDX #$008 h7 I. u2 a+ p, ^
- LDA #$62
1 H4 c0 {; y ]/ w' D; t. R - STA $BA
' }$ m" m: c1 K- c1 b6 _ - LDA #$21
$ y' b! c b3 _- I6 w - STA $BB
1 l" f9 v4 i/ J, w- {. U
' s; D6 u' T3 J* r" q* U+ l; J
7 j% S5 J: ]7 \- JSR UP_PPU V; V( J! _; F1 J7 S6 _) {) g, b
- JSR BULADD_WRITE
# j# E6 q. B; p - LDX #$00
5 u7 A1 L+ |( L( F: g" P3 h1 Y: I - LDA $07A2
! w; X& _' }( c9 N5 i7 B, p - AND #$01
: C9 `" {5 @) r6 d6 w( W( J3 A - JSR ON_OFF_PPU M! m! c; Y% x+ H- y/ {
- LDX #$00
/ I9 q u+ x4 p. U - LDA #$71
6 a' M5 Z5 y1 p) q+ q - STA $BA
& c: X# [3 p# Q; S - LDA #$21
! P0 X7 T# f+ Q5 X - STA $BB
/ g) B. k6 t, q( K2 `% _ - v: f/ s: a* a) G3 g
/ L; x3 C* u4 ~3 {$ C- JSR UP_PPU# V$ D& a1 K" L$ T( Q
- JSR BULADD_WRITE& m; ~# z+ m8 c0 n* Z
- LDX #$001 s4 u# T v. [9 E/ |( F; t3 @7 b- |
- LDA $07A3
* W q; ^8 y! y7 k+ @0 p - AND #$01! r. A9 q' f# X- e
- JSR ON_OFF_PPU: X( g/ O3 f2 Q- J9 I5 [" e
- RTS" H( @6 X1 J2 L+ F3 y' m; f
- & N3 L0 G! P* F( u7 w
- MENU_PAGE_STRING:
) a; H1 i9 P0 K& H; D! v - .BYTE $97,$8F,$98,$9F,$80,$9A,$8B,$91,$8F,$80,$81, {6 z; r* j/ _. V/ u" e# z
-
. G+ D; j* j t& v2 K2 S! w - PAGE_PPU:2 Y/ Q, t2 a- i" G/ c! x4 v* M7 A
- LDX #$00
! W5 u p: W' T+ a0 h6 [ - LDA #$0A% Z2 v# D/ e8 _+ g
- STA $BA
# [/ X4 ^7 Q2 `% S3 J) i/ X+ k - LDA #$23
* E5 y8 Z0 ~, h# `- x - STA $BB# ~3 F7 m8 y4 o3 |
; n) s# ?# s9 C0 J4 p
7 T ~) v! t3 Y1 h- MENU_PAGE:
0 z% m5 ~: W! Z3 d: B7 A - JSR PPUADDR_PROCESS t6 T3 S' m. Y+ {/ {) d
- LDA MENU_PAGE_STRING,X2 V+ G% {' D* ]+ A5 ~* R
- STA $2007$ G/ l" Y2 @$ O. Z, m" n `# W
- LDA #$00* N; d# v! I* L1 V1 s/ U* g
- STA $2000+ u2 V! m s% n4 V
- INC $BA1 G; j) w2 {1 V- F3 n
- INX
6 C% j! P* U. Y7 V5 e - CPX #$0B5 z2 y' h3 f& X1 L
- BCC MENU_PAGE' G6 {* T0 g! d3 W. V0 Q6 ]8 y
- LDA $07AA; A9 V9 e* ]* m: i W. E4 Y
- CLC$ c! X Q, q/ J- G: l' p7 M; b" I
- ADC #$82( N1 { o2 H+ ]# p1 e
- STA $2007
: A+ w! X$ g2 x, w6 j+ v, I) A - LDA #$00
8 h/ k* G1 P: U* @7 S- B p6 E) U - STA $20009 H, a6 b" C( S
- RTS
6 K6 \3 ]9 ~% {0 C -
* F" V( w; [, n* u -
0 s2 Q' Z0 U& k0 K! O9 v! w" F/ [ - SKINGE_STRING:+ |4 z& j* Z& X3 x; A8 w& @
- .BYTE $9D,$95,$93,$98,$91,$8F,$80' n+ M6 d9 w" k; \, v5 {
-
6 u* U; r% }/ m) m+ g5 A - SKINGE_WRITE:, e4 i% d; C# b) C$ S3 X
- LDX #$00
- {% y' k9 t& o6 d# O - SKINGE:
/ n, K7 |5 m7 D* a: D. d9 q% C - JSR PPUADDR_PROCESS6 y* r9 y, g7 j" M$ Y3 g) B
- LDA SKINGE_STRING,X+ [ x: z; U! P2 i4 Q, M5 d0 `
- STA $2007
( }/ G5 ]( o8 ?% p - LDA #$006 Y/ T, |1 V. \3 ?
- STA $2000
# Q/ g% G( \0 t) b4 C( X - INC $BA3 U+ T0 b) C3 O2 n5 T
- INX) c- j3 k. X8 W0 ^
- CPX #$07
& b' x7 x! Y. G; g M" k, n9 v - BCC SKINGE. q: h: R" c; |& [- b
- RTS3 g- l+ Y/ |" F
- 1 J5 L3 U8 N$ x0 d2 G3 t( K
- SKINGE_PPU:
- b: L4 t3 N" R- N W) N# P) d - LDX #$00
* N9 g4 [! ^8 n! }# A3 S( u - LDA #$A2
- i, ~6 A+ {& W( H& i. |6 ^3 { - STA $BA
' ]$ w0 v T% L8 f: N2 ?% l2 N - LDA #$215 \3 w0 b/ E6 J& c
- STA $BB" _0 q5 |& g" E% j8 Q' D" x, g8 v
- # L: r1 }; S# Z# X- g; V9 O4 I
- ~3 k' x/ g4 {- JSR DN_PPU6 o6 n7 f8 Q; Z: H8 ^
- JSR SKINGE_WRITE
9 T% a Q8 b/ C% i; V3 \. H" t - LDX #$00
0 l2 S) R, k9 i `$ U$ R - LDA $07A2
! [! k: J, V- U0 e - AND #$02
! r# t4 f3 @ C - JSR ON_OFF_PPU% {2 I5 X- M; d
- LDX #$00
% E( L# g4 F/ u7 ^ - LDA #$B1 t# g, W" U [( h# Q
- STA $BA
1 D& v* z" W# y. K1 B% l5 Y7 L - LDA #$21
3 j- @3 b# M1 g0 y - STA $BB. d* ~! G% f% x, _
" R9 ]( z$ N# q0 Z
7 P) Q3 b s+ u/ ]- JSR DN_PPU
8 D! R' P' P3 A5 n2 N - JSR SKINGE_WRITE# `/ f+ u3 N6 z6 J" V
- LDX #$00
2 P; C+ C5 }6 l+ U" h( o m - LDA $07A3
/ c; K! D" l1 V - AND #$02
4 ~ _3 s' x. d i1 q8 y( Y" r - JSR ON_OFF_PPU
* P3 s: k- a1 L9 r - RTS! Q8 S! }( |2 I
-
3 I* G3 @. P5 o; l. u' ] - BULMIX_STRING:" m: H( P2 [. n/ r( H2 L: U
- .BYTE $8C,$9F,$96,$97,$93,$A2,$80, I1 {: ^) |4 |1 U9 X; f v9 p8 T
- ' q! |; L# V! o
- BULMIX_WRITE:
5 W/ [+ y- e* q; k9 O7 S& s - LDX #$00
0 t) y4 r& p2 V - BULMIX:. g' x. I6 e/ j9 z& W6 Z
- JSR PPUADDR_PROCESS
6 d5 l, Z5 ?' x% X& l) h9 M1 ^ - LDA BULMIX_STRING,X5 Y# v! T/ d( ?* v6 _( s# L+ x
- STA $2007
8 i6 _" B8 J* M; w/ {8 C. |5 S - LDA #$00
# P/ a8 }9 d6 Q1 o6 | - STA $20006 N+ p. N$ e1 }. U
- INC $BA
1 B1 M/ e! m! h4 K - INX
& s# S2 x# r* ^6 t3 i' }% w7 W - CPX #$07
6 O3 @& A* ]% ]/ t2 b! f - BCC BULMIX
4 i' V" P3 k8 R" U I - RTS% R" B+ r; M2 Y. | _
- 1 x5 a7 u" _5 U6 i$ |6 d ?" c
- BULMIX_PPU:! C& }* D' v3 O) N0 l2 X$ s( z
- LDX #$00
3 s/ E! v& N& b" {( f; V4 w - LDA #$E2! T# V% d& Q$ J' d0 y
- STA $BA
- d! ~4 D3 ~4 O2 v - LDA #$21
& G( J# Y7 |& D; D6 ~3 j - STA $BB4 R) D0 }+ a, G2 i9 E* A5 O. K
5 _7 p( u7 W: E! v' X3 x8 J- # d, z! i0 b- E. X: g/ [9 i
- JSR LF_PPU
1 E. x4 a# J) N$ l7 V2 b9 h - JSR BULMIX_WRITE- U7 v2 Y7 W; J% q: S( j& z; i
- LDX #$00
+ X+ b' _" w! i3 M! I/ l - LDA $07A2
" \# @- `2 G" C& X8 L6 r2 a - AND #$04- `# _/ b/ O3 @7 w2 o
- JSR ON_OFF_PPU/ m u$ a- ]$ w+ q) E, Y
- LDX #$00
: ~9 ~. _0 @5 G4 Q# ?5 M - LDA #$F1
/ J& ^1 _; C9 ?+ V8 B: P/ l - STA $BA' j5 A0 p N( c
- LDA #$21% ~" ?8 `5 C! `( F8 d1 z9 _4 l
- STA $BB. y2 Q$ x$ v4 b1 k+ i
/ O5 _( a0 I* ]) M/ u& ?% O
7 ~) z8 ]5 K# ~) w' c8 ^! s- A- JSR LF_PPU& c) g% V/ q0 q, a5 J/ e! S1 R2 M
- JSR BULMIX_WRITE
4 L i/ Q5 A& c' h - LDX #$00
8 O6 | U4 l2 r# p. T8 y: m( P - LDA $07A3
3 H' p" D; M- q/ O7 h$ l3 ^ - AND #$045 o' F% Y1 U( [
- JSR ON_OFF_PPU
# G' f) c# u4 ]: T5 ]* j" P - RTS X6 I8 X* X% i; |
- 2 U* T( X; b; J8 S( o4 Q
- ENELOC_STRING:
& Q, J# D N3 _, \8 ^1 v- Z - .BYTE $8F,$98,$8F,$96,$99,$8D,$807 Q9 H7 p/ I" o% |" s0 H
- * @3 I& i* ~3 A$ s
- ENELOC_WRITE:" j y- k, L6 l/ o# Q) m
- LDX #$00
8 x) q# y: ~. U: ]# p& f+ F - ENELOC:3 g+ n; O Z& Q2 w
- JSR PPUADDR_PROCESS" n3 T2 ? t' ]: `" A5 k' A
- LDA ENELOC_STRING,X+ y3 a: f: ]0 g) @
- STA $2007! ?. }9 R* b- Q+ z1 q1 ]
- LDA #$00( M, K- P) T M9 l1 Q
- STA $20007 J" Z g7 N, j6 F/ I' p1 \
- INC $BA1 a' I: p4 j8 B. d7 y! J
- INX
: N9 S* I, E: h3 b- F# o0 ]" \ - CPX #$07# i/ B. J2 y0 {# R" C6 o% ^* w9 d
- BCC ENELOC
9 B: t R% ^) j7 t* h0 d/ y$ _ - RTS
7 k( m, c7 u; L% k; R2 r- A
$ }+ e+ [0 D5 ~) y1 s' h- ENELOC_PPU:# y* ]* j5 |0 [6 h2 @( z' ^
- LDX #$008 s) u" W# e8 w; D" x C" F8 h& k
- LDA #$22$ W' Z+ T: F' J, X: \
- STA $BA
- S' \& P+ K6 j0 j4 b - LDA #$22
) o! O6 L- @1 C5 E' f' D3 H - STA $BB
" c! E. n: h/ v4 z# Z - * S- X! `: h6 t0 ]9 s) G) R8 p# R
" h, X( I- {- T: K- `( P, }- JSR RG_PPU5 |. h1 e3 N% \' O/ P
- JSR ENELOC_WRITE
|8 ~+ }5 o$ b5 e0 t; V - LDX #$006 m( t+ Z$ R8 v0 f- H& q
- LDA $07A2
; `1 @) L, R/ E6 n8 b - AND #$08+ {& d8 K* {' e
- JSR ON_OFF_PPU
2 W. R4 C9 @% |1 y$ }6 t9 l' w - LDX #$003 u" j6 I* E6 ~* v7 t5 O
- LDA #$31, G$ _, Q& j% R1 I( N2 D1 e0 {4 f
- STA $BA% L! S: ?; M2 T u8 F
- LDA #$22 V$ c5 y' `; g$ p8 t
- STA $BB0 g; Z% F' o) g. j
$ N( u u- F2 k" X E( m- + s6 @& w9 D# z
- JSR RG_PPU3 J' H. [; N' b. E$ a
- JSR ENELOC_WRITE
; r- }2 g+ P2 q% W, J9 d - LDX #$00
& K+ K5 |% d P0 @; J - LDA $07A3
6 G3 ~' G$ c3 j8 C1 i* e - AND #$085 K$ }( y0 A/ x) x* C+ x" u6 ]7 n' t
- JSR ON_OFF_PPU% v) H1 q: w h. Y" x+ A! P
- RTS
. h" _, Q( ]7 ^ q, h -
. D. l8 D) Y- |7 v2 C) h6 O - FOCFUL_STRING:* R0 ]6 m" ^& W) j+ B
- .BYTE $90,$99,$8D,$90,$9F,$96,$80
1 ?3 x+ R2 ?1 S: E1 c- l# Y -
& Z* K" q. s% E' Q -
$ s8 t0 _' m* i: k - FOCFUL_WRITE:
2 V- o: L2 i( ] - LDX #$00
0 K) \' F; s O. _' { - FOCFUL:
0 b) N X. k: e# m! x, C - JSR PPUADDR_PROCESS
" \/ V/ \9 ~# Z$ Z, b* w - LDA FOCFUL_STRING,X" C4 `" @. Z6 T# @0 x
- STA $2007
4 P/ G# C' O! u9 |3 f/ p% Q* P - LDA #$00
; {0 m; D% }9 J' K# J# b, T - STA $2000
3 W5 m( R% J* ~5 ]7 X0 f- {' @6 C - INC $BA
* H2 S& F9 O8 p- j0 k t - INX
5 m& s6 x6 @% i" \' T0 u5 `, B/ p - CPX #$07- h& j) h* J; _) z& o* d
- BCC FOCFUL I" ?" V7 e6 l' m0 k
- RTS
' Q6 L5 f. j+ E; Q$ q - ; ^' q1 Y" B2 ~) V
- FOCFUL_PPU:
1 m$ E: \( E5 _+ y4 {# O - LDX #$00
* j) X2 Y0 l, p0 J- y. X8 O+ a" r2 K - LDA #$62
' U* h" e9 D1 |1 B - STA $BA* X. z- d6 j) }: v: N5 y/ C1 d
- LDA #$226 X; ]# n6 N9 W1 p1 j: a3 d! R
- STA $BB
* F8 }# _* B5 e( g( S4 F - 5 P& v# _9 f- y; A+ k
( R5 B$ L& a) C4 @& {# `- JSR B_PPU
/ w+ ~! M+ [4 l5 E* _9 a- b - JSR FOCFUL_WRITE) ~7 i% `0 |, v! G
- LDX #$00
5 L. N) }5 Z, x1 j - LDA $07A2
7 w, a# f ]. \# y7 i/ R - AND #$10
3 g: \# f+ K) S; }' S( n Q - JSR ON_OFF_PPU
; g& v5 H/ e3 c' _. ~/ c - LDX #$00
5 {- i: g# u' F, L2 h. F! k* @$ D - LDA #$71
& ?% ]* z/ I3 L1 ` - STA $BA
1 ]& V% h1 \& `) p4 z3 b - LDA #$22
, Z: [, X8 {' | - STA $BB: ]& E. E2 e* j# b
: e- K! ]1 L3 @- T* N m- % m& u) u8 g/ D' P' ~$ g3 B; \" O
- JSR B_PPU4 g) \4 w8 W8 Q' d2 P
- JSR FOCFUL_WRITE
) g' K; k7 ]9 a* H6 W0 e - LDX #$00
# o) L' g! }" b' p) V' X - LDA $07A3+ R w1 i. a3 s( [* L* W+ L0 o! w3 ~
- AND #$10: k: M! L$ R4 |4 p* v, a
- JSR ON_OFF_PPU
$ D% |8 k9 W; O* u: s - RTS
: Q# L& E9 U& C6 ^; @ - 4 I' D1 L) X% q. l/ m0 [: Z
- BULCON_STRING:7 z* u. g! d3 H
- .BYTE $8C,$9F,$96,$8D,$99,$98,$80
; [, G1 D/ E; R, O, ^1 b$ A -
I( G I, ^" I -
* V* P) U8 u. K! J - BULCON_WRITE:3 g! K8 Y R9 j+ F. m$ ~6 ^! I& h
- LDX #$00
2 E. D/ N3 @, c4 Z" x$ U' s6 x8 [4 A0 L - BULCON:
& }1 Z) u: I9 A( r7 Z% } - JSR PPUADDR_PROCESS, o! }$ t8 q7 ^( J
- LDA BULCON_STRING,X; ~- x5 E& e% A
- STA $20073 [6 s$ w7 y3 Y- A! }( H
- LDA #$00* F, L x1 Q* Q t( J* p E
- STA $2000
6 M! s7 s( u1 n - INC $BA
( v' K6 u' C+ r+ L - INX, h' [' j1 x: |; E( J' W+ I" L! M
- CPX #$07$ m1 u9 I- o6 N
- BCC BULCON
7 O5 ]5 u. P* Y' w - RTS. \) `4 G; D1 |4 D( A! t
& B4 C/ P" j$ r- BULCON_PPU:
$ }1 m. g; q2 F; ~* @) F: ^ - LDX #$00
@$ n, B2 U* g% g; F8 `7 A4 G - LDA #$62
; G8 |- _! m( w! m2 y, ]8 r' ?- n - STA $BA
. U8 T8 x) T! y1 V+ w2 } - LDA #$21
3 K9 {! P6 F5 K - STA $BB
. B! g3 |5 q- u3 t$ u
5 y* i p& _- A. d# \' K5 N- # p4 N4 T& _) C* g
- JSR UP_PPU! U m5 H. |6 d. i
- JSR BULCON_WRITE' a$ v8 D: d+ N
- LDX #$00! o' {* Z( T5 Z' V2 r/ {! Q
- LDA $07A4
) V) A& }6 z, t - AND #$08; i' {6 s+ ^: M, d; D8 ]
- JSR ON_OFF_PPU
/ i7 L& _' M/ x4 |$ _5 W - LDX #$00
/ M+ z$ A4 Y. Y0 \9 W - LDA #$71
3 ?( [5 M9 A# V. S1 ?2 O - STA $BA# z5 j" S0 ~% R3 c8 \0 s2 J
- LDA #$21
' h9 ~& q) Q) B3 s - STA $BB) _, I( B _" _3 s0 H3 j
: h9 t# p$ m# W+ y7 }
0 E% r6 @' a, B4 \ H9 D9 L, Q3 ^- JSR UP_PPU
* o8 {4 w; N* S9 l0 b* H1 h - JSR BULCON_WRITE I7 I2 W1 l- U& S9 _8 ~5 ~
- LDX #$004 \$ s% ~8 D4 B
- LDA $07A57 y, j1 [, q$ L9 R1 N1 `
- AND #$085 F$ M% j \2 o1 J) ^3 N/ ]
- JSR ON_OFF_PPU) y6 Z- s; v- J( F
- RTS0 u. C; a0 T/ y9 L9 C
- 3 h( J2 J% H. @2 S' n
- SPEBUL_STRING:
: [' _* B ~: U; L/ K6 c - .BYTE $9D,$9A,$8F,$8C,$9F,$96,$803 R y7 ^1 u' ^& @2 d3 V- b: ~! D
- # y! R0 r5 g4 k
- . Z( V5 y+ |$ A" e9 D9 Y1 j
- SPEBUL_WRITE:* h7 F2 P5 ^) P W7 W; e% e. ]
- LDX #$00; q+ N( c3 m# W5 Y6 }- i9 |
- SPEBUL:- `' U( z9 b$ C
- JSR PPUADDR_PROCESS |4 I' n I C. N( ?. D; ]
- LDA SPEBUL_STRING,X
0 K, B# I# [6 e5 s3 M; R& c5 X - STA $2007, M) u, u2 A/ c* [) B
- LDA #$004 e% W' J% p+ j t/ R8 L! P
- STA $2000
; M0 B0 X: b+ ?1 S5 ] - INC $BA
& B: u% L% C+ {! S - INX
6 {# d+ f+ K5 F8 S" q1 D/ @ - CPX #$07 K' Z a* K" o1 R5 E& e
- BCC SPEBUL
# g( V9 T9 d4 m. O - RTS! h# f9 M& ~: p; s& ^# h: q. T
- 6 _. q* X E' o7 [2 m. q0 f5 e6 E1 R
- SPEBUL_PPU:; o8 o; X1 Q: I# V0 P! F7 M, o
- LDX #$00
# N& [2 \* a0 P2 o1 h' o - LDA #$A2
/ q8 \ `2 c. o3 T - STA $BA
$ m2 H+ k4 z* ]7 r - LDA #$21$ L+ H3 q$ |: Z. R' A
- STA $BB. v+ T- E) C2 s5 N
/ d- V) j2 ^7 L: A6 C- 7 ]3 G! }0 ]4 _! W6 P
- JSR DN_PPU
$ b$ P( o9 I! Q% s - JSR SPEBUL_WRITE
8 T2 V9 ?! X3 H$ f) ~ - LDX #$00
+ J; a8 U% `! P- J' n - LDA $07A4: C6 F4 u, X1 y4 v2 a! u
- AND #$02
+ c0 \" U5 d% j- w1 k; {6 m+ u - JSR ON_OFF_PPU& {! w$ x- Y* P% m
- LDX #$00
. g0 j5 {1 w q% |' b5 z/ ? - LDA #$B1( X! B2 [- E( J9 O: m/ {
- STA $BA8 s2 E4 U3 \' m- N9 Y
- LDA #$21" [, M* K( V: r
- STA $BB' f. V+ J3 d: T3 Q8 ?( m( e) X
- ; I1 J' Q3 K+ e( d) Y. G% j& F
- " ? F* ]6 t8 n# _' @# t
- JSR DN_PPU
: ]! J4 u# A4 e& T - JSR SPEBUL_WRITE
1 e) J% ~6 V3 Y4 Q - LDX #$00
6 g5 ?# B% c7 F8 o/ ~ - LDA $07A5
3 i( |$ h0 S/ H1 `& K) ^+ { - AND #$021 F% X# h8 \8 h# m* E
- JSR ON_OFF_PPU
4 j6 s, J# [( y - RTS5 r+ P% W B& s% \1 o
- ' w" v+ T/ t! ^+ {
- .ORG $A500) m5 M# D$ H' F. O6 \% |
- CLEALL_STRING:
( l0 f6 ?* E0 G: g3 f3 v$ e - .BYTE $8D,$96,$8F,$8B,$96,$96,$80
& e( y% }0 l# }8 v9 V9 U1 ` - 0 ?! |, P4 K5 f' }: y/ g
-
}, W8 r( d' D# i9 W" c* L - CLEALL_WRITE:' G5 y7 d$ \# ?2 H
- LDX #$00
; W7 q: m8 P( o5 `" P/ o$ o - CLEALL:
g8 p) [& g+ O) L$ v( f- z/ X% F5 } - JSR PPUADDR_PROCESS
/ K$ N, @/ s; z* S' u( Q - LDA CLEALL_STRING,X
/ G8 l8 d& T! L* Q9 ] - STA $2007$ Q* s, n6 W! Z9 j( X+ x* E0 O- D
- LDA #$00- [4 Z/ D, Z9 i- z7 \3 g) @7 T
- STA $2000
; E0 }7 {* H" q5 \# a - INC $BA
: I) V$ g9 ^ V" T% [/ y - INX! P1 M# A% i# W, K9 f) A$ \
- CPX #$07
8 ~. `4 ?+ e! g5 c - BCC CLEALL
- u+ ?6 `8 I1 x - RTS$ U$ W3 @ |0 [* P, @
- 6 D) g! u. B; t6 v
- CLEALL_PPU:
0 ^7 E& s X+ Q - LDX #$006 Q V% }- @2 P, e5 O
- LDA #$E26 X: Q4 |4 b/ N, N+ \( F3 b* [
- STA $BA
8 Z5 q+ Y4 g0 ? - LDA #$21
1 g# `( n5 X/ p2 K# Y0 _ - STA $BB+ E5 U( Z& e! {0 k8 d
' E( R. h3 A5 e; y v, ]
5 ^. J7 D: n- U, d) ^9 l; N- JSR LF_PPU1 o+ | K* D: b6 X+ }
- JSR CLEALL_WRITE. D+ D* c" _0 k0 ^% a0 D% U9 I& z
- LDX #$000 K$ y& Y0 F# p, c! R1 j
- LDA $07A4
. |; W2 d G( w: A' I0 o9 V - AND #$04
4 A; m! w& T0 f5 r. F8 N - JSR ON_OFF_PPU
2 \0 D: {5 A7 F3 @8 I/ J - LDX #$00: g. I' v: r: I4 {: B
- LDA #$F1
: o0 r6 s. Y' q2 H( X' Z, x - STA $BA
9 y1 f$ s- q( @ - LDA #$21# Y+ l" }7 p" l; _) R% M2 G& z
- STA $BB. J, U" Y4 e3 H/ J% l% |+ X, F" n* k
- ' n" j& o3 c& i2 H, L" _
- + [3 ~" O& |" z9 @& Y
- JSR LF_PPU. P+ ?( C+ I# O2 G; [* {
- JSR CLEALL_WRITE
; h% n1 [7 T3 h6 A: q - LDX #$00
9 H' k# v2 L2 B9 x# h$ S - LDA $07A5. J% z3 C3 H g3 u
- AND #$04 f! L! H* P& J; X! A
- JSR ON_OFF_PPU
' j. P( y+ ]4 _3 [. e, w - RTS4 X8 g C+ w; z% @6 T
- ! ]0 }3 J- Y' f; H8 s
- HARDMODE_STRING:
~; ^9 o, U- E, |7 S5 q# c4 ~ - .BYTE $92,$8B,$8E,$97,$99,$8E,$80
3 q3 L" g+ z9 F -
1 O* K3 o+ Y3 T( K9 j8 W8 m - - ?* ^# g |" c! G+ G! d& Q- t0 R
- HARDMODE_WRITE:2 S% Y; I% x! g7 P: R" B i
- LDX #$002 N( }: P( @, [' a4 w! N+ \
- HARDMODE:
& D& @8 a7 w3 l) A K# G; X' D - JSR PPUADDR_PROCESS$ o4 E- A/ p' K/ N; h/ ?9 i
- LDA HARDMODE_STRING,X
0 j% A$ H. ~( V- I+ J% z9 ]) a, a - STA $2007
% }- A# W E }5 ?1 J; a - LDA #$00
% H x" h3 {% c8 L0 ^. C& q2 R - STA $2000
% b" o; P B, c4 ]8 ^ K: r - INC $BA
! r7 ]- }" C" S- }, n- U - INX4 }9 @5 `! |2 u
- CPX #$07
0 x2 G% _0 z0 Z& { - BCC HARDMODE
; w* O3 s7 {7 m; ^, Z- `" K - RTS
1 A T0 U2 @1 |, Y
: v' Q/ ~3 F+ [7 I# G% h' v' D- HARDMODE_PPU:, u9 D& M) w9 s5 R6 `
- LDX #$00
4 K9 d+ q% ?) ~% x S) r/ v4 n - LDA #$22
3 T5 A4 Q6 F: w8 r( u- e( I( u - STA $BA) u8 E2 }+ }$ ^& F& U3 n
- LDA #$22
6 [; G9 f. i7 L( l - STA $BB/ V8 a& W# G3 v7 P
- JSR RG_PPU
% J& [8 k* e- ]5 w# r% p; m2 A0 k0 k" U - JSR HARDMODE_WRITE$ u/ T0 B, {: r5 p
- LDX #$00/ P+ f) `) @! i! f
- LDA $07A4* \, ^; O2 r$ c. P8 x: d) X4 s7 Q
- AND #$01: Y5 F) G: L |( Z8 x& D" f' Y( @
- JSR ON_OFF_PPU; t8 i3 Y3 d9 J7 w& G! n8 C
- LDX #$00$ l% l2 L! c9 }" p
- LDA #$313 V; Y8 ^9 V( Q3 ~ s& F. w& y
- STA $BA
( G" B* [, T+ Q, q - LDA #$225 b3 Y7 k" A- ~ B
- STA $BB+ X5 N' z' v% A, R( g7 T
6 ~+ L& c( \/ j; F( I B- V
5 Q7 t& `: i+ V( H/ Z- JSR RG_PPU) Y& ]- A2 ]) L& Y. n/ j( _$ l
- JSR HARDMODE_WRITE: b$ z7 g' v0 B! x
- LDX #$00
+ w7 Y& e5 T5 j - LDA $07A5
1 {3 [" t! m s- g0 q" [ - AND #$01 ~' F, p8 o/ d) s# [( g: K6 z
- JSR ON_OFF_PPU
( B% M0 `' r: a9 ^2 Y! n7 P0 J - RTS
* Y) A; R% Y$ e: L/ I1 W
# Y' M" b. `2 E6 Q) j: f- B_TO_JMPSTG_STRING:3 q3 c# f, D T7 _* `$ J1 d
- .BYTE $80,$8C,$80,$9E,$99,$80,$94,$97,$9A,$9D,$9E,$91,$80
( j+ n/ |' K _3 y/ q3 `5 j -
; H) o. A4 a9 ^/ _+ a2 B, x - 3 W" W5 O& ]' W9 K. {- l6 S" c+ T9 I/ U0 ?
- B_TO_JMPSTG_WRITE:
c- Q) p8 k5 C - LDX #$00 y1 f. c! i: e8 g$ L
- B_TO_JMPSTG:
) g- F" y& p: I( f, P" D9 |7 b - JSR PPUADDR_PROCESS
e1 s! [; K% ]1 U - LDA B_TO_JMPSTG_STRING,X
5 C, A: O* I5 I" k* D" ^" M, o) p - STA $2007 H& ?: L& k$ f0 D
- LDA #$00' P, z9 @* P' ^
- STA $20006 [# E! `; O; h; @- k- s
- INC $BA1 c' B' `8 R2 _* S
- INX
5 ~* C; F! {2 q. l/ l - CPX #$0D+ n9 o4 a% H, r6 I9 A: r1 R1 T
- BCC B_TO_JMPSTG9 x% A8 |- B8 a+ O
- LDX #$00
; |: i+ }, a2 D& x" @9 \( Q# E - LDA $7FE0% G# x8 i4 ~8 [5 U0 t7 _3 V
- JSR ON_OFF_PPU
, f5 D: R6 p$ P% s7 _8 H - RTS
3 ^; F3 v1 m: m1 v - - D6 @$ z3 Y* X H) {2 N. g2 t
- B_TO_JMPSTG_PPU:
: ~2 {2 t3 A3 g: P2 Y - LDX #$00, B1 m; P. G, M/ z" Y* V
- LDA #$68
/ V; Z+ X& Q4 E' C' y2 v% x+ @( d - STA $BA
9 W+ f7 v# B5 N9 I! F2 ?. [ - LDA #$22
$ e; d, Z7 y! H- }* x; E - STA $BB
7 z$ s2 b. x* ~ - JSR B_TO_JMPSTG_WRITE
; C# R, V+ L9 d - RTS
9 d" {/ Q0 ~7 r -
8 o5 Q6 n0 A. K; n6 ?8 j9 v
) r5 y5 U9 D6 u Y9 H- A_TO_PLAMOD_STRING:
I) y$ @' o) U - .BYTE $80,$8B,$80,$9E,$99,$80,$9A,$96,$8B,$97,$99,$8E,$80& N8 l: ?0 [, a, s
-
) ]3 [9 ?( t6 o9 A7 g( } -
9 T0 ~( v5 B# _2 y" I+ n q - A_TO_PLAMOD_WRITE:, U8 u, k4 ?( t) ^
- LDX #$00+ F# V N6 Z% Q* ?, R+ F" h7 c8 ]) E
- A_TO_PLAMOD:5 @2 P2 J5 D3 h
- JSR PPUADDR_PROCESS3 ~) z( L( D/ \9 X( ?$ C
- LDA A_TO_PLAMOD_STRING,X
- U! l# I* @4 p3 N% i7 _ - STA $20073 X3 Z! ?9 n+ S8 R' C6 ~3 J1 |
- LDA #$00
. A* V6 e. z& @' n- J - STA $2000
+ }" ` L3 s. v6 L0 J: d3 G5 p* F: j - INC $BA" a1 f j3 u: o4 J
- INX8 Y, `2 A5 H1 g" |& x
- CPX #$0D c2 Y4 V6 h, d/ o1 q6 q4 Y& I
- BCC A_TO_PLAMOD' L+ b& L% c6 z7 f2 h
- LDX #$005 p" W6 W% i% [- D) y8 ?
- LDA $39
: z* P* u3 U3 C - JSR ONE_TWO_PPU s6 x) l( N2 E
- RTS8 x, X! P6 U* H( e/ m% Y4 x
- % w) ?, q, m# ~6 s' c7 G
- A_TO_PLAMOD_PPU:9 A0 W+ u0 d. m8 l1 ?
- LDX #$00
; H1 x# S2 ^, ?! j9 N - LDA #$A8% [- H7 i4 @% x3 ^! |! p/ U
- STA $BA9 D" m; C/ | w0 P, \! A/ i8 I0 n
- LDA #$22
4 h0 h" m T: K - STA $BB1 z( m3 U/ P+ Q0 C s
- JSR A_TO_PLAMOD_WRITE4 v/ }7 r. f) q0 r5 X
- RTS7 Q. z2 R' O. e! s( j8 N
1 a) z. B* ]+ f9 T( D$ y- MOVSPE_STRING:5 _/ s) `2 ?; E4 U' D* ^
- .BYTE $97,$99,$A0,$9D,$9A,$8F,$80* p0 C3 Z Y! u( e! N! u5 w) m4 S
- - p( w" u& J- w# i( |/ D
- ' _9 t. w- M# A6 O. N& z4 K# v
- MOVSPE_WRITE:7 _9 D% u: I A. w. w0 W7 G' K
- LDX #$00
5 f: H5 z/ I& k. a# Z9 M a, f6 N - MOVSPE:
% K, \1 u" F& w - JSR PPUADDR_PROCESS
" q% y' B/ ~1 l) _ - LDA MOVSPE_STRING,X# u6 d. ^3 d1 n( V4 a& c
- STA $2007
4 i, v1 c' h3 l, o/ `2 Q( o - LDA #$00
( r& d' R* \. ?( z0 \ - STA $2000 a H$ e# v+ b1 F: l
- INC $BA
+ Q2 o% W) e T- x - INX! r" ?; ^, t2 X. |- \ r
- CPX #$077 C9 i) h' w/ S! K& c
- BCC MOVSPE" m) L# [, w" P+ l6 ?' g& I
- RTS
( u. _- z1 B* ^& ^# Z/ y) x3 ^
0 s% @' }, m$ }; ?- MOVSPE_PPU: u3 a7 X" r" C% k" Y
- LDX #$00
3 p# F0 b9 \. r: e4 Z* {9 | - LDA #$696 h& u% n5 z7 m+ [! R1 y4 A/ H
- STA $BA
# ^; I( g% D6 C) b9 G1 t - LDA #$21% B1 o7 E7 A) n/ V, V
- STA $BB7 e) W; m1 i# o
- 2 ~: P4 l! Z* t% K( X$ @
V8 S+ ^/ A7 w- JSR UP_PPU
- {* k! k( O" ] - JSR MOVSPE_WRITE: q0 A5 |8 c. u2 l9 m! U
- LDX #$00
& `5 l* Z1 k( z- q [1 Z# R2 h6 _ - LDA $079F
) \ e2 O0 m# K5 j4 o - AND #$086 A% y& a+ Y& h* Z) H
- JSR ON_OFF_PPU
, l) F* \1 q# ^' j9 |/ W+ A - LDA #$800 z: a" O' D9 f( Z# o& t8 P
- STA $2007' s0 d# v/ k# c0 Y* g
- RTS
, n& c9 p, B' i6 \ V% _ -
Q' O* @$ P6 v - : y' j5 _ Z! D1 f% W
- UNLJMP_STRING:
5 U- L! [" z5 O1 g - .BYTE $9F,$98,$96,$94,$97,$9A,$80
$ e4 _2 i* M1 h) C# i6 e: _- X -
Q) P, e: h, C; a/ v$ [5 ? - 1 Y0 o7 L. ~& e
- UNLJMP_WRITE:; g4 ]5 \ Q! ~9 a7 Z+ p4 m
- LDX #$00
8 R) P/ B: v' }! `4 D; H - UNLJMP:0 P! x2 l- G1 C9 r- c# E; t+ ]5 A
- JSR PPUADDR_PROCESS
$ u- ~# S/ k# `3 I. A1 ? - LDA UNLJMP_STRING,X
; b& M/ _5 e5 O" a& g) M - STA $2007
6 s1 P) l& X7 B" n* x - LDA #$00& g9 m. ?$ ~/ k, p& c# S* O7 l
- STA $2000( M' q& \( s5 m2 c( B D$ h
- INC $BA
c$ A) y/ b7 s0 N- w S) P - INX
0 S/ t% h5 T+ y' F - CPX #$07( f9 f% d8 M' k& V, K: L8 M
- BCC UNLJMP8 m& s6 d" l1 @6 ^9 M
- RTS
! f- S o- z3 D! r/ U2 Y' _
+ D5 j& Y( D& p1 `- UNLJMP_PPU:
4 M1 x+ L4 Q- f$ {7 a" c M - LDX #$00
& _0 _1 A: H/ D/ I' U& x7 K - LDA #$A9
" h0 Q; b1 v7 V - STA $BA
& F! h& t% ~. |1 L# O - LDA #$210 n3 x0 H8 {9 Y$ t' ~7 ?" W8 i {
- STA $BB; `) i* P2 h2 `" {: K5 T
- 8 E, G: s' ]+ _( _! q) R
* u1 ^1 F \9 X1 U" L- JSR DN_PPU
: W% Q6 }- M- W! r- B, z; K - JSR UNLJMP_WRITE
. h0 D7 I+ h5 Y/ g' b - LDX #$004 C! }( F0 R1 i5 S/ p3 D7 q
- LDA $079F
$ O9 Q# e E# x3 s/ x/ e L - AND #$04
7 c6 n/ C1 P( C( B* H# \) b- U& K - JSR ON_OFF_PPU( b8 v) D# s1 n8 \* t
- RTS
' B2 t- [$ U% p" ^5 y - 5 Q$ _7 @9 o; U. h) W0 _9 A2 m
-
5 N# q! f& P2 X* |4 o* C5 } - DESTRO_STRING:
0 g) m% i( X3 R% f+ j1 L% J |* ] - .BYTE $8E,$8F,$9D,$9E,$9C,$99,$80. h! K' {# Z2 ~ L* m
- & i3 ]7 h1 L8 r
- : f1 r" @' X" B' k5 E
- DESTRO_WRITE:
7 D( `7 q. c" |$ a1 @" O - LDX #$00
/ B6 `& K+ O" K2 r+ l7 Q4 Y - DESTRO:/ A) `. _7 F. W h3 R0 Z/ w& V2 M
- JSR PPUADDR_PROCESS
) l( A F, D: A' M4 I! E4 K - LDA DESTRO_STRING,X
( b/ Z; u" r0 i# T7 Y - STA $2007
! u$ i% `. T ?- z6 {# ~% P* | - LDA #$00- s4 M4 h' {) w+ E6 M) h' J+ u
- STA $2000% B4 p6 a0 y- E2 U( |# o& T
- INC $BA
. N2 |; C9 O& \ - INX: S6 o! s! Y" l3 n' R$ m8 K
- CPX #$07* Y4 w+ _. ?, Y( j P( p6 E( X4 p
- BCC DESTRO
n5 z1 E% {8 A3 W: \ - RTS- s& D; h; i* c
0 v* @: q' _) l" S7 l( l/ v% H- DESTRO_PPU:. m% Y9 N r* Y% Y- q( b
- LDX #$00+ } P4 Y) S3 S# k
- LDA #$E9
6 x6 k% J9 X) Z1 k) n1 I - STA $BA8 d! S0 u! D' k" }: q# X u0 S
- LDA #$21; z9 S9 O( K6 R2 ]( n' k" X% H7 E/ ]: @
- STA $BB
, f7 d! w$ {$ k$ O, B8 n - 8 @" q% S8 s1 o& z6 I
- ! b9 f8 o# j8 J$ Z
- JSR B_PPU
i+ e; l( i: J3 P6 ] - JSR DESTRO_WRITE
9 s5 \1 f3 g9 G% n/ P - LDX #$00
C Z) w1 t% X! p6 }$ B - LDA $079F9 s6 M2 B8 v3 c8 }* O& ]. M7 l- u. _
- AND #$40$ n, s3 {, W9 J4 h2 r% T8 t/ } z) w+ M
- JSR ON_OFF_PPU
/ Z6 P C1 x4 p* R5 {: X - RTS
( z& }2 F. d. a -
0 E; M7 C: @# q# | -
' s' S0 e: K; N7 Z. m; v' N9 F7 V( ^1 L - EQUBUL_STRING:. M4 \3 ~# l: e
- .BYTE $8F,$9B,$9F,$8C,$9F,$96,$80
5 R$ R7 ?! U9 Y; a {6 p - $ V% j1 M) a5 f7 N9 O- C
-
! M( F# g+ y' a; k/ x `) v- w6 ~ - EQUBUL_WRITE:
2 o% `" x4 n; Y) O - LDX #$00. W" K9 B7 R- F* `
- EQUBUL:
8 N4 l$ h/ }; @- S. y3 A: t7 s - JSR PPUADDR_PROCESS
0 C4 q2 s5 S, a& Z! m. y - LDA EQUBUL_STRING,X
, b3 E* h: R0 J% j; I: M - STA $2007- |$ q( L; B* e7 n
- LDA #$00
6 u3 q `: p/ p1 r - STA $20000 x, J m# V% m/ b1 [; s
- INC $BA
`6 r$ U5 q, E; c. p9 T0 t - INX
9 f* O( B+ [, C3 l8 q/ v5 _ - CPX #$07# l: z9 X+ @7 s4 N; @. J' G
- BCC EQUBUL* L" o- u2 A. U% p2 h
- RTS
# @7 ?9 h7 w1 [: e( x' z0 A' `
$ d8 H) t8 B: J0 K# T; o- EQUBUL_PPU:5 \5 `: n1 Q/ N/ _! M1 i. _
- LDX #$00
4 @8 ]4 L: p' ?# ] F w9 s - LDA #$29
o0 X$ w3 V* i7 V" w - STA $BA
! P% I0 W8 {) H9 j5 h - LDA #$22& t T7 v" U* D# i k3 J0 |
- STA $BB0 |' w1 w1 v8 z6 U
- v7 O. ?- S. a4 d/ Y. ^! S7 n( u
- % s+ }0 C1 W: Y8 u9 n+ W1 }
- JSR A_PPU: a" B" v* B6 N @) Y
- JSR EQUBUL_WRITE4 V! s7 J1 r5 {1 b" F M6 v
- LDX #$00- O7 i1 P- A2 P6 c2 W
- LDA $079F
. L! _. H, A9 K9 M- j- Y- m' p; K! o - AND #$802 D0 _% o& p, N- F( U1 b0 q/ C! b
- JSR ON_OFF_PPU
7 x; u. O& y$ ~7 H# w - RTS- N! h# D! {8 L7 w: u
-
/ C8 c6 G9 V' p5 J7 V -
F3 M8 {8 t; ^" k4 l2 T
7 r. C z( m" o- BULSEL_UP_STRING:
- k Q$ O+ E* ~7 Z" n - .BYTE $9F,$9A,$80,$9E,$99,$80,$9D,$9D,$80" j4 C% z8 k- }* c( \# y
- " m6 \3 g! i% j4 ]( U" \; _# k
- BULSEL_DN_STRING:6 b& B% e! s* k' v' ^) D
- .BYTE $8E,$98,$80,$9E,$99,$80,$9D,$96,$80
I( d% X. Q! d -
7 k- H( b% U- m. e& | - BULSEL_LF_STRING:
0 d( a$ x l) e! G# A. z. [: _ - .BYTE $96,$90,$80,$9E,$99,$80,$9D,$97,$80
z+ M/ Q' h# }3 o. z& r -
7 g& D% E7 G5 B) h - BULSEL_RG_STRING:$ F! Q5 H" Z' W! T+ B! d( r6 y! m
- .BYTE $9C,$91,$80,$9E,$99,$80,$9D,$90,$80 A' j0 d$ x s& g2 V
-
% V$ w" d* B A: z. A7 d/ I - BULSEL_B_STRING:
6 a, g3 n* `; g9 y* U+ `4 u- t1 x - .BYTE $80,$8C,$80,$9E,$99,$80,$9D,$98,$80- y' O3 l& h J/ G
- / N, D9 U6 _9 O; P+ Z8 o
- BULSEL_A_STRING:) H2 r4 E! g( f% Q' P8 P; {& Y
- .BYTE $80,$8B,$80,$9E,$99,$80,$8D,$99,$97,$97,$99,$98,$80,$9D,$9A,$8F,$8F,$8E c8 O. P, ^: `, w+ D
-
2 ]: O& t% w; r' u$ S; c - ! I% M1 e# j4 M1 G2 p
- BULSEL_UP_WRITE:
2 C1 _/ S/ X& B% E - LDX #$00& `0 s, I* m$ ?6 }7 M) z
- BULSEL_UP:
! }0 y+ W' y0 @& t* Z - JSR PPUADDR_PROCESS
- ?+ e( _2 u }$ F3 `" p - LDA BULSEL_UP_STRING,X! Z( V4 v: G8 g
- STA $20072 K5 ^( F1 A5 d* a1 x
- LDA #$00
. `% ~+ W. Y3 J7 A - STA $2000* G( ?, X/ g# W+ s
- INC $BA
' r h$ H6 u9 M - INX
; C; r& O- U9 ~2 t0 _; ]1 ^ - CPX #$09
3 u( \0 g2 G h- ~ - BCC BULSEL_UP
4 a8 e! m; E% o p' e - RTS
9 |+ R, d7 D& p. r: q$ G - BULSEL_DN_WRITE:6 c3 y4 R) t8 n2 L' N1 H
- LDX #$00
* h" z6 o6 \: V8 U; K - BULSEL_DN:
u, C7 T/ Z8 D' u2 V* s: v- F - JSR PPUADDR_PROCESS
1 }) d$ J( r% U3 o' E" y - LDA BULSEL_DN_STRING,X3 _) f. \8 ?+ Y; T5 w& k) p
- STA $20077 [3 |/ M% `% B& y
- LDA #$00
! d2 r( |6 Z% m7 }& ]/ d - STA $2000
2 G. G6 g' b9 p0 O - INC $BA
& j+ s2 J/ m* v! i - INX
- p/ n( H" T1 f3 q7 C - CPX #$094 ` L& N4 @; p8 z4 K0 P
- BCC BULSEL_DN& c1 D; j. d$ O: r/ N6 M/ ^6 C
- RTS% S5 P8 ?- t) D; p
- BULSEL_LF_WRITE:
( X( {& q+ k B5 I - LDX #$00- l# m8 c( N# ]2 a
- BULSEL_LF:
1 t. s2 i4 x! r' s4 O - JSR PPUADDR_PROCESS7 L5 o# _; m# t X
- LDA BULSEL_LF_STRING,X4 u5 l& h) A+ J2 b
- STA $2007
: h9 y; ^, `$ u; v3 f9 U4 F- o - LDA #$00
/ f: B6 j8 o5 C - STA $2000
0 Y: P7 I. M! D; J - INC $BA
& S# s: _6 S. d! O0 \( s - INX
9 }* W1 m) b# ~/ m/ W* }( L - CPX #$09
: l2 [# I a3 V8 R: z - BCC BULSEL_LF2 u8 e) b7 I# o# S3 ` F
- RTS1 E# j" S+ W! l, q4 q
- BULSEL_RG_WRITE:& n7 _" k/ r1 N
- LDX #$00
+ R* S9 Y' x; e0 B9 T - BULSEL_RG:+ ^$ Q# q% A6 t$ w
- JSR PPUADDR_PROCESS$ E% [: _1 M9 b; v/ s4 ^
- LDA BULSEL_RG_STRING,X
' @( F9 x! F3 v0 ?% X" Q ` - STA $2007( n& `% T( n. `$ w
- LDA #$00) i- L: z$ B. R5 T; ^$ c7 s
- STA $2000
4 D5 V4 }2 C6 e& v6 D$ ]$ C - INC $BA/ }* d6 c' [, H& l! ?- l
- INX
# V7 m& J/ f1 Z; X8 U& a4 z - CPX #$09, \+ V6 r/ P c6 E
- BCC BULSEL_RG
4 r& S( e5 K" } |5 x$ ~; V; ` - RTS
0 s5 Y+ `3 p$ f: w8 D. i) } - BULSEL_B_WRITE:0 I- o# _: m6 X& X" z7 G9 V b
- LDX #$006 ~9 ~$ t, L4 J' l
- BULSEL_B:
/ G% T$ t2 y8 D- R8 P - JSR PPUADDR_PROCESS+ v8 ]4 h, q* [' G
- LDA BULSEL_B_STRING,X4 G; C" n5 Z& Z, ~
- STA $2007
( x. w A L( I" _ - LDA #$00( g( M& {6 Q9 N5 p( n7 V$ g
- STA $2000
9 x% x0 }9 L H% C! g - INC $BA+ A* e4 }" T" M$ H, h/ x# k: ]- g
- INX( b% b; t( t) \8 f2 ]1 D' n: f
- CPX #$091 P3 M; j9 K: r0 R
- BCC BULSEL_B
: l7 i$ z" B6 H' ~) }; ^ - RTS
5 O$ v; B- q* P3 z( b% U5 B; c S - BULSEL_A_WRITE:# M1 ~3 f4 w: X5 L7 A4 b' h3 W
- LDX #$00
9 z' h: M* J5 l+ |, [ - BULSEL_A:# Q( w3 C. o7 p
- JSR PPUADDR_PROCESS* g% R6 H8 L, t$ B- Y5 N
- LDA BULSEL_A_STRING,X. u% @) L$ s7 O$ U/ M
- STA $2007, c7 `/ M F, X- R2 O2 Y
- LDA #$009 F% T% ?8 S9 M- @9 `
- STA $2000
4 U; i& U" n6 f, Q; L7 B - INC $BA6 k* ` L6 s+ u) G7 P& q7 S
- INX% k z2 a O! D' S% M5 _- L4 V9 u
- CPX #$12
0 S, _9 u& A2 ?; H+ R) i- [+ n: c - BCC BULSEL_A
; X+ H: p }, x& ^: s2 I3 l; L - RTS
! ?9 x& B! T4 h - 8 o- H0 X4 G/ [0 j$ [2 l2 c1 I* c
- 7 g5 u, d/ G2 a( P) \
-
J: g# {+ N' j: T: ]) g - BULSEL_PPU:$ y p7 v" c0 Y! S, y v/ |6 B
- LDA #$6C
# M& c" L& B) \ h" c! U - STA $BA
4 `+ g6 D8 J' a( P4 ]' ?' i; x% `5 h - LDA #$21
5 V4 g' d; y9 C" j( W; c - STA $BB
6 a( f9 O' K! q1 g; [ - JSR BULSEL_UP_WRITE
, f2 P# l& r5 s+ _" W - & y1 r$ B# j; z+ j8 K' a
- LDA #$AC
1 |/ e. ]/ Q! k) d - STA $BA
) s* m+ ^; J3 W, V - LDA #$21
; [6 l7 `0 n: F4 R - STA $BB8 l! [; ^# D/ _, e3 J- b
- JSR BULSEL_DN_WRITE' q0 P6 @, c W R0 t3 H& i) \$ F
-
+ a6 H, \8 N& {3 g0 f( H# T1 J - LDA #$EC
# L: t# w2 _9 o" a - STA $BA! H: \4 ^# F/ Y
- LDA #$21" X) j8 q& R9 l0 {
- STA $BB
0 X$ y8 q5 {' k+ \ - JSR BULSEL_LF_WRITE9 y8 w3 G0 e/ v8 t [
-
% J8 C, G/ t- V3 ^3 p- ] - LDA #$2C
, E3 b6 X7 _ w$ K a2 F - STA $BA
. N; l0 z# P4 B* h. X - LDA #$22
4 Z; p" [: W, q- C/ W+ [ - STA $BB
. O+ \( b) E( I, ]: z. W - JSR BULSEL_RG_WRITE
# E8 X$ F0 A! s" d+ g3 l7 [ -
* m9 ?8 L! H- N7 f& U( N9 ` - LDA #$6C
$ ~8 i# G4 a! p. K7 p - STA $BA: g1 v, n: q' `5 k
- LDA #$22
# B5 g$ Y' |4 U0 z0 j( N - STA $BB
! I U5 Q8 s, d" G - JSR BULSEL_B_WRITE; a, {4 b* t1 y
-
; W- V' c$ Q; b+ _ }8 W - LDA #$A7
. N2 a9 K, k/ S4 c4 z3 |8 Q9 W - STA $BA0 T7 c: |% w! ]! L. m7 G" t; b
- LDA #$220 B3 q5 j F8 {! S
- STA $BB
+ [" ^( U. e8 n5 c% A0 w A5 g! T - JSR BULSEL_A_WRITE0 _. s% G. s; i; `# k0 ^
- RTS
+ f* v3 E# c$ Y& @; f -
1 v0 S; _& `# U @ - 2 o% W( }1 z* {. d8 B: S/ }
- ; ?, E6 A; B& F2 R2 j
- UP_STRING:4 G! q1 P, p+ @5 e
- .BYTE $9F,$9A,$80
/ ]) O$ H+ r e) [7 a& m - % n/ p" f# Z, W5 c7 x, M! f
- DN_STRING:
# |( A8 G2 h9 v - .BYTE $8E,$98,$808 G# Y( k5 E4 V
-
9 J/ A% S# W+ k! K+ ^ - LF_STRING:- i6 Y/ M, u; P# ~& a4 U) |* z
- .BYTE $96,$90,$80% c9 b$ ^6 p- A4 n
-
4 }/ B. ~0 M+ z9 A% M - RG_STRING:% i9 v# E( E1 j/ x [
- .BYTE $9C,$91,$80
1 ?( [# E0 v9 p4 i$ h' e& T" a -
* Y& z% K& Q! s2 d/ U, \4 e - B_STRING:
- x# `+ |4 Y2 ? W. ^: q - .BYTE $80,$8C,$80
6 M1 U5 c8 Y; q# l - 7 N$ F% }, F5 K8 l
- A_STRING:& }: K7 b7 U/ X+ o o
- .BYTE $80,$8B,$80
- W* H3 Y' }! ~, R- U - 7 X9 H% N9 _1 F; |
- ( [: h$ o; p6 X" K: B# @, a
- UP_WRITE:
' L4 m6 X% |3 H S3 D - LDX #$00' @1 } {% r7 e7 E/ t: ^% z9 c. X6 C' b
- UP:, b+ d# @- m8 Q6 @. [
- JSR PPUADDR_PROCESS
+ e1 g) b( R h - LDA UP_STRING,X
4 ~1 n8 X' ]3 h - STA $2007& u# N/ L/ C$ N/ Z
- LDA #$00
+ n( u$ I+ E6 |$ J) ? - STA $2000
! g2 w; e" ^4 K$ R8 ] - INC $BA
3 D5 n1 t( F4 f8 c9 ^& L2 B; M - INX
: V6 b1 D X0 Z/ o - CPX #$03
7 k- [1 d) V, j3 M0 Y6 r - BCC UP/ `- ~+ l: E( y0 I* a" K
- RTS
1 E" H4 S2 E& u' D" S7 x1 X% T - 0 q( Y1 T7 @. J; j" ?6 n
- DN_WRITE:8 b0 S+ W% ?0 s, t
- LDX #$00
; m: B5 | A E- h' [5 ~, K0 A - DN:
6 B g" J% a$ H9 }# c% u4 ` - JSR PPUADDR_PROCESS* N6 ^1 x. \. D# f' v' z7 i
- LDA DN_STRING,X
1 G$ q1 j9 L2 y9 h k - STA $2007 B \4 u) f2 b, O
- LDA #$008 e2 t3 S' F0 N, `. n
- STA $2000
" `0 V( [& b9 L: ^5 e( C$ E6 b - INC $BA! }7 A9 I6 O% h# \/ [
- INX
; f/ C8 @. M: Q8 y8 `3 u3 D$ n9 P, W - CPX #$03
& I$ }; Z& z9 Z2 j9 L, `9 Z - BCC DN
( S$ m( D o: L1 A - RTS
- i8 i0 f" U9 P1 m" L+ h: M - ' A; E. ?4 c! _( c' O6 D
- LF_WRITE:; L5 x" g2 s( g
- LDX #$00
+ w; y) |9 K) d I3 [7 F0 t - LF:0 a* L. }1 R! P0 k& l4 T: n
- JSR PPUADDR_PROCESS! f, V) M6 U7 w9 l
- LDA LF_STRING,X
/ ]: x. ?2 m5 p - STA $2007: q" ~- W. U2 D" ]: c
- LDA #$00
' t w- q2 V8 v* L. c n - STA $2000
+ F. c4 {! y' l6 m% v - INC $BA
( M% p7 D& A! Z f5 d$ G - INX
$ K/ }! j3 P1 ~& f4 [: ~' [ - CPX #$03- w/ `9 m# \! m& g% h; e6 |7 ~8 }
- BCC LF4 u9 q6 N' E" E; M9 k: z
- RTS
1 o* B7 z' i: z) D7 X
K" n& h+ y! p ^4 f0 Y! w+ j. \7 w- RG_WRITE:+ N6 U5 T% x8 @4 g4 G2 U. q. p3 B
- LDX #$00: u# K; Z0 P& E+ Y$ P4 u% w
- RG:3 `, r& R# ^6 Y" \. Y
- JSR PPUADDR_PROCESS4 I. T' U1 S6 O/ @. |' K& q; ^! N
- LDA RG_STRING,X. O2 o ^8 o3 ~0 G; E: X
- STA $2007
1 x' g) s; k6 b! k8 `& T - LDA #$00! Y6 Z7 t. }, h
- STA $2000
( |: e: Y* G+ T$ V% n( H0 @, Q) S - INC $BA: E6 A+ Y+ j* d) o1 M- S
- INX
: T) f# | E$ ?2 u - CPX #$03% u5 ~% M {. _8 m/ M& O5 b4 ^
- BCC RG
+ C) K9 r& u5 }2 s: u( {( {: ?. F- d5 {# Q - RTS
; I4 u5 h& v0 N* m2 A2 C - 4 W. V% M- m- o- J/ @4 h0 i. P
- B_WRITE:7 x: g7 ~) K. y4 E0 c5 \7 `" `6 }
- LDX #$00
& a: q8 t. z7 l" O - B:
6 {2 M5 z H% s1 [ - JSR PPUADDR_PROCESS$ ~) x9 b$ G2 Y: K
- LDA B_STRING,X
% f! j* @( i' h2 c - STA $2007
2 n. r- M' [" }4 j! G, } - LDA #$00
N9 l* D) S9 _3 @ - STA $20006 I8 b5 `3 ^' R* n9 Z& {5 Y7 N1 s$ E
- INC $BA- n. W* Z2 E# V
- INX
: u6 D$ [! ~% n3 [* m0 d' f( Y - CPX #$03
5 Q# _6 F( k3 n - BCC B8 i) Y/ W0 y! Y: |2 \% ]* t: _
- RTS
$ ]+ e2 ^* ~! Y
j1 \) f* Y: m" n- s+ W- A_WRITE:
9 Y1 T9 q: {; n6 Z9 p; A - LDX #$00
5 j% y* D6 A* I - A:+ ~* [; r0 R, S, h
- JSR PPUADDR_PROCESS& h! u2 X/ j) D D+ w
- LDA A_STRING,X) c- T: e* E) `) s* A' Z0 R
- STA $20071 l. L; K; H# K
- LDA #$00" {/ @1 r5 a( B8 s
- STA $2000
3 S( g* z. ]3 @: P5 l4 p - INC $BA
' s8 r+ ~' D4 J( G% \ - INX s* ?5 s: L6 `1 V# `
- CPX #$03
~) R3 c9 Q% T - BCC A
0 E/ t, W9 \8 p - RTS
( U; _: j5 }( t6 h' | - ) ]1 ]: x" V! Y1 I' p+ U
- 7 f% k& u! L! i' a4 d- ^4 o9 S
- UP_PPU:
$ h; Y. Z* w- ? - JSR UP_WRITE& g) N3 B5 @; P. G1 E3 d1 i
- RTS. s0 ^/ n; R/ t2 u# \* c4 O; F" ]
-
2 b9 Z6 ~* Y& g4 H. t - DN_PPU:/ l' W' R( d8 J5 K C" t+ P
- JSR DN_WRITE. E9 H' R0 B, T) ?1 y% `& O1 ~* U
- RTS! g0 U) E& o/ y
- {; X' x) J2 c1 N, r4 r
- LF_PPU:
- g$ P& ~! D/ N, M1 h; v+ | - JSR LF_WRITE
4 j" m. Q3 j6 V0 d6 V - RTS1 d/ i6 w( n V! E
-
7 X8 v/ n* e/ Y3 d% X+ L - RG_PPU:6 ]4 b* `' h' b( p% b6 U! O
- JSR RG_WRITE
X) [) x* O' }0 C9 e - RTS2 L& i1 p, v% T" n5 M0 ~2 M$ a9 ?
- 8 Y) Z* t( g3 f7 q! c; |3 I. ]
- B_PPU:
3 w( @) H5 t2 M+ ~" b- J0 F: T, t$ ` - JSR B_WRITE
, \9 P: O5 {: \( P1 ] D# O - RTS7 n. S7 A+ ^2 }- v
- 1 l: T$ V7 V3 U
- A_PPU:
! v$ j. Y# @. ]+ j4 A! B - JSR A_WRITE6 u+ V' B: I0 L" [5 W$ a
- RTS
# Y7 _$ e& L! D; K3 | - g2 ~3 n% S" C# g$ x- O
- ! E3 E7 t/ t5 U1 E& v+ O$ A2 [
- PAGESELECT:% E. A: @6 y2 j) G" X
- PAGE0:
$ `/ |6 ?& L7 t) b$ l, n - LDA $07AA( ~2 T' { h* p' W$ d
- CMP #$00
; _% Y: K& N: `* {7 @ - BNE PAGE19 Q' u9 A/ W1 ]$ s1 Z# c
- ! j+ z2 E4 T% n5 i( V( n
- PAGE_00:
. u L! X V! R6 `. n) X - JSR BULSEL_PPU: t! v( L G3 c, W
- RTS- j/ F' f6 I; n/ G3 T B
-
' x: {2 S# B% e% ?. C3 c' ^9 J( v - PAGE1:! M- z2 j4 v9 ^& t! \) k8 E1 O
- LDA $07AA& N. C$ r9 g) p2 M; e1 [( `/ X C
- CMP #$01
& A1 z5 J+ z6 U8 T8 F v - BNE PAGE2; d/ Z2 m1 H: U- `& T; F, {% X S
- # ~: g+ a6 K7 l. S D/ ~* u6 Z
- PAGE_01:
. S3 ~, I. N0 [ - JSR INVINC_PPU
+ f; t7 Z4 ?% T t! G) z' ]* q - JSR LIFELC15_PPU- o9 Z% y/ {" K" F
- JSR DOUCON_PPU; ^2 t9 C, w# \1 X" e; y
- JSR KILLON_PPU5 P6 w- M/ X8 c# t5 A, @1 ~1 v
- JSR SKYFLY_PPU3 ?9 u' @* \$ B% V) d1 w
- JSR LIFELOW_PPU; c/ g9 [" R7 P# W \: i
- RTS% c p- `0 W) @
- 5 T+ S2 E" X! w/ ?) O" b
- PAGE2:
1 O2 ?) W: f4 I4 s% A6 o3 [ - LDA $07AA
$ |& H+ f% E5 W! b# G% t, Y2 o( X - CMP #$02
0 I9 v- h. \) B3 I - BNE PAGE3
. x$ S% p- U3 J* y8 @ -
+ z3 \4 [/ Y& m% B0 U& Y - PAGE_02:
7 ~; ?; i0 @) t! ]5 n - JSR BULADD_PPU
7 _ S, @) n7 R" _8 ?' g - JSR SKINGE_PPU; S9 n7 j1 H2 }. ?
- JSR BULMIX_PPU
$ A( q9 K/ [* ^8 B2 u; S - JSR ENELOC_PPU
( h6 \* ?0 S# Q2 A! G - JSR FOCFUL_PPU/ h1 O2 w5 Y; B0 d" H
- RTS
9 r9 D. |/ C8 p1 i- |! T -
+ }) Y4 o/ u, ]# i; b. T - PAGE3: ( {4 I0 M; A) L: a
- LDA $07AA/ p& }2 M! p& I% [1 Z! x
- CMP #$03- ^8 T! K+ U" o! ^0 |8 m
- BNE PAGE4
2 h/ `8 @# W; o. {' I - - n( c% c7 R e+ U
- PAGE_03:% q- J" Z/ D6 s. i* ^
- JSR BULCON_PPU
- J% E1 [6 O' R% u I+ b5 t' ` - JSR SPEBUL_PPU
8 @. x( H: t5 G' |- J g - JSR CLEALL_PPU
9 e" Y! G8 p% o0 y' p7 q& C+ _ - JSR HARDMODE_PPU
4 Z8 m. Y+ s- F8 h+ P/ o: Q( q ? - JSR B_TO_JMPSTG_PPU# {5 e# D7 \) M- `/ s1 n9 }. o
- JSR A_TO_PLAMOD_PPU
3 r) |. y' u# V: k9 g' Y - RTS8 K R. q- @0 G8 c" u
- s; t5 {( a, z4 O! p/ n/ V) i4 k
- PAGE4: 1 q( k! Q* J9 q; k) J
- LDA $07AA$ u6 H" h+ v' F7 m
- CMP #$04
0 ^) a( E- P/ V) j - BNE PAGERTS
* U) w: u7 R: U# s s8 G -
3 N* N7 H( r/ f' q; g - PAGE_04:# P; m" f" N7 w
- JSR MOVSPE_PPU8 v( K1 x3 O+ F P" A/ D7 T
- JSR UNLJMP_PPU
8 n/ t0 U! v* d3 ^# R - JSR DESTRO_PPU
/ H- d% i) E# R/ G+ e; c - JSR EQUBUL_PPU
! W) W! w+ j3 d9 s+ F! e - JSR MOVESPEED_PPU
% H- v4 x9 n- k1 b3 @& a% T, x - PAGERTS:
7 A% l" r0 y, x& a* [" u - RTS1 j% O$ b: q% b0 g! E& Y, }
-
/ b& d3 U( |5 {% t - 4 b! i9 s8 [. }" X
- PLAYER_01_STRING:' z9 [! d/ k; |; {4 Z& [# b
- .BYTE $9A,$96,$8B,$A3,$8F,$9C,$80,$81,$82,$80! L* _: I6 g* I/ O
-
6 e3 {4 p- y# y1 J - 5 V# y: g; q' E" H* S& g2 J+ `" p$ [
- PLAYER_01_WRITE:
) V1 K: q1 ` {. n' v7 Y4 T - LDX #$00+ R7 S% o% v* y+ _, ]2 [+ B& v% }7 B+ h
- PLAYER_01:% H" n _3 K7 q6 ~
- JSR PPUADDR_PROCESS6 U+ P6 [8 Z2 a+ d$ F" O
- LDA PLAYER_01_STRING,X9 |$ o, Q: y( J/ y& N6 @2 @
- STA $2007$ z# G# p2 x7 ~- R; f' N
- LDA #$00
& n" h% h$ M' ?! A/ R$ Y - STA $2000
' P5 ]; |9 _! S' \$ ~- k( Q - INC $BA
- n7 Y3 R: b! L# c - INX
2 k# K- H5 N- Z. @# D. ^5 c - CPX #$0A- b$ s2 u5 t- `' o; W* f
- BCC PLAYER_01
- y% j% k; B& B" Z; ?+ z# p2 c - RTS6 n5 Y* O Y5 P' x! p$ V2 x
- $ `0 _; G1 u5 s
- PLAYER_01_PPU:
) @) m) K1 d- `. }+ q - LDX #$00/ @4 J m1 X) y; V0 E
- LDA #$64
$ u0 \% B0 g8 Q M - STA $BA
$ x& l8 f% Z# q+ W6 [ - LDA #$20
: h; v& h3 I; f% n. S1 v& W6 { - STA $BB) Z+ {! c4 D! C9 L; S" p& O. X5 k
- JSR PLAYER_01_WRITE
9 [$ J) G7 | p - RTS# Y' s$ M# t# r/ [4 y5 t
-
# v* n( y6 `3 W2 W- o3 }" V - PLAYER_02_STRING:
6 I9 B* f* E: B4 }8 Q1 X - .BYTE $9A,$96,$8B,$A3,$8F,$9C,$80,$81,$83,$80
( n h/ H# j+ V0 K" A - . v3 H; h A$ g) T! U5 f, O4 M
- 7 }7 \7 S; C4 L$ I
- PLAYER_02_WRITE:
4 S. E8 o% W" ] - LDX #$00
) U4 ^! Q0 V1 X* v - PLAYER_02:
' [& ]# ~) s0 M) x- t3 |& m - JSR PPUADDR_PROCESS
* X+ O* T1 Q+ l' s0 P6 B - LDA PLAYER_02_STRING,X9 q9 g. Y& D% j; C3 C0 ?
- STA $2007# w" V8 O% a6 o7 Y" J
- LDA #$00
* u5 G8 p% O3 K# D" R9 E, [) i - STA $2000
, v% ^, Q. i6 E8 n7 ` - INC $BA
# N" S. `4 t- Z/ A2 k - INX. _; z9 E1 @ Q( q2 M( h; f+ V8 P
- CPX #$0A
" j( e( f# F2 _& x* e, [2 K" ^; Z - BCC PLAYER_02
( \7 w W W0 `1 [5 R - RTS6 u, }$ y4 B0 h: u% F- y
( ~7 g- n9 L/ G" q$ J/ B' G/ p- PLAYER_02_PPU:0 a2 [3 j M |
- LDX #$00$ q! [9 N1 f7 z# A
- LDA #$73
! i1 r- l! r# \( J8 B; T. L - STA $BA
" m9 g5 l/ f6 X4 j& x. f - LDA #$20* q& V$ N; E' A
- STA $BB+ @+ O* I. l. v$ E
- JSR PLAYER_02_WRITE
- _8 \3 W" X! S0 W, l - RTS. u7 J2 z! t$ f4 F- P& M2 C ~* p
- - l# E- s5 Q8 G4 L7 q/ [
- PPUADDR_PROCESS:
1 A/ U2 V! V2 i - LDA $BB
" D8 X% l: C" `. w- X1 v3 J - STA $2006
2 G, N! e. ~/ U2 |" W' S4 Y+ F - LDA $BA! e# u: o& Z( V3 D( ?; b, E" S
- STA $2006
4 ?! O' `/ H& ~ - RTS
! b# W6 ~) [% e O - # m9 `8 [/ j( U- \9 |8 _0 {( Y9 i
- , x( q( e, R1 @, I
- - A L: `4 G" |4 t4 M6 t
- ONE_STRING:
0 S6 n1 z% \7 J; X0 h3 O% B% [ - .BYTE $99,$98,$8F
( j) Y5 }* p! T% ]0 p -
( N$ `) ?4 e& b% x5 \% a1 l/ s0 w/ p - TWO_STRING:
. m h/ G t! ^" s! A h0 |3 q; c - .BYTE $9E,$A1,$99
% H- n: _0 t- x0 y - ( z3 x5 e2 ?7 W0 _9 p
- ONE_TWO_PPU:
# E4 i# u8 {0 B! b7 J - BNE ONEWR/ @7 ~2 \! P/ d; _; N. u
- TWOWR:+ O! e* [+ s4 l9 R
- JSR PPUADDR_PROCESS" A) }. g$ a+ I; P% d! F, Z
- LDA TWO_STRING,X
# R- ~$ n/ R! ]4 g8 W, ^ - STA $20072 ~) X" A: L% P. D3 t3 E
- INC $BA
4 q6 b! x8 f6 s1 s8 z - INX; e) ^) ~( T8 Q
- CPX #$03
) r6 E+ D: M+ H; {, h - BCC TWOWR
, q4 f3 @ j3 h - RTS
1 K- d a3 O+ \& [5 d$ T4 m - ONEWR:
# e2 {8 x5 O$ O4 ?9 X7 z6 [ - JSR PPUADDR_PROCESS1 N0 S/ M8 {; X' w$ A2 l' d
- LDA ONE_STRING,X8 m2 _' u. F! |
- STA $2007% U* F9 s0 S7 u( t
- INC $BA i$ r9 i+ A$ l; j* W# s
- INX" f: F5 ~, E ?, M4 T* ?) s
- CPX #$03# u9 ^6 H- c Y n
- BCC ONEWR& z2 ]6 Q6 ^, i
- RTS4 U1 s7 x7 U$ J& ~
- ; C+ D' |2 J) B" i! T1 T7 {
- MOVESPEED_STRING:' I( w; l5 l9 f/ g' G" G" r' C
- .BYTE $97,$99,$A0,$8F,$80,$9D,$9A,$8F,$8F,$8F,$80' ?- u6 M( Q0 k. N- {" J( V* \( {
-
% w/ W7 ^, a% d& i/ v) { - 4 E, i, H! j; Z' L$ y0 S
- MOVESPEED_WRITE:9 g* R4 e l% `# s
- LDX #$00
2 Y6 r9 A+ n# u% H, Q - MOVESPEED:2 n3 D) J' L+ G3 H4 R$ h
- JSR PPUADDR_PROCESS2 }8 a7 D6 t* Q1 ~
- LDA MOVESPEED_STRING,X3 U. p9 x$ G& l8 V; f) J3 R; g
- STA $2007
" _! ]6 e7 C M0 P' g( J# I- V - LDA #$008 p) l+ h3 L1 _$ Z
- STA $2000
# ?; a- Q; u2 r0 o; d# G - INC $BA
0 m0 N+ g5 Y R. x! R; n* u8 z - INX4 g# `' J5 `" u
- CPX #$0B( d& y7 k& T$ B- ] A: p( |3 i3 O3 r, e. d
- BCC MOVESPEED8 T Q, k4 Q, R: p
- RTS
, { M. _; d3 W! D) B5 ~) V2 g8 V - # r7 ^& q& \; K. @% {$ u' i
- MOVESPEED_PPU:
2 z0 h9 M4 o3 W' T& P+ _ - LDX #$008 b, a( i$ N' a1 o9 |, S
- LDA #$AA& o7 d9 R; j/ Y8 a u
- STA $BA4 b0 o, x0 o3 F# ^; h9 Y3 I0 u7 W
- LDA #$22. r. f m6 X+ J. T# _* T3 E
- STA $BB
0 |6 G- E# a3 M0 a6 R g - JSR MOVESPEED_WRITE
6 a; K+ M( f( a4 w* | - LDA $7003
) d; g% b7 W: [0 B( E( a - CLC+ K0 z: r! v8 m( I8 ]6 {, N) ?
- ADC #$82
/ o5 e; }/ L. z - STA $2007
, a2 A# m4 }9 J7 ?+ T# j+ }1 _ - RTS
" e4 O& ~" o* M7 o: y -
复制代码 |
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有账号?立即注册
x
评分
-
1
查看全部评分
-
|