EMU618社区

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

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

[复制链接]

签到天数: 39 天

[LV.5]常住居民I

发表于 2016-11-19 22:19:45 | 显示全部楼层 |阅读模式
本帖最后由 yandagui 于 2016-11-19 23:11 编辑
, L" e( ~, k; `6 N" N. p+ k8 S& u, b/ L
     [FC][魂斗罗旋风终板END暂停显菜单]
, I+ _# y4 o: A( ]# N. ?2 f
作者:FlameCyclone(flamecyclone.ys168.com)5 S# q" i0 ^! ^
时间:2016/11/19 21:46:00
6 v$ y! D9 p/ m9 c) G/ ~更新日志:

% B0 s) O& V2 m; p$ Y, R2016.11.19:加入暂停显菜单(共5页).
6 c  k6 p' D" @. d9 c4 n2016.11.12:加入无限跳跃.
/ @* U6 v$ c& u; B  m5 V, X8 {2016.11.12:加入速度调节.
, c' n  S2 c5 [3 M
2016.11.11:加入敌我子弹对消功能.( ~" X0 }: u" f6 d" m# q) E
2016.11.11:加入全屏闪灭功能.* _  e& n; `+ P* b% m
2016.06.08:加入全屏瞄准功能.
. S: [: D0 u# Y- ~" P8 s2016.05.31:加入弹速调节功能.
* V2 t5 n: _2 Q) X& s2016.01.01:加入高难度模式.
6 R+ Q/ e+ w; G. Q, R; [2015.12.12:修复消除威胁不足,使得移动BOSS关卡(第2,4,5,6)正常通过." g5 y5 w6 h' J3 {/ Q( R
2014.07.05:由于对打功能不完善,直接去除,更改为生命锁定.' X) T1 r  \$ g, ~
2014.07.05:双人切换功能优化.6 |/ X/ ^8 F. n8 ]
2014.06.01:修复第三关浮空到BOSS前必须关闭浮空后跳跃才能见BOSS的麻烦.- g, e( E: l2 U
2014.06.01:取消生命锁定,改为生命锁定模式下剩余生命不会少于一条.% H: K( \/ J3 |& ^
2014.01.18:修复GAME OVER字样只有G和O的错误,原来想拉大字母间距离,看来行不通.8 g1 t3 H: B7 l. u: j9 J- e" _% l$ h" f
2014.01.18:浮空模式下,P2飞行高度未限制导致死亡,原来是指令本该用绝对X变址的被用成了绝对寻址.
$ T$ H$ X3 o" T2014.02.08:拿手机无聊时又发现一些错误,所以修正生命剩余勋章显示的错误(某天用读卡器插在DVD上测试发现机器读不了卡,原因是目录级数超过三级,只有刻录成光盘来测试,结果发现生命勋章的显示竟然无压力!)
9 t  W9 I! T- e1 {! b( l2014.02.13:加入自动演示通关.* W1 A0 h5 z, R. D# E+ ?
内容:) _7 {6 p. Y- d' y" M
23.暂停菜单:        暂停后,自动显示菜单,选择键翻页,方向键和BA键进行各种功能的开关操作.# W2 Q/ f9 H; f
22.无限跳跃:        暂停后,选择键4次,按下开启,开启后游戏时无限跳跃.( E# z1 P' O# ~) z0 D
21.速度调节:        暂停后,选择键4次,按左右调节行走速度(0-3级).
- h6 `6 }: n# z
20.子弹对消:        暂停后,选择键4次,再按A键切换,此时敌人子弹可以打掉.. L- L/ P  g8 |9 c& F
19.全屏闪灭:        暂停后,选择键4次,再按B键切换,开启后游戏时按选择键屏幕内敌人闪灭.: A# F" n* G0 ]
18.全屏瞄准:        暂停后,选择键2次,再按B开启/关闭,子弹对消开启时无效.1 k) [$ o( [3 s0 z' L* Q
17.弹速调节:        暂停后,选择键3次,下开启,非暂停时按选择键调节,默认为1级,共5级.2 C" x0 v* k& d( ^3 v
16.困难模式:        暂停后,选择键3次,右键切换,我不相信你能够无伤通关.8 h/ Q5 o( O+ Q3 @. o
01.子弹切换:        暂停后,选择键0次,上=快S,下=快L,左=快M,右=快F,B=快普通,A=取消当前子弹加速状态.8 p% {1 Q9 `- F& v, k3 p( \
02.无敌锁定:        暂停后,选择键1次,上开启/关闭,不用讲了,金身无敌.  R/ d5 U. M4 {# c$ h+ B
03.生命锁定:        暂停后,选择键1次,下开启/关闭,生命锁定为16条.6 M" |: x6 [' G8 ]
04.角色双控:        暂停后,选择键1次,左开启/关闭,无非就是主机控制副机.
) b0 X+ k$ L& O# J% [2 e05.生命底限:        暂停后,选择键1次,右开启/关闭,锁定剩余生命数不少于1条.
+ }  Y5 M/ S1 _06.一击必杀:        暂停后,选择键1次,再按B开启/关闭,即使是第8关BOSS,一发花生米依然要其老命.4 V/ D8 ?! n9 [, J; F6 K* c
07.角色浮空:        暂停后,选择键1次,再按A开启/关闭,第三关浮空时按选择键向上卷画面轴.
0 v. |( W- P! Y# G( _: n  x8 A! F08.弹数加强:        暂停后,选择键2次,上开启/关闭,此时所有子弹发射数为15发.
$ Q6 r1 y  z- p7 Z09.皮肤更换:        暂停后,选择键2次,下开启/关闭,主机开启时橙黄色,副机开启时为蓝色.( ?2 K, Z' l/ T; v) A' ?0 v* m
10.混合子弹:        暂停后,选择键2次,左开启/关闭,此时连射时所有子弹混合.4 [! t4 _$ f% t8 @( h' ~; M4 _
11.敌人锁定:        暂停后,选择键2次,右开启/关闭,此时敌人原位跑不动.
- |2 Q/ |  I: N% L7 |% q12.跳过一关:        暂停后,选择键3次,再按B使用,使用后可以直接到下一关.
& m- M+ v9 u! s" X7 y13.单双切换:        暂停后,选择键3次,再按A键切换单双人游戏模式.
  z. t. A  }: ~2 N, K( v4 _14.子弹方向:        暂停后,选择键3次,上开启/关闭,开启后发射的子弹攻击方向会随着操作的方向按键变化,第二关和第四关的小关建议关闭(开启的话打中敌人太难了哦).( @: S, z, r: Z' m. g
15.消除威胁:        暂停后,选择键3次,左开启/关闭,此时游戏时按B键使得移动物体被消除。* p  R1 D1 l2 {8 Z6 d
A.做了一些汉化(小字体),剧情,关卡名及通关后的文字未汉化.
3 I  e: x6 _, O! \3 _% O& y0 nB.自动演示通关,双人合体打通关,演示时有背景音乐,通关后一样会有结尾及恐怖台词,之后游戏进入选关(相当于游戏自动开始了).注:通关后P1及P2会获得16条生命!也就是说看完演示自动开始后第一版有16条生命!
: y+ w$ e5 x3 o& o* U) d& G8 J/ k) GC.生命显示加强:最大显示15个剩余生命勋章!电脑端请开启精灵超过8个(这样勋章不会闪烁),手机端认命了,不过不影响正常操作.7 g4 C6 B( }& i5 Y! B( [1 f) f
) i1 S6 [3 h/ G+ U9 o
    如果有什么好的修改建议,恳请通过QQ(1490868135)联系我(也许我不在线,可以留言在QQ里)
3 Z1 |* i0 j' [8 K0 m$ N/ h欢迎大家转载,转载时必须注明出处.
6 z" @2 U  A; U5 _! b% O  ?. C* M# Q
$ J# l) U, ?4 L& c4 y( j7 W- ?, @
游客,如果您要查看本帖隐藏内容请回复

2 d- w. x3 n5 p1 P1 U, W: C% S6 }4 ^" Y0 P0 k
忙了一个星期,觉都没睡好,眼睛也疲惫不堪啊.终于找到解决方法了,目前VIRTUANES运行不了,请使用其他模拟器玩.
3 A5 z% R0 k' h1 ^9 \8 f/ P7 Z7 ^这几天的劳动成果如下:
  1. .ORG $B400
    / D) H6 q1 K4 c

  2. ' b7 W0 T9 h; K  u
  3. # ?" [" Z/ h7 M8 |& E% ]
  4. PROREG:1 ^% }6 ~% H# R7 ?
  5. PHA
    " v, i5 I, \. c% I2 ~, F
  6. TXA
    ' ^& A- s7 Z6 B
  7. PHA) K# C" W( D) b  ?" K; ~
  8. TYA
    & h4 @: h& h8 ]  D& `) v
  9. PHA. v4 F% ~* ~  l4 a! u( O: b. T# r
  10. LDA $25
    * y$ b3 x! ^3 u) x8 m9 C7 L
  11. CMP #$01# Y% h& K* u' r  o  ?
  12. BNE RE
    ' J2 A$ V4 Y' y
  13. LDA $010A
    ' `5 M# R8 c* f
  14. CMP #$00
    2 J; Z6 m  E1 F' C& k
  15. BEQ P1
    9 z- }) l5 Q1 B7 d

  16. ; W! o- o3 o% C6 L, c3 A9 {
  17. RE:9 k# a- a6 Y+ H. y; J, O( y
  18. JMP PPUWRITE
    * a. M( P. @8 B& g
  19. : g; K. g3 }8 w, q
  20. P1:                ; 条件判断
    2 `( Y, d& J; u/ W2 Y1 Q  B1 R
  21. LDA $7FFF! Q. ~6 Q8 `% ~$ [( c
  22. CMP #$FF2 |: S3 J2 V2 t; m
  23. BNE P1RP$ ~# C" l/ D, P; G
  24. LDA $7FA0$ r6 s, f1 P0 b  i$ ]% w% W" r
  25. CMP #$00) k6 Y, ~4 o! d+ x7 i
  26. BNE P1CMP
    ! \! x2 @2 @& p3 ^' W; g1 Z
  27. LDA $2001
      p% q$ t1 W9 y
  28. PHA. \% c8 n- w- X; v) ^$ ]
  29. LDA #$00
    ; O& k, ?. M8 P  v% o+ t
  30. STA $2001! _9 g# C3 k/ ^, R9 v# H
  31. LDA #$FF# b" Z* A* F) A
  32. STA $7FA0
    0 u8 {2 U" e% H
  33. JSR CLEANA1 X2 o- P8 p8 c, F' z7 c) I
  34. PLA
    4 A2 z1 R+ a/ T' y+ Y" D& ]0 A
  35. STA $2001
    9 f+ r/ X9 E! P5 j
  36. JMP PPUWRITE! b- ?& L( k5 L$ [8 E) ?
  37. P1CMP:4 y+ p8 k- P* K% ?
  38. LDA $7FFF
    # {+ }, U. e" m# V
  39. CMP #$00  a# w' z" R2 L: i! E# T! j
  40. BNE RE
    " ~! ?: V4 Z, E, f8 h( ~
  41. P1RP:
    9 @2 S$ i% T7 M6 ^6 y
  42. LDA $2002
    ( i* l- E8 Q% _$ j' r$ Z. l  M
  43. LDA #$00- Y8 T- Z9 w4 X' h( N  p0 T+ ^4 H
  44. STA $20011 K7 G& v; A" Z' S( p7 x
  45. LDA #$FF+ m' |9 X7 [- Q( U+ ^3 `* M& N1 i
  46. STA $7FFF
    + a6 ?' I! a! Y! `/ E
  47. STA $7FA0
    ) m" h( o3 s  K9 ]( r
  48. JSR COPYPPU; _+ g! J* m+ K
  49. PIRP2:
    + N$ R# J* ]) Y  V, J( k% `
  50. JSR CLEANA
    , P$ ^1 s3 I# D) q" R0 ^' A$ |
  51. JMP PPUWRITE
    ; f- O( @* i9 I) b( t. S

  52. ; @# J9 L9 Y4 J$ m5 E
  53. COPYPPU:. }8 b) Y+ q1 X" [
  54. L0:
    3 ?. @) D+ `9 T/ `
  55. LDA $30
    , m# j9 ]8 |& X
  56. CMP #$02$ O: ^% g- f8 ^- P: Y6 L
  57. BNE UNPROFC1 C9 @. S# J3 C/ n; y! P
  58. LDA $FC
    4 H! g4 ?4 C* D- C0 Q+ H
  59. STA $7EFC3 S: _8 v$ o/ ~  e
  60. LDA #$00, L* N6 |: {# x' P7 i7 N
  61. STA $FC
    ! ]3 n+ n5 S4 V
  62. UNPROFC:
    / |2 e5 o8 A) t6 u5 q
  63. LDA $FD' D, L6 a$ ^, p  q
  64. STA $7EFD6 L0 S$ e: b+ h9 ]1 c) u& Q
  65. LDA $FF9 ?( o- H8 x9 o* v6 i7 r% [$ N
  66. STA $7EFF
    " r6 y% [, W0 q, R' u
  67. LDA #$006 f, K/ F  @- T( b: ?/ z3 t# I
  68. STA $FD; l: D% X: f* @; D
  69. LDA #$B07 t0 r" g: G1 C) ^
  70. STA $FF
    ! l- c; I; j0 ^/ N+ L( L
  71. LDA $07C1
    # @8 J3 y7 r" b: S4 j2 X
  72. STA $7FC10 l3 }( z7 y5 j( g2 W
  73. LDA #$3F
    $ v* u5 `( `. z4 J6 s- z3 C1 K
  74. STA $2006$ x: P4 Q+ {/ ]- m4 g
  75. LDA #$01) L& k" ^& M; T8 ?
  76. STA $2006
    / J3 E5 ~* J  \' Z0 ]6 k* ^# r
  77. LDA #$24" x/ f0 I# O: O0 ^0 c" A1 f
  78. STA $2007
    9 R. |0 I1 n" E+ p" g0 n
  79. LDA $07F6$ O0 C: D/ O) N
  80. STA $7FFE4 K) d  Y" a( \) Z4 v5 A: J
  81. LDA $00FE
    + k" J# d5 m# j: h, v
  82. STA $7FFD! B7 o4 S; c2 ]% b7 v) h/ N5 q
  83. LDX #$00; |, R6 K! s. F; U
  84. LDY #$00) f5 D( N- h$ @1 i& m+ Z9 E" `
  85. LDA $BD8 Y" Q% z$ {$ K: S2 z3 G. Z
  86. PHA
    6 j, l& `  P! g; K7 P2 z+ l
  87. LDA $BC
    , Q' @: X' i* y- D- F7 I8 u
  88. PHA* v5 S2 J/ v3 k% w4 W
  89. LDA $BB
    7 M- N9 X" M$ ]  G7 G% `
  90. PHA$ [. d% L- i2 u- \; V
  91. LDA $BA
    7 n$ r7 E0 W5 T/ P( }5 U
  92. PHA
    " k7 ?# ?2 _5 j! ]1 R
  93. LDA $B9$ x" f& e8 |- h# K; E) ?
  94. PHA
    8 s% G, N* h- I
  95. LDA $B8
    % F2 f  e, J7 x: K! P. y6 J
  96. PHA
    - A5 T' X2 _! x3 r+ b
  97. LDA #$000 }+ u# ]8 |) c3 I% E/ o
  98. STA $B8
    / g. L- [9 k! u! C
  99. STA $B9
    7 p8 W: G9 h1 Y: x& K" Q( b
  100. STA $BA
    " e: M$ {2 ?1 S2 H! s
  101. STA $BB+ j* z% R, U0 M& K4 G2 X9 D+ T& l
  102. STA $BC& V# c, |3 m0 K" E+ N
  103. STA $BD
    . O# S3 q5 x7 a2 Y+ U+ a# g
  104. LDA #$00
    ( `3 K5 G( S1 Q
  105. STA $BA
    & {  ]1 j* A5 v2 @* M5 n7 S+ j9 m
  106. LDA #$20% t4 c! ]" ]5 {: c7 A! a
  107. STA $BB
    1 X2 S/ c. m) Q7 @3 U& i
  108. LDA #$00
    + {9 N" q! ]+ A( R$ U+ E
  109. STA $BC
    5 \8 c0 R( i) C+ _
  110. LDA #$60
    3 ^6 b9 {! e& k3 l. U. t
  111. STA $BD+ z. h* l1 L: E5 y3 x: |: \
  112. - v2 c( J- S  ]
  113. L1:                ; PPU复制5 O) Y" H$ u2 _
  114. LDA $BB8 b- A. w" [, K7 g. x
  115. CMP #$30
    8 R6 T) n( N( m% h
  116. BNE L2$ I% q" b# G( U- E" w+ L5 Z/ d+ i+ p
  117. LDA $BA* W2 Y( X( T6 E: L/ L
  118. CMP #$005 H# j3 J9 `* L; {$ p% f$ f* V4 Y
  119. BEQ PROADPLA
    4 G7 B' s( A) I# B, m. Y
  120. ; l7 y+ [- _' W. D+ t
  121. L2:# ]4 F! k6 s% q, g* g9 B% L6 y
  122. LDA $BB3 U5 g+ H' I. N7 [# w3 }
  123. STA $2006/ D9 N0 s; |- N' ]2 f. _% E" C
  124. LDA $BA+ [; V& n+ K1 u! C* O
  125. STA $2006
    / p% z+ \* T9 i" P# D, O8 M/ q

  126. - _) j( N' C: q3 h) W  e
  127. L3:; M) s. h, z- m; u3 Y$ u, I
  128. LDA $2007
    ; U: T3 \. k: Z1 a9 J8 o( h' O; i
  129. LDA $2007* Q, \4 x+ h8 v4 L9 k6 G4 d
  130. STA ($BC),Y* v% k3 p# D( c7 n' L
  131. * K# F& n) |0 \1 r5 e
  132. L4:* r& {( |: A0 F+ J8 ]2 E! u$ g
  133. LDA #$00+ X9 ^/ c( @9 q% H* A9 k. M) l( v
  134. STA $2000" D$ L! _% x* j3 P1 \2 l0 M
  135. INX& E/ v* Y$ q1 x  g) a( Q
  136. INC $BA
    9 X2 A4 g8 |4 F: B2 Y
  137. INC $BC/ v- z9 l! N# Z8 @9 i' P
  138. CPX #$00* K' q- d& v: f% o3 w
  139. BNE L1% r* X8 R/ m* Q" P2 D4 b* j' L7 X) K
  140. INC $BB
    4 ?. H( o: {9 e& d# R1 [
  141. INC $BD  z+ \1 J2 _* f7 V2 U
  142. JMP L1/ ~$ D% M% @+ K& ~1 q; K
  143. 4 z( M1 l! d7 S3 L: A$ C1 c) x
  144. PROADPLA:                ;出栈& w5 V$ E& j2 M9 `
  145. PLA
    ' y+ Q. Q2 M# n3 \
  146. STA $B8! X0 W& P3 l1 F% [  p9 `
  147. PLA
    ' o9 }3 l: p4 v$ W4 B4 a+ c) N
  148. STA $B95 y+ W0 @) U9 h
  149. PLA
    3 y9 w3 `7 x. E" _" ~  Q9 E
  150. STA $BA1 T0 |1 l" X* a
  151. PLA
    & U5 c+ n: `( ^
  152. STA $BB/ w, u  ^% c% i5 D! h9 V
  153. PLA1 E/ f; ]- n) t+ J' E9 v! F* m. q
  154. STA $BC& _3 N+ j  m7 C1 c2 M
  155. PLA" N9 ]( a  z9 R! u& D* y; h
  156. STA $BD
    , [. `* \3 i, c2 I1 X- j* y
  157. CPRE:$ l7 |; G0 Y* H1 L
  158. RTS/ |  G% n# e5 D* b1 A& n

  159. 6 d6 e5 M! M2 M+ B& d$ x" R- j
  160. CLEANA:                ; PPU清空# `# X: P8 s( w5 i& |4 y( }& y
  161. LDA $BD9 i/ q& i( T# y2 h0 e
  162. PHA: k: R; h8 F  E! {1 S% k6 l9 s
  163. LDA $BC+ p4 m+ K/ O' [6 C
  164. PHA
    4 A$ ]- X6 f# {, }. }+ d
  165. LDA $BB
    1 I9 f, F, N( ~' [, T1 q: v1 l) E
  166. PHA* L) v7 D: u. W, k5 w+ L5 ~
  167. LDA $BA
    7 S1 O0 q$ H5 {  o6 E% z- Y
  168. PHA5 ~. T4 I% X6 g' x& \
  169. LDA $B9$ }6 M. H* J& T+ x8 ^! |" `0 q% f. i
  170. PHA) v7 o0 Y% F2 P: l/ \, E2 \( H
  171. LDA $B8
    , ^% Z, }+ X! h2 d4 ~
  172. PHA
    * F$ c! Z0 @7 u: |: _4 ^
  173. LDA #$00
    / W( c0 O7 r1 G5 X
  174. STA $B8- H5 ^) I  X0 T# W9 m1 Q7 d$ _
  175. STA $B9
    " u. h, c$ @# H% {! g
  176. STA $BA; U4 q. h: j. k7 X3 j" L  x0 e+ v
  177. STA $BB0 Z4 Q1 m: L& f% {" @9 W7 G9 E  l
  178. STA $BC
    + Y/ ?8 `8 `/ o% |
  179. STA $BD: c* c0 E$ q  w4 P5 \
  180. LDX #$007 s3 ~) ]$ j: W
  181. LDY #$00
    5 G3 s5 O! Y! J; A3 S2 c" |! w
  182. LDA #$00- S; I: y8 i& Q  E
  183. STA $BA. m1 J- J9 o& ^1 B+ [! U
  184. LDA #$20' G1 ?2 x  l. p. o3 m# |
  185. STA $BB
    * s8 t* A: u7 A3 A) U+ U7 S- y" Q

  186. , T4 ^/ }, x/ d/ r2 K& `/ W, j+ v6 s
  187. CL1:1 U# G3 Z# j/ A9 f
  188. LDA $BB, G  Z0 Y9 c7 Y! g
  189. CMP #$30
    / k* J# M4 ~; A  C% ^/ n
  190. BNE CL2- v8 r1 G6 H) D+ I, O4 K
  191. LDA $BA2 _: a$ c# R8 r, G$ b% ~
  192. CMP #$00
    - A+ g6 f5 [5 e8 F0 q  j
  193. BEQ FREEWRIYE
    8 s2 S1 s% L+ P: P' }7 G

  194. 9 {. p: Q0 l3 |1 |, P5 O
  195. CL2:' _3 |* _8 P7 O: o' V: Z# c
  196. LDA $BB
    * p( W  x) a$ `6 t8 l6 E. }' L
  197. STA $2006
    9 Z7 _9 T5 V" g7 D4 ~
  198. LDA $BA
    ; X! U6 e  ^2 A& p( n# [
  199. STA $2006! r% s/ o% D* w: d

  200. $ X. e6 G9 s6 o2 R/ P. F! |6 f
  201. CL3:3 p9 r" ^) Q, f; n8 s: \: @
  202. LDA #$00# @9 K) M/ T6 k- _' \
  203. STA $20078 O7 s0 G8 L) D

  204. 2 y& ?6 q& ^. }  I0 b; S6 }$ o
  205. CL4:
    # u' O$ S/ y: O
  206. LDA #$00
    " u6 y5 ^! }. ~! c- @* j3 L8 ~4 j
  207. STA $20008 \4 @, F4 T1 |9 B+ ^
  208. INX: y/ n- ^4 t6 e1 Z" L1 Q
  209. INC $BA
    2 n1 n6 T! p' ~( Y3 q; L* k9 c( ]
  210. CPX #$00
    ; |1 E8 w' G# x3 L& @1 ]" I
  211. BNE CL1
    3 Q8 X0 x2 l5 Y
  212. INC $BB
    1 C/ f5 Q- w: D/ T' f
  213. JMP CL1
    + F, l; S0 y! |1 e2 l

  214. . }6 r! u4 S0 o
  215. : Y( s( g! _$ u2 t' B. F! l4 E2 G
  216. FREEWRIYE:
    , x+ T' [8 N) i1 V& e1 m
  217. JSR FREE
    * h/ W& p  d, A

  218. ' D8 u& F/ r! S2 z8 c

  219. / ^  a! D7 B; `# s

  220. 1 |$ Z1 q: D( H6 |$ @! v% V

  221. ) X' D( i+ I+ t( W! Y+ b

  222. * _- X0 b( U6 c9 t: F0 c3 {& w
  223. CLEANF:                ; 恢复现场
    1 B" o  {# \7 L) g
  224. LDA #$08# |+ h0 }. ?: _
  225. STA $FE) M9 e0 e; L7 O1 o. i4 G
  226. LDA #$00
    5 x# l; _2 B5 M
  227. STA $07F6
    2 B) E' r3 R3 ?# x6 Q9 _  q  C
  228. LDA #$247 C- A  p- n7 C6 h' C
  229. STA $7FC0
    - ~% f3 H, b) v( q8 K1 U! k
  230. PLA5 X% b0 J. w& }  Z) `
  231. STA $B82 V' q$ f4 \- ^* J2 p9 y+ ?
  232. PLA2 X8 u% T/ V) F5 n. u* h( Z+ X8 |
  233. STA $B99 C  r. \2 }& q8 a" n1 o
  234. PLA& k8 E0 e" }8 X
  235. STA $BA
    ( q! g* i5 K* N* k" Q5 d
  236. PLA6 e& s7 v8 S% q0 ]
  237. STA $BB
    7 l6 e2 z$ g: Q9 S; d! n$ b
  238. PLA
    9 P3 J0 _8 _# q: K% G7 Z5 m0 \
  239. STA $BC! C& A! X4 {5 G, k  {
  240. PLA
    $ p+ H5 j  ?% b- T  h
  241. STA $BD* n3 |+ {3 O% @+ O  _1 }4 ^/ F
  242. CLRF:
    $ j) Y" G* I  z4 x$ X* R3 t) X3 c
  243. RTS
    ; u" E; n$ g" A) W: h

  244. 9 I8 R- b7 l/ o8 r
  245. W_DATA:3 u* {7 l4 s' q4 s
  246. .BYTE $00,$01,$02,$03,$04
    $ V. @, z" T5 _& H; x
  247.   5 m0 D& E$ I( k( H) V- ?) x0 a1 c
  248. W_PPU:4 u: [4 {2 r6 |$ P) I
  249. .BYTE $98,$97,$90,$9D,$96' Z  _# \& ~" F9 D# ?: b: E) k  m
  250. 7 k$ H( i$ D: G  {8 B  m5 e
  251. P1_STRING:; Y& O' p7 `; E
  252. .BYTE $9A,$82,$00                ;"P1"
    $ a% P) `$ G8 o
  253. ' P+ K3 X. G$ N
  254. P2_STRING:
    0 I0 h) p% j) w3 C0 j5 M3 e' u
  255. .BYTE $9A,$83,$00                ;"P2"
    1 j% H# F; J% o8 L5 G* f

  256. + k/ _% B: ]8 m% g% N+ z# U* \
  257. WEAPON_STRING:
    $ P) Z* y& v+ ]8 N
  258. .BYTE $A1,$8F,$8B,$9A,$99,$98,$00  ;"WEAPON"
    4 z- S: F% l- K! t

  259. - J  b6 m, Y! @
  260. RELIFE_STRING:
    2 N, R9 A6 ]" ^# v- f  Y
  261. .BYTE $9C,$8F,$96,$93,$90,$8F,$00  ;"RELIFE"
    ) C" l7 n! g* A. }$ }: }, A

  262. 1 z/ \5 K1 H  t0 i1 {. a! i( P4 Y/ s0 r- E
  263. P1_PPU:3 L; i1 w/ L- S$ i' ^0 ]
  264. LDX #$00
    / t/ V+ q* Z. C9 s1 g. Z9 c

  265. 2 f1 ~/ s& t- m  u5 n- L  W
  266. P1_PPUW:. i4 q8 M$ m# S- K6 ^& ^
  267. JSR PPUADDR_PROCESS' Y8 L, r" I- i, _& {0 O
  268. LDA P1_STRING,X1 S5 ^3 c. `2 T3 K- G1 [0 e
  269. STA $2007
    + X+ v: _5 E$ j$ G
  270. INX
    5 Z* |- v  @- T
  271. INC $BA
    2 A% _3 h: r. z6 `
  272. CPX #$03
    ( o3 A- @2 Q! T! I
  273. BCC P1_PPUW- |' i. `1 v! d6 U
  274. LDX #$00" e8 [1 h; g1 M/ v- Q3 E: G' o
  275. RTS+ A8 L* x1 {: b& f7 V' G

  276. & `7 l3 O6 Q  H6 y  R' A/ o8 z
  277. P2_PPU:
    # B4 Z% n% C9 ?( U. r' I% J
  278. LDX #$00
    3 ]% I' u& R  a1 y+ x/ u
  279.   i' x- ]. H6 H9 L3 |0 V! L
  280. P2_PPUW:- [- ~5 K; g: P
  281. JSR PPUADDR_PROCESS
    ; @- \3 ^2 m. s. b* Q4 O1 `
  282. LDA P2_STRING,X
    7 }3 \/ v7 p) r7 S! a
  283. STA $2007
    . w$ L& M# U4 E
  284. INX
    / d# v: w4 h) k  W2 N! ^# O7 p, O4 M
  285. INC $BA
    % ]" q* ^+ o1 E9 J
  286. CPX #$03
      k# L8 f8 L9 U) D
  287. BCC P2_PPUW3 a. }0 C" g" ?, Q0 `$ q/ i
  288. LDX #$00
    4 S8 [- N6 w, h6 R" A4 i/ a
  289. RTS
    7 a* Y3 D5 `) f; p% `* w
  290. : l& f6 |1 E: `5 b. \* C& h# v; e
  291. 6 A+ l% z' r  a/ I" F+ E
  292. LDA $BB
    5 O! c( w: b7 C7 a
  293. STA $2006
    6 U: E+ ]1 f8 J1 f
  294. LDA $BA$ r8 i8 L- V) u9 Q' Z& X
  295. STA $2006- R1 p) a% d+ b* @# g8 [- q3 {
  296. RTS4 ~# t4 S$ t" q- E

  297. 2 J; w8 r( K" }" Z) G! b3 G3 R
  298. . _3 t' P4 s; F1 U9 L# I; t  B
  299. ( T6 ?/ V9 |) h9 ^3 M
  300. PLAYERLIFE:6 a/ @) k% I: S  p0 e7 N0 ^' A
  301. JSR LIFETODEC
    0 ?- @( F& }: h1 q3 @5 ^; O  U
  302. LIFEPPU1:  P' a1 z: E! _, I
  303. LDX #$00
    5 ?) ]8 U+ N6 m$ L( O2 [
  304. LIFEPPU1RE:/ Y& k+ ^9 J  h" L* |
  305. JSR PPUADDR_PROCESS. @, Q' I9 Q: }
  306. LDA RELIFE_STRING,X: I( [4 I7 l( h' u- k! W6 m
  307. STA $2007/ f* E' D; E; J. c, m0 ]9 U: X2 v
  308. INX
    # {3 D3 y5 Y+ s# _
  309. INC $BA
      s! C/ l: D) f9 z7 }5 w% m
  310. CPX #$07
    * e8 S" p. o! Z" n- ^
  311. BCC LIFEPPU1RE) U! `" |2 @# g2 t7 w7 x
  312. # E# m. N0 A  x4 k1 |; F8 L6 R
  313. LIFEDEC:                ;生命显示写入, L4 K* E7 [( e8 D/ b4 V  L
  314. LDX #$00$ S* ~$ U6 N  t: O+ k$ L6 J
  315. LIFEDECRE:4 R, [1 M$ M( d+ d$ m8 `- R
  316. LDA $7A03,X& z$ h+ H- i2 p: o- _' I  \
  317. CLC
    , U' r  O2 \. I& n0 ^5 }5 i) D6 M5 i* p
  318. ADC #$81. {* b* B" Z9 m
  319. STA $20076 `+ X3 ~! V( x6 ?$ c" B
  320. INX
    3 M1 I3 O6 A  U1 [3 B$ N- A
  321. INC $BA
    % x4 i' R% U6 x: O3 C+ ?% |
  322. CPX #$03  R% E1 G' r. j- }% i$ y. y2 q
  323. BCC LIFEDECRE
    ! v( m, V% J& y3 B- q) \
  324. LDX #$00; S  l8 F& E6 V3 W8 s
  325. RTS+ T) x6 g: U; Y' M
  326. 3 r, W2 C5 }1 e; I: j
  327. LIFETODEC:                ;十进制转换- D/ m% F4 E9 t0 Z, k! @  [' ~
  328. LIFEL1:        ;initialise/ Q3 x/ a* j# r1 n$ \/ L. F
  329. STA $7A00        ;$7A00=F3- ?0 [( U; r% ~% V2 ?
  330. LDA #$00  L, {9 _& k( D- s! c8 I& e
  331. STA $7A03        ;$7A03=00
      L& E4 x0 c) q# z+ |* F1 \- r
  332. STA $7A04        ;$7A04=00/ j2 f+ j; t0 @$ Y/ l5 `
  333. STA $7A05        ;$7A05=00
    4 P" g' \/ Y/ E9 @6 R4 _  L
  334. LIFEL2:        ;copy data $7A00 to 6001
    5 c1 ?( C4 `; \9 w: z4 {
  335. LDA $7A00
    . U% J- C. q% x4 D3 b
  336. STA $7A01  ~- D. d3 t8 R9 Y

  337. 5 y" D& X( s6 `7 d$ c
  338. LIFEL3:         ;hundred7 g" v! ?1 n0 ~2 l4 Q+ C9 b
  339. LDA $7A01
    ' q1 e/ C# p' f' l( G2 L
  340. CMP #$64
    % U! ^6 b3 d3 ?. O  d4 I
  341. BCC LIFEL6                ;$7A01<100 goto L6
    + E/ ^+ H3 m0 }* t1 S% ?: s
  342. LIFEL4:6 n" I9 C6 x& d6 k8 H( o- s2 X, Q
  343. LDA $7A01
    5 n8 O/ s! a. e/ m' o) j: m
  344. SEC
    % l/ P/ P( J4 T0 q& M
  345. SBC #$64        ;$7A01=$7A01-1000 E, F: l9 V( H/ @, }% B+ q" a7 Z
  346. STA $7A011 K4 L& A2 L7 j! ^- q. j) B: U
  347. INC $7A03        ;hundred++" Z/ l( q5 z' N$ D
  348. LIFEL5:
    + i, ^& I8 }  N5 M5 r
  349. LDA $7A01
    1 z1 \0 q  _( ^2 [3 w
  350. CMP #$64
    ' Y3 W; f- v! B4 j0 g, t+ @
  351. BCS LIFEL4                ;$7A01>100 goto L4
    2 l9 }$ T, {) z/ x! n

  352. ( ?0 _9 v* _( h% e; P
  353. LIFEL6:        ;decade
      }2 K5 t4 F- {, i% z( o: M
  354. LDA $7A014 k' w% ^- {+ K0 o
  355. CMP #$0A% {4 C3 @$ }- ?/ F' p
  356. BCC LIFEL9                ;$7A01<10 goto L9( V4 a2 P- w+ L) D
  357. LIFEL7:       
    / F1 G! `# x7 H8 y, C: U
  358. LDA $7A013 D7 F" k8 |  x7 ?/ ~
  359. SEC
    + f; e: i8 @6 H" f& [8 D8 Z
  360. SBC #$0A
    / D8 z- O" r% M* @0 P) F! t; ]) m; X
  361. STA $7A01        ;$7A01=$7A01-10
    3 u+ N/ L, z5 v6 M& P
  362. INC $7A04        ;decade++" C7 F' ?1 a  _; C; S
  363. LIFEL8:1 e4 o* \+ y7 w
  364. LDA $7A01+ G8 s4 D% h) X
  365. CMP #$0A
    + D9 E- i/ Y  @, J
  366. BCS LIFEL7                ;$7A01>10 goto L7: B+ ]+ Q5 g: S/ A0 Y9 y
  367. ;unit3 r5 a( m) g9 _7 B) O0 j
  368. LIFEL9:. E& _( P9 C5 I: f, z
  369. LDA $7A01        ;$7A05=$7A01- R$ n/ o+ N% d: `5 U7 R
  370. STA $7A05        ;unit) [( g; z6 h9 x# p' I
  371. RTS        ;return
    1 G% e+ N% M: j& I

  372. + w! e7 @* I9 c( G- ]2 |" I# ^& r9 T
  373. : [3 L' S" O7 A: k4 b1 |
  374. ) x6 R2 x0 v  W. x& a
  375. WEA:                ;武器ppu写入7 p3 I' D. u2 j, p: q
  376. LDX #$00/ ~1 \3 M& R/ l( ]
  377. WEARE:
    $ \; j) l4 h- j! K5 L
  378. JSR PPUADDR_PROCESS
    % S) u6 j  ]% x! y2 \$ V7 C
  379. LDA WEAPON_STRING,X: v8 Q7 B- o& N! Q- F
  380. STA $2007+ O/ y/ T8 p' |* m$ K& v
  381. LDA #$00
    1 g% k+ L& ]" f1 W- S0 w/ M
  382. STA $2000
    " V0 \; ?& q. \+ ~8 b5 C3 U4 E5 h
  383. INX
    7 i' {0 t2 N% V4 f. }0 e% s
  384. INC $BA6 _' g0 U0 D9 }* A* r
  385. CPX #$07( G; k& Z8 t1 x! b! N8 k& t
  386. BCC WEARE, `) Q0 \) N% u0 c2 c. i# x2 I
  387. 1 t' L1 S8 e9 `+ P/ X3 D) G
  388. READ_WEA:
    ( X- k+ A9 J6 E. B$ t& X0 ?# ~; A6 x
  389. LDA $B9: b" }8 W% G4 P
  390. AND #$107 O2 L! \" [# i! j8 @2 R
  391. BEQ NWEA7 \, H" t, e# c  d% a2 h
  392. SWEA:
    4 Q- w- _3 x0 I  ]3 |. p

  393. 1 R5 S7 @# l/ x  }# B0 K9 E
  394. LDA #$9D
    % Y* e& Z) ]. x) i+ N7 I6 S' i
  395. STA $20074 n' l5 [* s; `# a7 S! W- }8 ?
  396. LDA #$00/ R% w2 j$ \9 J8 j# \; y
  397. STA $2000
    ! H" Q. L7 K# S" G1 G5 G. i
  398. INC $BA
    4 z/ c2 e* r* P: ^7 [
  399. LDX #$00
    " t$ @  Y# w$ K+ q, _1 u
  400. JMP WEAREAD) q  _4 L& F! R5 q2 q0 ]
  401. NWEA:
    7 a9 ]8 z- T7 ~+ b  l
  402. : a7 f. R2 o; S
  403. LDA #$8D" i- F4 D' @$ f' }( u
  404. STA $2007
    7 G2 G- ?9 s/ @! l7 N" E8 N
  405. LDA #$00
    # V- [% v2 \3 g, [
  406. STA $2000* G) f; F4 b9 _6 N0 P% c
  407. INC $BA* v& Z2 U, V& Z/ ~8 c
  408. LDX #$004 C/ q( R" P( r. z: H$ {0 N4 Q# B
  409. WEAREAD:
    ' b. j% b, K* ?
  410. LDA $B9
    ; a, `: r; c1 w5 o2 I
  411. AND #$EF, i8 S7 G  `8 k5 r) Z" d+ z
  412. CMP W_DATA,X: x3 q6 {' c0 X7 @
  413. BNE WEACMP
    : O1 a9 |4 i, Q; J) B! y9 d
  414. ! W' f9 q2 b( e8 M# l
  415. LDA W_PPU,X
    ! B. j1 U9 Z  Y, B) y
  416. STA $20079 W" w  H3 Q$ ?) \
  417. LDA #$00
    - C' L9 X  m$ d* r4 D+ T' {# N
  418. STA $2000& L9 w6 i0 t+ I, d

  419. * x- u0 S5 Q$ @7 C1 R
  420. WEACMP:
    3 V5 a6 a( T+ }2 e6 u2 F9 o, z
  421. INX
    - x3 v* H# T2 O* L
  422. CPX #$05
      T4 P1 w% t9 f6 j$ Y9 O
  423. BCC WEAREAD1 v0 [# ?* _9 A
  424. RTS8 q! q, ]! y$ _. L# F5 S: A3 \
  425. ( L9 s  }: }! X, ~  |9 l
  426. 8 t( m. l1 h9 L' p% v; v9 \
  427. PPUWRITE:9 N/ L" N1 o$ ^
  428. PLA5 c8 \9 P4 O9 _: f2 K
  429. TAY9 ]% V/ W5 p6 O, x! Q
  430. PLA, }% b) e( u7 P3 |) t' d. b
  431. TAX
    5 G8 g- g, F# l
  432. PLA
    / s( R2 c: |, L, [3 ~( ?. ]4 r
  433. LDA $25
    5 S6 d$ a$ i, r
  434. CMP #$00
    # w# C7 o( C, Z
  435. BEQ WP1
    # g2 n& |3 h5 B5 [1 V8 n7 q
  436. LDA $25
    2 R' B' X. ?9 F
  437. CMP #$014 Q- ]! l4 M. p- ?9 `+ r0 D! D& J
  438. BNE WRE
    $ S3 C9 U0 |1 \" [5 Y
  439. LDA $F5,X" `6 W5 g3 a$ e7 \3 z
  440. AND #$EF9 `2 c1 g0 N% D  T& z
  441. BEQ WRE
      h1 Z* K: F5 Z' D. f. P- R1 ~
  442. LDA #$00
    ( v1 R1 j; C  c, ]7 `
  443. STA $7FA0  z. z: W! T5 h8 L* B

  444. * o) O+ p0 m1 ^, _) N
  445. WRE:
    7 N9 X6 X) n/ T& n0 O0 r8 K
  446. JMP $A000
    0 {" Z1 Q$ H$ U4 M
  447. ) o- A% @& c( j, j7 E* @
  448. WP1:$ K- F) ~$ I/ k, o& @: n) j+ ]8 L
  449. LDA $7FFF2 R! W# i- O+ g4 ~% K! ?6 t
  450. CMP #$FF
    - |+ M, ~1 L6 h2 X: W
  451. BNE WRE7 I2 `; x. B! x3 w6 n  g" a; u
  452. LDA #$00( A5 X/ }' m: T" u5 P
  453. STA $20010 i0 C5 H( l7 E7 J  u. R
  454. LDA $BD
    & L1 |( A4 U/ h% `
  455. PHA
    ! V5 P& f5 W4 Q7 A+ P2 }1 n
  456. LDA $BC
    3 c; H% i+ ^; n- _2 {1 _" }
  457. PHA
    , w5 U, v8 X" H7 }. X8 w) h$ ?
  458. LDA $BB
    $ s8 M8 L: k8 z
  459. PHA
    # ~) R/ @/ {7 ?9 G
  460. LDA $BA
    8 y! I2 `  |0 a! G' I) j
  461. PHA
    ; v* W: g! S# v
  462. LDA $B9
    ) Z9 ^3 e9 x( n7 n3 a1 z" ?
  463. PHA
    ; Q, }9 U, |& C, ~5 u7 ?3 c) }: z
  464. LDA $B8
    , h7 W, n4 U* z' T6 w5 D
  465. PHA) }" ?8 Z$ l# z
  466. LDA #$005 f) ?* w4 t; u* L7 |# U/ I. q
  467. STA $B8- q2 _6 `" p( d. E- k
  468. STA $B95 J) K  \; O( s' a
  469. STA $BA% i1 L* K: b- {  P+ S+ t9 @8 M' ]
  470. STA $BB* b& m/ q$ N  e5 W( ~1 w5 O/ K
  471. STA $BC
    / K% \; \  n. r4 x7 k3 {" ^
  472. STA $BD
    & ]( s" h) b& B% a. R  M, Y, \
  473. LDA #$00
    3 ^+ |3 L3 w; r, [7 I" c
  474. STA $7FFF6 O" D. r8 j7 [) o( F
  475. LDA $30
    ' S4 G4 n, Y$ `, F1 H2 b
  476. CMP #$02
    / @- O9 M5 O0 W
  477. BNE UNPROCPL  m+ z* N% _- q' p
  478. LDA $7EFC
    $ s! ?1 s9 g/ H. H! _
  479. STA $FC
    ( g/ z; }5 F! B! z; N5 W
  480. LDA #$00
    9 l" C$ E& w0 O2 J& y8 L5 K1 }
  481. STA $A4
    3 s/ B3 u/ @9 H) f, i* Z, v
  482. STA $A5
    . O: U% R4 [' R: a. j
  483. UNPROCPL:
    " C6 e  w- T4 q" z4 ]( I% H! N$ {
  484. LDA $7EFD
    0 s; I% V8 P* }7 n% D0 s7 t# e
  485. STA $FD3 K1 d9 G6 h* Z3 c8 B, y8 L
  486. LDA $7EFF
    0 m3 u1 ]7 e" y; c2 q
  487. STA $FF
    , Q- @. E. G7 X0 \
  488. / F9 Z1 B5 N) c% v! [% D
  489. WL0:* c4 [. c! H3 x& M# k- l, d
  490. LDX #$00
    3 K% l& x- ?5 ]
  491. LDY #$00
    ; F& @3 {( c2 V2 r1 u2 K. B& Y
  492. LDA #$00
    , G0 R) x7 Y: H2 b; s# s
  493. STA $BA
    1 Y0 `+ _9 b6 a; b9 d. N3 {! B
  494. LDA #$204 H* U! O3 V* }5 N6 g3 q& [8 C6 R
  495. STA $BB
    5 k+ z( h# s6 G" z( t. e2 E
  496. LDA #$00
    3 k0 S- Z' L  M' v1 i) E
  497. STA $BC
    4 l" F0 E' Q& E
  498. LDA #$60- U- o, f9 H7 i4 J, j
  499. STA $BD  b: v. o9 T4 q

  500. 0 L9 F( z+ x2 g& J
  501. WL1:
      J* n3 T1 M/ ]& W: a* h" m
  502. LDA $BD
    0 f- r( P# b1 _! }: `
  503. CMP #$706 b) g, S7 x; ^8 R/ ^/ Y
  504. BNE WL2: R3 T& g5 W; l7 u- P" Y
  505. LDA $BC
    . [6 e* E7 r, T0 [. M7 E% T
  506. CMP #$007 S" s8 E; Y7 b+ p7 G9 @
  507. BEQ WLR  Q8 k5 i( x; ~, X* R$ V( Z

  508. ' ?9 b  v9 m  B+ p; p- Y  V
  509. WL2:' M& h& m: `- R+ Z( C; a
  510. LDA $BD
    7 |, ?- Z# y! z- p: r
  511. STA $2006- s' j7 a6 [9 r, }1 t( O
  512. LDA $BC
    . o, V! j  F3 c" u
  513. STA $2006. k& X; J  h5 q2 C0 Q1 E

  514. 2 m' p. W/ W4 _: n4 B3 D) v/ D
  515. WL3:& S3 j+ O, O" y
  516. LDA ($BC),Y
    , }6 |$ V" c6 Y+ H, ~
  517. STA $20077 ^$ v( o/ M5 m( A
  518. / Z0 I2 C- W3 b8 }( [. C& Q
  519. WL4:/ ^2 [3 J% S8 L' I; n- N' v% E
  520. LDA #$00
    ( o7 i" n4 @7 d& a$ m( a
  521. STA $2000; `1 C$ Z2 _; [
  522. INX+ H, S1 M) O  L; T' H# n
  523. INC $BA# n2 L  Y) n/ r) |3 G; v  p
  524. INC $BC
    " a7 ?( T- r  D; D" d# w0 p' m5 J
  525. CPX #$00- q% i2 s0 V7 ~% f6 }+ A( F8 C
  526. BNE WL18 z$ L  X! J3 K
  527. INC $BB
    2 y& j* c/ |+ T
  528. INC $BD, u1 e5 F" l0 W2 k8 b6 M, P
  529. JMP WL1- ]9 s6 w. z' g- Q3 U! B; C

  530. 8 D4 ^# w8 E# `: I* [& V
  531. WLR:, y! j$ Q4 v, x
  532. LDA $7FFE' [) I: A: H# {1 }5 L
  533. STA $07F6
    9 m- V) B* v8 R( |
  534. LDA $7FFD
    ! n9 F/ i" i4 l: G  g( h4 v
  535. STA $00FE
    * v, h; y% s5 I, o4 L
  536. LDA $7FC1: Z* l1 e9 ^  I' E- J/ }
  537. STA $07C1. S: b0 A" o# Y9 S: H
  538. LDA #$3F4 N- z5 q, u0 K" O* z% S# _: J  J
  539. STA $2006
    2 o( z; y2 J1 g6 }
  540. LDA #$01
    # }2 a3 Y  O+ x1 j; v2 x
  541. STA $2006
    - t4 v/ n2 l6 c
  542. LDA $07C1
    2 E  p9 Q6 A, q0 W$ X$ ?
  543. STA $20075 N% c  M7 }9 g; Y
  544. LDA #$006 ~) `, e/ k# H) w/ q) g6 F- w4 R
  545. STA $2000
    + D. Q- v3 u% B- N% r
  546. PLA, L  K# q  H9 `& T+ J( j9 ?% Q
  547. STA $B8
    3 A) M4 d/ ?: B* b5 N* g) v+ C
  548. PLA7 N( k+ V6 L. @. d* |% Q
  549. STA $B9, h, [/ W. ~3 f1 T0 a0 Z: P& \3 }
  550. PLA
    0 V; R& g4 z# G
  551. STA $BA& ]4 E0 v2 v! U  w% j
  552. PLA+ F$ R1 d! d: ?& Q9 }6 S- H( Z
  553. STA $BB: K( o7 f( N6 T# Z. [
  554. PLA0 N' V, n! ^. a* w3 s" v
  555. STA $BC
    " h/ _6 p' g- ^$ ?
  556. PLA$ R8 S4 L( i2 _- _. d" d' \
  557. STA $BD
    ( C+ S; M* K0 e" p# ]3 M
  558. JMP $A000
    " G# z2 z! \* t+ q, {4 \3 Z
  559. ' g  n0 U" G$ G
  560. FREE:                ; 暂存器保护
    $ T9 R/ A$ |  j- x
  561. LDA $BD9 V: H( @2 e9 m3 Y# E
  562. PHA
    ) a0 V) }( h% O+ L( Y8 I
  563. LDA $BC
    6 M, r5 ^! I- Z# i. N% y
  564. PHA9 \5 w) N0 s1 y4 P
  565. LDA $BB7 e  k# q9 y% M# j
  566. PHA* J' F' f1 H4 E7 B& O* x* b. x7 |
  567. LDA $BA
    ) {7 h, ]/ X# d: m# t) `/ h/ W& c
  568. PHA/ p5 v% r) `( B3 u
  569. LDA $B9
    - A) `3 F0 P+ ?) G' d
  570. PHA
    ; c6 f: F3 v# b; J6 S+ g6 ?7 s5 J
  571. LDA $B8
    2 @, x7 f5 B8 j. D; S% M
  572. PHA
    # n$ \0 L( g4 n& o* ^* |4 G: C2 u
  573. LDA #$00
    8 r) S( }% |9 j% L5 d
  574. STA $B8
    3 X, u4 X- B5 I- N- `8 V
  575. STA $B9" t8 m. @. o+ E3 G& H: S
  576. STA $BA% R3 e1 L- q/ l3 u8 w3 s
  577. STA $BB
    3 F4 {9 ]% r/ ?- a. n. o
  578. STA $BC, U' f+ u0 B/ `* D
  579. STA $BD
    4 r( M& x5 k1 q9 C6 i% ?
  580. 8 Y( q$ {9 F( d/ g
  581. WEAWRITE:                ;武器ppu写入$ ]$ i. a3 M. K! `: Z
  582. LDX #$00
    4 B! d5 w3 X: x3 F
  583. LDA $AA
    . ?6 v& |4 R' k; H  U0 I
  584. STA $B9
    # V2 F8 f1 p- |! w* l5 Z
  585. WEAINI:                ;地值初始化
    , P6 @; a% W# I; {
  586. LDA #$A4
    $ U4 N/ Q4 [5 ?& h% \
  587. STA $BA# R, \! F+ V! T" o
  588. LDA #$20
    # P4 j" x" L/ ?' L! p6 V- B
  589. STA $BB
    : {7 K+ [" @3 i4 ^+ i) u
  590. & {: ~: g: k8 T; _; C5 J

  591. 3 |5 I9 B' O* U
  592. JSR WEA  F; l8 }' E3 S0 y& M" U7 I
  593. LDX #$00                ;武器ppu写入
    8 c! \4 c" c" O' I) m8 l, T
  594. LDA $AB
    9 [0 O3 h6 R+ q: T0 N! s. M
  595. STA $B9" A& r1 m( w% F
  596. LDA #$B36 W, }( k2 D9 v5 t
  597. STA $BA
    ' w; U6 b' R& q$ ?' f3 Z
  598. LDA #$20; S$ _1 j* u, T. b5 Q- Y
  599. STA $BB
    - J# |& L, J- \1 f
  600. ( T/ H4 k  W5 t% P4 J
  601. 9 b, a5 g4 A! ^  Z7 a4 H' J4 Y) \
  602. JSR WEA
    . B: a) h1 J- f& v
  603. $ x8 T% a5 u/ k: J% H% y/ r$ r. z. t
  604. LDX #$00
    ! i1 t) d+ ~1 @  I# G
  605. LDA #$E4
    . S. `* M% r( v. F0 v
  606. STA $BA
    0 B8 `5 `& X: d& H
  607. LDA #$20' {, x, D7 N6 y: G) u; V3 G' M
  608. STA $BB
    7 w$ p% W1 _, j1 t) u/ q0 q/ y
  609. " k3 [2 _; N6 J6 d" V
  610. 0 W& Z( |+ T6 U( l  y0 Z: A% C
  611. LDA $32! D, P& D: z- @, e. y. M
  612. JSR PLAYERLIFE
    : H/ b5 q3 \8 r+ \! z9 Y" k: q6 V
  613. 6 u/ z8 V1 p! j
  614. LDX #$00
    5 r5 X  r/ ?6 y
  615. LDA #$F3
    * z: B' z" n; j; J0 `
  616. STA $BA4 U" o# q: i1 S) }" i9 C
  617. LDA #$20! f+ V: R% E, Z# w; E
  618. STA $BB
    * J0 d, g5 w5 e' k
  619. ) _1 ~# |& Z, g( A. x) W2 u2 {
  620. * y1 c, ~2 v6 J) u5 Q
  621. LDA $33
    ! ^* }! `, T" R9 i7 b
  622. JSR PLAYERLIFE
    , G/ S) b! u$ f. K* W0 N

  623. , C( d' p& D4 A9 M
  624. 0 v# @- `  P" ~. f
  625. JSR PLAYER_01_PPU
    ! F8 K4 s' S. b- i
  626. JSR PLAYER_02_PPU) j8 W* w  G3 N# y, l, q& j
  627. - B3 k0 o9 H# H6 I8 @
  628. 2 v8 ^5 l' t( a/ y& L, J: g7 R
  629. JSR PAGE_PPU
    ) {  Y4 V) k- o0 g' l
  630. JSR PAGESELECT
    8 S$ n: n+ y6 Q
  631. - i# I* \/ V" w+ |0 r' M
  632. . C0 _$ R: Z, @% r) S

  633. , j$ k& c9 P3 l: M2 p( p# H
  634. : U6 y5 q  Z9 x% L0 ?* d
  635. % H" ]) v. H2 ]8 P6 ?

  636. 3 n* }2 u# S: _% K% ?" \) t+ d
  637. $ y7 m3 \' }& e* M/ [) }
  638. 2 c& D: j' g5 n6 _, l
  639. + d) g8 ^4 Y( q+ U

  640. : x* z' M- h; \( O1 A& u" h* v; K9 ~
  641. # P, @, J8 M$ o# G/ `
  642. 1 }* `& Y1 M5 v; x7 s( K
  643. 7 r9 n/ Z& F$ v2 m' n  d; i9 ^# a
  644. PLAPRO:                ;恢复现场
    , e$ s& e! u" p% B5 g
  645. PLA
    ; p' U/ H' s1 Q# d1 w/ B* p' z
  646. STA $B8
    1 v9 S" E# R* s7 w, }0 P
  647. PLA8 J. t" o, x1 G( O9 E! G
  648. STA $B9
    6 _" |1 X; p. {% T" A/ P
  649. PLA+ ?% p3 M' u4 N  u
  650. STA $BA& A7 S- b' G) [; H/ s- E
  651. PLA
    4 ]! _' d. Z9 T6 t1 O
  652. STA $BB
    2 O4 r+ F5 S6 \' s5 u
  653. PLA
    ; R& R- L8 \" a& j
  654. STA $BC
    2 ^& X: d/ k6 R$ N# x1 _
  655. PLA2 N0 |7 j$ d8 `% F( Q+ X; R
  656. STA $BD
    + E( \( d& b% D3 Q
  657. FREERTS:( n" J# K3 s7 n6 M" V& t& [  D1 j) W
  658. RTS
    " x% A1 W2 X* |( v

  659. # D0 ?0 g3 e; }
  660. INVINC_STRING:                        ;invincible' q6 {. S3 T. I2 `; H# ?3 U
  661. .BYTE $93,$98,$A0,$93,$98,$8D,$801 l# |* Y4 M7 k' D8 T

  662. 8 q9 I7 h# s% _; \( p' U
  663. INVINC_PPU:7 a# b/ j! Q& \% a/ L) m: ~: {6 P
  664. LDX #$009 |7 R; J  }' a* |
  665. LDA #$62! B+ E1 u) t# ]- Z; H0 J/ Z
  666. STA $BA
      l* K1 A0 m+ }0 R$ O. l1 s0 K
  667. LDA #$213 p, J3 U% N. N1 {
  668. STA $BB" }/ q" ^3 y* C
  669. 0 R$ u) T7 ^# v: U

  670. % |" S2 S3 X  l9 W. B' l. [9 G
  671. JSR UP_PPU! B; u6 S  Y- b- Y1 f2 B3 l2 K
  672. JSR INVINC_WRITE
    # k) p  M3 g- \3 I
  673. LDX #$00
    + t/ E+ Y2 q' |1 i& d
  674. LDA $07A05 |& y/ i5 X' X, |: y
  675. AND #$01
    0 ^; k9 ~, Y4 y* G  v5 I  Z& R
  676. JSR ON_OFF_PPU; b/ O; O& c- x# h3 W( l
  677. LDX #$00
    , M8 h4 d9 f/ U7 O! J9 P- z4 b; T
  678. LDA #$71
    # P. E8 S8 }  g) O2 `1 N
  679. STA $BA
    , [1 D+ q. N9 M
  680. LDA #$21. U% K; ], D7 H  a/ Y' W
  681. STA $BB- t! R; B/ l6 \) C5 c
  682. $ @' |  x: M" X

  683. , I( e& f! Z9 v/ Z3 v0 R4 C0 \
  684. JSR UP_PPU+ _4 i3 Y3 V5 l8 C; `
  685. JSR INVINC_WRITE
    8 Q* K3 u: y' V: f
  686. LDX #$007 s" P1 @" D. Y3 c" m% C; }0 r
  687. LDA $07A1( \4 t( d$ U- v0 u
  688. AND #$01
    % Z' H% e- J: s$ S: o
  689. JSR ON_OFF_PPU
    5 r- S8 H# R3 y9 z* ]1 J
  690. RTS
    " ~7 |0 R/ M6 F- }+ b, ?- p
  691. ( e+ O6 `' o! d* u( B
  692. INVINC_WRITE:* C6 Y% R$ g) |) J5 c2 x6 @( B
  693. LDX #$00/ \: d+ V4 w) t! Z4 u* S. y
  694. INWRITE:$ R1 T/ c/ h+ S
  695. JSR PPUADDR_PROCESS
    7 t: `8 V3 j( K# b) J6 f: ?6 O
  696. LDA INVINC_STRING,X+ C1 s! K# k2 D8 L( B4 u5 ?3 ]4 @6 y
  697. STA $2007% u% @) s+ q4 b+ H, M
  698. LDA #$00
    5 r! v8 ]6 U6 T1 C/ R
  699. STA $2000
    * W7 j$ t2 P2 P9 A
  700. INC $BA
    # h% f( b  }* b0 t' b( v
  701. INX0 C3 q  E6 I) J9 j; U+ z- y
  702. CPX #$07
    : M8 }. Q. G* R
  703. BCC INWRITE3 F) I8 f( J9 \% G! l2 U
  704. RTS. B" F( \; x. r
  705. . {" m: u7 P& I$ k* U1 w
  706. ON_STRING:. r3 J$ b7 ~# v: {* e) H  x
  707. .BYTE $99,$98,$80
    . e: a% d. X: a3 n
  708. - k: h* d  E1 Q/ A: Q8 V
  709. OFF_STRING:5 v' _, t; l) N% J
  710. .BYTE $99,$90,$90: C- v- }, @  S

  711. 9 ~% c: y6 Q9 Q% }( c! S- m
  712. ON_OFF_PPU:1 o* v- n% x* d, B7 t; A7 \
  713. BEQ OFFWR
    8 p! {' [: l( O$ x, E
  714. ONWR:
    9 h5 P0 o9 U0 e' T
  715. JSR PPUADDR_PROCESS% g8 ^8 G: r. ~! N* x. ~5 ^
  716. LDA ON_STRING,X
      I4 H# |) J8 b7 F& Y- N) w+ V
  717. STA $2007
      x) H+ }( Z8 V6 S" K) ~  c8 ^+ ^
  718. INC $BA0 x: {4 o- A6 B( ^
  719. INX
    % `: V& n2 Q3 z( H
  720. CPX #$03* p" x7 m7 D# L! W
  721. BCC ONWR4 u, g+ L0 |0 s: p0 i2 D& ?9 K/ j9 x
  722. RTS
    ' u1 E. |( i! M( t* W9 O
  723. OFFWR:
    & h9 x$ {8 l2 e* _" |0 Q
  724. JSR PPUADDR_PROCESS# s+ s( ~, c$ r( z/ f" q" d
  725. LDA OFF_STRING,X# @: n9 F  N. e! m  A
  726. STA $20074 ]. t  M3 L7 C2 k5 D
  727. INC $BA# Z# U4 ?( R9 e9 F3 ?
  728. INX
    ! H  b: v7 }, Z0 v
  729. CPX #$03; Q& R! ]- o$ d+ K+ a
  730. BCC OFFWR' E. D! j6 U5 x# r
  731. RTS
    / g: B7 n' {3 G
  732. 5 B- R4 _. X, m+ I+ J- l* w
  733. LIFELC15_STRING:
    , u( k) c' F) Y$ f1 F5 x
  734. .BYTE $96,$93,$90,$8F,$82,$86,$80
    ; U) m5 ^- J4 v" T+ s7 Y( R

  735. ' M* I6 H8 N4 |1 V6 y7 j1 g4 \
  736. LIFELC15_WRITE:! Z$ j) Z- T# a; ~' s
  737. LDX #$00/ N5 K- ]) k1 q
  738. LIFELC15:. I' \% }  ^  V/ M! c! i2 }: o- i
  739. JSR PPUADDR_PROCESS  |3 S8 |: o: z: W% P1 Y. H
  740. LDA LIFELC15_STRING,X. P/ Y* y6 u5 ~$ {( H
  741. STA $2007
    , R6 V1 O* C* q+ d9 o: Y
  742. LDA #$000 V' j5 ?! p# |/ c: C
  743. STA $20004 i8 S; F8 o! S$ @
  744. INC $BA
    / Q* \: v8 v; C* \: I
  745. INX3 a. F. G: }$ V! U  g& U
  746. CPX #$07
    6 J/ a' \% N1 y& W" V4 Y# x9 j
  747. BCC LIFELC15
    2 m/ l) S6 j& p' v- A/ M9 D+ A$ @
  748. RTS+ ^# |! s: ~3 S3 m
  749. + i9 A5 m1 x6 Z0 h4 n7 T
  750. LIFELC15_PPU:& w: |0 \  I9 d$ R* l, }
  751. LDX #$003 J( m, }; t) v' x1 d5 d/ C4 [! n$ x% W, ?
  752. LDA #$A2
    ; J4 m' F* w& |+ E2 ^
  753. STA $BA% ?# e$ P( x$ M! v/ E9 p8 w; z4 v) b
  754. LDA #$21$ n1 _+ L2 H  W) }9 R
  755. STA $BB
    % D  {* y3 k7 B4 e$ l
  756. JSR DN_PPU: e4 ^/ l0 k6 Z2 s4 U4 Q8 a: a% F
  757. JSR LIFELC15_WRITE
    $ P* J. g: T! T
  758. LDX #$00
    ( I+ }* v7 S: z4 ?
  759. LDA $07A0
    7 x; r" V9 }# h& f- {8 ^
  760. AND #$029 _) z, n2 Q7 b0 Y5 d
  761. JSR ON_OFF_PPU+ d1 X6 l% {3 w! R2 n
  762. LDX #$00) [, _( e! @. ~% U+ B! e& f& _1 I
  763. LDA #$B1
    , q1 j" @% T# u$ }
  764. STA $BA
    : n& Y/ _, n5 e) `
  765. LDA #$21  G* t9 Q) p3 i
  766. STA $BB& G5 [) k* d! N2 c( b
  767. JSR DN_PPU
    : e1 u+ C+ d( c6 B; L, t, m: F$ \5 W+ L
  768. JSR LIFELC15_WRITE
    # b5 z4 p5 a: ]
  769. LDX #$00
    % f  \: W# T; Q5 E% D1 K0 z2 H
  770. LDA $07A1
    7 h7 {5 ?. M0 G: ~$ r
  771. AND #$02
    / W; n, H. o$ N0 Q8 c! R$ e
  772. JSR ON_OFF_PPU
    % p, W: A! i9 `/ n
  773. RTS0 m% `( w! i( v" [+ S6 G$ ~* a

  774. 0 I7 I  @7 x) @
  775. DOUCON_STRING:# v5 {, ^; K: o' M# x$ y, o
  776. .BYTE $8E,$99,$9F,$8D,$99,$98,$80
    . d  r6 V8 x6 r4 J# U* \3 X

  777. . p$ v$ j; ~/ ]! e
  778. DOUCON_WRITE:) I$ s4 z- S4 g6 Y# g4 j5 i
  779. LDX #$00% r; i# T0 h0 C$ B  ], H
  780. DOUCON:8 j9 ]8 ]" `9 ~; n
  781. JSR PPUADDR_PROCESS( k& m/ Z; p/ p2 I$ q# Z2 @  G5 ?" B
  782. LDA DOUCON_STRING,X' ^) L9 x2 s. Z, V; u! s
  783. STA $2007+ K# |& J8 m7 \0 J& V
  784. LDA #$00: q  n: a+ _% g0 L  k
  785. STA $20000 U3 Z/ J6 C2 P% E& s# m# E
  786. INC $BA
    % T0 N$ K* L& o4 C# p/ K" ~. r
  787. INX* c) _+ [& z4 U
  788. CPX #$07. u, H6 g3 O. R" r; P; Q
  789. BCC DOUCON: m& t$ [( L; H" e' @8 t0 N# p
  790. RTS/ L1 N# Y+ M4 E9 A: N7 a$ i  c8 B
  791. # L. s" F7 L8 a
  792. DOUCON_PPU:
    % p4 _( Q8 L$ e/ I0 K8 x8 _& N: E4 @
  793. LDX #$00
    4 {5 C6 [6 D4 [$ W* p0 D. q% w
  794. LDA #$E2
    9 L7 h5 e- H7 R; o$ i/ S2 H# A" O
  795. STA $BA
    4 L( G, Q7 r4 w6 V
  796. LDA #$213 Z1 R% y" X( g! C$ s5 @* Y, p
  797. STA $BB
    " |" ~) R& G( v$ f( D9 C5 t
  798. JSR LF_PPU3 y. l8 Q2 \# i: P
  799. JSR DOUCON_WRITE
    . M+ H4 t) S4 Y& W" D7 W
  800. LDX #$006 O. G+ l+ Y1 U; C/ C& u5 n
  801. LDA $07A0
    : D) R* K+ Z3 [- Q% B. R; R) ~* d4 a7 i# s
  802. AND #$04
    4 p1 q9 {+ |- t6 A9 a5 o
  803. JSR ON_OFF_PPU
    + J, E& |2 u3 S
  804. LDX #$00
    ; v/ S1 K: z2 e8 x# h' }( L
  805. LDA #$F14 ^* h  H; i  B6 @* B3 r
  806. STA $BA$ d) {7 S- E& I
  807. LDA #$216 b! J4 d% a6 _
  808. STA $BB/ @, Z6 D& i8 X7 m5 {( m$ k2 d2 ]
  809. JSR LF_PPU
    ) i! H1 V, X& W, r' S
  810. JSR DOUCON_WRITE- H5 X& n4 u3 C
  811. LDX #$00
    ' W, V3 A0 \' `6 f
  812. LDA $07A1
    . g2 z  v! G& t& I# h; N
  813. AND #$04
    * N7 i% g: x: U7 |# y
  814. JSR ON_OFF_PPU
    & U2 ]$ P! x6 t3 \( L' G$ P2 i
  815. RTS
    : r: J7 ~& L% x* O% L
  816. 8 z; H  ]- Z0 c* W% e
  817. LIFELOW_STRING:
    9 l% U2 C! v9 o4 O
  818. .BYTE $96,$93,$90,$96,$99,$A1,$80
    8 \; _+ B/ i- s: ?1 a+ E
  819. % k% [) V3 K' C% T
  820. LIFELOW_WRITE:1 H. ?: b( s9 J3 h) o
  821. LDX #$002 y5 Q- M) X% C
  822. LIFELOW:
    5 O/ W" o( ~% D$ ]) k1 b* M, E
  823. JSR PPUADDR_PROCESS
    7 a; ~5 p; ~# h& G- [+ U$ s) }  C. S
  824. LDA LIFELOW_STRING,X
    5 x- |* p/ U1 r9 E, X% t& l1 l( H
  825. STA $2007# [* M$ e2 W' ^& A
  826. LDA #$00* t' n/ b; j  ~& Q' C5 y. V
  827. STA $2000
    ' t4 d# r8 t; I8 O! V* \, x. _1 C
  828. INC $BA
    $ n9 N% ~5 y  i2 U
  829. INX4 Y9 g/ R: S! D  h+ S! ?5 F; U2 K
  830. CPX #$07
    / m; l0 d' E8 d' ?
  831. BCC LIFELOW+ t' B  q$ t" t
  832. RTS9 @0 @  p& e: d. r2 \) o8 c
  833. ' J' P! a* U  v* X: o
  834. LIFELOW_PPU:
    9 ?; M' ]/ Y& |5 @2 J. t( ^
  835. LDX #$002 ~" w7 M0 P4 n: }, Y+ E1 N
  836. LDA #$22
    9 I9 y* E7 {8 `6 Y
  837. STA $BA, [2 r. r  d  r5 h1 `! g
  838. LDA #$22
    5 Q/ Z2 B6 y9 Y5 k+ A4 B. p& Y
  839. STA $BB, @+ N4 b, g$ ?5 n6 L4 `! T+ m
  840. ' i  H# H8 [* i/ [# j6 z

  841. ) ]( G5 E4 Y9 b7 B
  842. JSR RG_PPU  r, c3 t# v5 z
  843. JSR LIFELOW_WRITE
    # T& H* Y9 a/ C! X! m+ f
  844. LDX #$00
    9 Z( G$ c* o8 F2 Q
  845. LDA $07A0
    0 k0 W9 R- [- [, Y9 A9 s1 j
  846. AND #$08* h) m2 w+ h0 e- m
  847. JSR ON_OFF_PPU
    ; K! E, Y: e) Q6 A6 [7 x
  848. LDX #$00
    7 W( y; k* X, |. e, i. K9 b$ X
  849. LDA #$31/ v+ a$ W  }2 e5 X& p
  850. STA $BA5 y) B  P5 }8 s
  851. LDA #$22
    6 I3 J1 `; j/ e1 y* ^
  852. STA $BB) b! j+ A- E4 y% r% d! U3 M* ^" v2 @" w

  853. , Z1 t) z- {! v
  854. : r" W) H( w8 H- |
  855. JSR RG_PPU. z. Q: {% k+ o8 l
  856. JSR LIFELOW_WRITE8 [9 b* p0 I3 y1 K9 C
  857. LDX #$00
    * i; P: Y+ e, s" q+ d; J! {! Q
  858. LDA $07A1
    & ^9 u7 g5 K' Q6 o6 ^4 {+ W. e
  859. AND #$08% R6 o0 e! m6 Q  ^. q
  860. JSR ON_OFF_PPU# q$ T6 z8 ?7 n' E7 J6 S
  861. RTS
    # {# H9 z+ H' O2 P  e( R1 Q% ]

  862. 1 [: f" p( _( B* ~7 U% e  F
  863. KILLON_STRING:
    0 a6 ~9 C( M6 F, Y
  864. .BYTE $95,$93,$96,$96,$99,$98,$80% I6 R9 r  B+ i( ]9 V. `3 y, I4 z

  865.   G# |0 E# P# R/ ~3 E% |
  866. KILLON_WRITE:( H" }5 u) j7 N* U
  867. LDX #$009 ^% }# P0 h4 W6 Y; H
  868. KILLON:4 J5 _- S/ V* P
  869. JSR PPUADDR_PROCESS
    4 a7 D$ x. C4 i
  870. LDA KILLON_STRING,X+ y$ t/ O2 v6 b3 e" E' x% m
  871. STA $2007
    % H0 R$ X4 y! b; @. D4 a
  872. LDA #$00
    9 Z7 c4 P* s0 D: b! {
  873. STA $2000
    % \: ^6 V6 @9 `$ t
  874. INC $BA
    4 _8 Q& N3 k( k0 N- z/ Q' e  r
  875. INX
    " O2 \; ?/ q0 c, C' m0 w7 ?
  876. CPX #$07
    % I- }1 x; }* Q; B2 C
  877. BCC KILLON- ]+ Q' S8 F2 [8 N; F# E
  878. RTS
    * u3 f) E6 p2 \. P/ I

  879. % u) s! B2 D3 l! k
  880. KILLON_PPU:
    0 x" M5 }# }8 c; `$ B; j3 \
  881. LDX #$00
    ; {# I/ l, b& W- N! s
  882. LDA #$62
    8 @- j0 M$ s" l# y
  883. STA $BA+ u' m& l- D4 y* x
  884. LDA #$22
    - Y: g: r# R+ T$ q: a
  885. STA $BB
    - I/ c: m/ U9 Q- w: E5 J+ w& P3 l% M3 ?

  886. * d7 b" i7 r9 k1 Z3 K6 u6 a, `, E7 l
  887.   `* c( v6 A0 N2 e8 Q$ l
  888. JSR B_PPU
    ) {. l' ?% o/ u! {
  889. JSR KILLON_WRITE( N( M- D3 h0 I
  890. LDX #$00
    + f9 C8 f- E/ G) |
  891. LDA $07A0
    ( P* J% t7 L  A4 M0 ~: G
  892. AND #$10
    . F3 q4 a* u3 p0 J  s
  893. JSR ON_OFF_PPU
    + _5 e4 t6 t$ [5 b( g: Q- |
  894. LDX #$00
    " \( R) P/ |4 f) W4 D
  895. LDA #$71
    ; K, S9 N2 F+ @0 T9 r: m
  896. STA $BA& h$ y/ D" z9 z1 y% m, q! l, P4 s
  897. LDA #$22
    ! F! W, n3 O6 a, Q
  898. STA $BB
    1 w' Q0 X! \9 N- i4 I2 I: L  D

  899. & ]2 S% E2 q9 J# o7 q" `: S3 T* X
  900. , a: Q& A6 q) a4 F4 c4 E
  901. JSR B_PPU
    , ?% u; o, \6 B9 M' Y  H. Q+ b
  902. JSR KILLON_WRITE* R3 }3 Z  H7 ]/ u9 d/ v
  903. LDX #$00
    ; i) r" r% U- t2 ^
  904. LDA $07A1
    + d4 T; r" W) Q4 ^2 `8 P7 E# v8 c
  905. AND #$10- \  Z4 o% n; H/ J& v* Q
  906. JSR ON_OFF_PPU
    ) `. H5 j0 X4 q9 ?3 U5 W* |
  907. RTS- n* C$ `+ b4 f7 W% R

  908.   z5 e6 [) w7 c& T
  909. SKYFLY_STRING:
    3 n3 L4 H* U0 D% O
  910. .BYTE $9D,$95,$A3,$90,$96,$A3,$80" K4 ~( p; }2 X9 _
  911. ( ]" \2 U$ _- y$ A# x# ?. T$ C' N) v
  912. SKYFLY_WRITE:
    * R9 ]0 }; B* V" C+ {* q) H
  913. LDX #$00
    & U' ^; P6 c  V& {' R1 n
  914. SKYFLY:
    & \/ v+ t6 i  }+ I+ ^/ O
  915. JSR PPUADDR_PROCESS
    * B6 U  X: g8 g0 J+ |
  916. LDA SKYFLY_STRING,X9 H/ J: U0 O& S/ U
  917. STA $20079 N, ^  q! L3 N3 v
  918. LDA #$00
    7 ^% l4 @+ K; g2 u2 S9 k
  919. STA $2000$ A7 B8 b& f4 {' S4 e" t
  920. INC $BA
    * \+ {" l* c) e: L) l( c
  921. INX  x8 H5 X3 z2 c& T) ]6 [) b$ [7 ?
  922. CPX #$07
    # u  c1 ~& z- h* O8 y. h
  923. BCC SKYFLY1 R3 }; p2 O" w) f# d
  924. RTS
    $ @! _# a0 i" ?
  925. * P2 L3 n+ S) Z) a; K) E
  926. SKYFLY_PPU:
    , Y9 ^* r6 c# j  ]
  927. LDX #$005 G  ^( T7 I. j$ p
  928. LDA #$A2
    , F  ], m0 L$ \
  929. STA $BA
    0 C0 y% Q3 t# g9 y
  930. LDA #$22
    & g0 k* R. q/ A# @* l. A
  931. STA $BB  w! ~/ T" ?0 O9 l3 q$ K1 x0 r9 O2 |: F
  932. 8 u% y$ j- `7 y! v" t5 ]
  933. 1 q5 Z# a3 T8 K& g+ e. F
  934. JSR A_PPU4 b/ S: S) Z4 B4 M" e2 D
  935. JSR SKYFLY_WRITE8 e8 P' ?3 Y. i% b, K" S( `
  936. LDX #$00
    6 f0 l8 a. B# G. s
  937. LDA $07A0) ^6 ^' k# \7 w( n$ Y
  938. AND #$20
    ! R2 x; h  e- D
  939. JSR ON_OFF_PPU
    * Q& m2 `+ x: `+ [- \4 D1 C& h
  940. LDX #$00
    2 I7 h* H% _. n9 P
  941. LDA #$B1" m6 [8 X; z1 k
  942. STA $BA
    3 I7 J3 x# i, ]1 |0 q
  943. LDA #$22; y% d3 n% A2 |5 J
  944. STA $BB
      o2 u, ^9 P5 {! }

  945. 1 v4 m6 u1 [, e, j

  946. 9 N; P/ o# U  q% f7 U/ ]" X" |" o
  947. JSR A_PPU
    . V9 [2 B; m5 V  r- p# h
  948. JSR SKYFLY_WRITE
    6 i/ c' H( \  a8 Z! O8 ^
  949. LDX #$00
    2 f1 q) x( R6 E) G8 k
  950. LDA $07A1  U/ m' w" I4 Z$ r1 j$ t& j( @- e; k
  951. AND #$20
    * E3 l, p; ~- M6 o* @4 U
  952. JSR ON_OFF_PPU
    1 ?1 }2 \7 Q5 Y( J7 d* O. J
  953. RTS8 ^* U* E# v  M& B( r& \
  954. ' C$ d4 q2 n& `
  955. BULADD_STRING:+ }, y, B9 a( Q$ e2 [) ^6 Y+ y
  956. .BYTE $8C,$9F,$96,$8B,$8E,$8E,$80' b6 A& I" M7 J: f0 X; ~- X4 Z  f% x# g
  957. / r4 W/ Q6 I8 Y$ X/ p' ^' t. }
  958. BULADD_WRITE:
      z. B  t% f) N& i. v, q, ]/ U) I
  959. LDX #$005 w9 u4 o$ p& m, `3 z
  960. BULADD:
      x& t5 S' a# Z- o  D% m0 h
  961. JSR PPUADDR_PROCESS' s# t& b6 b% d$ S1 l8 K- [
  962. LDA BULADD_STRING,X
    3 p' y) K' z* @1 W  f; J  i
  963. STA $2007
    - ?. t) d8 o9 s* P" M6 {
  964. LDA #$00/ }7 p! A& j6 O' \
  965. STA $2000
    # `  W3 j7 @9 O2 u0 P) b
  966. INC $BA
    9 e2 y: a& X+ y" `  v
  967. INX
      Q- R) q" i/ E
  968. CPX #$079 |+ @2 a( f4 m4 o1 x* c
  969. BCC BULADD" `) F- y% G1 _# `
  970. RTS
    0 j$ x% v" c/ a
  971. 2 i( c  R- z! K2 W  q5 Q$ A
  972. BULADD_PPU:
    7 o9 p6 u8 M- K5 G- `
  973. LDX #$00% ^; n: ~9 O" U5 N( j" S
  974. LDA #$62/ O$ ~$ n0 k; P2 s  D) A3 c: `. ?
  975. STA $BA
    9 x5 a/ f" t" q: R( P
  976. LDA #$21
    % P! E7 {1 R1 u0 A; Z! ?8 X4 v
  977. STA $BB
    2 ^. h, b7 {, ~6 D5 a+ a
  978. 4 H9 @0 H  B) u$ I

  979. + M- b: A! }* y9 K+ S
  980. JSR UP_PPU
    7 R, P8 B0 e: |' {: H: a6 j
  981. JSR BULADD_WRITE
    0 \& ]$ ~0 \( {, A5 x5 U) Y& V& r
  982. LDX #$00# N( ~: B4 o/ M- W, l. j
  983. LDA $07A2, n0 ]; t) S! [  x
  984. AND #$01
    - |3 X4 h) F. r: D
  985. JSR ON_OFF_PPU6 w6 ~% M" A2 d
  986. LDX #$00* D2 C3 v7 {4 h- Y+ t3 W
  987. LDA #$71
    * ]- N4 n2 {1 E  ?2 u
  988. STA $BA+ U+ g5 H- ^! v- g
  989. LDA #$21
    " t. z( ?1 n0 U/ @$ O9 y+ l
  990. STA $BB3 N3 @* d0 e: A4 [# U$ u4 X+ g
  991. ; o; g  s7 Z, S& Q
  992. , W5 U! {8 y' E! z$ ^1 J: D
  993. JSR UP_PPU
    ' Z5 U+ N& h+ D% w( T8 n
  994. JSR BULADD_WRITE( g- L$ X2 s" k0 u9 u
  995. LDX #$00* q- T8 _' J* F) i
  996. LDA $07A3
    6 b/ S% ]# g4 B: F) b
  997. AND #$01
    ) {1 B  q9 E9 l
  998. JSR ON_OFF_PPU
    - U6 w/ O  ^( A. ~
  999. RTS  t& e4 X% M" Q
  1000. 5 W( X8 ]. u1 T) A4 ]
  1001. MENU_PAGE_STRING:
    ( \, s; |' A7 Q5 L
  1002. .BYTE $97,$8F,$98,$9F,$80,$9A,$8B,$91,$8F,$80,$81
    3 F; A: q" X& h! O! {
  1003. 3 T& n9 M! r8 l
  1004. PAGE_PPU:" v8 P8 C; B# P6 v/ b% e* }$ i
  1005. LDX #$007 o# p) w  W3 a  [4 E0 J
  1006. LDA #$0A
    , ]4 ^  p! T2 P9 u/ o7 A
  1007. STA $BA
    ; T/ Z. g# }% t; q+ p7 @
  1008. LDA #$23" B6 ?$ O, f+ A& q  z* l# p8 Y
  1009. STA $BB# l/ G: R, P( E5 ^( P
  1010. ; e" G0 c- ]* |! A/ g& w
  1011. 0 H/ G6 [6 ~+ F- |6 ]
  1012. MENU_PAGE:- U" ~& p) m, H4 E4 n) U$ L
  1013. JSR PPUADDR_PROCESS
    . `( w9 N+ o0 N! j$ B7 ^
  1014. LDA MENU_PAGE_STRING,X
    . G! V0 [+ j( U0 C) J  _
  1015. STA $2007+ q  |7 A4 D6 I8 h+ a* H
  1016. LDA #$00: a# a8 m2 H! y8 ?8 F+ D
  1017. STA $2000
    ' T, D- t& v- I/ k( M' R. W
  1018. INC $BA0 ?1 A) z9 v+ s/ h' v
  1019. INX0 {% q  x" s* j% ?! W
  1020. CPX #$0B9 k5 ?" i! c  y: ?! E
  1021. BCC MENU_PAGE
    4 l1 }' q2 q/ m: L
  1022. LDA $07AA
      X8 P7 Y- j9 n1 `
  1023. CLC- k% n8 \) z7 w" r1 n6 @3 W
  1024. ADC #$82. s. Y/ z9 ?: E3 j/ H2 }
  1025. STA $2007
    + u# m' R2 F0 M
  1026. LDA #$00, q8 x$ t, D* U% Q$ B! u
  1027. STA $2000
    % @+ F( ?9 \1 m, B1 F
  1028. RTS& }8 J/ C7 X7 a! W7 Z
  1029. $ K$ P+ R/ D2 w0 d- _( b

  1030. : x& {, m' C2 x
  1031. SKINGE_STRING:
    * y9 U# ^, `& {, r' Q  K
  1032. .BYTE $9D,$95,$93,$98,$91,$8F,$80* `" {+ @6 m  F0 s

  1033. 0 q: W% ~9 Y& [$ O6 ~' `& m/ Z
  1034. SKINGE_WRITE:
    - n: e, |2 `8 ^, t$ |5 V5 @; m
  1035. LDX #$00
    ) f1 n9 a! l3 R$ R5 }
  1036. SKINGE:
    5 j* \( g0 p5 N" }7 V2 _
  1037. JSR PPUADDR_PROCESS# s! u/ W& F5 @" ~2 [) ^
  1038. LDA SKINGE_STRING,X
    ; v1 H: |$ Y, {, ^0 f
  1039. STA $2007
    8 {. g# d$ J, l$ h
  1040. LDA #$00$ L7 b: ^) ], k, A: m
  1041. STA $2000
    & ^! b1 T! b/ k/ O( {: A9 l1 q
  1042. INC $BA
    ( h  x- f  ]" C* d: C( J: ]+ m
  1043. INX
    % x9 S' O; r1 n: O  C1 m
  1044. CPX #$07
    , L9 T* N6 j; O) F
  1045. BCC SKINGE5 V4 w# q7 N+ u  v0 g9 C
  1046. RTS
    1 E+ S! X4 c; x. d

  1047. 7 B9 O% ?3 t. J  R# f6 T/ W! A
  1048. SKINGE_PPU:
    9 K, r2 x' g4 z) Z2 b( p
  1049. LDX #$000 p8 P/ L; W# b
  1050. LDA #$A2
    0 S. Q" S8 @  G; h$ b+ L# f! f6 T
  1051. STA $BA5 T) ~& h7 D% q- @& V
  1052. LDA #$21( E: \" `7 N) s1 t' e
  1053. STA $BB
    $ S3 |5 ?* u% J) f

  1054. 8 y9 f+ ^3 t  a4 S" E

  1055. : m! S; z+ E3 V: d
  1056. JSR DN_PPU
    2 X' m( V; O2 X
  1057. JSR SKINGE_WRITE' s6 R) @+ f1 d4 ?6 W7 S4 s& b
  1058. LDX #$000 M9 u# _& k- D) ~9 t' f# P% F
  1059. LDA $07A2
    6 w0 C. A: U2 D0 l6 J2 E
  1060. AND #$02$ W4 `$ S7 x, G" a; Q$ m6 ~
  1061. JSR ON_OFF_PPU" U* p* S5 B1 F) S# Q" K" ?0 b; @
  1062. LDX #$00
    " H& G2 t% {% Q* e2 T, x) w
  1063. LDA #$B1
    % K" _4 t; t+ z' T
  1064. STA $BA
    % D) d. K5 ?4 `5 G* C0 i
  1065. LDA #$210 w. r4 N5 _+ G0 O/ |4 i
  1066. STA $BB% }/ d; \! w  l" u8 @& n! L
  1067. $ M$ r1 t4 s- D/ [
  1068. 1 x9 L8 M% f3 k
  1069. JSR DN_PPU6 z- ]: q  R+ h! D
  1070. JSR SKINGE_WRITE7 g8 a$ x' W( ]& r  e
  1071. LDX #$00: J; x/ p: d4 j- t9 i% ^
  1072. LDA $07A3
    7 d! J6 N0 V3 ^' w0 ]: P8 ?
  1073. AND #$02$ o4 D9 B2 o. F* H3 m& E
  1074. JSR ON_OFF_PPU
    0 K5 p) r( J2 F' P; }% k
  1075. RTS" ~& ^; @$ a$ R- ]" H( i
  1076. ) r3 `1 ^) J  |# C# x! t
  1077. BULMIX_STRING:% H/ P* R$ G+ W  Y& _7 V1 }8 q, i
  1078. .BYTE $8C,$9F,$96,$97,$93,$A2,$80
    . L3 X  X# S1 S$ K% f: t
  1079. 2 d& V9 _+ o2 l5 I" _; M* y, Y
  1080. BULMIX_WRITE:
    0 S4 s$ c8 ~8 Q% \
  1081. LDX #$00' B: ^  B" Z% ?) r
  1082. BULMIX:
    & C% U+ i5 M* V( d! ?5 l8 B
  1083. JSR PPUADDR_PROCESS
    1 C7 ^6 h" @  l  i& ?) W7 f3 v
  1084. LDA BULMIX_STRING,X
    2 X$ n4 }: b4 ?; w& c
  1085. STA $2007
    ' l# _8 M  h: o, l$ q- f, o
  1086. LDA #$00
    5 E& H5 u. b4 c6 s# h
  1087. STA $2000
    . i% W" C9 w+ a0 Z0 E
  1088. INC $BA
    ! ]$ r. y* |- [/ d, R; _; H7 E
  1089. INX0 u. Y! S. Q4 x+ ]% o
  1090. CPX #$07
    , p5 L$ b9 T. n) l, Y2 V8 g
  1091. BCC BULMIX% B# A+ K2 x8 r% n7 n$ P/ _
  1092. RTS& T/ C; F* B) C# s% g! z! {
  1093. & E; c3 {$ u; v1 Y* e" P2 x1 ~
  1094. BULMIX_PPU:
    & B2 U/ z+ Z6 R0 B( }
  1095. LDX #$00% M  Y# ~' C. I- ^& q; p
  1096. LDA #$E2% x) {1 V& n. `
  1097. STA $BA
    ; c  j7 x0 I& X# h6 L) T
  1098. LDA #$210 o( p6 i+ K+ V; e; h+ m
  1099. STA $BB
    $ [9 v1 a6 Z4 l5 f% v- N  @' J
  1100. 2 g" Y% V* H" q$ a/ w5 {) z

  1101. 7 `! G! ?/ v1 u6 m4 D! k
  1102. JSR LF_PPU
    7 ~/ i" e  Y. V$ |. ?; Y
  1103. JSR BULMIX_WRITE1 i5 H- D" X8 r  o
  1104. LDX #$002 n* r" \' B8 j, F" X+ S8 y+ m
  1105. LDA $07A2
    0 `# c4 o; N, }0 H) ~& ^0 K9 i3 j9 @
  1106. AND #$04
    5 ]2 V; @% \; ~) ]/ n
  1107. JSR ON_OFF_PPU
    3 x/ d9 g9 g" k
  1108. LDX #$004 {; {5 T: D4 f5 D
  1109. LDA #$F1
    . {- e$ J; \: d/ J
  1110. STA $BA
    9 O( n6 I) ~2 V- C1 k: M: N' j
  1111. LDA #$21
    . i1 S4 U! W5 C- n
  1112. STA $BB
    & u3 E- e0 x  x' v4 t+ I

  1113. 0 i/ z! h$ E) q$ V( A
  1114. - l: m) Z8 L+ |& L* A3 P$ z1 M4 Y
  1115. JSR LF_PPU* e4 W  y$ B7 N" a3 d7 C; y5 f
  1116. JSR BULMIX_WRITE- l% ~% g+ q+ r) U- v* V8 b
  1117. LDX #$00
    1 V* l0 y3 y. {& z" z: G8 _! B- I
  1118. LDA $07A3
    ( q' q8 E- `2 O- i. \
  1119. AND #$04
    9 X- ^5 V" M, }1 `) H2 @  F- g
  1120. JSR ON_OFF_PPU
    - _: X5 {. d" ]- R5 M0 P8 U* S
  1121. RTS6 m6 e2 V& A* q5 d  }/ u1 B
  1122. ; a; l% j$ c$ p$ z! V9 v2 U$ A
  1123. ENELOC_STRING:
    + n8 u  q5 B# ]7 o7 _" M/ p
  1124. .BYTE $8F,$98,$8F,$96,$99,$8D,$80
      \$ d+ w7 M) `* m! ]* m
  1125. 6 p1 l/ K! U4 R- ?# }) X6 l
  1126. ENELOC_WRITE:
    ) Y* U3 l2 u# ?9 h+ I  }  _; P
  1127. LDX #$00
    7 a" Y/ O2 [& V8 V
  1128. ENELOC:( k9 T, b; `$ j8 I# N" u# z) V
  1129. JSR PPUADDR_PROCESS
    8 w/ w* V) d- e4 M! x- w1 a" X- d, I
  1130. LDA ENELOC_STRING,X: I7 H5 L) C5 x5 Y
  1131. STA $2007) \0 o- E, a' t! ~6 d
  1132. LDA #$00
    4 m. ^) X, A$ B( e1 g4 a: R: d
  1133. STA $20004 {' z. T5 c. m$ C
  1134. INC $BA
    ! E. ]( v  Q+ Q5 h: S
  1135. INX
    & T; P5 t( B% m9 E) n- u: G' C+ R
  1136. CPX #$07
    . C& f. \& n% V7 Z5 ~
  1137. BCC ENELOC
    ) c4 I5 d1 G* ?$ W& K/ z
  1138. RTS
    ! G, P, L. i9 x/ P" j' p# E

  1139. 3 H: j, O; U4 @6 s5 |4 C
  1140. ENELOC_PPU:
    " e. Z2 b* |: k% V+ S
  1141. LDX #$00
    + L( J2 X& s3 M; J# E5 h' h; m8 n: {
  1142. LDA #$22
    ! G' P+ c5 F/ P1 S+ R
  1143. STA $BA7 r6 @% @& M( `$ _& }7 b
  1144. LDA #$22
    # _5 z: j4 o* M9 L* d! D$ a
  1145. STA $BB# j' v- H1 V0 T' q9 e

  1146. " o+ o/ o5 o! _0 W! r6 v/ n0 }7 p
  1147. ; L1 _% A0 Z0 X6 j
  1148. JSR RG_PPU! _2 I2 _# M- Q6 ~9 g
  1149. JSR ENELOC_WRITE
    0 h8 U  f- x. O4 M  H  \
  1150. LDX #$004 c/ F8 a% ^9 b$ M
  1151. LDA $07A2$ o, t1 C, V; l' h( i9 ^
  1152. AND #$08
    : {! j7 Q) G, o. o! R8 a0 g
  1153. JSR ON_OFF_PPU
    6 F6 T9 q# j4 ]( ^6 f3 V
  1154. LDX #$00
    * m. @# A$ D9 A2 n; x, O+ |- f
  1155. LDA #$31
    - T2 F6 W9 Z. g- ]2 C
  1156. STA $BA2 K& e/ V5 B0 z
  1157. LDA #$227 Z0 X3 D' T1 s5 x
  1158. STA $BB# x% a: x0 B; i, O- o2 f* n

  1159. 8 c/ d2 B+ M: m
  1160. ( |* u, A' l" N7 }, }; @! k
  1161. JSR RG_PPU
    % k# m- L, ]" b7 w0 [
  1162. JSR ENELOC_WRITE
    9 j6 e) c  |7 ]* l* c5 }! b  r
  1163. LDX #$00
    : l% I, _6 S2 A7 w# t1 l3 H: C
  1164. LDA $07A3! G) B3 a9 x( E4 n% j4 v2 a: g0 G5 U
  1165. AND #$08
    , u' m/ V% V) q$ L. Y/ B
  1166. JSR ON_OFF_PPU( B6 m! u. j. q! p( n  e/ M' }
  1167. RTS( ^% x$ P0 m# c4 v

  1168. 8 [( Q& x( P, S5 E( B( `" x
  1169. FOCFUL_STRING:
    & X% T& t% U1 v" V4 `
  1170. .BYTE $90,$99,$8D,$90,$9F,$96,$80, b- p0 {5 Y( k
  1171. ; T, f- I4 W1 w

  1172. " W! H* q9 \3 J" o+ V- n; t
  1173. FOCFUL_WRITE:
    " g$ R! C0 [* |) Z$ x
  1174. LDX #$00
    . q$ z7 g3 O5 d4 s/ z
  1175. FOCFUL:" _. H) T9 ]  c
  1176. JSR PPUADDR_PROCESS
    9 y9 [( g" v% c" |2 m
  1177. LDA FOCFUL_STRING,X
    3 ]8 h* f' f( Q% v
  1178. STA $2007
    ! ~6 O) `+ w; o6 R2 b
  1179. LDA #$00& G4 I5 U4 k7 v
  1180. STA $2000! I# Q1 e' P9 ?  ?
  1181. INC $BA( U' U& }# h' C1 f5 A
  1182. INX
    , @: M' ?! s6 U) S
  1183. CPX #$07' U* M" y& W9 n7 Z
  1184. BCC FOCFUL
    * k/ x1 ^; I% }7 a, r
  1185. RTS2 u6 G' D  A+ }* Z
  1186. ( }7 X4 C4 j$ Y3 S5 D1 n1 L
  1187. FOCFUL_PPU:
    6 T) p$ ]3 o4 ]' \- p% i! X
  1188. LDX #$00/ i; F$ D( n9 q0 H5 g, _
  1189. LDA #$62' G8 N: i( V+ V5 |4 {
  1190. STA $BA% q+ S+ D7 j" j# u- h3 q9 _
  1191. LDA #$22
    2 O+ j. W$ y3 q3 {% S
  1192. STA $BB1 T) C, S) r3 ?% i& Z; `1 H
  1193. . [. s/ i; K+ O2 \$ U6 G  @. i

  1194. . ~: U$ ^8 I( E/ |$ k
  1195. JSR B_PPU
      f; m% S  l8 M+ _/ D" U# L% b; f
  1196. JSR FOCFUL_WRITE. c( B' P, N, |) J" F
  1197. LDX #$00) D( U0 @& Q. w  `5 c" D: o/ r$ D
  1198. LDA $07A2
    8 ~3 b; C2 i, w( ~; v+ e5 a3 W# B
  1199. AND #$10
    8 @% V  e" Y6 j2 G) K' D
  1200. JSR ON_OFF_PPU8 u- _- _5 b; u  W! H# U6 _
  1201. LDX #$00
    + S4 s. f+ n" \" O- B" r+ F( O
  1202. LDA #$71& |5 @0 t/ U* E, ]5 X" e$ n: [3 H
  1203. STA $BA
    : X. u$ t7 B( p
  1204. LDA #$229 `" X( r# L% ]% ]
  1205. STA $BB0 Y  N  N& T6 x8 K
  1206. $ K$ N# u3 L5 I
  1207. / ^6 L$ C1 m: ~2 f( P( [) K3 L
  1208. JSR B_PPU# B6 k9 R& A$ y$ l
  1209. JSR FOCFUL_WRITE
    + v2 u* l' P- M1 \5 u% f
  1210. LDX #$00
    ' K3 O1 o( ]+ _3 t4 h, o
  1211. LDA $07A3( W9 H2 Y5 o  x) _' U/ c8 i- \4 y
  1212. AND #$10- t* L; X" h8 }" M% ?- @( d2 U" F
  1213. JSR ON_OFF_PPU0 i, d5 U' E4 N* q6 C
  1214. RTS
    " v" `" S% g3 d, u  U3 \+ h- j4 H0 U

  1215. 3 t, w) h: ]. s5 @9 V' e  C/ V
  1216. BULCON_STRING:
    / ^! I9 `8 f0 g
  1217. .BYTE $8C,$9F,$96,$8D,$99,$98,$805 h" c3 q' Y" m0 D4 F. s1 f' n

  1218. * H0 l& W! N0 Y8 _( P
  1219. + [# i; A4 r3 `9 h
  1220. BULCON_WRITE:
    . q3 y7 e, u0 G7 M
  1221. LDX #$003 [6 L3 _( ?3 p
  1222. BULCON:  @( L: \; s4 {. G; w, E
  1223. JSR PPUADDR_PROCESS
    % N' Q6 T  q/ i
  1224. LDA BULCON_STRING,X* G. t. N# ]0 N, [0 w
  1225. STA $2007
    1 u5 q+ r$ {8 Z
  1226. LDA #$00$ y9 \1 e! J' Y3 V$ S3 b& m3 B
  1227. STA $2000' L5 V5 f! u2 v
  1228. INC $BA/ S& M/ D$ P5 Q0 w: M; M1 N
  1229. INX# E" g* C2 N1 I
  1230. CPX #$07( y$ W1 A. B: U( Y- ~! L
  1231. BCC BULCON
      i7 T7 L/ X+ v4 u5 n- Z5 N
  1232. RTS
    + G7 c+ e( F( Q* }3 ^6 A

  1233. 9 y7 r6 i) @: ]7 w
  1234. BULCON_PPU:
    ' n- r  U3 ~! M( H" d0 K5 W1 x! T
  1235. LDX #$00  E8 T! o2 Q$ v( Y/ ^* X
  1236. LDA #$62
    % w! Y5 @: B9 }+ [
  1237. STA $BA
    # c$ w# M) l& t- ~/ T" l, E
  1238. LDA #$21
    ' e8 _8 i: }3 y" y2 k
  1239. STA $BB
    4 H) Q& Z' B& |+ F% v* V" |

  1240. 4 h) G( h5 Z8 e: ^* @

  1241. 1 P& k5 r; |( d! _3 F' w- M7 N* U5 ]
  1242. JSR UP_PPU) F9 B2 w; a3 R8 K/ e
  1243. JSR BULCON_WRITE
    0 v. `3 D; X2 d; E$ d
  1244. LDX #$00
    5 R! M0 S! n! y% m2 k
  1245. LDA $07A4
    0 e# a/ V* Y. s) T8 p
  1246. AND #$08
    2 v. I5 v" V8 R3 X& w
  1247. JSR ON_OFF_PPU5 n2 f8 l( S' e7 Z, C( v6 h) S) Y4 ?
  1248. LDX #$00
    6 y# G6 {0 W% e' k, f; g& z& u
  1249. LDA #$71
    9 n/ W" O; B3 U9 Q
  1250. STA $BA& s. B6 I- s* \  ]: b
  1251. LDA #$21
    9 O, [4 ?" t; c) ^1 h
  1252. STA $BB7 B4 p- v4 |; v5 l8 Q; o! L
  1253. 3 _; g) p; ]3 @+ u$ {* e2 T" x, U
  1254. ' ]6 F0 ]' X+ f. U' w
  1255. JSR UP_PPU
    # z+ J' t! O8 u- b0 `: Y
  1256. JSR BULCON_WRITE) z# E1 z8 ]8 ~3 @/ D
  1257. LDX #$00+ `. n; M- T$ }/ [, U$ j
  1258. LDA $07A5: P% N$ X; }. _' n& {/ v. p
  1259. AND #$08
      M) E2 S5 L% H6 |4 U8 w7 \
  1260. JSR ON_OFF_PPU
    2 o3 F4 _* G) o) B- `$ y; r
  1261. RTS( r7 z  b/ ?# j
  1262. 6 s0 I% L) H/ Z! @7 Q- u
  1263. SPEBUL_STRING:
    6 M0 m- [2 M$ c1 y1 r
  1264. .BYTE $9D,$9A,$8F,$8C,$9F,$96,$80
    1 V- ]) x" z& n* E( _$ ]6 H) C3 `( i

  1265. - `8 W4 |6 c! q0 L, w% r/ k
  1266. 2 c$ u; O8 g& j5 _- O7 S0 p
  1267. SPEBUL_WRITE:
    9 d2 C  m% X( x4 ]7 s; A3 `1 h
  1268. LDX #$001 ?  D0 e7 ]8 D5 d( P% m2 D
  1269. SPEBUL:
    * f: S4 f' L; C$ Q' T6 H1 L2 F, N7 m1 t
  1270. JSR PPUADDR_PROCESS
    4 e* K7 P+ ]( h. W
  1271. LDA SPEBUL_STRING,X
    % P+ x, ?9 U9 y% l
  1272. STA $2007
    3 _! C# N7 L. V  p
  1273. LDA #$00/ T; w8 C& J$ ]: \; W$ {2 P; K( Z+ P
  1274. STA $2000
    ' _8 U9 G1 M* x6 r0 O% M9 l- V
  1275. INC $BA
    9 H5 I3 G6 l+ L! e' V( x
  1276. INX
    5 y+ ?$ q: [& a
  1277. CPX #$07
    8 X; @9 v) B  \% y) J
  1278. BCC SPEBUL: o$ N5 b; e, g0 r; }
  1279. RTS( _5 M7 z4 I- U; q/ [! S

  1280. " R% t8 r) D. |6 |
  1281. SPEBUL_PPU:( G. g. {2 a9 Z  ?
  1282. LDX #$00
    + r3 u1 o0 z8 x( t& R& v9 t  E
  1283. LDA #$A2
    % g- |) \7 [2 P# F2 S) y' a: N
  1284. STA $BA
    ; {, E) e& y4 |* }5 m
  1285. LDA #$21
    2 j. j" i/ q$ a1 N
  1286. STA $BB( G% o2 h, N. _0 r6 ?. p
  1287. * ~* G$ `. {$ @1 _+ Y

  1288. 5 K9 j( c. C( i
  1289. JSR DN_PPU# C- j, ]7 V% g) b* L
  1290. JSR SPEBUL_WRITE, V- O& P( R' E1 b  P
  1291. LDX #$00
    . v! P, x" D. ^  {" e3 @" m
  1292. LDA $07A4
    ' v$ y, X: V' `  S
  1293. AND #$02. y9 {( M% v- i% L% h
  1294. JSR ON_OFF_PPU
    8 Y& B: d( K4 Y( ]/ e' a
  1295. LDX #$00
    " Q, L- B# b8 K6 U7 t& X
  1296. LDA #$B1  Q* @5 g( ]9 }
  1297. STA $BA
    5 X& K# N8 S# N2 ]( ~; I  X
  1298. LDA #$21
    . u" S1 q$ c% _
  1299. STA $BB1 N" X3 [" {" M$ D

  1300. " ?9 A8 z( c; u  {: Q6 o
  1301. + R+ X) A4 n) Y6 I# e) ^
  1302. JSR DN_PPU
    ( e& V" S& E0 }
  1303. JSR SPEBUL_WRITE
    & j2 Y' a, y) T: O
  1304. LDX #$00
    7 F% m0 \& ?. Z2 a/ P  f7 x
  1305. LDA $07A54 t  M& e. h1 n$ D. ]
  1306. AND #$02
    " [9 c, p4 U- }4 V0 `# p# g. N5 Q+ z1 |
  1307. JSR ON_OFF_PPU# A: y; L! _/ J+ {4 Y" D2 T
  1308. RTS4 i5 ]# E' t/ @; Y& {7 p* y

  1309. ' g* e0 ~7 x! i
  1310. .ORG $A500
    , h4 R* P! y4 F
  1311. CLEALL_STRING:
    4 Q; R1 D. W1 H9 O0 L8 a6 O: ~
  1312. .BYTE $8D,$96,$8F,$8B,$96,$96,$80
    6 G* M: |+ ~% m; I* g  F0 B- G

  1313. : H9 P6 I5 T* {0 l

  1314. ; ^0 t3 E; y5 E/ b4 s' T! T0 j
  1315. CLEALL_WRITE:
    8 c' `% f6 e/ ~; I% o5 M0 f% x
  1316. LDX #$00/ [2 q5 x3 |9 X( I
  1317. CLEALL:
    ! _7 {/ B# W" A9 Y. O
  1318. JSR PPUADDR_PROCESS
    ' K9 H$ K/ _. X6 U3 [; K6 q: H. {! L
  1319. LDA CLEALL_STRING,X
    ! G1 [* Z% c3 P4 @' `2 ^
  1320. STA $2007
    1 o5 b* D1 ]$ O/ j% H  e
  1321. LDA #$00
    - u0 c# c* B6 f3 E+ f
  1322. STA $2000
    % I- _) ^* c5 m- C$ {5 d
  1323. INC $BA! p; \; g! Y( ?7 B* I) U2 @
  1324. INX
    * o  j$ J. z' v5 e( ~7 }0 ?2 k
  1325. CPX #$07
    # I8 K* q: f+ t( P4 ~2 |! G
  1326. BCC CLEALL9 t+ y) n' `0 P. }- a$ E, V, }
  1327. RTS
    ( l  [. s6 z- l" J0 j# s: o
  1328. ) t2 p3 s& c9 ]; u
  1329. CLEALL_PPU:  a3 \' w( ?5 M0 @; z: J; I- z7 O5 R8 E
  1330. LDX #$00
    . q2 R# X" D( E% I$ y( U
  1331. LDA #$E2& _, q1 x. |7 m: k9 N
  1332. STA $BA, P: W* s8 r% Y
  1333. LDA #$21+ D& B6 ?( c! R) D- r4 `3 [( x
  1334. STA $BB3 ~; k* U' ^1 }
  1335. - x  r$ r  Q$ u; i& T. V( }

  1336. % E6 U9 y, L4 a; x: P1 _
  1337. JSR LF_PPU/ g/ E' w! Y8 `- N! F/ A% Z: ]/ G: ]
  1338. JSR CLEALL_WRITE' F4 r8 k1 m) I
  1339. LDX #$00
    ( p! a8 a0 v- L8 ?0 ~, E
  1340. LDA $07A41 F; o* P' ]0 c
  1341. AND #$04( \, H) F( m- _! u& B7 f
  1342. JSR ON_OFF_PPU
    ' V! @0 K  w; {% b: h9 Q: m
  1343. LDX #$00
    * ~/ M* a$ L: J
  1344. LDA #$F16 E! K0 c  r' M, n# M, r
  1345. STA $BA
    ! I4 s: F+ o( |& G' S6 b$ J- x
  1346. LDA #$21
    - K) I7 `! k9 p3 W" B2 Z
  1347. STA $BB
    # ?) r7 ?  r2 W! O: q7 a: d/ N

  1348. & V* U  n% }0 l7 i
  1349. 6 O, t+ q" f" M! X$ `5 n" W/ P& j
  1350. JSR LF_PPU+ L' N8 u# Q* r$ Z: T* \! ]/ A
  1351. JSR CLEALL_WRITE2 t! |% F7 i; P+ D, l+ _
  1352. LDX #$000 E6 \+ R6 L2 P+ W$ Z% D% h
  1353. LDA $07A5
    1 j5 v2 I: A- [. E
  1354. AND #$04* S, n, Y- t2 q5 a; e6 ]
  1355. JSR ON_OFF_PPU. a% E! W2 W0 c2 B4 q6 g
  1356. RTS
    # [' K5 ^- E+ ~+ _0 p  f9 \

  1357. , L) R) b' A! N9 ~/ j3 P
  1358. HARDMODE_STRING:
    ! }7 w% Q) J7 M+ v& {4 y1 i
  1359. .BYTE $92,$8B,$8E,$97,$99,$8E,$80
    & Z9 s. k) ~5 V: r

  1360. 2 g1 @9 S. Y2 _# G/ O+ C' {
  1361. & P$ k4 l/ E7 K
  1362. HARDMODE_WRITE:  i: D) Y- i1 Q- w" W
  1363. LDX #$00
    & G: a% k+ Z0 S1 J# S
  1364. HARDMODE:
    , ^/ x& B+ f& b& L6 l. y, P1 T
  1365. JSR PPUADDR_PROCESS
    ) u. _# P7 \) E
  1366. LDA HARDMODE_STRING,X
    $ ^7 A! B% H/ L
  1367. STA $2007
    7 u& ?( h6 w* E! V0 T7 u; }1 P
  1368. LDA #$00
    0 K4 ^5 Q  b1 b
  1369. STA $2000. N' O" G2 s$ l7 E
  1370. INC $BA
      R; G) ]3 e! Z/ H4 P2 _
  1371. INX: ?7 x4 {2 f, }: l, p
  1372. CPX #$076 M1 x: i9 o# p/ x8 T6 w- _
  1373. BCC HARDMODE
    ! D/ |" |. Y+ c( T( H- j' q8 k; {
  1374. RTS
    . c6 h5 @* S+ P% R8 P
  1375. + K( ?6 M) z6 J
  1376. HARDMODE_PPU:
    2 C6 @. J$ A. q! `( H9 i
  1377. LDX #$007 I& N* j8 E1 R: x5 o1 }
  1378. LDA #$22
    5 d( W0 v7 I6 t
  1379. STA $BA2 B* J& t$ {$ @" n; N+ g- Q
  1380. LDA #$22
      J6 E) A$ F+ f+ e- Z; f; Q0 z/ ^
  1381. STA $BB
    6 ]) v6 `+ i5 K) e5 b- U6 k+ j
  1382. JSR RG_PPU
    0 L1 J$ m) n' G. @4 Q8 j4 w
  1383. JSR HARDMODE_WRITE
    ) f! ~: T$ C! x, g6 p8 [1 P7 v
  1384. LDX #$00! e2 J# p( g+ x8 Z6 P5 i. o  v
  1385. LDA $07A4
    ! ^4 Q/ W# S/ r
  1386. AND #$016 L* b9 f! \8 c. S# K
  1387. JSR ON_OFF_PPU. K) b2 p7 ]" `: b6 S' y
  1388. LDX #$00" Y& Q7 B/ t4 H
  1389. LDA #$31: E5 d& O" Z, g. d7 T! ?0 F
  1390. STA $BA7 ?2 E* ~5 O$ Z
  1391. LDA #$22
    " C: N) D; b* S: R  P5 u) n
  1392. STA $BB
    , r+ b' {- j* l1 J; E3 I3 B
  1393. " _! p# L/ ~# h  U# m

  1394. $ b. ^) c+ U! x+ E2 `
  1395. JSR RG_PPU# f: v* O& U6 j. C5 Y
  1396. JSR HARDMODE_WRITE$ @: _* ?$ a# I! q" T3 N9 F3 \5 i
  1397. LDX #$00: \2 [3 R  ^5 U$ U
  1398. LDA $07A5
    " ]) y% y) R, {2 H1 F: g1 c/ }8 ?, q
  1399. AND #$01
    * D/ `# v3 d, ~4 x5 G
  1400. JSR ON_OFF_PPU; }4 f, @3 O+ u% d3 v3 [0 [
  1401. RTS( b1 g9 E1 e# v  i7 J
  1402. # l; C/ X3 w* ^( `1 \
  1403. B_TO_JMPSTG_STRING:/ [: J3 P) ?# V0 X
  1404. .BYTE $80,$8C,$80,$9E,$99,$80,$94,$97,$9A,$9D,$9E,$91,$809 c! L( W' M, O' }: j2 ?

  1405. 7 s2 ?9 d6 x* Z/ Q' u

  1406. ) [8 N3 p. r2 R8 D% w% K0 C7 F" l
  1407. B_TO_JMPSTG_WRITE:
    ' C' L) |  h# ~7 p- ?6 v
  1408. LDX #$000 v% h/ e1 X3 C  a* Q" ]/ c
  1409. B_TO_JMPSTG:+ r8 r! ?& j" S  v2 p$ o8 E9 e
  1410. JSR PPUADDR_PROCESS; ~7 J' g$ D: y. R
  1411. LDA B_TO_JMPSTG_STRING,X+ p4 p/ \% t2 f, V
  1412. STA $2007% |" F, `& b/ r+ l
  1413. LDA #$00
    # ^( r. t" N. g3 z
  1414. STA $2000" F3 j; n" m2 F4 m" G
  1415. INC $BA' Z' ^% o0 q( a, y, m
  1416. INX; b/ a% H+ c3 ]) C: u$ P
  1417. CPX #$0D4 N! i1 i5 R0 J4 G" @. z
  1418. BCC B_TO_JMPSTG( l! M& [" j# p) ]. X, H1 L- u; U
  1419. LDX #$00' X# J4 S: Y( k, _, i4 E9 t
  1420. LDA $7FE0
    " Q! Q: r: e' [3 q9 V: G, F* T
  1421. JSR ON_OFF_PPU, r# `* e) ?7 t* \# _% M
  1422. RTS! ~$ y  c+ `$ x' f
  1423. 6 R& a1 c1 ~2 u6 U2 P( B
  1424. B_TO_JMPSTG_PPU:1 m1 H% v. A3 n" R1 d$ G! M
  1425. LDX #$005 N2 G! o( m0 A# B8 g
  1426. LDA #$68+ j: y& {2 C. L2 Z) B+ O
  1427. STA $BA
    ( }) @* @8 h1 n6 v1 w
  1428. LDA #$229 `# N* n  a9 p, w3 G
  1429. STA $BB+ _1 ^2 v7 T/ M2 P) o. z% f
  1430. JSR B_TO_JMPSTG_WRITE
    1 K: `9 v; k. f  ]$ F: H) r
  1431. RTS+ D6 q2 O1 v7 x
  1432. $ C/ f! Y. V* d3 E2 D0 p
  1433. * g  G$ J; h5 a5 c
  1434. A_TO_PLAMOD_STRING:
    2 {% z2 f; [4 |0 m
  1435. .BYTE $80,$8B,$80,$9E,$99,$80,$9A,$96,$8B,$97,$99,$8E,$80- A& D& ^1 q5 d& K; }5 V

  1436. ' d( d/ [6 S9 ^- u' h$ r) _: o

  1437. + z) `% r# g' K" l0 x/ F% I
  1438. A_TO_PLAMOD_WRITE:  Q' v" g8 S7 J% i; \+ R2 l0 \
  1439. LDX #$00+ C3 B- h& V) n# X3 \1 S7 ]  s, ~
  1440. A_TO_PLAMOD:
    / r! C$ k) w7 E0 _; B6 V
  1441. JSR PPUADDR_PROCESS0 K! q# L# [: \; ~
  1442. LDA A_TO_PLAMOD_STRING,X
    * W. F3 }7 d' l8 d
  1443. STA $2007
    3 ^! B2 }8 b8 ^' q4 y# J) I3 C
  1444. LDA #$005 w' D1 n2 g4 x! h
  1445. STA $2000
    7 |- Y; B' e5 B# J5 |" H
  1446. INC $BA
    ! E" |3 ]" R+ L" c* u
  1447. INX
    ) d; }( j0 b; a. J- [
  1448. CPX #$0D
    & N, Y% f$ m; o* V/ s
  1449. BCC A_TO_PLAMOD
    $ b+ V0 _! C7 {8 i9 \* W
  1450. LDX #$00
    7 `- F2 T0 Y  j/ v, P: V
  1451. LDA $39/ |6 m9 _( U' G/ S* E
  1452. JSR ONE_TWO_PPU; a8 H8 [& q4 k/ M; O! x
  1453. RTS3 }5 Y( m  \: R: a

  1454. . f2 _9 u7 R5 Q6 K+ \3 J2 X2 a
  1455. A_TO_PLAMOD_PPU:9 \5 L! U( c( @- N' m( h* ?
  1456. LDX #$001 t3 m  N- {# U+ w8 ^; a
  1457. LDA #$A8  I$ g0 n" q+ p+ j. a
  1458. STA $BA
    , z6 z, L5 p7 T7 q
  1459. LDA #$22
    , M' Z. R1 V" [1 h0 `/ c/ h
  1460. STA $BB
    " _+ B9 x/ b" n* x
  1461. JSR A_TO_PLAMOD_WRITE. I8 b, o5 k6 I. \9 ^
  1462. RTS+ L. `& \  ?6 o" R
  1463. : X% w6 w3 t% R/ Q" {. p) q
  1464. MOVSPE_STRING:6 E- |  d/ d" [" `  C) e
  1465. .BYTE $97,$99,$A0,$9D,$9A,$8F,$80
    - d7 f5 d2 a; N$ n7 Z
  1466.   q/ T9 [4 a: `
  1467. . q0 w8 R% \! j" i9 u6 M
  1468. MOVSPE_WRITE:5 S3 n4 |: G. J  v$ o- n( _) C7 \
  1469. LDX #$000 j. S' f0 O( z2 t- W, w3 q
  1470. MOVSPE:
    ) _$ Z# y. w5 S# L% B" B
  1471. JSR PPUADDR_PROCESS
    ! W3 X! S% y" m' c- g
  1472. LDA MOVSPE_STRING,X. g, y5 `3 C8 d/ i5 V' g
  1473. STA $2007
    4 C5 @# O6 u% j
  1474. LDA #$00
    ) S! Y+ a+ N* X( D9 g: L  n
  1475. STA $2000
    ) I# Z- h& _+ k; J
  1476. INC $BA) T  _5 \+ ~  G7 S  I
  1477. INX
    ! |/ p5 P1 [6 S( k- T6 \
  1478. CPX #$07* A6 S/ C* D+ r! L* D# M& Y
  1479. BCC MOVSPE
    ! V, f! V! R" W9 H. @: e  x( Y
  1480. RTS
    3 K# K- i2 V4 I; D5 T3 F! Q4 j$ l, y

  1481. & \" E% v! a* ?3 z
  1482. MOVSPE_PPU:; i! U) M; C, I; P
  1483. LDX #$00
    # C+ ?8 p8 Q& M0 @/ M# f" \
  1484. LDA #$692 y& g6 S& v. f# p. p) @
  1485. STA $BA: v1 `9 j4 ?, E. E8 M, C
  1486. LDA #$21
    % a# F! a; `7 H! @1 }( O4 m! K
  1487. STA $BB& l9 M, d+ x% P  U0 J7 x3 J
  1488.   I% c9 D! A9 \

  1489. 0 P$ s0 ]  n# ?* N  n3 r
  1490. JSR UP_PPU
    % A* r0 x" _! [- j
  1491. JSR MOVSPE_WRITE2 u0 |- N( ?/ B; W. F2 C' m
  1492. LDX #$001 {3 K/ J! H. p
  1493. LDA $079F
    0 l; F7 ?6 C1 x; l/ K: P
  1494. AND #$08& x: ]( T8 H2 G' j9 p7 e
  1495. JSR ON_OFF_PPU
    # w0 \- ?' V1 K" |/ r+ b/ e7 R
  1496. LDA #$80
    % }8 s6 t$ O/ n' M
  1497. STA $2007
    6 c0 D) G5 P5 y1 s4 d
  1498. RTS
    * A& L; S$ W6 ?( ?

  1499. ( u: n5 w6 |5 b; b6 e0 f
  1500.   
    3 ?* o6 t) ]0 D6 Q
  1501. UNLJMP_STRING:" \/ v( }3 a9 @3 t& k# A, n
  1502. .BYTE $9F,$98,$96,$94,$97,$9A,$80# D) K* R! w: G  W/ a
  1503. 3 E! o8 M* M# h* Z4 S$ h" S
  1504. 7 o7 M8 S9 I; L# i) |
  1505. UNLJMP_WRITE:
    * f( q% Y& O0 m* g$ M5 [" y
  1506. LDX #$00
    1 `/ q$ r' y& @* o# g: ]
  1507. UNLJMP:$ o" J. _+ V, R7 X, U4 J! p1 W
  1508. JSR PPUADDR_PROCESS
    8 J- a; U/ ]2 C
  1509. LDA UNLJMP_STRING,X; f7 |% h  n9 t" T9 D
  1510. STA $2007
    8 W- n7 K( G3 _
  1511. LDA #$00
    8 x" v( ]+ d' ]5 F) E8 [3 t
  1512. STA $2000
    # ?  l  I2 f! T$ E
  1513. INC $BA
    8 e- T' Q- h8 n4 J. W$ m- ]
  1514. INX
    + d$ z) _0 d/ `
  1515. CPX #$07
    # e' h+ `* h8 u+ q) v' H
  1516. BCC UNLJMP
    0 W+ a' |) M3 ^) x2 Y
  1517. RTS9 n5 r: |2 F3 b* _

  1518. 2 }& [0 @! L3 K- m# Y7 x7 T
  1519. UNLJMP_PPU:
    ! H( M/ J# m# H" w4 w; N! N
  1520. LDX #$00
    6 `: ~) ~) `2 b  Z0 {& J
  1521. LDA #$A9
    & e: Y9 D; H3 ~  M/ j5 K
  1522. STA $BA0 \  I1 U" [1 m/ q
  1523. LDA #$21
    & f- |* R- \6 N" Y) l2 }3 v
  1524. STA $BB. h# F5 v. d  t- g4 m
  1525. - `* a& n6 P- c( E$ _  C
  1526. ( X/ F# p8 F5 N3 z% D8 P0 F
  1527. JSR DN_PPU
    3 D' O; L. {- r+ ?
  1528. JSR UNLJMP_WRITE+ G# S# Q. h# E2 y
  1529. LDX #$00
    4 W, `9 @1 T# q
  1530. LDA $079F. h* [: C6 z/ ?' G3 G
  1531. AND #$04" p; W2 p, m: e! g0 D/ W% d
  1532. JSR ON_OFF_PPU
    6 T. ?' b5 n9 n# q: J5 n2 V
  1533. RTS
    8 k7 |* }" Y" f0 j" o
  1534. $ e3 j: _- c# r

  1535. 2 @' m7 |; N7 i: a$ e8 L: Q* t
  1536. DESTRO_STRING:
    ( c( L2 S% W+ @# a. ~" N' ~" F
  1537. .BYTE $8E,$8F,$9D,$9E,$9C,$99,$80
    + E) ^5 T0 Q5 a. M8 x1 p/ H
  1538. ! u1 @' ^) ?: P

  1539.   l; z! X5 h7 c" s6 _. y( S$ |9 J
  1540. DESTRO_WRITE:% C9 P+ o/ {: O" H. _
  1541. LDX #$00
    : x; o# F" X/ n+ ?3 c( _# i9 S
  1542. DESTRO:, x0 ^3 d" B; w+ H& D# F6 @; H
  1543. JSR PPUADDR_PROCESS
    ! N1 g3 y5 F7 g  m3 _# x
  1544. LDA DESTRO_STRING,X
    5 Q4 f" @) T2 _8 J# E' n
  1545. STA $2007
    & F& E4 B9 g0 y9 l8 `/ s" A7 K
  1546. LDA #$00" O. i8 M0 |5 F  e8 g
  1547. STA $2000- T  {+ y' \2 M% \
  1548. INC $BA
    & N9 ~! S6 c0 N6 }& x5 W; n$ e0 g
  1549. INX& z6 x8 g8 b" X3 u, n
  1550. CPX #$07
    ; _3 L& z7 f) j3 z- |
  1551. BCC DESTRO
    5 Q, N& |7 A5 C$ k( }7 O8 ^9 Y, a
  1552. RTS# {1 o, W# d3 _2 Y9 O/ ^

  1553. 2 ]: s* F4 s" q0 N7 L
  1554. DESTRO_PPU:$ ?2 s9 m. X& B
  1555. LDX #$00
    , z6 M& \. T% H# u; u8 g
  1556. LDA #$E90 t- b" {7 m) k
  1557. STA $BA
    . i2 q: w& e0 m0 z% M8 \
  1558. LDA #$21" a1 b+ c8 V, n1 p% p; d3 a/ _( Y0 A4 x
  1559. STA $BB, w  ?. b1 d" G

  1560. # r7 Y* B& Q& J3 W1 G

  1561. ' Q, h$ P) c& ?# @
  1562. JSR B_PPU7 ^7 c* j' v" |* L5 i8 F' ?
  1563. JSR DESTRO_WRITE
    , O2 u/ L% a1 y" |8 R4 C5 w+ K6 x
  1564. LDX #$001 D) D/ \( h5 Q- ~2 U, q
  1565. LDA $079F  Y. e5 x& S# m5 ?* l
  1566. AND #$40
    . O1 i; P& q* h6 i1 l6 q3 {
  1567. JSR ON_OFF_PPU: Y* g: @9 k* P
  1568. RTS
    ; c$ D9 H! s# h. |  d4 a& g
  1569. * m$ F0 ^1 J, {
  1570. ( |, n, ~" ~' t7 w
  1571. EQUBUL_STRING:
    - M& |' `1 r- a: R/ k' B
  1572. .BYTE $8F,$9B,$9F,$8C,$9F,$96,$80
    ' ]* S: g  `6 u- [2 s. [
  1573. 9 y# e! [' c; E# Z$ P2 u

  1574. & L5 A' e6 o! Z5 `  i7 \
  1575. EQUBUL_WRITE:
    7 i0 z: j0 T, }4 {* ?1 A4 v5 \+ M- l
  1576. LDX #$009 U- @6 i7 p% B, \; X+ p: ]
  1577. EQUBUL:
    7 Q* d, O( I. r  S5 u/ t. C/ S( R
  1578. JSR PPUADDR_PROCESS
    / }- {& v9 h  q" v0 c; E9 U
  1579. LDA EQUBUL_STRING,X
    - @  e5 g0 u, w3 \+ J
  1580. STA $2007' I' f! w- Q: M9 H9 t
  1581. LDA #$00' \/ H' C9 P/ e7 Q
  1582. STA $2000, ^, ^' P1 {5 u# n: S
  1583. INC $BA- s$ r# X) D1 `  K
  1584. INX
    / i8 B1 r* Q" T0 B
  1585. CPX #$07
    % v$ Y$ w4 a% H- _, |
  1586. BCC EQUBUL, s# G9 S/ r0 D7 v, F! n
  1587. RTS( O8 v& {. G; _5 _2 f

  1588. ) l* K1 \) {! z4 ], ]2 t2 ?
  1589. EQUBUL_PPU:. z& I1 ~: o4 }4 Y5 X+ r9 D; M
  1590. LDX #$00) n) v/ P, M! m& e! q; u8 R
  1591. LDA #$29
    ) L: M6 N* M7 J% o! K* H( @
  1592. STA $BA+ I. w1 e* H2 q; {9 o6 m4 C& U
  1593. LDA #$221 Z* M) ?: m7 \- T. W
  1594. STA $BB
    ) |! C6 ?6 e' u. y2 h9 z

  1595. # o$ M) k: @8 o+ s
  1596. 6 V. T, o3 A. E% [5 j
  1597. JSR A_PPU
    & G3 R* Y( O4 b' K& V1 L
  1598. JSR EQUBUL_WRITE
    8 r, u) D- i( |) v9 F
  1599. LDX #$00
    8 v* K$ K9 o( \. x) j. ]
  1600. LDA $079F
    8 o: j; r# O" _$ R% P8 ?: M; }$ R
  1601. AND #$80
    ( M4 K6 I, b6 S
  1602. JSR ON_OFF_PPU& }- q0 d$ B; N+ {
  1603. RTS
    4 _2 q6 D& e# N0 w' Z9 `% p5 x  W
  1604. : e: x5 N- t2 [- {1 n
  1605. # A/ q/ f1 M# R7 M7 |5 G  U( c

  1606. " {  B4 D; F, y( S. T, z
  1607. BULSEL_UP_STRING:# P4 |% _2 W! _" v+ d
  1608. .BYTE $9F,$9A,$80,$9E,$99,$80,$9D,$9D,$806 \3 O+ i" }2 i" q& E
  1609. 9 |8 h; o- X5 W& I5 A
  1610. BULSEL_DN_STRING:
    % I* u, i3 V( J3 ]
  1611. .BYTE $8E,$98,$80,$9E,$99,$80,$9D,$96,$80' [3 S/ Y% e4 H- V+ R/ c8 f
  1612. 5 f# _7 p* R3 F% n9 i5 r' u
  1613. BULSEL_LF_STRING:
    % r! z, v, Q. C& i1 l" n. P4 I/ X
  1614. .BYTE $96,$90,$80,$9E,$99,$80,$9D,$97,$80
      O' e% T. p; Q, m
  1615. - u* r% t5 k' I  a* G; A- r8 n
  1616. BULSEL_RG_STRING:
    - T3 n$ P/ N: D6 H
  1617. .BYTE $9C,$91,$80,$9E,$99,$80,$9D,$90,$80
    . o( a2 m6 w; p2 \

  1618. . a4 D1 R, m* \
  1619. BULSEL_B_STRING:
    ' a4 a/ t* M: C! {9 ]+ M4 }6 x4 {
  1620. .BYTE $80,$8C,$80,$9E,$99,$80,$9D,$98,$80
    - v" `% y7 O6 i/ k6 V. Z: q
  1621. 2 J* V* e) c( k4 s7 V2 Y
  1622. BULSEL_A_STRING:, u9 \9 a: g, R
  1623. .BYTE $80,$8B,$80,$9E,$99,$80,$8D,$99,$97,$97,$99,$98,$80,$9D,$9A,$8F,$8F,$8E- r- S/ {( M4 @& c# t% N- Y6 X

  1624. & p; U5 U1 H( H- s+ R5 ^: a
  1625. ' k6 a* |1 ?6 ^; V+ @( e
  1626. BULSEL_UP_WRITE:
    6 q& _7 X' v9 x0 k0 \/ E
  1627. LDX #$00/ H5 w$ K, R1 M, V) {: n
  1628. BULSEL_UP:
    # k" A2 M. z* ]4 T  l8 c
  1629. JSR PPUADDR_PROCESS
    + q, x- r: o! q/ S$ |; i
  1630. LDA BULSEL_UP_STRING,X
    1 u8 Z8 P' X: T4 P- u
  1631. STA $2007
    3 J! ?/ L; ^) Q3 N9 E4 R
  1632. LDA #$00
    % S4 R/ m# p0 ?6 _) w$ Q+ ?
  1633. STA $2000
    ; u* u' G  {: k
  1634. INC $BA
    * {. o$ J- D" C8 m1 Z
  1635. INX
    * ^$ }  V2 k3 Z: g3 D( M$ q' Z4 u' T# K
  1636. CPX #$09
    ' i. n* V9 |( k  ~
  1637. BCC BULSEL_UP
    " h$ D. p  L4 s
  1638. RTS
    ! w4 b- s# U3 l4 _1 |3 d& ^
  1639. BULSEL_DN_WRITE:
    0 a' e. q2 k" y3 O* W3 h
  1640. LDX #$00! v' B) Z7 D2 O- z! N
  1641. BULSEL_DN:/ ~  M/ T4 D# B# L8 @
  1642. JSR PPUADDR_PROCESS0 }  Y' r" c( }& d4 j& y5 w0 K
  1643. LDA BULSEL_DN_STRING,X
    ; S" B5 L: k9 n/ K- ^) P4 d$ j
  1644. STA $20074 z3 }  Z+ H& E% [: [5 N
  1645. LDA #$00
    " J  ]% W9 z" z
  1646. STA $20001 Y7 g% e/ y, [! N7 n
  1647. INC $BA0 u1 @: G! f: m* Q; P% J# Z
  1648. INX+ |9 `9 I$ p- ]+ y8 y) \
  1649. CPX #$09
    6 ?  p/ X7 o0 J$ ?
  1650. BCC BULSEL_DN0 f7 r6 w% O; g
  1651. RTS
    2 R2 h1 |; D: ~) V& U2 V0 m. l$ Z
  1652. BULSEL_LF_WRITE:
    ! C7 e7 D5 J1 Q' c/ }  w  E
  1653. LDX #$00
      @6 H0 ^, ?; [
  1654. BULSEL_LF:+ c- a2 ]3 r# N& Z& s
  1655. JSR PPUADDR_PROCESS
    2 J+ _# i. \( U2 z+ P7 t
  1656. LDA BULSEL_LF_STRING,X/ i% Z2 y7 g3 ~7 X4 _
  1657. STA $20077 b" b7 w+ k. F- }/ e% @5 ]2 B( ]
  1658. LDA #$00
    + g6 m+ k/ W( q2 s4 D( x9 @" g
  1659. STA $2000
    3 Z6 w! v- d% H; v0 w6 L" \! ?
  1660. INC $BA* z$ _8 d* q& G
  1661. INX$ R9 S9 D& K9 K& ^, Z
  1662. CPX #$09+ K: t+ s0 x$ r! _& E" R6 j5 t
  1663. BCC BULSEL_LF! e/ z3 @! p% {0 n5 n) G# R$ f
  1664. RTS% n6 Q1 ?6 J5 V, Q
  1665. BULSEL_RG_WRITE:9 K( D9 T, q8 l4 f
  1666. LDX #$00
    % B2 j; u, \# \) J
  1667. BULSEL_RG:1 i5 O6 v3 I8 w0 E+ X
  1668. JSR PPUADDR_PROCESS! H9 W7 n9 w' O' R$ m7 t. W
  1669. LDA BULSEL_RG_STRING,X8 Z' K# m( X, [/ E
  1670. STA $2007
    : g3 }7 A( B0 d2 @7 b
  1671. LDA #$00  R- R+ g7 v/ U
  1672. STA $2000( }* P0 @' z, w4 c! f
  1673. INC $BA. K' G; j& B8 {7 [5 \
  1674. INX
    3 V  m* T% W: W8 c( f/ k' T* R
  1675. CPX #$09+ k* V& s6 N6 u
  1676. BCC BULSEL_RG/ @7 ]* u( v7 h7 p) n
  1677. RTS, w- I4 W+ G# T
  1678. BULSEL_B_WRITE:! F: O2 C4 G* V4 N# e6 X
  1679. LDX #$00
    9 `! t0 q- ~! J: R( C
  1680. BULSEL_B:
    ; Z* k& N  M2 {; p1 @. V8 g, q. U
  1681. JSR PPUADDR_PROCESS
    . \  R; O7 D: @5 n5 p
  1682. LDA BULSEL_B_STRING,X
    , e8 w- F! ~/ t, S; U
  1683. STA $2007& g) G1 z$ v8 S2 _! ^$ B+ u
  1684. LDA #$00
    . H8 ~% L7 @( A# |9 E
  1685. STA $2000% W, D- B8 m- o4 c' }% I
  1686. INC $BA
    / |6 b- D$ z8 ]  z2 s; A' I& t6 Z
  1687. INX6 R" {2 a/ L0 s( A+ s9 Q. U
  1688. CPX #$09! r7 Z3 a! M& P/ u: U- ^% s
  1689. BCC BULSEL_B% y( K' X0 f- T3 f
  1690. RTS; @( g1 G% {4 d) j
  1691. BULSEL_A_WRITE:
    5 E2 W! R9 x0 z
  1692. LDX #$00
    % d5 P" F1 S/ e! i
  1693. BULSEL_A:
    1 `+ l# v! z) W" E2 X9 ~1 B
  1694. JSR PPUADDR_PROCESS  `4 b/ T) \: O1 I0 L6 }5 z
  1695. LDA BULSEL_A_STRING,X
    . I4 Z" G: G: u! f: Y1 c: c& B: z- C
  1696. STA $2007
    : G2 c. }5 ^! a! n) ]
  1697. LDA #$00! E3 J4 @8 V8 \5 |; H' w( u8 y9 w
  1698. STA $2000
    & f. ?! {% \6 \% m- V; F
  1699. INC $BA; m6 ^; L9 n" E# _
  1700. INX
    ' n: k5 l; c, W/ O- n
  1701. CPX #$12* \5 @' F9 L' D
  1702. BCC BULSEL_A! z/ S* {" W& j% e8 [; [4 @
  1703. RTS# `1 K2 S1 |- K0 R# }
  1704. . g/ n* [5 ]7 }' r1 l+ L$ }+ D

  1705. 3 O2 }3 j; F1 W, Y7 x
  1706. ' P9 H/ H0 |2 M6 w) n
  1707. BULSEL_PPU:
    $ N- g* Q1 b6 X8 [1 \
  1708. LDA #$6C
    : q7 c- s4 i! E6 p
  1709. STA $BA
    ' q- g+ k, ~: P- l  k1 W0 \% x
  1710. LDA #$215 L+ v/ o( |4 T# \' I4 @: i( j
  1711. STA $BB
    " N" D) z; b0 p- R) y" ?
  1712. JSR BULSEL_UP_WRITE" d0 j$ e% w$ |4 i# K! e
  1713. . {+ R. X: I3 w( C- ~' I" T# c
  1714. LDA #$AC' K" U+ Y* {. l% g6 z4 w
  1715. STA $BA
    . D; k6 O8 Z$ ~) [5 m1 r/ o
  1716. LDA #$21
    , A: K; S( K# d. N. i4 u+ w
  1717. STA $BB
    * M. x  ?! x  ?1 s) J4 D$ p6 \% T
  1718. JSR BULSEL_DN_WRITE
    . G8 b% g, c! |/ |

  1719. + D' x* W) k7 w3 C
  1720. LDA #$EC8 M3 n% W0 W3 S  H# }) @. X3 ~
  1721. STA $BA6 P, }' l; C: _; k0 S( x
  1722. LDA #$21! w7 M0 z( u2 ]$ t3 G, K
  1723. STA $BB) D# y( J* \5 R& R
  1724. JSR BULSEL_LF_WRITE
    5 `5 y# {" l% b

  1725. 6 D9 E' c: z  C) z& O
  1726. LDA #$2C
    8 T: L4 `1 `) h
  1727. STA $BA
    ) F( R7 s8 o( _( {
  1728. LDA #$225 f% W) ?4 k7 E/ \
  1729. STA $BB+ S7 V* U4 G  E% s3 q5 g! @
  1730. JSR BULSEL_RG_WRITE8 J( I4 A0 f( R
  1731. / [. d! I4 D' d
  1732. LDA #$6C
    : X4 i/ B; |: R# N& P5 y) G
  1733. STA $BA
    5 f% N; f1 K7 W5 n. g0 Y% d
  1734. LDA #$22' B4 m; c# y* e
  1735. STA $BB
    * r- A6 l$ V7 f  b: A
  1736. JSR BULSEL_B_WRITE) T. E& G' n# N5 u; \

  1737. - f# k% Z& C7 P  j1 G' z
  1738. LDA #$A72 u+ M0 S9 y; z9 [
  1739. STA $BA
    6 R' A& A- ~9 b/ b: \; F* w
  1740. LDA #$22
    " k/ u/ ?: C9 ]3 a
  1741. STA $BB, \! q& `- @; \; A: |! u
  1742. JSR BULSEL_A_WRITE
    $ B$ B; l6 P0 g& g
  1743. RTS, T4 p7 e: H7 X' i7 r, ?- D$ d+ a

  1744. . c' b6 X4 K2 T) ^% @4 y: z8 b
  1745. ; `; E2 L% M4 L0 a( r" u
  1746. # Z* ?$ w+ H& p
  1747. UP_STRING:
    3 i- R4 `1 V" O7 }
  1748. .BYTE $9F,$9A,$80; G! ^/ _6 r: Z* h, k
  1749. $ Z: {+ K  t! d1 A) A
  1750. DN_STRING:
    4 V* U& V% ]& L6 W, Y, l/ l' L4 J6 \
  1751. .BYTE $8E,$98,$80* S' _* D; K0 }; F$ i
  1752. 7 G# n) H! W" G6 O$ H
  1753. LF_STRING:
    % n0 r9 P- ]1 w1 {
  1754. .BYTE $96,$90,$80- A+ G; v. [6 I' N5 [

  1755. 8 h; Q! N$ F  u
  1756. RG_STRING:
    6 E$ Y9 }+ |% G$ P- _' r* q
  1757. .BYTE $9C,$91,$80
    % v$ {5 U4 q( u, S+ T
  1758. ; S' z, i5 @3 E  S
  1759. B_STRING:( }8 ?+ z1 T/ R+ f& y
  1760. .BYTE $80,$8C,$80
    8 G, w9 u% Q- I6 \6 K7 c
  1761. 6 j+ ?$ C+ [. `8 w) s# o4 N" t
  1762. A_STRING:: h* z# Y2 I7 o/ l
  1763. .BYTE $80,$8B,$80" Z5 o/ F( ^; ^. v

  1764. ) O8 L9 S$ c2 I7 R9 d  X2 j

  1765. . ]; d* p4 p% x' T4 X( p% X
  1766. UP_WRITE:) [% Z  c, w8 s5 ^$ z
  1767. LDX #$00& ?& [$ X# f* \
  1768. UP:. H8 A( W) Q7 `% q  a# }+ o
  1769. JSR PPUADDR_PROCESS; z. {' }) z7 ~$ I, x2 b5 `4 t' n& b
  1770. LDA UP_STRING,X
    3 f" i% Y; j/ L4 g1 \5 i' K  ^
  1771. STA $2007
    + J. M) N1 d/ j8 L9 c0 e# N
  1772. LDA #$00
    5 n, E+ |3 E* k: N9 U* B
  1773. STA $2000
    # U/ o" S0 r. n, L* F
  1774. INC $BA
    ) v7 j; |0 [. R5 i& [
  1775. INX: H& ~! o$ c, ]  m3 c- W5 O
  1776. CPX #$03
    " i' b$ b) Q; w( P- ^3 F2 r. E
  1777. BCC UP
    ; I4 p$ r' d' m; C9 R; J
  1778. RTS
    9 y1 W) s% i* G; W0 C& [

  1779. ; v# M5 O6 j0 s: @  e1 w5 d
  1780. DN_WRITE:
    - W' y) X) I, [& p7 T
  1781. LDX #$00% B  X' r6 p7 R" p
  1782. DN:8 U2 K$ K- C/ w( {: U, Z/ [
  1783. JSR PPUADDR_PROCESS
    # @2 f6 ^. t6 X$ F' ^" `
  1784. LDA DN_STRING,X
    ; O& c+ u% ~! d3 w
  1785. STA $2007" M: ]% R0 b* U; k1 o  B3 W
  1786. LDA #$00
    , T3 J0 p$ W' k+ \6 D
  1787. STA $2000: m$ T( a( Q9 p, S, {, ?/ l, n
  1788. INC $BA
    % f1 H, n+ }! S5 X) }, N
  1789. INX  E$ F/ r* x7 Z) _
  1790. CPX #$03& c7 T, `9 T! f3 P6 Z
  1791. BCC DN
    4 o+ k. e5 l, P& ], m% o+ W. A% b
  1792. RTS, b7 F# ]9 ?. V0 P

  1793. * v* ]+ u6 K/ R: ?
  1794. LF_WRITE:
    ' ^% t1 T8 T, Z! Q) d+ D
  1795. LDX #$00' K7 q0 V. M! ^6 U! ^; I7 l
  1796. LF:
    * V  A7 V; p3 q; Z
  1797. JSR PPUADDR_PROCESS
    0 W, J. H( |& t/ \1 J8 p
  1798. LDA LF_STRING,X
    / F, {/ S2 i& Z- |' d8 y2 t
  1799. STA $2007
    6 ]7 t. U, W2 @, c* B8 V  }- z4 R
  1800. LDA #$007 l) d3 p+ ]0 i4 M
  1801. STA $2000. H( D' V; {( W/ Z
  1802. INC $BA# U5 c$ q. ^. W$ _, R% j
  1803. INX, E" ]5 I7 q/ r
  1804. CPX #$038 K. H8 t& w  B+ }, M* B
  1805. BCC LF
    5 {$ K# l: C% O! Z) p3 Y+ I. k8 d
  1806. RTS
    ; t/ _/ v, h6 g1 x/ |' g

  1807. ( A0 a2 p) D# O2 H
  1808. RG_WRITE:' ~1 h/ q/ V+ P+ A- M
  1809. LDX #$00
    8 M3 C* P5 f3 x$ N( f
  1810. RG:
    # R* e# c! P: t) Z) t9 L# s! H
  1811. JSR PPUADDR_PROCESS
    2 w0 D" E; ~. ~7 A
  1812. LDA RG_STRING,X! I# N# k/ @" c9 i7 Z
  1813. STA $2007' ~7 U& n# h8 U# l% i( u$ q4 ~2 v$ T: M
  1814. LDA #$00
    % B! U4 ~  f3 I. x5 R" B9 H' ~
  1815. STA $2000; @- ~/ J  l8 b( N
  1816. INC $BA
    8 e. s2 j9 l- D1 `$ f, _- V
  1817. INX
    % |+ e! B- ^/ o: i5 g+ l8 `
  1818. CPX #$03
    ; x6 J6 F9 k: ~
  1819. BCC RG
    / V* ^7 x( x( q5 [3 ]8 n
  1820. RTS
    2 Z6 B: Y7 E8 d

  1821. $ M& \$ e3 z" v; L; V6 n# v& N
  1822. B_WRITE:
    0 d. D1 K  g: }4 m2 k
  1823. LDX #$00
    6 I1 N  C6 k+ t3 P7 F7 v
  1824. B:
    9 o  T' P, u! H
  1825. JSR PPUADDR_PROCESS
    & l, x4 w! u: z& ]3 }5 U! _
  1826. LDA B_STRING,X
    9 u7 x2 W4 R- @( I
  1827. STA $2007
    0 {" E/ w' b$ P+ b: E* L2 z
  1828. LDA #$00
      R' H6 x, Q6 U5 }
  1829. STA $2000
    ( Q2 w8 J' n% l+ C- q& r6 j
  1830. INC $BA
    6 J. L" \1 y3 {" `
  1831. INX2 \& ?4 P6 X0 [4 \7 A
  1832. CPX #$03
    3 \5 i" j+ C; j
  1833. BCC B
    0 ~, p! \/ h9 }6 l- ?7 @
  1834. RTS
    - `# A# R3 s- [( v5 O

  1835. , `- W; m9 x2 N* W7 `- i% T
  1836. A_WRITE:
    1 I7 t1 k. m7 |7 }& X2 E( ?
  1837. LDX #$002 W, x) l: c( `$ q
  1838. A:
    + [7 Q- O0 i1 ]# K, _
  1839. JSR PPUADDR_PROCESS2 E' j& Q9 u2 J2 \3 R
  1840. LDA A_STRING,X5 b* W. g, x7 i2 V; T% [! Q
  1841. STA $2007
    + w% r5 u  f8 j
  1842. LDA #$003 I: g1 p) @+ ?+ Z0 x# ]
  1843. STA $20009 N$ {7 a) a9 U
  1844. INC $BA
    - ]0 S3 c" k& w. u3 Y
  1845. INX5 ]. j, o( F- J1 U
  1846. CPX #$03
    + o% q7 _( J) v9 F) p' t
  1847. BCC A# p: \# g/ `- D5 s4 b6 s% w* C
  1848. RTS! [; d5 Y- V" ]$ S$ h& _% B% R

  1849. + y/ c5 w! j( z- k

  1850. ; ?; K# B8 I, f$ J4 p1 W+ R$ J; p" M% O
  1851. UP_PPU:
    # a. b( |; C) Q& M
  1852. JSR UP_WRITE1 H- ~5 N0 F) s' Y. T( x% I  E
  1853. RTS+ _9 J1 \$ p% Y* S9 i8 f& x
  1854. $ T  ~- \8 C# B
  1855. DN_PPU:
    7 G; l& V1 u4 G: ]" @
  1856. JSR DN_WRITE
    ' n* h- V, v6 M9 j+ t
  1857. RTS
    ' {: J9 X9 @4 q3 Q% u: z% c

  1858.   N8 M4 u. N6 g) Q
  1859. LF_PPU:
    ; f7 R9 c. j' y, O" }/ v
  1860. JSR LF_WRITE7 w8 A( c; @8 k  f; ]2 k' b( B
  1861. RTS  r( B" z, @% c, O% [

  1862. 1 N$ ?% W6 {2 A) D: g3 x% D
  1863. RG_PPU:
    , n4 o3 X# Q/ Z
  1864. JSR RG_WRITE
    9 d: K1 k5 y4 d9 J$ ^# g
  1865. RTS
    ( O# `8 ^& n7 X1 {( z1 `* z
  1866. 1 I7 e9 ^, `5 F4 s2 q
  1867. B_PPU:
    & z+ I- N7 F) z9 N
  1868. JSR B_WRITE
    0 F3 v$ v. E* K! Z3 X
  1869. RTS5 R" |5 i% n6 |" [
  1870. 8 T( Q& I* L8 D  D! y
  1871. A_PPU:) y- o& a( N( s: _
  1872. JSR A_WRITE
    ; p0 E: l- i" M2 T9 F
  1873. RTS! @8 i) r* Y9 b, v  @" O( m
  1874. 4 @  s# @  g' }5 k3 p: S

  1875.   L( g! Q0 d* T  P% V" U2 W% D) m1 Q2 b+ I
  1876. PAGESELECT:" q& |! v' i- l. X- J& r3 T
  1877. PAGE0:
    ! H$ g% @3 M4 G2 B1 F) l
  1878. LDA $07AA# |" \: h8 d( \; O' k; ?0 S" s
  1879. CMP #$00
    % ?% u, P9 R9 j% g8 j
  1880. BNE PAGE11 y( C2 @! s% e' m7 W

  1881.   d6 W! l$ o6 w: l
  1882. PAGE_00:$ ?3 _' j: |$ B4 L7 p
  1883. JSR BULSEL_PPU, v$ h! c0 Y9 U; B
  1884. RTS
    % q' e0 }) ]" r1 B( k" x

  1885. + }' E- X! o+ H0 l  J/ ~
  1886. PAGE1:
    0 C+ o: @  Q2 ]
  1887. LDA $07AA
    7 R3 R* M4 x) R$ X. U) u+ S
  1888. CMP #$01
    . _; w3 P( m6 |; d0 D
  1889. BNE PAGE2
      k6 v2 W1 e/ p- j. I

  1890. " Y  n$ n6 _8 C0 _
  1891. PAGE_01:: L) c8 V  y# m
  1892. JSR INVINC_PPU& F& u' L! s, Y. I9 D) T
  1893. JSR LIFELC15_PPU
    ) W" h$ o1 m9 k1 i
  1894. JSR DOUCON_PPU
    - o9 x0 W# G) b* g  b8 k# T. \
  1895. JSR KILLON_PPU
    . S* f5 A7 s' c, F% c3 {
  1896. JSR SKYFLY_PPU
    ! S4 x6 y9 j" g. p; O9 H
  1897. JSR LIFELOW_PPU
    : T4 F% i" d% ^' [$ k# Z8 w
  1898. RTS  f. q" g, {% E+ Z
  1899. 7 L! N; G9 H1 a% W* @
  1900. PAGE2: ! A) E* y0 N9 E: b: h
  1901. LDA $07AA
    + @1 F( h: u/ k0 M; ?
  1902. CMP #$02* a' E' I7 o* K! k5 v+ t! |
  1903. BNE PAGE3% `4 a0 z2 K/ y4 ?8 D" h8 V
  1904. ) B% S7 G( q0 P% ?/ }
  1905. PAGE_02:% b& p7 [) ]4 m
  1906. JSR BULADD_PPU
    * Z. K3 Q  l' s8 u9 I# X
  1907. JSR SKINGE_PPU
    % m7 g, f% l/ e) {% |
  1908. JSR BULMIX_PPU1 c6 S( q- i: F, p
  1909. JSR ENELOC_PPU
    * P' u! W2 c: p) s# E
  1910. JSR FOCFUL_PPU0 z% K2 F4 `: J- r8 W! d% }+ J
  1911. RTS
    & y0 x% T$ g) F+ i* o1 M0 @

  1912. & R( \& h: I# d
  1913. PAGE3:   I# `- w1 c! }8 D
  1914. LDA $07AA( X3 W0 j4 x  w
  1915. CMP #$03
    6 z. h2 l9 M$ f$ C1 }
  1916. BNE PAGE4  I4 N# R3 S7 T& ^0 F5 s; f

  1917. & w. b: z$ F3 w/ ?2 J7 l
  1918. PAGE_03:" b3 D4 _: J& q/ O
  1919. JSR BULCON_PPU! ?) P/ [  G* J# w+ |( b  C5 P
  1920. JSR SPEBUL_PPU
    - w4 ^* N( {, M: c% U7 I
  1921. JSR CLEALL_PPU+ i, p5 B5 o; r
  1922. JSR HARDMODE_PPU. f( |3 H. l8 K) o  e
  1923. JSR B_TO_JMPSTG_PPU
    - t. w# ^1 y) ]. _7 I
  1924. JSR A_TO_PLAMOD_PPU2 _/ U) M) g, O
  1925. RTS
    ; I; E5 {9 W1 ~3 V5 B2 \
  1926. / y5 ~6 T$ N8 i" w9 N# K0 N
  1927. PAGE4:
    # {7 H# v( x* j
  1928. LDA $07AA
    - H+ |$ E6 L  t' @
  1929. CMP #$044 U8 d% z- n8 h8 U
  1930. BNE PAGERTS
      O# x* _8 o) g; o* _! z4 h
  1931. 8 L, {$ ]) R* Q# S. ?
  1932. PAGE_04:% J  C* }/ Q* P9 c# w4 z6 {. x. G
  1933. JSR MOVSPE_PPU* F' J5 N  ]5 u) e; n# [) T
  1934. JSR UNLJMP_PPU- a5 Y  y+ s2 \) U
  1935. JSR DESTRO_PPU' J2 g/ q7 v! |! u. R- w: K* r
  1936. JSR EQUBUL_PPU
    $ _# g' W1 R: J0 O+ n( [8 F
  1937. JSR MOVESPEED_PPU
    ; H! h  u& N  j% B2 L7 j( \- y0 p
  1938. PAGERTS:# F: G- m# k) d2 i8 ], C0 r
  1939. RTS
    7 ~4 G) ~, c+ p2 A7 _! P) Q# b' B

  1940. % w4 J7 h8 {3 k" k

  1941. * K# s" {) T8 }5 X) r
  1942. PLAYER_01_STRING:
    3 _( K, }. S( C$ F! K
  1943. .BYTE $9A,$96,$8B,$A3,$8F,$9C,$80,$81,$82,$80) `  M- c* T) f) l2 q0 b6 C

  1944. ! \6 d1 i; K6 G1 {3 C' `" Z

  1945. 4 X; S6 q4 v5 L) h, J
  1946. PLAYER_01_WRITE:
    # {" E. i" S; U0 j- E7 v0 ?4 b
  1947. LDX #$00
    % o2 f2 |/ D7 W$ g
  1948. PLAYER_01:
      ^. i, D+ I8 H
  1949. JSR PPUADDR_PROCESS1 \9 K7 ?8 [5 s& I
  1950. LDA PLAYER_01_STRING,X
    7 a$ a2 t9 C* D  V
  1951. STA $2007
      e+ j+ S* l/ N
  1952. LDA #$00
    , H. [  ]2 \( I8 k6 }7 I5 E
  1953. STA $2000) ^  e, f  i- \4 {3 n
  1954. INC $BA* E3 c; o! d0 D- g3 `/ q; p) m
  1955. INX
    7 j5 b9 y, F- a, T: g9 Z4 ~1 A' @
  1956. CPX #$0A6 E  t+ X" S9 j4 F
  1957. BCC PLAYER_01
    % H$ {: V4 r" C. J+ F$ j
  1958. RTS
    3 r- v) S3 T+ j
  1959. ) V& K  k6 B! z) P0 A7 T1 Y9 D
  1960. PLAYER_01_PPU:
    ( \3 q- N4 d% x3 E3 ?. o. s
  1961. LDX #$00+ k$ y( c: |5 y  Y8 T4 J
  1962. LDA #$64
      W% J- @) }0 d4 z
  1963. STA $BA
    ; t) t. [7 g) \' @1 K& S
  1964. LDA #$20
    2 l7 ^3 K$ J8 k  @7 m
  1965. STA $BB: T+ x3 c5 c$ `* S; J
  1966. JSR PLAYER_01_WRITE* k4 {5 f" [: H  J
  1967. RTS$ G* n1 \$ w" {  t) w3 ^' K

  1968. 2 H" H( l* A8 Y9 c: J8 A1 v) d
  1969. PLAYER_02_STRING:
    2 i) s) `+ u9 n
  1970. .BYTE $9A,$96,$8B,$A3,$8F,$9C,$80,$81,$83,$80
    - I6 n$ [9 Z. p# ]8 W! d& v
  1971. $ V* O/ J3 L9 `* \6 G# I3 d1 K% R- x

  1972. " o5 D+ J% _6 A4 ]
  1973. PLAYER_02_WRITE:! H& @1 g% Q3 S. j& L6 T% Y
  1974. LDX #$00
      i% @5 [0 D4 e
  1975. PLAYER_02:
    9 d# D7 {3 c0 m' g8 U
  1976. JSR PPUADDR_PROCESS, e5 `. w: k0 G, G+ `$ L
  1977. LDA PLAYER_02_STRING,X, P7 @6 e, K; I" k5 e
  1978. STA $2007
    - `, O8 e5 T5 B7 g+ U
  1979. LDA #$00
    6 w7 y; {& r# ]' A5 o+ c
  1980. STA $2000
    5 t: }: [( U5 h0 |
  1981. INC $BA8 b- }& T0 C* Z" [% ]' e2 d
  1982. INX# J: {1 U8 G8 h% H
  1983. CPX #$0A# Y1 J$ O: U$ s& t
  1984. BCC PLAYER_02' `! c7 P2 |+ ?: L3 y$ {% }- x0 t
  1985. RTS
    : ]7 }% w& [% U3 R4 z/ ^

  1986. 1 ?  E5 U3 ^. V3 }; s1 Y% k
  1987. PLAYER_02_PPU:/ d( I. z$ B* X. [/ H; P& q* Y
  1988. LDX #$00! A5 X  }* C0 s
  1989. LDA #$73/ c7 U; Y- I. k' o# K/ J2 D
  1990. STA $BA
    * x$ x! v& h  s( M
  1991. LDA #$20
    0 A, r* \0 J" U6 G' i
  1992. STA $BB6 i' n) Z' ~8 }* z7 s! h$ k: s6 }
  1993. JSR PLAYER_02_WRITE
    2 k  [6 N2 o* X. o8 i% N( ]  _: Z
  1994. RTS
    : Y" R) ?+ ~2 d2 a' D0 Q: T+ \% G

  1995. ; r5 {: g$ z  F1 S# F' m8 R8 [
  1996. PPUADDR_PROCESS:
    ( w7 q7 |+ W9 g* k( w
  1997. LDA $BB
    ! |& F# a+ f7 Y2 J
  1998. STA $2006' e1 n) v2 r8 U# X* O
  1999. LDA $BA! E0 o3 \7 I1 ^9 W9 T
  2000. STA $2006
    : D9 F) C- }' t! E! ^) L# r" D
  2001. RTS
    * ]; d0 }* `) ?1 B" @- N9 {

  2002. 7 G* @0 O; h5 R+ v0 a0 q0 y/ \

  2003. ; }" h, l% Q4 s9 H& ?; F

  2004. - j; t+ G" I$ A2 H
  2005. ONE_STRING:- \8 l3 T  n+ G
  2006. .BYTE $99,$98,$8F
    ' L: `; ?# Y2 R2 I: c9 V! Q2 A

  2007. 4 @5 Z: s3 Q7 }9 j* @" S
  2008. TWO_STRING:
    ' ~( u6 |& U1 H: F% g9 p
  2009. .BYTE $9E,$A1,$99# E8 m" X! D. q+ B3 e

  2010. ' R1 g9 R0 L* a) o. X' B% l6 E
  2011. ONE_TWO_PPU:% W9 A4 w4 p9 d. U& T1 ?3 O5 S
  2012. BNE ONEWR
    " O# O$ q' a  g7 |
  2013. TWOWR:
    / D4 P9 B# N) R! B# V5 N
  2014. JSR PPUADDR_PROCESS
    % ~  \. S9 i* d9 T# d
  2015. LDA TWO_STRING,X
      K" b/ F/ A; i+ [' j* B
  2016. STA $2007
    4 [( ~  ]/ z& n- W( ?5 n2 M9 m2 j8 n
  2017. INC $BA
    9 k8 |* l9 u( j% N( o/ ^3 z
  2018. INX, C0 d9 @5 g& [# P
  2019. CPX #$03
    ; {9 ?* D7 Y$ O* X4 j+ u
  2020. BCC TWOWR+ s# t1 b( M# b
  2021. RTS: K2 K8 R( D- I/ c* S; l/ V' R
  2022. ONEWR:: d$ c1 |; s. a* c, C- P
  2023. JSR PPUADDR_PROCESS
    - H7 I6 _2 ], _5 `" i0 V  w% |
  2024. LDA ONE_STRING,X7 |% e2 P$ X7 a2 g  N& c' L
  2025. STA $20074 }1 A6 P: Q1 J2 C8 @; t
  2026. INC $BA: Y1 M8 G& M) o2 |9 P
  2027. INX- [! q& k9 I3 F9 y' f7 L( d
  2028. CPX #$03% v& y6 g" c) V4 N; u$ b6 l
  2029. BCC ONEWR8 [& R7 Q; V# {1 [) ^
  2030. RTS% l* a) q! N8 k; n

  2031. + |6 j1 q. l# I; `# m" ]: M
  2032. MOVESPEED_STRING:: e$ ]: u7 v) x8 R. K) ?% V3 r
  2033. .BYTE $97,$99,$A0,$8F,$80,$9D,$9A,$8F,$8F,$8F,$80
    . [& N+ \: L* [9 U3 h. L6 y
  2034. 3 `  _" O. {0 f) ?& O, ?+ i# f
  2035. + L1 D. u6 D9 T' B9 f9 v1 ^' V
  2036. MOVESPEED_WRITE:4 o+ I+ Y' ?6 K) H2 U' Y
  2037. LDX #$005 P* u% @  [. J& s4 a* S5 k$ U
  2038. MOVESPEED:; J3 O4 ~. p& O. O, K, ?& |
  2039. JSR PPUADDR_PROCESS( f* B) M- {. ^3 I( t5 x
  2040. LDA MOVESPEED_STRING,X
    $ v1 ]" @& e5 v" A. n
  2041. STA $2007* s: |+ G( b6 v/ i1 Y
  2042. LDA #$00
    ) q  M: a  s9 z4 N; z1 b  H
  2043. STA $20008 O4 Y6 g5 h. s
  2044. INC $BA4 M1 g; I5 i1 K  Q+ L
  2045. INX8 y8 `" Z$ c5 }; _! P
  2046. CPX #$0B* _, p* E$ b! ^( g) M) s1 z0 p
  2047. BCC MOVESPEED
    + N5 q6 Q8 _' |) K
  2048. RTS9 z" Q: e# F5 g; \
  2049. ' X7 T7 o/ u& C" E4 Z6 ]
  2050. MOVESPEED_PPU:+ C( p( M/ I+ ?  }$ S+ L/ H
  2051. LDX #$00- U4 j* W' \% y
  2052. LDA #$AA
      U' {2 W; Y: r* p+ N+ a" i
  2053. STA $BA$ b; i' R, u  p( I
  2054. LDA #$22) A6 N0 O0 ~/ k! N8 G0 W9 v
  2055. STA $BB
    ! Q% j- ^- i' o2 P
  2056. JSR MOVESPEED_WRITE
    9 N. x" u  Q4 x
  2057. LDA $7003
    2 `3 j, w6 }4 }3 K1 U  w
  2058. CLC5 s: I. H6 J/ C
  2059. ADC #$829 F* S# j. @% F
  2060. STA $2007! }6 L' d' S* ~/ F; S/ ^4 S  m/ w
  2061. RTS. v3 ^, q+ u1 {, m  U5 O
复制代码

本帖子中包含更多资源

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

x

评分

1

查看全部评分

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

签到天数: 550 天

[LV.9]以坛为家II

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

签到天数: 7 天

[LV.3]偶尔看看II

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

签到天数: 2060 天

[LV.Master]伴坛终老

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

签到天数: 3186 天

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

签到天数: 2297 天

[LV.Master]伴坛终老

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

签到天数: 135 天

[LV.7]常住居民III

发表于 2016-11-21 09:59:17 | 显示全部楼层
这东西找了好久勒,谢谢!!' T; w, \7 B6 w* i2 _) |
[发帖际遇]: wjb19780515 发帖时在路边捡到 5 个 柠檬,偷偷放进了口袋. 幸运榜 / 衰神榜

签到天数: 2367 天

[LV.Master]伴坛终老

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

签到天数: 2302 天

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

使用道具 举报

签到天数: 873 天

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

使用道具 举报

签到天数: 321 天

[LV.8]以坛为家I

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

使用道具 举报

签到天数: 16 天

[LV.4]偶尔看看III

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

使用道具 举报

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

本版积分规则

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

GMT+8, 2025-9-16 20:47 , Processed in 1.157227 second(s), 35 queries , Gzip On.

Powered by Discuz! X3.4

© 2001-2023 Discuz! Team.

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