EMU618社区

 找回密码
 立即注册
搜索
查看: 894|回复: 18

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

[复制链接]

签到天数: 39 天

[LV.5]常住居民I

发表于 2016-11-19 22:19:45 | 显示全部楼层 |阅读模式
本帖最后由 yandagui 于 2016-11-19 23:11 编辑 8 x1 K, n: p6 b4 W0 \6 H

$ H! T% W1 a2 O) n* ]$ e
     [FC][魂斗罗旋风终板END暂停显菜单]

8 e+ d" X) E. z' ?作者:FlameCyclone(flamecyclone.ys168.com)3 g/ V0 l( ]' n, q5 x: T
时间:2016/11/19 21:46:00
& b& _/ `" E% v更新日志:

- M; q; T3 y" T$ |: h! d2016.11.19:加入暂停显菜单(共5页).) U. j4 \! H" S: B% n* O
2016.11.12:加入无限跳跃.
5 X4 u8 `. t# c2016.11.12:加入速度调节.

* }: T. c( I" @$ g4 ]+ S, }2016.11.11:加入敌我子弹对消功能.
. `, R1 F$ v. H% S& I- c) f* t* I; o2016.11.11:加入全屏闪灭功能.4 J2 G: D4 p  J5 ~# q
2016.06.08:加入全屏瞄准功能.; h/ r  ]; P: o2 ]" l
2016.05.31:加入弹速调节功能., u( y4 A" k4 a
2016.01.01:加入高难度模式.
. A  a8 W& y! ?) g1 u2015.12.12:修复消除威胁不足,使得移动BOSS关卡(第2,4,5,6)正常通过.5 Q$ {, l; S1 i/ ?3 ]# l
2014.07.05:由于对打功能不完善,直接去除,更改为生命锁定.
; l0 h, p% X: N3 g; t5 G' c/ R2014.07.05:双人切换功能优化.$ Q' F4 t- B0 F
2014.06.01:修复第三关浮空到BOSS前必须关闭浮空后跳跃才能见BOSS的麻烦.
4 l. g& J- ]% {8 u( ?/ r6 {2014.06.01:取消生命锁定,改为生命锁定模式下剩余生命不会少于一条.
" G  @& O$ o% C, s1 _2014.01.18:修复GAME OVER字样只有G和O的错误,原来想拉大字母间距离,看来行不通.! j! h. V  ?# q8 g
2014.01.18:浮空模式下,P2飞行高度未限制导致死亡,原来是指令本该用绝对X变址的被用成了绝对寻址.& N* N% j4 {" m" M, G4 c8 Y
2014.02.08:拿手机无聊时又发现一些错误,所以修正生命剩余勋章显示的错误(某天用读卡器插在DVD上测试发现机器读不了卡,原因是目录级数超过三级,只有刻录成光盘来测试,结果发现生命勋章的显示竟然无压力!)4 S" L9 |/ C2 G- I' h; k
2014.02.13:加入自动演示通关.
* R0 n# B& u( o6 H/ c  T内容:( U/ J) P( L* g! ~
23.暂停菜单:        暂停后,自动显示菜单,选择键翻页,方向键和BA键进行各种功能的开关操作.1 d" f( K$ {3 T; b- G, K3 W5 Z
22.无限跳跃:        暂停后,选择键4次,按下开启,开启后游戏时无限跳跃.6 i; F! `( z! J$ B/ g2 a# @
21.速度调节:        暂停后,选择键4次,按左右调节行走速度(0-3级).
; ~$ O. m+ I& k1 Q* }
20.子弹对消:        暂停后,选择键4次,再按A键切换,此时敌人子弹可以打掉.
& |# j8 {8 U& F& k+ u$ Z19.全屏闪灭:        暂停后,选择键4次,再按B键切换,开启后游戏时按选择键屏幕内敌人闪灭.
2 Q* B" r. H# B% f18.全屏瞄准:        暂停后,选择键2次,再按B开启/关闭,子弹对消开启时无效.; p% J+ y6 h# d2 c
17.弹速调节:        暂停后,选择键3次,下开启,非暂停时按选择键调节,默认为1级,共5级.9 i- {% z' a3 H1 h2 o; D6 z+ ]
16.困难模式:        暂停后,选择键3次,右键切换,我不相信你能够无伤通关.. ]( b' ^" C0 i% e. r
01.子弹切换:        暂停后,选择键0次,上=快S,下=快L,左=快M,右=快F,B=快普通,A=取消当前子弹加速状态.
, s- i% c1 U  L* q* y/ N2 \02.无敌锁定:        暂停后,选择键1次,上开启/关闭,不用讲了,金身无敌.( `. G6 B( b( \% f4 C* a
03.生命锁定:        暂停后,选择键1次,下开启/关闭,生命锁定为16条./ {8 {- A6 X+ U2 D/ W
04.角色双控:        暂停后,选择键1次,左开启/关闭,无非就是主机控制副机.
( I7 Q; e& G$ B$ L1 V' l05.生命底限:        暂停后,选择键1次,右开启/关闭,锁定剩余生命数不少于1条.1 x+ q- S+ _, @+ n. p" E
06.一击必杀:        暂停后,选择键1次,再按B开启/关闭,即使是第8关BOSS,一发花生米依然要其老命.  D& Q: }) H, N: }
07.角色浮空:        暂停后,选择键1次,再按A开启/关闭,第三关浮空时按选择键向上卷画面轴.) r4 E/ P6 M% _( S6 `9 T8 F$ k& M
08.弹数加强:        暂停后,选择键2次,上开启/关闭,此时所有子弹发射数为15发.) K" w8 ^+ h- u/ |  D
09.皮肤更换:        暂停后,选择键2次,下开启/关闭,主机开启时橙黄色,副机开启时为蓝色.1 W( |1 ^' e, W
10.混合子弹:        暂停后,选择键2次,左开启/关闭,此时连射时所有子弹混合.) n4 s6 H& x  N
11.敌人锁定:        暂停后,选择键2次,右开启/关闭,此时敌人原位跑不动.' J& q1 H: N. F9 b
12.跳过一关:        暂停后,选择键3次,再按B使用,使用后可以直接到下一关., N) M8 M! B) h+ l1 P
13.单双切换:        暂停后,选择键3次,再按A键切换单双人游戏模式.
% E" l$ u- a. K3 e; T3 r2 |14.子弹方向:        暂停后,选择键3次,上开启/关闭,开启后发射的子弹攻击方向会随着操作的方向按键变化,第二关和第四关的小关建议关闭(开启的话打中敌人太难了哦).1 t! b) v8 ^0 q/ P/ h' d
15.消除威胁:        暂停后,选择键3次,左开启/关闭,此时游戏时按B键使得移动物体被消除。6 ?, R) d" o- D7 _# G3 u' J
A.做了一些汉化(小字体),剧情,关卡名及通关后的文字未汉化.& E# [, `- h7 \; \. X/ Z
B.自动演示通关,双人合体打通关,演示时有背景音乐,通关后一样会有结尾及恐怖台词,之后游戏进入选关(相当于游戏自动开始了).注:通关后P1及P2会获得16条生命!也就是说看完演示自动开始后第一版有16条生命!
$ J( e0 B0 k! N' r$ A6 B6 P; ?( S$ BC.生命显示加强:最大显示15个剩余生命勋章!电脑端请开启精灵超过8个(这样勋章不会闪烁),手机端认命了,不过不影响正常操作.
/ G* r. |; w/ j% W- m
% z  N4 g' u; E. F- k( F2 w    如果有什么好的修改建议,恳请通过QQ(1490868135)联系我(也许我不在线,可以留言在QQ里)
9 f% A: _" v% u; X% k: Y欢迎大家转载,转载时必须注明出处.
0 W) P( B' |$ P9 J+ o; e* f8 L0 Y; P5 h3 A
游客,如果您要查看本帖隐藏内容请回复
" t# b. l: Y6 Y( r

* M; X7 k( E+ P% g$ M4 J- S8 ?忙了一个星期,觉都没睡好,眼睛也疲惫不堪啊.终于找到解决方法了,目前VIRTUANES运行不了,请使用其他模拟器玩.
: \$ _9 E7 b8 w, N9 \这几天的劳动成果如下:
  1. .ORG $B400! X2 j/ ~$ f; P5 k. Q4 y

  2. 1 h" R3 M. [4 ]- X

  3. 8 s9 D# j* L$ ^% p8 l2 z: i
  4. PROREG:4 x& L' L) F: D) S
  5. PHA
    , K( N" H: [4 Q* b* _+ {
  6. TXA
    $ n0 p1 `2 H; y$ l
  7. PHA
    " Q' Y, Z* _/ C, T; C! u
  8. TYA
    8 d/ A, G6 {1 z6 n6 s6 w9 |
  9. PHA* v3 q  K% L" [) L5 ~" i
  10. LDA $25+ d8 n( L9 C/ g& }$ K
  11. CMP #$012 z! e0 s  y/ S& n  Z$ {8 c0 g! ]
  12. BNE RE
    6 a' u( {' K$ Y
  13. LDA $010A( Q4 G1 f& M& ~6 X3 H" L
  14. CMP #$00% f. P. d" ^( j% H4 I" n
  15. BEQ P1: H' e$ g. M; x8 h3 x. x

  16. 7 ~' H( b& J/ C. X" p/ N
  17. RE:4 m! \( B) u0 I; J/ |" c. Z
  18. JMP PPUWRITE. L& ]( D" p; S( Z
  19. 1 m. n& j" \. P; K3 g/ [
  20. P1:                ; 条件判断7 Z  M" R% l9 l3 v  B% k
  21. LDA $7FFF
    1 b: g. V1 H9 x2 \
  22. CMP #$FF
    % i: S  e& Q1 \" Y
  23. BNE P1RP
    0 B/ K: D; W# E
  24. LDA $7FA0
    ) _; K+ O2 Z5 b
  25. CMP #$00
    ( c( {2 ?1 p: g# O7 d2 C; A
  26. BNE P1CMP
    5 @6 _4 B# b# O. \- |5 q
  27. LDA $2001
    ; W2 v4 M3 ?3 B8 l- T# h; ~
  28. PHA
    ' ^0 g9 y4 g% w3 P
  29. LDA #$00
    0 i/ W) ]( b9 r: n5 o$ k7 ]
  30. STA $2001
    8 J3 v! N7 s  I- V
  31. LDA #$FF; X$ U! p6 p1 V2 F" [
  32. STA $7FA0( b# Y: j* L5 |6 s' d2 I
  33. JSR CLEANA2 W  \- k% Y* r5 P
  34. PLA
    6 h+ d9 P1 X; |6 Z
  35. STA $2001
    - G! k; Z, e  }# Z2 L
  36. JMP PPUWRITE
    ( S% g! X) v: `
  37. P1CMP:
    7 r) [' d0 c7 t7 t* a6 ^
  38. LDA $7FFF
    0 ^. J  T, H* p8 m
  39. CMP #$00& R& B9 V" ~  m/ U* {
  40. BNE RE. g$ _2 S4 ^4 g% i4 G
  41. P1RP:
    7 j7 F& b9 S& b8 m
  42. LDA $2002
    9 z  i+ l5 Q/ {
  43. LDA #$00$ k: D9 X) p# H- e
  44. STA $2001
    . a% }+ U& a* g. u
  45. LDA #$FF
    7 v2 j6 l% A, q6 E3 B9 d. i9 n
  46. STA $7FFF
    ( t/ o/ \" W( `6 x& {
  47. STA $7FA0
    , g) e0 o4 Y6 G1 r# ]; ?& `' ^
  48. JSR COPYPPU7 M6 ~2 R4 b' O, L" Z/ [5 W" h' q  x' M
  49. PIRP2:6 D2 r" K/ v$ ~, E& |- d
  50. JSR CLEANA
    " @; O( d5 F7 q+ ?$ o2 N
  51. JMP PPUWRITE1 n* D) N8 e, p4 p
  52. , u+ |8 d) R. `+ l* `
  53. COPYPPU:
    & H$ z* E6 K& Y( Q  o6 Q2 [. d$ {
  54. L0:" W" D0 F* i* p4 D& g
  55. LDA $304 ~2 k5 U& H8 R
  56. CMP #$02
    % q! M: m: \- ~3 R3 E' F' S+ G
  57. BNE UNPROFC* E7 G9 u$ Q2 k, z* ?- {
  58. LDA $FC
      A/ `' ?& n/ H* o  ]
  59. STA $7EFC+ g8 z2 \; ?5 z5 \$ K
  60. LDA #$00
    8 P9 }, T  K$ [* X
  61. STA $FC2 G3 C9 O& v+ y+ @
  62. UNPROFC:
    1 {( X* D, [, t& l+ C
  63. LDA $FD
    5 |+ l" g) j/ d/ X% {
  64. STA $7EFD& z( ]( {3 R1 C1 v* M2 X
  65. LDA $FF7 d8 }$ h4 m( O
  66. STA $7EFF, W5 R+ k2 E& s; y& _% ^- H& D
  67. LDA #$00
    ; f0 ?. E2 Q/ L' Q* ~& I! ?9 e* m
  68. STA $FD
    ! [6 ~  j6 A  n& j) Z
  69. LDA #$B0
    % g( T4 J) `% Z- _! P; ^
  70. STA $FF
    * I+ Y6 n5 n$ T
  71. LDA $07C1
    7 v% i5 ^: p5 N+ y8 c" b
  72. STA $7FC1, d1 M6 A/ w# }6 }# S1 l. C, P
  73. LDA #$3F& g9 e2 e" [' k/ q2 k; H
  74. STA $20061 R/ v+ Q3 Z( s5 ~) f
  75. LDA #$017 A( B* f% ?, q9 O& g# ]" Z+ Y& N" B
  76. STA $2006
    3 M* z/ c9 m9 f; D) V
  77. LDA #$240 O. r" K: `! w- G+ W! @$ C
  78. STA $2007
    6 @/ u, S# i. T4 l* k+ q6 m
  79. LDA $07F6
      @* v4 ?* r' h( T* o6 n5 u
  80. STA $7FFE
    ( L3 k' |  B# }! G5 a
  81. LDA $00FE
    2 V! \1 Q/ f# C/ l9 |/ ]- ]
  82. STA $7FFD
    ; ~# M5 }7 u; E& O! G4 H  U
  83. LDX #$00$ V* C/ x: S7 j: [8 V+ v( {
  84. LDY #$00
    2 R7 @: r( p( s8 N& c: I
  85. LDA $BD
    . v9 \- Y6 e9 E2 d2 @
  86. PHA8 U1 j, Y- `3 [' D7 Y% W. G3 W( T
  87. LDA $BC
    / j7 C" M3 z6 y0 p" R
  88. PHA  A9 F1 J- y* J; {! r0 P) b/ m1 M
  89. LDA $BB  G1 R  @* n/ k$ i
  90. PHA$ @; @" T' v, R% k* x+ u
  91. LDA $BA
    7 p% [: b0 G( t
  92. PHA4 k6 i, r! @+ R1 J; ^
  93. LDA $B9
    8 S; m" c' z; I; X6 Y2 B1 p0 J
  94. PHA
      U- |( s9 A- |
  95. LDA $B8: u2 z/ F/ z- M$ n& P: F
  96. PHA
    # m; R$ r' p* G- g+ e6 g/ ^6 ?
  97. LDA #$00
    - a5 U( q; g( s3 W
  98. STA $B8! s# L3 \0 ]; d- V' s
  99. STA $B9
    + r# V- L" |2 i$ c
  100. STA $BA* m7 G0 Q6 M# O" I) H& K( i' M
  101. STA $BB
    6 s4 @: {: k/ d2 u) x% U
  102. STA $BC: A& Y; i/ l# `  R7 ?) S- ~$ y
  103. STA $BD
    5 j$ A1 N4 }1 E+ ?: o! `
  104. LDA #$00% u3 F# J+ u1 A& \5 Y7 w! f/ \0 g/ l
  105. STA $BA6 N/ E) a; u' p
  106. LDA #$20& d( p- [/ i2 K5 t
  107. STA $BB( w* }+ J% {, s8 R; U5 J
  108. LDA #$00- h( t# N' @* D, {/ m
  109. STA $BC# C( e$ S, l9 f
  110. LDA #$60
    ! z: M+ P# f  A# e: u9 R
  111. STA $BD& W' x( v5 {9 z7 s/ f. `

  112. $ T7 }, J2 o, z
  113. L1:                ; PPU复制
    + I8 u  d* W$ Q3 C% k
  114. LDA $BB
    5 ?) Z* t1 {. V" ]8 M
  115. CMP #$30
    1 N- f# x5 {: a# l: L
  116. BNE L2, ^. y6 b4 r8 s& P5 M
  117. LDA $BA
    9 U1 [& M, C6 j# o4 p4 {/ ]8 C
  118. CMP #$00' r+ Y7 i4 }. _2 h! w# E
  119. BEQ PROADPLA
    7 _' v9 c* E0 O+ }- n- Z+ `, {
  120. 5 T  T: P1 ~$ h" W" E( ^/ i
  121. L2:$ }- R3 L& B. a- N
  122. LDA $BB
    . V' O% S& h/ m* a
  123. STA $20067 K6 y/ s0 c& v5 p& A: S. ^
  124. LDA $BA
      m3 _. }* H( `' n
  125. STA $2006& F: p$ r  t( o. l, p* ]! W9 U

  126. ! S% @- |0 q- S# L3 e; E# g5 g
  127. L3:5 U, n- C; f+ F, U" ?( U. ]1 T
  128. LDA $2007
    7 D! e4 L! F8 ?8 x) N* l
  129. LDA $2007
    8 Q1 V2 l* D5 y8 j* `+ I, O" r8 q7 c. G
  130. STA ($BC),Y% V# M  H: g5 D* M: ]7 \) ]( ?% h
  131. 5 I/ P- P# H% i9 ~
  132. L4:% P* C+ ^. {, A7 n2 ~
  133. LDA #$00
    8 S  O0 C; Z9 ?, ?& t, Y/ r
  134. STA $2000" i5 ]/ [& s7 Y' x* A' A7 N$ q
  135. INX
    * A- w% Y8 ]3 O7 G2 I. s7 ~
  136. INC $BA
    3 M7 u8 X* _3 R( g$ L# ^- V7 J
  137. INC $BC4 |1 B4 [  v7 A' R/ M
  138. CPX #$00
    ( n( Z% U  Q4 }6 o0 E  E
  139. BNE L1
    ' [6 `, B$ a9 d5 d8 x7 d
  140. INC $BB
    ! Y* @8 t  c) e1 S6 L
  141. INC $BD9 Z: r" ^8 o9 E3 @
  142. JMP L1% Q* ~1 _7 b9 [( @, w

  143. 2 `" e4 D. k9 [  A+ X) K1 Q
  144. PROADPLA:                ;出栈
    5 p( M- D! X) F/ ~9 o+ C1 f
  145. PLA; R/ _2 Y0 H9 e: a8 e$ g' D3 m
  146. STA $B8
    : S- y% t$ i# g- X3 S( r$ Y$ q7 _
  147. PLA9 [8 \0 G9 ?1 r- h0 s
  148. STA $B9
    : r% H  D( g3 R/ T6 `. P
  149. PLA
    : L3 x. K# M( y1 c
  150. STA $BA- {2 d# T! n$ U& T7 t/ K& {9 w
  151. PLA" F8 d9 w0 N- {2 m; @6 A
  152. STA $BB) a+ E7 {  f5 n& Q2 D3 [$ U" ?
  153. PLA& m- v+ |$ b6 K& Y4 l
  154. STA $BC( \3 U; l5 s% a7 D( Z! i3 b
  155. PLA* Z, I; N" {+ U' ?4 b3 B9 r$ _4 `
  156. STA $BD
    - e: b; s, y$ e# R0 H
  157. CPRE:% b- Z/ |. h' ^
  158. RTS
    3 D0 d" X; U; w& \/ k) J  m& A8 K
  159. ; V4 `8 ~. X3 _5 P) L3 Z
  160. CLEANA:                ; PPU清空6 C0 A( l' B5 }$ T, S$ ~) b
  161. LDA $BD/ q# [% U/ N& d: I
  162. PHA8 ?5 S* Z0 a  q' N% X1 L- V& G, z
  163. LDA $BC
    * P3 A- O0 i* U$ T
  164. PHA
    % b- u. Y+ w2 N6 M
  165. LDA $BB1 \0 x$ z) m' {' ^
  166. PHA
    ' |' E/ h. h8 m6 C) |& e% x
  167. LDA $BA! r) o  I  F, o8 ^. |& b
  168. PHA
    - R  M  a9 D4 S/ R* M" R
  169. LDA $B9
    8 }1 ]0 k" r, Z2 p# {, ]
  170. PHA
    8 v7 `4 m0 S5 n, y& [, u& M4 V
  171. LDA $B8
    ' i% @+ n7 ]4 M- }3 _
  172. PHA
    5 ^# {3 s: {, w
  173. LDA #$00
    & n2 N8 T; d* P, g& K+ I7 o2 @
  174. STA $B8
    8 S5 u. ^5 U, v, g
  175. STA $B9
    6 a/ P; \! ~; T, }  c" W
  176. STA $BA( D% Z! ~; n6 B! U% A
  177. STA $BB- h2 j- z# e- ]' T
  178. STA $BC: T/ m# a" ~9 G
  179. STA $BD8 M  ~; O# ~0 M+ i
  180. LDX #$00  a+ b8 c! a- Q& {
  181. LDY #$00  |8 s" n/ o2 i+ r5 L2 F4 b  }6 i3 S
  182. LDA #$00$ l. C6 s5 q3 a. J7 u) Q8 v8 P
  183. STA $BA0 c, k; n: v& U3 A2 s7 }- `
  184. LDA #$20
    8 Z' [8 `5 _9 h
  185. STA $BB
    2 t* _3 Z: n& l! Q3 [  f' S% C' `
  186. : f6 X" T- i9 l3 `$ |4 ~
  187. CL1:. h/ H. F8 l7 E8 F8 V
  188. LDA $BB
    8 f% c1 L+ p: x
  189. CMP #$30" v. q' i1 ]2 I0 x. t, R
  190. BNE CL20 b! R' c) i. F
  191. LDA $BA
    - b5 Q1 R, h$ d" @0 M# I
  192. CMP #$00+ F1 d: d. a6 {
  193. BEQ FREEWRIYE# @' ~+ c' k' d

  194. - Q" E# V" z# }2 Q
  195. CL2:
    - R8 h; m1 g8 W
  196. LDA $BB
    : h1 t; T& U. d& @* ~4 O
  197. STA $2006% h1 o  _/ u" t0 H: {) f
  198. LDA $BA
    1 V- O) i6 c' v$ n
  199. STA $2006. C7 V" y3 {! o* M: |

  200. ) T8 f: Q3 I$ ^+ w* b
  201. CL3:- ~) w' y& P9 Z( u
  202. LDA #$00
    # v8 n0 z3 @; u
  203. STA $2007
    1 a0 U( L" `& Y$ a+ w8 d
  204. 2 o6 \* I; x: D
  205. CL4:
    8 Z9 P" G$ \. p, Q8 q4 C. |1 `, i
  206. LDA #$00* J- x# _; f& p
  207. STA $20001 }6 z. F+ R' h% w8 c% B  T. K8 W' p
  208. INX
    ' z/ {) K, E' ?* T
  209. INC $BA6 b1 I+ L0 t5 l/ C, ^
  210. CPX #$00
    * l/ ]# o2 p, H. ^* Q# e7 r
  211. BNE CL1+ t+ U& H8 ?* D; L* c1 j8 S( v
  212. INC $BB) j( C7 V4 X, J0 S6 T7 A5 K$ ?1 }
  213. JMP CL1 * g1 i' T' A1 n# d

  214. 2 T" z$ p' y0 h6 Y. o% m' e

  215. ' \: a( s3 U9 a" Q+ a7 [
  216. FREEWRIYE:
      F% D! c! n/ S/ N# t
  217. JSR FREE
      Z3 R$ V  }- a& k7 Y' l

  218. 8 k3 q& D  i2 [" _

  219. - _0 h/ \* ~& V7 g* s
  220. 5 L* \/ d5 k3 w! u+ j

  221. 7 q* [+ @4 [# y0 s  w  X6 X# V

  222. ! u  y* u) ]6 y' w
  223. CLEANF:                ; 恢复现场5 Y% G! O' z3 t7 ?5 h( a5 O
  224. LDA #$08+ ~0 [" A- `+ F% n4 Y# _
  225. STA $FE
    6 N8 f, q  }$ T3 c
  226. LDA #$00
    - u* T# s0 j; f9 f
  227. STA $07F6" ^# D9 O; E( F) @# a( I
  228. LDA #$24
    5 c6 e' `7 h; l$ [" U9 {
  229. STA $7FC0
    ( K4 b; M" J( @- R7 r3 C
  230. PLA+ d8 ?' x4 F7 d% x0 @& U
  231. STA $B8
    ( z. n) \. [2 y: t! C; c- U/ @! B
  232. PLA2 N' `! S: b+ `$ X( S) F  ]8 R1 O
  233. STA $B9' }) Y; A& J  K( J7 I9 U
  234. PLA9 Z% n# x' Z. P( E& c
  235. STA $BA
    & i  K; s* q" @7 O; k, F
  236. PLA: Y" e! X) V6 M# s+ h( o) T
  237. STA $BB
    ; u- h% L# l" e
  238. PLA
    * V6 U! o7 f% u4 U: A, X
  239. STA $BC! ^1 ]2 R" T" g
  240. PLA
    / ^- r$ _4 {1 [/ ~- d! J' j
  241. STA $BD9 k/ l2 B+ B5 O
  242. CLRF:
    8 e, E9 D! ^* d4 E
  243. RTS! v; K# A3 K% B$ C% i5 C# Z: x: l( o

  244. $ B1 n1 N/ F$ K; g& {
  245. W_DATA:
    7 I; o& I1 G, [. X' {9 X5 ]8 v% G
  246. .BYTE $00,$01,$02,$03,$044 q7 K! {( b4 {1 G/ o& ~
  247.   6 M8 j5 a) Z% p" B/ f8 G/ h
  248. W_PPU:
    9 i2 \. n$ t9 R. |7 B: E' O; B
  249. .BYTE $98,$97,$90,$9D,$96
    2 k/ b& w1 N' A9 S7 z2 K
  250. ! t+ c8 ], E) o- X; B
  251. P1_STRING:9 e7 q& E0 w0 ^* X  C( D
  252. .BYTE $9A,$82,$00                ;"P1"" a1 }" ?7 k, |% |% O% O( R8 D3 L

  253.   E4 O/ T, L5 ?. q$ s. ~$ N
  254. P2_STRING:
    ( n% }+ L7 e% L, K" z6 f9 x3 Q, \
  255. .BYTE $9A,$83,$00                ;"P2"1 m% W5 m6 W& q! \! r6 W9 ^
  256. 3 H+ h9 ]0 T0 z: w
  257. WEAPON_STRING:
      J* [5 J6 M! x1 R' n8 @
  258. .BYTE $A1,$8F,$8B,$9A,$99,$98,$00  ;"WEAPON"
    1 E% Z! ^# s5 I4 d
  259. 0 ]! Y, f% [* E3 s
  260. RELIFE_STRING:* f& c  b& T' W* b5 r
  261. .BYTE $9C,$8F,$96,$93,$90,$8F,$00  ;"RELIFE"* ^# n2 Y2 j+ s9 h

  262. " M7 g# E5 O; R5 B
  263. P1_PPU:
    ' D; D9 T1 X* Z. O; J' Q1 l$ M4 j
  264. LDX #$002 W, i! l  }4 r0 F$ W
  265. 5 z! A% }' p, V. w' I; m
  266. P1_PPUW:6 w" _4 G$ a; M. @' `3 |2 \; z' K$ H
  267. JSR PPUADDR_PROCESS
    8 g$ ?+ [9 n1 Y
  268. LDA P1_STRING,X) ~4 ^" w1 q; b( m* y( R
  269. STA $2007
    & Y" _) `$ A8 y9 f8 j+ e- `0 w) h
  270. INX1 w$ D6 S; {: n5 @
  271. INC $BA
    ! r2 z4 I; ?* g- d+ ^) K! ?5 A4 }
  272. CPX #$03' _' s; u) y+ S; F0 V! u* z
  273. BCC P1_PPUW
    8 B: D% b' w9 p+ Q9 B; A
  274. LDX #$00
    8 X5 }) u4 Z. N
  275. RTS
    : h1 f4 |) V1 S" f% K# x1 n2 C
  276. ! ]! K5 X! p) ]7 G6 t
  277. P2_PPU:2 l/ X4 q% o4 D/ J4 N" e! q! r: P
  278. LDX #$00- h5 {/ N2 k/ p* E: ^+ K: C0 L
  279. ! `2 ]9 {- n) ~! z) Y% g8 B. C
  280. P2_PPUW:
    ) r0 `. Q% |. \# G% F
  281. JSR PPUADDR_PROCESS
    6 O* e( z  F* m
  282. LDA P2_STRING,X& ]/ \& z$ d" j4 y9 ]  m+ h
  283. STA $2007) R* b  r2 i% @0 Z5 ^
  284. INX( w# A4 `6 w5 f: `6 I
  285. INC $BA. n$ d* V: A2 }8 t: C9 a2 O" f
  286. CPX #$03
    & _- G$ X: Z" b% \, k+ B% A: ^
  287. BCC P2_PPUW
    4 [/ \4 r7 F6 E' \$ @# t( v) W
  288. LDX #$00! V% X$ O9 r: x0 Q+ j' {3 c) @& Z8 K
  289. RTS
    3 H- s, l, m. O5 g: p4 l
  290. - y& @0 P  P: M9 U; J% r
  291. 0 n9 X8 Y8 |" i4 j, m
  292. LDA $BB8 w1 p) s! \3 x: ~# [7 P
  293. STA $20062 L7 R+ K. V9 A
  294. LDA $BA
    ! D' f1 j; f, {3 u" i3 f8 N" ~- F
  295. STA $2006
    ! C: J1 L8 j; N% t" `. U
  296. RTS0 i! S2 e/ K8 ^

  297. 5 v7 s2 N( N  K- b- U- r" _7 B
  298. & \$ w% I  }  d2 J

  299. * Z: u/ f' N+ r
  300. PLAYERLIFE:
    2 W# _! Y0 g2 w  m" i' u" H% w
  301. JSR LIFETODEC
    " k2 \: B: k* ?5 Y9 p$ F$ B$ T  {
  302. LIFEPPU1:. P" `2 n6 C% [1 B3 K: p2 b& o
  303. LDX #$00
    1 I/ m7 X  B1 u9 J* ]" C/ ?
  304. LIFEPPU1RE:/ Z% g4 m2 o- D" H' V* ?
  305. JSR PPUADDR_PROCESS# \7 q0 d+ {: o/ m+ W
  306. LDA RELIFE_STRING,X" w& }0 b' V& y1 t- Y
  307. STA $2007
    ( e+ K1 J8 {0 Q) N
  308. INX
    & z, l  e: r! ]0 |
  309. INC $BA# Y6 g; r; G% z: j/ R: X( d: r  ^
  310. CPX #$07* ~9 I% v7 u1 j. i
  311. BCC LIFEPPU1RE
    2 l, w! Y( t0 L0 w
  312. ) D; ~& G5 N' w8 s5 V. \1 d* k+ c
  313. LIFEDEC:                ;生命显示写入
    * H- a5 A" U( l. e7 E) N4 n3 B& u
  314. LDX #$003 y/ n3 F' Y# _) ^0 D
  315. LIFEDECRE:
    + l. {, M  V. N; h4 O8 x- m  }( i
  316. LDA $7A03,X
    / e/ u! }: ?: U; l, i2 G4 q
  317. CLC
    1 }  X# P' S% B: ^" `# w
  318. ADC #$81
    : v& u; _8 o+ B5 ]! X1 E
  319. STA $2007
    9 q: m) f* _' i1 J( d
  320. INX
    / ~* W! r* o9 g2 u8 }% E4 E$ F) B8 d
  321. INC $BA# v3 R- v; c+ `
  322. CPX #$03
    # h. J" l6 ?1 \1 P
  323. BCC LIFEDECRE. g5 p% O) r7 |4 D
  324. LDX #$00
    8 e) A: h$ `3 a8 [. I! B* h
  325. RTS
    0 ^6 T' A( E! z0 d% H5 M
  326. " |( ~4 r# Y& m) O
  327. LIFETODEC:                ;十进制转换
    # l7 T2 e( R2 K/ G" s
  328. LIFEL1:        ;initialise
    % G0 w* ~7 b. j8 M; Z2 Z
  329. STA $7A00        ;$7A00=F3* e# d7 I) j( b+ q/ L
  330. LDA #$00
    $ _$ Q" e" [7 I- b5 E# `
  331. STA $7A03        ;$7A03=00; [5 O) p1 g5 e
  332. STA $7A04        ;$7A04=00
    9 Q* H) y. H  U0 H2 i" f
  333. STA $7A05        ;$7A05=00
    ( d: R' T9 N$ H  [" t
  334. LIFEL2:        ;copy data $7A00 to 6001
    : W! Y; B8 S, d3 c2 I
  335. LDA $7A00
    & P! P& t* H8 f$ x# W# ~) @
  336. STA $7A01
    ; t, V' b5 @% H4 d, D

  337. , g9 F8 q" J1 C) a
  338. LIFEL3:         ;hundred
    - ?; w1 F! z: w( j2 x+ i
  339. LDA $7A01
    2 F" ~% S& v7 P, f1 D
  340. CMP #$64
    # D1 _6 u; M+ o9 _+ j
  341. BCC LIFEL6                ;$7A01<100 goto L6% l0 C3 r* B; F/ s0 w  ~
  342. LIFEL4:
    ( q, Q0 b0 |/ W  T* e/ g$ k% T( }
  343. LDA $7A01
    9 h. A0 P9 ]8 P9 A. U
  344. SEC
    3 Y' Z: [$ }5 G( N% c8 \
  345. SBC #$64        ;$7A01=$7A01-1007 s9 k# j; Z9 n  n0 G% C
  346. STA $7A01. H0 U. @7 K/ @! Y/ K
  347. INC $7A03        ;hundred++- t" F2 j" g! p: s8 y! u. s" k3 @2 _
  348. LIFEL5:& R9 a$ s" g: F) Y3 a6 I
  349. LDA $7A01
    - r7 U: b* |% P. q$ m# y# K# L
  350. CMP #$64
    * x3 R. u. I& x$ W( A+ ]
  351. BCS LIFEL4                ;$7A01>100 goto L47 }& k) i: B# T6 b

  352. " C& o2 b4 B. c1 V+ J! ]
  353. LIFEL6:        ;decade1 n% b6 G5 e% g3 p+ n* }
  354. LDA $7A01
    + a/ g; @: y8 E( L# U' j
  355. CMP #$0A1 j+ w4 R2 [8 i" e% X9 u
  356. BCC LIFEL9                ;$7A01<10 goto L9: m8 _$ L1 V8 V5 J% n3 l0 T
  357. LIFEL7:       
    . h5 w# N/ K/ S: m3 H
  358. LDA $7A01
    % J* l0 p( n! C3 v5 _% u
  359. SEC9 B  O+ g/ N0 ~
  360. SBC #$0A! T+ J) Z) f, G5 `- A/ ?) ^) w
  361. STA $7A01        ;$7A01=$7A01-10
    , @$ U; a+ |- [$ z% w% k
  362. INC $7A04        ;decade++: Q& R& O, r2 @' o% l$ t+ A
  363. LIFEL8:! r/ }& c; h% R. E5 |4 c
  364. LDA $7A01
    : N" F& V) u$ Z" y. R% k
  365. CMP #$0A
    6 |  s# p3 e5 x* p9 i$ W
  366. BCS LIFEL7                ;$7A01>10 goto L7' m5 |4 t/ Q. A+ b
  367. ;unit
    ' U! ?7 X( L) Y
  368. LIFEL9:
    7 ]1 r/ ?& p: q) c4 E* B5 l
  369. LDA $7A01        ;$7A05=$7A01
    , U2 Y9 b' e3 S# e: ]
  370. STA $7A05        ;unit
    - i2 C6 t% |4 O! o# S
  371. RTS        ;return8 R# H" M3 k! @) Q7 m* L0 q

  372. # {& W" L) y" H6 \! y" [- x* Q( Y

  373. 5 h: N7 ^$ ~; S4 j3 N

  374. - T; I! M- w5 B7 q0 Q1 A! g
  375. WEA:                ;武器ppu写入, d: e5 _& D1 Z. B% v
  376. LDX #$00
    1 L* B. }6 I" o8 d; I: t2 P
  377. WEARE:/ f4 l$ e" E6 o3 U* o
  378. JSR PPUADDR_PROCESS, w4 D5 Y7 J1 K/ w% `
  379. LDA WEAPON_STRING,X" {* l- D+ T$ a/ N# h) e4 A* Z
  380. STA $2007  V( b" A6 a) k+ O* Q! E
  381. LDA #$004 L8 }6 E# a3 K1 E0 f& q0 U  R
  382. STA $2000
    9 o" p/ y1 @2 u* d0 g, e
  383. INX
    - e. w' F$ h* T& Y' u, D
  384. INC $BA
    6 n) P# g" K/ G9 P/ P
  385. CPX #$078 e5 Q% t5 z/ J1 @4 i  h3 o/ Y
  386. BCC WEARE* h; C( [% z4 U6 h

  387. + e8 y* k1 ~% H& R9 J
  388. READ_WEA:; D* g: U' Q/ M: w, f( J+ u2 o
  389. LDA $B96 ?% V9 \+ F. o- x% g3 g/ d* K/ X) B
  390. AND #$10
    5 ?* n4 d' ^: ^& Y) E
  391. BEQ NWEA, a$ K! I8 [- E) A
  392. SWEA:! R7 {. l' r7 ]" W

  393. ( B+ H9 m, P! h( R8 l; I
  394. LDA #$9D
    % H2 Y* K! n6 X  I9 |% r  o
  395. STA $20078 i( L" \8 g" z' A2 [: b5 ]
  396. LDA #$007 ?9 c; a% D' Z
  397. STA $2000
    7 n$ P( n% t* Y; t" O, {+ ^; H- q
  398. INC $BA4 J3 k: W$ k& K+ V+ _! o4 h$ ~
  399. LDX #$00
    # A, u0 E% d* ?, V& h7 @: C" [
  400. JMP WEAREAD
    , O) m0 t# B/ i5 }' {2 s
  401. NWEA:0 b. b. j: B0 B0 o  y6 m' d# ?- }

  402. + n1 W3 t/ B) L9 ]- a: l- E
  403. LDA #$8D0 W% Y" z' o. }- `$ {
  404. STA $2007
    7 A% U- Z- t+ t( d# P! ~5 X6 ~/ T' L
  405. LDA #$00( T0 w$ i+ ^& ]' L! }
  406. STA $2000
    4 g/ s0 n1 S: U& R) L5 u! g
  407. INC $BA
    3 V% P- L4 T" d7 X! X2 {
  408. LDX #$00
    5 u! |% c( M+ T: l2 `
  409. WEAREAD:0 {- Z) Q8 a( e0 k; M( Q: j
  410. LDA $B9
    0 n& W6 |+ }. K0 ~
  411. AND #$EF
    ! Z& A/ c5 {7 H) b4 @
  412. CMP W_DATA,X
    ( B4 O+ Q  m/ {2 i$ e3 C( l; A6 Z
  413. BNE WEACMP
    ' j) T2 N, {+ b* n# v6 ]
  414. / v; ?, I( y( U$ K% {5 V1 g: p
  415. LDA W_PPU,X
    * q( o+ i0 T3 S" X3 C/ u' I
  416. STA $2007% `- A+ q& N. k' Z/ B
  417. LDA #$009 R& v# D: c4 Q/ D
  418. STA $2000
    ! j( M( T- f, N* T) }
  419. 8 R. G0 s, ^  }" o0 x+ d. J0 w
  420. WEACMP:0 `4 z0 n) P! g% i6 T
  421. INX
    : Z! G) Z, X% x, r' ?& q
  422. CPX #$05
    ' u  g) f2 W& U4 O/ }& k4 b) {
  423. BCC WEAREAD9 @, q9 y3 R7 E4 L' d$ q8 |5 P
  424. RTS6 F# K& W1 ~$ [& X9 c

  425. 5 i/ y: T* q3 X( [* L
  426. " I/ ]) q2 W0 R# N% [$ ]
  427. PPUWRITE:3 ^; Y& @/ E0 P0 K, [/ D
  428. PLA3 |& F8 R  J; Z" J' O0 m- W1 W
  429. TAY
    + F& c+ F$ G0 S6 Y
  430. PLA
    ( J# Q: _% U3 m$ O: }3 O
  431. TAX
    : v; X5 U! C% V; B/ b
  432. PLA
    ; U3 _* ~: t# W3 K0 y9 w6 A3 }& k7 N0 v
  433. LDA $25+ l7 d! f6 Q4 J/ \, p
  434. CMP #$00
    * \; T+ l' f3 ?9 z
  435. BEQ WP15 `7 ^: ]/ s% R! _
  436. LDA $25
    : L' p! U2 P% f' C6 ^- E
  437. CMP #$015 w' ]1 @/ W4 i3 `- w
  438. BNE WRE
    5 j( T+ V' e' \( ]2 x
  439. LDA $F5,X
    9 R; a  v  A' f* c: F$ o
  440. AND #$EF
    3 H5 _% t- R/ e, z: a
  441. BEQ WRE
    ) w0 o& ?1 k/ T) C2 ?2 k
  442. LDA #$00
    4 `5 |2 e3 {  Q* v0 ~, N6 ^
  443. STA $7FA0  l+ o9 c$ B) I* e* D, p+ @
  444. . M6 P2 C' V: b* X
  445. WRE:
    3 V9 T2 p: K1 G, _
  446. JMP $A000
    / a3 b3 {  e/ t4 z0 r2 P8 E
  447. 8 Z  p5 c% ^$ J- `3 Q+ V3 @
  448. WP1:
    9 p% F* y2 {* _  \- w/ N
  449. LDA $7FFF
    + M% ?+ N4 N. q9 q9 M9 g: F+ s" Q. w
  450. CMP #$FF' d' k/ ~3 s5 T; u+ ^; o: r1 f
  451. BNE WRE! b4 W. }4 M3 |
  452. LDA #$00
    ' P+ v( C! o. {  _# r6 ?; ?
  453. STA $2001
    / I$ C7 d- F/ M
  454. LDA $BD
    5 i# e+ y  G; N+ R; U! e8 C% u
  455. PHA
      c6 F/ Y, d2 _# `2 `; K
  456. LDA $BC
    9 a2 ~$ o9 C/ |
  457. PHA
    7 D* O( x. V) g  O/ x" n
  458. LDA $BB( p6 g; P; W3 @, l' |0 b
  459. PHA# T, s& ~) u/ d9 v
  460. LDA $BA
    $ `1 b: B8 [' D$ c
  461. PHA
    * Z7 Z. T/ W( o' V
  462. LDA $B9
    5 C  |* F, a' L
  463. PHA
    " a9 W$ G9 c: |4 a
  464. LDA $B8
    6 d# L- J4 e' i) J3 u1 z8 p
  465. PHA+ w2 O1 ^7 s& Z5 e9 x
  466. LDA #$00+ @# N' s. I# m: h  Y( R. [
  467. STA $B8
      |: y0 F$ B0 j8 z) Z4 ?' H: e
  468. STA $B9
    " r- \* k* E7 }
  469. STA $BA
    9 u5 `( G; J7 a/ M
  470. STA $BB' a! i0 j9 k! \
  471. STA $BC
    / i" x' j0 C1 j+ Q
  472. STA $BD$ h% b; G8 m. |% V* H4 N
  473. LDA #$00
    % F7 p' y, S' C/ n$ h% k& s9 T+ B
  474. STA $7FFF
    & r: @. R+ M# A1 f+ Y0 s4 M) t
  475. LDA $30
    5 `) n" V* n# K7 \- u) R% G/ x6 p
  476. CMP #$028 z8 |2 `$ r* T) d
  477. BNE UNPROCPL  q3 D# O& i# k; l
  478. LDA $7EFC/ _* C6 [, k6 l( G5 }- C
  479. STA $FC
    5 p7 |2 c5 s. G! g! m8 y; Q
  480. LDA #$00
    7 _5 i7 v: Z1 ^) @# e, {6 u
  481. STA $A4
    $ E$ H: t& n% h9 w5 l
  482. STA $A5
      |) L: r/ j3 c/ o& t+ S6 c
  483. UNPROCPL:7 ^0 B# C! o7 G
  484. LDA $7EFD; k* E2 G& k4 C6 w
  485. STA $FD
    & u& Y* T. a, j" F- G9 X
  486. LDA $7EFF& t% g0 p% S2 s
  487. STA $FF
    6 r/ f" C* _3 M. A

  488. 4 @  k2 ~& Q5 m; x5 G, ^# G& Q5 w
  489. WL0:
    4 h% [/ P% a# o4 h# w
  490. LDX #$00" w2 H5 M  V$ |' O
  491. LDY #$00
    ; _% E5 P, O7 @+ s. M& V
  492. LDA #$00- ^# W. R3 F( D0 V! O. ]
  493. STA $BA8 E8 d/ C6 [( C
  494. LDA #$20
    7 U5 d7 i3 A2 n" x. L
  495. STA $BB5 l9 `3 n/ X5 _: s8 J1 q  E5 ~
  496. LDA #$00
    & e+ J% u; M& A4 U
  497. STA $BC
    * E& K& w! b; G, @6 D
  498. LDA #$60* ~9 n' Q+ I* }$ K7 Z( ~+ |+ F
  499. STA $BD' T" N- r" S* O2 w: J+ o

  500. 5 H$ g+ |; [6 C8 J- I
  501. WL1:* k7 W9 T+ m3 m# y
  502. LDA $BD+ B' o+ D) o* V
  503. CMP #$70  {2 |0 d+ X- \) ~" V
  504. BNE WL2
    9 s* F. s5 E9 p
  505. LDA $BC+ i- X2 ^) g7 J& S% x6 s
  506. CMP #$00. \1 [: B5 P4 L; E
  507. BEQ WLR
    + C5 w! ~2 D0 h8 L4 ~

  508. 9 C6 v7 g7 L+ D6 n6 y2 N
  509. WL2:1 Y! S6 ^, Z) w0 Z4 T& J. J. I* H2 y
  510. LDA $BD
    + @8 b! ^5 f' D* k3 v
  511. STA $2006
    1 x/ {; Z# b9 G: {1 _# g
  512. LDA $BC
    ) r& j0 D+ N' A' D- y; h% @1 {
  513. STA $2006
    $ L7 ~% S/ L* J
  514. ( U0 s, J$ N* _. \5 H. \
  515. WL3:
    3 @  ^4 K" k2 F; x
  516. LDA ($BC),Y6 T2 O/ T. c: D7 ^# x
  517. STA $2007
    1 r& d& A# p9 q4 j) k( ^
  518. . L6 |7 t. D' `- U+ J4 x
  519. WL4:, R; p) n8 D% E, E* e, a
  520. LDA #$00
    : U2 K& T. _0 G
  521. STA $2000
    3 Q7 q. u' |; g- J0 O
  522. INX1 p7 s' V# O* _& h
  523. INC $BA% U- S; W" @1 U+ q" A" h. l, n
  524. INC $BC1 I. G/ h1 A8 w0 q3 M0 w- s
  525. CPX #$00
    # E" c7 R6 U9 `8 N# T
  526. BNE WL1
    ) v" b1 x9 O( p: n* U1 T
  527. INC $BB
    # }) f" A8 Q8 E  O( r  R0 \4 S1 w
  528. INC $BD
    / y8 g2 L% l* M' J4 |/ v9 h# V
  529. JMP WL1
    , i3 R) j( P' D- C4 P1 `
  530. . K" ?! X" W. \# f6 v, L: M( ^
  531. WLR:3 M3 e+ ]" K0 O) @! B: m
  532. LDA $7FFE
    ' i5 s- n5 Z$ z) X) F: m
  533. STA $07F63 s8 @# r# Q6 z* u
  534. LDA $7FFD
    , @1 y; C+ u" j8 M6 A5 ?4 L
  535. STA $00FE
    & {$ G1 ]4 ~+ v; W# e
  536. LDA $7FC1% z+ s& {: @! t0 W; s4 z
  537. STA $07C1$ O% u6 j4 J* ]8 U4 U
  538. LDA #$3F( f1 E+ z4 N9 [) o4 A/ c2 _
  539. STA $2006
    6 {2 z' X8 r: q3 {0 r2 F$ {
  540. LDA #$016 Y$ [+ y- G: k) @, D+ X' s& H
  541. STA $2006" m0 R4 J! S1 U1 B' ~, y; j6 H
  542. LDA $07C1
    ; @+ a0 f' W' @( x
  543. STA $2007& ^, R3 M. E( j; D
  544. LDA #$007 s8 T3 \$ A  p( y( R) z3 `+ R
  545. STA $20008 B% `) p; P; N
  546. PLA
    ' P2 f$ [: E8 U: E
  547. STA $B8
    2 |, [, d8 q' v- T4 Q( X
  548. PLA
    ' N3 N& C4 @# _3 E7 C" N
  549. STA $B92 {( z  x. T) b" m8 H+ N+ H
  550. PLA
    6 Z6 f/ Q6 g6 }& E, }1 ^& L1 v& ~
  551. STA $BA3 }; d+ k* c  }) L. T" R
  552. PLA  D8 m3 b- H. |$ Z0 U
  553. STA $BB
    , a! N$ }* r# ^, F, {- B
  554. PLA4 V* w' ^- _' n  S$ S
  555. STA $BC
    ! p8 X6 H1 t0 G" }" j
  556. PLA
    3 S7 ?/ U* Y1 S* _
  557. STA $BD% t" i2 N3 [+ |* Q
  558. JMP $A0004 _. Y( N6 Z- y2 Q( V# J9 `+ O9 |
  559. ( ]2 p, R3 w+ L* z
  560. FREE:                ; 暂存器保护
    $ x  Z; i+ D# Q
  561. LDA $BD4 e& E' d" e* v8 y& \: N& m3 t" n
  562. PHA
    / C4 ^0 Y/ R4 N
  563. LDA $BC+ F4 I4 l7 x( g7 |# Z! K
  564. PHA1 j' e* n8 W$ ]1 u9 h
  565. LDA $BB- l0 g5 O+ y3 l: E2 J3 j
  566. PHA
    7 J' c, T, P/ {6 `/ m
  567. LDA $BA  i4 x6 o( S6 K6 e2 c, }- c
  568. PHA
    * J0 |% t: o8 s# L$ G& z2 M$ J2 t
  569. LDA $B9* L4 |, |( f1 \
  570. PHA
    0 k) Q) X9 s- g$ u* ?
  571. LDA $B8
    7 `( s8 k: F' [8 Q' i4 q5 t9 g
  572. PHA- j* B9 p- K: `( v
  573. LDA #$00
    + ?+ _0 C9 j% \  r* X
  574. STA $B8! J( V! g9 I0 Y
  575. STA $B9$ A7 B+ C2 H7 G
  576. STA $BA" r: e$ D* U$ z2 r" w, ]
  577. STA $BB
    2 }7 n% L4 v: M& \; e  t
  578. STA $BC$ g# `& V; [9 i4 c$ {5 Y, G
  579. STA $BD; ~  e6 d. `, h4 T1 P% F9 i  c

  580. / e2 @, H( \' w! c: h4 L4 H8 {* z
  581. WEAWRITE:                ;武器ppu写入
    ! s5 q' K' g' x' C) ~
  582. LDX #$00
    + {/ Q/ w: h/ M1 u, d+ l2 V% G
  583. LDA $AA! \: a% E6 U8 r' i
  584. STA $B9# a/ f/ i) y7 v* y
  585. WEAINI:                ;地值初始化: k0 \8 @* Q3 X$ B6 D2 Q8 m) S
  586. LDA #$A48 B, ~# Y% W+ L. r- B
  587. STA $BA
      x3 i1 v' D2 Z* b2 u
  588. LDA #$20
    7 u* E& {1 o$ `7 h! D# m3 f
  589. STA $BB1 F7 i  m: \; W) W# u

  590. + H7 F5 s/ q0 o1 k/ `7 n; Z8 l
  591.   a# x+ s0 X& G8 v
  592. JSR WEA
    ; w' I8 X, f. v- d( ]& d0 k" |" K
  593. LDX #$00                ;武器ppu写入
    0 A4 I! R+ P! n" F% \. p& v
  594. LDA $AB/ S7 O  v" u* T5 E5 k* W/ G
  595. STA $B9
    # @1 ?  F9 x1 A/ h' Y# M6 c) G* U. u1 K
  596. LDA #$B39 o- \$ |' k+ I3 Q# z; \: f
  597. STA $BA
    - V. v; D6 m7 B
  598. LDA #$206 W5 S0 n' {7 i: k" A; ~( z
  599. STA $BB8 y! D# h% C1 W. c( p" L8 A1 d- m
  600. " Z# {- v+ Z+ H

  601. ; \9 G4 x- h$ a+ {2 \
  602. JSR WEA
    6 A# b6 K! \4 g+ D
  603. " h0 }, i( U! P2 _' ~. [
  604. LDX #$00
    + @: \1 e3 \, ]6 G" Y. D+ k2 Y+ m
  605. LDA #$E4! T8 z) G8 o) F8 B( b
  606. STA $BA& |- ~" ]: U6 Q  X0 M" F0 r$ [
  607. LDA #$20- p" G4 p* L$ v, m' W; L$ A
  608. STA $BB9 U. d. R- Y. C, {

  609. / d$ A  @8 o! X; V' ]/ p% x
  610. & z2 q) Z* r' E$ M+ @
  611. LDA $32
    5 M+ O: t. u% G6 \7 E" M
  612. JSR PLAYERLIFE
    : A0 k4 @7 d3 h6 Z$ Y' s

  613. * B; I( c. a8 @. {
  614. LDX #$00
    2 T$ x& G7 J3 b% W( {
  615. LDA #$F3
    ' Z6 P% T' l) d1 b% {# t- a' e
  616. STA $BA/ I) U' y9 v0 ]( h% |1 k
  617. LDA #$20# ]5 c6 f6 U) N" e# T0 t
  618. STA $BB
    0 w9 l: }- R# F7 {) g6 I! I

  619. 9 ?, ^! I- s+ s- x9 n  i

  620. 9 R) V" ~- ^1 l; P- \7 J& M2 G
  621. LDA $335 n4 W, n6 e( v2 `7 h( Q3 V/ W
  622. JSR PLAYERLIFE; A1 J5 K2 {& k+ Y; Y0 j  {4 K& J$ C

  623. & G2 c' l4 L3 L( a5 \

  624. . u; q3 }, H, Y% D9 L* R" A* M/ M
  625. JSR PLAYER_01_PPU
    6 y, V* ~& R2 f' J3 u
  626. JSR PLAYER_02_PPU
    ; p9 X& _( w. Y, l: }

  627. ! B$ I6 g8 C* j

  628.   y+ i3 t0 K! X* v/ _
  629. JSR PAGE_PPU. W! t( r7 M* X; P* Q: q
  630. JSR PAGESELECT% ~+ i. E2 p3 Q( \0 j& e, a5 d
  631. / e$ \) Z" N' v

  632. & j$ S$ h0 G9 C; D8 [8 b0 Y
  633. / ~% C% C; F( D. A$ l' n
  634. : {, N, s3 b6 b! x  y

  635. 7 K3 Y/ {' ?5 J% w3 k
  636. 5 V( ~' c3 q: t: E' D2 l  `

  637. 2 o/ Q1 s: p" a5 [
  638. - C& d- X! P) H+ M

  639. 8 n) ^( P, F" x; P6 H6 e, M
  640. 1 R& n- `4 T5 ^! y' j4 g
  641. ) |! Z: ^& s& F

  642. 6 q! A# N* f3 \" m

  643. ) O; k5 n" E! r: w
  644. PLAPRO:                ;恢复现场
    2 L  j+ l. J+ ]: [7 j: d' W+ U
  645. PLA
    # {" q' C7 h( y$ b
  646. STA $B8
    9 W5 p  I/ k$ w+ d( [% @8 }/ t9 P. S
  647. PLA
    / A; W4 C" y4 B0 m& [) l
  648. STA $B9
    ; W- R( \# o) J* X/ l/ \  r3 l
  649. PLA6 |6 ~" S; Z+ ?7 W) R
  650. STA $BA+ z& E% Y, H/ p% w
  651. PLA7 E' K. Z0 o$ w
  652. STA $BB5 l7 m& {) G+ g6 w
  653. PLA  t8 E5 I! m2 D6 C: O5 Y
  654. STA $BC! e" T9 U& v0 x
  655. PLA
    2 q( Z% b; ~7 P( C8 U. P; o
  656. STA $BD
    7 p7 A* Y) b' Z7 @! h" l, z* k
  657. FREERTS:5 h5 W4 |& v$ Q! m1 r) k
  658. RTS
    ' E  \, K. b! |1 Y- ?
  659.   J, y4 k- v5 G2 F: H
  660. INVINC_STRING:                        ;invincible
    9 x4 |; ]0 \( F6 }7 X8 ~( x
  661. .BYTE $93,$98,$A0,$93,$98,$8D,$80
    ; x9 a- I3 v" [

  662. 8 V) s4 A& S3 r' A$ V/ c4 |
  663. INVINC_PPU:
    3 m: L% g& f9 \* m
  664. LDX #$00, }* I- E; `+ }" J5 m$ e4 X
  665. LDA #$62
    , q3 _7 a) w/ K
  666. STA $BA
    5 _& j/ Z! ]" F  ]- h
  667. LDA #$21
    / c% y$ n$ o/ J6 ~" P. [$ c
  668. STA $BB
    ; {' H. P: F( ?! a) F

  669. + z. p1 p0 I: G2 s
  670. & f& l4 S2 [$ o: U
  671. JSR UP_PPU9 s( V# S. ^2 Q7 P, e
  672. JSR INVINC_WRITE
    6 F* M3 `1 x% ^3 k+ Z0 E+ ^, z' r! j: f
  673. LDX #$00, D5 i: b( G+ y
  674. LDA $07A06 g4 q3 O8 T- s8 \+ F; i
  675. AND #$01
    5 L! `3 u3 ]( R/ I7 |8 M; q
  676. JSR ON_OFF_PPU4 i3 [' O2 o' r' y6 l- f
  677. LDX #$00
    * T7 z9 W5 x. p! {
  678. LDA #$71
    / N: L8 Y5 i$ ]  [! M' y0 u, o
  679. STA $BA" k" E7 u, `/ w3 L
  680. LDA #$219 X4 ?, C: ^; d' a9 C. D: [1 q' Q
  681. STA $BB" F& L6 ]0 ^, B: b& K  g

  682. # w- `2 t9 E  R; M! V

  683. ( H, I9 p. F$ U  ]% r. C
  684. JSR UP_PPU; J* x. q* N+ B* r
  685. JSR INVINC_WRITE
    - z% }; z* p' T  Y" z
  686. LDX #$00
    8 ?$ k0 J% [5 o9 r
  687. LDA $07A1
    5 A. ~7 P( q3 W0 S2 c2 `9 Y
  688. AND #$01
    8 W$ q* p% G# R* V8 R% s6 ]
  689. JSR ON_OFF_PPU
    " V) }& \2 {' ?. n
  690. RTS9 W7 h1 C! T- {. w0 V5 `
  691. 7 v5 A1 x. Q7 S
  692. INVINC_WRITE:6 K7 s4 U3 U5 X  \7 o6 r0 N
  693. LDX #$003 J4 G. l: ?* h
  694. INWRITE:0 p$ P- `# p. f* O# Z6 c
  695. JSR PPUADDR_PROCESS
    - p6 j, ]" ]& H1 d5 @) S, Z
  696. LDA INVINC_STRING,X- M  j" C& s7 V' l" y
  697. STA $2007
    ; g9 i" b/ @; j: ~* g. w
  698. LDA #$001 N/ X1 D0 v# g/ u! n/ e% K
  699. STA $2000
    % w' s, Y( F; d6 Q% T
  700. INC $BA5 Q( @. O0 p3 e6 u7 O$ H
  701. INX& @1 M7 B+ F& r6 z! ?& L7 O
  702. CPX #$07
    , D# I6 D. S; G% p
  703. BCC INWRITE% ]% ~! ~2 Q& R2 a8 e* l
  704. RTS, y& q* U3 Y+ U

  705. 7 ?! N! n& M" s! h7 l3 N0 @
  706. ON_STRING:, M) _" T. r. j9 F3 O! [$ u
  707. .BYTE $99,$98,$80
    , r$ a6 J7 x) O6 h3 R9 d2 ~# e
  708. - }6 y( ^6 b) }% B4 e
  709. OFF_STRING:% i* A1 b( A) c6 j; m& N
  710. .BYTE $99,$90,$90
    2 Z. N1 R8 c; e3 A0 U" u

  711. / |( l% _4 l5 _3 R0 o
  712. ON_OFF_PPU:( ^: Z# F: Y3 X; d3 \
  713. BEQ OFFWR$ @. b. _( G9 ?
  714. ONWR:
    % X, v" m& Q2 h' B- M
  715. JSR PPUADDR_PROCESS
    & m0 n" z$ D0 T, T
  716. LDA ON_STRING,X$ l: A1 |7 t: |: v7 M
  717. STA $20074 m+ D, p2 y& J& \) V7 b& A# l
  718. INC $BA+ e0 S) p* P1 G' Y
  719. INX
    ! h2 @' H+ R$ a+ h3 P
  720. CPX #$03
    3 j' j& z; k1 X  m0 q; V3 g( N" Q
  721. BCC ONWR
    + E" [1 Z' b5 H4 ]0 Z
  722. RTS
    9 X6 b) Z6 O& _2 Q% y  t
  723. OFFWR:5 T* _" L8 q2 Q% ]8 B. v
  724. JSR PPUADDR_PROCESS1 s% p! d" f/ \% s6 B4 ]1 I* H* W
  725. LDA OFF_STRING,X/ w0 V" g8 f" Q6 N4 k8 a/ Y4 d+ X
  726. STA $2007( V8 I, _& N! O! L6 W
  727. INC $BA5 O# d0 ~  A, q
  728. INX
    - \- ]& M& f! O5 J3 k6 |- a
  729. CPX #$03; y* _/ U1 d* `$ [
  730. BCC OFFWR4 E  w/ p. U7 o) \: X, P
  731. RTS) L% j" V1 g7 j. [9 G8 f

  732. + ?- o+ e, g7 w
  733. LIFELC15_STRING:+ Q' q2 E- g& I( `) x( l% f3 p
  734. .BYTE $96,$93,$90,$8F,$82,$86,$80) S3 r' [4 X8 }5 [
  735. ( m& |/ V% {7 |9 r
  736. LIFELC15_WRITE:2 l" I& r# f( V, g+ P: n
  737. LDX #$005 v9 Z1 c& g$ P4 w2 ]0 Q
  738. LIFELC15:
    * D! |' ~" t3 J% }) G
  739. JSR PPUADDR_PROCESS
    % S$ c4 H; P# q  K1 L( m
  740. LDA LIFELC15_STRING,X
    9 {$ Z$ p8 s1 X: y: Q5 ~
  741. STA $20074 w4 M& |4 \# S. f* l% @
  742. LDA #$00
    0 m$ C* Y: }/ w6 I6 a! q$ _
  743. STA $20007 M$ i/ ?$ N3 ~' Y+ M* x! d
  744. INC $BA
    ; X7 r. V/ Y1 l4 Q
  745. INX
    : Z' l2 j) Q4 b6 w" n
  746. CPX #$07; [; p1 @" j  M  S0 E" c$ R
  747. BCC LIFELC15
    ! s1 ^- `  a3 |! x9 J
  748. RTS
    . f, x" z2 s! v0 B+ A9 {

  749. ' Y5 R) W2 m4 K
  750. LIFELC15_PPU:
    1 _8 O$ N8 G" f0 q
  751. LDX #$007 q' f5 x+ f# v4 g3 u5 S6 Q
  752. LDA #$A2
    0 ], o: k2 @0 Q7 l# \" ?5 [9 r
  753. STA $BA' \7 O% ?6 I- F" T( F( D) ^
  754. LDA #$21
    ' p$ b! G/ A% S& H. P  i
  755. STA $BB
    7 c, {- d- t% q" R* d
  756. JSR DN_PPU# f! L& g9 h1 R! s7 W: Q: I' M. g
  757. JSR LIFELC15_WRITE  t% n0 m3 m( w% f) F" [9 Z0 Q; H0 z
  758. LDX #$00
    $ z1 ?# w8 U$ K5 i
  759. LDA $07A0/ [" e% B4 Z5 a0 U) [
  760. AND #$02" S- A4 w1 ~$ X& a+ d
  761. JSR ON_OFF_PPU7 Y+ l% e6 j8 C
  762. LDX #$00( N* R5 y/ k5 z) w, M$ G  }' l. K
  763. LDA #$B1
    . B* m; t* b; l8 H7 o; H. [
  764. STA $BA/ E2 I$ u9 H& M1 J+ ?9 k+ M
  765. LDA #$21: E* ^8 e6 B/ h. X3 B1 ]
  766. STA $BB" O* E* A: k; o1 ^
  767. JSR DN_PPU
    . [) t& O. ^  ~% W$ O
  768. JSR LIFELC15_WRITE6 p6 K1 M8 i- `& M* d  D/ Y5 X
  769. LDX #$00
    & x" Q2 [0 h) U) O& u
  770. LDA $07A1
    8 B8 f+ B$ `! y' u# l! g& ~! l
  771. AND #$02
    ( ?  m3 R( p0 G1 t7 K. M8 G
  772. JSR ON_OFF_PPU$ U  g9 \% L& ?3 h# Y% U
  773. RTS
    ; r  C% e+ ]8 v

  774. 7 I0 z& k8 x5 t* z
  775. DOUCON_STRING:
    4 U( C6 c/ `* U, h4 Z
  776. .BYTE $8E,$99,$9F,$8D,$99,$98,$800 f) J8 h% s: M+ F+ ~0 P% T) w

  777. 2 N) y& D) u' g2 ?
  778. DOUCON_WRITE:9 ]) B; r9 i% j$ M! ~
  779. LDX #$00* \2 y( q, h4 T7 Q) r( A% r
  780. DOUCON:
    ! F6 C( ~4 h- Q5 p6 `
  781. JSR PPUADDR_PROCESS' b# d$ o' l" H4 F
  782. LDA DOUCON_STRING,X2 A# X/ N7 \& @( v2 v- \1 K
  783. STA $2007+ W. i$ c% ~" r+ G. c* Z
  784. LDA #$00' M2 e# C2 p4 l9 d% O
  785. STA $2000
    5 }/ _/ n1 J- P4 K0 d+ d" x* f
  786. INC $BA2 f* s9 i: n/ f0 I
  787. INX. W  S3 p5 b+ O$ Q
  788. CPX #$07% M9 ?$ @; M: v6 C1 k
  789. BCC DOUCON
    5 S' `$ _  ]4 l$ P  j
  790. RTS
    & @1 T  ]. y% b! X- C0 Z

  791. $ k9 w. \: `: @: x
  792. DOUCON_PPU:' ^! S5 y" S3 X$ A5 v) \
  793. LDX #$00& c& f9 c9 K9 J6 @( [1 g' v
  794. LDA #$E2
    0 D; t* F" ]- C" B; V. i9 x8 x
  795. STA $BA
    ; ?, p* H. O: a. A+ n* s
  796. LDA #$21
    : d8 U$ Z. U' e5 j/ n6 V" ]- ]; {
  797. STA $BB
    0 k: Q6 f, |# T: o8 d
  798. JSR LF_PPU- z. z- v* Q/ j1 M
  799. JSR DOUCON_WRITE
    : Z# @& }" Q0 F& W+ U! n
  800. LDX #$000 ]5 f# N$ g$ b5 p7 t. T  z- h
  801. LDA $07A0
    % B5 i4 U2 A, p& t" G! |4 m
  802. AND #$04" F0 H" e$ e4 }# O) e" l
  803. JSR ON_OFF_PPU
    4 g& g3 _- W9 l9 U
  804. LDX #$00
    ! O+ Y' s+ c0 B4 L3 ^6 s0 v# B
  805. LDA #$F1/ L: S( g9 C: H; T
  806. STA $BA3 d: c( S8 ^& T' K  H
  807. LDA #$21
    ( H2 z& Z+ Q1 x( X
  808. STA $BB* r8 B0 `6 s+ {' y  l( I
  809. JSR LF_PPU9 w" O( m* W- Y3 W2 R& B
  810. JSR DOUCON_WRITE
    ! o" Z- ]" [2 n6 k+ l( p
  811. LDX #$00
      V4 t$ P7 t5 a
  812. LDA $07A19 o; Q" a, s" o: D# e5 k
  813. AND #$04
      b' v& v  z  _3 q! \$ h) r/ q
  814. JSR ON_OFF_PPU* O% E+ n9 H, t. Z& L
  815. RTS' h2 {& n, u2 B2 n3 _! H
  816. * |; ~6 ?, O# b% e4 q. N7 E& m7 S( c
  817. LIFELOW_STRING:, m, f3 _, Y6 V' h, e( f5 v
  818. .BYTE $96,$93,$90,$96,$99,$A1,$80
    7 T+ f' M, k( a/ B
  819. 6 o, b; z. m. X! R
  820. LIFELOW_WRITE:
    * ?# N! c+ Q, s6 Y+ y
  821. LDX #$00
    ) `! ~9 u- {( r5 H
  822. LIFELOW:
    7 X' u+ z3 E* x6 H7 f: g
  823. JSR PPUADDR_PROCESS. J8 x. C* D8 E8 \1 v% t8 Y
  824. LDA LIFELOW_STRING,X
    4 z. o7 ?9 z( Z3 Q+ f4 |0 ^
  825. STA $2007
    6 j: c( V. p4 J  u+ v4 c. T( C
  826. LDA #$00; S5 x4 J8 u, f6 b; Q
  827. STA $2000
    * v3 m' ], B7 h6 }6 s
  828. INC $BA% V8 i7 B7 D/ N/ D1 O& a4 F( J
  829. INX
    3 n# L0 M, u2 Z, r3 O
  830. CPX #$071 ]: T& g: \( N, l% b$ ~, |
  831. BCC LIFELOW
    # i+ |* J' M0 ^$ r
  832. RTS
    ) |6 X7 E7 B+ f! c7 F  j+ e* D
  833. 3 }. {9 n# H4 l. j% ?3 A) p( m$ v
  834. LIFELOW_PPU:- o" h) d- \0 n- D, L% l. I' [( c5 Q
  835. LDX #$000 k/ r7 X. L+ u. ~8 o/ n2 g+ K& \
  836. LDA #$22
    / d1 l6 z$ Q9 w* a4 d% y7 C0 h0 G
  837. STA $BA
    + W& g- m, ]+ s$ r4 z
  838. LDA #$22% x3 n& D# O- I: X$ {
  839. STA $BB
    3 K* v5 _' ]8 T

  840. 4 ^$ Q$ m. M- L& ~0 B/ n+ I% ^; ~8 G

  841. ! }( y4 Y  a; a$ X$ R
  842. JSR RG_PPU
    & o7 x  T$ m0 I3 o* |# P
  843. JSR LIFELOW_WRITE
    ) F+ R& U5 u7 @$ S, ^5 c6 Z
  844. LDX #$00
    0 H& t! d$ I5 x: O! Y
  845. LDA $07A0
    ! [& m- `" F5 E; v  K
  846. AND #$08+ l2 b& v; \$ }
  847. JSR ON_OFF_PPU
      X* g7 q8 B* ~5 P
  848. LDX #$001 v5 g" @5 z  _$ {3 ~" O
  849. LDA #$31
    2 J& S$ m+ U1 i
  850. STA $BA, n; X& R# r# V, w1 C0 h$ A1 G. e0 g
  851. LDA #$22) \6 N/ F5 G( s8 E+ s0 y
  852. STA $BB+ B- c, @4 l- d+ X" |

  853. ' X0 E0 C! h: V8 C* p* I+ r+ W

  854. ( O9 \& k& Q7 C) x2 N) X! U
  855. JSR RG_PPU
    " j! z3 D+ z. \( a
  856. JSR LIFELOW_WRITE
    . o4 o2 K1 c( Q" j& T! N
  857. LDX #$00
    / {) a" ~2 T; r% P3 b. q8 \
  858. LDA $07A1
    7 [  h" T& w$ g" Y2 ]
  859. AND #$084 H: I9 d* O( m5 j0 B
  860. JSR ON_OFF_PPU
    ! U/ M1 H) r4 M; d& b
  861. RTS
    * ]! E: o: a/ N, d9 ^9 L. P/ r. ?1 P

  862. & v7 M% o6 @+ X. G' h
  863. KILLON_STRING:
    & ^" v  a/ [2 X$ Y7 G
  864. .BYTE $95,$93,$96,$96,$99,$98,$80' `2 s$ }( h7 u
  865. ( o6 f7 x1 u+ l& Z2 ^; X0 W
  866. KILLON_WRITE:
    ' ]2 C2 Q2 \+ k! ~) D! h
  867. LDX #$00
    , A- A, C7 v: a
  868. KILLON:8 n2 D; K1 T/ V) a, \8 c
  869. JSR PPUADDR_PROCESS  o, Y  t9 G; p
  870. LDA KILLON_STRING,X/ v' K- K  n- z6 G- ?" P
  871. STA $20075 f' z% ]$ C' w( ~9 c8 M
  872. LDA #$004 P. W# A- w+ N( v8 m' t( W
  873. STA $2000* w( K) `3 m- k; a3 _( j% U+ \
  874. INC $BA, c0 v6 i& _. W
  875. INX
    9 `- w! u! Z7 ]9 j6 l+ l
  876. CPX #$07
    5 Z. Z$ r% ~" f2 c0 o6 e( G7 {
  877. BCC KILLON
    : i: D/ ~0 t" M+ t$ A- W5 j# d' X. [/ m
  878. RTS: C) W. U3 a% G! q' E. }
  879. " Z/ H6 f$ Y$ P3 {2 _7 N+ j( @* P
  880. KILLON_PPU:
    / T  o2 R& G: X+ Z* [+ d( t
  881. LDX #$006 w, n# ~. j  F! C( j
  882. LDA #$62
    7 B* h0 N% T5 q7 o0 _
  883. STA $BA
    6 A1 A0 ]: W& |6 |+ c8 O0 R$ T9 j
  884. LDA #$22
    0 H# g: g" i7 N. j! p
  885. STA $BB
    . Y4 c5 |4 f" z* J1 g% i

  886. 5 K! l) k# t( o+ N5 d
  887. " R% G: q( ?2 J0 \. z
  888. JSR B_PPU
    , ~" {( ~: i" F0 f( E
  889. JSR KILLON_WRITE; F& w8 ]; n& v7 k) b/ S' A
  890. LDX #$00% ]& B; m1 R! S: L
  891. LDA $07A0
    9 X% D6 y/ q1 D% m
  892. AND #$10
    , k1 k& S: h3 M+ }9 n* L
  893. JSR ON_OFF_PPU
    . `. i  d2 n# [( d$ k3 P( t
  894. LDX #$00
    - k( d0 J; q# ?' v8 [
  895. LDA #$71
    : }% W- H+ {6 \3 ^- g( t
  896. STA $BA
    ) J1 g+ ~" i1 X/ ]+ c  B
  897. LDA #$22. e, Y0 {. Y; Q: S* j  |+ i
  898. STA $BB% J: \; d- Q8 F7 x
  899. . m# g$ t  l+ ]8 h+ c6 \

  900. " b! Z( ]# U3 n  ^5 e) {+ y5 Q8 s
  901. JSR B_PPU
    : m& o7 D9 S: Q) B
  902. JSR KILLON_WRITE% N) G$ ?' v8 V: S9 |
  903. LDX #$00
    8 o& f3 Z% y2 `& V
  904. LDA $07A14 ~6 y8 ^5 O5 A7 ?  f, f
  905. AND #$10
    7 c5 |5 Z' O( L6 r' j2 T$ }
  906. JSR ON_OFF_PPU5 o/ G3 B& d" X/ Q) c1 w
  907. RTS6 X& u0 j$ d/ J+ t
  908. : b6 p4 b% v9 D- e- {% r7 U9 e
  909. SKYFLY_STRING:- N, F3 ?5 w# l4 V
  910. .BYTE $9D,$95,$A3,$90,$96,$A3,$80% s$ K: @. N; M5 {8 n' o9 l, X
  911. * z$ v+ D. T2 x
  912. SKYFLY_WRITE:3 ?$ T, y5 h/ h5 V  s" Y% m
  913. LDX #$00  D$ h- b  w' D& G
  914. SKYFLY:% Z) ?& l3 u% `- a! ^: g6 T9 W
  915. JSR PPUADDR_PROCESS
    " o( L" e/ `& ?- a) t- @
  916. LDA SKYFLY_STRING,X$ C  m; o: [) Q: ]1 S, T% x2 G6 n
  917. STA $2007- B8 X/ ^/ z, Z' ]. n1 |
  918. LDA #$008 G- e: Y  ^5 E5 ^7 Q, k2 |& c
  919. STA $2000- j- m5 [# O7 K& f2 D+ [
  920. INC $BA% O/ P: i7 q& ^0 h
  921. INX4 `1 W0 b) U3 A
  922. CPX #$07
    * y! `2 H. r, E# y
  923. BCC SKYFLY# Q+ q% p$ p$ W$ Q; J8 y& _! g: n
  924. RTS
    ( Y7 z+ _! E6 t! W; Y

  925. % r4 ^* Z$ g1 o  u9 q/ X! `. a3 j
  926. SKYFLY_PPU:
    ! }, r8 v% ?9 K. c
  927. LDX #$00
    4 _$ R( V: u+ O* A; S
  928. LDA #$A2, }4 F' m" H7 F, m1 Z6 D
  929. STA $BA
    3 \1 e  m  M' ^3 n
  930. LDA #$22
    3 D- L/ @# }. H
  931. STA $BB. U+ m( z$ s; P7 A  n
  932. * w9 p) |; l' }$ ^3 w

  933. 0 L! r  ]8 c+ q& I- H4 z. _( {
  934. JSR A_PPU
    ( Q$ e5 B6 l9 c% V! O1 [
  935. JSR SKYFLY_WRITE
      G; T7 d) ?/ v  s  D
  936. LDX #$00
    1 p* K/ H3 R+ }# E1 F4 H/ _
  937. LDA $07A0
    ' u0 C. V- u" s7 y; L
  938. AND #$20% F* F3 @4 w6 ?
  939. JSR ON_OFF_PPU
    0 S6 B' J" s4 g% j
  940. LDX #$005 `" ?3 g; t6 x( b' `
  941. LDA #$B1
    . V+ `, Y; C0 a1 C  e
  942. STA $BA8 p! a  ]# p) y- E/ t8 W9 K) U
  943. LDA #$22. l3 f/ ^" [, o
  944. STA $BB
    2 q  D# |& y8 w# f0 I' ?" H

  945. ' d5 E0 c* |6 @

  946. 9 O( ?7 R$ j9 }1 z$ K5 C3 l, _- x
  947. JSR A_PPU, L- N5 C1 R" [. B; v' i* ]
  948. JSR SKYFLY_WRITE/ \% ?' D) y/ z6 @& x
  949. LDX #$00
    2 L" P, _) {  `' A
  950. LDA $07A1, A" o; f9 R# }( G
  951. AND #$20! b3 C3 Z+ [. c& ?# G1 }
  952. JSR ON_OFF_PPU
    5 c6 t# @/ X& i) |4 Q
  953. RTS
    6 B) C6 I- m& s& ~! L& Y
  954. * e% \. g( r# C: _5 X. S
  955. BULADD_STRING:
    ; U; l+ F6 R* C
  956. .BYTE $8C,$9F,$96,$8B,$8E,$8E,$80* R% s: q  Z8 {7 y* w* l
  957. / n/ J" U, m. M. E/ B* r7 U
  958. BULADD_WRITE:9 N# L$ B7 g, m5 s! v6 L2 v
  959. LDX #$00; F9 z0 ]( L8 U  r0 C9 F8 m
  960. BULADD:5 e/ }; n& K6 n2 H9 e
  961. JSR PPUADDR_PROCESS
    7 m( m6 p+ W1 N) ~  s) ^, K) p; W' U
  962. LDA BULADD_STRING,X. y. @/ u3 a7 H) b  i( n0 V
  963. STA $2007, v) |* P4 R: `
  964. LDA #$00* n/ _$ l# s: @2 @
  965. STA $20006 \, |2 A# w% J: p- k2 b
  966. INC $BA
    1 P5 Z6 M/ D3 r
  967. INX3 {; a0 W4 E6 d
  968. CPX #$07$ C/ o+ _3 J$ Q* q9 r/ Z2 O3 z
  969. BCC BULADD  W; z2 o( _3 p) T7 {6 b
  970. RTS, P5 Z% S& B  u3 Y( g" W4 q
  971. / `  \: a9 u# P7 E
  972. BULADD_PPU:
    ( R, d  H6 j4 z) |9 c
  973. LDX #$00
    5 `' e8 c: b" _* t
  974. LDA #$62
    2 N  [- X0 o# e! F$ n4 u7 J
  975. STA $BA
    4 w5 @! [% _8 p; \$ |
  976. LDA #$21
    4 L/ R: B& x$ ~( y  z. u# p
  977. STA $BB; w7 V. h# G+ t/ u' I5 _6 R

  978. ; N$ k7 h. k, H/ j9 P

  979. 2 W' E2 q$ P8 j" p* I
  980. JSR UP_PPU# v: Q: H5 {. O: k
  981. JSR BULADD_WRITE2 o' n6 E# e  ?0 g+ j/ `" V4 n4 ?
  982. LDX #$00
    5 f1 Q; Z2 T1 f
  983. LDA $07A2& u/ V/ D$ x5 w! B
  984. AND #$01/ h" R8 Q4 Z& c) {' \
  985. JSR ON_OFF_PPU- N# s- z% M: k! ?6 ^
  986. LDX #$00
    5 o* X, N. h( L) Z9 [$ U4 G
  987. LDA #$71
    , S* Z* q0 W' A
  988. STA $BA
    6 D# G$ x! R9 e" u2 N  a5 O3 R
  989. LDA #$21
    7 n0 T0 d+ b/ p2 w+ A
  990. STA $BB
    + `! S$ s( A$ f' A
  991. 7 U4 }. c9 I6 j7 [; ]8 @
  992. 2 K/ h* h, j8 ~+ G! _% n
  993. JSR UP_PPU
    5 }  Q! M$ z' Y5 S' K. Q1 W
  994. JSR BULADD_WRITE' {& E( x$ F% X4 v$ F( Z
  995. LDX #$00/ h6 p  ?8 A; Z
  996. LDA $07A3
    + V6 L: [6 I$ E7 t
  997. AND #$01
    / q4 ]) \; V0 S0 ?
  998. JSR ON_OFF_PPU
      j0 M5 t& W- k. s" ]# ^* C
  999. RTS
    ( t! k( p" Y! g  y6 v

  1000.   w# @5 d1 A9 Y! A
  1001. MENU_PAGE_STRING:
    % {- r+ R: \+ N! j
  1002. .BYTE $97,$8F,$98,$9F,$80,$9A,$8B,$91,$8F,$80,$817 {7 \  c0 e7 L
  1003. + V! H$ i/ ]" \! w& _$ k6 \
  1004. PAGE_PPU:
    - Y4 Q6 V' z* u
  1005. LDX #$009 W, p2 P6 _0 A7 u& P( H
  1006. LDA #$0A
    8 x! j: X9 ?8 S( n8 q+ k
  1007. STA $BA
    $ C2 b( k& Y" ^& x8 R" Q
  1008. LDA #$23. [  b0 [5 {1 U0 e  ?6 m8 l6 o
  1009. STA $BB
    ( Z% @  z9 e: E4 L. p$ U
  1010. $ [0 i/ \+ i7 e: O" h
  1011. 6 U" Y* S1 V! j. w& h
  1012. MENU_PAGE:* h  q( R" _2 p, b; l5 {
  1013. JSR PPUADDR_PROCESS
    6 v/ B: v  E5 c# {0 V% k
  1014. LDA MENU_PAGE_STRING,X
    $ T1 e9 F2 _  I9 s
  1015. STA $2007
    * V/ t! |+ o+ U% a, b; z
  1016. LDA #$00* P/ h7 ?, |' a
  1017. STA $2000
    ( V6 b- R2 }% w# S. t" r# t' U  {- E
  1018. INC $BA
    7 }% v  d+ j3 ]4 ?& Q7 Q0 e5 g
  1019. INX( w' A2 x3 g& V% {" U  J( B: y
  1020. CPX #$0B* h9 S0 U4 r; }) ^
  1021. BCC MENU_PAGE: e, {2 h+ a. D8 _' n) R
  1022. LDA $07AA3 m8 |) Z0 e# }; B, `
  1023. CLC
    1 I6 N+ V5 W3 k9 j' P
  1024. ADC #$82
    : x. f) d- i) q" x# j
  1025. STA $20074 T2 s+ V% ^1 G1 m$ M
  1026. LDA #$00) n. G* _8 D+ A/ x! ?2 V
  1027. STA $2000
    ' a7 G1 s8 P4 ~  X& E
  1028. RTS' r0 _" D) D  M! k/ p3 B  h; H
  1029. 5 Q+ A  i& g( |8 {) Z

  1030. 8 ^( c3 m. c9 j
  1031. SKINGE_STRING:; h, Z0 L- n# z) d4 O0 {
  1032. .BYTE $9D,$95,$93,$98,$91,$8F,$804 Q3 |4 a  L: B# h% Y& p
  1033. 9 N) G+ _1 q4 Y& E/ V  j& l
  1034. SKINGE_WRITE:
      g0 K2 N' d+ j- |
  1035. LDX #$00! k, i, w9 c7 O6 B  [) k
  1036. SKINGE:2 E$ d/ r7 i  u1 A
  1037. JSR PPUADDR_PROCESS  C8 h# Z6 e! d( N
  1038. LDA SKINGE_STRING,X' h! X- |* A, `) Z) ]
  1039. STA $2007
    * f0 D# y' J- Z, x8 `$ b9 l
  1040. LDA #$00
    8 [4 w; N2 [+ I6 E" z
  1041. STA $2000
    8 I; O$ r$ z' L+ i  {
  1042. INC $BA
    ' T# E& t+ B) k7 I2 j6 I1 E8 H
  1043. INX
    $ U4 p' l% _4 [& G1 `* v
  1044. CPX #$070 \  d% J" |2 W9 i/ w+ ^
  1045. BCC SKINGE
    9 [7 y3 W# l* ?
  1046. RTS
    3 t" f) W/ ?0 y! k3 X
  1047. 0 q  e: {! M- ?* H+ e
  1048. SKINGE_PPU:  n( Z5 P2 e: i
  1049. LDX #$005 j+ h: Z) \! I  q; X! X9 D
  1050. LDA #$A2
    " w- I, |$ Q. F" P2 C
  1051. STA $BA0 ]0 a& F- L; t
  1052. LDA #$213 \/ p" s* l% N0 a
  1053. STA $BB* s3 K3 P! c! X' W& F. L2 f0 ^% A
  1054. ) h) z; U8 j4 {5 Y

  1055. ' M# v8 Z8 h* O$ `1 b
  1056. JSR DN_PPU
    - |* _% S9 Q. e! p0 D/ V
  1057. JSR SKINGE_WRITE9 `/ @1 T8 q* B
  1058. LDX #$00
    ) q: v0 v1 z0 l5 w1 [6 f3 `
  1059. LDA $07A2
    3 I' x6 h$ U) O& T# l
  1060. AND #$02
    % }+ j5 p0 j3 c. q& q
  1061. JSR ON_OFF_PPU
    ! b' ?- y# M& i
  1062. LDX #$00& a0 F- C2 B+ U: @7 g
  1063. LDA #$B17 j0 d- l8 o2 Q8 x9 [7 _
  1064. STA $BA
    1 y7 g8 ~7 u' N: e, _
  1065. LDA #$21
    ! L" t" T; L# u- D$ ^4 y( p' L2 y
  1066. STA $BB
    ! c1 H1 M- [% P% U: n
  1067.   u9 i2 c0 W7 E

  1068. 5 h5 r2 e2 L5 c9 W8 b& x4 q
  1069. JSR DN_PPU" m0 ^3 X+ [* T+ ]1 `; B9 F! E- k
  1070. JSR SKINGE_WRITE8 h1 t) M% u  Z0 K5 ?. `* P
  1071. LDX #$00
    ! d: r/ w- j2 c% R
  1072. LDA $07A3( d- X; }8 h9 p& o
  1073. AND #$02
    & T/ N" |- g2 b% _
  1074. JSR ON_OFF_PPU% @6 \* W# m0 V% G
  1075. RTS
    9 Q: N" Y. J2 \

  1076. " h! W8 U; X! R4 j1 D; Y- I
  1077. BULMIX_STRING:: k, q$ F) m( \7 |/ v
  1078. .BYTE $8C,$9F,$96,$97,$93,$A2,$80
    ) c3 k1 l9 k8 r, F) y: }: v+ t

  1079. 4 C. G  d) r# a( }
  1080. BULMIX_WRITE:7 f6 L4 O& W: s( B
  1081. LDX #$004 F9 `* T5 D4 w3 G! X
  1082. BULMIX:
    8 ]+ ?. u2 q- P3 F0 _; {: `4 g
  1083. JSR PPUADDR_PROCESS, l1 Z6 U7 \  b! C0 ~; ?5 A
  1084. LDA BULMIX_STRING,X
    8 H- S9 |& Z( X5 x
  1085. STA $2007
    ' q  j- h" {0 {6 |
  1086. LDA #$00
    ' o5 T: t- u# O6 b: x
  1087. STA $20003 E* c; \9 \) O6 U7 I
  1088. INC $BA
    : C) B, Z- M$ \
  1089. INX
    9 [" x  @& i8 c/ r1 \
  1090. CPX #$07
    / }8 V' d8 u# M: }6 T
  1091. BCC BULMIX5 @# q0 j: x+ A9 A( t# f
  1092. RTS
    5 `( V) L  [( J/ r
  1093. , r  J2 e& S9 ^9 B  W$ b) @
  1094. BULMIX_PPU:3 R' B' s" O) p
  1095. LDX #$00
    " j. q/ u, o6 P/ |4 p
  1096. LDA #$E25 g4 e. f; ?% D6 Q3 E
  1097. STA $BA1 M, }7 n7 l/ g2 Q# L+ m; x2 y
  1098. LDA #$21
    8 Y- S7 Y( a# v) Z( X- K9 p# N
  1099. STA $BB2 x! |) A0 ?+ Q; _

  1100. $ u% \0 d8 c% }; H. T- \
  1101. : j& t" ~1 Z; @+ ~2 B) B2 q
  1102. JSR LF_PPU
    7 V  ^- _! k* C2 @, Y+ _7 L
  1103. JSR BULMIX_WRITE
    - B" m. j6 H. ?+ Z0 L5 F
  1104. LDX #$00# U/ R7 f/ Z0 L7 c8 ^0 _- ]
  1105. LDA $07A2! G! x  N; H$ T. B: z7 V4 o+ g: F
  1106. AND #$04
    9 Q8 S2 n" p# x7 ^
  1107. JSR ON_OFF_PPU
    7 m7 z: T3 @9 E) P  U4 ]7 b* B
  1108. LDX #$003 q+ z" X; S( P' P
  1109. LDA #$F1
    " D$ `, v) i% [" Q' r8 n
  1110. STA $BA
    " C+ e+ ?; ?  R7 f# I" i1 G
  1111. LDA #$21
    + p& V/ Z$ J$ K& f
  1112. STA $BB
    1 ^4 ~2 P5 ~5 \. e  n! e& Q" `+ d

  1113. " A) q! C2 c( y# f

  1114. 8 ?9 U$ H8 J' Y' X
  1115. JSR LF_PPU6 B0 Y! ]$ j" c/ m/ w% Q7 R
  1116. JSR BULMIX_WRITE
    8 H% B9 D  N2 q7 U& m
  1117. LDX #$00
    . M( v2 p' I5 T) {' [. Z& m/ p9 b4 w7 ?
  1118. LDA $07A3* R: U( H5 V( d0 d) X+ Q+ Z
  1119. AND #$04
    2 f5 b$ H, U; l0 \+ ~5 J0 J9 M
  1120. JSR ON_OFF_PPU
    : H+ Y* s% I' M8 b; m; k' ^) R& q
  1121. RTS5 ^0 h4 v1 d% H& e, s. D

  1122. + C4 F% D0 e3 H% f
  1123. ENELOC_STRING:
    , ]4 ]. G. x% s( A, Q, P
  1124. .BYTE $8F,$98,$8F,$96,$99,$8D,$80+ V0 ]# H6 \- M8 @' U: _

  1125. , G+ }" T! q& b( u) q
  1126. ENELOC_WRITE:4 C- w0 W2 [) [4 X5 O+ Z% m6 E
  1127. LDX #$00
    . U# C) B2 r6 z  `8 B
  1128. ENELOC:
    ! U5 V: s+ q: D; r: l. E
  1129. JSR PPUADDR_PROCESS# ?$ W: h9 D8 C# o
  1130. LDA ENELOC_STRING,X. |9 v+ u: p* Y( a; ~% F# {
  1131. STA $2007
    / |2 o$ G8 Z8 m$ q" j
  1132. LDA #$00; ]: K; D& S9 k# P
  1133. STA $2000& {' i/ j$ r, k2 F+ }
  1134. INC $BA9 N- W  }$ x& k
  1135. INX/ w& q9 \) U- J3 u8 j
  1136. CPX #$07% q" ^, \, ^0 B4 w+ |
  1137. BCC ENELOC
    0 l! t2 T4 @# J$ G3 v; I3 F
  1138. RTS
    3 H6 z) ]# e! t2 z) n+ d8 M7 |- M

  1139. ' b: l: \9 m% R; ]) @
  1140. ENELOC_PPU:( _& H; c1 |1 B5 o+ X1 `$ E; B
  1141. LDX #$00$ X% G. q$ p: F9 S0 g- p- O  y
  1142. LDA #$223 r9 H. v0 W* I& l" M  y
  1143. STA $BA: `2 h9 w  A: D+ {$ n
  1144. LDA #$22: c6 G  H% _- O6 u9 r
  1145. STA $BB
    9 n& A* z2 m+ C" F6 p' Z% Q

  1146.   L0 {4 @/ z7 w6 u- p, l6 D
  1147. ) t4 O& e5 f, ^3 F
  1148. JSR RG_PPU: g# w3 y- [9 g
  1149. JSR ENELOC_WRITE% H- N. G1 l! K4 K* c
  1150. LDX #$00
    " V1 m2 `* w6 G$ }( ?, _( G
  1151. LDA $07A2. ^( D1 W) V! ?& y! a4 u8 B/ u
  1152. AND #$08
    % d- V  \# I/ H8 f3 L
  1153. JSR ON_OFF_PPU
    * n; Z1 M2 y2 @* s) Y
  1154. LDX #$00& `" y5 S9 B/ B% M" t
  1155. LDA #$31
    7 @- V3 T1 {( L& h( m: H
  1156. STA $BA
    1 H* y& Y  Y# f. W
  1157. LDA #$22
    4 x" B' @! b! t& y$ b& s
  1158. STA $BB
    ( J' U$ }' r& _6 r3 ~2 t* ?
  1159. 7 r& k3 D# ?9 _4 q8 z/ P

  1160. . C. [2 W9 S7 L% ?
  1161. JSR RG_PPU
    , r" Q: {- e/ V: S5 Q3 ?. G
  1162. JSR ENELOC_WRITE3 t* V' R! M  o! L
  1163. LDX #$00
    . W! E1 L9 C+ I3 Z! B
  1164. LDA $07A3
    " O7 P+ r, @" V( j& v1 T
  1165. AND #$08
    ; s/ z0 ?+ ?4 F: @7 Q
  1166. JSR ON_OFF_PPU
    / F( X( O: V2 l. }9 J
  1167. RTS' I% ?3 ]# ~5 s3 Y' J/ L

  1168. $ Q1 A3 M, p3 I. d2 _* Q, x
  1169. FOCFUL_STRING:2 H2 u  p+ Q. M0 j9 _1 Q$ g
  1170. .BYTE $90,$99,$8D,$90,$9F,$96,$80& o' T7 z: H, y9 N0 T  Z( `
  1171. ' G: E7 B7 C/ [6 o2 X
  1172. / @/ b. v* N1 G* c2 {6 \" \% J
  1173. FOCFUL_WRITE:
    % W+ G- S. x7 q9 Q, W( e: I' O& R% ~
  1174. LDX #$00% H' g8 ?) B$ Z: \' i9 \
  1175. FOCFUL:( ^8 n% T2 B4 R. X. S9 H  p
  1176. JSR PPUADDR_PROCESS
    & K$ F" e' R5 i2 F. F: E
  1177. LDA FOCFUL_STRING,X
    . X# J, f5 v9 s  e2 {1 v
  1178. STA $2007# l/ _, K; _2 V) N; H) v+ [) Y  j
  1179. LDA #$00
    , W; B" d/ ~+ @; R$ v0 |" M, d
  1180. STA $2000
    & q# |* F" H& J5 @- I5 o: g( Y; E
  1181. INC $BA7 ~4 S( \: n0 ~+ O$ O0 p- ~
  1182. INX2 n1 o6 ~+ s( ?1 V. E
  1183. CPX #$07
    . o! Q+ q& a6 V  S3 s
  1184. BCC FOCFUL
    ' z! S, {) E* m5 I/ |' b, }6 k
  1185. RTS& C' q+ A# K$ y! g

  1186. - x; Q0 e8 b$ ]; F
  1187. FOCFUL_PPU:: u, C7 J8 x* w7 H* q
  1188. LDX #$005 r& |, O/ x" ^( k- F6 ^5 C3 t
  1189. LDA #$62
    ! Z. I" u) ~/ o( h% x# n' c
  1190. STA $BA
    7 {/ k+ z9 ^( u' X2 D
  1191. LDA #$221 A9 L  i  p: P* K# n, S( W! s
  1192. STA $BB
    & c5 c. F* q) V
  1193. 6 _3 t. \. V7 V% K0 j

  1194. " ?# z% s, O3 d) w$ E) H& d! i! d
  1195. JSR B_PPU
    % z, O9 I9 a( ^% Y: ~
  1196. JSR FOCFUL_WRITE
    3 r1 ]! ~2 t. m
  1197. LDX #$00
    3 _2 _4 V$ x0 ^# \
  1198. LDA $07A2
    ( f8 ]+ c( Q  Z% l# C+ ~) c
  1199. AND #$10: f+ c2 r4 F" l+ ^, ]8 C
  1200. JSR ON_OFF_PPU
    ( i  {! {- d' T: G/ \1 y, ?
  1201. LDX #$00
    9 X" \  U" B# Z! B  N( t( J# R
  1202. LDA #$71
    + b3 _: v0 e4 c
  1203. STA $BA) q6 c3 V2 m. i$ l2 I+ D4 E
  1204. LDA #$22
    : a1 v+ }2 }; V; Y8 J. e
  1205. STA $BB" U* a/ G; R6 F8 p; r; U

  1206. 1 @$ _7 H# {0 [( C5 E3 j
  1207. . u5 Y1 n6 C' z4 k. B
  1208. JSR B_PPU8 S5 Z0 m) j3 l/ \" V6 B
  1209. JSR FOCFUL_WRITE, h* [/ `- o: c) K/ U! u, q  }
  1210. LDX #$00
    / Z9 l1 o8 ]$ E# \; ^+ W/ B
  1211. LDA $07A3
    4 N4 L% W3 [5 @* a/ X  x; R8 j* j
  1212. AND #$10
    * Y4 f& r- F' b* b# s
  1213. JSR ON_OFF_PPU% q! j3 U. X1 y% B. Q" J# z$ N
  1214. RTS2 a# J/ H# J; f" ~# O9 |" [5 p& s+ k
  1215. ! P2 ]4 U0 k- j) n1 {
  1216. BULCON_STRING:. T+ y/ f; U- s  m
  1217. .BYTE $8C,$9F,$96,$8D,$99,$98,$80
    3 G& m/ Z0 \- d) f  l

  1218. ! i( k: W6 i1 N- t
  1219. ; `% X7 {! X3 O
  1220. BULCON_WRITE:
    / z0 }# r! t* X3 I
  1221. LDX #$00( E9 b" ^. @3 f& [5 k) l
  1222. BULCON:
    % M& r2 h0 ^; y8 L7 r, M' Q1 `
  1223. JSR PPUADDR_PROCESS# E+ B% O% @* B) f. o3 ~8 {' n, X
  1224. LDA BULCON_STRING,X/ i* [( E5 t1 y5 k8 ^) z2 K8 [; i9 Y
  1225. STA $2007
    9 i  J; V1 N+ ~! q, t/ r' }; l
  1226. LDA #$00
    / L$ C" I9 M8 n& ?5 h2 o1 R
  1227. STA $20005 _, k( i# Y# d( a0 ^+ G9 P7 L  s% H. z
  1228. INC $BA7 C0 r8 M: m) d1 Q6 S4 K( Q6 ]
  1229. INX
    : ~( i/ F* l2 [8 j2 S# l4 b
  1230. CPX #$07
    / u9 H! T' k6 S% G: A: x0 S, W
  1231. BCC BULCON
    ! K/ t( {) J& x& E
  1232. RTS+ n5 t7 q1 b& r2 O

  1233. 4 B( k; j6 p9 ^
  1234. BULCON_PPU:
      o" y( ]# T3 H5 I
  1235. LDX #$00
    ! y1 }9 Y' h! N/ Y, n5 b. I1 v
  1236. LDA #$62
    " I2 X) }8 B4 X9 m# W+ [- X
  1237. STA $BA
    $ l: S# |6 V/ g& E5 ^
  1238. LDA #$21
    & }! c: p: Q  |8 f2 ?; m( `
  1239. STA $BB
    : {( @: `7 o3 W* A: A. A

  1240. / m* f" K6 W8 r. i  D* j, e- _. i

  1241. , \% g$ M9 d# p
  1242. JSR UP_PPU$ u& K. m% k2 z0 S& J& m' z6 F
  1243. JSR BULCON_WRITE
    - |" _# `2 k! v& ~
  1244. LDX #$003 n; F% B8 i, X+ O$ I6 G! U' E
  1245. LDA $07A48 n- I4 C. B# F4 ]6 r
  1246. AND #$08
    3 X' m. A% @! y
  1247. JSR ON_OFF_PPU
    3 x% y2 k* a* c+ [. R4 \
  1248. LDX #$00
    , Y5 X5 D& [, G/ J3 U0 @% y
  1249. LDA #$71" e2 w" ?$ c/ R) J2 t
  1250. STA $BA8 e6 w! y: C" i/ J9 i9 z4 w
  1251. LDA #$215 |* P- w- x  x9 T1 a
  1252. STA $BB
    ( ?( P9 R; N/ F. v& O6 ?  N
  1253. ! S& L7 R# j" _1 o% {2 d
  1254. " A# R- ^* G, W/ v9 P$ T
  1255. JSR UP_PPU$ `  X; b7 d$ Z6 Y! t" t( f0 H
  1256. JSR BULCON_WRITE6 N3 o3 g' p+ {% W/ Z
  1257. LDX #$00
    8 q: @% F9 a% B9 R. K0 V
  1258. LDA $07A5* a4 j5 L3 `/ Z  K: s( |0 A. p
  1259. AND #$085 C1 p# w- n- [; ~
  1260. JSR ON_OFF_PPU
    / a6 R* X9 P3 |
  1261. RTS7 ^! ^, ?) ?5 i* A' o
  1262. ' n9 k8 A( p0 g# a) P8 r
  1263. SPEBUL_STRING:0 Y0 b5 E: Y1 f4 V6 T
  1264. .BYTE $9D,$9A,$8F,$8C,$9F,$96,$80
    , Y2 D* w$ }( i  {* V
  1265. 4 t! c8 f- n' ?% d+ U* s2 g# b) T
  1266. ' u. Z  _: R* e- G( _' z
  1267. SPEBUL_WRITE:
      E8 b: Q' j4 u4 M
  1268. LDX #$00
    , y* u* H1 t( {  V# g
  1269. SPEBUL:) B; j: x- w3 ?+ L* p- U6 c  [
  1270. JSR PPUADDR_PROCESS
      k+ [6 J( d; r' n' p. M
  1271. LDA SPEBUL_STRING,X
    : B% C3 @: w+ r2 n, v- J
  1272. STA $2007( \$ R- X8 I" Y- f# K
  1273. LDA #$00
    ) n) B! Y9 S2 Z: `+ J, K% _
  1274. STA $2000
    4 Q6 i  W) H+ c6 k2 k2 o- A4 O  K4 d
  1275. INC $BA
    9 n. T$ `! b1 Y/ g+ q" M
  1276. INX
    ! e/ S0 l. D# e7 A- F; }
  1277. CPX #$07
    9 s; i; _0 E- h; Y
  1278. BCC SPEBUL
    ; Y; Z' Z( p" F; W
  1279. RTS
    , e0 J& p& M2 q3 z. z8 x
  1280. ) x+ i! @; l1 b9 C
  1281. SPEBUL_PPU:
    ( ?3 O) `  ]8 }/ {
  1282. LDX #$00
    3 N$ e" c3 A# a- p, y) ^
  1283. LDA #$A2
    6 _$ O5 q  K) T* D+ k. T5 t4 s5 I0 y
  1284. STA $BA: F) x4 J( \" t/ l8 g1 P
  1285. LDA #$21# A/ j2 D' M" Z
  1286. STA $BB- J: `; g0 c7 q) w

  1287. . |0 W( r# R9 D5 z) q8 i0 O

  1288.   k' z; i0 x7 V9 |
  1289. JSR DN_PPU
    ! _1 C8 C. ~0 F/ B. F
  1290. JSR SPEBUL_WRITE7 i- M+ V; z4 F" R
  1291. LDX #$003 [& }( {4 t% ?% j( Z$ v; r
  1292. LDA $07A4
    , N2 `6 C; M& @0 \1 w2 h
  1293. AND #$02. J3 \, }! T# D! t0 x
  1294. JSR ON_OFF_PPU
    / h% [, `# F$ x! G5 b2 q* Q* W
  1295. LDX #$00
    % \/ |( _1 ~. S/ ~8 @! z" {
  1296. LDA #$B16 ^2 M7 o0 P* ~+ H: W
  1297. STA $BA
    $ |6 A$ P) {" o3 w- M4 w7 ^
  1298. LDA #$21' ?: g4 X* J1 f) M
  1299. STA $BB; B/ C3 t( K4 Z/ s4 ?( }3 |

  1300. 9 Q' Y2 r+ o* z) P! i
  1301. ; I+ H9 b/ F# B3 }: d' s
  1302. JSR DN_PPU
    $ B1 |8 S* Y4 X7 |+ P( n$ j7 j
  1303. JSR SPEBUL_WRITE2 B9 H5 I& y- o2 p
  1304. LDX #$00
    . W6 A  Z4 g- b+ z0 n
  1305. LDA $07A5
    1 G$ d* u1 p. d# s) Q. \
  1306. AND #$02& F  n9 E; S; Z. F* N; o: @
  1307. JSR ON_OFF_PPU3 W$ y( s, R$ k4 u8 X- n# Y, J; b
  1308. RTS
    0 w7 ~3 r" b4 D/ Y5 D4 a, f( H0 W

  1309. 6 ]0 j% B2 I+ W: {" ^
  1310. .ORG $A500% s! S# |8 ^- @3 X
  1311. CLEALL_STRING:4 Z& x' V( x0 [. ]3 C
  1312. .BYTE $8D,$96,$8F,$8B,$96,$96,$80
    & I+ p& |) d" [( u) ^( m) p

  1313. + m7 K$ o2 p( C0 H5 V" r: h
  1314. $ k. _* h. T4 @& ~/ ~
  1315. CLEALL_WRITE:. P. a+ B& i' B& y& d
  1316. LDX #$003 {: }" N" }3 @, v+ v' |
  1317. CLEALL:
    4 N& H3 U+ M8 ~& m
  1318. JSR PPUADDR_PROCESS
    7 Y; e- V5 ^  [6 b. N+ \; M2 M
  1319. LDA CLEALL_STRING,X
    7 h! ]# K! m, L' b# g
  1320. STA $2007
    6 I6 u) `/ E3 _) t
  1321. LDA #$00
    4 o7 c- Y3 ^4 E& M' S- h: o$ y
  1322. STA $20005 z' c7 f) _1 w$ g
  1323. INC $BA+ E* s- M9 B7 E6 b/ i! ]; v
  1324. INX
    ( X# N4 j$ V9 |4 }- W& s: H
  1325. CPX #$07& H9 z. I+ _) v, U$ e( G: |
  1326. BCC CLEALL) @, }6 D( W; s$ \0 F" D
  1327. RTS% e' G2 \* Y/ l0 p6 P$ M$ {( K5 R/ ~
  1328. 5 S+ M* R5 ?! L- ]2 y$ f& A
  1329. CLEALL_PPU:
    ; q5 t2 L$ N9 _' s5 O6 V/ v1 h
  1330. LDX #$00
    ; |  H* R5 |1 ?% q, y8 k! j
  1331. LDA #$E2/ C% r9 V0 q7 y6 v
  1332. STA $BA
    4 J: v7 P+ ~; v: ~
  1333. LDA #$21& @2 j/ L' q4 m$ A. ^4 j8 C  I
  1334. STA $BB
    * J" y: b8 i0 p

  1335. + Y% y6 \& _5 V, Z/ U
  1336. 9 Y' x# P8 P( Y7 O
  1337. JSR LF_PPU
    ' r- t- F7 Z% |0 s0 b3 U5 f
  1338. JSR CLEALL_WRITE3 h' p9 ~9 |3 |3 t
  1339. LDX #$007 j9 u# [4 r# m1 ]
  1340. LDA $07A4/ l" o0 m# Q  A
  1341. AND #$04
    $ l0 b* s5 T2 U) y/ s
  1342. JSR ON_OFF_PPU6 F3 m% }- y; l: @* P
  1343. LDX #$00; ^! V% j5 s$ ?0 c. }& G1 K
  1344. LDA #$F1! D4 t( w* h; a+ Q
  1345. STA $BA
    / K. w" Y: ]5 s0 ~  O- z
  1346. LDA #$21
    , U9 L( n; b+ [3 `" l
  1347. STA $BB6 b8 z6 C' x' p# s' I) N% _

  1348. 0 r+ z) y( N# ]3 Z" c
  1349. % [) d3 R. X' Y3 m% w
  1350. JSR LF_PPU; t8 ?) N  o3 T) T
  1351. JSR CLEALL_WRITE
    1 }  I1 i5 Z" ^3 n; v6 L2 K5 L' J
  1352. LDX #$00
    : g- S% S3 ?' C- t
  1353. LDA $07A5
    - l$ D3 s3 O( w4 V6 |! S
  1354. AND #$04
    4 }# `2 c4 E& n
  1355. JSR ON_OFF_PPU
    0 w9 g, R  F* J8 o3 x" M
  1356. RTS
    " z9 }' A$ W( c# b! p# L+ q2 N

  1357. 7 u6 m, {( M/ i, I. M
  1358. HARDMODE_STRING:
    8 V) Y) H: k$ L1 E! @' m/ ~0 ~
  1359. .BYTE $92,$8B,$8E,$97,$99,$8E,$80$ q( w' A1 m; B, G

  1360. & ~- b: n) n# B9 d- ~
  1361. ' @7 P9 o* u2 c  h, N$ s! l8 O
  1362. HARDMODE_WRITE:
    ( E1 G' r2 a: G% E' q8 _) _
  1363. LDX #$00
    $ E( z4 n: G4 w4 Y$ }
  1364. HARDMODE:
    - R1 v$ L( A2 g; u; y
  1365. JSR PPUADDR_PROCESS
    - G) ~: T9 @& r' ^- {
  1366. LDA HARDMODE_STRING,X% B2 I& ~$ ]' G# ^  s& m; \& d9 }6 r
  1367. STA $2007
    ; k2 s  Z% f- u% _
  1368. LDA #$00
    . O1 @# Y" j3 |
  1369. STA $2000
    2 S9 l/ K" M# \  s
  1370. INC $BA' Q/ V( g& ]9 Q, ]
  1371. INX
    ' f! ^! \0 X# k1 L  F
  1372. CPX #$07
    0 e5 B  n0 R/ |# p  o" T7 d5 ^, ~
  1373. BCC HARDMODE! ~! ?2 y( j" b1 Z6 ~- s, F
  1374. RTS
    % {/ u# F! |4 E) u6 P/ k4 g

  1375. . ?+ s  }, B2 ?9 X/ Y
  1376. HARDMODE_PPU:& l+ J7 q* Q; O3 P
  1377. LDX #$00. Z* Y# v! y) h+ K
  1378. LDA #$22
    + J: C5 j7 S5 z$ r) u, \& ^
  1379. STA $BA# }3 l3 r9 F- O* ?' i
  1380. LDA #$22
    6 K+ {7 {9 ]0 p! R, N
  1381. STA $BB  c- c% [' v$ c
  1382. JSR RG_PPU% ^! Z' X! x* F7 y2 i
  1383. JSR HARDMODE_WRITE
    * @5 `; g, ~' N( N
  1384. LDX #$00
    1 Q" s4 u0 T6 q, O
  1385. LDA $07A4! H0 [4 J, D7 D! v. X+ W
  1386. AND #$01
    " _; D* M' l8 n, b2 H$ N. h1 O
  1387. JSR ON_OFF_PPU
    6 n, l; `  Z4 i/ d% g, B+ p! S
  1388. LDX #$009 f4 A$ L. G# c9 M1 m
  1389. LDA #$310 p3 R6 [/ I/ c( q$ @. n
  1390. STA $BA2 F+ y( x  o$ V* N  ^
  1391. LDA #$22
    % C  p' D0 _6 k) _. z
  1392. STA $BB
    . S. t* F9 m' {* Q  I

  1393. 1 T1 M7 T' g; k' n0 I
  1394. . H" `9 {5 Q8 f5 b5 |& C
  1395. JSR RG_PPU
    6 L( M/ i% g* l5 y/ t
  1396. JSR HARDMODE_WRITE/ L- s5 C8 z' P$ K0 H, ?
  1397. LDX #$00/ v+ N: v5 \) a' ?# f# e5 R
  1398. LDA $07A5. {/ ~4 o: J8 b; w8 v
  1399. AND #$01& _1 T( y# T; v  X
  1400. JSR ON_OFF_PPU& L. _  H+ O7 [/ b1 k" ]# P  j
  1401. RTS& C$ D; j6 q) P# i. `' i

  1402. $ r$ O  [. q4 Y
  1403. B_TO_JMPSTG_STRING:+ P4 M# Z( v" ]! C
  1404. .BYTE $80,$8C,$80,$9E,$99,$80,$94,$97,$9A,$9D,$9E,$91,$80
    8 y; s2 Q" w9 Z0 j* m

  1405. 7 n+ X8 k" k5 g- E/ D# w0 u

  1406. 2 e0 h& M' s  r# g& ?5 S3 Q
  1407. B_TO_JMPSTG_WRITE:. i2 c6 S# g5 z; k, p0 B; B
  1408. LDX #$00
    " X8 p+ Y: U0 h+ u# S
  1409. B_TO_JMPSTG:
    , s3 z" n. d* M2 Y
  1410. JSR PPUADDR_PROCESS
    # [; C- L! ?! O7 b# _
  1411. LDA B_TO_JMPSTG_STRING,X
    7 p! Q  n* ^3 [3 b1 s
  1412. STA $2007
    9 i2 l( g9 P  ?% h# t% A( [" o
  1413. LDA #$00) C, R5 L( L1 u$ a# x* E. {. r! E
  1414. STA $2000
    . _6 u: E% I0 z  t
  1415. INC $BA# M2 i0 c9 c9 z- O& V5 h
  1416. INX
      k, j& p1 P  R* {
  1417. CPX #$0D# q9 j* N/ A6 Q9 J
  1418. BCC B_TO_JMPSTG% L% X$ A# g5 o2 t
  1419. LDX #$009 Q3 h% i2 J0 ]
  1420. LDA $7FE05 {+ A; T1 y! Y2 c0 w/ y$ N3 i
  1421. JSR ON_OFF_PPU, v. j2 \- d, h' S9 [
  1422. RTS
    , w/ _3 g$ I: z, z5 e
  1423. ' c0 b: t2 Y0 U% n
  1424. B_TO_JMPSTG_PPU:
    , w. Y( I+ L* {, A- ^, x! O
  1425. LDX #$00
    8 J8 k6 X6 Y* A7 \. G) T
  1426. LDA #$68
    8 h, {" N1 K* i/ J* k' w8 t
  1427. STA $BA
    # l4 v) e4 [8 u5 L9 G* H% `- _
  1428. LDA #$220 q+ p. _, X- p3 G6 m: M, n
  1429. STA $BB' y: l- j. |$ h( g
  1430. JSR B_TO_JMPSTG_WRITE
    * i  D6 {, D- J8 U9 K
  1431. RTS
    ; e) _0 _$ g* v# p( k: [& N

  1432. ! w1 h+ P; ]2 H0 T" X! T7 a/ @
  1433. , o3 }. H9 y$ n- r7 V6 D% o: W
  1434. A_TO_PLAMOD_STRING:- G5 a* T6 t% k  V9 ?
  1435. .BYTE $80,$8B,$80,$9E,$99,$80,$9A,$96,$8B,$97,$99,$8E,$80" _8 K/ G/ g' o4 A/ c: o
  1436. ; q8 E% }4 f- P9 _
  1437. $ b9 a3 H8 x  A- F+ T+ N
  1438. A_TO_PLAMOD_WRITE:4 R- ~  x; j" d- E
  1439. LDX #$00
    - |4 t" V6 I: s/ x+ Q
  1440. A_TO_PLAMOD:
    6 r" a3 r+ ]0 t. l3 e8 W
  1441. JSR PPUADDR_PROCESS
    . e' G9 `; B8 F: @7 X
  1442. LDA A_TO_PLAMOD_STRING,X7 k9 J4 T9 V  h& g" h
  1443. STA $2007( k) b7 @, I6 N+ r6 ?) @2 s
  1444. LDA #$00! o* R0 @( l( U% O5 N
  1445. STA $2000
    1 ?, j- i1 q: b" g6 G
  1446. INC $BA4 P. y( [( A. P- J
  1447. INX
    / \+ z  \  d( |% B: a( ?
  1448. CPX #$0D2 F. [7 ], N# Z( `  A& Q( K7 k. {; q
  1449. BCC A_TO_PLAMOD& l7 `: A- @7 m6 s
  1450. LDX #$005 i" o& f/ K0 U5 p# V
  1451. LDA $39$ @- X: Q  r# n  O6 Z
  1452. JSR ONE_TWO_PPU3 {: N* a( f. P+ g
  1453. RTS
      R# @7 B" l5 `& U/ J* z# u

  1454. 3 @; J# V8 a; W: I
  1455. A_TO_PLAMOD_PPU:
    : S2 ^- |/ s6 T1 i) \! d1 {
  1456. LDX #$00
    # u" e' i% Y) o0 M; m" y
  1457. LDA #$A8
    5 T1 ^1 |/ r* L
  1458. STA $BA0 M# I( h4 c; C0 N- b
  1459. LDA #$223 ~7 X' @5 q0 ^- ~3 j+ y
  1460. STA $BB
    % K9 a5 T/ P; T7 I. A" K8 K
  1461. JSR A_TO_PLAMOD_WRITE+ ?/ Q( V4 q7 s% |' B5 y; j
  1462. RTS0 Y0 Q+ c9 J1 w7 l9 s: U

  1463. . O( y- Q: V9 [" n9 q. h; G- L7 V
  1464. MOVSPE_STRING:
    * ?- P  \, M1 u7 z8 s+ j
  1465. .BYTE $97,$99,$A0,$9D,$9A,$8F,$802 o$ Z. X% q# n! v* H
  1466. 4 e% u9 g! B( M: K+ F# L! J

  1467. 8 b6 E% h" m5 U, h, }4 h) D9 }
  1468. MOVSPE_WRITE:
    4 ?9 q' J: ]) j* b
  1469. LDX #$00
    , \8 s$ L# o& D# }& o* o" G8 @3 M
  1470. MOVSPE:4 g8 J; W9 w0 B. x0 g
  1471. JSR PPUADDR_PROCESS
    . I, K3 D$ A8 d( r9 N) i9 P+ I  r
  1472. LDA MOVSPE_STRING,X! M1 g/ u2 R* r) g' u
  1473. STA $2007
    % S  I0 x7 _9 t/ I. z8 ^  l1 p1 @
  1474. LDA #$00$ e& f% Y3 s  {4 [
  1475. STA $2000' |" ?, m/ T( X! J& G  y( r' U
  1476. INC $BA6 M2 Y" c; {, n1 a+ G
  1477. INX% O) y7 P6 }9 Z; C3 y+ s0 T
  1478. CPX #$07
    7 q' k5 \, F2 N: b) v( c# u& v* N$ e
  1479. BCC MOVSPE& G4 x4 S$ \- Z
  1480. RTS8 e0 ?# d  r8 |5 ?2 T$ f
  1481. " m  \* R- U1 L' d, u
  1482. MOVSPE_PPU:
    9 E4 C$ t9 D8 e- y6 \8 w
  1483. LDX #$00
    # }9 S' |# _+ b% B; k1 ~+ z
  1484. LDA #$69, p9 R  d9 Y$ l
  1485. STA $BA
    5 v3 D$ b2 Y* ]6 P7 {5 T
  1486. LDA #$21" g' j8 t  [! P7 A  ^
  1487. STA $BB4 v+ l5 S8 H& k/ s

  1488. % u5 s. R* O+ S& \3 U4 q
  1489. ) y6 c/ @- p+ m3 J" z
  1490. JSR UP_PPU! f. M0 t/ M+ |. i3 _
  1491. JSR MOVSPE_WRITE  u: T; t2 c4 N7 Y1 a; c
  1492. LDX #$00
      S" l2 N$ Y* s  L. D6 h! c
  1493. LDA $079F$ m$ C7 i# L0 ]. X, m8 n
  1494. AND #$08( E4 f+ _( {; F5 |8 k; A) e" V
  1495. JSR ON_OFF_PPU  p# X! B% n) O
  1496. LDA #$80
    # _% N$ O6 S. ?5 k  i) [% u
  1497. STA $2007  }) L" d. A5 @
  1498. RTS
    6 [7 M, H- b6 g4 S, u$ S. [
  1499. 5 Z( E0 S  G- C9 i0 j& U' J5 B% y% H
  1500.   
    ! a* G3 o0 ~4 S/ x9 Q
  1501. UNLJMP_STRING:  l! x  k$ n* Z: `3 [: a
  1502. .BYTE $9F,$98,$96,$94,$97,$9A,$803 L- T4 F( z( g* e! O& ]. G
  1503. % x  c6 P3 A* x3 }, _& m

  1504. 8 b7 [' a7 q/ q5 ~/ g  {
  1505. UNLJMP_WRITE:. Z/ U* s- e' r7 W6 y
  1506. LDX #$00* N1 N0 ]4 |0 n( p0 o
  1507. UNLJMP:0 W  T# I! B+ I1 a2 z/ }; Y/ K
  1508. JSR PPUADDR_PROCESS
    $ k4 j/ y! V, [  @! o* n2 Y3 \% t
  1509. LDA UNLJMP_STRING,X$ t, j4 R; ^1 T( W! l9 d7 `' S2 O
  1510. STA $2007
    4 C2 ?7 d. C9 b+ a9 a# w
  1511. LDA #$004 K& i0 n& i6 l" w' @
  1512. STA $2000
      H# J2 Y3 V( d5 i: ?1 N$ W* B( v, g1 v
  1513. INC $BA  Q. k7 r& r, K
  1514. INX
      m* t$ M. S, [
  1515. CPX #$07
    8 U& K% h# w. G, y( r4 Y0 {& J
  1516. BCC UNLJMP  j- W/ a; j+ E: w3 P
  1517. RTS
    5 B! P& r) a" [& ~9 H
  1518. ; p/ w$ h, F' o
  1519. UNLJMP_PPU:/ V6 j+ b7 ~* y4 Y6 b! n( v0 U
  1520. LDX #$00. f2 W3 n. B8 `5 V, y! t2 p$ I  ]5 T) L
  1521. LDA #$A9% S3 g9 t* w: S# D# U0 X
  1522. STA $BA
    & y; \5 v( P1 v( A% S7 R
  1523. LDA #$21
    + x' C8 g5 E( u: K7 h, z
  1524. STA $BB
      k$ b' |/ Z# N& x  k) I

  1525. 5 h- g8 H" n% o( }7 o

  1526. 5 W7 z+ m0 ^/ p( L6 g7 X; l( n
  1527. JSR DN_PPU
    * i& e2 V/ G0 v* x: V5 ?  Z1 d
  1528. JSR UNLJMP_WRITE8 L2 a. g, G; I. O
  1529. LDX #$00
    . G6 E  K$ ^' u: ~. I
  1530. LDA $079F
    : k; k+ G4 m" D! e! R$ [6 j
  1531. AND #$04& p8 I) f! h) Y/ S' j# o
  1532. JSR ON_OFF_PPU
    5 r" h' \# u, @2 x8 |9 Z
  1533. RTS3 G+ \% j  Q& D5 A# y! E2 f
  1534. + N& ?- G- K; R' Z% O( E5 t3 }
  1535. ' l1 _( E# f+ |4 X
  1536. DESTRO_STRING:
    / a& w  O4 M5 D) U- f0 Z# e
  1537. .BYTE $8E,$8F,$9D,$9E,$9C,$99,$80
    $ e0 H- Q$ @; u0 I2 G! i; L3 z% q& `

  1538. 1 g  x" ^3 |- V! J

  1539. ) n+ c( h! l8 A2 a( I& q( @8 ~, Z
  1540. DESTRO_WRITE:
    1 U, _$ [% n% B8 V& E) w
  1541. LDX #$00
      j3 M0 I5 D: ^
  1542. DESTRO:& T& u, k+ `- l3 F9 w: A
  1543. JSR PPUADDR_PROCESS
    # Q5 L4 H. _( j! }
  1544. LDA DESTRO_STRING,X6 {; w- \( D: t+ Z1 k3 x2 w
  1545. STA $2007
    4 t2 n- P9 v' C( A: t
  1546. LDA #$00
    1 Z, _: |% C$ \# w1 C: `
  1547. STA $2000
    * J0 `5 b/ l, Q% U1 j
  1548. INC $BA/ s  s2 B' v* {' i* `
  1549. INX$ P( g9 ?' D. R  _) T0 d
  1550. CPX #$07
    ! Y. J# j' ]9 M+ I( F) `: ~6 Q
  1551. BCC DESTRO+ Y, S, i0 z, V! N2 a5 v0 G
  1552. RTS: L0 G* W1 B4 X# B
  1553. # Q7 _+ L* T$ h) I
  1554. DESTRO_PPU:/ [4 B" k: f: U' a, B' c! i  g+ N
  1555. LDX #$00* c+ P3 l2 ^' Q  ~( @6 h! }
  1556. LDA #$E9( f( E, S% f" e1 R* [) K
  1557. STA $BA  T0 g0 @! L; }. c) N) d
  1558. LDA #$21# `; ]4 f' o# I( S7 C! V1 U
  1559. STA $BB& Q: f3 O: _3 E; X$ G: X

  1560. # }2 r+ U$ I7 y7 X2 I. ?6 B
  1561. : @7 r' s' A. d, r
  1562. JSR B_PPU! K' W  w1 z  P) c! n& o9 _
  1563. JSR DESTRO_WRITE: ?% [5 w$ I; Q: L$ l& g
  1564. LDX #$00# `+ x% X6 `: s8 D
  1565. LDA $079F
    ; C1 x4 B% O9 D4 r6 @  y* }- D& b  T
  1566. AND #$401 }8 V% K1 x" t4 @
  1567. JSR ON_OFF_PPU
    2 v: x- |& H1 w8 J/ T
  1568. RTS
    . q+ h+ S8 P) a  i/ D
  1569. " N  ~% F- J, c6 U! R* a' b1 D
  1570. % g; U3 o# I" H9 h+ h, R3 H
  1571. EQUBUL_STRING:9 W2 S' ^: S, |
  1572. .BYTE $8F,$9B,$9F,$8C,$9F,$96,$80
    4 ]! ^3 Z* {- L. F7 A

  1573. ( h2 g" c+ k) z6 }
  1574. ) [5 o8 T& |2 Q) S& Q3 Y; }
  1575. EQUBUL_WRITE:
    5 ?$ L. `. {! ~% N
  1576. LDX #$00
    ' h3 Y' z5 j6 D2 T
  1577. EQUBUL:
    * P) |1 Z, H+ k( a
  1578. JSR PPUADDR_PROCESS9 ^& B; `% @7 H, t' U% ~3 Q
  1579. LDA EQUBUL_STRING,X; ?4 Q" r6 K9 T- Z8 i
  1580. STA $2007
    $ `5 F/ a. [" P# P$ {. @3 N$ G; X
  1581. LDA #$00
    4 j3 D2 W  Z3 [1 q$ y4 ~$ h: P7 z7 {
  1582. STA $2000  E9 n; l: e5 x% e3 I' j# x
  1583. INC $BA
    ! \9 j, _  C8 G* V; m
  1584. INX
    1 I! f7 x' p, }$ g6 o
  1585. CPX #$078 d% L, O; ~% }. m
  1586. BCC EQUBUL+ w+ m1 G, L# q' o$ e- @
  1587. RTS0 Z8 J1 f9 b1 V) I, A( r: {$ x' v
  1588. * v# U5 L  n6 s0 ^# L6 |* ?
  1589. EQUBUL_PPU:
    7 o1 v: \' n# k  `
  1590. LDX #$00: v; @! W/ q2 |+ i; K4 \
  1591. LDA #$29% s- C  k. r/ X" C- t
  1592. STA $BA6 ]% T8 @) W3 j" k
  1593. LDA #$22
    ; \% O0 r& x' e
  1594. STA $BB9 `$ a$ q% H: V  S( m  `" ~# D

  1595. 4 z0 b3 Q/ n- }# e
  1596. # A) D' i; Y$ k* [
  1597. JSR A_PPU
    % O) ?5 `" J6 |1 E
  1598. JSR EQUBUL_WRITE
      |$ u) z+ V  u
  1599. LDX #$00
    1 r" s& k  Y  e, h& T0 c# j# `
  1600. LDA $079F% B" D. U/ b1 }3 U/ F. `
  1601. AND #$807 ]& ^+ A$ l: s. c
  1602. JSR ON_OFF_PPU; Z; ]2 n8 ?: J6 U4 g3 r
  1603. RTS
    . k! o2 M) }: ?# }

  1604.   C( [/ b( g3 s, _+ P; \* n1 x

  1605. ( X( h4 S. x# I
  1606. + u0 K+ |$ Q3 [
  1607. BULSEL_UP_STRING:
    ; S8 Y; U4 H2 I7 u! g
  1608. .BYTE $9F,$9A,$80,$9E,$99,$80,$9D,$9D,$801 p: m8 J4 t5 G# Z  ~0 ?

  1609. " g7 \2 @$ F2 R5 @
  1610. BULSEL_DN_STRING:: G, {7 Y* i( W; m2 E
  1611. .BYTE $8E,$98,$80,$9E,$99,$80,$9D,$96,$80
      G8 {  E3 c8 I# b9 Z

  1612. $ [% L8 ]' g! p8 _' S9 S' z
  1613. BULSEL_LF_STRING:
    4 S8 Q5 h& f% `1 r
  1614. .BYTE $96,$90,$80,$9E,$99,$80,$9D,$97,$80
    $ z1 T5 x% O) u! u

  1615. 2 c  p6 L4 r6 k( Z) _
  1616. BULSEL_RG_STRING:; ]1 y6 o4 a% X2 |6 n; G  \8 Q2 _
  1617. .BYTE $9C,$91,$80,$9E,$99,$80,$9D,$90,$80
    $ E! s6 E7 n- l# G- v

  1618.   u7 q1 @! z* _$ Q! T
  1619. BULSEL_B_STRING:! p- R8 R/ C1 ^7 B8 s7 o
  1620. .BYTE $80,$8C,$80,$9E,$99,$80,$9D,$98,$80
    - J4 z6 S( i2 R2 R5 }

  1621. 7 S( R5 t9 ?% k
  1622. BULSEL_A_STRING:& [+ |! P- U$ z4 `! H- j
  1623. .BYTE $80,$8B,$80,$9E,$99,$80,$8D,$99,$97,$97,$99,$98,$80,$9D,$9A,$8F,$8F,$8E
    6 ?# u  y. {4 ]4 S! |
  1624. 5 ]6 I% ^1 ^4 ^9 Q
  1625. * P! a0 j: [# o* M4 o
  1626. BULSEL_UP_WRITE:
    / S, Z4 Z! c, F  |  ~$ z
  1627. LDX #$00
    4 S, }+ Q4 S4 b* j- `
  1628. BULSEL_UP:
    ; o( L) `" x  ^+ O* X
  1629. JSR PPUADDR_PROCESS: W, \2 j, a# }; u  C
  1630. LDA BULSEL_UP_STRING,X
    " ^6 i1 B% b; G% B, ~9 Q; I
  1631. STA $2007
    6 L# @8 J+ v" l+ w  |
  1632. LDA #$00
    . q$ v( x# E' o
  1633. STA $2000
    9 \/ o; ]* k0 _$ \; F2 \
  1634. INC $BA; m$ _( e* i& Y4 _; p9 g# R
  1635. INX4 l# W( _; e4 E. B& x( u/ w& V
  1636. CPX #$09) A- N% a5 N/ y/ b! H2 F/ g
  1637. BCC BULSEL_UP: B" O' f( X: T
  1638. RTS6 b. U! w0 m$ {7 }0 w% i
  1639. BULSEL_DN_WRITE:
    ' U, g0 o1 s4 A, n5 W5 ]
  1640. LDX #$006 R$ Q* g8 D6 z- J' |
  1641. BULSEL_DN:
    : J4 q) n& f3 ~' v
  1642. JSR PPUADDR_PROCESS
    7 z, y8 P( @  P8 X3 x+ Q. x
  1643. LDA BULSEL_DN_STRING,X
    : }/ {( n( ?& f6 G) j
  1644. STA $2007
    2 t+ E% i4 |* F, p, r/ A! l
  1645. LDA #$00! J, \, R% U5 ]1 B0 \9 U% L' `- E
  1646. STA $20005 w7 M4 m# L3 F) g( ~( U- p) ^
  1647. INC $BA
    5 k7 F7 w/ n1 n4 O: E
  1648. INX
    ; {4 o( g& J, ?& \
  1649. CPX #$09
    9 v7 k! ]4 M" Q
  1650. BCC BULSEL_DN
    # G* r* w" e  t' b
  1651. RTS
    - A( b0 e8 T4 {5 k( U" s
  1652. BULSEL_LF_WRITE:
    & v3 e' S  J* K- R" l7 b) b6 w. C
  1653. LDX #$00
    ! c3 d! e2 R# n# A2 ]: L
  1654. BULSEL_LF:
    % s: t# k' D1 b* V9 E2 d
  1655. JSR PPUADDR_PROCESS' ^- T1 T, {. \, a% N( {3 ?/ B
  1656. LDA BULSEL_LF_STRING,X
    8 E- b7 t. T* V5 N" R6 s) ?, [3 l% Q6 f. B
  1657. STA $2007
    8 H6 k" a6 `' K% R; n# R
  1658. LDA #$00
    2 y5 G) `! E3 ?% V
  1659. STA $20008 `0 l9 b2 P1 `! X' _9 |
  1660. INC $BA) q& u. A) r. w- {+ q0 t1 p
  1661. INX
    # I1 P3 a% }7 b( \' U3 A9 k
  1662. CPX #$091 [- P, u/ H# T, w$ Q) y1 n6 R$ ]: k
  1663. BCC BULSEL_LF: w3 i' y! M  _$ P" ?; u2 C; [
  1664. RTS
    # L+ ~' B7 L9 q$ e- L/ G
  1665. BULSEL_RG_WRITE:) P. ?8 f6 s7 G1 d6 v6 O8 L( _0 n/ A
  1666. LDX #$00
    5 S' K8 g( U  d( s" h3 N) m3 M; M' T0 g
  1667. BULSEL_RG:
    6 ?5 I3 D8 i4 ^( n( q$ J3 M
  1668. JSR PPUADDR_PROCESS
    ( }1 ]$ x) Q5 M5 s/ r- x6 D6 p
  1669. LDA BULSEL_RG_STRING,X: E' c0 T1 d' H! [
  1670. STA $2007+ R- A; Z- x) G7 t) a
  1671. LDA #$00( ~  P( O/ q1 B( B; u. i
  1672. STA $20002 ?+ L+ y* A8 Z2 C" I  D4 m
  1673. INC $BA/ c. h  y' E% z/ w, I9 k4 |7 Q# M7 n
  1674. INX
    3 h7 d( i+ M7 v- \3 N& [! I8 l0 Q
  1675. CPX #$09. ~4 D4 ?& q, p( ^9 c
  1676. BCC BULSEL_RG
    ( c0 k. I0 W, ?- B1 j, r
  1677. RTS
    0 u$ c2 O8 _, J/ V8 z
  1678. BULSEL_B_WRITE:9 V7 G7 V& f5 r) g
  1679. LDX #$00
    8 J/ P, @4 Q# t7 b0 i  n: J
  1680. BULSEL_B:4 F( Y# L6 m. U$ x/ |% v0 N3 {( f  [
  1681. JSR PPUADDR_PROCESS
    2 M! W2 t: Q1 a0 c8 y" G2 J
  1682. LDA BULSEL_B_STRING,X3 ~& `/ E8 U9 F& g) X# i
  1683. STA $20079 Q. j- F" s' t% x7 @3 R6 e
  1684. LDA #$00
    # x3 ^" z/ ^5 u4 Y" v% Z, _' T
  1685. STA $2000
    % D! F+ f; E8 e; f( i( T
  1686. INC $BA, [! b) j- ?* L3 k
  1687. INX8 U8 i$ t- j% E3 D, Q
  1688. CPX #$09
    3 u; z* |: h  \
  1689. BCC BULSEL_B7 t, N& E, H6 T5 Y/ H. w" ]3 r
  1690. RTS
    # h2 x) Y8 y8 j0 m% \, M
  1691. BULSEL_A_WRITE:) j9 X6 U! |' b, K. D
  1692. LDX #$00
    " [1 e  G, t5 C
  1693. BULSEL_A:4 _$ R$ N2 ~# e4 n3 j+ `& G- X' y
  1694. JSR PPUADDR_PROCESS* J0 I5 e, d( k$ }8 h& k1 F# R
  1695. LDA BULSEL_A_STRING,X
    & H7 L$ v% d$ h, ?- ~
  1696. STA $2007
    - b% q$ u% W& e0 T
  1697. LDA #$00' ^4 j3 r0 A- [  J) H0 M6 ?" \/ u" n
  1698. STA $2000
    % g$ p. h9 J8 @% L! n+ r
  1699. INC $BA
    ) p* I% l2 I" a) W
  1700. INX
    7 V0 R3 e: d0 l1 D8 J
  1701. CPX #$12
    ; Z7 T8 {  \4 S8 X2 W0 m
  1702. BCC BULSEL_A. f! ?0 {7 |8 O) [2 n  S3 O
  1703. RTS8 d" O' p! s+ m
  1704. : \$ o7 q$ C1 E7 s
  1705. + i7 h$ f( f- I5 G# X% |
  1706. 8 K/ f% o* U8 |
  1707. BULSEL_PPU:/ w1 |+ p3 o1 h* l8 V6 d% h
  1708. LDA #$6C
    & ~# P2 B' S2 L, e8 k% |' B
  1709. STA $BA
    9 v/ ?4 s. T+ ?6 y  r- ]
  1710. LDA #$21
    & {5 X" X! I! o8 l, C1 J
  1711. STA $BB
    8 ?( v- b( _9 N, v
  1712. JSR BULSEL_UP_WRITE
    # x- x6 q4 K/ s
  1713. # R8 V  x, }4 x
  1714. LDA #$AC
    8 z$ ~; w% }; H' R, s3 K
  1715. STA $BA. `& y  N$ r7 f) a
  1716. LDA #$215 F6 l: E9 ]1 t* c
  1717. STA $BB
    : v! S2 n* K, r# C
  1718. JSR BULSEL_DN_WRITE3 N: I; M6 m. K; S0 S3 P

  1719. * D& ?. B; {+ N- M; K
  1720. LDA #$EC, Y/ U5 k0 L* V8 O& j1 b! y- w; {# g
  1721. STA $BA
    ! d! c0 g- i3 E7 _6 Q2 L* }" A
  1722. LDA #$21
    # M: L* o3 E+ _  K1 W0 X
  1723. STA $BB" }6 r% c, [& n, I
  1724. JSR BULSEL_LF_WRITE
    . l  ]4 o6 L4 d+ }

  1725. ) R( |$ |) n! \% x6 m9 i. t& q
  1726. LDA #$2C
      S; U8 K6 T- u
  1727. STA $BA
    # F9 f( m# {+ Q& Z9 S1 Z/ U" H! S
  1728. LDA #$22
    . C! l+ M! q( n9 M1 m1 X& T% o2 o0 ~
  1729. STA $BB6 p9 J( M) d2 Z8 S5 K
  1730. JSR BULSEL_RG_WRITE9 O0 E0 E! I! Z6 M5 D0 l

  1731. " m4 x5 ?+ r  j5 O- u; H' H9 o
  1732. LDA #$6C, g! m# n- `7 ?! ~: r
  1733. STA $BA% u& c+ a4 A% y+ F7 M7 ?
  1734. LDA #$22
      B3 [5 q- k/ N4 e' ^
  1735. STA $BB
    6 D8 U: s( r) d$ e" F, U/ r+ N
  1736. JSR BULSEL_B_WRITE& B# K# S9 n+ b+ y+ A; V6 {
  1737. % Z& T7 F$ i3 _- y
  1738. LDA #$A79 r. q2 I6 A4 u/ }6 P7 G" F( W  n
  1739. STA $BA. l- a; v4 C$ d9 f9 l
  1740. LDA #$22& H* _& e" |& n# ~( s: @- X  [
  1741. STA $BB' x, Y+ c$ x# B9 S* n! h! ^
  1742. JSR BULSEL_A_WRITE% b4 i8 L) z' [; D: P6 B. o
  1743. RTS
    . M; N, L6 y) c! ~4 a) ?
  1744. % R9 S5 R$ o; c0 c# c& b; ~1 k
  1745. - c5 y) G( p# {' y* O6 X

  1746. 7 O0 s, e" J9 \6 z
  1747. UP_STRING:; H& D- W2 }" x! L% ]( t* E
  1748. .BYTE $9F,$9A,$80
    9 T7 S; ~9 N" h! _

  1749. . r1 _1 T& \# Z; `: y0 N
  1750. DN_STRING:
    ' m. J; G& y  V* _. W( d: r$ n% T
  1751. .BYTE $8E,$98,$804 \# U2 H( D; _6 r4 }( n

  1752. 3 B" r4 J6 p1 s7 a2 d
  1753. LF_STRING:
    , h8 {1 x* f" ^+ a/ Q
  1754. .BYTE $96,$90,$807 V$ {4 e* {4 y! u6 Y, S
  1755. 7 E" G: k6 p6 P" I4 t! C
  1756. RG_STRING:. ~7 y" N% I! A0 S1 c
  1757. .BYTE $9C,$91,$80
    : s) G! A: r: C$ ?$ |8 j) E
  1758.   M9 @& I) C7 e, A
  1759. B_STRING:
    9 s0 q7 x; t4 r9 E  B
  1760. .BYTE $80,$8C,$80) j: Q1 h) p8 W  a1 s$ e# N
  1761. , [' w8 w  \6 N. y
  1762. A_STRING:
    1 J8 \4 I. {( q2 j
  1763. .BYTE $80,$8B,$80
    % o4 U- p- E8 i. c) w* p9 ^2 o  \% t
  1764. " {/ _, f: K& P6 K: R
  1765. / ?$ C! `8 g8 C, e' P
  1766. UP_WRITE:
    1 c# b2 g( l( K- y6 O
  1767. LDX #$00
    ! a  R, {" Z8 \' X! J; f
  1768. UP:
    1 W1 @  P8 @4 W  L; F
  1769. JSR PPUADDR_PROCESS: P) ?3 y: k# l( w$ ^
  1770. LDA UP_STRING,X
    . C" W: V1 j6 Z
  1771. STA $2007
    ) M& p' o1 y/ n" G8 j
  1772. LDA #$00
    2 e3 E, K: t- ^& i" C: B
  1773. STA $20009 n' f' B' `7 F- b
  1774. INC $BA' _. Y' P5 S2 r, [7 `- T) t
  1775. INX  Y" w7 @  n" P$ R" v/ Z( _+ F
  1776. CPX #$03
    + A2 S/ l/ ]# k- ?) E1 d; U
  1777. BCC UP
    . f5 T- X  w4 r% l5 Y5 X
  1778. RTS
    5 z2 {/ {3 u; h9 D6 T% I9 x* @: G
  1779. / j( _  M3 ~! @# }. f/ M
  1780. DN_WRITE:
    + `$ K0 d0 F% o+ l: }  `  E, s2 b
  1781. LDX #$00
    8 B5 ^) k) f8 W
  1782. DN:
    & R+ ^% n2 Q. H# z$ J9 r( U0 D2 H( u; i
  1783. JSR PPUADDR_PROCESS5 T4 L. n: d5 g3 w6 e& {2 x
  1784. LDA DN_STRING,X
    & W! u# }/ v6 ?# V5 u9 K$ x
  1785. STA $2007
    8 x" H  J( V, L" d2 s/ w
  1786. LDA #$00% j  h  E2 y3 ^$ A5 `. p
  1787. STA $2000
    0 V) \4 l! I& x# o9 E/ ?
  1788. INC $BA
    3 x1 O, V& _; `
  1789. INX
    : M$ ?- F! h  \3 ]+ [; \2 z, V
  1790. CPX #$035 h  a% C/ ?4 a
  1791. BCC DN( N& @: L7 W3 p! U' \
  1792. RTS
    0 j3 |! C" `8 u, w9 T: ]
  1793. # c. G6 [+ o. y( L5 p% B
  1794. LF_WRITE:' u& g3 Q* d% d; w
  1795. LDX #$00
    % }4 Q6 ?+ T+ `( U
  1796. LF:
    . r$ W; i9 p/ M2 M5 `
  1797. JSR PPUADDR_PROCESS$ y0 k" R* |/ Y& s4 R& O
  1798. LDA LF_STRING,X
    + w: P7 g& m7 \. i- H% J
  1799. STA $2007
      Y; \' T( x8 N
  1800. LDA #$00  J0 o" y8 u" w- G9 X$ ~
  1801. STA $2000
    ( \9 F. `& i5 a7 B" T5 Y
  1802. INC $BA8 M4 b  X: J. \! N: }/ j
  1803. INX/ }& `: V. ?5 q9 m7 e
  1804. CPX #$031 S0 e" c( t5 h
  1805. BCC LF7 ?, E3 S4 m$ O+ r3 F) w7 U7 i
  1806. RTS7 \9 k7 b* D, O0 s( Z4 |

  1807. ' W' p  H( }; v7 V
  1808. RG_WRITE:- A5 O+ v6 [" V
  1809. LDX #$00) F0 z( H# f8 ^) y; ]; N
  1810. RG:
    % V) X* n& o2 f0 H( E
  1811. JSR PPUADDR_PROCESS: E0 m! i. M8 t; }2 e: G
  1812. LDA RG_STRING,X+ N1 _7 B0 u/ w/ B: i
  1813. STA $2007) G$ Y' p* v' o
  1814. LDA #$00+ _$ G: [% a/ H- j
  1815. STA $20005 Y4 p$ D' D% E/ z5 e8 _3 D3 s1 s
  1816. INC $BA
    ) b  I" z9 p1 A$ w
  1817. INX6 G4 V  _5 Q0 a3 \
  1818. CPX #$03+ m# v% ~! t4 W# O: ~( @9 o% T
  1819. BCC RG% F+ W( Q7 M, o0 A
  1820. RTS- A& ]4 w- ^. l2 N! g3 h& n

  1821. + o( M6 }1 w- I1 V  w, E6 n5 ^
  1822. B_WRITE:* [* n. D& J/ `& b, Y0 `9 \
  1823. LDX #$00
    ' F& v) S: I9 i9 g  c$ P
  1824. B:" d8 o) I7 t$ g1 n9 e0 ^& M
  1825. JSR PPUADDR_PROCESS0 v' i$ l0 j' s1 }& X
  1826. LDA B_STRING,X
      L8 u* I# _+ m3 ~
  1827. STA $2007# {) C" ^0 Q8 f7 ~5 m
  1828. LDA #$00
    5 O' e- P6 _4 O- ^: @7 o
  1829. STA $2000
    " U$ o5 q9 i; H
  1830. INC $BA! Z8 M, v+ Q% Q
  1831. INX- I0 l, B! E$ d' }
  1832. CPX #$03
    9 S4 o2 w# `$ b$ k) Q1 P
  1833. BCC B7 F: i: h  u* L9 M% Q% q# A
  1834. RTS
    2 l  g8 S9 _, b5 g- l3 c( L
  1835. ! g+ `0 I. o# A
  1836. A_WRITE:
    ! R+ j9 W; Q, N+ T" g7 ~1 g0 ~1 j
  1837. LDX #$00
    . {, l6 p) b8 C* y! m! ^, r9 k( }& Y4 X
  1838. A:
    ) g# M# A% j( r! Y" t# ^
  1839. JSR PPUADDR_PROCESS+ [  [# b  C# W) O0 `9 u8 B
  1840. LDA A_STRING,X
    3 ]5 F( C9 R! i$ C
  1841. STA $2007
    * ]4 j* L* O1 B; d
  1842. LDA #$00
    ' j1 i: Z& ^8 I3 Y' ?: j
  1843. STA $2000
    + m; {+ y! Y4 G$ V! O: N' ]: P6 U
  1844. INC $BA
    * s/ q* i. e/ l) Y% w$ a, J
  1845. INX8 l& r1 p, J. P# N  |
  1846. CPX #$03
    ' u  B* D. y9 G" o) w, [% V/ _
  1847. BCC A
    7 ?8 j, N9 w$ E) x1 B6 `4 ^: u% N
  1848. RTS
    % C4 w2 Y* l8 W5 k: `2 A: U
  1849. $ s: x' d0 U% e6 |7 z2 N
  1850. . v; |1 q& _! Y/ h2 i- e. l  [0 J. f0 P
  1851. UP_PPU:
    ' b9 |. z: D6 \7 Q% A7 d
  1852. JSR UP_WRITE  T5 R! `3 n6 p, L, S
  1853. RTS
    % ^/ o# G, B0 N- Z5 I* F
  1854. + `! e8 ^. ~+ [, L+ k
  1855. DN_PPU:
    % u8 |  u! V; V! F/ ?4 A, i
  1856. JSR DN_WRITE" {: K4 R( ?6 {* v
  1857. RTS
    ) e% R$ D: U! f8 M' d
  1858. ( ]8 b5 f2 p0 w: T
  1859. LF_PPU:# y* B- E) W8 D4 n! I' B7 e4 g
  1860. JSR LF_WRITE- M6 }' ?$ x4 v1 w8 k7 C* k7 d& h+ s4 X
  1861. RTS
    ) L& `. Q0 Y+ v, r" F" e
  1862. % ~1 f* ?& X9 h
  1863. RG_PPU:
    " D4 A7 \" q2 z) a9 }5 z( K5 O
  1864. JSR RG_WRITE
    5 ]4 R- S' V" S  P' p: {4 B3 z% f, C( c/ e
  1865. RTS
      o6 |0 |  t+ q0 O& p3 Q
  1866. + c1 Q8 S: T  h1 U* q
  1867. B_PPU:
    7 f* M6 n2 P9 w
  1868. JSR B_WRITE) D9 k! j% r, A/ Y. f( A0 j7 K. t
  1869. RTS
    9 G' ~/ v2 M0 v; E2 C) O

  1870. 2 P5 n, u& r! I
  1871. A_PPU:
    2 @% @# n" \/ Z# f
  1872. JSR A_WRITE
    . ]- a3 F2 ^7 g1 Z  M( Y, s% y
  1873. RTS
    , z3 O$ Z, Q* A7 I, @5 Z3 u2 d

  1874. 1 d- B8 r& C/ A
  1875. 7 }' P# p: g' _( c" I8 q2 K4 g  U1 ?
  1876. PAGESELECT:
    ! ]; n. K/ p6 l
  1877. PAGE0:/ E* b) K3 M% A7 _+ R* i. S
  1878. LDA $07AA/ G8 Z5 c$ W# ?, S: a% J
  1879. CMP #$005 t4 S) [6 L) O; P: k; E# _3 x1 H
  1880. BNE PAGE1
    9 C$ g- @! a- F2 x; ^9 V
  1881. % y4 U3 Q' C: ]+ D1 _) l* ~
  1882. PAGE_00:
    4 [# C3 u+ c4 ?$ h% D0 _
  1883. JSR BULSEL_PPU7 l1 f2 u6 M' _4 r% p
  1884. RTS
    - Y5 P' k! K4 j; c1 l) H

  1885. 7 s+ W' `' ?) M) I# M
  1886. PAGE1:  i7 @) [1 }% F. Y0 L( I2 e
  1887. LDA $07AA
    ) Q3 G1 X: I. Q" }7 W6 b9 `
  1888. CMP #$017 h% d5 d. o3 `
  1889. BNE PAGE2
    7 ^# c4 ?# ?% Q9 w# y% r
  1890.   i8 x) z5 u% L4 U
  1891. PAGE_01:& i6 u5 X3 r! q
  1892. JSR INVINC_PPU. P/ b. x5 _9 @+ z1 V7 ~9 V3 A
  1893. JSR LIFELC15_PPU! t9 v: Z9 }2 L. I. r  v" K0 \
  1894. JSR DOUCON_PPU# v( r) z, ]3 A1 D
  1895. JSR KILLON_PPU
    : S6 z) M* R% W
  1896. JSR SKYFLY_PPU
    : Y+ A( p* F8 U3 O8 S" I: }$ m6 T: W
  1897. JSR LIFELOW_PPU
    + W7 G. |4 H3 l5 K1 d; |1 K) z
  1898. RTS7 [( }4 J- z0 E! N/ @! r4 _, m! |

  1899. ; }8 {  G6 R( K& {( e1 h
  1900. PAGE2: $ c1 u4 g' v8 [$ A8 m( Q
  1901. LDA $07AA
    / G+ [' C' ?9 T
  1902. CMP #$027 r! |8 ^* J) Q+ p; A. t( L
  1903. BNE PAGE37 Z- r* o, u5 n

  1904. 1 |: u- ~; P7 ^' c5 z0 ^( {  F2 X
  1905. PAGE_02:
    9 t& q% n% D7 m: W/ |, @% u: m% D
  1906. JSR BULADD_PPU
    ( R2 F+ ^: Z0 \# n& w3 w; `
  1907. JSR SKINGE_PPU
    ; Z2 n. g0 z8 U( T5 m
  1908. JSR BULMIX_PPU
    # E; F" {: a3 Q: I+ W4 Q. ?
  1909. JSR ENELOC_PPU
    ) z& W2 b5 d% W0 j' U9 [& a
  1910. JSR FOCFUL_PPU* U( ?& {- O* T% {0 a4 S
  1911. RTS
    ) ]( G4 g( ~& t* }
  1912. $ q" C; F& m, d$ l
  1913. PAGE3:
    5 m. D. @6 r  n& z4 H1 m" a
  1914. LDA $07AA1 _& m# N: Q* U" v& V# j; y
  1915. CMP #$03
    1 O7 l' m- W6 R, V0 ^; |
  1916. BNE PAGE4
    8 l; W9 @. z9 t+ m
  1917. * {( H3 |$ t- ?2 ?" N$ C& P) ~0 ]
  1918. PAGE_03:4 q3 y) v. t# d% @+ o
  1919. JSR BULCON_PPU: S. X0 t8 w* b: N. C! _
  1920. JSR SPEBUL_PPU
    " r6 @9 @. h, O- U
  1921. JSR CLEALL_PPU
    ( k& i& U+ E7 m$ v4 {) m% h( b* b& v
  1922. JSR HARDMODE_PPU
    & b" w5 |0 f0 G
  1923. JSR B_TO_JMPSTG_PPU
    9 V1 F" j- L/ ?7 B9 S& Q( X6 H
  1924. JSR A_TO_PLAMOD_PPU$ Q, N" L4 d2 s
  1925. RTS$ _$ E. w1 c- A) f
  1926. 1 {- f1 {) u& w. s5 o
  1927. PAGE4: % f6 z4 z+ F3 o# h! G" o. z
  1928. LDA $07AA" g3 k! J- p; u( J- w
  1929. CMP #$049 e, L: u) I; K0 \
  1930. BNE PAGERTS# y- P; P/ T: @# Z! R
  1931. 9 V: u( _+ m( L
  1932. PAGE_04:
    1 \! w" W4 v' Z" W
  1933. JSR MOVSPE_PPU
    , s& I( L4 P$ S( q
  1934. JSR UNLJMP_PPU
    - c& v3 Z$ z* O" w# c
  1935. JSR DESTRO_PPU
    / n/ O* [* Y, i+ x
  1936. JSR EQUBUL_PPU
    , ^, F  T  q5 p
  1937. JSR MOVESPEED_PPU& }" H# e8 Y4 W. x3 G9 r% V) }
  1938. PAGERTS:5 o& {& T. T1 k: M; m+ A
  1939. RTS+ e/ w. L, T* q

  1940. 1 `5 y8 O1 D* y5 B
  1941. $ @; s: C0 P- j+ M) z# T1 E
  1942. PLAYER_01_STRING:" D$ }6 n; C2 j2 ?
  1943. .BYTE $9A,$96,$8B,$A3,$8F,$9C,$80,$81,$82,$80
    0 G# `. j7 I# h$ }6 x" `

  1944. ; M6 S) R" Z( c/ l: Z' ^
  1945. 5 [! g  b1 v* ~- v( G/ O4 a
  1946. PLAYER_01_WRITE:6 ?. A' s5 o2 m. i6 H8 q; H
  1947. LDX #$00- ^' _: _5 ~) D1 N
  1948. PLAYER_01:
    5 ?% A+ x2 s" R4 M
  1949. JSR PPUADDR_PROCESS
    5 e: ]* p7 M' R3 Z
  1950. LDA PLAYER_01_STRING,X
    : v2 Z* R; [4 K+ m) W5 Z; b$ y
  1951. STA $2007
    . b  D& `$ R9 [1 `! E5 Q2 m
  1952. LDA #$00
    , ~4 f; I# {1 B# z! h
  1953. STA $2000
    # C: `# Y2 j6 q7 F
  1954. INC $BA
    * ~1 w8 u1 P+ b, t
  1955. INX7 W' L8 _. J3 G  R9 x+ @, o
  1956. CPX #$0A4 E' k# o. O0 Z0 \9 u2 @+ b
  1957. BCC PLAYER_010 n) K! S5 R; E2 ]
  1958. RTS
    . i3 c: g2 Q: X# L& P
  1959.   N4 U% R6 ]5 \0 Q9 I+ ~5 ^
  1960. PLAYER_01_PPU:
    0 F$ |. t1 L: c
  1961. LDX #$00% @  e. I0 u1 M9 H& w
  1962. LDA #$644 G5 n; B  l/ a7 f2 f) d
  1963. STA $BA
    5 x" D5 n$ i' l) K% b# r5 K# Z% G
  1964. LDA #$20
    5 m9 U$ t! q) a! u$ N
  1965. STA $BB
    3 Y! T0 E2 j* u/ [; f
  1966. JSR PLAYER_01_WRITE( J2 F  q2 w% I
  1967. RTS* \- S4 E6 e* M/ N+ k
  1968. 2 v- \) l4 A0 A0 O; }) c
  1969. PLAYER_02_STRING:/ O) N% {* y( ~+ D. O5 I0 Q
  1970. .BYTE $9A,$96,$8B,$A3,$8F,$9C,$80,$81,$83,$80
    ) B, ?( Z" T7 x* k: b. k2 g

  1971. ! l& a6 _( \4 C+ D! B

  1972. ( m- ^& v- n3 e; E6 ]# c  f
  1973. PLAYER_02_WRITE:; E6 X7 Z2 j$ R
  1974. LDX #$00
    4 S4 T$ q+ n& t$ s2 J5 h( ^3 O0 N
  1975. PLAYER_02:1 b' T/ L% b, K; t6 c+ [
  1976. JSR PPUADDR_PROCESS
    4 Z$ U$ X' f3 q* o, Q! X
  1977. LDA PLAYER_02_STRING,X
    : M' G( z5 a  w% h5 u
  1978. STA $2007
    4 k7 G# C9 [6 X0 O7 n) I
  1979. LDA #$00
    # E% v8 J! b) m
  1980. STA $2000
    6 Y# K' ?6 q- O: O8 Q2 n
  1981. INC $BA: c6 w5 g; x# y! T" c8 U
  1982. INX3 Z8 L  z8 P$ P- j3 ^6 D/ K
  1983. CPX #$0A" x6 o) L/ I4 G$ F
  1984. BCC PLAYER_020 r: x- U( y* f! G/ W
  1985. RTS  `( E# Z4 ^, \  W7 }( F9 V. ~$ M

  1986. 6 |: X* S* v0 u9 m0 R
  1987. PLAYER_02_PPU:5 K) _- p0 X: m
  1988. LDX #$00
      v9 F( x( \2 K! {. Z# g
  1989. LDA #$733 y! n, H7 _; I5 {. a4 w6 Z% _
  1990. STA $BA
    + ~, e$ ~4 H2 e% n: B; b- |5 w$ K
  1991. LDA #$20
    6 g/ d. [. o. m8 F- J- C6 ]& e
  1992. STA $BB5 u: s; L5 K* a/ d* p& a0 Q7 t. T
  1993. JSR PLAYER_02_WRITE
    " g. f4 b2 E$ V, W
  1994. RTS) k% |; x9 [% c8 Y9 z# E( F; e

  1995. ( n$ V3 f4 V0 N9 F- j; }) V
  1996. PPUADDR_PROCESS:
    0 [" i& Z1 L. \! E( N
  1997. LDA $BB
    + G5 `0 ?* s$ j# T% {2 F6 h" e: u
  1998. STA $2006
    1 j. Q- x* q) X$ Z3 ?
  1999. LDA $BA: K/ J( a/ J, F
  2000. STA $2006, `" ~* W. x& ?, o
  2001. RTS
    ! B0 B+ I3 F9 r/ Q

  2002. . I1 O: d; Z! |+ O% F

  2003. * @8 r7 S! [, N& m' v

  2004. 3 }8 p0 B' s- p4 I2 y, C
  2005. ONE_STRING:0 P2 V4 \- X2 E
  2006. .BYTE $99,$98,$8F5 k2 d) e% m2 _. B5 V5 z6 h
  2007. , N  N9 i. P8 w; I; ^
  2008. TWO_STRING:
    2 ~) F9 F- u3 q/ a! R
  2009. .BYTE $9E,$A1,$99
    & l5 {* H3 k4 h; |3 N& X0 d

  2010. 0 i/ [3 N$ O7 W2 Q: G
  2011. ONE_TWO_PPU:
    0 }% y8 c$ b; g, f! s- y
  2012. BNE ONEWR* g/ ~- c' `2 g2 e) r" l& V2 {
  2013. TWOWR:  e! j* O8 `1 e9 Z/ G% }. h
  2014. JSR PPUADDR_PROCESS
    $ f( D, ]% ?1 S
  2015. LDA TWO_STRING,X
    1 W" S  _/ b3 `2 D7 G
  2016. STA $2007
    4 B  J( _1 w5 ^$ f- b
  2017. INC $BA: D$ [' C& F1 k
  2018. INX9 {" V  h+ P, b* {4 i5 A" U
  2019. CPX #$03
    ! Y. i# ^3 i+ _- g8 D$ N
  2020. BCC TWOWR
    8 }1 V) y5 w5 i! K- [* x" W
  2021. RTS1 n) v1 |9 o- m- |& y2 t. o
  2022. ONEWR:
      }: ?* N7 ~* a" j9 o/ u
  2023. JSR PPUADDR_PROCESS! b1 ^0 @) a" T) Y, |1 a% Q
  2024. LDA ONE_STRING,X7 e; g7 C/ O: y" o7 a/ v* Z6 a
  2025. STA $2007% g) r. g2 X) j. T8 A4 w
  2026. INC $BA3 Q6 ^8 k0 l& Z
  2027. INX
    9 i2 B( N" Q/ ?. N. C7 m  [
  2028. CPX #$03( [6 x/ o3 n+ B/ `5 R  [9 G1 b
  2029. BCC ONEWR8 B0 [) _$ Y# j5 ?
  2030. RTS; M# T% I( G% @1 q
  2031. ; O% J' c& i( {
  2032. MOVESPEED_STRING:# [# \  m+ C4 T1 f" P; D- p
  2033. .BYTE $97,$99,$A0,$8F,$80,$9D,$9A,$8F,$8F,$8F,$806 @0 O. o: @6 H

  2034. & }2 n  O( `) @8 g6 n2 f9 {, E$ L
  2035. % G% ]$ b) e9 ~# b% a4 E# p
  2036. MOVESPEED_WRITE:
    # s) q7 T/ c7 e1 V+ B  L+ K  t1 H
  2037. LDX #$00
    ! t# R4 T! m! k7 {; {. M/ _
  2038. MOVESPEED:. T0 l' ^, X' f
  2039. JSR PPUADDR_PROCESS& A  G- l( I2 i( f
  2040. LDA MOVESPEED_STRING,X3 x+ Z4 a% h: v+ f4 R8 a* b
  2041. STA $2007! ?4 w  I7 v* J& }: o
  2042. LDA #$00  D1 U) v& P( t2 w  v8 b) ~5 M) I: `
  2043. STA $2000
    . R# i  F! {4 [9 b2 |2 {# w" B
  2044. INC $BA
    2 V$ D) t5 O. G
  2045. INX* X* k- P4 a% O0 J! b
  2046. CPX #$0B
    0 h, V" g+ p  Y4 q/ `# U
  2047. BCC MOVESPEED
    ' ]$ [! E, [6 S* q) s$ P$ r2 Q
  2048. RTS
      z" V- X7 i/ B
  2049. ( D6 z7 o" R* S% m7 C2 }6 o. `
  2050. MOVESPEED_PPU:" K+ c! }* C1 |+ I" S) O
  2051. LDX #$00
    8 n% b% m7 m1 ]8 p  h
  2052. LDA #$AA& v( M8 _: [' H) q9 `
  2053. STA $BA7 b0 j5 U3 |0 Y4 m5 E8 g  L( b
  2054. LDA #$22
    : a) B) @5 A( u
  2055. STA $BB+ e* ~; n, K, R4 l
  2056. JSR MOVESPEED_WRITE4 ]4 \, q' G: U% l6 B$ U  k7 G% k
  2057. LDA $7003
    % ]7 O# f8 w+ O7 S' E' \2 v  j) W
  2058. CLC
    0 @" [; R. @# s9 H) A/ t' h+ d4 |
  2059. ADC #$826 q. P4 o2 P6 C
  2060. STA $2007
    9 Y. @' y3 t" X7 i
  2061. RTS
    - m: T/ y) ]! `: ?/ y2 a& o! V* y
复制代码

本帖子中包含更多资源

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

x

评分

1

查看全部评分

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

签到天数: 551 天

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

签到天数: 3275 天

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

签到天数: 2375 天

[LV.Master]伴坛终老

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

签到天数: 135 天

[LV.7]常住居民III

发表于 2016-11-21 09:59:17 | 显示全部楼层
这东西找了好久勒,谢谢!!) f( [, K# Y4 L& B: o/ z
[发帖际遇]: wjb19780515 发帖时在路边捡到 5 个 柠檬,偷偷放进了口袋. 幸运榜 / 衰神榜

签到天数: 2367 天

[LV.Master]伴坛终老

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

签到天数: 2394 天

[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 | 显示全部楼层
谢谢制作,辛苦了
回复 支持 反对

使用道具 举报

签到天数: 934 天

[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. 幸运榜 / 衰神榜
回复 支持 反对

使用道具 举报

签到天数: 399 天

[LV.9]以坛为家II

发表于 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-12-19 04:32 , Processed in 1.133789 second(s), 38 queries , Gzip On.

Powered by Discuz! X3.4

© 2001-2023 Discuz! Team.

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