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