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