EMU618社区

 找回密码
 立即注册
帖子
查看: 723|回复: 18

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

[复制链接]

签到天数: 39 天

[LV.5]常住居民I

发表于 2016-11-19 22:19:45 | 显示全部楼层 |阅读模式
本帖最后由 yandagui 于 2016-11-19 23:11 编辑
/ Q  |: F8 n! }+ |
% _/ S4 M& G, ^+ z7 I
     [FC][魂斗罗旋风终板END暂停显菜单]
2 B7 i7 Z0 ^4 h* j3 B2 J
作者:FlameCyclone(flamecyclone.ys168.com)) z; ^8 o, I0 n0 Z
时间:2016/11/19 21:46:006 N( d9 V* X' t& I, w# H5 ^
更新日志:

' s: S0 p7 K  J4 e2016.11.19:加入暂停显菜单(共5页).
7 p( A) p- x) N) {8 m+ e1 [$ V3 k) v2016.11.12:加入无限跳跃.
" O- \) d. p3 g8 A0 T2016.11.12:加入速度调节.
( ]- o1 b* [; u* x. Q2 O
2016.11.11:加入敌我子弹对消功能.5 g9 {% ?% K( X; g% o; o/ X0 R" l; h
2016.11.11:加入全屏闪灭功能.9 d7 j$ N. i" b; v) B& w
2016.06.08:加入全屏瞄准功能.: A  k; p% o( F8 m
2016.05.31:加入弹速调节功能.! |& G* g" R# Q9 b6 V
2016.01.01:加入高难度模式.
& ^6 g0 r4 W3 {* W9 ~2015.12.12:修复消除威胁不足,使得移动BOSS关卡(第2,4,5,6)正常通过.
  X5 |2 G; Y: I0 O3 A" L/ Q  A2014.07.05:由于对打功能不完善,直接去除,更改为生命锁定.5 [* R9 j7 T7 c& y3 O5 L
2014.07.05:双人切换功能优化.
% M4 e; I# W; z; [9 v2014.06.01:修复第三关浮空到BOSS前必须关闭浮空后跳跃才能见BOSS的麻烦.( G& e& x9 c9 _2 M5 i
2014.06.01:取消生命锁定,改为生命锁定模式下剩余生命不会少于一条.
0 G6 F8 i: |9 C0 |5 y2014.01.18:修复GAME OVER字样只有G和O的错误,原来想拉大字母间距离,看来行不通.
, X- o, c, ~+ R6 [* z2 d% N2014.01.18:浮空模式下,P2飞行高度未限制导致死亡,原来是指令本该用绝对X变址的被用成了绝对寻址.4 g/ M/ u/ |+ m6 S
2014.02.08:拿手机无聊时又发现一些错误,所以修正生命剩余勋章显示的错误(某天用读卡器插在DVD上测试发现机器读不了卡,原因是目录级数超过三级,只有刻录成光盘来测试,结果发现生命勋章的显示竟然无压力!), {6 u, v/ H% a' A" z
2014.02.13:加入自动演示通关.4 y8 U  j7 L/ ~7 v, O
内容:
# u3 p0 a' P7 n' P; `, }4 a23.暂停菜单:        暂停后,自动显示菜单,选择键翻页,方向键和BA键进行各种功能的开关操作.
) \3 k! V, V0 E, r6 f2 ?8 m22.无限跳跃:        暂停后,选择键4次,按下开启,开启后游戏时无限跳跃.% I( M1 Z! T& D! R# f2 a
21.速度调节:        暂停后,选择键4次,按左右调节行走速度(0-3级).

7 K$ ]( i6 ^; I% U20.子弹对消:        暂停后,选择键4次,再按A键切换,此时敌人子弹可以打掉.
. I/ y2 L& h" N$ H19.全屏闪灭:        暂停后,选择键4次,再按B键切换,开启后游戏时按选择键屏幕内敌人闪灭.- G0 u3 Q+ J' S, [. @' b
18.全屏瞄准:        暂停后,选择键2次,再按B开启/关闭,子弹对消开启时无效.
9 P1 o( _2 D- [17.弹速调节:        暂停后,选择键3次,下开启,非暂停时按选择键调节,默认为1级,共5级.3 k& V# X, l1 o! J! F5 z+ X
16.困难模式:        暂停后,选择键3次,右键切换,我不相信你能够无伤通关.
2 }: G/ \( ^; M( G3 s1 @01.子弹切换:        暂停后,选择键0次,上=快S,下=快L,左=快M,右=快F,B=快普通,A=取消当前子弹加速状态.
6 a( ]5 e- s$ [02.无敌锁定:        暂停后,选择键1次,上开启/关闭,不用讲了,金身无敌.
. e9 D4 s, [* i) p# B03.生命锁定:        暂停后,选择键1次,下开启/关闭,生命锁定为16条.
8 N* R. k4 Z- |" R04.角色双控:        暂停后,选择键1次,左开启/关闭,无非就是主机控制副机.8 ^4 E- ^+ W% i8 j! E% [
05.生命底限:        暂停后,选择键1次,右开启/关闭,锁定剩余生命数不少于1条.
/ a& U- O* Z4 }8 {" A6 ]06.一击必杀:        暂停后,选择键1次,再按B开启/关闭,即使是第8关BOSS,一发花生米依然要其老命./ W& Y6 j+ L: @. F+ z% c! {/ p, f5 x7 F
07.角色浮空:        暂停后,选择键1次,再按A开启/关闭,第三关浮空时按选择键向上卷画面轴.' F2 P6 ~, Q. j' d( u
08.弹数加强:        暂停后,选择键2次,上开启/关闭,此时所有子弹发射数为15发.
' n/ T* c' x1 `) D3 [09.皮肤更换:        暂停后,选择键2次,下开启/关闭,主机开启时橙黄色,副机开启时为蓝色.
4 `; Q$ M6 x4 a10.混合子弹:        暂停后,选择键2次,左开启/关闭,此时连射时所有子弹混合.
3 a2 l7 o2 o$ j11.敌人锁定:        暂停后,选择键2次,右开启/关闭,此时敌人原位跑不动.! y" Y( g- P+ g
12.跳过一关:        暂停后,选择键3次,再按B使用,使用后可以直接到下一关.
  [* Y2 ?. [! U13.单双切换:        暂停后,选择键3次,再按A键切换单双人游戏模式.
8 Y$ w5 V7 P  t; {* p14.子弹方向:        暂停后,选择键3次,上开启/关闭,开启后发射的子弹攻击方向会随着操作的方向按键变化,第二关和第四关的小关建议关闭(开启的话打中敌人太难了哦).
. y/ q  p/ E) K1 @: n7 ?15.消除威胁:        暂停后,选择键3次,左开启/关闭,此时游戏时按B键使得移动物体被消除。
) b$ V! @; {8 S$ NA.做了一些汉化(小字体),剧情,关卡名及通关后的文字未汉化.% t% X8 R. E7 E9 X0 E6 Y% f; a6 A
B.自动演示通关,双人合体打通关,演示时有背景音乐,通关后一样会有结尾及恐怖台词,之后游戏进入选关(相当于游戏自动开始了).注:通关后P1及P2会获得16条生命!也就是说看完演示自动开始后第一版有16条生命!
/ M1 U7 P$ x! }/ q  aC.生命显示加强:最大显示15个剩余生命勋章!电脑端请开启精灵超过8个(这样勋章不会闪烁),手机端认命了,不过不影响正常操作.
/ J% p& j$ \' s5 {7 S8 t5 n1 V6 g& D
$ s5 w" i7 U& [/ n: j    如果有什么好的修改建议,恳请通过QQ(1490868135)联系我(也许我不在线,可以留言在QQ里)
. ~5 [& N$ E$ R+ Y8 g7 H欢迎大家转载,转载时必须注明出处.
+ J  ^* d$ O# r3 k
/ L$ X8 I% ?1 {
游客,如果您要查看本帖隐藏内容请回复
: \- W9 X, x5 H- n
: W0 I" ~  Z' T3 I
忙了一个星期,觉都没睡好,眼睛也疲惫不堪啊.终于找到解决方法了,目前VIRTUANES运行不了,请使用其他模拟器玩.
0 N0 k8 w1 [' w' b; t5 p4 {) X这几天的劳动成果如下:
  1. .ORG $B400
    : V. M- I' c; r: |; B1 I: [( w
  2. & ~; e/ i& ]+ f$ A3 a" R$ J
  3. 1 J( x! e7 _3 n2 j
  4. PROREG:5 e4 L3 p2 K4 v8 \1 T# Y
  5. PHA, H+ U; n: Z, ?9 s& L! g) n6 f
  6. TXA0 n) k% `  H& G- e
  7. PHA2 O( C' h8 o7 j9 r* x
  8. TYA
    ) [& L6 I1 F9 r/ P6 Z8 d, v
  9. PHA! W6 Q, q: q' f5 @( s
  10. LDA $254 {0 {  [7 `, t) o% c6 J9 @
  11. CMP #$01: D1 G$ A" L' g# A, u5 O3 e5 Q
  12. BNE RE- s! I6 \9 |% Q
  13. LDA $010A
    8 O& U0 L) l3 P5 u+ P
  14. CMP #$00& _' W3 c/ T3 A2 W
  15. BEQ P12 ~+ D  B- K5 l0 k: Y6 a

  16. * P9 Q3 B; O2 Z/ N, t, k4 U
  17. RE:  |6 M2 X, I/ r) t5 Y
  18. JMP PPUWRITE
      R, t+ T& y7 z
  19. 3 f3 }2 Z% x. M2 c. N; k- z
  20. P1:                ; 条件判断6 J; B" {0 o4 e4 j! i4 P" R7 W
  21. LDA $7FFF' F1 x0 H2 U  t9 }9 Z
  22. CMP #$FF5 w! l, v% V- B3 O
  23. BNE P1RP* _* ^- _* u( k. N) E- b* J/ c
  24. LDA $7FA04 E0 T9 L2 S! ^8 W. X
  25. CMP #$002 t+ A* L6 X3 c  y1 F
  26. BNE P1CMP) S) R; E1 V* T+ q" r8 a. |
  27. LDA $2001
    ' e$ j# z: C# A( z: O7 j8 M8 Q/ y
  28. PHA# O2 l5 p; H$ D. ^/ p: r) o; D6 A
  29. LDA #$00
    0 ?# E- W) N3 ]5 a- w" y
  30. STA $2001
    9 A8 d  |8 j) r
  31. LDA #$FF
    * R+ Y; q$ q/ R% S0 c
  32. STA $7FA0
    ; g( z8 p  l; Q2 _" V
  33. JSR CLEANA
    . w* ^- t$ @) n- v; L0 c6 E9 h" t
  34. PLA
    $ y1 d  S. m5 K, `" L" h9 I
  35. STA $2001
    + u. u8 |% B+ k; O6 w9 Y) y6 U
  36. JMP PPUWRITE( R! D) w7 N( n
  37. P1CMP:
    1 |+ x' d; c/ w, l
  38. LDA $7FFF
    $ j, R" x, U7 c, s7 i8 m
  39. CMP #$00
    9 B/ X& S+ d0 j( w; }" j. J
  40. BNE RE
    - v4 D6 t2 T7 I7 R( L. t, {9 z
  41. P1RP:
    ( |* i+ K. Y+ S6 E# k' k' C. L
  42. LDA $2002
    ( y1 A" Z+ ?% f6 z+ S7 m  O0 s7 p
  43. LDA #$009 ]( E2 F9 Y; s
  44. STA $20011 Q8 E$ V2 W# {3 o7 y
  45. LDA #$FF
    * E8 K# p# q; Z$ S0 B) N
  46. STA $7FFF1 D6 a. C1 E2 `, W- K/ n
  47. STA $7FA0
    * R6 R  w& R! R4 ~7 [
  48. JSR COPYPPU0 h0 T" l* n. Y
  49. PIRP2:
    6 R1 ]8 f# [: d) t
  50. JSR CLEANA4 ^7 H8 h! }+ O$ U! c* R
  51. JMP PPUWRITE
    $ J% N. I2 U) D- K, W
  52. : F3 o; g7 h- h5 D5 @% {5 P
  53. COPYPPU:* t0 \, G; _1 |
  54. L0:
    , v; J' }. B3 `# b. F: S
  55. LDA $30
    ( r& j: m, c4 h4 ^7 O% C
  56. CMP #$020 M$ _+ i5 W$ Z! f6 Q
  57. BNE UNPROFC/ Z+ U: O  t4 N) r+ F2 ?
  58. LDA $FC$ ^% l: i0 R3 G8 ]
  59. STA $7EFC) m. Y0 M# |* k1 C* V% f; k$ _
  60. LDA #$005 A8 a6 ]$ z9 M- i/ H
  61. STA $FC; @* o3 h2 J2 F1 l9 `8 i0 b) m: `
  62. UNPROFC:* Y: z% b+ s) _
  63. LDA $FD0 |1 C0 ]7 _3 B1 E
  64. STA $7EFD
    % P1 }# }  R2 C1 B& X! H: ^
  65. LDA $FF
    ' F9 W  X  K  i- N( k
  66. STA $7EFF
    9 ~, A6 e8 H  J0 I; f8 V3 l- B
  67. LDA #$00
    3 p1 y/ t8 V: ]$ P7 X8 }4 Z
  68. STA $FD  r+ z( l0 w, J  b
  69. LDA #$B0
    # P2 F5 N' }- N# O6 T; A
  70. STA $FF
    7 H3 U2 I  t  |- n  h! U5 [
  71. LDA $07C1- Q7 X( o; t3 @# \) {( q; K
  72. STA $7FC1
    : V: L5 t. G$ j4 B, a' a0 P) q
  73. LDA #$3F# h: \+ D1 y' _% b
  74. STA $2006* X4 S( e: y' ~2 K* N4 Z
  75. LDA #$01$ i+ N+ v; S& O& r
  76. STA $2006
    ; U5 a3 z, Y4 d& d  B8 v
  77. LDA #$24! f7 f" ^7 L1 |
  78. STA $20070 P# L% J; x% S5 k9 d) c
  79. LDA $07F6
    + f. X6 y+ y6 Z% _
  80. STA $7FFE. n" U# _3 ]+ y. T6 E9 J# ^0 N
  81. LDA $00FE
    % b4 n  ]  k  b7 I( O
  82. STA $7FFD
    # Y4 z8 J1 q5 ]! d6 C! r& s
  83. LDX #$00
    ' y2 e8 p4 A/ j
  84. LDY #$00
    ; z: ~" B: I2 X4 ^! ]
  85. LDA $BD
    ! \  l& k1 p+ r* L
  86. PHA+ z1 a; O  j8 u" N5 o. \
  87. LDA $BC; |" q  g# k) |% G
  88. PHA
    7 Q  L, ~: P5 o% g3 K: M2 s. z. q) U
  89. LDA $BB9 S1 }# T* ~5 D. I& @8 D
  90. PHA
    4 T( P' H' I, a
  91. LDA $BA: C/ d5 l4 r; m: r" }$ P% q
  92. PHA& K, h) ]1 J' Q7 a9 i$ [
  93. LDA $B97 w) t9 B- f$ m
  94. PHA' `% K  N; O8 n! x/ E
  95. LDA $B8
    , I. e' z3 _2 ~9 f1 E9 B* ]/ ?
  96. PHA
    - Q9 @. M+ z' W  w/ V
  97. LDA #$00
    : m0 Q& F- r' P+ U
  98. STA $B87 k8 c; f9 p9 i! m! q
  99. STA $B9+ w9 e  ~  F6 c0 j, |- _* _
  100. STA $BA% _; U7 L7 Z- H; c3 L4 u
  101. STA $BB
    ; u; B3 c/ C( k6 X# s& x6 q
  102. STA $BC- e5 B0 H3 P" P
  103. STA $BD) j- R& K+ {- J. r3 G
  104. LDA #$000 _  y) ^! z9 R& @" u  ~7 L
  105. STA $BA- Z, S+ Q5 [/ i* d
  106. LDA #$207 Z! D7 B, j1 B( c( X7 C" M
  107. STA $BB
    + ^4 ]7 N9 P0 ]6 i
  108. LDA #$002 `) w1 J, U4 l- e
  109. STA $BC
    7 d" _3 `) D# }
  110. LDA #$60: L; t1 @0 A7 I. o8 B  v; j: A
  111. STA $BD
    2 L3 F7 y" b0 j( ]7 G0 j* U
  112. " N: I( Y' s1 h, c( X
  113. L1:                ; PPU复制: m2 i4 ^+ q: A* p8 B! c% o8 L
  114. LDA $BB. m: _& r* e8 _$ g! A
  115. CMP #$30- W: [1 ]& @- o* \" t
  116. BNE L2% Q2 {2 a1 `/ d! Y3 e, Q0 P
  117. LDA $BA
    0 `# H1 k6 b8 z2 Q
  118. CMP #$00& F. C- k' ^1 T: N" C$ H5 ~
  119. BEQ PROADPLA
    ) d7 q, h) }' h- D+ j
  120. % z. }& w+ x: M- m+ `$ E
  121. L2:2 L5 s5 v/ O0 W. A
  122. LDA $BB
    8 L! z0 e3 G$ i8 Q& @- c
  123. STA $2006  K7 r; u; _9 ?* \: T
  124. LDA $BA- D; p9 i3 ?+ B* B) F
  125. STA $20064 R% s" C: {6 B# h2 s

  126. " r  |8 T7 r+ F; B3 Q9 z3 b' E+ J, v8 ~
  127. L3:
    * ?! }6 I3 v: Q9 k3 W$ l# E8 `
  128. LDA $2007
    " ?4 [" ~9 [5 x+ s
  129. LDA $2007! R2 z* Z( }; [2 T+ z' E
  130. STA ($BC),Y( I' v! D6 E: i3 {

  131. 8 j3 a4 t; i3 \; M2 G5 Q
  132. L4:
    ) G' `3 p: |% t' |: s+ ?
  133. LDA #$00: l! [  K; a% r9 L" g8 J5 I; A
  134. STA $2000
    7 y, ~# n2 b8 U7 b
  135. INX. U, I) s! U4 G: P
  136. INC $BA; ^+ s  J$ H; o/ M7 {0 N7 Q5 h5 Q* Q
  137. INC $BC
    ; g8 ~, ]8 V6 d# R- V; ]
  138. CPX #$003 _% C/ x# f" b; X0 u9 g. `# F
  139. BNE L1
    * L8 ]9 B7 S( @9 n1 `/ h$ c
  140. INC $BB+ d$ E2 @" `+ }. @& S1 k
  141. INC $BD
    , w* }, _, J, ]/ _  S( ]5 e% R: A& E* x
  142. JMP L1
    6 H" H) P) r4 D4 G% j$ a+ _
  143. 8 K6 o2 c. U. q, d# L
  144. PROADPLA:                ;出栈
    4 R7 e, O, q* r+ M" w$ v% A
  145. PLA
    6 p* N7 \7 L  e( Z  ?/ k8 w7 @
  146. STA $B8
    2 @- l, |0 t/ ?4 @
  147. PLA
    # a. C7 u6 C' e
  148. STA $B9
    % d" v* `1 P- g5 r% i
  149. PLA
    ' W3 \% Z/ @; Q1 S" y
  150. STA $BA+ ~" k8 k$ O: y8 u. a3 |) F/ _  A
  151. PLA
    ( Q6 a, z) q4 c9 S' v
  152. STA $BB
    ' N0 |8 m- k6 L+ f- w+ x: u
  153. PLA
    2 ^. q3 @/ C! B" t5 J5 @1 c
  154. STA $BC
    - J& H: O/ ~8 M* n8 z6 F' C1 }
  155. PLA
    / ]& N. y- H, t; {# V  P; Q6 _
  156. STA $BD# L8 \' |; S+ |' d5 g: E. v2 v, x
  157. CPRE:
      O$ T9 R& L4 N  O
  158. RTS) ]0 ?5 H. _+ [- i

  159. % v$ H1 Y5 r  R8 L' l
  160. CLEANA:                ; PPU清空
    ) L/ h, k, }# q7 P  e
  161. LDA $BD
    ! r! D! r4 M" x
  162. PHA
    , S' z) c& K; [. n
  163. LDA $BC
    ' ?$ o8 }! U5 i; Z
  164. PHA9 A+ \( b' T9 k3 Z$ R; R
  165. LDA $BB+ U: D/ Y3 o; C6 v+ |6 i; ^
  166. PHA& s6 R7 X; ?" a& c! b* W0 y7 N
  167. LDA $BA4 Y. e4 X1 E% _
  168. PHA
    2 v& M$ |. I# r
  169. LDA $B9
    , V( u( E4 B" p# T  J$ s
  170. PHA' ?+ D! @7 ?, ?- p8 S
  171. LDA $B8: e$ j% J  v2 Y4 x# j9 r5 h+ t
  172. PHA" p# f! F, ]8 P: r, b4 e% w
  173. LDA #$00
    & ^' k# U. R' |' ?1 |9 v& W5 X& l
  174. STA $B88 X% T% W9 d' s- O1 |5 e) o
  175. STA $B9
    8 C: S8 H8 v4 [0 u6 Z+ e
  176. STA $BA/ o% P* Q/ R# x2 ~* i
  177. STA $BB1 i/ j  T7 [( ^; O5 j& L
  178. STA $BC& j9 X+ T' A; |* @2 M
  179. STA $BD
    4 j$ {. J. l. I2 s5 \$ X
  180. LDX #$00
    ' Z4 c+ S+ H3 ~' y  }5 A
  181. LDY #$00/ M+ @! h: ?' i* n5 C! ]
  182. LDA #$00
    ' z( T8 @5 @; T  h! `
  183. STA $BA" k: c8 I; \' {( H
  184. LDA #$20
    8 C8 [# B* M2 R
  185. STA $BB% ]6 h8 o5 V) k4 O

  186. & k, K( |; P: h8 z
  187. CL1:
    ) i& n) |6 D- E' j4 t/ R2 `
  188. LDA $BB
    8 {0 f- U6 U5 x: x+ b, [2 X. l
  189. CMP #$30
    ( |) I, F$ z3 c! z4 t
  190. BNE CL2$ t" I( w8 b! h9 Q4 I! R7 n: p8 v
  191. LDA $BA, W; @7 s% O" n- \
  192. CMP #$00
    9 U. E+ H# T- j2 I$ e, m
  193. BEQ FREEWRIYE! R1 X; p! w& i- a+ V4 W
  194. ( p4 S: P3 T" B2 B& \! x% A( {
  195. CL2:
    % b% U1 z4 a8 r2 G2 C
  196. LDA $BB: W- ?5 o! S& Z8 W
  197. STA $2006! @4 f) O2 Y3 {7 t
  198. LDA $BA- T0 U0 ]) s* X. T" J8 [7 N
  199. STA $20069 Q9 u5 k5 n, G0 j+ D

  200. + D- j: C, U1 S& }+ w+ M2 m. [
  201. CL3:
    ( c$ C. V" T+ [( \" I% p
  202. LDA #$00& ^% ]( x& R% P+ X6 S4 T4 r
  203. STA $2007
    $ V! u1 g  A1 ?! S" M8 c1 U7 r

  204. : p2 y+ P* u0 e. U
  205. CL4:
    * s2 g2 r' ^$ @; N
  206. LDA #$00
    4 F6 Y3 r6 R) L. T+ e: |
  207. STA $2000: L- x( F9 _' b5 W
  208. INX
    " |/ S; A$ l0 |; k
  209. INC $BA6 N, Z. N" {) [5 E( R' ^6 I7 Y
  210. CPX #$00
    / b. S  H) Q8 v2 s( Z
  211. BNE CL1  r- P+ W5 l1 P9 v7 {4 }+ m
  212. INC $BB
    1 `; c; b" s1 A6 T2 c+ R  R  N
  213. JMP CL1
    0 j7 V+ m  H1 F/ S8 p5 h
  214.   F! L( |! a; V1 P2 j" P% O: d. V& b- ^

  215. 0 |+ w8 `6 f, \# K0 ?
  216. FREEWRIYE:4 m9 R) Y- o  ^- _7 @
  217. JSR FREE
    * T2 S+ O" j  l  {2 W8 s0 J4 W

  218. + g  c& M# ]0 K2 l

  219. 0 _+ a* y! _7 k6 h
  220. 0 y3 s1 v  z& X' h3 h: n
  221. $ N$ K! K( h1 _8 d( ~7 q2 p

  222. + G3 P! ?5 `. r* f5 P3 T% `. ]+ a
  223. CLEANF:                ; 恢复现场
    7 @1 [) Z; L0 Y7 |- q
  224. LDA #$08
    ) G5 h7 d) k$ j3 a
  225. STA $FE* A" b$ G" C: m1 g2 f+ ~! c
  226. LDA #$007 h! J5 \2 w5 r
  227. STA $07F6; a" W4 J0 G+ C! X9 |# p+ s
  228. LDA #$24
    0 p' q+ F5 y$ O  U8 b! `
  229. STA $7FC0
    0 u  ?+ `8 u4 o# w% b9 Q: r
  230. PLA, \6 g# e8 d0 s: ?$ @. D
  231. STA $B8( p  h5 w; {) x
  232. PLA
    3 x* l$ C) E8 T+ |+ ~6 F
  233. STA $B9
    4 `6 a- G/ Q! w3 z: N7 T0 L
  234. PLA  g. m. r- `  z) ?8 N
  235. STA $BA
    - v3 W* z. f$ d; C; x8 w7 T) K& h
  236. PLA# r9 G2 z7 G1 S$ ?4 J
  237. STA $BB, a4 R  I2 `! d! w$ S
  238. PLA
    ! m+ I4 z% K' a
  239. STA $BC% e- B# B( H" }! n2 G2 b# }
  240. PLA1 w0 V, I. e% I
  241. STA $BD
    5 f1 d, Z& e# G* r/ Z
  242. CLRF:* `) v* x) @. B$ L. V( w
  243. RTS
    % a7 I9 }. ?$ X3 y6 w- [. O8 D5 p
  244. & R* r) ?. a0 o) ~2 [' j
  245. W_DATA:
    0 W# M/ u( k( S$ |* X7 w: g! @
  246. .BYTE $00,$01,$02,$03,$04
    ' B* `* Q' e% j) W' e' s9 x" [' r) [
  247.   
    " Y0 u5 C/ {5 o. S5 H! E
  248. W_PPU:! E$ N6 J6 W9 t/ ?. k$ |
  249. .BYTE $98,$97,$90,$9D,$969 |  B5 g3 {: Z: t7 G/ f  o, |
  250. ; U0 O% X6 X/ ~% j( Y
  251. P1_STRING:5 E; J9 w+ h, e0 j. J6 [
  252. .BYTE $9A,$82,$00                ;"P1"
    7 I8 e  d* ~" a& N( O+ r$ c# l

  253. , a+ A+ A8 B3 O
  254. P2_STRING:: k: P3 B3 F% s, S6 J
  255. .BYTE $9A,$83,$00                ;"P2"
    7 B4 O; G% F' j1 x+ H" s7 f
  256. , c( X; O" c) T, ?& ?$ Z
  257. WEAPON_STRING:" _! e4 k" L* S* E
  258. .BYTE $A1,$8F,$8B,$9A,$99,$98,$00  ;"WEAPON"
    1 J$ |1 }/ V% B8 ?5 N

  259. 8 X% ?+ E3 ^. G
  260. RELIFE_STRING:' w! r. N9 ]; S7 Y, v' t5 X
  261. .BYTE $9C,$8F,$96,$93,$90,$8F,$00  ;"RELIFE"# u8 `7 d0 b) W
  262. 2 @  E1 Y1 n' m, `( L& I; i: m$ K
  263. P1_PPU:
    2 V' G% C1 V6 N5 h: M
  264. LDX #$00
    + [8 V7 j+ M% x4 `3 x) I

  265. % V, ?1 [4 q+ d1 ^* I# n8 a
  266. P1_PPUW:
    ! F$ N: G& Z% b6 m8 |% L7 w
  267. JSR PPUADDR_PROCESS1 B6 I2 w; w6 g' U% n
  268. LDA P1_STRING,X
    7 L9 Y: m6 y0 }& E! m
  269. STA $2007
    * y1 u! [8 I1 W; J( B/ J
  270. INX' X0 a" j3 q3 b
  271. INC $BA% l) G# H4 p2 M3 c# C/ U
  272. CPX #$03
    : j! P. B( h( u# C% N
  273. BCC P1_PPUW
    # W* g: w0 A! a+ a
  274. LDX #$00
    " w& G4 P& P7 g
  275. RTS. Y' Z  e3 J5 k1 G, B
  276. 8 i, M1 u  X* z/ {1 c) S8 G
  277. P2_PPU:9 ^/ S2 q9 G" w: g4 N
  278. LDX #$00
    , r0 g) ?1 I4 S7 A) k

  279. & j2 t0 Y; t' _6 G( h1 `+ C( Q
  280. P2_PPUW:
    & F; i, E# `1 k8 D/ Q' L
  281. JSR PPUADDR_PROCESS
      c) z4 E1 W1 h" B5 o! J0 z5 {. p, y
  282. LDA P2_STRING,X. y( W  X" |+ o* U
  283. STA $20078 e3 x' i3 G- }7 N$ f$ Q& Z0 A
  284. INX2 H3 |, P8 _$ X5 q4 t
  285. INC $BA2 ^: s8 K$ S+ i3 Y, G& Y1 s
  286. CPX #$03$ q& @$ E& C$ Q6 m) W- g
  287. BCC P2_PPUW
    ( l2 `- o: ^8 [( E- V( z1 A
  288. LDX #$00" B* x" @2 n/ {# K; I: n
  289. RTS
    . w( v( J, q  c
  290. , ~. w* \% q4 |/ d1 s

  291. . }/ c# E& J/ E* j
  292. LDA $BB
    8 [9 b; I# Z' n3 |2 @
  293. STA $2006
    * [& ~: G6 G$ T# F& U
  294. LDA $BA
    4 ^! S# s( ^. `0 c
  295. STA $2006* g- V% Z% x& R7 Z5 ~* [: I
  296. RTS
    - Z# q3 @7 u0 h- J

  297. & }$ y. n4 l4 i
  298. / s- E5 V/ g( C4 t* R6 S. p- W' x
  299. . t: S3 e9 j2 p7 `: V
  300. PLAYERLIFE:% D& a/ t+ @, N3 M. d
  301. JSR LIFETODEC; {5 ^+ Y$ n! R; Z8 G- A
  302. LIFEPPU1:
    ) n- Y7 v; {5 r& i0 Z
  303. LDX #$004 h3 E) ], O( x$ ]2 E% V/ B
  304. LIFEPPU1RE:
    # z' s9 E) R! s8 @" ?- G
  305. JSR PPUADDR_PROCESS7 j  Y- _5 z- u6 K0 Q. V2 D
  306. LDA RELIFE_STRING,X
    & H* q! W' W# x- c
  307. STA $2007
    & [& ]- q$ e2 W2 d/ y: D! W3 \4 k
  308. INX% Y  t+ [7 S4 s1 }
  309. INC $BA
    # R; |  S* l  {, z" e# F; h" L
  310. CPX #$079 O2 h" \' s! z- L9 Q4 V2 l" n4 D7 E
  311. BCC LIFEPPU1RE
    8 R. t' Y6 t( I( e, q( l
  312. ) H( |3 G# |/ }) t5 O# P  H* o* w
  313. LIFEDEC:                ;生命显示写入
    % r8 M. S, R- }( f! X
  314. LDX #$00% ~" \. h& V4 G; N& u% |
  315. LIFEDECRE:
    ! F% w7 L" K+ F( D- g* B$ P/ J
  316. LDA $7A03,X
    # p' A" u- ~. V7 O9 s3 w: R
  317. CLC
    & a0 }$ i8 i) f) U2 E9 S  P1 T: o
  318. ADC #$81
    / K2 n6 j( b1 ?* S( H
  319. STA $20079 U& z2 B8 J/ k% d0 E4 R# I
  320. INX
    , |- {+ a' q% }/ j0 s: E  R
  321. INC $BA
    : f6 u+ e& P( T% z, X  S
  322. CPX #$034 @4 \" z" _0 Y% }4 K( i; }4 Z6 a! i
  323. BCC LIFEDECRE3 |1 g' n  y9 K2 m) t* L
  324. LDX #$00, ~7 U! j7 H' T5 s* F5 \
  325. RTS
    2 J( }. O4 X1 W

  326. & p% g: Z/ f( t, j# ~, l
  327. LIFETODEC:                ;十进制转换
    # B% I% s( [9 w% @+ ?7 @2 s
  328. LIFEL1:        ;initialise9 {8 r! `, _& l7 T& J
  329. STA $7A00        ;$7A00=F3
    " E2 W, _, d5 K3 b. W: W6 h5 P
  330. LDA #$00
    / [1 R! Z  }* {  T& H: f
  331. STA $7A03        ;$7A03=00* e7 n6 m4 T, o
  332. STA $7A04        ;$7A04=00
    # s7 s* V, V& a( t! ?* ^/ r
  333. STA $7A05        ;$7A05=00
    ( q$ ~0 G) Z! Q6 x+ I" I6 n
  334. LIFEL2:        ;copy data $7A00 to 6001" C- C+ |- O; _9 J5 p* E' i: I  M
  335. LDA $7A00' d/ B1 X2 o8 L2 K
  336. STA $7A01+ ?7 o4 W/ ]  O+ h0 C3 Q) ]

  337. 2 b  C* `+ u- v- S& }+ |
  338. LIFEL3:         ;hundred
    8 B. n+ ]0 Z1 H9 D  H+ v
  339. LDA $7A01
    4 O5 M) ~! }; Z) L7 q
  340. CMP #$646 x0 {: y4 V+ i8 f2 R
  341. BCC LIFEL6                ;$7A01<100 goto L6) t6 ~' M- K. k+ |( o
  342. LIFEL4:3 l2 _8 ^8 t+ ?4 d; _
  343. LDA $7A01
    * M6 u4 y$ {* }" \/ `' D
  344. SEC
    $ T1 E- {4 T3 x6 I( y
  345. SBC #$64        ;$7A01=$7A01-100
    7 k% n+ ~7 J, Q/ X
  346. STA $7A01
    $ X7 F0 V+ ~# n6 W6 k# Y6 ]
  347. INC $7A03        ;hundred++
    . T5 A; S' L5 ?8 ?) V
  348. LIFEL5:
    + v* U0 P) |: y% J
  349. LDA $7A01
    1 j' K: H" _  R. o1 e: j. {
  350. CMP #$64
    $ Y  g! D" h/ ?1 j
  351. BCS LIFEL4                ;$7A01>100 goto L4
    # o# G+ I4 G2 @' N
  352. 6 j  X, q5 k" h  {
  353. LIFEL6:        ;decade
    " E/ ?% j- n. t" {. o& M- e
  354. LDA $7A01  e: c/ |5 x) f; T; O8 n
  355. CMP #$0A
    4 Z! d, `# M: g
  356. BCC LIFEL9                ;$7A01<10 goto L9' ]) h" ?% W* J. q8 e% I# }$ B
  357. LIFEL7:       
    * Q/ P# i2 N1 c0 Y/ l
  358. LDA $7A01; R( d. l! U  }0 T7 ^( {6 `! z
  359. SEC
    / ^0 p' e% }) A9 `
  360. SBC #$0A8 m0 A# r. ]( i# f
  361. STA $7A01        ;$7A01=$7A01-103 T, i: W! m( U1 }* n! g' b: l; }
  362. INC $7A04        ;decade++* R; s, W' k- W9 U7 Q
  363. LIFEL8:
    ) T( B6 x9 M3 }* X
  364. LDA $7A01
    0 B5 N4 V! t! _* \
  365. CMP #$0A
    ( l$ y! ?, T# y2 J5 }
  366. BCS LIFEL7                ;$7A01>10 goto L7
    4 y; j% t( j: T4 t" U( W
  367. ;unit
    2 K) d5 ~' B. n" o- U
  368. LIFEL9:
    + ?  O6 S1 T5 q
  369. LDA $7A01        ;$7A05=$7A014 n* o. N3 Y/ B, n$ b
  370. STA $7A05        ;unit" K4 E. O( b( q
  371. RTS        ;return: O$ _4 H& m; I- q5 [

  372. 7 ?  O" N, S& o4 f/ w
  373. ; }  P; }" K9 v8 z$ W

  374. # R- i; W6 Q4 q* r2 j* z! u/ n  _4 \
  375. WEA:                ;武器ppu写入
    * l2 K3 I8 a3 w& _4 l8 S3 @9 C& _3 d
  376. LDX #$00
    # q. S8 Y# t) Q; G* y
  377. WEARE:3 E$ M0 {7 k$ j  Q) r0 {; G2 D
  378. JSR PPUADDR_PROCESS, }7 i/ g2 t( O' p. p% O
  379. LDA WEAPON_STRING,X
    / t% [. D9 W+ l! O: C2 C& T
  380. STA $2007
    2 [( [# _# v: p/ W
  381. LDA #$00
    2 x, A9 H1 ?+ M3 P* t  j/ Q# W% n  R
  382. STA $2000* m2 q; U' C8 q+ X7 h8 R3 i9 R
  383. INX" x5 _  o0 ^* I% l' R
  384. INC $BA
    6 b3 l! C( Q' }
  385. CPX #$071 \+ g, W, r& {, n+ V7 E0 W, Y
  386. BCC WEARE
    , X) Z  Z* S" D; b

  387. 5 v6 [; e  Z& F: _* E
  388. READ_WEA:# _$ _$ X1 m; T$ u% Y
  389. LDA $B9
    / k, _; A7 Z- [6 F. t8 t6 q
  390. AND #$10  I: J' ]0 C, Y8 D; H2 n
  391. BEQ NWEA9 o  c* x$ v! K7 w
  392. SWEA:0 O( f, e5 \' K4 p- x5 }
  393. 2 u1 a+ V2 q* I. M; X) C" ?% y( C" Q4 r
  394. LDA #$9D# c2 W6 [( l( b# J4 d
  395. STA $2007
    7 {1 S" W) b1 s" h. x. X
  396. LDA #$005 R3 H6 E, O! L  ]5 Q/ W
  397. STA $20004 q1 \; r3 d( m, ^! j$ |  X
  398. INC $BA
    6 J& B; C% F* G% w+ `9 @* `
  399. LDX #$00
    % f6 C# \. Y8 L! B/ K3 j
  400. JMP WEAREAD
    " t# ?* @9 X( {7 g4 j* P
  401. NWEA:
    4 m+ D! |  J9 \# _. A( j; a9 Z  P
  402. 3 |1 K% O% R: T! k
  403. LDA #$8D
    ) \7 }2 E0 g2 O/ c! |
  404. STA $2007
    * X. V5 H; {3 ], C7 B. V
  405. LDA #$00$ ]- F; O  H1 b. @1 R
  406. STA $2000' r, G! A- D5 V: O. Z6 a
  407. INC $BA
    0 @4 S* k+ A; u) H
  408. LDX #$00
    9 `: j# Y* `' ~
  409. WEAREAD:; w7 m6 p9 E2 P  J7 I2 g! [
  410. LDA $B9: S; T2 ?, j0 f6 \
  411. AND #$EF
    . @: W1 N/ h" h3 }$ s) u" R7 j
  412. CMP W_DATA,X! J& @- a% t( H( C% _( B
  413. BNE WEACMP9 t1 D% r2 Y+ O+ S3 U3 s
  414. ' G" Z0 t  L1 O- t0 P
  415. LDA W_PPU,X
    0 B. G6 Y7 [( ]
  416. STA $2007
    6 V" g3 A- d  d3 b% ?& _
  417. LDA #$004 D* W9 k$ m/ ^
  418. STA $2000: w- d: W7 ]+ H* G* K) |7 [

  419. ; D- |5 q6 E! O) c: C" B. x8 ^
  420. WEACMP:
    * p3 g3 n! [" |
  421. INX/ v8 F+ Y9 V% Q/ U9 K, L* N! J
  422. CPX #$05; y  s/ X, j! }, G# f
  423. BCC WEAREAD& ~% G$ m+ U" M5 L) @
  424. RTS
    / e- k7 w; E; r2 F
  425. 7 k8 y! r$ m4 v% @. i8 I
  426. 9 v5 s# ~  J% I1 f% {1 D
  427. PPUWRITE:4 T- k6 e  w! D5 L3 H/ _$ I( C6 M( X
  428. PLA0 ?5 ~& t, I. m" S3 c+ u3 S6 g
  429. TAY" X: _- f. m+ y3 G
  430. PLA
    7 s$ B6 u- z$ ?0 p
  431. TAX" @% h% y: U  O& h
  432. PLA; b( K" s8 y$ B1 H
  433. LDA $25  ~0 \0 B$ |4 o$ j+ z( A2 X
  434. CMP #$00: S5 ?, w. j7 x5 @
  435. BEQ WP1# g4 }9 B2 ~9 X& I' t4 Q. c+ E# g
  436. LDA $25( T  v) x2 F: B8 r- d8 w
  437. CMP #$01- P; `! C, R( O: x: b# k4 Z% @
  438. BNE WRE
    $ v  j% v! @/ W( }( p/ P
  439. LDA $F5,X& G0 H3 N6 p7 m' _+ N: P* S+ k; I
  440. AND #$EF. Q% c. u& K0 B+ \) h
  441. BEQ WRE
    + I6 s! }) H0 Y- v" X5 n% B
  442. LDA #$00  l% j9 f8 i1 J  }1 s; k' e
  443. STA $7FA0) E+ J8 g! O! ?8 `5 d
  444. 5 _8 Q3 E3 W) B2 w+ ~. V
  445. WRE:* ~1 C8 w4 ~- m( T/ C  o  F1 i
  446. JMP $A000. F6 `, t$ i3 T; X7 m3 [
  447. ! J6 ~  k% Q9 u% q0 a  Z2 }0 J% Z
  448. WP1:
    ! j* H9 e/ l1 p
  449. LDA $7FFF
    * p2 X( g3 C! v2 B
  450. CMP #$FF
    ) h; P( r7 q2 x
  451. BNE WRE
    ; x/ X% M; ]1 W( V
  452. LDA #$008 [( X8 D+ d9 q' S4 D) ?8 J6 s
  453. STA $2001
    ' m0 _( y& Q3 {5 Y$ m
  454. LDA $BD5 a! e! y2 ^" I% h
  455. PHA0 o( g/ |' E% ]' a
  456. LDA $BC( D) ?7 @6 g9 J2 I% U
  457. PHA
    3 A2 z  B3 j8 t4 P. B5 K' B
  458. LDA $BB& W% Y7 ?' L; V, h4 m  p' X
  459. PHA) ~" I" ^, C9 l4 z9 {. R5 m
  460. LDA $BA8 q8 P% i" l- Z1 `, j- m' g
  461. PHA
    % S5 B3 j4 |) u
  462. LDA $B9# {: Q; k7 m6 p& p
  463. PHA
    9 n8 I' M1 P. U5 o7 N/ h# [* a' j
  464. LDA $B8
    1 z/ K5 p, R+ h1 u
  465. PHA! r9 _+ S( b/ W# d1 c& x
  466. LDA #$00: h/ C! C3 o0 _7 `& A8 A+ t/ O
  467. STA $B8
    ; K! s: F2 R3 [0 k% z
  468. STA $B98 C  W: C; ]: \
  469. STA $BA0 l# V" W# G7 M
  470. STA $BB; u; ~% j0 P2 m1 F
  471. STA $BC
    1 N8 {- G0 m# R$ p. n" o
  472. STA $BD% I5 ]! ~+ N+ k! h
  473. LDA #$00
    7 a' L( T; Y1 c5 c, X
  474. STA $7FFF7 ]; C6 \1 H- Y! ^% E
  475. LDA $30
    ; W5 q% m+ T& _; E0 K2 j
  476. CMP #$026 m! o, y& J, n1 a
  477. BNE UNPROCPL+ e$ S( i% K3 t6 e! [, m  A( n
  478. LDA $7EFC
    * x9 W' ]# a# F. M" l
  479. STA $FC6 a& Y% h  k+ z$ q9 ~
  480. LDA #$00
    5 i/ m2 n( K0 x
  481. STA $A4) }( Y. j, \1 C* t- }; G
  482. STA $A5* D" p1 ^4 j  I: F% @& v
  483. UNPROCPL:" K$ _% D. d' B4 ]3 E2 ~
  484. LDA $7EFD
    5 R1 T- L4 s( {' X0 G. P
  485. STA $FD0 X7 J: d$ n% x# g$ O% e4 K; k
  486. LDA $7EFF
    % B1 h. R. _) O+ [1 r
  487. STA $FF
    ) L' P1 ^; A# A3 g2 a* V6 }6 t1 p  r5 z
  488. ( ?1 W8 D$ o0 m  F' v4 \  D
  489. WL0:+ z  C9 G* t& `* Z
  490. LDX #$002 {. z9 E8 j8 h, G0 n% _. z) V5 o
  491. LDY #$00" a+ K. z) A$ z4 m. \
  492. LDA #$00
    2 Q* k+ @0 V0 h  h' [4 i
  493. STA $BA
    8 x( ~, j& c+ n3 n& @! Y
  494. LDA #$20  X6 n/ q( L% ~/ R  A. q; a
  495. STA $BB, r. V, {( z" S
  496. LDA #$00
    # l5 d: [4 S' h; S' p6 R
  497. STA $BC" ^; A+ [3 @( d8 ~7 w
  498. LDA #$60
    ) T) f( X7 M5 ]4 y5 ]" ~+ _; a
  499. STA $BD$ ]6 t! m5 `3 J1 t1 x$ H" o

  500. ( t* e' p- [7 N7 H6 F# E4 x
  501. WL1:" O- d5 J; i# ?; y8 [9 \
  502. LDA $BD, ^: @( E9 y) ~, n1 q% T8 Q1 E- C
  503. CMP #$70+ q$ v) g( D+ x- W
  504. BNE WL2/ Y8 B4 R" A  r& [! |0 T
  505. LDA $BC
    & s) ~/ s! f: I! O1 z
  506. CMP #$00. B: {4 C/ \8 h& Q7 ^
  507. BEQ WLR" L, Q2 t9 d+ t  ~! S
  508. , l; C3 h. R; ~1 _7 z/ L
  509. WL2:
    / m6 m8 `9 v7 S5 N6 {
  510. LDA $BD
      I3 j( \2 `2 s$ m1 K7 n: |
  511. STA $2006
    , q' l- Z+ d3 A7 K; ?: L
  512. LDA $BC
    7 W4 ]- X2 E  [$ K
  513. STA $2006! B* y/ {9 u) L' m

  514. ! \3 ~) c$ \2 `/ q0 p8 a
  515. WL3:3 I- o; |+ ^7 m) Y5 {) ?
  516. LDA ($BC),Y
    & k0 K; v4 L" n9 \) O) C) I
  517. STA $2007/ \1 r$ b. s- }+ {+ B  @3 K

  518. 4 I; r4 Q" |- ^+ ~& U
  519. WL4:! t, A9 k! {5 B$ T9 s2 V
  520. LDA #$00
    0 R6 H! G9 c+ k% S0 L
  521. STA $2000
    8 X1 t) S+ {3 |3 A/ m1 C; t
  522. INX
    ! X5 ^) B: r5 l1 C- ^
  523. INC $BA+ g  g! i6 `' D2 ^5 q
  524. INC $BC
    + Q; v" V5 m# M# P8 h6 e6 G
  525. CPX #$00
    + V0 c5 U. ?4 ^
  526. BNE WL1
      |- N- L6 N2 g( B$ T' N
  527. INC $BB: L* a- `' m2 s/ P4 L7 N
  528. INC $BD
    $ w, u. T# x& }8 D- }
  529. JMP WL1* L2 w( |% A" q4 S
  530. 7 z, L1 {8 @' l; f- ]
  531. WLR:
    / K. J, E  e. x+ I& `, ^# Q
  532. LDA $7FFE# L0 Y( P. J) g
  533. STA $07F6
    7 N: j  W4 N# n" \8 l5 {
  534. LDA $7FFD
    1 x% ]/ G$ n: v- V% \4 x! w
  535. STA $00FE0 m# w% _- q& z' m. O. Z; B1 }
  536. LDA $7FC1
    # n3 \5 j% \3 j5 r' g9 N
  537. STA $07C1
    7 j. W+ i2 G# z9 S2 N0 ^8 w
  538. LDA #$3F
    : f* y( w% w2 M" ]9 \/ t! c1 B
  539. STA $20062 o& M1 Y' \" J8 t/ s- {
  540. LDA #$01$ p) a! D, u$ W  W/ Y0 ]6 Q
  541. STA $2006% Z' j! M: t0 n( v0 {. g7 V
  542. LDA $07C1+ Y7 z5 `; }" k  ?+ d
  543. STA $20079 P6 n0 F" A! M( w- C: C  \
  544. LDA #$00! S. g1 {' j' O( q* T
  545. STA $20009 J4 J) j& w( B3 `: }3 \5 Y! K
  546. PLA
    ) t% F" n: A) i% l, e6 k  r; B
  547. STA $B8. h/ K5 F$ f. g" j, [6 H* R: y
  548. PLA& r0 T6 [( U6 h- s4 \' o
  549. STA $B92 C: L$ s, _' k! T$ {4 s7 i
  550. PLA: I1 E( {- s: S% F! Y, X, Y+ o
  551. STA $BA  h$ A8 |* O' w$ v5 I% _
  552. PLA" J5 t: y% y. x* I) Q5 ~  y
  553. STA $BB; ?4 v  k6 N: D+ x0 U2 B' l
  554. PLA
    + o" _* v1 W0 u) I6 e& h
  555. STA $BC
    : Q( e+ W$ Y% u
  556. PLA
    6 E6 u" p7 I* M2 _+ X7 q+ ?
  557. STA $BD5 \( D3 [, e) i+ k# H
  558. JMP $A000
    * g; D; X* A/ n( F

  559. ( G0 _2 ^1 h7 Z/ w  M
  560. FREE:                ; 暂存器保护
    1 z( E3 ?3 U# W5 w* X' ^
  561. LDA $BD
    + f( @; B/ v& R% Z7 f% c" h
  562. PHA* a5 R" s0 N& h
  563. LDA $BC$ j1 U0 E) ]6 ^# R6 I6 ?$ x* f
  564. PHA
    8 ^: e5 ^* o0 Z; D. \$ j. C
  565. LDA $BB  }% \6 |8 H4 ?( d
  566. PHA# y; f0 [9 V- }% {
  567. LDA $BA
    ( w! W( k* R. O  k4 H9 q3 Y
  568. PHA6 X% b- x& K9 |+ N5 u5 F
  569. LDA $B9
    ' X! i  V7 r. K1 @* y5 i+ {% S! V
  570. PHA
    * H4 D3 f/ J6 t: b0 \4 C9 q
  571. LDA $B8
    8 G3 U1 `7 Z1 R9 v$ T+ Y: \0 d
  572. PHA. ^2 b/ t+ Q2 @2 r
  573. LDA #$00
    - b3 E0 a. r* J. z. B7 d
  574. STA $B8
    * K* h& M9 m; x: m
  575. STA $B9+ N) l$ q. t( x% m& \$ x! r  Q! [1 L$ u
  576. STA $BA
    . l. x. L7 Y, L* O! v
  577. STA $BB
    " E3 r. V; P  |' h& S7 r2 t
  578. STA $BC
    : P4 `- z% u$ E0 M: F$ T2 W: Y& h
  579. STA $BD7 C& Y3 W9 t/ j- K% J5 k! }
  580. ; [8 l4 i! Z/ ~- K, N8 }
  581. WEAWRITE:                ;武器ppu写入
    - \) U' l) f, X' Z8 c  O5 Z9 e
  582. LDX #$00, _1 O8 }$ Z/ N& I9 V7 K
  583. LDA $AA' ~& }( M6 Q1 N% e
  584. STA $B9: L+ C9 P9 o* A9 T8 ^$ j
  585. WEAINI:                ;地值初始化. a6 e, \4 t$ _
  586. LDA #$A4# Y$ k* }' J5 _
  587. STA $BA* S9 K* t: M$ W- @$ n
  588. LDA #$20
    4 T7 m! `$ c/ {; U: k: k5 [
  589. STA $BB
    , A3 U, c, }/ v+ G
  590. 7 d& M3 E$ A- H  J1 e
  591. . d8 C2 V0 i2 f
  592. JSR WEA4 u: T" Z8 S2 I7 F1 ]
  593. LDX #$00                ;武器ppu写入* b5 O+ T2 B2 Q
  594. LDA $AB
      s5 x* q, k% j1 l" D+ c: |7 q
  595. STA $B9/ z6 c5 _6 p- |: t/ u- h7 W& Z) o) U
  596. LDA #$B3
    : y, q. v5 V5 ?' F3 S( y- R8 _4 o4 o
  597. STA $BA
    . B0 k3 p. f/ k* ~
  598. LDA #$20
      j' J/ I  @% g5 K( U% y
  599. STA $BB' ?, c+ p9 V" [/ ^# b3 V7 H7 K) u
  600. 6 p9 t" A9 p; c" r4 T8 v+ E

  601.   f6 m; i& w$ G) ^4 m7 y2 H) B# P
  602. JSR WEA
    # e9 @- Y# u6 A% C
  603. 0 Q- c) V( ~- R, V9 H
  604. LDX #$00
    " _* ^! X, D3 Q- e5 a5 ]6 {
  605. LDA #$E44 Q3 g- A6 u# r# R% j3 r
  606. STA $BA
    - D1 y/ i: q" A; b
  607. LDA #$20- ?: \% J4 ?, f/ e9 i: a
  608. STA $BB
    ( _# n2 x# x7 r+ s# O

  609. ( g$ ?, E9 Y  D: p
  610. ' {3 B# U  q' B$ {
  611. LDA $323 B  s; J( Z0 p
  612. JSR PLAYERLIFE
    # Q5 L) p9 W8 k9 x2 G' v
  613. 5 M- y0 e8 q. h  n7 B; T
  614. LDX #$00
    ( n  ~0 b7 U: T
  615. LDA #$F3+ i/ b7 \7 n/ Q: c
  616. STA $BA  W3 G- C+ l; k9 H( A9 s! I
  617. LDA #$208 h% [9 `+ D$ z% O7 j1 `
  618. STA $BB
    1 o  `& y$ X5 O8 ^1 t1 S; O/ A
  619. ) H9 a) I+ l8 S, z
  620. 5 n: ?5 |! y, l" l" |9 m
  621. LDA $33
    * B7 I# k7 p% u9 \. m
  622. JSR PLAYERLIFE
    ) h7 x# S0 ^' B/ d

  623. 4 f" N' X3 o( F! i/ j
  624. : @# q6 m/ ~( L  k! p" h
  625. JSR PLAYER_01_PPU7 k+ F0 G/ B$ W9 E
  626. JSR PLAYER_02_PPU
    9 q: x. ~$ Q) _3 c, W! r
  627. ! E( C7 Q  M: W7 `+ F+ Q

  628. ! ^* S: d* J0 \3 Y( m
  629. JSR PAGE_PPU& H  G4 \1 o, _4 |2 N. \) y6 q
  630. JSR PAGESELECT6 s5 t" `$ f- m+ A; e
  631. 8 D# W' L0 q/ Z% K0 X; L7 K
  632. 2 }) h! W8 ~3 K/ p) {$ w
  633. 5 g: l5 D. g( s7 O/ l" r, X. B
  634. 5 u; F$ O1 E3 M

  635. 8 A& |, i- \6 e  U7 r! ?
  636. 1 y7 [' r( @, S1 {3 x, q' L6 C
  637. 1 P9 T$ q( y& C* K! q/ f/ }
  638. 4 e: q, @8 W* b0 }, i& C

  639. # k/ A5 h! |- z8 Z" ?

  640. ) b# O/ e8 W1 H/ Q4 C/ Y  _

  641. 5 u- A; i6 e1 g' |
  642. . p1 q( O+ K. b2 M) x4 W% {0 y

  643. - x- I: U! }+ }+ g( d
  644. PLAPRO:                ;恢复现场
    1 j6 X& Q% C) S& k1 k
  645. PLA
    8 x8 T: d: D$ I; W- x2 |
  646. STA $B8
    / D/ T, n: U2 ^" G, {
  647. PLA
    ( ~  c. l" W- |, J3 x! D; a) w: x
  648. STA $B9* ?: c! q6 }  _8 i. ?( T
  649. PLA! ~5 x; A( b) j' t) O3 C+ C
  650. STA $BA  K# u% I! ~9 D  c; Y5 q( F2 G4 H
  651. PLA
    7 c: P" @2 o7 M5 @& ]
  652. STA $BB& f: [/ R# a9 l4 F  d4 Y8 D- l; t
  653. PLA
    / [1 Z0 D  I: N' {, C0 h/ U
  654. STA $BC
    . H8 l2 h1 i1 C
  655. PLA
    ' v* Y% I. ?8 ]6 c6 O
  656. STA $BD# W" A2 T& ~' ~0 C7 P' b5 ~: R
  657. FREERTS:6 C) Y' o  s3 U5 x. u( E
  658. RTS
    , A2 p4 P' |8 _0 c1 S' a2 `, D

  659. ' B4 {2 p1 l+ V) a6 v
  660. INVINC_STRING:                        ;invincible# y  w# s7 Q- d
  661. .BYTE $93,$98,$A0,$93,$98,$8D,$80
    ) e% y6 _  H/ O! S( Q: E

  662. $ I$ O) M  I# y2 J  n
  663. INVINC_PPU:
    / k- c$ y3 r) ~/ U( M
  664. LDX #$00( |6 A( W& X, f4 g
  665. LDA #$62
    1 x# h1 h6 d$ l5 N9 r; C
  666. STA $BA; \: [+ l* W- V4 A  A! ]
  667. LDA #$21
    ! R$ f+ a, l; J; N
  668. STA $BB
    + l! Y1 c( I, x

  669. ! p& ?! \6 r* O% v/ l

  670. 7 g5 }1 s) ]- }# D' V3 S: q0 f+ H
  671. JSR UP_PPU. R. n  t# c/ R& }( h! m& T7 m
  672. JSR INVINC_WRITE/ u* Y4 \6 r. [3 s
  673. LDX #$00# B5 R/ ]7 T) b
  674. LDA $07A0
    7 h3 W) J, @/ K! b
  675. AND #$01* o" p! `* e: ]0 q4 t  ?
  676. JSR ON_OFF_PPU, B5 Y! Z& p* R" I4 K; f* y' R
  677. LDX #$00
    6 [6 V: f7 x- G/ |: ?0 i2 S
  678. LDA #$710 j1 K+ u- D/ d2 |: K# e5 X
  679. STA $BA
    ( e: ~' b" |! C: ~- L" l! [: \
  680. LDA #$211 ]! s' s# M. c5 f3 j' p
  681. STA $BB( m8 N8 f; o' Z

  682.   f+ f$ i7 n( ~7 ~/ s/ a" Q; _

  683. & q5 Q5 p/ x& K% h
  684. JSR UP_PPU
    - |6 C9 l# f- t
  685. JSR INVINC_WRITE5 V$ {7 J. i  @
  686. LDX #$00+ `) A$ d2 ?9 m  E$ Q8 C8 x  h
  687. LDA $07A1
    8 N$ K0 e6 J. Z# c- T, i
  688. AND #$01/ d* J! c/ [& }7 @; N7 r$ n& s
  689. JSR ON_OFF_PPU. p; D" X0 U) z/ _) b
  690. RTS2 ]) K8 O7 P$ P) e2 r4 q6 _4 M

  691. 2 h8 K; h# u$ f/ Q" ^  b" t
  692. INVINC_WRITE:
    , ]/ v7 Z5 E2 y. o
  693. LDX #$00' O# k' t5 x# `& f# b' ?
  694. INWRITE:
    5 p5 \1 x6 M* t
  695. JSR PPUADDR_PROCESS0 V$ p+ Q4 s7 J& S, R
  696. LDA INVINC_STRING,X3 |2 P& l# w) K; E' Q
  697. STA $2007: n9 D0 {% _& n$ h7 `
  698. LDA #$00
    " g* X2 w7 }. t/ d
  699. STA $20003 Z" X8 G+ u" s- q
  700. INC $BA
    6 L( ]6 Y! x6 X  L
  701. INX' Z4 l" u2 f5 Z2 J  X3 ]# }% G
  702. CPX #$076 U0 H4 @( H, q" D
  703. BCC INWRITE
    + z8 a& k* l% d# [
  704. RTS
      K. H# m/ V! I5 N/ @7 k
  705. 1 S: P+ [3 D! b% V' t8 ]: j
  706. ON_STRING:( F7 ~6 j# g) y8 N2 o
  707. .BYTE $99,$98,$80/ S* \( _& p2 h8 m& p

  708. $ a: P1 l8 q3 ^
  709. OFF_STRING:
    3 l" @# y% j3 |
  710. .BYTE $99,$90,$90
    ; c0 B" Z: L- ~# B+ l, h# \

  711. 0 e6 z3 |9 l" D# ]" {7 }) p) J
  712. ON_OFF_PPU:. L" H0 C0 ?7 a; l" F  z- U" ?
  713. BEQ OFFWR% B7 S  _& h8 x
  714. ONWR:& z: i% L) c( r$ Z( K! G
  715. JSR PPUADDR_PROCESS, a8 y: L0 v+ K$ f2 Y( O
  716. LDA ON_STRING,X; v# b; M, }9 E5 l5 M6 e
  717. STA $2007
    7 o6 U# f( e' K
  718. INC $BA
    / F# l4 a* `1 e& E6 R: T
  719. INX1 k* H  C- l/ S0 u+ d6 r3 g
  720. CPX #$03
    ! D5 @; p+ o* S6 O7 H) F- X' a
  721. BCC ONWR
    0 ^/ \  ]. m/ L0 L# L% s
  722. RTS
    5 e& u% m) ]) x5 x5 l3 |  |
  723. OFFWR:
    6 x" S5 _+ A$ K( L. n) m0 `4 v
  724. JSR PPUADDR_PROCESS
    . X% }+ ^/ R) N& j  `3 D3 z, g
  725. LDA OFF_STRING,X
    3 Q4 V1 Z8 C' r. p6 y/ A6 Z4 [
  726. STA $2007
    + O1 c+ q  D7 l, e; @
  727. INC $BA9 v; |! j3 [3 l* F" v  d( B$ D
  728. INX2 y# R( i6 k7 ]3 T9 u0 s
  729. CPX #$03, n8 Z; w- k! _1 N
  730. BCC OFFWR
    3 E* @. N/ e2 p
  731. RTS
    $ v* a- c" b% f, E' P2 g9 P

  732. * I7 ~3 P, s( C+ n: o$ E
  733. LIFELC15_STRING:; u! ?4 s, k  t% r( P4 O
  734. .BYTE $96,$93,$90,$8F,$82,$86,$809 Y0 C/ P% H3 X# \3 v
  735. % D9 v7 O% K. ]5 L. v
  736. LIFELC15_WRITE:
    ( ~7 D9 _% [" l& v6 G; F: H
  737. LDX #$00
    ' m0 b% ]7 Z4 H5 r
  738. LIFELC15:
    ) Z  t( X$ r, m+ {- u
  739. JSR PPUADDR_PROCESS
    ) r) H8 q  @) j8 r" H
  740. LDA LIFELC15_STRING,X
    / p  v/ ]- J+ c0 {: J( |- \
  741. STA $2007
    : _& k& {6 ?( K8 ?9 N0 S& |" i
  742. LDA #$00
    + I6 _( w; d, y3 ^; b
  743. STA $20003 E0 A" l3 A/ A# f, ~& o; H
  744. INC $BA/ j. l* x% H1 k$ F. p, s) L2 a
  745. INX; h' T* E! U) [( j% i
  746. CPX #$07
    2 n* ?; K: q% s2 H7 \
  747. BCC LIFELC15
    / |' V, O" y" |& r9 u  e' g6 _$ i& Y
  748. RTS
    $ j+ C& P2 w  k2 j
  749. 9 o$ }5 i3 q; M  e8 O, J( E
  750. LIFELC15_PPU:
    * s6 A0 P6 y; I1 y. D7 Y7 [2 U
  751. LDX #$00% }2 g" v  v$ G
  752. LDA #$A2
    & P4 S4 ?! }1 K
  753. STA $BA% D, j5 b8 d& ?3 y
  754. LDA #$21
    ! E! `& D% a( ?' v9 V
  755. STA $BB9 k, O# v! }3 q# ~0 ]( J
  756. JSR DN_PPU, g# b1 d' J8 J6 y( m
  757. JSR LIFELC15_WRITE1 x: k0 M9 x3 w5 o4 H
  758. LDX #$00
    % a5 n2 d# Z5 {% L+ M# f! l
  759. LDA $07A0
    7 s! n0 c% l6 I- d3 U$ v
  760. AND #$02% _& W; _# x$ _. g$ H9 i
  761. JSR ON_OFF_PPU$ _# [* t" J- S. J" g2 q9 ^
  762. LDX #$00
    0 R5 c. Y8 {( @  S
  763. LDA #$B1
    1 Q' d  z: c8 [( R
  764. STA $BA
    " Z5 K  S! q7 {- {; ~
  765. LDA #$21
      b$ r5 g5 y! T( ^3 u
  766. STA $BB
    " j; W, H9 Z8 m5 c" F. H* N
  767. JSR DN_PPU/ w" g- T2 S( u3 P: I  C* n& `
  768. JSR LIFELC15_WRITE
    ( T" a* u/ K* [) u
  769. LDX #$00
    . |" K1 I; w3 f2 g$ ]. v
  770. LDA $07A1
    ( |# i- Q! \# {: {5 c
  771. AND #$02! Z+ n3 `, Y0 C* K, {' h! F9 R
  772. JSR ON_OFF_PPU. u% E9 \: {1 J; F! E8 B
  773. RTS
    # U5 s( ~9 \$ p$ [& w. Z
  774. : W* E9 Q& N# T6 b- P
  775. DOUCON_STRING:
    & T8 x4 r8 Y0 G- A
  776. .BYTE $8E,$99,$9F,$8D,$99,$98,$80& N. _" X% o9 z

  777. 4 G/ w7 v% F2 J' ^! K: @
  778. DOUCON_WRITE:# Y. @) q% A# t' D
  779. LDX #$00! S9 ?- I  X* f: u
  780. DOUCON:* }( U: z8 d; T0 A! D$ p
  781. JSR PPUADDR_PROCESS) v- A# y1 M: t4 N3 C+ l  C2 l, _* r
  782. LDA DOUCON_STRING,X/ K9 l! P- B2 [3 P
  783. STA $2007
    8 k' U7 z1 N1 R5 c& s- Q& M, @
  784. LDA #$00+ J/ X& R2 z: V* Y
  785. STA $2000& U* R9 W+ P. F/ Q( f# E2 m0 S
  786. INC $BA+ a. d7 Y/ G' r' d, E# z
  787. INX4 T, [: [7 b' ~% K1 L) \
  788. CPX #$07# F/ j0 n, G+ M9 a: m4 U4 U
  789. BCC DOUCON9 f7 A  r) _$ d# v: p% {8 w: q
  790. RTS$ X9 h6 S. k* @* C. M& t

  791. + n) n( s7 C* B
  792. DOUCON_PPU:
    % Y3 B* j9 P, G) L; _
  793. LDX #$00
    & D" {% F: |5 _3 Z: g
  794. LDA #$E20 n' @1 a' j; g3 V/ ~
  795. STA $BA* O% Z) g' K' P: x: Y% T& u% \0 ], J
  796. LDA #$21
    ! r! k3 x- m  K1 {9 t4 b
  797. STA $BB
    + s+ x5 O" Z$ Z4 ], i8 _: }! \
  798. JSR LF_PPU
    6 T3 g1 L) _6 g) ^, O( V4 Z8 o% x
  799. JSR DOUCON_WRITE
    $ ~  F% B6 f$ s7 v
  800. LDX #$00
    $ Z8 X! Z6 n% L
  801. LDA $07A0; E7 c" j- p+ r3 [
  802. AND #$04
    - b" H5 [" P& q' O3 |
  803. JSR ON_OFF_PPU3 H$ N9 B/ D0 H- ]0 h0 X& D+ z
  804. LDX #$00
    ) S% i' W* P! E1 y" n% w3 C
  805. LDA #$F1& q+ z: \2 L* E4 S
  806. STA $BA* y: U* `$ \% L$ \6 Q0 A; o
  807. LDA #$21
    3 }/ h* G/ G8 b; l; U
  808. STA $BB# U% `- L5 f% B$ ]
  809. JSR LF_PPU
    * o/ b+ ]8 `( l4 ^' J
  810. JSR DOUCON_WRITE
    # K7 k! b5 V& H: G( J8 I
  811. LDX #$00
    9 X  B) W6 `( a0 A
  812. LDA $07A1
    8 b3 ]  H" q( N. s' v% j
  813. AND #$04
    3 G0 K0 A4 @4 `6 E5 W. H
  814. JSR ON_OFF_PPU% F, A4 J$ L0 v2 w% _- L
  815. RTS+ d% g4 g7 I" Q$ e) @

  816. ! m# x' C, O8 J4 `) V/ e
  817. LIFELOW_STRING:
    9 y6 V  R/ J; u& s& O6 c
  818. .BYTE $96,$93,$90,$96,$99,$A1,$80
    6 V! S) C* t9 f, h0 V/ ?: l" K
  819. 5 E" P4 M( b' s( ^( {7 {% Z
  820. LIFELOW_WRITE:* ~1 V: \! D/ i& L, i  h
  821. LDX #$00; I* k2 m3 O5 X2 r$ D  [
  822. LIFELOW:5 I3 U( @+ R6 u% H
  823. JSR PPUADDR_PROCESS( p) Q+ f& p3 U! J4 Y5 S1 E5 F
  824. LDA LIFELOW_STRING,X
      T8 _. v- a. h6 N! T
  825. STA $2007  S. T, z' j. x9 M
  826. LDA #$00+ y8 A+ V3 c% M: p* u! z
  827. STA $2000
    . }0 }  P: T$ P. B3 }( z& k
  828. INC $BA
    ! o) s% [3 k, F/ t4 A
  829. INX
    % d' d" h6 ?" R+ Z4 ]# q4 g
  830. CPX #$07# ?6 f/ J/ N8 s1 a! V2 Q2 C
  831. BCC LIFELOW# J: l' Q' Y4 a9 N4 t2 g
  832. RTS: h8 w3 q' w6 k: K) ~. k% l5 j
  833. ( u- X0 T/ `7 E, m  L4 T
  834. LIFELOW_PPU:" Z4 e% A1 z! b. V
  835. LDX #$00
      r  w% _# M* r6 J0 q
  836. LDA #$22
    , r* g+ k, n2 R' `
  837. STA $BA
    5 e, g7 o, F6 w4 |* \/ A* r
  838. LDA #$22! _1 r$ W8 K* _4 ^
  839. STA $BB
    $ s( t9 ?7 S$ _/ f/ q# S" u
  840. % e+ Z1 l( m! Z& A& q5 T& d4 R
  841. & U, P; q( u  w# L& {& O$ O
  842. JSR RG_PPU' u3 x- B3 M& x$ p+ `% ^: X9 Z3 E
  843. JSR LIFELOW_WRITE0 D4 ]) S% @. o& ~7 ?6 V9 S/ V3 h
  844. LDX #$00
      R) S# x6 r* h# s9 z
  845. LDA $07A0
    ) [# P6 J5 @% }) O9 C, i# \
  846. AND #$08
    6 U& T! t: |7 ?8 j# v9 t: o
  847. JSR ON_OFF_PPU' E) M5 f' W- `( X2 Q
  848. LDX #$00
    4 A- N- q- |! L9 ?
  849. LDA #$315 r4 M) U1 d0 }. p  G* t4 y
  850. STA $BA/ o6 y; G/ d* V7 ^' a
  851. LDA #$22* y9 y" ]* d! ]9 D, \
  852. STA $BB
    - P$ }8 V7 S  X( D, {- v- T

  853. ; e3 a( g7 B, Z; E9 W
  854. " v0 b3 H, \% l8 D2 a9 K: m9 W- N
  855. JSR RG_PPU; u8 G' @4 j3 ^! N' ^* L
  856. JSR LIFELOW_WRITE; Y8 L8 x2 q, p  J2 R! R
  857. LDX #$00! f' F) S; D$ t" \) C
  858. LDA $07A1
    # @0 i+ u3 P* W) i* _, {" U
  859. AND #$08
    : t5 f; U* e5 }, \# M7 \2 ]
  860. JSR ON_OFF_PPU
    / A8 U/ D& P# S" q! z
  861. RTS1 b5 |2 \. P, T( \) Z) V  x/ A
  862. 9 l4 d* R3 ]5 L2 l8 E' t
  863. KILLON_STRING:
    3 W: e' h. c6 b6 M! O, X
  864. .BYTE $95,$93,$96,$96,$99,$98,$80+ p# A9 z/ e4 k% ?7 L
  865. 5 G0 g3 a# g! {- \; B, n! x
  866. KILLON_WRITE:
    ( u; \8 W: F* ?; A
  867. LDX #$00
    , P: e3 _: W$ a1 e! M. t: A
  868. KILLON:& U# Q' B4 L8 I* v7 X; Z
  869. JSR PPUADDR_PROCESS. i( p6 Z& N3 f! Y
  870. LDA KILLON_STRING,X
    ) R% c, z! X0 H3 `& n
  871. STA $2007
    4 t9 d3 r  o$ C; @" F/ a8 @* {
  872. LDA #$004 L5 G. [3 x% I0 y
  873. STA $20007 {8 ?4 G$ P6 q& N' M
  874. INC $BA7 P5 y3 s5 l" Y! J4 e4 F8 ]8 q% U
  875. INX
    ( h( J/ ]+ E+ S2 a% p" o( Q
  876. CPX #$077 m+ \0 x0 F- L; I' U" t/ M/ P  D
  877. BCC KILLON+ n, v$ H3 `+ a* j9 f* [* z  k
  878. RTS
    1 M$ W* @7 ?8 T0 ^/ B
  879. ! @+ i1 {6 \  @% w% t+ T
  880. KILLON_PPU:
    4 d5 b/ B2 X6 {( [
  881. LDX #$00
    . K1 r+ t, v2 A9 h- Z
  882. LDA #$624 f! e4 z1 V% R$ y) c2 }+ O" x5 o
  883. STA $BA7 t/ K- F9 K! x4 c5 l
  884. LDA #$22# ?% b7 S0 i4 w+ f& ^8 R: P
  885. STA $BB$ w* o( d5 ?6 d1 s- @

  886. 1 d. P; _* p# Z, G
  887. 4 K% s1 s1 V/ z8 v' }( [' D
  888. JSR B_PPU# O" p) p# r, l# E; X
  889. JSR KILLON_WRITE9 `+ m  F7 ?- N  u
  890. LDX #$00/ K0 m* y- c, s9 ]8 v) K
  891. LDA $07A0
    - V: S4 |0 J- y* j; e* r
  892. AND #$10
    + ^. m% s' Q4 ]) w6 [
  893. JSR ON_OFF_PPU
    % d0 s# x" y* N+ N, j) X' O" z
  894. LDX #$00
    - V7 z# ?1 q/ E& g- M
  895. LDA #$71' }. q7 c: J+ \& M+ [' r5 v" X
  896. STA $BA
    6 c  _4 [9 A  `- q% `' s' c
  897. LDA #$22" a7 u7 b: z* ]1 F  m# x9 z' M
  898. STA $BB% q2 @4 S1 C) e' ?" T: O; [5 m5 @
  899. 9 e$ N* @$ g( ^% f5 g

  900. 8 H- ]3 r0 m, d, Q0 a& u2 A
  901. JSR B_PPU- t. k$ l9 D$ x$ Z( }4 ^$ A& D# u
  902. JSR KILLON_WRITE
    ! `. K$ n* e8 i- k2 [/ |, ^
  903. LDX #$00# R2 V: {+ T" k2 F/ q- P, y
  904. LDA $07A1( |, a9 t1 b+ S
  905. AND #$10
    : n& A" Z+ n2 b! [
  906. JSR ON_OFF_PPU
    6 ~+ @+ c, d( k/ N+ y5 m, ~
  907. RTS
    ; ~2 B' ~. D. `% h- \( ]. t
  908. ' b+ w3 @6 m9 p7 c
  909. SKYFLY_STRING:! |# ]6 A5 O, ]4 j7 d9 [( m1 K
  910. .BYTE $9D,$95,$A3,$90,$96,$A3,$80
    2 w/ ~$ v2 ~' R5 {! i5 R( H$ l- ?
  911. + G% I% W( M1 e4 e1 E. E  w" l
  912. SKYFLY_WRITE:
    8 }- J! ?, G* U
  913. LDX #$00  ]4 ]: {0 I# C5 K3 r, g/ I, ?* t
  914. SKYFLY:" g; w2 n* ?9 q0 ^! G: `$ F
  915. JSR PPUADDR_PROCESS  |. g9 V9 |, e% H
  916. LDA SKYFLY_STRING,X
    0 ]5 T% d7 _* O$ U' L
  917. STA $2007
    + j7 @" ~3 a0 I* [. }
  918. LDA #$00
    6 R8 i" _  M, @! w
  919. STA $2000
    + W7 Y7 U. E5 L) E" J9 ^
  920. INC $BA
    + U& o* z! p6 m2 P- F* J, Q4 C
  921. INX5 d& y. N7 v% i. n
  922. CPX #$07
    4 I8 i) r' Z7 I2 F! a7 m
  923. BCC SKYFLY0 G+ j( b8 c  D7 k# E3 W
  924. RTS
    $ p: `4 y/ q7 K4 J) @% {2 o

  925. . x* d4 U; D( Q
  926. SKYFLY_PPU:
    6 ~. R5 c' W$ B" W1 x2 k, E$ c
  927. LDX #$00
    6 C$ j* l& H+ ^* n; N4 l: |& k* {
  928. LDA #$A2+ c. z  v- G- S6 e, Q' ^
  929. STA $BA, Y* q9 G$ O& }0 H' Y7 \
  930. LDA #$221 M: H$ x0 e+ {! X5 U
  931. STA $BB/ C- f8 ~; _  Z% F0 N- O  n
  932. . x2 ]* ?4 ?& D& Z5 B0 ]6 ^
  933. * b- o) d9 g" ]$ \% I
  934. JSR A_PPU1 m2 [2 G% F+ V7 \7 \! h( M& p7 v2 A
  935. JSR SKYFLY_WRITE
    # u: I; Q) u4 u7 F
  936. LDX #$00
    * P+ p! |8 H$ p& j8 k
  937. LDA $07A05 v; ]% K/ z& P. A, _
  938. AND #$20
    % P) X6 t0 ?  U) M0 P2 O
  939. JSR ON_OFF_PPU
    7 X6 H" l6 ?+ B' N
  940. LDX #$009 n2 s6 x  B+ U. E0 G
  941. LDA #$B1* E, n+ J% i% O. k/ ?, y" a. K
  942. STA $BA' r/ a  o: Y, W, }' \
  943. LDA #$22  p! _  \9 o) b
  944. STA $BB
    % E1 l; ~: n% U! S
  945. + m8 Y7 Q( f/ A  m

  946. 4 [" d2 g2 h7 `* P. {4 o/ o& H
  947. JSR A_PPU
    % L2 r( M& N3 c; \8 E& A
  948. JSR SKYFLY_WRITE$ @5 w5 W9 r4 [! ]) s) a
  949. LDX #$00
      f& }/ b: Q: S  N# o' N1 q+ j
  950. LDA $07A1
    . i& _, W1 n6 @
  951. AND #$20% G% Q  f  X  V- M9 y% ~
  952. JSR ON_OFF_PPU% O4 t9 y, Q6 M4 J% c
  953. RTS
    : w$ u4 a7 h2 s1 |1 i( i- n

  954. / j  V# a  Y; g0 S
  955. BULADD_STRING:0 @! y# j2 M  W& s4 P, z2 L
  956. .BYTE $8C,$9F,$96,$8B,$8E,$8E,$80  w* N- ?% r4 m2 K3 O# j, w
  957. 1 s' `! ]8 ^: c- G; E3 ]1 V2 f2 G6 J
  958. BULADD_WRITE:
    * h+ w+ L' O5 S0 [, f5 Q
  959. LDX #$009 p* v, |2 E+ R6 C! b6 z
  960. BULADD:
    / p; K( {; ?2 \; ?6 \" }+ q
  961. JSR PPUADDR_PROCESS
    3 w1 `! V! t  S2 D; {8 C8 r! u
  962. LDA BULADD_STRING,X
    + W; Y8 H( U( m7 r
  963. STA $2007$ e8 u5 @7 K" p& F# R  j( T# W
  964. LDA #$00- A, F* |/ X1 c& X! R, {% J, u
  965. STA $2000
    - R4 m0 p+ a, G! h' Q" @2 k9 ?
  966. INC $BA( S( w) E1 V, t  D% h4 H( x
  967. INX& E& _: j* @4 z1 S
  968. CPX #$072 `! h/ q3 ]1 v. `) G# a$ M4 F% I
  969. BCC BULADD4 r' A6 R4 p# E, l: j
  970. RTS5 k( @5 T3 J4 B- e
  971. 2 l8 l* c( W) @
  972. BULADD_PPU:
    ; X; n8 T$ \% e6 [4 \
  973. LDX #$00: x9 N" v* \9 q3 }. C! C5 M& @
  974. LDA #$62
    1 a. {2 x; f& z9 b# Z3 V% N5 m, E
  975. STA $BA
      y& r& S  P7 ]# z( [: [
  976. LDA #$21
    3 t$ U8 v% Z1 q
  977. STA $BB
    * u; W- L4 s6 f( ]3 k7 w; y

  978. 3 j  q( j/ h) j* W! K' T0 [

  979. 8 j2 r% r- s! \2 {& ?( ?
  980. JSR UP_PPU& \' c; e1 ^4 t: U$ I
  981. JSR BULADD_WRITE
    5 V7 X( w+ F% i. [
  982. LDX #$00
    6 W/ n7 f% r! \# r
  983. LDA $07A22 f, _1 D' _5 W5 f: g
  984. AND #$01- ~. W+ X7 M2 D% u2 ~
  985. JSR ON_OFF_PPU1 o( N- C" G+ n) {% _( D, @1 h
  986. LDX #$00
    ) c. l! B( m$ f& {* u3 K- ~/ P& @
  987. LDA #$71
    " I" G2 f' }% N, f7 ], o* w" N6 j+ ]
  988. STA $BA
    9 _- C2 V# k5 O$ }; d/ I  a9 y
  989. LDA #$21
    - [! u6 W" V9 p( o" N' L
  990. STA $BB
    # k8 C$ v5 `5 Z9 I

  991. $ S) m5 q8 q6 @; K/ ^

  992.   x$ P& P4 j) E0 k) R' T4 S7 c
  993. JSR UP_PPU
    ) h0 A: C) A" S& I+ V) u, a
  994. JSR BULADD_WRITE
    8 J5 O! S& g& [: w
  995. LDX #$00
    0 Q( j) `0 [* s4 K  z$ o8 I1 }
  996. LDA $07A3
    + M5 f/ q" J7 S) T0 N- e; Z9 v
  997. AND #$01
    + k  [) N0 j0 [, z3 a
  998. JSR ON_OFF_PPU
    0 W. H! g' ^, W3 h. n5 Q& a- k
  999. RTS3 y3 o. Y* u( R, N4 l+ W/ H
  1000. 5 A# p" m2 ^3 t5 u/ u
  1001. MENU_PAGE_STRING:
    * R* A) ^2 n9 G9 h2 L
  1002. .BYTE $97,$8F,$98,$9F,$80,$9A,$8B,$91,$8F,$80,$81. J( h0 x( l* B$ A; }9 ^  E: [+ O

  1003. 3 I0 E3 \. Z8 V( t3 j9 @8 j
  1004. PAGE_PPU:4 i2 M& p( K9 }% t) t- w
  1005. LDX #$00
    ! c8 ~, o6 Y7 O- f3 \# |9 D4 l
  1006. LDA #$0A
    ) S" R  Z* ], W8 l
  1007. STA $BA% y  N5 V! |' C- b* y
  1008. LDA #$23' R  t% ^% R. p; K! A
  1009. STA $BB
    ! i) `+ |8 p9 J4 G* C2 p+ K
  1010. % H* C* X" D7 G( T
  1011. . ?% B6 ~& K7 c; r8 E
  1012. MENU_PAGE:2 q9 s; X7 P5 p: f5 g6 I' i, B5 S
  1013. JSR PPUADDR_PROCESS
    2 [: d1 j; _$ ~2 m0 w, c; b
  1014. LDA MENU_PAGE_STRING,X- i  K4 c2 _7 R2 w# G
  1015. STA $2007& Q1 Q/ S; p5 B+ Y( |) T
  1016. LDA #$00
    ) a( b% j% n. q. r
  1017. STA $2000
    2 ~: I+ R( _% J& W8 i! R
  1018. INC $BA1 w* H. `) F+ b! k3 n. I$ N
  1019. INX8 Y/ O! A- }: q, r) c
  1020. CPX #$0B
    . T' Z% D  |# a* M5 A  ~; C
  1021. BCC MENU_PAGE
    ! w( [4 ]$ D5 w# v% d/ o" o
  1022. LDA $07AA7 Q/ N1 v# t4 q5 @# M
  1023. CLC, a0 h. d" P2 V- p
  1024. ADC #$821 C+ e2 ^, h$ @0 W0 M
  1025. STA $2007/ l* T2 V0 n" h7 Y7 h
  1026. LDA #$00. n, u$ q0 O* V1 N% A
  1027. STA $20009 @; O, v# ^3 P5 F' I8 a8 a
  1028. RTS+ G" k+ t9 k+ ^4 O6 X) b  N
  1029. 1 S( \/ v  }* \0 j8 z$ S
  1030. ; @/ o) V: C  ?0 \% S0 y- Q7 N
  1031. SKINGE_STRING:, Q9 O/ a) B* r  \# P; d, S, b
  1032. .BYTE $9D,$95,$93,$98,$91,$8F,$80
    , u( X  ^: j$ ]$ M1 W
  1033. 6 x& [1 G* e+ f8 s
  1034. SKINGE_WRITE:9 d; }5 J6 |. Z; H, g3 _9 B- e
  1035. LDX #$00) Q/ B' h+ N9 R3 k! S) Z
  1036. SKINGE:( _9 U3 A9 D: `
  1037. JSR PPUADDR_PROCESS) h" G4 g% g# ^; ^/ j" z
  1038. LDA SKINGE_STRING,X
    3 P$ u- d( ]/ z; w, ~
  1039. STA $2007/ ~! p* z# [$ H0 q/ D% \
  1040. LDA #$00
    1 O! ^: @9 q: A
  1041. STA $2000, V8 m) F5 g) C
  1042. INC $BA6 U2 ~2 ~; d+ R3 `
  1043. INX
    ) D, N) r$ d% g# S+ ?* S) }
  1044. CPX #$07
    ! t$ ]/ K2 h6 u4 `) G! O
  1045. BCC SKINGE# H, {* Q6 \' f0 e2 Y& j1 m
  1046. RTS! }! i% d& j+ x, L5 P* P. h9 Y
  1047. 3 Q9 O9 p3 z0 ?
  1048. SKINGE_PPU:
    , H* i+ _! A- W& r- ^1 Z% q
  1049. LDX #$00
      X4 d' i# S7 }& Z: n/ w& H2 @5 n
  1050. LDA #$A29 ]+ ~/ _9 Y7 d+ k+ o
  1051. STA $BA
    8 T3 G4 E6 O, k% x/ H2 p# X" u
  1052. LDA #$21
    9 t+ Q% K1 }  [2 Q
  1053. STA $BB
    + S3 E5 P. Z! @/ o2 O0 D. K
  1054. . R8 Q) V' t% i0 L* C

  1055. 0 w6 q7 _/ W# D- q7 o  i/ s( o
  1056. JSR DN_PPU) i; n5 Z9 }9 W2 f
  1057. JSR SKINGE_WRITE, q5 ]/ l) I! F0 d# ~
  1058. LDX #$00; H3 I! ~# c/ e# F# g
  1059. LDA $07A2
    $ W+ y" H4 n& U4 Z& j$ w3 C
  1060. AND #$02
    9 l! V1 T' [' `- g3 T
  1061. JSR ON_OFF_PPU
    3 U0 _5 _4 K& b: A9 I, q& m* I+ H
  1062. LDX #$00
    6 ~6 _  _( u" s, t6 T! h
  1063. LDA #$B1
    7 V" u. ^. @: Q1 d- h3 E
  1064. STA $BA
    ; ~7 ?0 U! ~; c7 L& u6 P) m4 ?
  1065. LDA #$21
      ]% Z5 h( z& t3 J8 h
  1066. STA $BB! u' h% d" R% Q0 t
  1067. + F) a. C$ Q3 E1 v

  1068. ( a. z8 F( z8 @0 X" k) z- T" h5 Y6 D
  1069. JSR DN_PPU9 n7 t- l; ~: K8 U- A0 U; [! c% P
  1070. JSR SKINGE_WRITE
    3 T$ @' n* t, l" H' w6 n8 D
  1071. LDX #$00% k$ }7 K+ q3 }2 P$ f& C, m# [
  1072. LDA $07A3
    7 @% ]  T5 s: n, r8 ~' P7 ^  ]
  1073. AND #$02
    2 {. G* X( P" R, K7 C# s
  1074. JSR ON_OFF_PPU" \% q  k" w# p  W/ `0 }* v# b* D; L
  1075. RTS! ~+ ?) a- l/ ^( a% X6 I. U
  1076. $ a. A: _1 F! l9 W
  1077. BULMIX_STRING:2 I4 L$ \; d- z' _- w# W
  1078. .BYTE $8C,$9F,$96,$97,$93,$A2,$80
    4 H* I! R) O8 W" R( f; [

  1079. + l* ^- L/ K% T3 p/ S% f7 S& j  s
  1080. BULMIX_WRITE:
    - L, T+ V; U( a4 G
  1081. LDX #$00/ e% @  [4 M9 K. b% y' V& q
  1082. BULMIX:
    2 j0 d: f4 D5 Y- v8 e
  1083. JSR PPUADDR_PROCESS
    2 X9 F7 ~- p) [; B# x  @
  1084. LDA BULMIX_STRING,X4 S) c: b0 ?# \  y2 d
  1085. STA $2007
    + B- B$ F4 Y  e5 J: f
  1086. LDA #$00/ I4 w" R# T6 L
  1087. STA $2000+ }& k$ Q7 Y6 W( M4 _2 P' [8 n
  1088. INC $BA
    8 `! p7 `) r8 F, T3 K
  1089. INX
    5 p8 K7 y$ b7 Z; p: h. x
  1090. CPX #$07
    4 b# u! \  c# D5 {( Y
  1091. BCC BULMIX( v: t/ |0 g+ i1 F
  1092. RTS( i. x5 e& s; E

  1093. 4 @) t. r) }: p. Y. p: P
  1094. BULMIX_PPU:8 e7 L. q6 m" f8 t' s1 o
  1095. LDX #$00  {+ s; y! v) q1 x6 L
  1096. LDA #$E2. k9 f6 |, J9 m# w- q
  1097. STA $BA
    + l4 E, j  E% q: f: h
  1098. LDA #$21
    ' f7 P8 s0 x8 M$ K+ D* s$ K9 P- T
  1099. STA $BB
    5 U; F- m: |" o" D  L$ R

  1100. 8 w# l' S4 {- _
  1101. $ x5 `+ H6 r0 I
  1102. JSR LF_PPU
    $ t2 ?6 C8 R% O
  1103. JSR BULMIX_WRITE
      ^: ^! d9 g( f7 M& z" Z
  1104. LDX #$002 N- q) N( \, L+ L( x- U
  1105. LDA $07A2
    # ?- y3 o9 P5 I. d4 Y! A4 S: G
  1106. AND #$04
    + M( f, _. Y0 _3 `: ]
  1107. JSR ON_OFF_PPU+ Z! H# q! I8 \' \) C8 |+ _
  1108. LDX #$002 D4 A: y" t  U" M. Q2 U$ Y6 t% `
  1109. LDA #$F16 p( x* o$ P2 \8 v, Z$ _- y" _
  1110. STA $BA: Q8 F) R, M2 d) \8 _+ ]- T+ J
  1111. LDA #$21
    % O$ {" b- C) Q4 M! j0 \
  1112. STA $BB
    ' d9 o7 G! u: ~# r3 u+ Q

  1113. 9 @7 F/ {0 j8 h8 t1 V/ a3 D

  1114. 6 j9 N: Y  R3 ?2 {/ u0 ?0 `5 I0 U
  1115. JSR LF_PPU0 T. i* \5 o- L1 r3 K8 y
  1116. JSR BULMIX_WRITE, p/ |$ S8 D! j0 I% K! F' A4 Y- t
  1117. LDX #$00" T* G# k* N$ m; [' b/ W
  1118. LDA $07A3
    / m1 A8 k# q4 H' U1 P
  1119. AND #$04; K" |* {7 j8 K6 \6 o7 z
  1120. JSR ON_OFF_PPU+ m' g! [# j/ }$ W+ L
  1121. RTS0 T0 z( H: G% h) ]( G4 ]
  1122. . E( b& ]! L" L  u( u8 r$ }! \9 C
  1123. ENELOC_STRING:! P' F# @! I  u
  1124. .BYTE $8F,$98,$8F,$96,$99,$8D,$80
    2 S/ n, U. j  Z( M' i. S

  1125. * ~; a, e# b2 F
  1126. ENELOC_WRITE:
    4 T+ j9 y; k+ z
  1127. LDX #$00
      q1 l& s' P1 U$ U3 j3 Q2 a2 w
  1128. ENELOC:
      A: b& P% s8 d& c. ~
  1129. JSR PPUADDR_PROCESS) j' T1 W8 G& `- l8 M. K2 j" P
  1130. LDA ENELOC_STRING,X
    ! I" t6 t! _! \4 g( n4 e% T5 F
  1131. STA $2007
    8 g  V0 C0 V0 I: G
  1132. LDA #$00) z2 S2 x- c) A; R
  1133. STA $2000
    4 Q& N: T9 S. k. i8 }7 e- }
  1134. INC $BA2 r6 ^5 v1 o5 e5 S, ~
  1135. INX' m3 A* n" F; G/ V# F$ L
  1136. CPX #$07( [* B% }% X7 r$ [0 N
  1137. BCC ENELOC
    # I" J, N4 U3 k: k
  1138. RTS1 v% I) a  a  T% g) B
  1139. : j# ^- ?# \3 I/ C$ H  w( p  P
  1140. ENELOC_PPU:  z4 {7 m( C) A, }, G6 w
  1141. LDX #$00
    8 O8 Q) @% N# V) }: F" D  _
  1142. LDA #$22" K9 E( d) f' Q" t
  1143. STA $BA
    + v- V2 g; ]! ]' R2 G- r" x8 Q8 K
  1144. LDA #$22" n3 S  [# h6 ^+ j) t4 P
  1145. STA $BB
    , I3 n& L6 u, \9 h& B  L+ m! B

  1146. . s+ |8 b8 h" Q% H  d' ^, \' x
  1147. % o* P& j+ T: e; h$ d5 F  l
  1148. JSR RG_PPU0 w  j  j; q" T7 d  O
  1149. JSR ENELOC_WRITE* e' M! ^1 i/ w& O/ R
  1150. LDX #$00
    7 q6 s$ Y- c, O' e0 S5 a7 I
  1151. LDA $07A2
    * a' o3 m: h0 V- N
  1152. AND #$08; y: n& m( x+ u( H
  1153. JSR ON_OFF_PPU+ g$ q' a7 E/ U' i! @' F* m
  1154. LDX #$00! s1 i2 X) |0 N8 v* B6 u, W6 h$ h" d9 W
  1155. LDA #$311 x( c$ |/ |$ K7 a! I2 @: V. H5 k4 H
  1156. STA $BA' h3 T- d6 q" @2 g
  1157. LDA #$22. T) f6 s: ~6 W
  1158. STA $BB9 m. y* G- A7 h* r( H! M

  1159. 7 c! V" L9 T7 I/ _
  1160. $ g7 O9 k1 C0 u. ^% P0 q# L
  1161. JSR RG_PPU$ D9 D" J' [0 J5 b" s" m6 `
  1162. JSR ENELOC_WRITE
    5 K0 U! P$ }* Y: m0 d  D: i
  1163. LDX #$00/ d1 v' G: n6 i+ u& j' s7 i
  1164. LDA $07A36 Q; M, W9 }* G8 h/ c( t; c; o, P
  1165. AND #$08
    ( s; i- }& z7 w5 E" s( X& W
  1166. JSR ON_OFF_PPU
    1 Z3 U* k& _4 I* L/ n# F8 I
  1167. RTS9 I* ~* _8 o7 {" K. G
  1168. ' |! H( j$ ?6 B/ Y$ `
  1169. FOCFUL_STRING:
    % t/ U1 q2 m3 m
  1170. .BYTE $90,$99,$8D,$90,$9F,$96,$80* w- k# J* F- M2 H( E  y1 Z! @3 V
  1171. / g" G: `2 y! m( D
  1172.   a  B- q5 s/ `, K; ]- |- X
  1173. FOCFUL_WRITE:
    6 t* D' p# v9 I5 c& a, k
  1174. LDX #$00
    2 }: V$ [3 X/ u  h
  1175. FOCFUL:1 J# j$ |/ u! y# {
  1176. JSR PPUADDR_PROCESS( V$ M7 ]$ R4 Z+ \' c, e* S
  1177. LDA FOCFUL_STRING,X
      A6 P/ C- z; Y
  1178. STA $2007  _  `/ Q. E2 V" i& v
  1179. LDA #$00: @8 \9 g0 ~3 n, E- V
  1180. STA $20008 C% |: V( w% F* H9 E
  1181. INC $BA
    4 ^( _& L1 K& p0 w
  1182. INX2 [+ f' s7 b: }( G  Q/ I
  1183. CPX #$079 j8 T% y7 o/ p
  1184. BCC FOCFUL: Q8 {' H1 e/ }
  1185. RTS) w1 Y; e9 q, E4 P* e3 X
  1186. . O7 o2 Y" h, W5 O7 ~: C" p
  1187. FOCFUL_PPU:
    ! u* m5 |) ~4 z" V8 `8 F& b- G
  1188. LDX #$00
    * ]. W* C8 q! x8 q9 m0 Q
  1189. LDA #$62
    . V; v4 Q% G2 S: \5 ^
  1190. STA $BA
    ; W- d7 f' ^6 z6 a8 I' H1 k% {
  1191. LDA #$22# Z5 ]- M0 ~) o5 w; M
  1192. STA $BB7 h; K; ^% I1 \, O; J- Q* C1 v

  1193. $ W5 o0 _( y% a6 v& z% Q
  1194.   x) f9 E, C' S' z' t, a+ y: Y
  1195. JSR B_PPU* b( o4 C# F5 g6 F* @* W
  1196. JSR FOCFUL_WRITE
    : ]8 [( N$ B' g: e: G3 g* J2 g
  1197. LDX #$000 J; v, V! Y9 b
  1198. LDA $07A25 h8 O! J% I$ Z1 n
  1199. AND #$10
    7 p6 C5 U) G( {6 X5 [$ U
  1200. JSR ON_OFF_PPU1 U& _$ O. e! T7 \6 ~% h1 i
  1201. LDX #$00& U7 H8 {! S2 M$ M
  1202. LDA #$71
    7 j& z) b7 e7 M5 `
  1203. STA $BA
    ; u7 ^( A# T+ Q. K" h, v
  1204. LDA #$22* Y" }* s* i3 {  A4 ~/ G0 j; k5 }
  1205. STA $BB
    % T+ Q; m$ H. W, h9 B

  1206. ; }# H4 c# o4 a

  1207. 7 z  u  d0 `2 a( F
  1208. JSR B_PPU6 T. `7 f+ o6 m4 e
  1209. JSR FOCFUL_WRITE0 f5 y$ i, x- t: Q' t
  1210. LDX #$008 c# D" h7 q; X+ C6 f6 @* e' D
  1211. LDA $07A3
    ! D: P0 \3 W' ]+ i# P9 `! j9 o
  1212. AND #$10
    % V3 D% t# n6 v. x4 `) W: T
  1213. JSR ON_OFF_PPU
    5 C2 }0 C+ N5 V
  1214. RTS
    1 f4 ]9 q) d. ^: I
  1215. ) s$ _% ]1 L- ?$ P; a8 {
  1216. BULCON_STRING:
    * `  O( a; P, w& ]( i1 k( c
  1217. .BYTE $8C,$9F,$96,$8D,$99,$98,$800 c" C* k, A  k
  1218. * }5 @# T5 H% H( j: O

  1219. ; I$ e9 S1 A9 l! L& o0 R; q
  1220. BULCON_WRITE:$ I8 K# V. A; D  z2 Z% s; V
  1221. LDX #$00
    " @% j- W9 I- n. r$ q) [
  1222. BULCON:
    , a3 t! }6 d- [8 u& g4 _
  1223. JSR PPUADDR_PROCESS1 N0 D7 w7 u! Q8 l/ M  h0 l
  1224. LDA BULCON_STRING,X
    - o2 T" `* q7 c, h3 K; V! m
  1225. STA $2007
    5 `( W3 W# m: ^) ^& S5 P& D4 a* a
  1226. LDA #$00; ^% G- {: b3 s4 l
  1227. STA $2000) L$ u8 E( I# H* e; ^" F
  1228. INC $BA
    : u8 b0 V7 V9 c# B' C4 u+ o
  1229. INX4 H( j9 S4 u5 |+ C# l* R& u# w
  1230. CPX #$07
    4 b. H7 f6 y5 w6 o; R+ N
  1231. BCC BULCON/ C4 q5 J# r& q3 G0 y1 U
  1232. RTS- z% `; D: H! e5 @
  1233. + U9 D3 Q1 Z2 ^7 ]$ i" ^/ ?2 b
  1234. BULCON_PPU:
    7 @! |1 \: z6 O1 i9 q4 K" E, ^
  1235. LDX #$00
    8 d! e6 K6 ]3 P( V
  1236. LDA #$62
    ; ?. o& h4 E5 F5 ~9 o  p( G3 E
  1237. STA $BA) J; d$ A; J( m
  1238. LDA #$21
    . K2 @- [& W* l
  1239. STA $BB$ i, I9 X1 _8 k$ |% x, S
  1240. # H& H) _+ X% Z7 Y) i. G
  1241. 0 o* x0 x( p! S* S
  1242. JSR UP_PPU
    ) q0 j, W4 b' j  `7 t, |3 ^2 W
  1243. JSR BULCON_WRITE
    & x* x' X. ~7 |
  1244. LDX #$00
    ' ~) y" m- b5 Y
  1245. LDA $07A4- J, P4 D' a9 v* G$ D& w5 f
  1246. AND #$08
    7 q5 G; T, y+ m) h* b
  1247. JSR ON_OFF_PPU/ W6 k3 G! \& s8 N/ ]
  1248. LDX #$00; @! V- w. c3 d
  1249. LDA #$71
    5 C$ j# \6 w" I8 m% \
  1250. STA $BA0 X' \3 v  M. U8 }7 U( F, h
  1251. LDA #$210 j8 F  Z3 O$ f1 T. k
  1252. STA $BB; \! [) Z  I: b

  1253. ; d* p! @7 {  Y5 q! j. Z

  1254. $ a$ k- i5 G- i5 @
  1255. JSR UP_PPU
    % w4 u# k2 w7 E6 m  [
  1256. JSR BULCON_WRITE! p0 ]$ W# ]4 w( p
  1257. LDX #$00# j' d; w. y" @3 H9 z! s
  1258. LDA $07A5# G% j; `7 ^* s$ h
  1259. AND #$08, b- P. w4 C0 |3 I- ?. r3 Q5 L
  1260. JSR ON_OFF_PPU
    : u: P! Z& [; d% J0 r% d1 ^
  1261. RTS+ z" `6 N" Y0 R. {; b& f
  1262. + g4 B% K( M9 ~4 ^& l' B8 X& l8 k
  1263. SPEBUL_STRING:. v' u% _; {2 L4 _7 \: i* M
  1264. .BYTE $9D,$9A,$8F,$8C,$9F,$96,$80" A  C# J1 i" f' v+ k- p

  1265. 9 o8 Y; T4 {1 s5 t0 e1 B/ u; d
  1266. * Q6 I, C; s2 j( H% Y
  1267. SPEBUL_WRITE:
    $ g3 w# o8 S3 @; m% r5 b* Q+ w
  1268. LDX #$00
    * \5 }8 p$ E- x. e4 q  b' H
  1269. SPEBUL:
    + L; g. p  [$ n$ P4 p0 D- X
  1270. JSR PPUADDR_PROCESS
    , m. ]5 |5 p. B
  1271. LDA SPEBUL_STRING,X) x& f# D: o- D, ^* |& {
  1272. STA $2007' X1 ~  ]" ?6 m- D; }6 a
  1273. LDA #$00  f) \6 l+ a2 A( L0 l2 b+ E
  1274. STA $20002 z3 l( {$ K. c1 y9 l
  1275. INC $BA1 t# _8 Z! R; w6 A8 D
  1276. INX$ |+ g9 w3 i% [% E! g, @$ F) H
  1277. CPX #$07
      w: C* D  q# B5 ~" y
  1278. BCC SPEBUL
    / z0 a+ O: L" Q( J/ s9 O
  1279. RTS% X( }2 m' |% N& p

  1280. + `9 e5 b' @- s9 E/ K! k
  1281. SPEBUL_PPU:8 |$ I$ z) K( ~4 b
  1282. LDX #$00
    $ C4 B9 J  B3 l( x, R# w" T; Y. w
  1283. LDA #$A26 ]: }# F7 Y5 h9 a# s9 J, f$ f( d
  1284. STA $BA
    " G6 v7 _5 p: C& Q$ t% L
  1285. LDA #$21+ y% z: @- h  h4 \
  1286. STA $BB, Q  V: \0 f4 v: Y+ e

  1287. ; w2 p- F' M7 [( C
  1288. 1 y3 L. @, ]( r4 O& e7 j- g, v6 v
  1289. JSR DN_PPU
    " Z# e" P' {& P+ O
  1290. JSR SPEBUL_WRITE% @( f: {. Q3 }  e* Y' v( D
  1291. LDX #$00( _" l# l5 }: L
  1292. LDA $07A4
    , o; B3 `# d$ `  g
  1293. AND #$02( O% I2 S0 ^* f; m
  1294. JSR ON_OFF_PPU
    1 f2 d( Q, g. b" d! J
  1295. LDX #$004 [0 Q1 I' F+ X8 L( k8 A
  1296. LDA #$B1
    # u8 n: P8 j5 o6 T- I) o/ H5 H
  1297. STA $BA7 _( N2 Z: c. o+ E
  1298. LDA #$212 m, t2 m( V  B& q2 K" R
  1299. STA $BB
    / |0 d# k: [2 ^2 t) ?

  1300. * W+ X, r1 F) d- ?. c+ k( \' Z7 Z

  1301. 9 f2 F2 A# s" _5 T+ U) @3 j
  1302. JSR DN_PPU
    5 v+ J7 @+ R" H2 S6 q1 a
  1303. JSR SPEBUL_WRITE
    + T# F' S' N9 u( \
  1304. LDX #$00. h- |4 j- T) P& ^  g
  1305. LDA $07A5
    ' v1 O8 [, \& A3 A; W& ]
  1306. AND #$02
    & ^0 w  T( e* l
  1307. JSR ON_OFF_PPU9 g+ {2 `6 [  U
  1308. RTS( ?1 {3 V2 @( V2 \9 a: j; V5 w
  1309. $ d6 p  q/ W) n4 R- d3 q6 f6 K
  1310. .ORG $A500
    ! E8 g" G" @" _( e! ^2 N
  1311. CLEALL_STRING:- P. ^5 H" T2 N0 c, t2 O
  1312. .BYTE $8D,$96,$8F,$8B,$96,$96,$80
    # p! D& R# o% C* o( U3 m

  1313. . p* t0 y- C6 U5 g) G+ U1 ^) S

  1314. 8 Z& n! x1 z: Z2 v
  1315. CLEALL_WRITE:
    7 M$ N3 O8 j  I
  1316. LDX #$00; K4 K! N" A9 d- ?" p1 q: g, U
  1317. CLEALL:
    0 j& S/ ^+ c  D' ]
  1318. JSR PPUADDR_PROCESS
      j7 Y9 B3 K6 w1 L; U
  1319. LDA CLEALL_STRING,X
    ( R6 N+ m" M2 I: n6 K% ^  m
  1320. STA $2007; O* z0 O% w: }: z- R) Q) X* Z% Z
  1321. LDA #$00
    5 J! g3 Z( e' j: z3 S9 R" }: C
  1322. STA $2000* G( Z$ S' i/ b
  1323. INC $BA0 T% E5 V/ c$ T
  1324. INX
    $ R* B8 Y) X# c8 Q2 A
  1325. CPX #$07
    ; e  O9 w) f" `
  1326. BCC CLEALL
    3 r+ @( e5 k/ z" ^/ j7 v  i
  1327. RTS  p* X1 F, E4 j$ z/ Q

  1328. ' D4 l) K( n9 h/ i  M
  1329. CLEALL_PPU:  z- u2 o) e' q- @
  1330. LDX #$009 d& r4 i3 I6 y# m5 i
  1331. LDA #$E2
    8 u/ s4 J% L) ^
  1332. STA $BA6 A8 I' P" j3 U8 h1 B$ Q# ]: z" l7 P
  1333. LDA #$21
    ' j; E- ^  [9 L" Q4 t! b) F' |+ L
  1334. STA $BB% I  g: `" W4 O* {$ |3 o1 z% e& o
  1335. $ V  K+ S5 m2 F, O
  1336. 1 L, V1 p5 l0 @$ [7 @
  1337. JSR LF_PPU
    . O2 c/ ^* [" M2 ]- F
  1338. JSR CLEALL_WRITE
    . e& W6 Q3 s; D6 B) z9 j$ R
  1339. LDX #$007 M1 B" |; r6 C4 S
  1340. LDA $07A4
    - i. b) k" ^3 C4 ^2 f$ W
  1341. AND #$04& a" W- ]# s. ?3 z; j6 p
  1342. JSR ON_OFF_PPU
    1 w8 ?. v9 g" T( }' E
  1343. LDX #$00+ f, O5 g; u& g! A
  1344. LDA #$F1
    9 [/ M& B0 d# u9 Q" o9 W; L% d3 j
  1345. STA $BA+ M% A/ f$ S: _
  1346. LDA #$21( n! y' V# u6 s5 D. @, D
  1347. STA $BB
    . |& O( @  v( m; I
  1348.   C- s) j% @5 n* ]
  1349. 0 H: I1 I% |" ~, X: o- B6 b0 x- C1 ~/ `
  1350. JSR LF_PPU
    7 H+ W* v" w, k
  1351. JSR CLEALL_WRITE* c$ @* [4 @0 l1 u% ?- u
  1352. LDX #$00
    7 n$ g6 d; O# t  Z
  1353. LDA $07A53 T2 U: h5 j* E4 W1 h7 a% r% ?1 Y
  1354. AND #$04
    * R' v. V3 o1 |+ D, r4 t, Z6 O
  1355. JSR ON_OFF_PPU
    0 i* A- Z, f8 u9 |( l* a
  1356. RTS. C( B( ]6 a- Q+ u! Z

  1357. , u% f' o1 f- K$ F
  1358. HARDMODE_STRING:: F, e8 s! E) r- R
  1359. .BYTE $92,$8B,$8E,$97,$99,$8E,$801 I: @' a0 O# l: _* M
  1360. 9 Z' L0 B! {) X7 K: K! `

  1361. 1 z, k3 _2 {% n
  1362. HARDMODE_WRITE:, ]8 d0 ~" ^6 j6 l% I  M
  1363. LDX #$00
    3 A: b3 b4 [" q' c/ B
  1364. HARDMODE:
    ) a- S" X5 X6 R5 [7 a7 }
  1365. JSR PPUADDR_PROCESS7 d$ _/ n/ x: ~8 a
  1366. LDA HARDMODE_STRING,X
    " d2 M2 N1 x/ ~# k
  1367. STA $2007
    # T( D/ g( ~5 ~! J& u
  1368. LDA #$00; \7 M( r& Z! N% e4 u
  1369. STA $2000
    7 U4 |) _7 C: _! N) g
  1370. INC $BA
    4 Z4 P" f/ s1 h
  1371. INX. h4 f: |) J+ Q
  1372. CPX #$07
    % ^  S. N5 I' l9 M' |$ Q7 H
  1373. BCC HARDMODE
    5 {! i: J. w8 Q  h# S) b
  1374. RTS
      Y7 }9 j8 z$ H# m0 T, K

  1375. 1 T% a3 c; c, p
  1376. HARDMODE_PPU:
    3 r% y& j4 E0 d, G% v
  1377. LDX #$00
    6 [- \+ J+ U" K( a. C& b
  1378. LDA #$223 r: t& g2 Q( y) \' s' I( O
  1379. STA $BA
      ^( t+ \5 _, I7 [" t
  1380. LDA #$22+ N4 ?1 e2 |" E$ z& [" l
  1381. STA $BB6 W  A$ ^& Q/ L
  1382. JSR RG_PPU# _, {8 ]* I9 @9 [+ v2 }. Y8 H+ t
  1383. JSR HARDMODE_WRITE/ ]! u3 T, I  {
  1384. LDX #$00
    : O5 `" O5 m0 C& Q6 {
  1385. LDA $07A4
    7 f, k1 ]! Q8 \( n
  1386. AND #$01
    - U; g) f0 W$ Z, ?% T0 \% w4 r# w# r
  1387. JSR ON_OFF_PPU
    ' J1 G; i- B# n; w( S2 z
  1388. LDX #$00! E( j" c6 w/ W. S
  1389. LDA #$31- f+ {: T. ?8 ~7 S# ~7 u
  1390. STA $BA: N! |7 Q7 B' l, D) h& _
  1391. LDA #$22
    3 l- u: I0 A3 _" y$ o! V
  1392. STA $BB8 T- w: o5 E; E4 }. h+ g+ m) `0 f
  1393. : O! j. x* g( D+ G" q

  1394. : }- o$ M! j! f% e% l6 ?* A" C8 o
  1395. JSR RG_PPU0 y* C1 x2 M/ f; t9 @* m
  1396. JSR HARDMODE_WRITE  X7 |. X- d7 c3 ?1 R" J  T5 e
  1397. LDX #$00
    * e6 D9 A- t5 X" d( V/ b
  1398. LDA $07A5* m% \0 C( Z# B1 U# d" u. ~) F% G
  1399. AND #$01
    ) L3 H# O' e6 H: p, c+ u9 l
  1400. JSR ON_OFF_PPU  W$ |  e+ b* `6 ?" S" j! f
  1401. RTS
    0 `) j7 s8 L2 _4 T  c7 r4 y2 A

  1402. ( V) o) Y- V; [
  1403. B_TO_JMPSTG_STRING:
    2 q  K  p0 f9 M# e$ ~2 I* {0 {5 l/ M0 T
  1404. .BYTE $80,$8C,$80,$9E,$99,$80,$94,$97,$9A,$9D,$9E,$91,$80& W" ?  P  X! h3 G' G* b; }4 Y
  1405. / P2 g6 K/ W% S" j& c' b: d: ^
  1406. 8 s  _2 d2 }$ y- f: _, I1 O( q
  1407. B_TO_JMPSTG_WRITE:
    7 L+ i" g! W4 w" [% G
  1408. LDX #$00
    , }8 N. V, z! B7 T- h% ?- E* ^6 W
  1409. B_TO_JMPSTG:
    # m$ Q7 J8 P/ j* t7 I
  1410. JSR PPUADDR_PROCESS0 C) {! ?3 G# f$ g
  1411. LDA B_TO_JMPSTG_STRING,X
    ) ?  Z$ ?1 L* b  n
  1412. STA $2007" _+ H& X& k5 e( @+ p
  1413. LDA #$00
    6 W) g3 a4 N% t& n; ^" {# }! a
  1414. STA $2000
    . }- T7 y% {& Z8 n  o2 ~2 [7 ~1 O- O
  1415. INC $BA
    0 X" k# {% C2 b( B6 Q
  1416. INX" S9 E. A( q  t8 ]2 h1 J
  1417. CPX #$0D3 _) O9 ]6 W' w% [2 o& f
  1418. BCC B_TO_JMPSTG) q: G) q* I( t% T6 R: o4 I
  1419. LDX #$00
    / P: r8 c2 R, |8 p0 _2 v$ H9 P+ u
  1420. LDA $7FE0/ R2 N) ?$ E' v- P! _3 y8 d+ }
  1421. JSR ON_OFF_PPU. e9 o; j! R4 |$ P' C
  1422. RTS. k+ L8 {. y, k- A8 d1 b! M

  1423. 2 e; s+ {: v9 O# V7 e/ b
  1424. B_TO_JMPSTG_PPU:' T3 n" w; U' F2 s
  1425. LDX #$000 I! N7 {& ^* f: j
  1426. LDA #$68( a" t+ j, H% }; h& \
  1427. STA $BA& `; M# d- u" M2 \" W& U% `
  1428. LDA #$22
    ) E& r( F, Z' `7 J) R
  1429. STA $BB
      W# O7 d6 e1 M. B
  1430. JSR B_TO_JMPSTG_WRITE! @; u: H* K  _$ r6 {  A  Q. u
  1431. RTS
    4 ]- h+ p6 O2 z1 p
  1432. # z$ e" N0 y; P3 \$ h( X: j1 j
  1433. ; ~! ~+ U( C- s* k+ ^! g
  1434. A_TO_PLAMOD_STRING:, `( X& q: X8 v! {; c/ J5 C
  1435. .BYTE $80,$8B,$80,$9E,$99,$80,$9A,$96,$8B,$97,$99,$8E,$80, [& K7 |7 g: O! \/ G, O
  1436. + f! |" I8 n# l
  1437. . t3 |) t& P* R8 ~& [; z
  1438. A_TO_PLAMOD_WRITE:, E: [6 y7 a. d; P6 J
  1439. LDX #$00
    5 F7 |1 n: b0 U
  1440. A_TO_PLAMOD:% _* F  s' K$ U4 J  R2 w1 N
  1441. JSR PPUADDR_PROCESS
    2 z0 S$ m! V- \2 Z
  1442. LDA A_TO_PLAMOD_STRING,X
    ( t  E4 z$ k+ @$ H5 v' l8 U9 l
  1443. STA $20074 F) i  F. p1 i! t
  1444. LDA #$00! d% E# e7 z3 I- G! K8 L
  1445. STA $2000
    9 ?3 D# k" y& D$ `! ?0 n- o# `
  1446. INC $BA
    / b: u9 j$ [$ {* }: h
  1447. INX6 o# J* p* C! `0 ?- b$ q
  1448. CPX #$0D
    ( ?4 s8 ^" I7 S* x3 b/ Y: i2 Z
  1449. BCC A_TO_PLAMOD
    . f9 X; T$ e7 x6 v6 p2 N
  1450. LDX #$00
    / k3 i- C6 s, R. `
  1451. LDA $39
    1 M" ]; F! m, m/ v" C
  1452. JSR ONE_TWO_PPU1 A4 @* X% F7 V# F; O
  1453. RTS
    8 G+ r7 A" F2 p3 P: f3 D( e4 B

  1454. ! c6 ], Y1 ?" ^, @
  1455. A_TO_PLAMOD_PPU:$ n0 [8 ]* o! N! v' q
  1456. LDX #$00# j& k- F- M' Y! l1 O
  1457. LDA #$A8
    ( [$ R1 R% ]' O) x
  1458. STA $BA% ^' i: G: V* _: a% }% k
  1459. LDA #$22
    2 H1 t! d! f9 {9 T; Z0 g
  1460. STA $BB
    4 q2 G  ?; Q1 o2 }
  1461. JSR A_TO_PLAMOD_WRITE  W2 U" o# D4 N# V: J  L
  1462. RTS/ A3 R# c  X" j5 k% c7 o/ o- R

  1463. 0 b. }% F* Z& ?+ b. S0 ]* c  L3 \$ w
  1464. MOVSPE_STRING:
    - U, k  C0 Z. J) |* K9 Y& ?
  1465. .BYTE $97,$99,$A0,$9D,$9A,$8F,$80
    & [& }4 a# [: R- R
  1466. 1 g4 L( R2 ?+ N- `2 t9 ]8 \
  1467. 6 j7 d3 O1 B0 M3 W2 P( b8 s, \
  1468. MOVSPE_WRITE:
    " l' P/ G6 \- F. z) z( T0 T% X, m4 r
  1469. LDX #$004 \* M9 q) o- X& f9 I! @% M
  1470. MOVSPE:
    . R+ _0 Z( M# F  M0 U- r3 U9 Y
  1471. JSR PPUADDR_PROCESS/ p; |* V9 j% L' ]# ^+ C& k
  1472. LDA MOVSPE_STRING,X
    * B4 |: Q0 z5 q* M
  1473. STA $2007
    7 N" l4 ]$ ~  _  F, p- X, q' H
  1474. LDA #$00
    1 ?1 t- K6 C) ~1 m1 P. `7 \
  1475. STA $2000) R$ `2 U: k; E: `  B
  1476. INC $BA. D* W! o8 l( L+ K' C/ ~
  1477. INX' e, R# W9 G5 P) B7 ^. R5 S
  1478. CPX #$07
    : v1 I9 W( V& ]7 M% H8 w
  1479. BCC MOVSPE
    6 \* n9 X4 G8 j2 g% Y0 i9 M
  1480. RTS7 v/ q$ x6 N* r0 n# V) e, ?- H
  1481. : I, f9 w" E7 z' S( ?
  1482. MOVSPE_PPU:1 w! R9 W3 |; O/ ]- Y" e
  1483. LDX #$00
    4 z& U4 i2 Y6 G5 t: i: y
  1484. LDA #$693 K0 s  c* t5 t! q( r
  1485. STA $BA
    / N0 k, y' f: W# T8 ]' `
  1486. LDA #$219 n) B# @, S  c; B7 J9 i5 w
  1487. STA $BB, O% h% O& y/ y1 Q5 U" u& f& Y
  1488. " y  [7 J% y2 |6 g

  1489. ! J6 _( @' c  A' |
  1490. JSR UP_PPU
    9 Y) D3 v7 r% ]/ q! D8 t- N
  1491. JSR MOVSPE_WRITE
    . I% ?8 Q$ h9 X& h% F3 K
  1492. LDX #$005 m9 r9 N/ |( A4 P: V" O$ Q% J  d
  1493. LDA $079F& v1 j/ i( R, l: B9 m8 G
  1494. AND #$08
    + o7 p! w; s# e" Z5 k# W
  1495. JSR ON_OFF_PPU0 v$ [2 R' Q: o% ^. d
  1496. LDA #$801 G+ h8 s7 ?& \$ o( }
  1497. STA $2007' d8 D% \! N! a, o& d2 g& Z
  1498. RTS
    / V/ \" S) P& g6 }$ L
  1499. " N" G. p: m1 k" j4 Z- U
  1500.   . E0 c$ C7 x; ?0 [6 [3 H
  1501. UNLJMP_STRING:
    . X9 E( \0 G4 b2 K
  1502. .BYTE $9F,$98,$96,$94,$97,$9A,$80
    * G9 F1 u  d2 _* w2 n3 P" p: V

  1503. ! q: x" C! f, X7 ^+ B
  1504. $ E. P1 u6 I8 G3 w2 x2 X
  1505. UNLJMP_WRITE:
    0 B3 q* H3 _( T; G! M
  1506. LDX #$00
    * A% q/ i( d& F2 `& W2 p0 |
  1507. UNLJMP:
    6 [& q& O5 W4 {; [
  1508. JSR PPUADDR_PROCESS
    ( R: m2 ?; W" a0 S+ `3 @7 J
  1509. LDA UNLJMP_STRING,X
    + y0 r% M  P& ~/ P% b' r/ x, E
  1510. STA $2007. C% q) Y& X; U; r
  1511. LDA #$00
    5 h  A+ H: E8 I& w8 @
  1512. STA $2000
    1 I/ [6 k$ D) L8 f; G  H
  1513. INC $BA
    ) Q! o1 Y- P* V6 A
  1514. INX
      Y( [0 O3 f; h3 o0 V3 o9 [
  1515. CPX #$07
    2 f& W$ v, b2 C) D0 f/ j4 _
  1516. BCC UNLJMP  @2 t; p) _* n/ _, x, A
  1517. RTS6 C9 m8 o8 n* s' f- @# k# k6 J

  1518. 1 c3 ?8 T- d7 V: r. G7 @; ~
  1519. UNLJMP_PPU:
    ' t/ D3 b2 Q6 J+ B5 `' X
  1520. LDX #$00
    2 ~3 ]5 ?. H) P* p: q0 |$ r
  1521. LDA #$A9
    5 {1 ]! V  U# d2 X! g: x; @" N) j
  1522. STA $BA
    ) `: Y: }! t: Y- r' M+ ~7 F
  1523. LDA #$21
    6 k. @* H7 V" b
  1524. STA $BB
    " D8 B* E! \, [9 D

  1525. , b! x( E, k  Y1 ]

  1526. / J( x$ z5 c. H6 e! {, P8 n% d, ^
  1527. JSR DN_PPU
    7 K. x) I! N. e
  1528. JSR UNLJMP_WRITE1 w# l* T( W. R, q
  1529. LDX #$00$ P: E+ I$ t* L- s+ X6 {* @  u
  1530. LDA $079F
    4 N0 N5 x. n4 o% s7 T& f
  1531. AND #$04
    ' K: X  q, f3 `7 Y
  1532. JSR ON_OFF_PPU
    9 E# h8 j$ e; ?" j- x
  1533. RTS0 }- m/ H; k! ~( o& l& J( e+ v

  1534. # `- D7 b* F- M$ W5 _

  1535. ' h" t9 @, H% }9 |2 g9 W
  1536. DESTRO_STRING:  ?  V/ |+ M7 q" ~
  1537. .BYTE $8E,$8F,$9D,$9E,$9C,$99,$80
    ' q& o8 k4 q5 Y
  1538. / a' I# L- n' U9 f/ }

  1539. # T& ?1 C( B8 b* o& }
  1540. DESTRO_WRITE:
    2 U4 R5 _3 f2 r& \
  1541. LDX #$00% A6 x% k5 p* H! Q8 a. S9 O# f
  1542. DESTRO:
    # t' t6 ]( K8 {& H8 B" k4 `* R
  1543. JSR PPUADDR_PROCESS
      h" R  M+ s* M2 n+ R
  1544. LDA DESTRO_STRING,X, Y* S) P/ O3 B/ I
  1545. STA $2007* }* I" d8 z" Z0 f6 R1 r6 G
  1546. LDA #$00+ h+ i! Q6 E7 f, y
  1547. STA $2000: Y6 M( J: T" T! E( x3 D7 L
  1548. INC $BA
    ; z8 A# V0 S" ~" C5 C# b
  1549. INX
    / `: j" K8 P- |$ q
  1550. CPX #$07
    ) W% I$ ^8 M- q, D6 e0 ^# ^
  1551. BCC DESTRO$ T! P5 K6 o3 ?
  1552. RTS
    + h& f# [, s* [( h
  1553. & x4 @: V4 O3 o9 |
  1554. DESTRO_PPU:9 X, A' X/ `& S& E9 C; h" Q! }: q
  1555. LDX #$00
    + i6 V3 y! k! O& l) E( q
  1556. LDA #$E9) ]0 {+ }$ e+ Y: [4 Q
  1557. STA $BA
    * O' T" A( e. T' ]2 `
  1558. LDA #$21" I% C. q# c% N9 q
  1559. STA $BB' ]. V4 p$ u% h" [
  1560. 0 D$ q' D1 `: r: c
  1561. ! ^) F; j0 `7 l3 Q4 O
  1562. JSR B_PPU3 R/ ?7 k# V, n) \
  1563. JSR DESTRO_WRITE8 F$ W) H- O' U. v+ P+ ]
  1564. LDX #$00. g: g* e6 h0 ~6 R
  1565. LDA $079F
    - ~% i& \9 b2 D5 H+ P. x2 [
  1566. AND #$40- v' Q: m0 z0 T/ D1 k
  1567. JSR ON_OFF_PPU
    5 r/ A3 C6 m3 X7 o9 Q/ n1 @1 n
  1568. RTS
    7 ^9 n5 X2 l. r0 G9 h( t; b

  1569. 9 j" L0 }7 I# k3 ~, V
  1570. " X1 c# _( ?4 X& o( Q  Z4 i9 k; @/ |
  1571. EQUBUL_STRING:
      l6 k+ c6 \, [& j1 P1 A: d
  1572. .BYTE $8F,$9B,$9F,$8C,$9F,$96,$801 X* C, v$ q2 H0 B3 {& e6 x' m

  1573. 0 p* z9 z( [- J) t! T. K4 @
  1574. ( D/ p* [. {5 _; B5 p
  1575. EQUBUL_WRITE:$ f3 L4 H; r3 v; Z: Q4 s
  1576. LDX #$00' W3 V  O; g. T! O& E: |( m+ G- U& e
  1577. EQUBUL:3 ~4 V3 s# K' s/ O0 k  g
  1578. JSR PPUADDR_PROCESS5 t: v$ x% h: ]( s/ ?7 ?
  1579. LDA EQUBUL_STRING,X
    & M1 V& j; K$ p/ ?% [3 i7 v% u
  1580. STA $2007
    0 ~6 G4 G1 L9 ^; j0 [
  1581. LDA #$004 q6 m  D9 ^* y
  1582. STA $2000# ^3 T6 I5 F5 W* i( n
  1583. INC $BA
    , P  M" K! A# f' M
  1584. INX! l1 j- m5 M' @6 X: k
  1585. CPX #$07# J7 s: @, K8 P7 |1 L
  1586. BCC EQUBUL
    * b! Q; G* E+ k' L4 j
  1587. RTS
    , [5 E1 I1 x8 a: O' P

  1588. & L8 q0 x* w5 [2 f* H+ w% p& O
  1589. EQUBUL_PPU:4 y$ f! y. `- Y/ V! W
  1590. LDX #$00' n: g; [1 d  N
  1591. LDA #$29( L. p; y0 }8 c2 |5 c6 h1 _' Q
  1592. STA $BA0 ^/ l; y9 A  _7 t$ ~2 r# A) d
  1593. LDA #$22
    4 g0 O- l" b" s/ q0 u5 G
  1594. STA $BB' d* ^7 _+ B# o; x; n+ U

  1595. 9 F; @/ @6 |" X& ^

  1596. 2 R8 d3 [; ?# S/ u( ~9 x4 r+ f# b
  1597. JSR A_PPU
    7 V6 Y9 X+ p0 a, T
  1598. JSR EQUBUL_WRITE: H; r! c/ e; z' @
  1599. LDX #$00
    ! i% {: ~9 x0 O9 q; s) w+ a
  1600. LDA $079F1 K- e( ]* U7 T9 g' Z. n6 Y( A5 p" J, Q
  1601. AND #$80
    2 Q! a* F+ W; P4 t
  1602. JSR ON_OFF_PPU
    ; W& |0 \0 n; ^7 ~: K6 |- o' H1 K
  1603. RTS* G* }) v4 F* ?( v. S9 h4 n5 Z5 U1 L

  1604. ! `  o6 I0 _7 b

  1605. ; G: P+ A- i' g0 \8 E7 j
  1606. , [& k1 P" B7 O; v2 o* O6 H
  1607. BULSEL_UP_STRING:% `8 Q4 f* n7 L+ Y2 N) I) W3 E
  1608. .BYTE $9F,$9A,$80,$9E,$99,$80,$9D,$9D,$80" F' u* {$ |( @( p3 z, Y8 Q

  1609. * q- z5 N8 T6 v( a
  1610. BULSEL_DN_STRING:+ r: @  Q# u. Z% c% _) u
  1611. .BYTE $8E,$98,$80,$9E,$99,$80,$9D,$96,$80! o# u9 X7 O8 d0 b. i1 y
  1612. + E+ K& u- A; s! }, b8 Z2 n3 f
  1613. BULSEL_LF_STRING:8 A/ K! M$ F5 S( c# F, i
  1614. .BYTE $96,$90,$80,$9E,$99,$80,$9D,$97,$80
    3 r& P9 r. m7 n9 x% [! ]+ N  F6 E/ u
  1615. % |$ e# x$ ?: Y* {" H
  1616. BULSEL_RG_STRING:
      t& N9 u4 ^. j" L2 m7 |
  1617. .BYTE $9C,$91,$80,$9E,$99,$80,$9D,$90,$80
    9 r0 h8 }) M9 d) ~: |1 `

  1618. 1 I: e2 D5 c$ i4 @0 {/ V  C7 a
  1619. BULSEL_B_STRING:
      _3 D1 n- n% {. y
  1620. .BYTE $80,$8C,$80,$9E,$99,$80,$9D,$98,$80
    7 A& ?) L$ c7 n/ V

  1621. ( R3 e: r. \! c$ L1 h
  1622. BULSEL_A_STRING:
    & l8 c! P3 m; ~3 Q( b; ^
  1623. .BYTE $80,$8B,$80,$9E,$99,$80,$8D,$99,$97,$97,$99,$98,$80,$9D,$9A,$8F,$8F,$8E
    6 x$ o) u- _6 u9 Q- j/ m! G
  1624. / I1 `% o/ A7 O7 [
  1625. 1 i* _8 ?) d2 v! D8 o, Y
  1626. BULSEL_UP_WRITE:
    8 H" N) I9 p3 m4 H
  1627. LDX #$005 A9 s8 P. e$ w! X/ u) W
  1628. BULSEL_UP:
    , K' E. s2 D5 o7 I1 C) K3 y
  1629. JSR PPUADDR_PROCESS2 y3 w8 Z- v7 b4 S
  1630. LDA BULSEL_UP_STRING,X
    0 d7 [( C  X; e' i0 J( q
  1631. STA $2007( f/ H2 o9 }1 U  J5 i9 h3 {. x# l
  1632. LDA #$000 N* W* z5 a6 V
  1633. STA $2000/ [1 H9 `  w6 O
  1634. INC $BA
    6 ]9 z+ p% ~5 g8 x
  1635. INX
    % b. t3 q' g) `# Q$ ~
  1636. CPX #$09
    7 j+ R# J, Y8 K7 i! e. c
  1637. BCC BULSEL_UP: A8 }2 f  Z, N3 \, @# h
  1638. RTS2 U0 w1 L4 h; i5 |6 n+ A+ Q
  1639. BULSEL_DN_WRITE:
    + h$ a4 E6 Z: P
  1640. LDX #$00
    # b; H" P0 o8 b
  1641. BULSEL_DN:4 j3 Q' b' w( y+ L" V  K# `% C
  1642. JSR PPUADDR_PROCESS( p0 h+ {4 m. v% g' z3 F
  1643. LDA BULSEL_DN_STRING,X% Q, W2 o; {* m
  1644. STA $2007
    4 Y8 U! w3 z$ ~2 h2 v! |7 E( L
  1645. LDA #$00
    0 Y; w% H9 b% t9 Z+ N+ V# [
  1646. STA $20008 Z% u3 W9 p- @8 I9 J2 }: K* u
  1647. INC $BA
    " I1 d& ~/ R, P6 P- ]7 H
  1648. INX
    2 N/ t9 r+ {& F
  1649. CPX #$093 b6 q2 D2 D% l; ~
  1650. BCC BULSEL_DN
    " w  d3 Y& a8 k& R
  1651. RTS
    " s( A1 H0 ^$ _% x, e/ G% O# \( f( C
  1652. BULSEL_LF_WRITE:
    , p6 n9 `+ S. d
  1653. LDX #$00( W) t  C) I" V/ j# y  e
  1654. BULSEL_LF:- v7 y9 x9 Z- p% `7 K
  1655. JSR PPUADDR_PROCESS9 i, p0 l5 ^, x
  1656. LDA BULSEL_LF_STRING,X& V7 H- w# |$ f+ A0 W7 Z
  1657. STA $20078 s+ J1 p' ~: V8 B$ V- \( O& {, i% S
  1658. LDA #$00
    8 c0 N5 z& B8 U( q  G
  1659. STA $2000: k8 Y& P5 r- Q
  1660. INC $BA
    + w  @# ?* c, h* r" v4 P- D
  1661. INX
    8 T) M) n, k$ B2 \& V& P
  1662. CPX #$09) S5 p1 j8 F- S7 ]; F0 B
  1663. BCC BULSEL_LF
    7 Q# f: j; ]. A) F# V6 K/ e: N1 c8 F
  1664. RTS0 y1 ^* H6 z3 Q4 Y& x. ?: j, J
  1665. BULSEL_RG_WRITE:
    * }6 T9 a, I# P: k; q) `; W$ k7 i2 {
  1666. LDX #$00  }. \# l- b) `6 w$ s
  1667. BULSEL_RG:
    " v- E7 O, c9 U
  1668. JSR PPUADDR_PROCESS+ j' r. _, z/ w0 f1 S" z* Z, M- Y
  1669. LDA BULSEL_RG_STRING,X
    8 i/ k6 k% s' W0 x" [; }
  1670. STA $2007
    5 j7 R' v4 Q( {& @, b3 e6 G, I
  1671. LDA #$005 ?* u( p) A" {, k* e
  1672. STA $2000; C9 @) o9 h8 p5 n! z- L
  1673. INC $BA$ N; m+ V. m$ k2 G
  1674. INX
    0 }- Y1 x, p' E/ t7 C
  1675. CPX #$09
    , S! M7 |6 r- X1 K* T+ o7 Z
  1676. BCC BULSEL_RG) f1 H$ }. C" @3 n, }6 y  J
  1677. RTS
    6 E' B4 A; v, N' U' C4 h7 D, W2 E
  1678. BULSEL_B_WRITE:
    , E# F0 I/ N1 }$ \1 l
  1679. LDX #$00
    + N" o2 R0 O+ L% s
  1680. BULSEL_B:
    + l; e6 U& z' q. a3 S" F! R# z
  1681. JSR PPUADDR_PROCESS# ?. A  N6 @% c) u0 g7 V; F# Q2 l
  1682. LDA BULSEL_B_STRING,X# V; x, k- X) _. c  \4 ]7 l* e$ ~6 R
  1683. STA $2007- t6 f7 W) W* D* H
  1684. LDA #$00: G6 F) {, l, V5 g: ^9 W9 W
  1685. STA $2000& E, K. V4 m) \8 ]9 g
  1686. INC $BA8 ~9 m& j7 J+ h4 Z/ B3 p
  1687. INX7 e6 o5 ?9 M: }" L, X& X% `
  1688. CPX #$09( x7 H$ l9 C; ^! ~4 V; W8 }
  1689. BCC BULSEL_B+ P6 i# y% D  t) X; o+ O
  1690. RTS/ }. l2 G4 q& g( ]4 o# E
  1691. BULSEL_A_WRITE:2 J" x( S8 X9 ^+ ]" p9 x' d
  1692. LDX #$00( ]% E2 u+ V+ {
  1693. BULSEL_A:/ T* u: h4 s( M  b( n, ^1 \0 H
  1694. JSR PPUADDR_PROCESS+ J6 I  _( j2 I0 U
  1695. LDA BULSEL_A_STRING,X
    8 D* I* P* j% J$ c" I7 c& h
  1696. STA $2007
    & q& _' B: v( E& q( l) M4 P. @
  1697. LDA #$00- N7 c. J7 K9 K3 s
  1698. STA $2000" K/ N* k. c: ^* m  |
  1699. INC $BA; `9 [1 Y7 C. x! \, x
  1700. INX6 w. [  v' K2 K3 w( Y) c
  1701. CPX #$12
    , A! p, B& B" V# x) K5 J8 g: g, J5 p
  1702. BCC BULSEL_A
    0 r5 D, s1 h% ]& G0 V+ y
  1703. RTS
    5 O* A( A) ?6 l. A' Q
  1704. ) L- I9 K9 h- t7 u9 s' k
  1705. 3 u" Q" C! v" @; R7 n; z
  1706. ' j% c" s, X* b) `
  1707. BULSEL_PPU:
    9 n* A8 Z/ A9 u0 z  k
  1708. LDA #$6C
    ; D2 K+ h& t# i$ I
  1709. STA $BA
    # J# }' ~. ]2 k6 J3 m) s  q; h7 y% l
  1710. LDA #$21( o' ^* x* G5 K0 }' o% l% t1 q. `# r6 C3 `
  1711. STA $BB
    0 q  E3 y4 r1 f  N; A. u
  1712. JSR BULSEL_UP_WRITE
    / y9 j' K1 `. k5 d

  1713. 7 f' Q, F6 `$ f8 F% O
  1714. LDA #$AC$ X. r6 Q4 N* m& z
  1715. STA $BA7 g6 r* i/ d; K3 F+ R1 ]. I
  1716. LDA #$21  w: A8 Y/ L; k( u/ H+ ~" `
  1717. STA $BB/ m$ z; q) X* ~
  1718. JSR BULSEL_DN_WRITE8 M6 L  O2 ]1 k* `$ t- f6 A
  1719. & ]  c  k* i" F" v: R7 W9 n
  1720. LDA #$EC2 O5 r+ b$ H1 |! f# e2 C
  1721. STA $BA9 r, N6 i/ s5 _, H* v5 A/ g* y* O/ _
  1722. LDA #$21! g9 \9 q2 }; w1 c
  1723. STA $BB
    / B6 `$ C+ m, F& H2 e2 X' V
  1724. JSR BULSEL_LF_WRITE8 L( B9 ]- g4 B0 C' ~) l7 |& ~
  1725. 3 y; R9 r6 f' R9 J# T' p. r0 h
  1726. LDA #$2C+ L$ Z# j. k7 r! w+ }
  1727. STA $BA
    + l( Q/ A. {7 H
  1728. LDA #$22
    ( \7 L5 j+ W2 X: U! S/ _
  1729. STA $BB) t2 j, R. Z) p% J* }2 q
  1730. JSR BULSEL_RG_WRITE/ @" f, ~. K1 W2 L* d

  1731. " ~5 x) G) M6 ?8 R# ~
  1732. LDA #$6C; b6 ?% T2 o9 u. K. \4 Y; o8 @
  1733. STA $BA6 d6 j% u) N2 V# R+ W
  1734. LDA #$22% C& J3 Z' M0 @4 w
  1735. STA $BB8 \) G" @! r+ w  a3 k+ G; B
  1736. JSR BULSEL_B_WRITE
    ' j7 w( L  U9 b% u0 }8 k% o) e
  1737. + r1 _0 V5 j5 O! |6 ^  u4 I
  1738. LDA #$A76 s$ j2 d- r* [8 ?
  1739. STA $BA
    8 X' D% T5 z. L: `( h- P
  1740. LDA #$22
    $ c/ D9 v6 W/ Z+ f/ M, V: C
  1741. STA $BB
    ( {" z0 T3 K  S% f% j- n
  1742. JSR BULSEL_A_WRITE" p0 k. E& N0 Z" E* q
  1743. RTS1 v6 ^" \9 ]' c+ w8 \$ c1 Y
  1744. ( D. u5 S* b5 W' }+ c

  1745. 5 k) _' h. c( q: R7 H( l6 N

  1746. 6 H3 e# P" H- h" U9 [# ^6 D$ D( E* H
  1747. UP_STRING:0 v' i3 m/ x" Y- j* G
  1748. .BYTE $9F,$9A,$80+ I* q: `2 X2 [0 c
  1749. % W& F% M' N/ g% z
  1750. DN_STRING:
    / [$ F$ s$ A0 G: F) @6 K' b4 ~
  1751. .BYTE $8E,$98,$80: |; F( v+ o" i* e) a
  1752. ) V( s( `1 e+ |% j7 U2 z
  1753. LF_STRING:
    ' N: Y  M9 |: b+ |2 O
  1754. .BYTE $96,$90,$806 a: {+ M& m; n* O: `( i

  1755. 6 J: g1 [7 c4 E' e
  1756. RG_STRING:
    5 J- ?6 Z0 o+ N  P+ x8 [) B
  1757. .BYTE $9C,$91,$805 E) m9 i) A$ _# Q# o8 h

  1758. . b: P' S7 }. s; [, M5 }4 Y
  1759. B_STRING:
    0 N/ w9 j! _$ l( j2 `2 c2 E- ^: f
  1760. .BYTE $80,$8C,$80; O' u, W7 m9 x7 ^$ A1 p. \
  1761. ' b! r9 i2 I/ B
  1762. A_STRING:
    1 W5 s$ }1 X9 X$ a
  1763. .BYTE $80,$8B,$80
    . s0 q- [' \; j. `1 |
  1764. ( v6 Q; P3 O" n0 f9 W
  1765. * u/ K* o& E/ D
  1766. UP_WRITE:
    ! q3 h1 u9 o( Q4 n, q+ j& h( \
  1767. LDX #$00
    - K* ~+ {- K" ?: z- c
  1768. UP:- k. B/ Z0 X7 Z% n$ e
  1769. JSR PPUADDR_PROCESS
    & r+ i8 ~" `) h% ]
  1770. LDA UP_STRING,X! T% ]$ ~" B; m6 {' p
  1771. STA $2007$ R7 X: W; y( k- M/ `% @
  1772. LDA #$00% z3 M. H; i0 k. i
  1773. STA $20003 A, L; v" T9 R
  1774. INC $BA; y1 W" o. P4 D; i0 {
  1775. INX
    ; r7 I& G2 ]7 u; ^! X2 M6 \6 ?
  1776. CPX #$035 z, \6 I2 y- }& y, a' ^
  1777. BCC UP
    ) k4 v* M# v( q
  1778. RTS
    0 O' K: B: l' E$ ]& K

  1779. * ]1 A. i/ l1 [3 C
  1780. DN_WRITE:9 N6 n6 M* X6 K1 u
  1781. LDX #$00
    ( `$ ^, e- ]* b
  1782. DN:0 M' M. @6 `4 s6 c* Q1 g2 z
  1783. JSR PPUADDR_PROCESS/ \; Z' t; K9 K6 U7 ^
  1784. LDA DN_STRING,X( P' ^$ g2 Y" C( x/ s; n
  1785. STA $2007
    & `) ]$ S7 ^' w
  1786. LDA #$00
    ' l8 ^9 U6 u  I8 k. E
  1787. STA $2000
    2 V7 m- j: L" G0 P! J2 j
  1788. INC $BA
    # E' C7 K4 x# w  o, u
  1789. INX9 K  j" F. k1 j
  1790. CPX #$03
      D9 x3 Q, w8 A* `; l5 `
  1791. BCC DN
    0 g' {' w+ X6 I$ [2 d
  1792. RTS: Y' d, L  m- J( J8 D7 x2 t. P

  1793. - @1 v/ Q2 d. A4 p% ?) C7 S
  1794. LF_WRITE:
    " k/ N$ ]( g7 o7 K8 _
  1795. LDX #$00! ]+ }8 F1 Y5 y% t0 A6 D3 d
  1796. LF:
    ; \/ m. I/ R% X4 I5 Y
  1797. JSR PPUADDR_PROCESS
    7 O: o  D7 f  v5 L
  1798. LDA LF_STRING,X) i: a- ]+ e: F. S$ `
  1799. STA $2007
    , Y3 a1 X$ T3 h
  1800. LDA #$00
    + g( X. n% y. Z4 j: \/ n
  1801. STA $2000# |- t/ B7 a' v* A+ q7 l" q- @
  1802. INC $BA9 d5 ?5 N% i8 }; i' `/ p6 e
  1803. INX
    3 [! E6 S; _! `
  1804. CPX #$034 ]. y( z  i- J
  1805. BCC LF
    ( H) p* k2 V0 V, o' u
  1806. RTS6 V' `3 d8 s/ ^1 T5 [& S

  1807. ) }1 Q: J; H' _$ D
  1808. RG_WRITE:
    4 J8 S3 E! L: E6 z
  1809. LDX #$002 L2 m. x6 F7 H$ W# J9 v$ h6 f
  1810. RG:
      x% u$ n7 ^; J3 ^# o
  1811. JSR PPUADDR_PROCESS
    ) L7 L6 [; H( V3 W7 c& N
  1812. LDA RG_STRING,X3 B3 ^1 b) ]9 _2 i
  1813. STA $2007$ ~& I  G9 M- T
  1814. LDA #$00* J& h! N% M, F' g$ y0 Q
  1815. STA $2000
    , @7 S/ \$ o4 {- ]  O7 `8 U- V
  1816. INC $BA* `- c3 {+ k$ o6 ]' T" x
  1817. INX% M" K7 B3 m8 M9 \
  1818. CPX #$03
    * I0 z" q  L1 i" p+ V
  1819. BCC RG
    ) h+ _$ B) X+ G
  1820. RTS  m, ~5 t$ y; |3 X/ [0 b+ l

  1821. ! i* K5 [3 l: U$ W; T1 c
  1822. B_WRITE:) F2 {$ K' t) t
  1823. LDX #$00
    5 l$ O4 v; `; }% D# w) |2 v
  1824. B:9 M9 ~% q$ Z/ v9 C0 x- `+ x; A/ R
  1825. JSR PPUADDR_PROCESS9 X* I" z; x2 S9 b
  1826. LDA B_STRING,X7 ^, z5 i6 S* [, y. `) T9 Z# i" r: P$ v
  1827. STA $2007
    : O& r  |4 P; r9 w0 T$ ^# h
  1828. LDA #$00( _* X; o1 H; J
  1829. STA $2000
    / u. `2 ^4 J; Y4 p( \
  1830. INC $BA
    , g" }- e) P8 f+ Y1 X" N! H
  1831. INX: E3 o1 J3 W! p/ `  {2 s
  1832. CPX #$03
    0 K1 J7 u5 F5 I* ?4 B" ~
  1833. BCC B4 [5 l( K2 `: b
  1834. RTS
    7 s' _" g& ^/ D. p/ P

  1835. 4 s4 [/ y* B# f1 ^1 T
  1836. A_WRITE:
    : e3 `; y+ N& a; a
  1837. LDX #$00+ z/ T* c: w$ H. q, T3 \
  1838. A:- e$ N: }6 A, }  g( I
  1839. JSR PPUADDR_PROCESS
    9 Q9 c3 ]; j: f4 m' V
  1840. LDA A_STRING,X; a8 s' m0 j4 ?. Q- H  N
  1841. STA $2007
    % K1 k: x4 n. H0 E1 o4 r* U
  1842. LDA #$00
    ) W4 A' @1 q$ f1 n. Z; z' U
  1843. STA $2000- k1 a: a1 W5 J
  1844. INC $BA6 ]0 O& @( p  {# ?
  1845. INX8 ]0 q8 Z" I- q, z5 r
  1846. CPX #$03( N! \, Q' t- \+ v
  1847. BCC A/ F+ O4 M( ^% q8 ]* k
  1848. RTS( l; m5 |" Y  M5 u! z% `) i

  1849. 7 ^: s# {% b( [3 U9 h

  1850. / O! ]4 n  L, K: {! F% Y: N
  1851. UP_PPU:6 l# _6 r3 ?* \
  1852. JSR UP_WRITE9 ?9 L% O- v* l% g$ d
  1853. RTS
    4 Q/ q" q6 p, k* G* a9 a, ]  E
  1854. - y' I- {+ ?3 m
  1855. DN_PPU:
    8 w& d1 S: m9 ~  }- |/ ^
  1856. JSR DN_WRITE
    6 y) x8 l" c! T* [4 ^% N( _+ @
  1857. RTS1 ?: v# ?. N1 ]' Y; h
  1858.   X/ h0 F9 n, G  X$ _5 O
  1859. LF_PPU:0 ?7 f3 E8 b" i* j+ [4 B  o
  1860. JSR LF_WRITE# S% z" Z8 \/ `2 V* X9 G1 {2 z
  1861. RTS+ i$ R8 V% c5 O8 }8 `0 u; R0 M- C: H
  1862. % ~; L! o/ l, \! }3 D% v
  1863. RG_PPU:$ n7 Q8 U/ {4 F3 g* C  _
  1864. JSR RG_WRITE
    ; T) V' F  t& k; B
  1865. RTS% Z3 J8 H* y; e+ p% j' w
  1866. ' F9 C4 G% ~. w& l, c
  1867. B_PPU:
    : _  v$ K( F& }' N, a! H% J- p
  1868. JSR B_WRITE* c- s2 n: e* p+ s8 ]2 m0 _
  1869. RTS
    " I' G, E9 ?' K0 D3 S6 K
  1870. # ^$ I( ~6 c' _+ ]- T
  1871. A_PPU:' n" ]8 o  K& ]  J4 O- N
  1872. JSR A_WRITE9 E( T0 M6 _' J
  1873. RTS
    - U7 }. ~( x. S' T& c, U3 Q, H

  1874.   h4 ~6 c' e+ S- g  J
  1875. : l1 D1 r/ Z0 a1 o4 H3 K! d& ?3 j
  1876. PAGESELECT:# h1 g+ D  N( b0 {/ f# {0 |% C
  1877. PAGE0:. U$ L  _$ l6 k7 ]
  1878. LDA $07AA
    - V& O7 s3 K- E" D, F
  1879. CMP #$00
    : Z' Y9 ~1 L! k$ O. `4 c# C, P0 L1 {
  1880. BNE PAGE17 o  H) ]$ I1 ~- B% E5 E5 a
  1881. 8 }; z3 \! s6 x
  1882. PAGE_00:
    8 t9 ^1 ^: G1 O+ ]
  1883. JSR BULSEL_PPU
    : i6 ~0 L4 T' n. @8 G" a
  1884. RTS! D7 o) }7 T0 X/ @

  1885. " x9 c1 S* h8 H3 S7 h& P
  1886. PAGE1:& r. R. W3 j* n
  1887. LDA $07AA$ h9 X) v9 A  g* P! o- b
  1888. CMP #$01& ~* z4 {5 t$ }! b. Z4 F7 ~
  1889. BNE PAGE2) M. H) F9 d, C. ^3 m. k8 |) _  S) L
  1890. $ t9 i; J/ p" y% |) g) z; t! z  h8 F
  1891. PAGE_01:( g9 n" E& D5 _
  1892. JSR INVINC_PPU& c4 ^3 q5 D; d& X' x9 i
  1893. JSR LIFELC15_PPU, p4 b: R3 w- p6 z1 H- ~3 |
  1894. JSR DOUCON_PPU
      R- a) k# B% l9 i
  1895. JSR KILLON_PPU8 l" W' i3 w/ `; y' s; b
  1896. JSR SKYFLY_PPU
    7 F  p; |" v+ @7 f* c' V
  1897. JSR LIFELOW_PPU/ Y0 S" [. t4 e
  1898. RTS" s) y! w0 D* o

  1899. + b  ?: K2 H* o! M# j
  1900. PAGE2:
    ; l! S. e' w, c" S
  1901. LDA $07AA
    1 a- t0 _% t. @
  1902. CMP #$02, w, {) Q' C0 U$ I6 B& A9 ]8 e
  1903. BNE PAGE35 L  [, B! h) S9 C  b
  1904. $ E/ m+ t2 H4 g4 ^: I/ V* }: n
  1905. PAGE_02:; {! }; h3 _& A2 n5 k. }
  1906. JSR BULADD_PPU
    ! |' c' s. g8 s8 I. X" z: o; ]
  1907. JSR SKINGE_PPU/ i, B; }* \5 h1 a" ^4 L
  1908. JSR BULMIX_PPU
    5 ~* `# Q3 ]" p
  1909. JSR ENELOC_PPU
    5 ]4 l* \  ~$ g' R0 V0 z7 K3 q- Z
  1910. JSR FOCFUL_PPU4 C% z7 }% x7 ~
  1911. RTS
    8 |: N* b6 M1 g- ^* s! f+ X
  1912. ! G& T: C& K( i6 \$ _; |0 u
  1913. PAGE3: ( y0 @% X% u0 @: X7 f
  1914. LDA $07AA
    ) X5 x0 V) j# r; g$ A6 r
  1915. CMP #$03
    # C% L; C' U4 `9 o
  1916. BNE PAGE49 e* k+ R" v( R% G0 e

  1917. 0 Y# l/ w+ e6 h
  1918. PAGE_03:5 J# i, J' J$ a' b5 R! K0 S6 m
  1919. JSR BULCON_PPU
    . \" T( |( q$ {
  1920. JSR SPEBUL_PPU
    ( j) G+ I! b5 s
  1921. JSR CLEALL_PPU
      H$ E; S8 m. {# V" F7 S
  1922. JSR HARDMODE_PPU
    2 @& w% ^; ]  k
  1923. JSR B_TO_JMPSTG_PPU
    6 m/ i, D; b( f1 d* C" q
  1924. JSR A_TO_PLAMOD_PPU
    9 e4 A+ a1 e* H0 s
  1925. RTS
    6 e* a9 Y$ h2 U. s8 H5 n

  1926. ; h  S% A" z/ C" v# x" N8 ^2 |9 u
  1927. PAGE4:
    + k" ^: _7 |2 J) ?/ H. A  L/ Y
  1928. LDA $07AA; L9 C7 x' K' z+ V
  1929. CMP #$04) Q- d5 a6 J2 `2 v
  1930. BNE PAGERTS
    9 p1 \, Z4 ]/ Q2 d/ ^9 P3 q% M1 |. u) D
  1931. - ]8 P# ]$ A0 v
  1932. PAGE_04:
    . L$ ~. N  b# D: B
  1933. JSR MOVSPE_PPU0 @9 f! M& Q/ r0 s0 E  ~) S* _& V, W
  1934. JSR UNLJMP_PPU
    . c8 e# b3 H$ V% W
  1935. JSR DESTRO_PPU
    $ I9 I2 s+ D0 V* @
  1936. JSR EQUBUL_PPU
    9 N+ d* ]: F4 G/ M" y
  1937. JSR MOVESPEED_PPU
    6 ?' v, z$ L; _2 _5 K* M
  1938. PAGERTS:$ l& c- H+ W" X3 T9 [
  1939. RTS# U: W' B: T  `6 J$ k
  1940. 3 D+ ?( e) S/ W

  1941. " I/ c2 e9 w! S! F! C
  1942. PLAYER_01_STRING:( ]: L% C2 X: |2 _1 q
  1943. .BYTE $9A,$96,$8B,$A3,$8F,$9C,$80,$81,$82,$80
    & |4 \: @3 C; n/ ]
  1944. % r6 I+ ]8 N/ M* F5 j$ m

  1945. ! m9 b9 I/ F; x% R6 A1 H3 B% C
  1946. PLAYER_01_WRITE:
    2 S0 K& _4 r/ g* Y7 [1 a" t; }' T
  1947. LDX #$00
    1 {. m+ k8 C% c" p% ]8 ]% q
  1948. PLAYER_01:
    3 o* i3 d7 `* V6 ?2 s% n
  1949. JSR PPUADDR_PROCESS( e, s5 k+ m: Q
  1950. LDA PLAYER_01_STRING,X& G6 j4 F/ e0 y8 w( g0 g
  1951. STA $2007
    0 G; J6 t' W4 B+ B' ]( `! b
  1952. LDA #$00. Z, C, v, a6 h# p
  1953. STA $2000
    $ |  s9 k, V; o2 n5 @! _
  1954. INC $BA
    0 g8 d. ~6 ?3 {/ n
  1955. INX8 q( u6 r4 W8 N. O6 B
  1956. CPX #$0A3 Q. F9 K; f0 p/ c4 \
  1957. BCC PLAYER_01, x8 G% Q1 u& T4 {3 p! C& ]# o9 Q+ I% Y
  1958. RTS
      c/ |4 C2 J" D0 Y) v
  1959. 9 |) O9 k# N1 r5 z+ X
  1960. PLAYER_01_PPU:
    + ]8 L4 X3 [+ W  J1 D) E+ r( f
  1961. LDX #$006 K8 w3 L" k) N, r! F
  1962. LDA #$64! q6 {& g* C: n% h3 k! S' G
  1963. STA $BA# r0 u3 ^; L. c& }# i3 @
  1964. LDA #$20
    ( {7 y, h% o6 m, k
  1965. STA $BB/ ]+ C% f  ~% q- `' h2 ~2 E- f
  1966. JSR PLAYER_01_WRITE
    8 V# x+ x# V0 |- K$ t! c7 B+ f
  1967. RTS
    5 \; B' s( ?% ]2 Z1 d. N3 k

  1968. " P9 o6 a1 a$ D4 C9 c
  1969. PLAYER_02_STRING:
    8 c( `7 j6 }: G$ w* ~
  1970. .BYTE $9A,$96,$8B,$A3,$8F,$9C,$80,$81,$83,$80
    5 L7 Z$ m; V9 h7 X% ?8 j1 }$ ?

  1971. 7 m; o' y9 O; a: P2 Q3 I
  1972. 6 J8 u9 c+ O, Z8 e- f+ @
  1973. PLAYER_02_WRITE:
    * G0 t; l& S6 c' c  P
  1974. LDX #$00
    6 d# b- B+ f1 n5 |
  1975. PLAYER_02:& w: C3 I% \9 {6 X- s
  1976. JSR PPUADDR_PROCESS* D" S( d$ A3 a+ |8 k1 G, S) s* T
  1977. LDA PLAYER_02_STRING,X  h" m$ w4 L4 q# ~! F
  1978. STA $2007% b' V& f3 M0 `: B! r! M
  1979. LDA #$00- a6 v5 O! w6 i. ]& ^$ g
  1980. STA $20004 f$ k/ h! g6 E/ L
  1981. INC $BA. H. K5 D1 R9 }5 S+ U
  1982. INX
    * q9 n7 s* k+ x
  1983. CPX #$0A
    ) ~5 ^4 b: f8 B  ]3 \& V  `- s
  1984. BCC PLAYER_02
    / k+ r! d* G$ u  X0 v) p
  1985. RTS
    . q$ e( r* `3 q9 D/ J1 O
  1986. ' H! j  r+ r% \( o6 Y: Q8 G! m/ [
  1987. PLAYER_02_PPU:: [2 v% y7 C5 w! D4 p! Y* L( g
  1988. LDX #$00
    ( q2 O/ n9 V% [  Q3 e
  1989. LDA #$73; \& Z: p1 ?0 `. J2 _
  1990. STA $BA2 j# J! X2 [' o* N6 }
  1991. LDA #$20
    . P0 J6 e- ]1 A
  1992. STA $BB6 D- d8 k2 m6 e: Y$ [
  1993. JSR PLAYER_02_WRITE$ R% A( h0 z9 k2 L+ B# u
  1994. RTS
    7 X$ V1 f: Y% m6 _

  1995.   Q/ ?# W% _# b5 F3 R0 T
  1996. PPUADDR_PROCESS:
    - s) Z; d  l" ~  P7 k( f0 J
  1997. LDA $BB% C  i. P' l; C7 G/ ~9 s
  1998. STA $20064 S5 }) r1 b- J7 q5 o
  1999. LDA $BA
    3 a. S% v6 m8 h/ y
  2000. STA $20068 g3 r& C* w0 q# |' L2 V8 F
  2001. RTS
    & x, j/ b1 D4 C6 {3 e6 W+ F: Q) |
  2002. 5 t9 R3 s. }) M% b

  2003. ( B" u6 l4 Q* }/ _+ U' N4 S

  2004. - G6 w, y0 |8 Q: v1 h
  2005. ONE_STRING:
    % R: T4 k! f: s" Y$ x5 e8 q5 ]" P
  2006. .BYTE $99,$98,$8F3 {$ w! P8 X. h1 D; `

  2007. 3 N* `: I/ S1 u' A
  2008. TWO_STRING:9 J; C0 q# K) H1 G+ `) U' X0 J
  2009. .BYTE $9E,$A1,$995 K0 ?7 d2 u8 X1 z/ ?
  2010. 6 V( E* K( Q; c3 [6 e# l6 ^- L
  2011. ONE_TWO_PPU:
    ' y0 k; V- _$ ?
  2012. BNE ONEWR
    + X! q2 X) W( o+ H5 G( l
  2013. TWOWR:$ K% S/ o' e9 U; e0 T: h- `2 p
  2014. JSR PPUADDR_PROCESS1 l" d. Y% `& P
  2015. LDA TWO_STRING,X
    4 i' {- z8 H4 |2 }9 L
  2016. STA $2007& ^) |1 s/ n: r5 @3 L# L: g/ O
  2017. INC $BA
    % F7 \) A# F2 g  h
  2018. INX
    1 W: |6 C# {8 |8 B3 G1 Q
  2019. CPX #$03; Q0 W. K0 T! Y7 P4 [4 B
  2020. BCC TWOWR7 o" }9 S7 e9 v( T
  2021. RTS
    % P0 W0 ?" C* {0 W4 ]5 z
  2022. ONEWR:
    & x5 Y6 X" M( N, u% x, z/ |% [
  2023. JSR PPUADDR_PROCESS
    ; l/ f) v* M& [" |0 }! U9 g- k$ Y
  2024. LDA ONE_STRING,X+ \1 Q4 m3 L) }1 J  F5 n+ y) g
  2025. STA $2007
    , g1 Q9 l2 g3 V# n$ A' r
  2026. INC $BA: }% d+ Y/ E; ~9 N
  2027. INX
    5 l8 u. Z3 G9 h8 W- t# x. ]
  2028. CPX #$03) {& z) |& B0 k/ @2 Q' A; \
  2029. BCC ONEWR8 k4 }# D7 e# I( \3 k2 ]. D- |+ n
  2030. RTS- \6 n0 `1 a6 x; a& v+ k

  2031. 3 y! o5 P$ T1 ?2 O4 w. I
  2032. MOVESPEED_STRING:
    : ^) z; S- ^& h
  2033. .BYTE $97,$99,$A0,$8F,$80,$9D,$9A,$8F,$8F,$8F,$80
    # i1 Q: z/ ~  w0 _/ y
  2034. , L! b" I" y+ x9 k5 ?  M7 I
  2035. - b, E* `; k% u: T! n1 B2 q
  2036. MOVESPEED_WRITE:, w  T7 v, m! _* c
  2037. LDX #$00, X; D% g  Z0 V5 d7 L
  2038. MOVESPEED:
    $ u3 _7 G+ b+ H
  2039. JSR PPUADDR_PROCESS+ m4 ~4 H/ b: v0 |( j
  2040. LDA MOVESPEED_STRING,X$ W9 F& R1 g- A7 Z4 R5 g
  2041. STA $2007
    2 A1 ]  d8 {5 a& j0 w
  2042. LDA #$00
    4 H( Q0 v1 z, Q+ A
  2043. STA $20005 u7 [* n5 D) }% c$ q
  2044. INC $BA
    ( h7 i) D' N# N+ m. k! w" ?( r
  2045. INX; T5 w4 g, J9 [& S  n) }
  2046. CPX #$0B! l% G7 P9 A. X* @0 ^( T2 B
  2047. BCC MOVESPEED6 c0 S3 H( B3 D' L& a  U: g
  2048. RTS
    6 }- q$ L( p8 N$ O7 |% u# ^) A& X

  2049. 9 g2 b- `* [0 ~: U- z
  2050. MOVESPEED_PPU:
    . a  l+ r0 Y4 R$ z- n. K; U3 N
  2051. LDX #$00
    5 p, v5 [& Z6 j" M
  2052. LDA #$AA
    8 S6 A! Y; B6 m1 m6 |
  2053. STA $BA( ^$ {7 r, Z( N9 p# g, A
  2054. LDA #$224 g7 Z# q  I6 e! {( E6 p9 o$ j8 k
  2055. STA $BB
    6 w3 D2 k! K7 t, ^- k1 h8 l
  2056. JSR MOVESPEED_WRITE! F9 ?- c9 J" X8 f2 i( J1 o
  2057. LDA $7003& u8 K! e- y8 G( \4 K
  2058. CLC
    3 F. A) ^, o1 `9 x
  2059. ADC #$82
    ; o9 Q4 j+ Q7 Z6 {+ v
  2060. STA $2007) m0 I; \- O) c* _
  2061. RTS5 r* W8 T) V$ l
