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