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