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