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