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