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