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