复制代码

本帖子中包含更多资源

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

x

评分

1

查看全部评分

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

签到天数: 550 天

[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 个 柠檬. 幸运榜 / 衰神榜

签到天数: 3135 天

[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 | 显示全部楼层
太强了!佩服佩服!

签到天数: 2250 天

[LV.Master]伴坛终老

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

签到天数: 135 天

[LV.7]常住居民III

发表于 2016-11-21 09:59:17 | 显示全部楼层
这东西找了好久勒,谢谢!!# W& N5 n* \3 A/ }& E7 }3 P" ~+ u! g
[发帖际遇]: wjb19780515 发帖时在路边捡到 5 个 柠檬,偷偷放进了口袋. 幸运榜 / 衰神榜

签到天数: 2366 天

[LV.Master]伴坛终老

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

签到天数: 2250 天

[LV.Master]伴坛终老

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

该用户从未签到

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

签到天数: 348 天

[LV.8]以坛为家I

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

该用户从未签到

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

使用道具 举报

签到天数: 15 天

[LV.4]偶尔看看III

发表于 2025-3-16 20:07:05 | 显示全部楼层
谢谢制作,辛苦了
回复 支持 反对

使用道具 举报

签到天数: 845 天

[LV.10]以坛为家III

发表于 2025-3-16 21:54:53 | 显示全部楼层
謝謝大大修改及分享!!
[发帖际遇]: ray_juan 打扫环境卫生,被奖励 5 个 柠檬. 幸运榜 / 衰神榜
回复 支持 反对

使用道具 举报

签到天数: 37 天

[LV.5]常住居民I

发表于 2025-3-16 22:21:43 | 显示全部楼层
看看还能下吗
[发帖际遇]: zxnm1957花5 个 柠檬买彩票,血本无归T_T. 幸运榜 / 衰神榜
回复 支持 反对

使用道具 举报

签到天数: 274 天

[LV.8]以坛为家I

发表于 2025-3-17 09:51:47 | 显示全部楼层
这样按到后面 似乎要头晕了~~哈哈
[发帖际遇]: 一个袋子砸在了 woshibabala 头上,woshibabala 赚了 3 个 柠檬. 幸运榜 / 衰神榜
回复 支持 反对

使用道具 举报

签到天数: 16 天

[LV.4]偶尔看看III

发表于 2025-3-17 15:36:20 | 显示全部楼层
感谢分享
回复 支持 反对

使用道具 举报

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

本版积分规则

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

GMT+8, 2025-7-26 17:15 , Processed in 1.099609 second(s), 37 queries , Gzip On.

Powered by Discuz! X3.4

© 2001-2023 Discuz! Team.

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