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