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