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