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