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