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