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