EMU618社区

 找回密码
 立即注册
搜索
查看: 514|回复: 13

[原创FC/FDS-HACK] [FC][魂斗罗旋风终板END暂停显菜单]

[复制链接]

签到天数: 39 天

[LV.5]常住居民I

发表于 2016-11-19 22:19:45 | 显示全部楼层 |阅读模式
本帖最后由 yandagui 于 2016-11-19 23:11 编辑 7 j- p0 S2 \# w# O+ ]% j, ^. c6 S8 j. [3 a
1 Y/ B/ i/ a: l. U" q
     [FC][魂斗罗旋风终板END暂停显菜单]

. l$ ^5 @4 Q4 F5 R作者:FlameCyclone(flamecyclone.ys168.com)
. L8 S$ G: z9 a/ d时间:2016/11/19 21:46:00" P0 F+ E8 S  V5 H4 R9 H6 G
更新日志:

7 f5 p& }) Q7 a2016.11.19:加入暂停显菜单(共5页).
& o/ v5 D, i0 `, e4 g2016.11.12:加入无限跳跃.8 [% X& K; c) k/ K: l  y, k
2016.11.12:加入速度调节.

4 A  g( K8 Z3 l- H; ?5 i2016.11.11:加入敌我子弹对消功能.
  A* g7 D1 D- z2016.11.11:加入全屏闪灭功能.
+ s& X( O  B* r0 L2016.06.08:加入全屏瞄准功能./ I$ E2 p2 Y8 |  y7 }+ G
2016.05.31:加入弹速调节功能./ `: l+ [9 ^: P- E$ V  [# A
2016.01.01:加入高难度模式.
/ K% O6 v8 C. [- d4 U2015.12.12:修复消除威胁不足,使得移动BOSS关卡(第2,4,5,6)正常通过.
! G8 U3 `! y4 E7 k  v0 j2014.07.05:由于对打功能不完善,直接去除,更改为生命锁定.
9 ^  V3 x$ o% V% I( X! g" [2014.07.05:双人切换功能优化.
& I+ W0 Q6 L0 F2 H  ?( i' K2014.06.01:修复第三关浮空到BOSS前必须关闭浮空后跳跃才能见BOSS的麻烦.% L5 {' p) i" y& }$ w
2014.06.01:取消生命锁定,改为生命锁定模式下剩余生命不会少于一条.
/ M; ~9 Q( {5 `4 W8 y8 N2014.01.18:修复GAME OVER字样只有G和O的错误,原来想拉大字母间距离,看来行不通.
* T2 W- L8 H+ Z# o2014.01.18:浮空模式下,P2飞行高度未限制导致死亡,原来是指令本该用绝对X变址的被用成了绝对寻址.* T5 {9 l7 K1 i8 G  W% V
2014.02.08:拿手机无聊时又发现一些错误,所以修正生命剩余勋章显示的错误(某天用读卡器插在DVD上测试发现机器读不了卡,原因是目录级数超过三级,只有刻录成光盘来测试,结果发现生命勋章的显示竟然无压力!)9 T; M" u7 K# h7 v
2014.02.13:加入自动演示通关.
( A( x3 n6 K7 r* y内容:- E/ }. o/ h- b) d+ l
23.暂停菜单:        暂停后,自动显示菜单,选择键翻页,方向键和BA键进行各种功能的开关操作.5 P9 T( t$ j0 v1 M8 {+ m) D+ v; a
22.无限跳跃:        暂停后,选择键4次,按下开启,开启后游戏时无限跳跃.
1 r: Q$ _; X' Z# W' D5 t) r" ~21.速度调节:        暂停后,选择键4次,按左右调节行走速度(0-3级).

" G! z) g2 O: R* b20.子弹对消:        暂停后,选择键4次,再按A键切换,此时敌人子弹可以打掉.
* w; \2 Z& W3 X: H0 I19.全屏闪灭:        暂停后,选择键4次,再按B键切换,开启后游戏时按选择键屏幕内敌人闪灭.
2 y! r$ ]+ v1 p$ Z$ T; J* W8 |7 z18.全屏瞄准:        暂停后,选择键2次,再按B开启/关闭,子弹对消开启时无效.
$ t3 ~& c# K2 e3 s, a) b17.弹速调节:        暂停后,选择键3次,下开启,非暂停时按选择键调节,默认为1级,共5级.
& G/ z4 g: l% _4 h0 K16.困难模式:        暂停后,选择键3次,右键切换,我不相信你能够无伤通关.
" @* a- m7 h1 d, f1 G: ~# R; L% }01.子弹切换:        暂停后,选择键0次,上=快S,下=快L,左=快M,右=快F,B=快普通,A=取消当前子弹加速状态.
8 a9 X+ [3 U/ p7 p02.无敌锁定:        暂停后,选择键1次,上开启/关闭,不用讲了,金身无敌., G! a  m5 l$ G+ S( ]1 w+ B
03.生命锁定:        暂停后,选择键1次,下开启/关闭,生命锁定为16条.
" V) A) s; T0 x! H1 J5 t2 e04.角色双控:        暂停后,选择键1次,左开启/关闭,无非就是主机控制副机.; S. V$ x9 s1 u6 ~  E/ a) e
05.生命底限:        暂停后,选择键1次,右开启/关闭,锁定剩余生命数不少于1条.; o3 G9 a# {  i5 ?
06.一击必杀:        暂停后,选择键1次,再按B开启/关闭,即使是第8关BOSS,一发花生米依然要其老命.7 c2 ?: ^3 R* ]% ~! o: D
07.角色浮空:        暂停后,选择键1次,再按A开启/关闭,第三关浮空时按选择键向上卷画面轴.+ K( ]9 v8 @7 b$ a$ l" a* T  \
08.弹数加强:        暂停后,选择键2次,上开启/关闭,此时所有子弹发射数为15发.1 p" P! m& a$ f# l# E3 n" h& @
09.皮肤更换:        暂停后,选择键2次,下开启/关闭,主机开启时橙黄色,副机开启时为蓝色.
! C, J4 M" b9 h" H8 Q1 c2 h10.混合子弹:        暂停后,选择键2次,左开启/关闭,此时连射时所有子弹混合.
. L: D4 t9 K% E; s1 |9 S11.敌人锁定:        暂停后,选择键2次,右开启/关闭,此时敌人原位跑不动./ e8 m" N3 f" e6 F. m8 v8 L% ^8 t
12.跳过一关:        暂停后,选择键3次,再按B使用,使用后可以直接到下一关.% y7 @( N' T$ Q/ Q5 x
13.单双切换:        暂停后,选择键3次,再按A键切换单双人游戏模式.4 Z) r; Z& ~" D% i  E+ O5 n7 z+ d
14.子弹方向:        暂停后,选择键3次,上开启/关闭,开启后发射的子弹攻击方向会随着操作的方向按键变化,第二关和第四关的小关建议关闭(开启的话打中敌人太难了哦).9 ]$ R/ V, t# d- A8 J# N+ K; q0 v
15.消除威胁:        暂停后,选择键3次,左开启/关闭,此时游戏时按B键使得移动物体被消除。
" Y' D5 b. ^9 q2 k$ K4 {A.做了一些汉化(小字体),剧情,关卡名及通关后的文字未汉化.
& A& W$ v' p% {  qB.自动演示通关,双人合体打通关,演示时有背景音乐,通关后一样会有结尾及恐怖台词,之后游戏进入选关(相当于游戏自动开始了).注:通关后P1及P2会获得16条生命!也就是说看完演示自动开始后第一版有16条生命!
4 e! x* F- q* H1 SC.生命显示加强:最大显示15个剩余生命勋章!电脑端请开启精灵超过8个(这样勋章不会闪烁),手机端认命了,不过不影响正常操作.
3 k' I' z4 y( q0 c$ K- G6 C
/ _: ^2 }& Q$ d' G0 {# y    如果有什么好的修改建议,恳请通过QQ(1490868135)联系我(也许我不在线,可以留言在QQ里)
) \; R: ?4 ~* N欢迎大家转载,转载时必须注明出处.4 `- W# y( _9 @' I& |/ A# G

9 t) q9 H$ `0 g4 n# j! X: z2 N5 l( V
游客,如果您要查看本帖隐藏内容请回复
0 I2 z) b1 n( |

& v2 g( K, Z/ D/ e% `' l! N& J: `, N忙了一个星期,觉都没睡好,眼睛也疲惫不堪啊.终于找到解决方法了,目前VIRTUANES运行不了,请使用其他模拟器玩.
$ d$ K2 Y% Q- `2 U! z  q这几天的劳动成果如下:
  1. .ORG $B400
    + o4 o4 Q4 }  _$ F6 ]! H
  2. 8 g3 e) q0 S5 R& b

  3. 2 P- T0 L5 Q! |; f
  4. PROREG:- j* U, N+ m+ C) V4 i
  5. PHA
    8 F; Y+ W" N/ @3 W* }+ C
  6. TXA. _6 }3 O% Q, C
  7. PHA
    % W  @! D3 Y9 |+ t/ q1 _* o
  8. TYA7 q- t% u1 a6 y/ `/ p2 L  H% w
  9. PHA
    0 K$ G# g5 Q  U& t- L
  10. LDA $25
    1 O& r& i5 _# r8 M! g5 I* y
  11. CMP #$01
    ; G9 P# `, X/ l! z( l3 o0 e) N
  12. BNE RE+ H) Y- J$ E+ i$ ?
  13. LDA $010A
    & @* j1 d. N, c" G+ V2 {1 V
  14. CMP #$00  s2 w; @1 Z5 Y7 P" M$ T: ?( A+ c2 v' P
  15. BEQ P1
    9 P. Q. h0 {1 {$ z  u7 G! V& _7 Q
  16. . A4 x- @+ o8 \- q7 H' o' [" o
  17. RE:. \2 K3 A9 _  n6 D" N  B
  18. JMP PPUWRITE
    ( I+ e9 m; G' `" \2 z: R

  19. ; H& `8 D8 E( b( v' i! I
  20. P1:                ; 条件判断, G" d; `- G7 z) ?: j
  21. LDA $7FFF
    % a  @# H5 r6 `  e1 H0 I6 J
  22. CMP #$FF
    ( q2 j7 y9 K3 x8 A% T
  23. BNE P1RP1 k. m+ A7 [2 D- D- ~
  24. LDA $7FA0! o) s. P6 w+ M
  25. CMP #$00- Q# _2 N+ w7 `9 _
  26. BNE P1CMP2 j, ^! ?, T9 l' Z  D/ O8 S# l
  27. LDA $20019 Z- h. H; }7 r6 x
  28. PHA
    ; s3 E8 }2 o) i4 z3 |
  29. LDA #$00
    8 E7 ^* e6 m# n% g; ^1 d: g, u. A
  30. STA $2001
    1 x/ G8 E7 m  M0 K! \
  31. LDA #$FF1 A  I3 \/ k$ q$ D2 ]7 g
  32. STA $7FA0
    . |' Q! ~* _7 f* q
  33. JSR CLEANA
    % m7 a  g8 ]" m+ |1 O
  34. PLA, _( S7 u/ D, N5 [) G7 r9 K: Q7 }
  35. STA $2001
    ; x  `  v) v1 |% _6 B! h
  36. JMP PPUWRITE
    " c/ m7 R7 |) m+ B+ F# G! I0 n
  37. P1CMP:: q/ q9 s0 u0 |8 G
  38. LDA $7FFF
    % g+ C; y. X0 }
  39. CMP #$00. I, x7 K3 a$ Q  D4 @0 Y& m
  40. BNE RE! h+ d1 Z" n6 F4 J
  41. P1RP:" Y" ^) r2 s/ Q* y! l. R
  42. LDA $2002" o4 s5 ^  @9 r% ]& ]( I7 S, P
  43. LDA #$00/ f1 H4 j3 }0 d" o2 W- n/ L
  44. STA $2001, ^( g. t' c6 z. \5 @8 i# n' ^
  45. LDA #$FF
    & N9 O2 [9 P, K5 `* I
  46. STA $7FFF8 P- W0 n9 N* n8 {3 M7 w' M
  47. STA $7FA0
    * X3 Y. H  ^2 J. N0 F3 N7 S, A
  48. JSR COPYPPU
    7 d3 _# r( }$ i$ t
  49. PIRP2:
    , \2 Q: H0 b4 Y* K2 V1 b
  50. JSR CLEANA
    $ u/ K# @: U$ `$ y* k: X
  51. JMP PPUWRITE; C2 i4 `/ r. ~4 {; z6 o, t

  52. % ]0 T! @% u. B7 C+ V9 q' |
  53. COPYPPU:
    : [# ]( k9 ~- X" B! |
  54. L0:
    ' j8 i' z& q- g! B& \: L
  55. LDA $30
    # V2 g% M6 }7 Y- f" T
  56. CMP #$02
    1 }( M8 \6 e/ T& Q/ X
  57. BNE UNPROFC
    0 G  Z3 v* t9 A" g) Z! d
  58. LDA $FC7 j" i! Q! r! k1 A' Z
  59. STA $7EFC
    % D7 B5 X9 q) z  k
  60. LDA #$00
    . K. M; C1 C' C- q4 B
  61. STA $FC
    5 y% g  T4 V8 d: N# J
  62. UNPROFC:5 q+ q4 M; S( G# ^$ j% x
  63. LDA $FD) t% h/ T1 e( Q. a/ B9 A# B& E
  64. STA $7EFD
    ! ~. G2 e, v2 N8 v
  65. LDA $FF
    ( s9 F  v& X8 X! H( }$ g' w
  66. STA $7EFF/ N$ b+ [" O( D  r
  67. LDA #$007 W* q* j- F" \8 K/ i0 O  a! U* |
  68. STA $FD
    ' T6 K  F# v5 o  e1 y4 \
  69. LDA #$B0* y; z+ h, k. ~5 p
  70. STA $FF- b1 o# j4 F% p2 q8 {8 K! j
  71. LDA $07C1
    ' }# D/ X) D' j# V
  72. STA $7FC1
    * H7 ?) y+ W3 W4 T
  73. LDA #$3F& X* W& x& }' s8 X$ n
  74. STA $2006. ?1 u) G- }- e3 D+ [& O" c1 {
  75. LDA #$01! K9 S( c8 `, Y1 f
  76. STA $2006. o. I2 a0 X3 ^& C
  77. LDA #$24
    9 ]7 w8 H( i% x. w/ e2 p
  78. STA $20074 L/ J4 r3 \3 \3 x! o
  79. LDA $07F6
    ( M- O1 S/ q3 f/ P2 J7 j) F! {* c
  80. STA $7FFE
    " y1 a/ ?, k( ^" y5 l
  81. LDA $00FE
    0 T2 ~2 R) D% ~; o9 a
  82. STA $7FFD
    - W1 c1 L$ y* @/ m5 h- O- f5 d
  83. LDX #$00
    ! B" P/ j, t$ X9 m3 d# {
  84. LDY #$00
    ) Z( q! [1 W" @9 t9 b. |) D
  85. LDA $BD( L& ]6 |9 |) R7 d9 n/ W( \
  86. PHA/ _3 e8 g4 l: O. Q. C9 C5 N& S
  87. LDA $BC
    . y( ~, x2 C3 @9 K& `: _; b
  88. PHA) q  ~+ {) ~; B) I  \
  89. LDA $BB4 P: \4 p5 @) E2 T, f
  90. PHA
    / e8 h( x2 F) x& G, m4 A9 n; Z: j
  91. LDA $BA% r& m) d5 s6 D2 t  u. R
  92. PHA
    , t- C  k$ x( V* b- q1 J; F. B
  93. LDA $B9, O) X- T6 P8 i3 Z1 m- y
  94. PHA8 f8 d/ q% P, ^! [
  95. LDA $B8
    # \6 ]6 }6 C6 [# p" p
  96. PHA
    $ H# j" ]2 `* J* y8 S# L! |$ Y
  97. LDA #$00
    4 j  g! _) a4 _
  98. STA $B8
    ) a5 ?3 c7 W2 _. w$ t% `
  99. STA $B99 _4 a5 }9 s  @# N( L
  100. STA $BA, g# x# m1 U- X
  101. STA $BB' b: l. Y/ }( t% V' K2 f* F
  102. STA $BC( O0 B, y7 S9 w: ]" A2 @/ ^6 y
  103. STA $BD
    % w# b, b8 G) E
  104. LDA #$00
    ; x$ y- i# h" |0 H2 `" K5 w& y
  105. STA $BA
      Y6 S% B) X- }/ k: T9 M" q. _9 m
  106. LDA #$20% q: X. p6 i4 n1 X9 b
  107. STA $BB' H3 ?6 P$ s8 K. S
  108. LDA #$00
    & W$ _7 \& F  a  Y9 A% W
  109. STA $BC) t4 E. e) s" l( E# ]
  110. LDA #$608 F6 ~7 F" H- o% _2 }; u
  111. STA $BD
    / W# ~( W1 W9 m2 I! i
  112. . _! ?3 j0 {8 t4 {) d' M
  113. L1:                ; PPU复制
    ) p+ o: U8 d: R7 k& `6 Q
  114. LDA $BB
    0 ?* I: ~6 R: A9 `; P
  115. CMP #$30
    ! e, H+ F; ?% x' S" t
  116. BNE L2
    ' {$ c: e7 t* E3 R% \* W
  117. LDA $BA
    ; u6 b! ~. D% U. ]
  118. CMP #$00
    . j# g  ]7 \# ^; F' {+ Y: \
  119. BEQ PROADPLA6 f; ^' a5 h/ y
  120. , a" h1 v+ H2 K7 O* _! y" t
  121. L2:1 n* m# t1 F9 T8 a6 v
  122. LDA $BB
    8 e$ V; P( {; D4 M' X' G
  123. STA $2006
    & k: j7 M' V5 i5 T5 `* z1 H2 j7 i
  124. LDA $BA7 ^$ n( }; i" J) A1 ]" W
  125. STA $2006& n7 b) P* `9 a
  126. * E9 D# s4 X  d/ r! D0 `
  127. L3:# G0 |! x2 C. I; i  t* U2 H
  128. LDA $2007' n3 v8 S) o/ W; X; \
  129. LDA $2007$ N7 u1 {/ `' a, X+ m
  130. STA ($BC),Y7 v3 n1 Q# X7 ^5 V; u7 ~

  131. 7 c# u3 ?5 R) s1 h$ M  V
  132. L4:
    2 g  m+ v- j! d$ |9 b/ \
  133. LDA #$00! m, f# ^* K% \: u4 n
  134. STA $2000' W9 m( ]7 ]$ ~6 j# _3 w4 G2 y
  135. INX
    ) j" t$ O  i6 O
  136. INC $BA
    ' B# J  b# ~: J$ W4 r
  137. INC $BC- W" `5 c( Y- n( t! @. U: j
  138. CPX #$003 L  d: O% `1 }( ]
  139. BNE L1$ [6 [7 I; c) T1 l6 H4 m% R1 [  v
  140. INC $BB3 Y6 i7 N6 f! j6 E$ t, g9 ]
  141. INC $BD  {+ n; i7 Y! L! F$ G* d! B/ _
  142. JMP L11 N4 w2 A1 s7 V. o! j3 y! G' w

  143. ! u  x( y# ^% Q$ @. `5 N2 y
  144. PROADPLA:                ;出栈
    # A# V: Z3 w7 T
  145. PLA& A7 s! m; P8 F
  146. STA $B8* _3 I5 l- |' y  U. r
  147. PLA
    7 e6 S; a9 v. G# A7 k# L8 M, G
  148. STA $B95 F% n1 l; Y; i. t& F0 S/ i' O
  149. PLA
    6 T0 |; Z* p. }& U/ r$ N! K
  150. STA $BA
    $ D' h, R0 U5 r+ Y3 @7 k6 p
  151. PLA
    ' J: j  l& K4 U* H$ q
  152. STA $BB. E" l% G7 e; |/ m4 S
  153. PLA* }+ q! }' d7 g" X
  154. STA $BC
    % I% d. K( e$ e& y4 k" [: j% r
  155. PLA- d0 T2 t' }  \- s
  156. STA $BD
    5 K5 c$ M# N# z) M6 m( y
  157. CPRE:
    ( J  O2 c- ]3 l+ V8 Y" y( Y
  158. RTS
    & Q$ g0 d$ Z/ X
  159. 4 f0 B/ {" g9 y# Z/ ]
  160. CLEANA:                ; PPU清空
    ) r; U5 R# X% u0 Y
  161. LDA $BD
    9 D6 |& ^6 F, F* F) M5 S. e
  162. PHA9 I9 g3 X* a) b- }
  163. LDA $BC% a! s1 ~3 M3 j! ~) q( m
  164. PHA
    / z& H$ M- Q1 B( ~) C& ?* }
  165. LDA $BB
    0 T, M0 z- e, k9 n
  166. PHA; ^% d) A4 w. r2 T7 ]" t
  167. LDA $BA
    9 k- f, l9 Q1 j! n2 e  B4 d  j
  168. PHA8 t2 z* q/ x: F& }$ u6 v9 K/ d% j
  169. LDA $B9
    * K, [1 p) Q8 Z
  170. PHA, U% P$ P% R2 J- M- c7 r
  171. LDA $B8" q, n. g5 j$ q5 J8 @& r
  172. PHA! s5 t- y. A( t6 Q. a" m9 v
  173. LDA #$00
    1 y- U# s: d: F- ^0 A! O6 W( w  u
  174. STA $B8
    9 m6 [! q1 H9 N
  175. STA $B92 K; E( L! ^# C( f
  176. STA $BA! t) [; |: @5 e4 \* f0 E1 T
  177. STA $BB
    - ]7 G9 |3 P7 E
  178. STA $BC
    0 z! p& F& H3 h  `9 T7 E
  179. STA $BD- y0 S7 n; }5 e
  180. LDX #$00
    + S5 g, U' o( y0 e8 Z
  181. LDY #$00
    1 v& p) X  E6 K8 p5 R9 I
  182. LDA #$00
    0 O7 j4 S$ b. y( q
  183. STA $BA6 W$ q( F! G, h9 O" m
  184. LDA #$203 I( A. s7 P: L" p6 N  J/ _
  185. STA $BB
    # N3 O8 [# V+ q. m* W

  186. " h/ u/ k$ _# c. _. I
  187. CL1:
    ( N# {% p6 n" M. d' p0 D6 X* V
  188. LDA $BB" ^3 {: r9 J2 B; Z- `
  189. CMP #$30' S+ e+ O4 O1 _4 ?
  190. BNE CL2& o1 U- ?" d1 ?1 D3 w- I: a* M
  191. LDA $BA
    ' A  H( S, |  Y$ j6 y. N
  192. CMP #$00
    , w  \  `4 B% T( _5 f7 ^, k
  193. BEQ FREEWRIYE
    9 g( V7 ]( Z" p5 W/ R! b
  194. 6 f" q$ d% O9 ~! u/ G" O8 K$ a
  195. CL2:/ M5 |9 {6 W) j& R) c8 w6 Q
  196. LDA $BB
    ( P  P& u! @+ S$ x# }- S
  197. STA $2006
    * J; E4 }8 O" B6 {: T, |& ^# I" E
  198. LDA $BA
    3 R, |5 _9 y4 V, N  C: d9 r
  199. STA $2006
    : G/ Q1 I) v1 i) L
  200. 8 ?5 B: K4 v& O
  201. CL3:
    2 o9 e9 H- N. P' X" X1 C5 ]# c  ~
  202. LDA #$00
    3 u9 @* Q9 m  g/ N
  203. STA $2007
    / e6 O8 |; Z# _
  204. 0 ^( [7 @5 ?5 t2 h
  205. CL4:; L/ P% h9 n* y5 `' F( U, r) d
  206. LDA #$00
    7 Z" Z0 p3 i8 c4 l% K: o% H0 a
  207. STA $2000: e) a/ C, ]# @7 a* i& l
  208. INX1 X* g+ N2 n8 E
  209. INC $BA
    5 s$ Z/ }8 J* j) j$ Q4 w3 r
  210. CPX #$00
      N2 [8 d3 i( V" X% C
  211. BNE CL1
    ) _5 z: ?9 z* |; d/ V7 W
  212. INC $BB
    ) y! K0 U  ~% P) q& X( l. r
  213. JMP CL1 ! C3 t# N# i5 K% [4 C4 L# M
  214. 4 r" \+ b  b  H( S  ?7 G
  215. . R; e5 G5 {' h: ^9 W( R7 \. l$ x
  216. FREEWRIYE:
    1 a0 C1 _; O7 @( r# ~
  217. JSR FREE! h, Q8 ~& Y# d7 o3 |

  218. 2 I$ g3 `+ u( Z! h: I' A
  219. 9 k3 M6 @; o# l% _4 z7 {
  220. 9 O6 F$ l+ a+ Z. l! |: t1 Y( r

  221. 5 d5 \2 ?2 L6 }# Q8 Y

  222. ) ]0 z" _; [9 g) g8 u9 o: S& y) x/ n
  223. CLEANF:                ; 恢复现场( F2 c: i7 j; Z
  224. LDA #$080 a' H! o7 }. s* d, G
  225. STA $FE
    8 F: C  p, o2 A7 x6 ~; D1 h$ u$ M
  226. LDA #$00
    & ^' T/ u5 Q8 t9 z( Z
  227. STA $07F6
    , }9 T! }9 ]0 n3 j3 l3 m+ v+ ~5 m
  228. LDA #$24
    + [1 H6 G. v3 {) a; |  X
  229. STA $7FC08 L# \8 x2 \8 J  `! \3 F
  230. PLA
    . \, K5 S: A( O
  231. STA $B82 K$ \4 m5 ], C& v; V
  232. PLA
    * u1 p* Q' v. O4 F  ?
  233. STA $B9
    $ h$ V, B5 n6 Z  F  W0 m' O# ~
  234. PLA
    $ @; p# Y7 X/ R" b5 {+ S" x  \
  235. STA $BA
    ; T9 ~1 Q3 {' o5 Q, B
  236. PLA' x/ w2 J, \, B/ i5 I7 x
  237. STA $BB
    : p" C1 ]8 D6 p( E( D) w8 V- \
  238. PLA' t1 G/ W. X1 j+ d& S
  239. STA $BC
    2 @1 t9 R( @5 ^
  240. PLA& P2 l7 O3 q+ d% |1 z( j, j2 ?+ J
  241. STA $BD
    % U' @& t. @) \( I. h0 B! X
  242. CLRF:
    . [9 ?1 @9 B4 [% w, O" j& c
  243. RTS; P. R6 G+ Y+ i. d( ^7 {
  244. - [' z& ~3 Y3 \1 X
  245. W_DATA:
      T2 S9 H2 n/ s3 t& x
  246. .BYTE $00,$01,$02,$03,$04. I. E; y7 O/ z
  247.   ' h, W4 y' U5 O# o' |- F# h# E
  248. W_PPU:, u6 V1 m6 i( K
  249. .BYTE $98,$97,$90,$9D,$96
    " {3 r0 _, J4 m, Z
  250. . U+ W' W- ]& |- |! Y  n  n& g
  251. P1_STRING:. _$ j" K2 q: P/ R5 a
  252. .BYTE $9A,$82,$00                ;"P1"
    $ {, y) O9 ~( }: y, [# S
  253. / l, ~7 ~" U6 V- ], ^
  254. P2_STRING:
      m/ o! f: E. b
  255. .BYTE $9A,$83,$00                ;"P2"3 Y. U5 _  A5 g& s, c' x6 }

  256. ! a) n* `: z5 K3 U9 t( r9 T
  257. WEAPON_STRING:
    + G0 ]0 F* }$ q9 T9 V$ c
  258. .BYTE $A1,$8F,$8B,$9A,$99,$98,$00  ;"WEAPON"
    9 a9 M& l# \& ^& G9 h

  259. ' k+ d8 |. v# n
  260. RELIFE_STRING:0 K2 b3 Q1 @7 Q. Y
  261. .BYTE $9C,$8F,$96,$93,$90,$8F,$00  ;"RELIFE"8 E: C, o! T8 ?( @

  262. + D# J" T2 ~9 \, I
  263. P1_PPU:
    & e" I5 u$ G% e- k: B
  264. LDX #$00
    % J$ K( v" [4 {! Q* D+ s! a
  265. . Q2 D+ C0 Q2 f2 i3 p6 u/ b! ]! P
  266. P1_PPUW:
    , q- `( X9 u& R1 D! N
  267. JSR PPUADDR_PROCESS
    ! `; m4 A5 E: c1 T, q
  268. LDA P1_STRING,X
    7 t; c, j- ?# e3 w% K& j# \5 K
  269. STA $2007- M$ ]& y& ?! l7 O( H! s/ e3 [
  270. INX) H" a/ z5 j+ [% U5 c
  271. INC $BA
    $ x: j! c& M2 D
  272. CPX #$034 z; E; b% U! J9 N5 P
  273. BCC P1_PPUW
    # K) h" ?3 O  o" y
  274. LDX #$00+ Y4 C7 b/ m* m
  275. RTS9 m! s: b' K7 f  P% ^
  276. . j5 a% x/ K2 M" D# `( o4 Y9 S
  277. P2_PPU:0 O& X+ K2 A$ t! ^5 e" ?1 I
  278. LDX #$002 ]) Z0 w- W9 {

  279. & O3 }% j8 Z5 ~! A& ?5 X
  280. P2_PPUW:2 x; [' e$ O2 q$ G
  281. JSR PPUADDR_PROCESS0 \+ L5 M1 T9 S, a" K
  282. LDA P2_STRING,X' z" c: A# y- [3 x8 _, w% ?
  283. STA $2007- j0 K6 ~3 h% N" X5 I
  284. INX! ?8 Y+ ?1 ]+ `7 g0 P0 B) ~. z
  285. INC $BA# `% X3 b  M1 F  @7 @/ ]
  286. CPX #$03
    % ?$ U& w+ y+ N3 l# R; @5 W: L) E5 V6 r
  287. BCC P2_PPUW
    ' q9 i. P, B8 T& p
  288. LDX #$00( O; Y6 J- H: A3 Y: E- R8 a$ a; u
  289. RTS
    : L" H2 _: D3 f7 s9 |& U8 b

  290. * u0 _2 o- E% \4 r( [1 F8 N0 i" Q

  291.   }/ R- u" S* k* j1 |  n
  292. LDA $BB
    6 S& i0 j+ l5 o: J* S% M4 s; j
  293. STA $2006
      H2 Q: E& T  W( F
  294. LDA $BA
    % n4 Q9 m5 d7 e, j3 U
  295. STA $2006
    ) a: |0 \& i" S6 C% M0 x
  296. RTS
    , ^& p/ A3 Z0 r3 ^& U

  297. ; h: p1 n$ P( F! }. A! O
  298. . y6 X. r- g) T

  299. 6 N4 t4 u% A" Z( a, _& ?3 r
  300. PLAYERLIFE:7 N7 c; O% {/ M6 c
  301. JSR LIFETODEC
    , F* g  v1 S4 `. S) l1 z
  302. LIFEPPU1:" d, G8 r& |* J9 V
  303. LDX #$00  O; ]. H* ?6 \! x; H9 s: I
  304. LIFEPPU1RE:
    ; C' L; {- b. ~- [, ~( v' u* V3 f
  305. JSR PPUADDR_PROCESS
    4 Q( t( h9 \; G0 a4 ~" w& q
  306. LDA RELIFE_STRING,X
    . Q7 k" C( y+ ~
  307. STA $2007
    ! k2 s0 W) B3 _& e1 ]8 A  [" L
  308. INX0 \) d! l  X1 n5 v
  309. INC $BA
    0 ?3 }& W$ w; O6 {
  310. CPX #$07* W2 g. i$ a1 u9 h) o4 l
  311. BCC LIFEPPU1RE
    , y8 j! r; r0 A7 W9 ^
  312. " Q1 _( i3 T2 N
  313. LIFEDEC:                ;生命显示写入
    9 l$ T5 k% j3 E$ D* {
  314. LDX #$001 A& I' p+ [. E' L5 @/ E8 d
  315. LIFEDECRE:% H, T- r/ E8 |: j0 d% c
  316. LDA $7A03,X' A* e, U: ?2 I6 M* Q6 x
  317. CLC. k5 p& K1 v/ M
  318. ADC #$81% P" B1 ~) N0 r8 |
  319. STA $20074 P: k+ B/ T, q* Z
  320. INX
    ( y& K# x4 F! \  V2 S7 G
  321. INC $BA
    * \2 ^% ^4 b( z+ L0 q2 k* O
  322. CPX #$03
      p7 n- x4 H2 U) v* m7 N( U
  323. BCC LIFEDECRE
    , U# C1 e3 Q1 j9 k) ]0 d' k) g
  324. LDX #$002 ^: c5 v  x! ~- \% X! S" o  A
  325. RTS  C$ u$ u/ D' {6 j. `7 e" l# R

  326. 5 f$ z. a: K8 |$ W( f, B& {
  327. LIFETODEC:                ;十进制转换
    7 D& R% M. |9 h1 `5 Q' h& Y' l
  328. LIFEL1:        ;initialise
    5 u9 Q$ V5 X& \9 i8 R  C( S
  329. STA $7A00        ;$7A00=F3  Z* Q- e) ^* i/ X5 I; M
  330. LDA #$00
    ' H$ a8 F+ S9 p4 u. u0 ], g, t- z
  331. STA $7A03        ;$7A03=00
    " r0 W, o. c  w0 X  I! O( i" d2 }
  332. STA $7A04        ;$7A04=00
    5 M' B6 A4 ]4 a' S5 e8 @$ ]
  333. STA $7A05        ;$7A05=00% Y. i: q7 X4 ?9 b- x( b+ }
  334. LIFEL2:        ;copy data $7A00 to 6001
    $ b8 e& P9 w- S$ x7 R+ m+ O
  335. LDA $7A00, a% a7 h" R, U5 L9 i0 O* Z) w7 t
  336. STA $7A01. F, E" C$ y$ Q' {7 J# ?/ c0 g

  337. 1 D* o( S3 i) ?" `1 W
  338. LIFEL3:         ;hundred
    0 g7 J) b! t9 N2 R- ?5 f8 ]2 }
  339. LDA $7A018 r0 [4 d& t9 N: F  r( n( J$ B
  340. CMP #$64
    ; n' w& `0 Y" y9 a5 {
  341. BCC LIFEL6                ;$7A01<100 goto L6" ~% k- ^  Y4 C+ L
  342. LIFEL4:) Q; K9 M7 h; K4 _1 V' F* v6 }, e6 t
  343. LDA $7A010 y/ d2 P- A" I3 Y7 i8 t) r
  344. SEC( X+ Z/ e6 j/ `, c6 L
  345. SBC #$64        ;$7A01=$7A01-1006 u9 {7 t* ?0 P0 V$ U9 l& \0 J: Z+ F
  346. STA $7A01% a4 }$ j; H  K& `+ O/ r
  347. INC $7A03        ;hundred++
    " }! d- c' K# I  m
  348. LIFEL5:7 h  \# W, E2 e" {5 r7 ~
  349. LDA $7A01
    - d6 n% l! W. S9 Y
  350. CMP #$640 r; S* |% ]7 P6 E
  351. BCS LIFEL4                ;$7A01>100 goto L4
    ; b9 s7 r. {9 s& M$ g6 l+ ]

  352. ( }# `) c$ y, `5 w  |) b$ B
  353. LIFEL6:        ;decade. T% C$ T) @& p; Q% @/ L( W  K
  354. LDA $7A01$ l  L8 x" j& W# y8 A- P" T5 Z" L, P" @
  355. CMP #$0A
    4 V* u( P* k4 U
  356. BCC LIFEL9                ;$7A01<10 goto L9
    - m# B+ I) m7 r' @
  357. LIFEL7:        , v9 Y, d* L( M# }/ ?" }
  358. LDA $7A01; n2 L6 H; N" s. ?. p  X' I
  359. SEC3 A* t$ r7 |& `0 [6 V; c# u' X% Q
  360. SBC #$0A
    * @' b, a) G5 P3 v: A1 T
  361. STA $7A01        ;$7A01=$7A01-10; H  F8 a' H2 N/ t9 @% K# v, W  T
  362. INC $7A04        ;decade++
    + O4 Q4 H; W- n& z) h
  363. LIFEL8:! O! I4 G. \0 w8 s' [) L, }
  364. LDA $7A01% h7 \- H" H" c# m7 ?& R* A8 @
  365. CMP #$0A
    2 D9 Q0 j( z3 w7 ]+ X$ W9 {: I. ]; s
  366. BCS LIFEL7                ;$7A01>10 goto L7
    ! _3 C& r; h. A  a+ o
  367. ;unit* v6 j! K  S/ ]: d/ K$ x1 Q2 m( l7 q
  368. LIFEL9:
    5 A& w* v* c, ]$ l; t" E1 v' j1 O
  369. LDA $7A01        ;$7A05=$7A01
    4 \% U# [' M- J9 G; V
  370. STA $7A05        ;unit' Y/ ?3 h) g) F: d$ p
  371. RTS        ;return
    , v/ E* m8 b/ a0 _

  372. " G. `! @3 E$ D" `0 C

  373. - U0 f% l8 ~! S* i6 y+ c( V9 e

  374. . D5 A  S9 [+ @/ M
  375. WEA:                ;武器ppu写入5 {; j/ z! t; }& D& T# Y6 N
  376. LDX #$00: c0 {" B& X' o* W
  377. WEARE:
    ' e+ s; B; q% L' J
  378. JSR PPUADDR_PROCESS
    ' B2 T  D& ?: A- A  q
  379. LDA WEAPON_STRING,X
    ' b' |" K" g& [# e' i" A
  380. STA $2007
    6 B: s, a6 W( C! Z0 e$ z5 Q5 x9 A
  381. LDA #$00' d& e2 K8 a; `2 G4 f( {% K  B+ a
  382. STA $20006 ~6 ^+ u* R7 X$ Y' D
  383. INX
    ) i; Z9 ]$ S  i, X/ V
  384. INC $BA
    7 f6 q: C+ c( |9 l! \1 ?- X8 B
  385. CPX #$07
      D* W' X6 a/ Q2 y2 G
  386. BCC WEARE
    3 u: F0 }& N6 q
  387. + z- l/ u6 q' p0 X: }
  388. READ_WEA:
    # E" k0 A4 P  S: g
  389. LDA $B9
    3 ~+ x* A8 P0 f. ^) i* R
  390. AND #$10
    - ?* ?0 E4 @7 P# c+ ]2 ^8 n* H
  391. BEQ NWEA. Q8 f: L& `0 i
  392. SWEA:
    8 A2 H; r2 y) _+ l1 a* W

  393. 6 {+ P1 r( ~. y( D3 i! [2 g  W
  394. LDA #$9D
    " A! D1 |7 N' Q. F
  395. STA $2007
    # Y4 j/ `3 }: ]0 ]; R/ M
  396. LDA #$009 P6 q" u* g4 K8 n! ~
  397. STA $2000
    % I  s, a+ B$ h, M2 e/ s
  398. INC $BA
    0 M, O2 p8 O4 Y1 e" T. k5 i# [4 _
  399. LDX #$00
    & d$ q  V5 X* y3 Q; X. L
  400. JMP WEAREAD0 S( \: L2 O' f, g( h) R) P
  401. NWEA:
      ]; N' [2 L) q( j# p* T

  402. 6 F: z. d- M" s8 T4 L$ N0 X1 l
  403. LDA #$8D% E6 Y0 j+ A0 U3 p
  404. STA $2007
    * X2 K2 t7 k# P8 U9 G4 a0 ~
  405. LDA #$00
    # o  ]$ ^. y) \$ D; h, q  T) _
  406. STA $2000
    # n/ z3 i2 N( ^; a
  407. INC $BA
      c' j/ u5 O! g; D4 s
  408. LDX #$00
    0 s) K' E: c, l; S  Y, h
  409. WEAREAD:
    $ l4 A2 o" h9 ]  B8 k
  410. LDA $B91 }9 G8 i) z' e: ^  _
  411. AND #$EF/ r* W" V1 K+ b+ h4 \- @
  412. CMP W_DATA,X9 p; q3 z+ I3 z7 A3 T
  413. BNE WEACMP
    . M' o# f% z1 R: q1 e/ @8 L7 \

  414. , @! O% }* Q7 h
  415. LDA W_PPU,X
    ! s; s( G) j" P
  416. STA $20075 r! I2 k- R6 Z3 r- {/ U
  417. LDA #$00' Y3 @4 L+ }+ |' v
  418. STA $2000* E  R- k7 ]: T0 _0 z: k% T' d
  419. ; w( M: M( T# P/ e, ?5 K- o- S/ P# _+ r4 q
  420. WEACMP:
    + O! Q7 d6 Q% f4 }2 P$ B6 E# U( a; C
  421. INX, C( A( D; d5 w/ F
  422. CPX #$05
    0 k- k6 A3 n3 D; k
  423. BCC WEAREAD7 u( D  d  o+ k
  424. RTS- t8 Y' D( |# T& i4 }/ d
  425. 3 M5 F2 q, B* U! L3 A
  426.   y2 k8 Q3 c( w6 p5 A( t) n1 U9 C9 ?
  427. PPUWRITE:, L" {* ~7 \- ]( O$ v+ z% B
  428. PLA
    % H- E3 J: S! ^, Y$ U! d0 |% J
  429. TAY* H; D* c& |& B: l
  430. PLA% B1 L" o9 \+ ?9 ~0 F7 @# C# G; |
  431. TAX
      A0 }# J- M* W; G
  432. PLA/ ~& E# X* M3 y. }; V
  433. LDA $25
    ' g( O, D' I1 r: U3 u# v! a" A, ]
  434. CMP #$00
    4 Z+ J6 g0 q2 m2 W6 A$ M6 X2 T
  435. BEQ WP10 Q8 ~$ O: z0 d7 i; h
  436. LDA $252 G8 ^( X9 g  B, x
  437. CMP #$01
    , K  t8 A) c5 O! l7 u. d
  438. BNE WRE
    9 B( W% R1 @: w& \- q
  439. LDA $F5,X
    " i7 V% P, d, k% }- d5 ~
  440. AND #$EF
    8 Q0 \, F' s% c0 Q) |/ `5 Y
  441. BEQ WRE
    0 _2 k& u0 Z3 l# Q
  442. LDA #$00
    . g' ]# d/ k9 T
  443. STA $7FA0
    9 _2 z% i) y2 G/ |5 G
  444. . }' h( F9 p  i% f' Y4 t: e
  445. WRE:6 f3 x. R; _7 R( b3 T) l; w4 {( ?
  446. JMP $A000
    ; m8 _# h5 i" M$ l; }+ _! l& G1 I

  447. 2 E' `( U( g8 o2 U5 d# m3 ~! u" o0 g
  448. WP1:
    9 [& Z0 ^* ]3 b
  449. LDA $7FFF
    - `( u3 r3 M/ |8 S  S, J
  450. CMP #$FF
    * A7 C- x$ ^$ Y
  451. BNE WRE
    3 i$ G/ e* N; h2 h- I$ y# A/ R8 e) b
  452. LDA #$00
    8 R; b( t$ H1 {
  453. STA $2001, o) B4 _+ f2 S9 }3 w; r
  454. LDA $BD
    ( {# W: _9 j( Z2 I1 H! i6 @9 ]% ?
  455. PHA4 X1 l* {' E4 |
  456. LDA $BC
    4 Q% x4 n1 J: H7 x( }9 @
  457. PHA* R! X: m& W5 v* F: G
  458. LDA $BB4 l4 U$ ~6 q% g# {
  459. PHA
    % y% R% U& S  E
  460. LDA $BA; b& i# R1 B" K% a% W
  461. PHA
    % v, S% b. o7 C) u- |2 j
  462. LDA $B9
    1 b# D# a5 P  S* c0 z8 y
  463. PHA
    3 Q: e. L6 Y" Y" B. U& r
  464. LDA $B8
    - y- z1 l5 D7 x/ x+ e/ b" l
  465. PHA- H' D1 P2 w0 k! O
  466. LDA #$00  v4 y' m4 o5 A" [) P1 b* k" R
  467. STA $B8
    9 O# j2 z. e) E! e9 o& y' W4 R- N
  468. STA $B9
    " L/ `  S& e2 Q6 h3 C8 b
  469. STA $BA1 w: W0 x/ O6 c
  470. STA $BB
    4 ?0 d) r5 n6 U: ^
  471. STA $BC* f9 T1 M1 g5 e: V
  472. STA $BD' {$ M' c7 j( B: r8 h8 Y) ?9 @
  473. LDA #$00; W& X, R( k5 c( n5 m6 |5 v
  474. STA $7FFF
    ; ]% r; ^" ?, \, h+ t# u0 ^1 ^
  475. LDA $30
      Q- U. d8 C7 L9 a7 E
  476. CMP #$02
    . t# L- Q/ M$ s' M7 w3 [- h0 I8 Q
  477. BNE UNPROCPL+ T  g- M$ \& _  {% C6 r, c
  478. LDA $7EFC3 f" F" p. s' j4 \: a7 G7 |
  479. STA $FC
    * d' |* z* p8 [
  480. LDA #$00
    7 W) m/ v; S: \  H% U
  481. STA $A4# @; X* _, F. r; f
  482. STA $A5
    & S6 v+ X. |  u1 e7 W; G8 m0 F
  483. UNPROCPL:+ d) m2 S+ K3 _7 E( f6 q2 p
  484. LDA $7EFD
    5 \" X- s: ^- I: d
  485. STA $FD' q/ |+ Y+ q: c$ {- y8 V1 Y/ b, k( y
  486. LDA $7EFF5 A5 H& m% B: y6 h7 d( p6 g  ^
  487. STA $FF7 q! `8 }0 Y% i9 f1 ?

  488. # R3 a9 s( T2 G! x5 M5 n
  489. WL0:, f4 \5 t% U4 j1 R, U& j5 b
  490. LDX #$00
    * z! ?3 C% K8 {) r5 h9 R
  491. LDY #$00
    . ]' u+ i& [3 U0 t4 _% _% k6 |+ d" c
  492. LDA #$00; i2 U6 J; L( A( K4 ^$ q4 m* b) \) w  G
  493. STA $BA4 s2 |7 ^! F* Q8 U' ]1 j$ h
  494. LDA #$201 i+ \2 i! B4 \; T2 l
  495. STA $BB
    + y/ u/ ~2 g* Y. y9 _
  496. LDA #$00' }& u! O4 I1 z: y
  497. STA $BC3 r4 y# S( H/ [" c# |
  498. LDA #$601 t5 T0 G0 B, d
  499. STA $BD7 a% {& @) q+ ]" `: n' z
  500. & L# }, Q# U4 g  D$ x- X
  501. WL1:+ J8 G* q% H0 [- n
  502. LDA $BD
    7 P) J1 {  Y3 R  w" O
  503. CMP #$70
      ?  d5 B# O6 o2 f) N0 m
  504. BNE WL26 F; g. z1 I$ w0 e/ `4 M$ q5 a
  505. LDA $BC
    6 T% h' _( k' h: U+ y- ^1 t) Z2 O3 f
  506. CMP #$00" X7 S2 M# g/ m+ `6 S) _. W
  507. BEQ WLR
    2 n! Q0 o$ L3 h& b

  508. ; ~3 ]$ E' Q  d8 c/ Z8 d
  509. WL2:
    8 q" s% K* l1 j; _% p" q! n5 w
  510. LDA $BD8 L9 }. J9 l/ K( k! I# I; ]
  511. STA $2006
    5 H" z% }" y  O/ O) S: }5 S4 E4 Y
  512. LDA $BC
    2 s9 a4 a8 b* z% n6 [. k$ I# ~
  513. STA $2006
    6 j4 E6 p6 J% @8 |, i- h7 m+ K
  514. 4 V' [: H3 g" Q3 U) v
  515. WL3:1 u) Z1 I# f5 p& Y) G% L0 K
  516. LDA ($BC),Y8 u! c! d; X! E' f' ^
  517. STA $2007# y. R( J/ F, [
  518. 3 q& _! V: g% K
  519. WL4:
    5 u6 {/ g$ O/ A& ^& o
  520. LDA #$00
    ' l4 U$ d3 }& r5 M$ c, Z0 F
  521. STA $2000
      V- n; m% |$ T; c0 g
  522. INX
    / b+ v& x# f) D' U' C+ U
  523. INC $BA
    2 q( h2 h. m+ x$ n
  524. INC $BC* |# T6 ~8 i/ }: I2 y! `
  525. CPX #$00
    / G, ]6 F1 x  U: ~, u1 }
  526. BNE WL1
    ' u6 ~  T: u* o) J5 K1 `' J& X+ B+ V
  527. INC $BB
    % Q5 B; W# S+ v' N" ?0 ~. |
  528. INC $BD- y6 V! u8 F% P; o0 H* F$ f* T; E0 [
  529. JMP WL1. ]4 B' C$ A" s

  530. % l. Z7 U; y3 [3 ~  `
  531. WLR:, @/ O' T) D9 u9 u4 @
  532. LDA $7FFE4 _  J4 ~8 P. C1 x9 _
  533. STA $07F61 d3 p9 B9 [. V4 P
  534. LDA $7FFD6 f4 P  X8 y# ^
  535. STA $00FE) i8 l+ ]- ^" T" F' |
  536. LDA $7FC1; v  @: f9 P9 y+ w3 [  d
  537. STA $07C16 o9 [4 w6 f& n- \9 M
  538. LDA #$3F
    ; D2 w" p+ d# M- m7 k
  539. STA $2006" y, B; N9 e6 L4 }
  540. LDA #$013 Z3 Q* A) a5 S! c' o# p" T
  541. STA $2006. b0 |% V* u! N# C7 z7 u( m' C: |
  542. LDA $07C1% a: \7 Q+ [: ]7 T# H- `3 l' b+ |
  543. STA $2007
    % z$ u; K+ k3 z
  544. LDA #$003 {4 _9 P6 D/ ^- V2 @  Q
  545. STA $2000/ D! a7 F& R% t
  546. PLA1 h( N$ \2 f! T$ N
  547. STA $B8% U' w9 s9 l4 O! p  S( l: `
  548. PLA
      \$ M. n  p* W% a/ }$ {
  549. STA $B93 ?6 d4 O' @- ~$ O% [: Q
  550. PLA
    8 ?" I4 b9 R/ l& H  Z$ t' q
  551. STA $BA: \6 i& C, G$ U  i5 R4 s
  552. PLA* g& A( m0 c; l- m1 B1 f& ?
  553. STA $BB
    % Q  w3 p4 R- j# m/ w1 a9 |( D
  554. PLA3 m6 @& U4 ~0 d
  555. STA $BC
    . @# P* N( R. k) V
  556. PLA9 ]3 L& |" C9 I" b* `7 U& Y. _$ v
  557. STA $BD; D' L2 V+ i* Z
  558. JMP $A000* @+ R+ ]* |' V' l+ \

  559. 2 k( @# r4 N* t2 R& c7 S6 [
  560. FREE:                ; 暂存器保护+ N* m5 _0 T( d7 q" W$ o4 `. K4 J
  561. LDA $BD. t& J  E# Y* m
  562. PHA
    8 b9 n" r7 n& v$ L- a
  563. LDA $BC! e' ^+ g$ [1 q4 Z
  564. PHA
    ' [; n. ^( A# h9 h$ z! E) W
  565. LDA $BB
    # C' E6 D% Y( t
  566. PHA9 Z$ C) U8 g$ f$ C) W
  567. LDA $BA
    5 J; {$ u* w: Z; W) `
  568. PHA
    ' v2 S# L/ X. m" K  I6 m
  569. LDA $B97 ~1 t" @% [2 N2 z& y! f
  570. PHA
    & u0 `7 d- \0 k
  571. LDA $B8
    9 ?0 l2 t6 Z8 y1 _6 a
  572. PHA! w% M, \5 O4 O7 Y$ s% U
  573. LDA #$00
    ' A0 M' X. T/ X* K6 g% L$ T
  574. STA $B8; ^) H% M; h  p- t! _
  575. STA $B9$ O8 _1 s+ S7 h! Z. Z
  576. STA $BA
    # X5 _9 |5 F+ i/ F9 o# I
  577. STA $BB
    " ~. H2 C6 d* e, L7 {# O4 S# R% ]" q
  578. STA $BC
    $ k" D- }$ c6 z8 ]6 S
  579. STA $BD) C8 H8 O' Y2 v7 c
  580. / D3 y. x; @* Z  o- ~! M
  581. WEAWRITE:                ;武器ppu写入
    , U! b% k  b0 |* W' x$ Z/ @' ]
  582. LDX #$00/ h+ @* V# ?% D- \
  583. LDA $AA7 k  ~* Q% g5 x% {! U/ I/ m: g
  584. STA $B9
    5 H! [/ H: J1 W" i
  585. WEAINI:                ;地值初始化* f) h! w( O. ?
  586. LDA #$A4, @0 i% C) D! I
  587. STA $BA( Y/ P' o" F6 N, M  C, }
  588. LDA #$20
    4 o, b( |) i4 [- s3 k; [
  589. STA $BB& h% ^! @7 l& p" @! o! [
  590. 6 k: J/ f4 F9 C0 o
  591. # g" ?" O+ |( m3 w2 p
  592. JSR WEA* d2 x' S. {  \0 ^" s
  593. LDX #$00                ;武器ppu写入
    * o# r6 C( f% I3 _2 l" V4 F( I
  594. LDA $AB
    8 o9 u* D  s. D! \
  595. STA $B94 f: r& V4 O6 n" r; C
  596. LDA #$B3
    " {% [& `" `7 D3 k# r
  597. STA $BA
    4 [0 g% W1 w' `) M9 M/ U
  598. LDA #$20
      y! e( k9 [2 G
  599. STA $BB
    ' H+ h1 }& f, M! y7 y0 b& ~" F5 p$ \# S

  600. - J# \5 R9 Q  d9 y+ T

  601. / ]" I* C7 Z! m
  602. JSR WEA
    % p5 z& c3 |% q, [* G- o
  603. 3 c$ m! q; @3 S' M7 I3 W2 V
  604. LDX #$00
    0 J9 l+ b; o) Z/ k1 B' @
  605. LDA #$E4
    , e3 K+ l9 E5 j/ \, N3 m  @
  606. STA $BA
    & z+ a2 G# C) O6 \& S! f% d
  607. LDA #$20+ p# n2 e  u- {" e1 a' w! }
  608. STA $BB" F0 B' r6 l" ]
  609. 5 r2 i; \* g2 [# N8 f9 Q

  610. 2 j4 ?6 D' J$ M# G' T$ R1 r9 V
  611. LDA $327 t3 V* |" z$ B. x9 b4 m6 M0 w0 b
  612. JSR PLAYERLIFE0 w! B; i1 e$ N% I
  613. % W) N9 K/ K- ~4 O2 O8 P2 Y$ Y
  614. LDX #$00
    ' q& x  b. R% G# q0 ?
  615. LDA #$F3
    : q% ^& Z9 Q, b: M
  616. STA $BA6 R" m# i% O. y% [' [9 j
  617. LDA #$20& X4 j  K$ Q. J/ Y( q! q: _
  618. STA $BB
    0 Z1 B: d3 s/ ]8 Z- ^% d

  619. 8 b- k& k" T) m3 \: e' l' S2 X# m" H

  620. * }( l! R! ?  N& v' u! w2 z
  621. LDA $33
      z. \8 s' @+ W  [
  622. JSR PLAYERLIFE/ h3 z+ K+ I6 e7 d* w& M
  623. ) X& E2 ~6 |6 Y  w

  624. 9 u# K; S3 ?$ g# m
  625. JSR PLAYER_01_PPU3 ]2 h/ u' R+ k  ?% n
  626. JSR PLAYER_02_PPU
    8 [0 P9 {; K8 j7 [) V$ ]- D

  627. 0 N& v- X6 f) A9 a- d
  628. ! j2 N8 t8 W1 g' C3 K7 T
  629. JSR PAGE_PPU
    * |8 C+ B# A4 Z: Y% E+ C4 ^
  630. JSR PAGESELECT
      a* Z2 j+ A; p; z& J  m
  631. - i( V/ ?0 h6 |5 {" C7 o
  632. 2 ~5 b$ U; o" N. a

  633. ) ]0 i5 _- n0 p4 A

  634. - l0 g1 I" r- k2 t6 |% \

  635. 5 K8 L7 s4 Z  T! E4 m' Y8 `

  636. / M+ s3 t* Z, R4 Q' u1 d
  637. 8 W0 ^' r+ y  Z. a' b
  638. ' }4 j4 D/ v9 g( X
  639. 6 V' @: r* {# _1 Z/ T0 V: H# V: t7 Q

  640. 7 B8 [' ?. n+ C/ m

  641. , U+ Q1 Y- ?; s3 d6 w# M

  642. ! n7 G  I/ ~; g8 R/ V
  643. 9 s$ o* l2 d( q6 m( a" r  d
  644. PLAPRO:                ;恢复现场
    9 f& g9 T  S& f
  645. PLA- W" z6 }/ y0 Z# V; I# I
  646. STA $B8
    ! c3 ?1 B/ F/ w: k
  647. PLA
    2 X- H6 T2 g5 f- z* f
  648. STA $B9
    " _' h! P  s" J. l  g/ G  c. o; d* R
  649. PLA" H. u: U- @/ I5 X! d( k! [
  650. STA $BA& t9 Z9 w3 v+ H, n6 @
  651. PLA) j" L) ~5 u+ I' P, f' C9 D% y
  652. STA $BB
    9 {$ C% ^7 R* I: F  H2 f2 f0 [* X
  653. PLA  h1 n# L" z$ K  |' p+ l
  654. STA $BC3 @& y$ W/ Y" [$ i/ ~
  655. PLA
    / O) H) Z$ V& ?; f1 h/ O
  656. STA $BD
    4 ]0 b1 U- h; K( J6 ?" p# i
  657. FREERTS:/ x" J/ U  U# B* J* O6 a4 z
  658. RTS5 @# r8 W, P: c2 j: s( t( h  L

  659. " e# `0 Z. X/ M% D( q
  660. INVINC_STRING:                        ;invincible
    ; R, o( [8 y* D
  661. .BYTE $93,$98,$A0,$93,$98,$8D,$806 Y: R- k5 _' [% p5 c6 y

  662. ) H# V* F0 D, `- @* f
  663. INVINC_PPU:
    1 a1 M% p! S$ s* x/ y
  664. LDX #$00! W3 _1 T1 I. z& c% t0 c
  665. LDA #$62% _: X7 a6 z6 L' L2 m/ r
  666. STA $BA
    # F2 f4 t  Z  ~$ T8 W) {
  667. LDA #$21( f  @, l* d9 t7 q3 H# p
  668. STA $BB. X5 t* N1 b3 M0 Y

  669. & b4 L& C  q. T8 }* T) N/ t

  670. 7 u7 ?" s/ a9 y( P4 H
  671. JSR UP_PPU' V4 f, G3 f1 }) ]+ @+ @" ?/ a3 U
  672. JSR INVINC_WRITE
    2 G! N: S# M+ ]- Z# I; ?4 d2 C
  673. LDX #$00# ]- G. Z  P2 M3 F6 O3 P% S+ N
  674. LDA $07A0; K* U% G" ^2 t2 C1 I- [2 e+ @
  675. AND #$01
    . [- d, L5 b3 H2 s! x
  676. JSR ON_OFF_PPU
    * R% ^" e# _, c: r
  677. LDX #$00
    + z: Q9 p4 ?  J7 }
  678. LDA #$71( S, ]: _8 X6 b
  679. STA $BA
    0 a) e& O7 S1 j, U- F
  680. LDA #$21
    . o  Y( R* V5 {3 o) b
  681. STA $BB
    " ^6 b: [, m) R3 J) W
  682. ! O4 T- N" ^. v

  683. ! I$ d% d* @# p
  684. JSR UP_PPU8 x- C1 K4 H; b) K) ?8 \4 n4 G) W: V; `* w
  685. JSR INVINC_WRITE/ A2 `8 c- t1 M3 z& E! Y
  686. LDX #$00. ~7 K- E& }( M; i2 b$ e; s2 n$ ]
  687. LDA $07A14 K! u+ Z3 k6 }" Y9 A
  688. AND #$01
    0 G; O! q5 P4 a
  689. JSR ON_OFF_PPU
    / D6 E- r4 E, H  [& a+ W
  690. RTS" H- [2 L$ c' ^

  691. , y+ ^/ e2 G* C# C
  692. INVINC_WRITE:$ v6 l. v$ u: [- `
  693. LDX #$00- ]7 _. p# L& J! |9 t/ b* ]& q# T
  694. INWRITE:
    ' A' I/ z, ]6 X& F
  695. JSR PPUADDR_PROCESS
    ; j' Q* Z/ Y  F9 a' @- e. i* d
  696. LDA INVINC_STRING,X$ e- O- n# |2 U5 n6 M% @$ o
  697. STA $2007
    $ c# m- C, s9 e9 o
  698. LDA #$00
    9 W6 I8 d6 D$ v
  699. STA $2000
    0 g/ O* P+ t  Y9 W  Y& r! x) T
  700. INC $BA
    8 m  \$ q. q' _, a
  701. INX
    + t1 n2 Q  w1 K9 r2 X
  702. CPX #$07
    1 E: m/ }# E* p" A% h
  703. BCC INWRITE
    6 F8 Q9 o% J5 _+ e, h
  704. RTS$ Z' ?$ Z: W4 u
  705. 9 p, m( Q5 {% j6 }, [4 e! E
  706. ON_STRING:6 [# @7 d  Z& |# s* h
  707. .BYTE $99,$98,$80
    3 N; E* _. W! \: b( }4 O

  708. + g: N6 x) d8 o& A3 F) F$ E% `
  709. OFF_STRING:
    1 V8 K" d3 w! ]( {: X' v, K
  710. .BYTE $99,$90,$90
    2 E( D" U0 Q( x( N% `3 f. c- b# b

  711. 7 N( a  v1 `( D% p
  712. ON_OFF_PPU:
    1 M/ Z! {( t) U3 Z3 g
  713. BEQ OFFWR
    ) S, Q3 l' @( R" k% m3 L2 f* q, [
  714. ONWR:
    8 n4 P1 Z& O6 I. Y7 W! V
  715. JSR PPUADDR_PROCESS
    ) U& |1 x0 X! A) `
  716. LDA ON_STRING,X
    0 r; u8 @( n3 P- M/ h6 k6 i
  717. STA $2007
    & g% l+ C3 e; B+ i
  718. INC $BA
    7 k3 L6 t$ ^+ Q& C; E
  719. INX
    + v" h- ~; Y& y$ v  o8 M0 f
  720. CPX #$03* W! L  S; ]) w# @8 ]. L) I
  721. BCC ONWR7 ~3 J3 u4 X+ \1 a
  722. RTS
    ! w7 U. R* j. P. _9 n" M$ l5 c( \
  723. OFFWR:5 q+ @/ v, r* |9 L& v
  724. JSR PPUADDR_PROCESS3 m" Q! ?0 l) a* V: r: P
  725. LDA OFF_STRING,X
    ; G/ ^3 x* ~) c3 n+ _
  726. STA $2007) F2 I: z! f" T+ \6 \2 j. g* E
  727. INC $BA
    5 L- Y: o$ e# _" I8 W+ u; n2 A  S
  728. INX
    , y1 a% n( `- g  H7 E4 F
  729. CPX #$03% y& j1 T: a7 {
  730. BCC OFFWR* O! r! U0 [3 X
  731. RTS
    ; Z4 |6 K: E0 _& T) _0 }& _
  732. $ r1 _$ Q( x5 k" m& r8 Y
  733. LIFELC15_STRING:: j4 e# f8 D7 c7 i- p% f
  734. .BYTE $96,$93,$90,$8F,$82,$86,$80
    0 m5 {6 p4 T- x* P
  735. 8 |* O& |4 g6 J# M/ `
  736. LIFELC15_WRITE:/ h% `9 v. K2 |. \
  737. LDX #$00# m% k- D# h- ~# x; _
  738. LIFELC15:9 `. {+ U( Y) l! I; r; _# E$ \$ x
  739. JSR PPUADDR_PROCESS" G5 V) v3 s! l; P
  740. LDA LIFELC15_STRING,X
    + T7 W! a( W! w7 _6 i0 Y. X% s
  741. STA $2007( ?! A' e8 [5 X4 ^
  742. LDA #$00& ]3 [' d5 x6 L
  743. STA $20005 j# Z+ F9 i+ A
  744. INC $BA
    - Z" |. K  D0 z
  745. INX) u9 l* U$ H* y8 Y2 c5 F
  746. CPX #$07
    . V; r! y% J0 O/ d$ s
  747. BCC LIFELC15' ]9 [$ B. F% O# e# p
  748. RTS0 b: b# p. l0 V$ N3 J. E

  749. 0 k) p" G( B3 a: f, G0 Y/ t
  750. LIFELC15_PPU:8 Q# v1 t& ?& P$ P
  751. LDX #$00' H; V& @& C8 f( _7 f9 v7 f7 F
  752. LDA #$A2
    7 q; v' _) h: \) n1 R( Z0 n8 h+ P/ X
  753. STA $BA) O7 w. t- |6 x8 p" Z( e5 r
  754. LDA #$21
    ! h4 G9 H; o' `+ S5 n
  755. STA $BB
    + K- Q6 O$ P- [& L+ v; B
  756. JSR DN_PPU
    6 |& y3 y9 l+ h3 `0 B
  757. JSR LIFELC15_WRITE0 A% A! H$ c" ^
  758. LDX #$00
    4 R7 Y) u% z1 C+ R
  759. LDA $07A04 Q4 h  K; P9 F% @; E
  760. AND #$02
    0 J5 U% B% s% m3 f
  761. JSR ON_OFF_PPU
    ) E( B9 A0 M2 D0 z
  762. LDX #$001 y# Z' h) P6 S7 Y0 M* d. a5 a
  763. LDA #$B14 X4 x. j% ]6 x! i6 Y+ X3 h
  764. STA $BA
    % a5 c: f. c& e; B
  765. LDA #$217 H# H" W+ g( x
  766. STA $BB
    2 x8 r9 m4 I0 z# d5 }+ V
  767. JSR DN_PPU; ?/ |- t2 I* V$ C% F" B0 c- ]5 E
  768. JSR LIFELC15_WRITE8 p7 T4 @5 m1 Z6 P1 _
  769. LDX #$00
    : N4 \  q/ p4 ~/ {( W+ I
  770. LDA $07A1/ d3 V% F9 ?! S, N
  771. AND #$02
    ( I$ M+ H8 p# _) I
  772. JSR ON_OFF_PPU( u7 J' K$ Y0 K4 b* p; E# Z
  773. RTS' h* ~0 H4 o% y' f' l
  774. $ Q/ L3 d* K$ Z. H% n% V
  775. DOUCON_STRING:1 ?# D. m# a- T4 {6 g9 ^0 n
  776. .BYTE $8E,$99,$9F,$8D,$99,$98,$80
    . f, z& t9 D) S2 `
  777. 9 |. c7 F+ }% X6 D& B
  778. DOUCON_WRITE:" q0 O8 }  _9 g7 s" D3 K  B' V9 }
  779. LDX #$003 S( x& I; ~8 P( L; n9 g
  780. DOUCON:3 D( w) _2 r- g2 L& a9 D1 g
  781. JSR PPUADDR_PROCESS( z0 ?9 V+ @; v0 `4 A3 F8 g
  782. LDA DOUCON_STRING,X
    # o  u" F1 t5 `
  783. STA $2007, \2 u" u, ?# X& q
  784. LDA #$00
    , l; z9 Y4 ?% W4 s9 e* z0 O1 C$ x. o
  785. STA $2000) f1 I& Y6 u- p; M: h8 k# S: x2 i
  786. INC $BA& t0 S9 D8 O& x" P% b  I
  787. INX
    ( R' Q# W7 d" k9 A
  788. CPX #$07
    8 F. f; S+ h4 @, ]' b. h2 f
  789. BCC DOUCON; U! q6 }2 w$ E: L& [
  790. RTS
    8 @& f, w( e* F4 Q+ R% D4 l3 |

  791. " \9 A+ c0 z; h+ d% @  G" {
  792. DOUCON_PPU:
    5 u8 e7 ]! N. E4 |  l0 a3 Q
  793. LDX #$000 ~% |* I: X$ P# y: @6 b
  794. LDA #$E2# C: V/ N8 [6 s6 \+ I+ o
  795. STA $BA
    9 e' g; `. w9 w
  796. LDA #$21* C9 `7 p0 ]" z& `$ W/ @
  797. STA $BB  w" F  X3 }* X3 Z- _
  798. JSR LF_PPU
    5 g# _/ J! D5 @# V
  799. JSR DOUCON_WRITE4 {/ Y( N% l7 J/ Q9 O6 H
  800. LDX #$001 E- |! {/ A5 ~) z1 q9 F; v. j: m8 X
  801. LDA $07A0( ?$ w' H( ?9 t# @# M, r; Y9 f
  802. AND #$04; X# U( g: {( `1 q/ ?# {  S9 u
  803. JSR ON_OFF_PPU
    ' O- Z0 M4 R  G# _5 k
  804. LDX #$00, \4 B$ N4 ?# r% H
  805. LDA #$F1
    , T- L0 Q, h& {, S, Q
  806. STA $BA
    / q4 X: M% N' N6 m/ B
  807. LDA #$217 u0 j5 k9 R5 D7 N, W
  808. STA $BB8 j$ E, H) @4 @( P
  809. JSR LF_PPU
    8 h# W+ R2 c+ }
  810. JSR DOUCON_WRITE9 A+ a4 z; N6 m5 R" v% n
  811. LDX #$00' {  y- j( W& q$ ^
  812. LDA $07A1
    0 ]& S# t, x) o/ z" J; H1 l
  813. AND #$04" E; m3 s5 [: o" j
  814. JSR ON_OFF_PPU
    3 X* w  n/ ?& g" @) r8 H* J5 M
  815. RTS
    $ k) [* W" w" A/ W& r6 U+ B

  816. 3 M9 Y( x& e5 B& k( d
  817. LIFELOW_STRING:/ {+ t9 b, m. i' D' y
  818. .BYTE $96,$93,$90,$96,$99,$A1,$80
    3 p! m! A4 ?+ z5 C9 l# P( [
  819. 0 F4 U; r9 A) K& R: B& t& @
  820. LIFELOW_WRITE:
    ' m7 x- G% M8 B
  821. LDX #$00/ V4 c, U* Y0 e
  822. LIFELOW:$ S4 T# H9 N3 _/ {% \
  823. JSR PPUADDR_PROCESS
    7 I% J4 w: |0 d5 f( Q+ c. i
  824. LDA LIFELOW_STRING,X; P% s1 Q/ x  B; D+ G
  825. STA $2007& K  P4 N! [# N+ M$ h
  826. LDA #$00
    ) Q, p& o0 w1 l' _
  827. STA $2000
    / l: ~/ q7 f! k/ v1 f% e* w
  828. INC $BA7 B0 f7 x* g) D
  829. INX
    - T, y' F' N. I1 g) q# m" I/ L. X
  830. CPX #$07
    ( }% t% \: |2 @" L% Y& f8 d7 f
  831. BCC LIFELOW
    ' R' k$ g: e8 i' \& B
  832. RTS
    - e4 H* z' ?7 J' `% u* o+ l
  833. 6 I0 g5 ~$ f4 M' f) }2 n
  834. LIFELOW_PPU:
      V( v3 p+ x5 h& o2 ~
  835. LDX #$007 C# B) _! N3 R( s
  836. LDA #$22, d" G& I) I/ O  x( H! r$ Q4 h
  837. STA $BA- r' {+ M; ?* C6 Y. W4 E
  838. LDA #$22
    6 _: p1 W! i& _. O' {6 l% k: C
  839. STA $BB& e0 c$ ~% A1 i- `4 i
  840. 5 }: R- x$ T( R% _* t
  841. , ^% e4 `6 x4 ~
  842. JSR RG_PPU
    . J1 Z; x% X/ n& I2 o$ q
  843. JSR LIFELOW_WRITE) t) S& e% A8 s! h9 B9 v! p" @
  844. LDX #$00
    : I1 z; o7 e6 n& y6 o$ L9 [3 D' X( k/ m! b
  845. LDA $07A0" D" |% Y$ J! @5 g
  846. AND #$08
    * C4 t1 F& t+ l
  847. JSR ON_OFF_PPU+ t' t- w8 \  d6 k
  848. LDX #$00
    : n5 n, T5 g6 g% V0 w2 h% [
  849. LDA #$31. H& a% M( V* [) Y
  850. STA $BA, h8 Z+ L4 E5 M: T, O7 Q: Q
  851. LDA #$225 \: C$ G# W( I
  852. STA $BB3 {' k' H' v$ x" c
  853. 0 q: T) |% q2 l$ {+ O

  854. 9 h/ ~0 b! J) [5 C. q
  855. JSR RG_PPU
    " w2 d9 y3 B$ n
  856. JSR LIFELOW_WRITE" [: m' f: l7 U& ~7 i
  857. LDX #$00' c6 F6 l0 j% n( r; V
  858. LDA $07A11 _; r- P0 v5 e4 [: w3 d& g- Y- l
  859. AND #$08
    ! Q4 |: @* S. t1 d( m1 r! [% b
  860. JSR ON_OFF_PPU8 P! v0 U" q8 U/ L% X
  861. RTS' u/ \6 O$ ~' ?8 n' A/ T% c

  862. 2 m( t' ]" c6 K
  863. KILLON_STRING:- ]3 z. k. J/ Q
  864. .BYTE $95,$93,$96,$96,$99,$98,$80
    : V9 G+ [# Q' g/ R9 V# y1 S3 F& ]
  865. + S/ z) \4 D5 l. h/ C# F2 y  _& t3 b
  866. KILLON_WRITE:2 ?0 W3 w' N0 g- d# l
  867. LDX #$00
    : [9 Q; D% J$ Q
  868. KILLON:
    5 ~% K2 V2 P6 p5 O& ~3 V% ]% o
  869. JSR PPUADDR_PROCESS8 \4 t* S* I- M! W: e4 A, s
  870. LDA KILLON_STRING,X
    + s3 ^% Z5 k- V1 B% H+ H
  871. STA $20071 [3 ?. Q! `% ^1 e" v
  872. LDA #$00' |: B" f* b& K6 P; w+ A4 Z" y" M$ Y
  873. STA $2000
    / e' L& t/ c7 X9 |' O1 v7 l
  874. INC $BA# a: p$ P2 @5 p' t  U- y2 \& A& u8 S
  875. INX
    $ R, F2 }0 w/ b
  876. CPX #$07
    9 q9 _6 t3 j) ^4 a& T0 i7 D4 U
  877. BCC KILLON4 ~: g, R0 ]: J  J* k. `5 d. @
  878. RTS5 w$ ?$ c. L- Q& c7 e8 ~
  879. : n3 Z# s7 H8 j1 N1 [6 a8 t) Q
  880. KILLON_PPU:+ `& M9 q; V: ?) ^$ f; M3 @2 o
  881. LDX #$00* v2 Q& @- l! N4 t8 C6 Y
  882. LDA #$62+ |1 f! Y; g5 y& i" o* l0 o. S
  883. STA $BA
    ; }' j- c# h9 q. u3 {  ]) M
  884. LDA #$22- v' _+ S( `) _  u
  885. STA $BB
    / ~2 z/ K9 q0 C) V

  886. 8 x7 X/ ~2 `1 H* a

  887. , J# D. R1 N' z9 T6 R
  888. JSR B_PPU: {- p$ t9 T& w6 D$ h( l! H0 W1 V
  889. JSR KILLON_WRITE
    % P7 K" y) |( M# K
  890. LDX #$00
    , g4 T( i( h1 x- [! Z7 J/ u9 |2 q
  891. LDA $07A0
    # g1 y, O, C' e4 H
  892. AND #$108 b0 p2 I7 S& p
  893. JSR ON_OFF_PPU
    . x! L/ @; V5 O; F6 a9 Q
  894. LDX #$00
    ) O5 D4 K4 d" S# f' ~+ Z) q  H* L( P
  895. LDA #$713 T" e% {) r. e) I: ^* [# @4 u* G
  896. STA $BA9 `6 G( G9 ~; A6 P: q5 z
  897. LDA #$22- x& v0 j. Z! Z9 _6 h. M' P8 \' E
  898. STA $BB$ A0 ?6 T- m# O% N9 |5 J; F. U

  899. 9 @( b' ^" {4 O4 f1 G8 {* R% ^# E* k! M
  900. . R1 {, b4 U8 {4 `- |* W
  901. JSR B_PPU
    + M% Y" h% H/ [2 k# M0 }3 }& D) N5 J
  902. JSR KILLON_WRITE
    ' y. Z' `- ~, p& W' ?( @. d7 ~' l2 Q
  903. LDX #$003 d$ l0 C0 p; R. k4 Q: Q- x; D
  904. LDA $07A1; u5 X( ~# K' {' T
  905. AND #$10
    - H3 y% D0 g9 ^
  906. JSR ON_OFF_PPU  d8 j, @6 D: `: r  K2 Q1 Q
  907. RTS! C. `( ]" }. {' A3 d

  908. * _- F) E+ p, v  Q; q# \1 N
  909. SKYFLY_STRING:
    - @* l* N# ]7 \3 p' U) `
  910. .BYTE $9D,$95,$A3,$90,$96,$A3,$80
    1 ^, x2 _; _2 ~6 ?* V/ A

  911. & Y3 G0 W* Z* Y! h. F
  912. SKYFLY_WRITE:0 q6 i; r& w- I5 S- l; R3 s
  913. LDX #$00, g& ?8 v/ C, v1 }
  914. SKYFLY:
    ; Q, R. C. I/ c6 w1 c2 I5 A( ^
  915. JSR PPUADDR_PROCESS$ M4 x5 c$ v7 n1 U
  916. LDA SKYFLY_STRING,X+ G+ y* H) {5 w5 M  k
  917. STA $2007: c0 I& ?3 Z/ }( u/ o
  918. LDA #$00
    ! P. q- C0 f# ^5 i2 z9 I- C& o% w
  919. STA $2000
    1 E" R: h8 f7 n% N
  920. INC $BA
    / W( }+ O. }0 ~: F
  921. INX/ w7 t) k' E) C  t& C
  922. CPX #$07
    $ \0 ^8 G# Z7 D! ]7 l: E: B
  923. BCC SKYFLY, z& C! W0 q" ?1 D5 ]6 J8 i
  924. RTS
    # U/ Q- e, V0 H, ~" `3 z9 M+ g4 I
  925. # y1 E) j* H: y" K' O. H& A4 S" l
  926. SKYFLY_PPU:% c1 x$ R! c& v- b, m! ^
  927. LDX #$00) `- Z$ I/ `9 R+ W) {, N' x
  928. LDA #$A25 X" T& R: L: }- o# F% N" ], {
  929. STA $BA+ z/ Y" c3 I+ c/ t' [$ ^+ ]
  930. LDA #$22
    . M; E' d. E8 p( g! _
  931. STA $BB* d. Z$ `! m9 y! Z+ W) F

  932. - L$ ~; X5 n) ~" m8 M

  933. + K$ V/ e1 m; C- n% `, G0 B- k
  934. JSR A_PPU0 T4 e) y$ ~5 k
  935. JSR SKYFLY_WRITE
    + Q/ x5 h; O7 @4 N, e+ v# R) }. q
  936. LDX #$00
    7 E& i, @) R' ?( e" H
  937. LDA $07A0
    & E( Y; D- a* L+ F  x' T
  938. AND #$20
    . O6 r4 ?: f& m: G; O6 Q3 L- Y" U
  939. JSR ON_OFF_PPU3 M! Y% `; c' k4 Y' i
  940. LDX #$00
    " c" j3 [# x( c" d- Q
  941. LDA #$B1
    - {5 ~4 h. S' ~9 C
  942. STA $BA
    & s1 C3 b) J) f0 p
  943. LDA #$224 _& n9 t! r5 i
  944. STA $BB' W: p' u" t: j! w! F0 y

  945.   B) t1 a% c. G0 f7 U) ?  a3 k

  946. # q1 Z4 W: V# ?; p, r
  947. JSR A_PPU
    , W, \6 b, M6 S- C( ]& {! Q
  948. JSR SKYFLY_WRITE
    1 M* n* W9 @5 `* G
  949. LDX #$001 k6 m* S" x, W' Y' l1 a! Y- `2 N
  950. LDA $07A14 ~+ u" o# c; L, a0 d( T4 ^" Z
  951. AND #$20# T6 g' ~- Z5 ]. e& P8 h
  952. JSR ON_OFF_PPU
    + F% \  I( F! r1 r
  953. RTS
    6 t( ~% t2 M5 {; e( {* v
  954. 7 Q' d  e, [: w- t. t; B9 `. b. V3 \
  955. BULADD_STRING:
    8 T/ l# z* |* [
  956. .BYTE $8C,$9F,$96,$8B,$8E,$8E,$80! z2 ?1 j$ \+ f+ o& A

  957. 7 j- D2 e; }9 M
  958. BULADD_WRITE:
    , T1 I2 h+ p) S# X. a+ g. m9 j
  959. LDX #$00
    / M: G' H8 v- N4 `  @
  960. BULADD:
    * }1 e9 L( A- k
  961. JSR PPUADDR_PROCESS
    3 x+ D8 G+ d; [
  962. LDA BULADD_STRING,X
    5 D* `% K0 Z- r4 D. G) D
  963. STA $20070 c8 H- K' P. c  @
  964. LDA #$00* n$ V1 X9 T' f+ d2 B
  965. STA $2000
    ! u# _5 x& |7 P8 h8 c  o1 v0 O; x
  966. INC $BA5 G3 f9 l" U& a: ?, R
  967. INX
    * I+ P3 b  j) R3 ?! H* V' H
  968. CPX #$079 v* T2 W; c+ m" z1 d2 p  I/ K
  969. BCC BULADD4 U  V# x" f2 j, R# M8 W) N
  970. RTS3 M3 J' @; R5 i1 W' H, b# a
  971. ) I- q# w5 l" N/ z
  972. BULADD_PPU:$ Y) [3 R+ b) W% `! V4 r7 W
  973. LDX #$00, k$ U9 U. @5 X) L2 K8 U
  974. LDA #$62
    7 n% u7 D) C0 ~6 \/ b3 O
  975. STA $BA
    3 K* ^0 V- i# ]7 j' u. n# |, G
  976. LDA #$21
    ) M. e: d( g( f4 L% N
  977. STA $BB
    5 _; Z: g# R5 E' S6 ^4 A! y" v

  978. , I4 z' ^) P" j

  979. ! z; H% [- o) q% h3 g6 d
  980. JSR UP_PPU5 `6 f9 g0 c8 C- M# z9 ?
  981. JSR BULADD_WRITE; r& _, U2 L6 ?9 e2 S
  982. LDX #$00
    9 U: a. }6 a1 D6 G
  983. LDA $07A2
    0 k/ }3 _9 M; w9 T% x9 R; o
  984. AND #$014 ^4 Q' U, h5 f  V6 s, R
  985. JSR ON_OFF_PPU
    / |6 _/ N* w& s
  986. LDX #$00
    9 [- W, ^5 Z3 b1 Z2 h- ?
  987. LDA #$71
    ) J/ F+ V! [* o# [8 Z
  988. STA $BA0 a% O- h$ E% m7 w; P3 d
  989. LDA #$21* R2 O2 V3 T- f$ X" k# I5 c8 B: E
  990. STA $BB: s- Q! y: E7 ?$ e3 h2 ^
  991. + p4 K/ t6 Z' D, E# [& S% p

  992.   i$ R6 A1 n. `* f3 k4 `8 s# k
  993. JSR UP_PPU
    4 t8 |5 [- n" I- s
  994. JSR BULADD_WRITE+ H) L; `4 c, i0 u
  995. LDX #$00
    3 z% u% Z# R1 g. ]( g5 L) f
  996. LDA $07A3
    - r1 H' g/ h8 {+ R- M" J+ }: S
  997. AND #$01! U9 N. H: {9 \; [  Q9 M
  998. JSR ON_OFF_PPU
    + z  R1 ]* V# J3 ^6 X
  999. RTS
      q4 X. L* m# F1 @" M

  1000. : v4 S- q  \' n5 [# {
  1001. MENU_PAGE_STRING:
    + Y1 G, @- {0 l2 Q5 d6 e& H5 l
  1002. .BYTE $97,$8F,$98,$9F,$80,$9A,$8B,$91,$8F,$80,$81. D! o" P: h$ {( H. y  O

  1003. 6 X" V0 f+ E+ E+ ?" N8 U7 f. n% M  R
  1004. PAGE_PPU:: H2 N) q- N$ \9 y' l; r) d! K( n* }
  1005. LDX #$00
    6 X, L6 Q% B4 G
  1006. LDA #$0A
    ' K( U2 e1 b: |( k8 X' n- W0 m2 }
  1007. STA $BA" t" r- L5 {+ p( b! S8 {
  1008. LDA #$23
    ! a) U  k8 ^" ^: g( D* Z7 W4 l& H$ v
  1009. STA $BB
    9 a4 ]& i! a& |, B  _
  1010. , a* q- `, g! d& Q% t0 y0 d- b3 P

  1011. 2 e8 X: J  f# |9 _
  1012. MENU_PAGE:
      D9 @$ ^* c% M7 N6 K6 F- T$ ^
  1013. JSR PPUADDR_PROCESS8 d! a/ m, k$ e9 T
  1014. LDA MENU_PAGE_STRING,X
    7 b  j: B8 X  Q& I( ]/ W
  1015. STA $2007
    3 U3 [% k; O: E8 [) }2 G& |4 }
  1016. LDA #$00
    ) J( q( H/ b! B) e
  1017. STA $2000
    : g! L0 x7 y' V- W4 N5 U! W
  1018. INC $BA
    & x, i: o# z8 ?4 c- C
  1019. INX
    9 J0 Y& ~* g8 d0 X" f% H
  1020. CPX #$0B
    7 ]! c9 S% F( R+ ]4 w
  1021. BCC MENU_PAGE
    8 K( Y6 U1 ], c  M
  1022. LDA $07AA
    5 q+ _" A7 V% |$ M5 I* j
  1023. CLC/ ~$ C; _8 f- L  ?; E3 [5 d* c1 t2 U, X
  1024. ADC #$827 ~: ]! w6 o: [) f' P  v6 ^" u
  1025. STA $2007
    & y% U; }0 X' X( O
  1026. LDA #$00, P% [  }  f1 c
  1027. STA $2000
    8 K% l7 w& T. a# d! X" x# ]
  1028. RTS" }; e' ^1 p" |! Z
  1029. / u$ z: n& _2 u. o+ X1 q- z
  1030. & {# [8 m: N4 J/ h0 r
  1031. SKINGE_STRING:
    9 X4 E( D( t" D6 @3 Y) N3 \( R- P
  1032. .BYTE $9D,$95,$93,$98,$91,$8F,$802 y3 o  t6 {7 E1 }1 T/ q0 {
  1033. - Z$ {( s& g/ w4 Y) @; P
  1034. SKINGE_WRITE:
    * z) n- e3 n5 L7 O& A2 a+ B" G' c
  1035. LDX #$00
    & ?' ]# u. e2 [0 c, h* Y  T* W/ m
  1036. SKINGE:/ {0 N7 e" o1 j: y: I) O
  1037. JSR PPUADDR_PROCESS* t; w+ H% }$ W" {- Q# {6 Q: j
  1038. LDA SKINGE_STRING,X2 e' r' y9 G1 ^2 y9 J
  1039. STA $2007
    + B; Y8 Y" J2 W. E  R( a
  1040. LDA #$00% l0 w- [3 w/ P# j
  1041. STA $2000
    ) N% n+ e6 U* h/ ?$ S+ v: P
  1042. INC $BA
    7 ~" m2 |6 e6 v( f/ D
  1043. INX
    5 N1 v- @% g0 _  Q9 Q$ T/ x9 f( A
  1044. CPX #$07
    5 b' J% t) G, @+ w; |, g5 ^
  1045. BCC SKINGE
    ' O; G# j% p: Z% l
  1046. RTS& z1 H- U  B8 j, [
  1047. 8 @  h# j1 C# t5 f: U7 x
  1048. SKINGE_PPU:
    % ^3 ?/ p* e) }$ K% C1 B) u
  1049. LDX #$00
    7 N, P# B) p$ O3 @- P/ Y+ F
  1050. LDA #$A2) S  o8 O$ B# X% \5 |. S% E
  1051. STA $BA
    + ]0 v5 g8 ?' W7 e8 }4 Q. l8 z+ Z
  1052. LDA #$21" b3 d/ \8 A( j
  1053. STA $BB5 A( i/ d* ]9 f& V3 ]5 f* ~
  1054. 9 y$ W$ |( t( O! d% U% |9 G/ T
  1055. 7 K! y4 U, ^* j) r/ ~
  1056. JSR DN_PPU* {0 X# g- [$ m7 ~" D4 X: G4 d# h% s7 ~
  1057. JSR SKINGE_WRITE
    6 i1 `' u; h4 l2 W6 q3 j
  1058. LDX #$00
    9 _8 U0 u# q( ^' P  s6 l
  1059. LDA $07A2
    ) b. R4 D! s0 o( r5 ]3 P8 d7 r8 }
  1060. AND #$02
    ; q; n1 Y, ^8 k+ L# ]/ m1 S
  1061. JSR ON_OFF_PPU
    ' A: s8 F/ j) B5 e
  1062. LDX #$00; O1 ]) X" d, p7 z) W; a. V% I
  1063. LDA #$B12 L+ r# F. {* l( D/ o
  1064. STA $BA
    + Y$ ^$ a! r& N/ t7 s
  1065. LDA #$21
    5 A. j. D5 c( M! O: t
  1066. STA $BB
    7 R& h; T3 E8 A# ?5 Q. `
  1067. : _2 Q2 h7 f( M
  1068. : I5 G. {. A3 e1 Q; T/ ^# F7 E
  1069. JSR DN_PPU& C6 i3 q5 _3 @$ Z' A
  1070. JSR SKINGE_WRITE
    $ F+ d# p- X0 C# Q( V) X
  1071. LDX #$00/ f  X; h9 W/ W9 e' r. `/ ~0 a
  1072. LDA $07A3
    ( _) `8 F1 s; y: N  `9 z
  1073. AND #$02% {4 N6 j( A: b9 K2 u5 n, e3 m
  1074. JSR ON_OFF_PPU8 y3 s* Z6 ^& F; k! X4 u
  1075. RTS
    0 L! m& o8 O3 _, K" |
  1076. + F# @7 z: w! `( ?2 k( p
  1077. BULMIX_STRING:
    9 t4 {' R' p- _: `
  1078. .BYTE $8C,$9F,$96,$97,$93,$A2,$804 x  X3 `- n% ?  ]0 L) n

  1079. 9 {( v% V+ v4 B! [
  1080. BULMIX_WRITE:- q4 i# Z+ M/ t( w  g
  1081. LDX #$006 h# h* M: V2 e9 [$ x& N. C
  1082. BULMIX:
    8 |- j( h1 @- P
  1083. JSR PPUADDR_PROCESS
    6 x+ n  Z3 [( P& m. k4 H/ X
  1084. LDA BULMIX_STRING,X  h3 ]3 ~# R5 A; A2 t: O. d2 |* {
  1085. STA $2007: I, e, i6 A  M7 q
  1086. LDA #$00
    ) i. K* _' j; _$ c+ k6 B% O; }$ Q- [
  1087. STA $2000
    : x3 m3 v7 A6 \& q. \
  1088. INC $BA$ z; w5 W  w5 ?. M1 t$ w
  1089. INX
    4 e' t' B: _2 R- k9 X  }* D2 }! ~- n& |, A
  1090. CPX #$07: `* q+ j/ s4 o3 C/ c" s% V1 n
  1091. BCC BULMIX" A; k) ]3 q/ b; o! v
  1092. RTS/ l( {7 q# A1 X; [6 a/ v; a" A

  1093. 9 a: @$ [/ W3 b$ F  X# A
  1094. BULMIX_PPU:5 m; Z9 _$ Y. r# w5 n8 F
  1095. LDX #$00, y, M  o8 @/ X6 Y! l
  1096. LDA #$E2
    * g" h8 V# X2 w( g
  1097. STA $BA$ a+ V0 n- B3 L% _
  1098. LDA #$21
    ; S7 q# j+ O/ n  A
  1099. STA $BB+ f" Z' n# Z6 c, m2 h

  1100.   ~* B2 [" C! B& r
  1101. % `9 Z4 L7 o( _0 @+ Y3 S! s9 ^, s
  1102. JSR LF_PPU. Y0 @3 e: }6 c- ~' s( F
  1103. JSR BULMIX_WRITE
    5 r% {1 V# O* q- a4 Y! g
  1104. LDX #$007 m0 t8 H* a' ^' H8 S8 Q
  1105. LDA $07A2" P* C( G" b) `+ f# y$ [
  1106. AND #$04
    7 _3 M8 s; ~- \5 `  z
  1107. JSR ON_OFF_PPU
    + j, [( \' o+ ?1 t9 z7 K9 S9 i
  1108. LDX #$001 u& z& N- w1 q. N
  1109. LDA #$F1" f8 l; l# }) p9 K9 W9 e+ ~
  1110. STA $BA
    ) v5 S3 }& y8 @8 G4 P
  1111. LDA #$21
    ) r" v6 a& U; `* S3 i
  1112. STA $BB# D, j5 i, h) d1 c' d% c* A
  1113. 2 S, p& ?+ X, Y

  1114. & s' H7 B1 L  J) g( x8 d  g/ l
  1115. JSR LF_PPU5 ^6 K2 A$ \" n+ u, r# r
  1116. JSR BULMIX_WRITE/ C0 w3 N$ W- N/ E5 ?
  1117. LDX #$00' |7 x! H* L0 l) `1 K
  1118. LDA $07A33 }" f  j4 Z$ c! e) {: e
  1119. AND #$047 E7 N+ u' f% N- S9 W- V
  1120. JSR ON_OFF_PPU
    - g4 W1 g2 ?0 _  B
  1121. RTS
    % {" B/ m4 m8 L5 H% Q' y
  1122. " D& Q& u5 G! x( A8 J
  1123. ENELOC_STRING:
    9 T, u3 @! L+ J6 ^. ~1 X
  1124. .BYTE $8F,$98,$8F,$96,$99,$8D,$80
    $ X; p* }$ k9 v% B# \! v

  1125. 8 ~( W) y- K% V+ Q+ s
  1126. ENELOC_WRITE:; v! Q! Y& x! d+ S1 [, `) E8 ~  K
  1127. LDX #$00* S" [) a2 ~% B7 [" d& i
  1128. ENELOC:
    ; _! a$ \1 w( T  l' R; E
  1129. JSR PPUADDR_PROCESS
    - _6 \0 p% q9 y1 R' ]9 N/ d
  1130. LDA ENELOC_STRING,X
    ) w# H' p" d6 I: A8 a
  1131. STA $2007$ b" W6 y. o) `. }
  1132. LDA #$00
    5 a; Z1 M+ J3 ]1 [! `2 g6 Q8 K$ _1 s' Q! w
  1133. STA $2000
    . A3 ]3 z2 P% e! L* B
  1134. INC $BA
    . [. E1 Y6 [- D- l9 k. {6 c
  1135. INX
    ' W( W/ j' `, m# p+ ?0 z
  1136. CPX #$07$ K# {' @+ e7 B2 u
  1137. BCC ENELOC- n3 u( N5 {# k  B+ G* `. ^
  1138. RTS+ N% J# b8 K" o% c* k( t
  1139. * l, z* i/ T* I4 L, `  |5 [$ h9 J
  1140. ENELOC_PPU:
    4 U0 ^7 b6 h5 {6 d' ^. x) E/ h5 W
  1141. LDX #$00
    1 f8 P" Q' c/ ^) ?! @$ C
  1142. LDA #$22
    ; \- K. I7 x' b* a% N8 @( c, Q* o
  1143. STA $BA3 `* b$ H7 r8 M0 Y' ^0 d
  1144. LDA #$22
    2 I+ R& A- U$ R2 Z5 b, O" G
  1145. STA $BB
    ( H  P" E7 M$ @9 f

  1146. 4 d/ ~$ L0 S& @% ^0 M3 g3 ~

  1147. 8 n& k8 ], r! }1 P
  1148. JSR RG_PPU5 a3 D' U' n, P7 Y8 _# L
  1149. JSR ENELOC_WRITE
    : ]! w# C4 y# c! z) X$ c; l
  1150. LDX #$00
    3 M* B+ d4 @1 L1 {
  1151. LDA $07A22 R! X6 H6 q, B" x- ]$ {
  1152. AND #$08
    3 b* |8 Q+ K6 [6 k  W8 z1 t1 d
  1153. JSR ON_OFF_PPU
    : u; G9 g6 E* ]2 g$ Y
  1154. LDX #$00! _* B# t, \; K1 Z  P* Y
  1155. LDA #$31
    * X6 A  z: N+ K
  1156. STA $BA, J' E- {0 f4 n- o# `$ s
  1157. LDA #$22. v/ B- n. i; N7 i
  1158. STA $BB
    # G* g) h* v, Y& l7 G4 {: k

  1159. / p' D& Z) s" V6 ^
  1160. : F9 S' F3 s: I4 y$ M! f5 H
  1161. JSR RG_PPU
    9 Z5 q9 g1 I0 Q' m
  1162. JSR ENELOC_WRITE  f5 @5 {1 A, r' {6 U+ ]
  1163. LDX #$00
    . j$ r3 m5 f6 z
  1164. LDA $07A3* i" J1 C1 q7 I7 m
  1165. AND #$08/ u/ M% R, @2 \4 y1 K& }) @
  1166. JSR ON_OFF_PPU
    - F: J) b; ?1 g
  1167. RTS
    ' d5 O$ z' O3 d% v

  1168. ) s8 W/ i- @+ o4 n9 ^
  1169. FOCFUL_STRING:
    7 J# ]- x9 a% a3 h
  1170. .BYTE $90,$99,$8D,$90,$9F,$96,$80" `- Z7 z( R) ^1 y9 n8 ^
  1171. & l4 {  X9 u4 ^0 p

  1172. # j: `8 h* Y2 {) ^  @. x% _
  1173. FOCFUL_WRITE:
    * p# Y' d( a& {6 N/ i4 x, k
  1174. LDX #$00* _5 z3 W4 K/ j% m0 O
  1175. FOCFUL:
    ) B- }* Q- d* K+ c3 c
  1176. JSR PPUADDR_PROCESS
    5 i$ q; L/ M5 u! E7 L0 Y
  1177. LDA FOCFUL_STRING,X$ n& [6 o$ `/ z0 ~0 N
  1178. STA $2007- X5 N! s% `) O) }+ N+ E
  1179. LDA #$00
    2 T; G1 C1 ^$ p0 U
  1180. STA $2000
    9 o+ W! o+ c+ S: w0 K9 q5 p
  1181. INC $BA/ k" V6 @; S* u" n: @+ Z# O6 ^) U
  1182. INX
    $ k# \0 }1 T7 N( a5 V
  1183. CPX #$07
    - t% O& x8 w, |3 \- H/ b8 Z
  1184. BCC FOCFUL- k, `# S! e0 D! r8 Z8 `' J2 T
  1185. RTS
    4 q3 D3 k# V5 O& m  `, f

  1186. 0 u, {  b& b+ ~) @1 U
  1187. FOCFUL_PPU:
    6 T4 G+ p; [1 k. f' z0 u7 G( M
  1188. LDX #$00
    . s( u$ H& v" {4 Z2 k6 u- U6 r+ x
  1189. LDA #$62. s3 w* p; P6 l' T8 U) b6 p8 F
  1190. STA $BA4 u$ _. q1 j) s
  1191. LDA #$22
    ' u" V' h1 p& N* f7 @! `& C
  1192. STA $BB
    8 v/ W/ q. J' b4 X7 L
  1193. ! [  A3 ^" L3 ~# v* j

  1194. 8 T. \  N  W3 j6 U
  1195. JSR B_PPU
    & P' v0 f1 W% a  @7 C; L- q; y
  1196. JSR FOCFUL_WRITE6 V$ d4 ^  |* [" d. y1 U, x
  1197. LDX #$00
    8 P8 B0 z! K/ ^6 L
  1198. LDA $07A2
    , a1 q; T# z! r) D6 s$ o9 K
  1199. AND #$10) h$ i$ g; A5 R- T7 h
  1200. JSR ON_OFF_PPU
    # c0 ?* r" w) F3 l6 O
  1201. LDX #$00  B6 M. }$ p# Z' Z
  1202. LDA #$71
    ! M$ f) ]0 @) A1 W, g
  1203. STA $BA; c9 j4 F/ Q9 h/ l8 R2 Y
  1204. LDA #$22  W5 i7 c! G/ U# d
  1205. STA $BB$ ?; p* f7 \! E6 T( G5 E& m3 b

  1206. " \% R5 F2 @, B% I
  1207. / S2 ~9 T; e+ P% i5 o
  1208. JSR B_PPU
    8 g$ k: B' j  ~, W2 V
  1209. JSR FOCFUL_WRITE
    " t6 j2 C+ V& j% f! {8 ]5 S8 z8 a
  1210. LDX #$00. `# W) z6 Y0 D2 a8 }% x( h
  1211. LDA $07A3
    ) Q0 |; L0 Q/ A- S. ]
  1212. AND #$10
    8 I4 b! ?6 T* \. v) q0 D
  1213. JSR ON_OFF_PPU0 K7 O5 u1 v# R8 a8 ~4 q8 T2 C. a: ^0 d
  1214. RTS
    3 {! V% l* l* @: X/ a  |

  1215. 0 R& |' Y- p0 t8 }# D$ M7 E
  1216. BULCON_STRING:
    * e0 i1 H, J9 Y; i
  1217. .BYTE $8C,$9F,$96,$8D,$99,$98,$80
    6 m( R+ `* \/ R% H# [
  1218. - v2 \3 d( Y6 @! Y

  1219. $ H3 E# h* \: G5 _, N3 C
  1220. BULCON_WRITE:3 E5 u- {9 w* \
  1221. LDX #$00
    8 ?" y) }+ b/ g, U
  1222. BULCON:
    5 f6 j: B" \) r7 A  b
  1223. JSR PPUADDR_PROCESS- \" c( K' U: n$ S
  1224. LDA BULCON_STRING,X
    9 @4 T& [+ l" W3 F- z. a- W* {
  1225. STA $2007
    * d* ?) m. t. i
  1226. LDA #$00
    , e& F/ A3 G9 u4 F+ E
  1227. STA $2000
    4 H5 D3 c2 E; i# ?2 s$ r
  1228. INC $BA8 |" u+ `2 b% {7 P0 u7 q
  1229. INX
    5 X% E" V+ g$ G, R  S  p3 I
  1230. CPX #$07
    * c- ?9 D2 `1 ?" r
  1231. BCC BULCON+ [9 I/ N1 ?4 \# c; O& a7 s
  1232. RTS8 `, W: t7 @5 ^7 R

  1233. 0 h4 k! @+ t2 g) n  ~4 I& @
  1234. BULCON_PPU:# y$ i3 D$ u1 T' D- ]7 n8 I
  1235. LDX #$00
    % K5 o1 ^8 D) H8 ~
  1236. LDA #$625 N& q3 r2 n- f! g$ n
  1237. STA $BA
    1 w  T3 \" p) K4 g5 ~* p
  1238. LDA #$21/ O  P+ C: J# Z! q8 X5 x
  1239. STA $BB) i' |) ]) F9 h6 s7 B. z
  1240. 4 z: ?7 e) `+ h8 U

  1241. 3 `# i( u+ U4 h; P9 @  I# A
  1242. JSR UP_PPU
    ; O( W8 Q: }" J4 H9 b6 t8 a" b3 n
  1243. JSR BULCON_WRITE9 O! R3 B" Y! P7 ~' _* d2 P% l
  1244. LDX #$00
    6 K5 c  K! L2 |7 V3 E0 r' l
  1245. LDA $07A4) i% X' i, g8 ]0 }. V; C  |
  1246. AND #$08+ W# G7 A) |8 W! r; X
  1247. JSR ON_OFF_PPU& O' O# Q" d+ A9 ?& ~6 C
  1248. LDX #$00
    ( H8 D6 J' p! Y) g+ P
  1249. LDA #$710 E+ d" R& z9 V: A
  1250. STA $BA
    2 ?+ p3 S% h# ~
  1251. LDA #$211 m2 _* B  k) K6 {3 t
  1252. STA $BB
    1 b" E! O2 r. \8 _6 ~, B
  1253. / B9 Z# i+ i6 Q4 g  e

  1254. 9 N5 `5 O$ [4 X6 r/ d7 o
  1255. JSR UP_PPU
    " b& r- G" a1 i5 f
  1256. JSR BULCON_WRITE1 P! M# G6 L0 J$ ]
  1257. LDX #$00
    ' E; N6 n/ u+ N
  1258. LDA $07A5
    . T4 C6 x( g" g/ N' q
  1259. AND #$08- x/ g) `" i6 m! Y) i8 n' O
  1260. JSR ON_OFF_PPU
    + p( T0 g- s7 k' g# H' S" m8 P
  1261. RTS% O) P# H/ j7 i( q0 O  H; {. s

  1262. 6 P  w5 F% \# }7 Q( F& c
  1263. SPEBUL_STRING:
    6 Y# _6 x3 a( a5 [
  1264. .BYTE $9D,$9A,$8F,$8C,$9F,$96,$801 [: o+ y! O0 W" D1 |
  1265. , p8 t( d% y8 P/ z

  1266. + T- W0 l7 ?* W, H
  1267. SPEBUL_WRITE:
    0 h' r* x; ^! J/ u0 a
  1268. LDX #$005 P2 q& i0 |" D) w/ e6 Q
  1269. SPEBUL:
    . s4 k" ^  G+ Z$ h; K
  1270. JSR PPUADDR_PROCESS
    . Y8 L9 n5 J6 @6 t' x5 w! y# w) N
  1271. LDA SPEBUL_STRING,X
    * N6 K) X6 Q: V+ _. D. i
  1272. STA $2007
    # b- l* c$ i( W) S. H+ T
  1273. LDA #$000 O' _) E% T6 W5 E3 U1 v$ @
  1274. STA $2000
    : h1 s4 r) P! b/ l! C5 d  A/ C
  1275. INC $BA
    : `* s1 p( `1 ]0 Z" r; ~/ [0 p
  1276. INX3 j; B4 a- C5 _" U# Z. G
  1277. CPX #$078 B6 G& C5 s* e) i* K
  1278. BCC SPEBUL
      D; G1 ~1 B' B# g1 j, |/ X
  1279. RTS3 C7 O3 b  _5 p4 I8 g0 O

  1280. : }" X5 _7 w  N6 u, O4 d
  1281. SPEBUL_PPU:
    / [. n: a/ ~& M( e( D
  1282. LDX #$00
    ! @& e4 R; J& {% }/ d. n# i
  1283. LDA #$A2' g3 S7 _8 {  u
  1284. STA $BA
    7 K3 k: l. V5 N- \2 z$ o; U" R+ @
  1285. LDA #$213 ^6 g3 S1 C- f% w  ~
  1286. STA $BB
    , @; D% f5 [- G) ^( Q

  1287. ( S8 [0 T$ b9 \. H) T/ I3 i/ n
  1288. % \/ n# G) I+ S' D% b
  1289. JSR DN_PPU
    + F# ~) q( `+ H4 ?
  1290. JSR SPEBUL_WRITE# \  p+ r$ I  z/ S$ z; D" v
  1291. LDX #$00
    ) S) p, u+ }* f$ n6 F
  1292. LDA $07A45 v, J& k/ _% f% _$ I
  1293. AND #$027 [- O$ o& B0 F1 f1 i
  1294. JSR ON_OFF_PPU
    $ Q$ Y) i* K6 u6 V
  1295. LDX #$00
    ) Z3 ?9 v- A/ ]( ^+ q) B7 @. n+ D2 a
  1296. LDA #$B1  g* e: d  y9 e/ ^4 A
  1297. STA $BA
    # W. v) t, r, Y4 ?+ Z
  1298. LDA #$21' V0 t7 ^  V' X' ?/ }  `0 F
  1299. STA $BB
    7 S) m# Z; L( j

  1300. & p# _7 \4 d7 q, `. a" j

  1301. 6 p( s* _: ^" k+ D* u/ c8 S+ D
  1302. JSR DN_PPU, E9 y/ J% X1 G% V
  1303. JSR SPEBUL_WRITE
    8 t; |, h. f& w- E4 n' ^6 b
  1304. LDX #$00$ O9 `1 y" |! n7 w& z" S
  1305. LDA $07A5
    * @+ Y5 D) m# {  N  s# f; G
  1306. AND #$02
    - N* W7 l1 ~" q% b, E+ x4 ^
  1307. JSR ON_OFF_PPU( T9 R7 F( y, t- |. I: j2 }
  1308. RTS7 Q6 B# L( L5 ]  {* s2 H' T

  1309. ; w" j; c* q' C5 d# ^: s# J
  1310. .ORG $A5004 v" X6 ]2 M! V' g; {' V
  1311. CLEALL_STRING:
    + {* i" x4 O* [, V2 O/ ~, N5 v, {
  1312. .BYTE $8D,$96,$8F,$8B,$96,$96,$80* k1 N5 }1 `: c" m) V* y7 V3 d

  1313. # s3 p1 I! j$ M: Y/ w+ ~& d
  1314. 9 q* a1 |4 D1 Z- v. \, _% v3 i
  1315. CLEALL_WRITE:3 m& x2 l4 n3 C' C
  1316. LDX #$00
    , r5 O3 X" e! c' k" b7 R  V
  1317. CLEALL:
    5 `0 z% f& I, U( \
  1318. JSR PPUADDR_PROCESS
    - V, L0 {- _- }  [4 P. y" y
  1319. LDA CLEALL_STRING,X* K* ^1 T  R" p+ ?
  1320. STA $2007
    : C5 t( M9 r. g
  1321. LDA #$00/ h; l, T% n* s; j$ t, t
  1322. STA $2000
    ( \, F. J5 Y6 b, L' Y
  1323. INC $BA; D2 j, |! h0 F5 e. ]! g% J- E
  1324. INX
    ; T% X% R: l; H. @
  1325. CPX #$07
    7 f$ @) I+ H% h
  1326. BCC CLEALL
    9 g6 f8 \' {, h$ W+ W+ j" f+ u
  1327. RTS- k. {1 N2 y; s  v
  1328. 2 [% T- I9 v# X
  1329. CLEALL_PPU:( j7 E9 Z. S; N' l
  1330. LDX #$00! c: _- A. ]# I5 O7 _& [
  1331. LDA #$E2
    3 @3 g" r$ w$ s$ x. ^3 e1 a& K: r
  1332. STA $BA7 M) V' E- |( M; O1 {  {- s9 s" N- j
  1333. LDA #$21
    3 I+ ~' t" A, z+ d; ^; _" d6 f
  1334. STA $BB
    / J2 q1 j2 m* ^6 ?

  1335. 6 M* s7 R# O4 j  Q+ U! U
  1336. + t8 X* \) u4 y1 _3 I
  1337. JSR LF_PPU
    1 x  B" `: ?  x9 P
  1338. JSR CLEALL_WRITE$ L0 a$ i7 G7 g
  1339. LDX #$00
    : v6 b# C5 d1 E' r$ R
  1340. LDA $07A4
    2 @- R7 A3 I8 R7 e1 X
  1341. AND #$04
    3 y- v. g" ~: i2 E
  1342. JSR ON_OFF_PPU  c# u* u$ g5 Y* q, g
  1343. LDX #$000 d# F: t6 d' a. O4 ~
  1344. LDA #$F1
    ' E9 F# r$ p0 u7 i$ X; `! X2 F
  1345. STA $BA$ B7 B* x# U5 \: G5 i. Y7 _% x* W
  1346. LDA #$21
    5 c( ^+ t5 X* L, R% ^
  1347. STA $BB; h) p+ }( N7 u+ ~/ Q2 t6 u
  1348. 8 b9 w' c8 y+ C, Y9 H7 V7 U" L
  1349.   G5 o4 c8 \4 |2 d- J& |  f1 z
  1350. JSR LF_PPU8 d6 j% J4 ^( V$ h. z0 N5 _8 K
  1351. JSR CLEALL_WRITE
    6 w% l7 e7 `2 g- ?( |9 v5 J  J# N
  1352. LDX #$00
    ( ^5 `' [0 D1 x6 x7 y% B5 Q; z
  1353. LDA $07A5" S6 i! Y6 L' M% h7 r3 ?
  1354. AND #$04+ v1 |3 T$ n: x0 w
  1355. JSR ON_OFF_PPU( ]5 Z% ^& z  g8 R4 x% E. x- H  R4 p
  1356. RTS6 y2 z7 U7 @- _% v. z
  1357. ! T& n7 U9 N) a; Z9 m$ f
  1358. HARDMODE_STRING:0 N( _' R2 l9 A$ r
  1359. .BYTE $92,$8B,$8E,$97,$99,$8E,$80
    & w9 q% e, D9 D

  1360. 5 {7 z  z1 i4 ?( Z$ d% ~
  1361. ) l' @+ \' M6 J  s1 x2 P, B3 z
  1362. HARDMODE_WRITE:9 r: W- }  u! {; @/ k' B% E
  1363. LDX #$00) _; w) j: Y. i4 c
  1364. HARDMODE:
    # A# |- A& G7 K( ^$ N1 F  |
  1365. JSR PPUADDR_PROCESS4 Y3 x6 B. _+ x# b0 B8 C1 C! ]+ y; H
  1366. LDA HARDMODE_STRING,X  x; T) S7 y/ g9 n, K+ C+ P& ?
  1367. STA $20070 J( Q+ E  b3 [2 @1 _& H
  1368. LDA #$00
    3 V, W+ Z& S" C& V8 {/ ?8 M
  1369. STA $2000
    & b9 Z2 ?* h6 V# [/ Q8 U' c% L# m0 M
  1370. INC $BA
    * J; U/ p& b, w6 Q$ W
  1371. INX
    : ?, ?" m1 ^& N& D4 d. z
  1372. CPX #$07- }+ a$ W5 g7 O, N/ \- @* a& c
  1373. BCC HARDMODE
    7 s( `# R% ~* t2 c
  1374. RTS
    / Q  H( @9 ]2 Z- \, E
  1375. / d! n: y  S$ l4 z
  1376. HARDMODE_PPU:
      {9 t1 i( f! N6 Y  G
  1377. LDX #$006 F9 i! Q" J+ h
  1378. LDA #$22
    ( G: G& A8 P* I! C0 ~) r
  1379. STA $BA2 t& e6 I. V8 |) [- ~, p
  1380. LDA #$22- X8 D( Z  Z4 K0 d; I, b9 c
  1381. STA $BB
    & ?; v( y) B. ^' h; |
  1382. JSR RG_PPU& I8 L( R$ C; n( h& c8 z; I
  1383. JSR HARDMODE_WRITE
    % b/ _+ G+ Y: b! K
  1384. LDX #$00
    / |" B5 B( T" A4 e" }5 J$ L
  1385. LDA $07A4
    $ O# s4 }2 J1 U/ w  ~) Y3 W
  1386. AND #$014 Q" W" {/ w# d
  1387. JSR ON_OFF_PPU/ \, v  T) \9 \- H
  1388. LDX #$00
    # F; o% R2 x% F! n6 k! c
  1389. LDA #$31
    7 H: ~/ G9 Q$ l7 m% Z# W* n
  1390. STA $BA
    6 f  @+ Z8 S% q! p7 W+ W
  1391. LDA #$22
    0 t; k. z( f9 W. Y1 F
  1392. STA $BB8 j! u, w1 f* b; A4 K6 @0 A

  1393. 9 x9 i2 m2 x. I
  1394. 3 P* r" P7 I- n
  1395. JSR RG_PPU/ d. j( [$ V9 n
  1396. JSR HARDMODE_WRITE
    . u$ o/ _! G6 G* X" z
  1397. LDX #$00
    9 d' r* h' S8 c
  1398. LDA $07A5
    # F! K, X& e% F- k. Z
  1399. AND #$01. Z0 M$ ^, D) H
  1400. JSR ON_OFF_PPU
    " T6 d" l; L7 ?) V9 G
  1401. RTS
    % b/ j1 S- p% O6 c9 D
  1402. ) ?& o! s6 x- ?- l  H' A- `# Z. ]) r$ W" u4 R
  1403. B_TO_JMPSTG_STRING:
    7 k% o# h, j$ b6 k2 K4 i8 L; B
  1404. .BYTE $80,$8C,$80,$9E,$99,$80,$94,$97,$9A,$9D,$9E,$91,$808 S' m1 {3 l5 Q. \, |/ L- F# ?

  1405. + y; M' b0 Y9 Z7 G1 h& c5 |

  1406. : F1 q( l3 Z8 y8 P" ~- h3 }
  1407. B_TO_JMPSTG_WRITE:5 p! X: g0 \$ x( y
  1408. LDX #$00
    , [* m& a( ^7 Z- V: K- U1 U
  1409. B_TO_JMPSTG:
    0 i( L  [# K6 W7 d& B
  1410. JSR PPUADDR_PROCESS/ L. z4 l/ C9 ~
  1411. LDA B_TO_JMPSTG_STRING,X1 w  k# h9 ~2 b8 ]) m( L& ^( `
  1412. STA $2007, K0 @; E, G6 P/ [* b& }
  1413. LDA #$008 `1 T3 B: s  y# @7 h! G) A
  1414. STA $2000/ y; V8 H: S  k
  1415. INC $BA
    8 G. l+ W& `/ r7 m: d4 _* m& s2 D
  1416. INX
    5 ~! l6 x' A: R  a* u
  1417. CPX #$0D
    : A! c8 t1 M/ h* W" D
  1418. BCC B_TO_JMPSTG' B3 U& ^: l' ?) w
  1419. LDX #$00
    & x1 ^$ R/ R6 [/ e1 _
  1420. LDA $7FE0
    8 |4 X2 t# p, n& I9 L
  1421. JSR ON_OFF_PPU
    ( {7 A4 p! d) M% t7 F, z
  1422. RTS
    / @  z. o5 u, E
  1423. 3 M/ h' a  |$ P5 W. W4 p" f* d
  1424. B_TO_JMPSTG_PPU:4 X$ x4 `1 Z6 M8 i" Q9 L
  1425. LDX #$00
    " Q5 Q2 ?2 T+ Z
  1426. LDA #$68
    ' m  v) W. q$ G6 U$ D& `& \1 \$ x
  1427. STA $BA
    0 g3 O0 i) D7 E% |5 h0 e5 z
  1428. LDA #$22# b/ E) Y( N! ]* S2 |
  1429. STA $BB( @& d$ t5 Q- P4 G# M5 w1 ~( ~
  1430. JSR B_TO_JMPSTG_WRITE- P$ o6 v9 z5 @$ ]' h8 L: p
  1431. RTS! ~( e" {6 w9 m; ~  @1 n

  1432. ' V7 x0 {/ f/ x* P

  1433. 6 H% y" ]- l' w1 f* Y2 r" K" m
  1434. A_TO_PLAMOD_STRING:8 N- Y$ m; i& ?" X9 ^& N
  1435. .BYTE $80,$8B,$80,$9E,$99,$80,$9A,$96,$8B,$97,$99,$8E,$80
    & Z3 |  E* m8 E8 P0 b  W
  1436. + m2 C- m, U$ l6 y7 z
  1437. ; O5 b- G5 E1 P2 q& j( |1 `
  1438. A_TO_PLAMOD_WRITE:
      j/ H7 u- o4 R6 G) K& x
  1439. LDX #$00' Q" j' u$ }6 }5 o# [: d8 Z7 Q  |
  1440. A_TO_PLAMOD:4 X& _) g2 p$ c- [1 t9 V  Y* g' X
  1441. JSR PPUADDR_PROCESS
    1 x, F0 }' X5 N5 Y) g. q4 ]
  1442. LDA A_TO_PLAMOD_STRING,X
    1 f% f$ W* p8 M/ Y* {
  1443. STA $2007
    4 [3 v3 s8 A; V  u
  1444. LDA #$00+ U" T* ~' m% N
  1445. STA $2000- D- O$ g8 p+ T: r' y2 Y
  1446. INC $BA2 z8 g) B+ B4 z. U: C& C
  1447. INX
    ) z, ]( Y  w  x
  1448. CPX #$0D& z/ q( [# }9 n  y
  1449. BCC A_TO_PLAMOD
    2 N9 C. e% H. R% f  C+ r7 g3 [- X
  1450. LDX #$00
    / u, E  n; p0 p# d( O& O
  1451. LDA $39. b: c/ ^8 T# |3 w  C$ k. R5 W
  1452. JSR ONE_TWO_PPU; |+ W+ @* m% M0 B' i7 H
  1453. RTS
    - v- E9 o, c3 L# K4 ^

  1454. $ |( T0 p' p9 e$ Z1 ]' b
  1455. A_TO_PLAMOD_PPU:
    4 c" r1 Q* f0 V  V
  1456. LDX #$003 ?7 }/ ?) O) Z" e0 `! Z
  1457. LDA #$A8; l3 _( n* f: V" w5 ~
  1458. STA $BA
    ) `, x) D4 M" O8 G
  1459. LDA #$22) H6 X2 D9 R( T5 e5 ?! ~& R
  1460. STA $BB) A# z- n- m! |) Z
  1461. JSR A_TO_PLAMOD_WRITE
    " D( s# O) V+ D9 ]& M4 q/ M8 Z4 |
  1462. RTS
    ! O& s& I4 Q1 K/ C+ b

  1463. ! Z! b0 M) n" }# g2 u! z
  1464. MOVSPE_STRING:
    2 [, f: B9 x+ y% A; ?$ j1 X$ K
  1465. .BYTE $97,$99,$A0,$9D,$9A,$8F,$80
    ( p; Q- |6 L6 T

  1466. / I8 M1 i! O* W2 o$ ~: l$ ~! B
  1467. 5 m5 t; K- P( W, m, q; D
  1468. MOVSPE_WRITE:
    + q  ~9 m6 ]; j1 ~
  1469. LDX #$004 a& O, a. ~. W- f/ J
  1470. MOVSPE:
    $ Y, x- L( k& @1 Q& b2 @
  1471. JSR PPUADDR_PROCESS5 X* z% Y& K0 D8 U9 |
  1472. LDA MOVSPE_STRING,X
    # K* t* D* g" P$ M" G: G: c
  1473. STA $2007
    , P1 o- N8 Y5 t6 D- G
  1474. LDA #$00
    . [( k5 S) z# I( f; \: p* W
  1475. STA $2000
    - l) M) n+ O. \" ]6 ^( ~2 H
  1476. INC $BA
    * H: K. H; P/ I* K; R9 r8 K: n7 [
  1477. INX
    . s6 L- g0 C5 k
  1478. CPX #$07
    8 M) _3 H% R4 e. b; O, H
  1479. BCC MOVSPE/ `4 ]( T0 f" P, v* T6 u
  1480. RTS& \5 c/ X8 m( v( |

  1481.   A9 Q, |4 x% X! z1 {- \0 f* V$ U
  1482. MOVSPE_PPU:
    # ^+ z3 {; Z+ j( ?; \" ^) d  U
  1483. LDX #$00
    - Q) g( A3 W! F# n! I
  1484. LDA #$69
    % x* ~# C/ j: [) B% J
  1485. STA $BA3 \" t, e; M* q
  1486. LDA #$21
    " Q6 t( P2 Z9 d% [% q7 W7 j4 ^1 F
  1487. STA $BB+ o6 r' r7 c( i- g5 s
  1488.   F' Y+ P' v: ^
  1489. 4 f0 K$ V+ q( V+ j9 M+ @
  1490. JSR UP_PPU
    9 R9 E, E8 v0 {
  1491. JSR MOVSPE_WRITE$ B, ?  l- g. c
  1492. LDX #$00
    ) v* ?+ q6 _  V
  1493. LDA $079F1 t' _( D7 R: k
  1494. AND #$082 S5 r1 y( c& X. X! e: _/ U
  1495. JSR ON_OFF_PPU9 M9 I& F9 R, K3 x, C
  1496. LDA #$80
    6 m( U" l. Z4 V9 w  I* L: m1 Z
  1497. STA $2007  @( T7 a% j# \* v1 r0 n
  1498. RTS5 i9 `8 z5 ^8 M- r8 I

  1499. . w4 ?; a; ]8 d; C
  1500.   ; X. J/ _( [: _/ A
  1501. UNLJMP_STRING:
    / g/ z! n: q1 Y1 c6 D# m
  1502. .BYTE $9F,$98,$96,$94,$97,$9A,$80
    ) f2 a1 O% K' n. V: a; j& M
  1503. 2 ?) I) D/ `3 l1 J' w- O' o. r1 k4 F

  1504. . ^/ m" ]) E4 c' U4 w1 J
  1505. UNLJMP_WRITE:3 C1 P; R( M1 @
  1506. LDX #$00
    ! n8 g* z  {( d% W$ p
  1507. UNLJMP:
    6 B9 \  b  d4 }$ @8 o3 P$ d
  1508. JSR PPUADDR_PROCESS
      \  r) v6 |' P: t/ L
  1509. LDA UNLJMP_STRING,X, [8 }2 I, h3 }$ F* |2 o! ?0 ^" H
  1510. STA $2007+ y. ]. A& p7 q8 ]7 I3 A  {% n# V
  1511. LDA #$00
    7 @, r8 A, m! [+ Q8 b. U' G+ U* I
  1512. STA $2000
    & y6 q; J5 b9 ]$ T; M
  1513. INC $BA  ?& ^# c1 ?' ]  Y
  1514. INX# E! {. K/ J, y7 }! U
  1515. CPX #$072 }6 P- v% m9 M
  1516. BCC UNLJMP4 }) @% M, q2 K$ X" G
  1517. RTS7 y" c; o: h( e$ R2 }

  1518. 2 ]6 E' q& k5 e# k' |4 f
  1519. UNLJMP_PPU:  x/ q- ~& k3 J( N1 S
  1520. LDX #$00$ `& |' G8 F3 E. Q* p
  1521. LDA #$A9
    5 Y8 y, G2 k# |( k+ [2 `/ q0 g
  1522. STA $BA
    . r8 O5 n5 J0 s& G
  1523. LDA #$21
    # h5 r; z- X/ r& j( ?% k: _
  1524. STA $BB
    - U6 B9 l! C/ y3 O7 G- d
  1525. * j8 B6 [' i4 U  j% W0 t

  1526. # e2 Q( F3 z  Y" O1 w- X3 n
  1527. JSR DN_PPU
    7 b" h8 B  a. U6 v# `0 `
  1528. JSR UNLJMP_WRITE  V2 o* Z. y1 I# C
  1529. LDX #$00/ Q/ _( E& y; y7 O
  1530. LDA $079F' E5 [4 S+ X# ~% V& ?
  1531. AND #$043 o# F& M5 H; s- E0 q7 f
  1532. JSR ON_OFF_PPU0 h' P' p2 N1 }% C0 x" d
  1533. RTS
    5 t' |! j) S  J0 O' b4 B

  1534. : u3 |* ]3 z8 L: M4 ~  M. O" Z7 R

  1535. 1 N2 W8 e0 {' R, K8 N) }" [
  1536. DESTRO_STRING:, ~; u! ?. t5 O  ~! j" |
  1537. .BYTE $8E,$8F,$9D,$9E,$9C,$99,$80
    , U6 X, t: J7 C9 y( |; F

  1538. 2 j* g# q6 d, L. x, {1 M2 Y2 ~. t
  1539. ! G# J; F: q( f; U: B- O) k. A
  1540. DESTRO_WRITE:4 ^0 i" B1 X- d8 M* p% M0 o, c* B- B
  1541. LDX #$002 N  z  G6 m/ W7 P
  1542. DESTRO:$ U, Q- H. p" Z7 S* t) g% V
  1543. JSR PPUADDR_PROCESS( h% x; f+ k. ~! c: R- H: J
  1544. LDA DESTRO_STRING,X( a# v' J3 m$ d9 b
  1545. STA $2007
    ( E2 k8 V- h$ A. f$ H) z
  1546. LDA #$00
    9 `2 m0 T$ X& ^3 ]: q$ u
  1547. STA $2000
    % d# n  q( v- {5 M7 B
  1548. INC $BA
    ; [) s0 t& O* K% E6 t; N" v
  1549. INX! b: E! F5 E1 F6 {
  1550. CPX #$07
    * w, [8 _/ D! [
  1551. BCC DESTRO+ s, w6 K4 N% ^/ a5 k: Z; _2 i! r
  1552. RTS7 s" k5 r- R; y) x, O0 @6 h( i% t
  1553. 2 b4 S% x) w1 K1 T& ^* q5 U
  1554. DESTRO_PPU:
    : s+ _. V3 O' v$ }
  1555. LDX #$00
      Y4 @& d2 g5 d& R! ~
  1556. LDA #$E90 [/ |; X0 x  P/ X, L* t  T2 M8 A6 [
  1557. STA $BA
    ; Z& J2 ~* d, z2 ]& |8 |( P0 B& C
  1558. LDA #$21
    ! d& W: d9 z8 L2 S1 a4 E
  1559. STA $BB
    - H; F$ |' u% p4 a$ I, t( O' n
  1560. . b# k- _0 I- a# v

  1561. ' Z4 d% ^* B8 t- v' Z3 |
  1562. JSR B_PPU+ K( i4 O# Y! X* x% E) }& C' x
  1563. JSR DESTRO_WRITE9 t6 m7 B% N' o, y+ z, w8 G
  1564. LDX #$00
    1 v% L4 R, c9 j; \& T8 a. K
  1565. LDA $079F
    & j+ G% \. B# z, \4 U
  1566. AND #$40
    + M- m# F* |/ ~
  1567. JSR ON_OFF_PPU  k* T) @9 o9 u) O9 A' K/ L8 r2 Q
  1568. RTS
    & _7 d+ _" d) F% W9 S! n
  1569. 1 O& `5 u4 `  g0 L3 S/ \& {

  1570. 7 z+ M; Y: G3 }/ k$ h
  1571. EQUBUL_STRING:: O! r3 H/ A6 f* e% J
  1572. .BYTE $8F,$9B,$9F,$8C,$9F,$96,$80  Q7 U; c9 Z1 \# q& U' p8 O

  1573. & {: Z+ H6 f; x5 \

  1574. 8 ~1 H) x2 b! ~3 D  n3 f
  1575. EQUBUL_WRITE:
    8 [' a( I3 S  ]8 G4 c5 R5 {4 Z6 x
  1576. LDX #$00
    3 ~) X, ~7 ~8 K6 v: S% c. Z
  1577. EQUBUL:
    ) i4 P9 ?, Y" C. R( X( P" |; f
  1578. JSR PPUADDR_PROCESS
    5 c7 Q6 O0 |% D9 Q, ]* @7 v
  1579. LDA EQUBUL_STRING,X
    ! T9 C# D8 i- _2 l+ {5 Y
  1580. STA $2007
    $ m9 p7 S0 w  X5 i* b: {2 s. R
  1581. LDA #$00( E/ [' A7 ?6 g0 ~# i+ ?; B
  1582. STA $2000
    ; p) X/ Q& ~( _% s. `0 R4 [
  1583. INC $BA  m1 V$ w! m  K( y, l- a; q- F7 E
  1584. INX
    ! e9 @0 {- a3 Q& K# [7 X& _  \3 ]" ^
  1585. CPX #$07
    * ~; q2 V3 d9 r, `9 E, O! B
  1586. BCC EQUBUL9 Q0 a0 ^" F% [% Y- @
  1587. RTS# u" p. ~3 g  J9 }8 ?# }5 Y
  1588. 7 h4 F9 q: _; F, i
  1589. EQUBUL_PPU:# ?$ P6 R. e' Y5 b) @& f
  1590. LDX #$00
    # q5 V, J7 k5 f( n# d) T
  1591. LDA #$29
    ( Q+ O& d$ ~! `  H
  1592. STA $BA8 G& J$ H) W7 k* Q8 {( }/ F
  1593. LDA #$22
    2 w; M3 A6 Z3 |) U, B- G# `& R
  1594. STA $BB
    : p2 F0 k! B9 }+ s" p  [( V
  1595. 7 i+ W$ G: N3 E' K. X7 s7 F

  1596. ! H, H, H( D, h' o" a6 e& M9 N
  1597. JSR A_PPU$ Y, G' u2 Z$ ~7 s
  1598. JSR EQUBUL_WRITE% a5 y( s: _- c( R" w
  1599. LDX #$00
    ; I6 Q4 A9 B, A2 A
  1600. LDA $079F
    5 A& b% ~  u& I- R
  1601. AND #$806 G' t! _8 _1 R; R
  1602. JSR ON_OFF_PPU
    6 G7 ~* e& U7 ]* g; N' K
  1603. RTS1 j9 H4 H/ {$ j/ t+ W# X# {; x
  1604. 5 Q- s* ]( m3 [  J& k: c6 M

  1605. + `$ N  |* m8 o) ]; h
  1606. ! g1 s0 Q! S5 C4 y6 x2 t+ j) K
  1607. BULSEL_UP_STRING:9 `" D- \( p( O! w7 {
  1608. .BYTE $9F,$9A,$80,$9E,$99,$80,$9D,$9D,$80! H1 }, r  n% @8 ?2 C
  1609. ( u+ m4 {' y* a
  1610. BULSEL_DN_STRING:6 i9 ~% ~% V! h& P- \6 v+ _
  1611. .BYTE $8E,$98,$80,$9E,$99,$80,$9D,$96,$80) B" ]2 U5 O2 p
  1612. ; G* x6 ?8 C# d8 V! z1 X
  1613. BULSEL_LF_STRING:4 d  R  i/ \, T+ E5 s! G
  1614. .BYTE $96,$90,$80,$9E,$99,$80,$9D,$97,$809 v) ?' S2 P- m# v
  1615. 3 ~' k' @5 M# R$ h6 X/ ?& S
  1616. BULSEL_RG_STRING:
    $ h( E) @: O! d, {7 l6 _( y# I
  1617. .BYTE $9C,$91,$80,$9E,$99,$80,$9D,$90,$80
    9 [* d* c, @8 X% F' r8 |  [

  1618. " `) Z, H! U( T) H3 V
  1619. BULSEL_B_STRING:6 ]- z+ D3 o7 d8 V& y. J
  1620. .BYTE $80,$8C,$80,$9E,$99,$80,$9D,$98,$80, {5 Q. B) U2 I) l
  1621. + }5 d& g0 l8 e2 `( u" A# j* L
  1622. BULSEL_A_STRING:6 z9 t3 j( j5 m! O4 E0 d
  1623. .BYTE $80,$8B,$80,$9E,$99,$80,$8D,$99,$97,$97,$99,$98,$80,$9D,$9A,$8F,$8F,$8E9 p6 Z% r( l2 ^- ^
  1624. 5 [; C# p; @7 u1 }$ S

  1625. " t: G5 b+ e8 M1 ]5 L
  1626. BULSEL_UP_WRITE:- a# q' g( }- v. B# s" u. M& }( w
  1627. LDX #$00
    7 h; o( p6 [1 \% g. m7 i
  1628. BULSEL_UP:( o6 v6 i) T+ M% f- Z* X
  1629. JSR PPUADDR_PROCESS: m- X: l% [+ y8 E- n! T& y
  1630. LDA BULSEL_UP_STRING,X
    - D2 v5 Q0 l( f8 U! u
  1631. STA $2007/ R$ `  S% t7 e- \/ q5 N& F* b
  1632. LDA #$00* d2 {6 u+ Q5 L$ b7 o% G
  1633. STA $2000- d' T" b. q$ T5 N; ]+ A5 [0 L# [
  1634. INC $BA
    + c; p3 Y$ M2 ?% |2 P' M, q7 j
  1635. INX' U" t  O$ s: S+ O+ C
  1636. CPX #$09
    2 ?, o% @3 n2 \8 `5 G) L/ E
  1637. BCC BULSEL_UP6 h% h, T4 H3 v% g: h7 [
  1638. RTS" f5 b8 a) T3 a+ u$ Z7 V4 }
  1639. BULSEL_DN_WRITE:
    . z7 _( r" }) g# G: g
  1640. LDX #$00
    ! R$ z  o$ N7 b) p9 Q
  1641. BULSEL_DN:
    3 k8 @. V* s6 f, H6 d
  1642. JSR PPUADDR_PROCESS3 _9 u3 _9 n/ s5 ]
  1643. LDA BULSEL_DN_STRING,X: }3 i8 f$ M: G5 ]; _
  1644. STA $2007. c$ O6 q& j. u0 a( C+ {! F
  1645. LDA #$003 ^# i0 p: P+ V" _( `# }! i7 d
  1646. STA $2000
    - E/ f2 A- M( K8 g8 B# W1 }
  1647. INC $BA$ q6 u. v0 q; d0 M
  1648. INX( ?! k3 \, \4 H$ ]# @7 K2 [% P' Y' m
  1649. CPX #$09
    " G5 P* p* @. {* C
  1650. BCC BULSEL_DN  ?" Y. O3 J2 _& N8 R
  1651. RTS
    7 [; w  M9 b! [. d& n* d
  1652. BULSEL_LF_WRITE:
    2 D) m- R8 B1 y7 T: t9 f
  1653. LDX #$00
      w/ N8 C$ R1 h$ {" G
  1654. BULSEL_LF:
    0 M/ E8 V; l' N; ~$ \: o. \: G) E
  1655. JSR PPUADDR_PROCESS; ]- a( z& w) ^/ X5 Z
  1656. LDA BULSEL_LF_STRING,X: Y3 H8 p8 f' C" {
  1657. STA $2007
    5 n/ H- Q% U' U) {# c
  1658. LDA #$00
    2 s" [: q( n  g$ R# K3 z) y( U
  1659. STA $2000: P% G0 ^4 o* a3 p$ \
  1660. INC $BA
    # h. E6 h. ^  A' T, S9 O% O
  1661. INX
    6 |( }- b7 c7 n' q+ t" O& t7 G
  1662. CPX #$09
    9 B+ Z5 h% g, X8 U1 G+ d) c
  1663. BCC BULSEL_LF+ v& P' E: N8 d
  1664. RTS
    9 ~6 n: ?, e  g+ |1 f) p9 _5 V, `" E
  1665. BULSEL_RG_WRITE:
    4 O6 P! Y$ U9 m/ c9 f8 y( U
  1666. LDX #$00
    0 k( Z, E8 j' A4 K& r0 \6 E
  1667. BULSEL_RG:& Z4 w9 ^5 ]; h/ ?7 T4 i
  1668. JSR PPUADDR_PROCESS
    " l7 p$ G1 @. g# m
  1669. LDA BULSEL_RG_STRING,X& Q% i& v" e- ^+ c9 q# ]
  1670. STA $2007
    0 w  q* i& X& y& Y
  1671. LDA #$00
    & V. Z/ x1 \# k3 e9 o
  1672. STA $20004 ~7 Q+ a. ~7 V. o1 }" ~
  1673. INC $BA
    1 `, ]: d2 I8 Y  E! ?
  1674. INX
    + @- [  _9 X6 q% J1 z
  1675. CPX #$09) z$ g$ ?- k# R. E
  1676. BCC BULSEL_RG8 F8 h9 q2 l- \
  1677. RTS0 H7 A& r- `+ B; d9 O
  1678. BULSEL_B_WRITE:/ a; s/ `1 J; \2 c# M" m
  1679. LDX #$00
    7 a9 P+ `$ U8 R3 X
  1680. BULSEL_B:7 h, C  y9 A- Z# m. ]8 o! ?
  1681. JSR PPUADDR_PROCESS4 [4 I  ?, S/ z: G7 P" z( U0 A
  1682. LDA BULSEL_B_STRING,X* J) X1 z7 O, A% b4 T) I
  1683. STA $2007
    : |6 x! o& {! U
  1684. LDA #$004 d' K) y' B% s
  1685. STA $2000
    1 ~3 g' S' e" o
  1686. INC $BA% g7 m6 S! n6 r
  1687. INX' c* z' c; d* c( G0 Z9 N$ J& ~. X
  1688. CPX #$09
    " K5 N/ E6 Z( x, @1 h
  1689. BCC BULSEL_B
    % X& P6 ^* B2 s" W# y* n" ~, V
  1690. RTS1 T3 o- _* A' j. `6 {: M
  1691. BULSEL_A_WRITE:
    5 p4 W: @$ A7 x  n$ ]& g
  1692. LDX #$00' R" w/ m9 S: Z1 L6 e5 G
  1693. BULSEL_A:/ i6 q0 d. W/ d) l  s/ o% J
  1694. JSR PPUADDR_PROCESS& |1 W7 R! c# ~& `
  1695. LDA BULSEL_A_STRING,X2 H2 S$ @9 Q) d3 C+ ~
  1696. STA $2007
    : J- m5 u7 ^5 J* {$ Y5 q9 q8 ^
  1697. LDA #$00% l) X" b* \* m; q$ z: a# g: J) S
  1698. STA $2000% x# ~5 F8 B" g5 V/ H% j# E! l( a. x
  1699. INC $BA
    ) s: B( L  G; B8 h
  1700. INX
    , s+ ]" }7 d3 g* i
  1701. CPX #$12" ~6 ^' ?" R9 D! E1 l' R
  1702. BCC BULSEL_A! G- p* t2 K+ O, w  v
  1703. RTS+ T2 o  g  \$ r
  1704. + C2 t+ [5 {: w2 y( y( W
  1705. * E$ h% C) D, w, |. |
  1706. - k" K) Z. M" P# o
  1707. BULSEL_PPU:
    6 R- Z4 L1 r& g6 a
  1708. LDA #$6C- f7 s! s! o; A1 q8 k" P/ t
  1709. STA $BA# X2 g% I3 _$ i, V
  1710. LDA #$21
    & C, V- u- p" B7 E
  1711. STA $BB- |0 \% _/ I  o4 m& i
  1712. JSR BULSEL_UP_WRITE% W8 x. s- H! }# V

  1713. 1 e5 E" \% f2 y7 I) u4 D
  1714. LDA #$AC
    " n- Q7 |* r/ `
  1715. STA $BA
    ( ?% g+ h8 W4 J
  1716. LDA #$215 u/ }, T5 F" J
  1717. STA $BB
    - |1 ?0 w1 o5 `& Y  x; y" @8 I
  1718. JSR BULSEL_DN_WRITE) y- s# U# Q3 D
  1719. / [9 s2 S2 u, I2 `1 G" J. {
  1720. LDA #$EC7 D7 u- p" N2 X
  1721. STA $BA
    + r4 V, u5 S% g5 O4 F4 u* N' r
  1722. LDA #$21
    ' h' Y/ J, K! W- J
  1723. STA $BB% O  `* `' U  R
  1724. JSR BULSEL_LF_WRITE
    : P7 z6 U8 m# r3 P5 k
  1725. 0 M' J- c9 C4 d
  1726. LDA #$2C
    2 N% ^. y6 ]& E3 n; e8 `
  1727. STA $BA' u7 L4 b+ u  H# M
  1728. LDA #$22
    9 n4 x+ u& g, z9 ^; f
  1729. STA $BB
    " @) l1 F7 \& P; K8 X
  1730. JSR BULSEL_RG_WRITE9 o* I. Y3 A1 n+ o, ~- J7 q
  1731. " ]3 L* ]( h; g: x% U. L
  1732. LDA #$6C
    # k! f: O# X6 }( k; [! h
  1733. STA $BA
      z  V' N) V% `* Q% O3 Y- X
  1734. LDA #$22. ?3 }( q) H' b- _2 D) f
  1735. STA $BB
    " V5 a- n. M6 ^% r+ U- Z. I' ^
  1736. JSR BULSEL_B_WRITE+ i- x1 p* S  ?
  1737. - w; y! q; e6 Z9 t8 e5 I1 B3 D: j
  1738. LDA #$A7/ x+ v  {# V; F, ^& N3 P8 |
  1739. STA $BA5 i. E/ r' f/ ]" p# V" u' T2 w
  1740. LDA #$22
    " T- S, C! @/ K$ _
  1741. STA $BB  F1 W+ K+ ~! M( u  f0 G
  1742. JSR BULSEL_A_WRITE6 G/ _- T4 l$ R1 [
  1743. RTS: S0 v9 P/ G" N7 Y
  1744. " \6 t# r; v) @8 h0 w' I4 P

  1745. 1 n! H# s7 z+ v
  1746. + x% K1 T: O8 l  s) o1 D  {
  1747. UP_STRING:; U2 F, _3 B4 v0 X
  1748. .BYTE $9F,$9A,$806 [$ F4 a. j# x0 ]! _

  1749. 7 P* x* e5 ]  B* f2 I* u
  1750. DN_STRING:
    % K: t% u% `5 u' ?) w
  1751. .BYTE $8E,$98,$80
    9 D3 _8 z8 w0 {3 a0 Z4 y* X

  1752. 6 y; |) m- ?0 l) ?2 [
  1753. LF_STRING:
    / c  u$ w" x# K# t1 |' O
  1754. .BYTE $96,$90,$80
    * A$ ^4 j% d3 d* u6 g
  1755. 2 U* m% G. _5 [' N/ |
  1756. RG_STRING:
    6 ?- X: w. P6 h' f) i' B
  1757. .BYTE $9C,$91,$80
    & ~( E0 O/ n' M

  1758. 4 J% i. I" v* Y, r% A6 V
  1759. B_STRING:
    % T0 a* x4 ]5 m3 i, ]$ B9 u
  1760. .BYTE $80,$8C,$80" M2 U! ~. r. t  m" |% `

  1761. 1 \2 l" z- ^) p" T1 A* k! V
  1762. A_STRING:7 m) x  q5 q" f( Z% ^/ Y
  1763. .BYTE $80,$8B,$80; ^3 \% e$ g! g
  1764. 3 ~$ j; o+ Z3 P  E$ f

  1765. ! w/ ?6 t/ w7 z' q3 |# z1 m
  1766. UP_WRITE:' Y) Z# Z7 \# J. M/ ^) C# y- @. H
  1767. LDX #$00! Y7 M8 M6 [0 g- v& {# s
  1768. UP:3 d; V. I$ N$ p! I3 Y! a
  1769. JSR PPUADDR_PROCESS
    8 ]2 I/ U- A2 a. |( N; T% w
  1770. LDA UP_STRING,X& D% P7 H( g9 u4 i: L  d! q" r/ W
  1771. STA $2007
    5 r$ C0 G/ }: P+ Q/ W
  1772. LDA #$00
      r! y  r2 f% S" l7 I: K7 S& O5 d( T
  1773. STA $2000
    - L2 S. U5 h9 r9 C5 w) t) v$ m
  1774. INC $BA: [9 `1 Z5 E- N' ^7 S0 v7 Z) M
  1775. INX  s& V% g  p3 \
  1776. CPX #$03
    ! ~( n% e3 f# T/ b. H
  1777. BCC UP  a0 ?! k. @4 l( t# Y; j' G( g
  1778. RTS0 r% y1 F5 I% q8 L
  1779. $ b% Q% }% v" z' f5 W8 I
  1780. DN_WRITE:
    7 P8 ~5 K% W; D) T2 ^
  1781. LDX #$00
    7 o6 h8 O6 {$ H! Y" V$ _# ~, l$ w4 p
  1782. DN:
    / b. l: i2 l8 S. j$ |2 I- t
  1783. JSR PPUADDR_PROCESS# E6 ]/ |( f# K
  1784. LDA DN_STRING,X* M, L6 v, T. C, W. ^% C
  1785. STA $2007" s. V1 s. R0 [' _
  1786. LDA #$00
    % o. y+ Q3 O7 L* r7 T+ w
  1787. STA $2000
    ! ~9 Y8 N: T2 T7 I. y, J
  1788. INC $BA, A/ p# a5 h) j; t2 L) v% l
  1789. INX
    6 p, I; @- c  K
  1790. CPX #$03/ y$ E; y! {2 M' N" ]& W, n0 t
  1791. BCC DN
    : _$ J+ l4 P' G' @2 _7 D
  1792. RTS' E4 a0 y2 ^2 T2 I. ?: s4 k& ]
  1793. % ^" m6 [3 ]" z) m5 _. P
  1794. LF_WRITE:
    5 }% s+ a& A7 \; f% L$ E  Q4 `
  1795. LDX #$00
    % _5 w: ?" f4 L9 {
  1796. LF:
    ( j  L/ ^7 y  K
  1797. JSR PPUADDR_PROCESS
    4 ?+ I7 L. b! H" c( T
  1798. LDA LF_STRING,X3 ?) K1 o/ X, j. ~  l
  1799. STA $2007! g  n7 ~: v5 Y+ u
  1800. LDA #$00
    1 @* }& h! J1 g7 x/ A  P8 N
  1801. STA $2000
    $ j! s! _  Z+ p, l4 y
  1802. INC $BA
    + w7 M/ u. L5 f
  1803. INX- M* q( d5 J2 Y( d$ r
  1804. CPX #$030 y" t0 m1 U1 n! w2 V: d
  1805. BCC LF  ~* X/ y* _8 |) L( U
  1806. RTS
    ( G- h, X& ~, B; C9 v
  1807. 2 J2 S0 T* s8 u; F) x$ e5 o
  1808. RG_WRITE:
    3 _' V4 @0 L& j4 M2 [' w5 l6 Y- Z
  1809. LDX #$00
    4 ^- g( Z# A( G+ W& ^: C
  1810. RG:
    . t5 T0 T; t9 B) Q/ C
  1811. JSR PPUADDR_PROCESS
    + ?$ K, c2 s/ Y! _/ d* B0 }
  1812. LDA RG_STRING,X; X, C' p" h0 ^4 q+ R8 r, a3 Z& x
  1813. STA $2007* t. ]& Z6 x! g7 m
  1814. LDA #$00: r! s2 T, q8 K: A8 y9 R$ n( H! v
  1815. STA $20008 x0 \) W& t( y, p0 X+ B
  1816. INC $BA
    - l  k; m3 j$ \5 k; C& j# C
  1817. INX, ^; f, a8 b- N2 R
  1818. CPX #$03
    1 r2 P5 F! \: m- n
  1819. BCC RG
    5 @) Z5 q$ f8 @
  1820. RTS
      ~6 P6 H3 Y" X& h: f+ K; A$ V1 r
  1821. 1 B( b5 ]7 B% h7 }0 u! v4 A0 [
  1822. B_WRITE:% [/ p& R* F5 j, Y" H( E0 `
  1823. LDX #$00
    / g) F7 a1 E  G0 r- L
  1824. B:
    ( j* h3 U8 o3 ]
  1825. JSR PPUADDR_PROCESS. f5 T2 F. ^: ?
  1826. LDA B_STRING,X2 b$ v" q2 n# F# [! n
  1827. STA $20077 K% z) g& U, F$ J1 v. @
  1828. LDA #$00
    5 y( i; H, F" R9 ?$ l8 X" ^' l0 o
  1829. STA $2000
    ( @. Y3 J( m) I3 C' Z
  1830. INC $BA
    ; {: Q8 @0 y* }4 w) i" x
  1831. INX
      U& i# x5 ~+ H; i" C2 S" C
  1832. CPX #$03, r1 D6 b/ _* M  `# b* _: }  E
  1833. BCC B
    ) i+ p# Z3 \* _3 U! g4 e8 y5 b
  1834. RTS
    + v1 b! W0 l& }' o. C6 B$ o- i

  1835. ; u* R: N8 y  \3 W0 b
  1836. A_WRITE:# `3 p/ D2 |6 G8 o0 I3 S; v& \1 }
  1837. LDX #$00
    ) M% A( S8 p4 {( `3 _, i
  1838. A:% X3 `  J& u3 ]- @  T) X3 }
  1839. JSR PPUADDR_PROCESS
    ' Q! r# A5 K, N& D6 t
  1840. LDA A_STRING,X
      a# x4 W+ l7 D0 |: |
  1841. STA $2007
    9 p( G' A8 }% n0 j6 r7 ]# F
  1842. LDA #$00% X' E# O$ i5 m% y7 S* I3 [
  1843. STA $2000
    # t# n6 Q- t" ?
  1844. INC $BA
    , [" w9 I6 V& C: J
  1845. INX
    2 S, e6 l. M# d/ ~: W# M: U" F
  1846. CPX #$03
    7 F" V4 L1 ?( L# |0 n  j7 |! f
  1847. BCC A* J, U5 G. C, F& L' E
  1848. RTS: K, v9 K: ?& p1 i0 |2 Z
  1849. ; y0 |' [6 H# P9 Y

  1850. ' T$ R' ?) }3 p- w
  1851. UP_PPU:% T/ r) q: t; R- M% ?6 Y
  1852. JSR UP_WRITE
    9 p& u9 A! l2 p' F5 t
  1853. RTS
    8 s& j7 @  f1 o/ b

  1854. 4 T; l+ z' w6 h+ f
  1855. DN_PPU:
    5 j' I9 G2 [) o  A/ ?
  1856. JSR DN_WRITE
    9 X; l8 a; }  `- ?) C7 w6 j0 u- m
  1857. RTS
      M: _7 B0 a' K7 j) b$ U

  1858. + t2 M$ v" ?/ }% }. `! R1 g
  1859. LF_PPU:# @% E5 ?) X( i& p' z3 g6 Y
  1860. JSR LF_WRITE
    + a! \* \7 z; [
  1861. RTS- s& h1 i$ p1 t- r; m- @: t1 z
  1862. ; {$ A* a6 {, l7 T$ O1 M
  1863. RG_PPU:
    4 k5 t) @+ ]3 m
  1864. JSR RG_WRITE1 Y" k* J5 g# r7 o# \
  1865. RTS
      d- A- R2 y% w8 C" R7 a( b

  1866. , [( t0 }- f! C# N1 X5 r! v
  1867. B_PPU:/ L0 i  s" V, K4 T
  1868. JSR B_WRITE
    ' m: K7 M8 s7 E" T$ }
  1869. RTS# L5 z! ]& t4 [4 G/ n
  1870. 5 S! I' ]* t8 V$ M- A  m$ @
  1871. A_PPU:& f: Y, d0 x: `! d9 h9 G* I/ t; R
  1872. JSR A_WRITE; _9 o3 M# X  u6 u
  1873. RTS1 y! e$ F6 s/ B5 U
  1874. % ~! [5 Y0 p3 s
  1875. , x6 ]5 |5 n+ l+ y9 a4 N: M  q
  1876. PAGESELECT:
    ' s  i0 _! M0 H& Z* l
  1877. PAGE0:' e0 ^# g* p" L' Y/ k; K  Z7 i& l
  1878. LDA $07AA
    $ D; x/ w/ d- p  d
  1879. CMP #$00" V, a: M4 v  y1 v; r
  1880. BNE PAGE1
    " v( t" z/ ^8 u' W
  1881. , ]/ b/ N- K/ h! P4 A. Y& f, W
  1882. PAGE_00:
    " v3 G. a- p. c
  1883. JSR BULSEL_PPU
    ' ]; W! p% z5 b5 I5 r" c3 O4 ^
  1884. RTS$ M5 j$ n( J  C+ \- a
  1885. 6 \1 w, _1 `+ {6 z9 r: |
  1886. PAGE1:
    7 d3 m( I+ R* X8 S0 W' x& R
  1887. LDA $07AA
    ) F" Y4 D$ y7 l0 y
  1888. CMP #$01
    - j, M/ y  Y9 ]% q' T
  1889. BNE PAGE2
    . I5 G, D3 o+ p6 D" T

  1890. ! k* o' c8 z$ h; n+ A6 @# Z# g0 }
  1891. PAGE_01:" \. M2 d2 Y3 W% g: [, W
  1892. JSR INVINC_PPU) q* v: U- m8 _) ^+ w6 V# f: Q
  1893. JSR LIFELC15_PPU
    1 T2 }7 v: d1 N0 [
  1894. JSR DOUCON_PPU$ \: j* }& d0 O3 j
  1895. JSR KILLON_PPU
    , t7 u5 v% e$ {9 K. ?  {
  1896. JSR SKYFLY_PPU
    4 n& k4 O( O0 n& ^+ n6 y
  1897. JSR LIFELOW_PPU
    + z7 q4 U/ s  x4 `! r% v
  1898. RTS
      b4 G) K0 l/ y9 A$ V4 c2 v- Z# w

  1899. 9 I& O# ?4 V- }+ A" p: ~
  1900. PAGE2: - W0 H2 R; `% X! ~+ v4 {
  1901. LDA $07AA
    , d8 ~& p  {. k
  1902. CMP #$02
    # ^0 o0 d9 l1 l5 H. |/ @
  1903. BNE PAGE3* y) J# r' Z9 W; p2 v! W

  1904. / f) b2 }& p4 t4 `+ q, a" _
  1905. PAGE_02:! g* Z2 w3 C$ t" q$ A
  1906. JSR BULADD_PPU
    9 R4 {. U' ]2 A3 W/ b, V4 k
  1907. JSR SKINGE_PPU
    % i, E+ L& |5 j' m" }0 a
  1908. JSR BULMIX_PPU
    ( H& ~( E, Q  X
  1909. JSR ENELOC_PPU; C' V1 h* [' E) k- u, I
  1910. JSR FOCFUL_PPU9 f# l1 O- Q9 p- R$ X: {; j1 F
  1911. RTS
    3 H& c) {$ t1 c& X& G8 c, ^

  1912. 8 A$ H  g9 C7 F, D3 U) P
  1913. PAGE3:
    ' A( s) Y; J+ a' T
  1914. LDA $07AA% M0 ?2 y: S( u
  1915. CMP #$03
    1 U6 t% G7 b) E$ u% U
  1916. BNE PAGE45 H# D+ X! m; z5 y" T7 n) Z! ]
  1917. " i" \, V: k6 R, @( l* P( `% f" I4 Q
  1918. PAGE_03:
    3 [0 a5 K! Y! j
  1919. JSR BULCON_PPU$ }, A5 K4 q2 E6 L2 ?) u8 S8 p
  1920. JSR SPEBUL_PPU
    6 S7 i4 g; H/ y
  1921. JSR CLEALL_PPU
    1 Z- a4 z; V; V. S- q! }! b
  1922. JSR HARDMODE_PPU7 Q( t8 A; y- V. b# P4 r
  1923. JSR B_TO_JMPSTG_PPU0 r6 v" q. Z; o% R5 X) \
  1924. JSR A_TO_PLAMOD_PPU
    & A8 ~* o, v+ S; {# N1 K
  1925. RTS) t3 C8 o5 ]; p# F
  1926. , i4 ~( [* n( @) h, a& W/ T/ {; w
  1927. PAGE4: 1 J3 a5 }4 A0 I9 k
  1928. LDA $07AA# _# C4 A! @) c8 w! m4 ]* [0 ]
  1929. CMP #$04
      [' `! b# B' e/ f9 f0 R. x
  1930. BNE PAGERTS
      h9 n" ]. b* W- B
  1931. 2 t5 s  _# g1 a% x' l2 C* S
  1932. PAGE_04:
    ) `( w; S' I% S3 s+ N# u
  1933. JSR MOVSPE_PPU
    . b6 f5 s; T% N) T2 s  i8 l  k- P
  1934. JSR UNLJMP_PPU6 E8 F6 \3 a6 W  ^
  1935. JSR DESTRO_PPU( F: T' i9 p2 ^" ?
  1936. JSR EQUBUL_PPU
    4 e6 E! s$ b4 h/ i
  1937. JSR MOVESPEED_PPU
    " w4 x' T* @+ Y( Z: _/ A' s+ n1 u" t: v9 N
  1938. PAGERTS:: u9 ]3 ~$ P) ?' h
  1939. RTS
    : J9 a3 P2 d; A8 E7 K2 I! s8 I
  1940. ( C( C$ @+ q, l, w

  1941. 2 M" i$ z0 q4 U5 O8 R5 i
  1942. PLAYER_01_STRING:  N9 S3 Y! q- z
  1943. .BYTE $9A,$96,$8B,$A3,$8F,$9C,$80,$81,$82,$80
    : z6 g" {$ E: h+ \/ I  j# L

  1944. ' a# V/ [  y. {

  1945. : q- e! I3 A& C0 v. U9 ]# `
  1946. PLAYER_01_WRITE:( H+ z) l) O5 \! Y) T) D
  1947. LDX #$00
    ! q4 C# X/ j- G( ]% {
  1948. PLAYER_01:- Z( i7 R8 n; z, G2 W
  1949. JSR PPUADDR_PROCESS
    / ^! d, u! }% f6 N
  1950. LDA PLAYER_01_STRING,X& _6 V  b; _+ c6 V
  1951. STA $20074 C) q% P- D  k  B4 e1 Y3 ?; n
  1952. LDA #$00
    % \* |: B# @8 R& P0 O: k$ F
  1953. STA $20004 ~: l6 ~, e( \
  1954. INC $BA
    , H% ]) A0 x. P/ i* ~. i
  1955. INX! t0 n" D2 `* d# U
  1956. CPX #$0A
    ! x9 Z" B# b; c2 {
  1957. BCC PLAYER_01
    ( `" Y2 A/ _' ^& V4 x
  1958. RTS
    - _2 q' k! h; ?1 t9 w
  1959.   n! o0 }+ |: `3 Q
  1960. PLAYER_01_PPU:6 [. m2 z8 t. T0 w, \
  1961. LDX #$00, X: W9 K  f) D
  1962. LDA #$64; H/ N: N% f6 M, i; V' w1 V/ J
  1963. STA $BA
    & F- R8 E& u' d
  1964. LDA #$20
    5 h: D( Z: e. R
  1965. STA $BB" U6 c% w  s5 |
  1966. JSR PLAYER_01_WRITE. Q  ]/ M, @. \& w  T0 n! A
  1967. RTS
    5 C4 j  m) S6 t7 e' A4 R% C0 ^1 Z6 q
  1968. , B# N' \$ j9 q, U3 S' v
  1969. PLAYER_02_STRING:( m0 n: x6 d0 Y$ @+ T  q
  1970. .BYTE $9A,$96,$8B,$A3,$8F,$9C,$80,$81,$83,$80
    : |1 s9 F, c( j/ K

  1971. ( o+ y4 @0 h, K! f: P* {. ]
  1972. $ I" o" ?- p! F* X9 ~
  1973. PLAYER_02_WRITE:
    4 c2 ~! d) E9 W! P0 E# A
  1974. LDX #$00
    5 d. q9 ^9 V" D3 h6 f
  1975. PLAYER_02:
    ) a( Z+ |7 U  ?1 g7 W% X+ n" q4 z
  1976. JSR PPUADDR_PROCESS% \8 z5 b0 x3 ^$ M
  1977. LDA PLAYER_02_STRING,X! u# e8 I2 g1 t$ h0 C
  1978. STA $2007% H6 e) i. ^) L5 `+ p) X
  1979. LDA #$00
    ) i+ \5 q: {; |- N
  1980. STA $2000
    7 }4 t* l( u: J) f( P3 y7 e
  1981. INC $BA" e* }! i2 X9 n9 T0 Y2 m
  1982. INX! S7 d- l6 I# }) @
  1983. CPX #$0A
    : A# n" t7 U1 l; s# }+ ^$ ?
  1984. BCC PLAYER_02
    1 _* O/ A* }, X7 m
  1985. RTS( d$ _0 L, y! ?5 a& H4 m' L

  1986. 9 T4 ]' C5 T$ Z1 L. Y, x
  1987. PLAYER_02_PPU:+ N" N; R7 {: p) V' Y5 ?, e5 p
  1988. LDX #$004 C6 G( ^0 d. G0 M( r" z
  1989. LDA #$730 S  a! s" v9 {0 p& n1 i
  1990. STA $BA
    # E. K9 y5 M( g3 y& Y7 x0 J% `
  1991. LDA #$20' r3 Z! ~$ F1 [& k: t& [1 B$ n" f- W
  1992. STA $BB/ F( _5 A/ ]) A. c2 O6 S( E
  1993. JSR PLAYER_02_WRITE
    % L  |: V6 \# M$ F. E
  1994. RTS
    ' Y5 i$ J- l1 g/ K! Y2 }2 g
  1995. 3 Q/ _( S. S( M7 f* z6 X4 c/ h( z
  1996. PPUADDR_PROCESS:4 J$ v' E! l2 [" o
  1997. LDA $BB
    : ]6 g- a7 J+ ^% n& j
  1998. STA $2006
    + c: l, V1 p5 s4 ^8 T# E
  1999. LDA $BA
      @" S7 l& U' m7 i! L6 X! ~
  2000. STA $2006
    ! z  Y. S9 E4 c4 Y& g" D
  2001. RTS
    $ X" x) K, Z. B1 c" \
  2002. # ~: h+ i3 U7 n& N6 d5 r
  2003. 2 k" N4 ^2 `" V7 K

  2004. 2 {! p5 G6 w7 Q8 i2 v6 T, d) A- G
  2005. ONE_STRING:6 @# L$ `- C! O6 z8 H
  2006. .BYTE $99,$98,$8F
    ) {: H/ d  _3 \" i! a0 Y; G
  2007. # A* Z; h+ U0 d* Z6 J% C8 U
  2008. TWO_STRING:
    7 g8 X6 g8 ^( D6 A5 V& |, V; S
  2009. .BYTE $9E,$A1,$99+ k% G2 G; B: X9 k$ t2 E4 f
  2010. 1 l: }) n+ L& U
  2011. ONE_TWO_PPU:+ q( C- e/ H7 z( W/ y! F
  2012. BNE ONEWR" S% E+ u  E3 [7 H  T
  2013. TWOWR:; l8 U9 l4 L+ @: L+ {# K5 C; I& F
  2014. JSR PPUADDR_PROCESS% n- ~2 p% F! |" r$ m! A9 E
  2015. LDA TWO_STRING,X, j% H9 _* h6 x3 c* ]1 R0 `
  2016. STA $2007
    $ H* T1 e  H7 A$ V4 J
  2017. INC $BA) |- q. Y: U0 W; H$ s
  2018. INX
    3 V. U- o5 V# l3 o. L: w0 H+ p; h
  2019. CPX #$03
    % T- p* h. B* R$ }: E
  2020. BCC TWOWR9 o1 e1 ~% d; R$ m% |: l7 s7 Q
  2021. RTS& |% z/ V% r7 J- Y! \
  2022. ONEWR:
    6 o9 O& g/ a% R4 b  b
  2023. JSR PPUADDR_PROCESS
      [1 ^! `6 T5 e
  2024. LDA ONE_STRING,X- g* w, }/ N) w3 f: j& ]
  2025. STA $2007
    $ G9 z3 \2 u- T2 V
  2026. INC $BA/ K" t9 S5 ]+ n' H
  2027. INX
    + @; ^+ p, t# m! i9 ^8 _
  2028. CPX #$03
    - y2 L6 i7 [" G0 a" M& `8 q( h  q/ G
  2029. BCC ONEWR2 ^9 S4 Q! b, e3 J! Q
  2030. RTS7 g+ {) n# t4 }* G! Z5 Q
  2031. 9 P+ t$ B1 @$ R4 {1 C2 N$ B; I
  2032. MOVESPEED_STRING:
    5 t- P  v) v& m( ]* D8 {
  2033. .BYTE $97,$99,$A0,$8F,$80,$9D,$9A,$8F,$8F,$8F,$807 M& Q6 e* ?! t0 X

  2034. # o( F8 z1 C4 ^; s8 L: S  C

  2035. : L8 x& {, P7 Q" {
  2036. MOVESPEED_WRITE:
    3 ~: q) F; F! K$ L6 g
  2037. LDX #$00- f8 ^6 t* O1 z& E7 }3 p# Q* T$ ^
  2038. MOVESPEED:% S0 g- Q. L* C+ z! W
  2039. JSR PPUADDR_PROCESS
    6 t, \: j6 G0 |! C$ I; C: Z! Q
  2040. LDA MOVESPEED_STRING,X
    % T/ A5 e! ]8 P1 o! t7 @
  2041. STA $2007
    ) L6 b- j; i. ^) P( k
  2042. LDA #$00$ `% ~  m# q3 ^, n
  2043. STA $20007 Y1 \9 M% L( G- X2 n
  2044. INC $BA7 o1 u& R* k: p) Z. @! y1 k5 P
  2045. INX. E8 |5 p- `0 N, G! C
  2046. CPX #$0B! F% m& ?, g; b( |/ h( o
  2047. BCC MOVESPEED! f$ P% u  J4 B
  2048. RTS% J  f# V6 _" Z* n# T( k+ o* {
  2049. 7 Y, d/ \2 p4 A) T$ g9 {2 Q& ]7 K
  2050. MOVESPEED_PPU:1 Z" V6 z+ Z5 r) v/ E
  2051. LDX #$00  n: U) B0 h/ j3 N  K% t+ }5 L$ e
  2052. LDA #$AA- K0 |2 I2 ^' r7 y+ R- J
  2053. STA $BA3 z# D2 i# F8 Z( C( v: L
  2054. LDA #$22' k+ S% G, z: R+ B
  2055. STA $BB
    5 S' d) [% ^" P+ l2 g1 v9 g
  2056. JSR MOVESPEED_WRITE
    4 l2 |; M. b5 l" @
  2057. LDA $7003
    9 |! x5 k+ e0 E+ N  I, X! k2 u) q
  2058. CLC
    + L' D; q' V9 N  e
  2059. ADC #$82
    9 z, o$ j. Q3 I! M! X
  2060. STA $2007& m4 J6 q- |1 y* ~. o! ^# \
  2061. RTS( @; Q( R5 y( ]# s( a. M# U! C0 s
复制代码

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?立即注册

x

评分

1

查看全部评分

[发帖际遇]: yandagui辛苦发帖,赚了 6 个 柠檬. 幸运榜 / 衰神榜

签到天数: 549 天

[LV.9]以坛为家II

发表于 2016-11-20 00:59:08 | 显示全部楼层
真是太強了,感覺樓主可以直接當D商了.
[发帖际遇]: hanjungex 发帖时在路边捡到 3 个 柠檬,偷偷放进了口袋. 幸运榜 / 衰神榜

签到天数: 7 天

[LV.3]偶尔看看II

发表于 2016-11-20 01:30:16 | 显示全部楼层
不错谢谢分享!
[发帖际遇]: huanhuan05花4 个 柠檬买彩票,血本无归T_T. 幸运榜 / 衰神榜

签到天数: 2060 天

[LV.Master]伴坛终老

发表于 2016-11-20 03:01:53 | 显示全部楼层
这个修改好厉害、、、、
[发帖际遇]: liujunbtx为灾区捐款 3 个 柠檬. 幸运榜 / 衰神榜

签到天数: 2981 天

[LV.Master]伴坛终老

发表于 2016-11-20 08:57:10 | 显示全部楼层
非常强大的修改!
[发帖际遇]: afti花16 个 柠檬买彩票,血本无归T_T. 幸运榜 / 衰神榜

签到天数: 852 天

[LV.10]以坛为家III

发表于 2016-11-20 11:17:32 | 显示全部楼层
好东西,收下了
[发帖际遇]: kexiao1223扶老大爷过马路,警察叔叔奖励kexiao1223 1 个 柠檬. 幸运榜 / 衰神榜

签到天数: 1279 天

[LV.10]以坛为家III

发表于 2016-11-20 12:03:09 | 显示全部楼层
太强了!佩服佩服!

签到天数: 2115 天

[LV.Master]伴坛终老

发表于 2016-11-20 21:28:21 | 显示全部楼层
这修改太全面了 ,
[发帖际遇]: 一个袋子砸在了 nmclib1 头上,nmclib1 赚了 2 个 柠檬. 幸运榜 / 衰神榜

签到天数: 135 天

[LV.7]常住居民III

发表于 2016-11-21 09:59:17 | 显示全部楼层
这东西找了好久勒,谢谢!!
# b8 ~- C! U- M- a, l) _7 R( L6 U) U
[发帖际遇]: wjb19780515 发帖时在路边捡到 5 个 柠檬,偷偷放进了口袋. 幸运榜 / 衰神榜

签到天数: 2366 天

[LV.Master]伴坛终老

发表于 2016-11-21 12:40:20 | 显示全部楼层
感谢楼主分享
[发帖际遇]: 一个袋子砸在了 tariq017 头上,tariq017 赚了 4 个 柠檬. 幸运榜 / 衰神榜

签到天数: 2105 天

[LV.Master]伴坛终老

发表于 2016-11-21 19:36:29 | 显示全部楼层
感谢楼主分享
[发帖际遇]: datone辛苦发帖,赚了 1 个 柠檬. 幸运榜 / 衰神榜
头像被屏蔽

该用户从未签到

发表于 2016-12-2 15:48:07 | 显示全部楼层
提示: 作者被禁止或删除 内容自动屏蔽

签到天数: 347 天

[LV.8]以坛为家I

发表于 2016-12-7 15:53:12 | 显示全部楼层
谢谢分享

该用户从未签到

发表于 2023-7-28 22:49:06 | 显示全部楼层
看上去好复杂
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

Archiver|手机版|小黑屋|国治模拟精品屋 ( 沪ICP备15012945号-1 )

GMT+8, 2025-2-19 06:32 , Processed in 1.140625 second(s), 34 queries , Gzip On.

Powered by Discuz! X3.4

© 2001-2023 Discuz! Team.

快速回复 返回顶部 返回列表