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