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