EMU618社区

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

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

[复制链接]

签到天数: 39 天

[LV.5]常住居民I

发表于 2016-11-19 22:19:45 | 显示全部楼层 |阅读模式
本帖最后由 yandagui 于 2016-11-19 23:11 编辑 * l% ?# H8 l0 `+ h% \0 P

/ |2 h) K5 r8 g* [( B: v
     [FC][魂斗罗旋风终板END暂停显菜单]

! a, p- w- E/ C8 i& ^' j作者:FlameCyclone(flamecyclone.ys168.com), s- q, L3 o) W2 @6 w5 i, {
时间:2016/11/19 21:46:00
) K7 ?) x% j8 \% \, E更新日志:
0 @- R$ P; U$ x1 y- u4 k
2016.11.19:加入暂停显菜单(共5页)." @! d& g( [$ d6 }- Y5 m
2016.11.12:加入无限跳跃.$ h- q( r) q/ M" k4 \& e
2016.11.12:加入速度调节.

( {7 K3 z. S" D9 A* s% }2016.11.11:加入敌我子弹对消功能." A! r9 K2 W* ?$ `8 W
2016.11.11:加入全屏闪灭功能.2 z# _$ S5 E( V0 p
2016.06.08:加入全屏瞄准功能.
/ R+ F4 b( c) M2016.05.31:加入弹速调节功能.
$ S8 y& `! L6 T& [  k. ]& y* `2016.01.01:加入高难度模式.5 @" O0 M( q- D" Q
2015.12.12:修复消除威胁不足,使得移动BOSS关卡(第2,4,5,6)正常通过.
( _0 O! L2 M% H- y  m8 x2014.07.05:由于对打功能不完善,直接去除,更改为生命锁定." p6 a0 z: Y' c% [( l
2014.07.05:双人切换功能优化.
4 l9 v$ x+ \, Y+ x& U" K0 F$ Z2014.06.01:修复第三关浮空到BOSS前必须关闭浮空后跳跃才能见BOSS的麻烦.' m& V2 g( f4 n/ L5 ]9 U
2014.06.01:取消生命锁定,改为生命锁定模式下剩余生命不会少于一条.
. F( g% K8 n( n$ r9 v  R5 K; C2014.01.18:修复GAME OVER字样只有G和O的错误,原来想拉大字母间距离,看来行不通.
% b. l+ e; R. v( T7 D2014.01.18:浮空模式下,P2飞行高度未限制导致死亡,原来是指令本该用绝对X变址的被用成了绝对寻址.( j0 v% Z3 B" V+ Z4 v
2014.02.08:拿手机无聊时又发现一些错误,所以修正生命剩余勋章显示的错误(某天用读卡器插在DVD上测试发现机器读不了卡,原因是目录级数超过三级,只有刻录成光盘来测试,结果发现生命勋章的显示竟然无压力!)
% [: h, ]' `# D& p' T( Y! ^" r7 r2014.02.13:加入自动演示通关.  V; W) a6 P& n" t* `( k- E
内容:! {7 j# r9 w% w5 \
23.暂停菜单:        暂停后,自动显示菜单,选择键翻页,方向键和BA键进行各种功能的开关操作.- l  [; z8 ^8 }; Y6 Z; ]( ^
22.无限跳跃:        暂停后,选择键4次,按下开启,开启后游戏时无限跳跃." l' i( Y8 ]5 N+ [
21.速度调节:        暂停后,选择键4次,按左右调节行走速度(0-3级).

5 w9 A* [. k4 {9 e; p& v; S20.子弹对消:        暂停后,选择键4次,再按A键切换,此时敌人子弹可以打掉.
+ y; i$ O$ ]8 Q19.全屏闪灭:        暂停后,选择键4次,再按B键切换,开启后游戏时按选择键屏幕内敌人闪灭.
* J0 {3 a0 F: E8 z% F" @3 R1 x18.全屏瞄准:        暂停后,选择键2次,再按B开启/关闭,子弹对消开启时无效.0 h! D1 l* k' q, y1 B6 w
17.弹速调节:        暂停后,选择键3次,下开启,非暂停时按选择键调节,默认为1级,共5级.7 r0 @8 g  N0 `* r8 v, a
16.困难模式:        暂停后,选择键3次,右键切换,我不相信你能够无伤通关.' u) e* d: @) `" F0 e# V
01.子弹切换:        暂停后,选择键0次,上=快S,下=快L,左=快M,右=快F,B=快普通,A=取消当前子弹加速状态.2 y& a# S5 y  X9 G  {- s& [& m
02.无敌锁定:        暂停后,选择键1次,上开启/关闭,不用讲了,金身无敌.
. M/ U. X1 D3 x3 B& d% W03.生命锁定:        暂停后,选择键1次,下开启/关闭,生命锁定为16条.
0 ?/ M9 X7 S: q7 {8 \5 ^  d( u04.角色双控:        暂停后,选择键1次,左开启/关闭,无非就是主机控制副机.' U2 d4 Q6 H9 d1 K( V8 @
05.生命底限:        暂停后,选择键1次,右开启/关闭,锁定剩余生命数不少于1条.
2 g5 t6 i, i; U* u3 h! A' v/ g06.一击必杀:        暂停后,选择键1次,再按B开启/关闭,即使是第8关BOSS,一发花生米依然要其老命." }. q- J. Z% k2 Y
07.角色浮空:        暂停后,选择键1次,再按A开启/关闭,第三关浮空时按选择键向上卷画面轴.
) d+ Z0 o1 o6 N5 G4 R: V! F08.弹数加强:        暂停后,选择键2次,上开启/关闭,此时所有子弹发射数为15发.
0 [3 ]/ E. t+ U) I09.皮肤更换:        暂停后,选择键2次,下开启/关闭,主机开启时橙黄色,副机开启时为蓝色.
% \% V, w+ ^0 n' ?5 o0 `10.混合子弹:        暂停后,选择键2次,左开启/关闭,此时连射时所有子弹混合.' l$ w7 g5 \& j# m
11.敌人锁定:        暂停后,选择键2次,右开启/关闭,此时敌人原位跑不动.- w; m0 [3 T2 @: c* a' l, k
12.跳过一关:        暂停后,选择键3次,再按B使用,使用后可以直接到下一关.
2 d8 S- L5 X+ N7 H: H5 Q13.单双切换:        暂停后,选择键3次,再按A键切换单双人游戏模式.3 |1 _: Z/ q; h) |7 F
14.子弹方向:        暂停后,选择键3次,上开启/关闭,开启后发射的子弹攻击方向会随着操作的方向按键变化,第二关和第四关的小关建议关闭(开启的话打中敌人太难了哦)., J. H& J2 l$ G; e1 o4 K
15.消除威胁:        暂停后,选择键3次,左开启/关闭,此时游戏时按B键使得移动物体被消除。$ i: Y9 V" s4 `7 |& J8 d1 s) ~
A.做了一些汉化(小字体),剧情,关卡名及通关后的文字未汉化.5 B# N8 X* y0 e3 a, n1 l
B.自动演示通关,双人合体打通关,演示时有背景音乐,通关后一样会有结尾及恐怖台词,之后游戏进入选关(相当于游戏自动开始了).注:通关后P1及P2会获得16条生命!也就是说看完演示自动开始后第一版有16条生命!3 f4 a8 t3 i1 @& w8 r
C.生命显示加强:最大显示15个剩余生命勋章!电脑端请开启精灵超过8个(这样勋章不会闪烁),手机端认命了,不过不影响正常操作.
5 U4 r) l. G5 a- f, [5 r+ X5 T" A+ s/ e! I7 X- Q
    如果有什么好的修改建议,恳请通过QQ(1490868135)联系我(也许我不在线,可以留言在QQ里)% }& q7 I/ r' L! l, F
欢迎大家转载,转载时必须注明出处.
2 o" ]6 U+ H  p0 r( p1 }( n. e$ a' t/ B5 u8 B
游客,如果您要查看本帖隐藏内容请回复
) p+ B% q8 H0 d# N  S

" d" p2 K4 C- o' l忙了一个星期,觉都没睡好,眼睛也疲惫不堪啊.终于找到解决方法了,目前VIRTUANES运行不了,请使用其他模拟器玩.. Z/ H( c' I: \$ h8 p
这几天的劳动成果如下:
  1. .ORG $B400
    / k5 Q8 b7 n' K* W5 |1 f, {+ o
  2. 0 r* d  p) E; F3 u: A2 H$ m: k

  3. / b# V; \1 U/ t8 P  K/ A0 v& h
  4. PROREG:0 g% P$ O1 `7 m/ |( V, C+ p" b
  5. PHA7 K  |+ F% B0 E6 }, I1 e
  6. TXA
    " `: x0 i+ V* H) c$ i3 U; Q9 h
  7. PHA( z4 O0 x" B1 Y. R' e' S
  8. TYA$ c) X5 f1 A, ]3 a0 `& Z2 Q
  9. PHA# N# a/ s. E+ z( g1 b+ t" E
  10. LDA $25
    # x% O  r9 K; j9 z6 W+ s, i5 w
  11. CMP #$01- V6 G2 ]% ]3 Z
  12. BNE RE" q8 \0 _. y& q  F+ z6 z
  13. LDA $010A
    6 K* y: N1 n5 v/ R6 e/ J
  14. CMP #$00
    5 i1 a8 E$ ~5 W, t. V' i; L
  15. BEQ P1
    & S" J# }2 b1 @9 H) P; ^

  16. ; [3 r* U+ `& e9 \( y* i
  17. RE:" V3 N- E* R3 m, i5 C0 W. }! T
  18. JMP PPUWRITE7 r2 a/ d' T! h# D! f" u2 F

  19. # T6 N  Z4 z$ W# [. X' |% Y
  20. P1:                ; 条件判断) {7 R" n  O+ S7 ^% `9 \
  21. LDA $7FFF
    5 t# U4 O8 h3 |
  22. CMP #$FF& v% U% P% h; b! M1 ~
  23. BNE P1RP
    " l. S1 `! }- Z5 Q, v8 c. u
  24. LDA $7FA0
    " k; R7 g" u: n2 j1 p
  25. CMP #$006 C$ I' N' g, ~; t' i
  26. BNE P1CMP
    * W; M! R, l/ o9 p# r$ k
  27. LDA $2001
    ) K' a" y0 V/ A# h5 m9 A+ b6 M! K, z
  28. PHA
    & i4 `1 w, Q% E( p
  29. LDA #$00
    % ?6 Y3 J" g+ Z" A( I; B
  30. STA $20015 Y( |! W1 C2 B
  31. LDA #$FF
    5 O- ^5 n6 {% ?9 r. J7 e
  32. STA $7FA0' a( s6 ^! z! s
  33. JSR CLEANA
    * Q) F! D5 e: O* [- _2 \, n
  34. PLA3 ~5 @5 Z; u" L1 {& V: L) q
  35. STA $2001/ @/ C/ C0 u% U- K" I
  36. JMP PPUWRITE
    3 C! f  S' I* F  ]; z. w) M8 |
  37. P1CMP:
    ' U$ }; n2 r: x/ b8 @
  38. LDA $7FFF. S" Q$ B6 A# P0 x" Z
  39. CMP #$00
    4 M/ L4 O& U+ f$ ?: C: @; ~
  40. BNE RE
    + [* y) q6 N1 z- W, I
  41. P1RP:
    " I, ]% j% Y7 u& X4 V! v
  42. LDA $2002+ [2 K% g$ w1 w% a" C# w3 Y
  43. LDA #$009 I% B2 O* U9 ]3 K6 s
  44. STA $2001
    , L) D  f$ o3 J) Q
  45. LDA #$FF
    $ T  C# I7 V$ F8 s$ d
  46. STA $7FFF% F$ n6 _+ X0 J% A7 F; ], f" Q! H
  47. STA $7FA0
    3 E4 g* G) L9 h! S0 H) S2 {
  48. JSR COPYPPU& \$ w  _1 b4 F1 y) p" @
  49. PIRP2:7 N( S5 `7 R; g5 C' w
  50. JSR CLEANA
    $ Z6 W+ e. y8 }6 ^9 J, ]
  51. JMP PPUWRITE6 k$ s& }, q" G- f5 h) t% h& p

  52.   {( o4 q% ~8 `
  53. COPYPPU:$ V1 d4 H$ T  o  o0 p
  54. L0:1 q+ c* X* r0 s6 d, e7 h
  55. LDA $30
    4 C- P- v: \( e& @5 U, [
  56. CMP #$02
    # A' O$ d1 U$ m. N8 v. F! Z; u
  57. BNE UNPROFC5 O& v1 p( W/ a3 n7 ?# W  r
  58. LDA $FC
    9 F" s; j& u# @# u6 D7 E( J
  59. STA $7EFC, ], [8 X- ^2 r  Y- R. Z% \
  60. LDA #$00  U( P7 ^; \3 p$ z6 M" I( f# Q
  61. STA $FC8 M6 F0 N& m% `6 j
  62. UNPROFC:
    3 m4 S& j& _5 c  x  |
  63. LDA $FD3 m% r: {4 h3 s) x- D! p$ U
  64. STA $7EFD
    8 Z- X; u8 F+ f$ q9 N) e
  65. LDA $FF
    7 C2 {9 O# w0 M' I6 t8 A
  66. STA $7EFF% W4 F  ~, b* ?
  67. LDA #$009 s6 R; [, D5 b. L8 M+ F
  68. STA $FD
    " _9 o7 V5 h2 x' @# u! {$ w$ e) k9 j& n
  69. LDA #$B0
    / V; D# L* ^! `) Z7 O0 S& c( n0 r
  70. STA $FF( @& c2 v) @+ M5 }6 W
  71. LDA $07C1
    5 V- u" r. }3 A; L9 a& Z* ]
  72. STA $7FC1
    : c" r4 h" O$ {. s; T0 D
  73. LDA #$3F, M, u( o! a- C; E; S( g, U4 G# {
  74. STA $2006
    - ?' B0 t. j0 F3 C
  75. LDA #$01: F' K8 s+ `6 r# ]% k5 _4 L
  76. STA $2006
    & V8 G- {! l2 v" }' n- a# `
  77. LDA #$24; v7 ?; @3 l' `7 B. j
  78. STA $20077 f" Y, r& R* G% ~
  79. LDA $07F6& I/ k. ~; Q8 P7 F. `- T
  80. STA $7FFE* D. u7 k# R8 I0 e9 k
  81. LDA $00FE
    1 ]4 K8 a; V7 ~, v' G1 L
  82. STA $7FFD# I- z/ u6 P) k  R9 l
  83. LDX #$00# X' O; `  i: e4 A
  84. LDY #$00
    / D4 O4 N+ Z, R+ ^* e" @: B
  85. LDA $BD3 T" w! k) T; A( d' e+ B
  86. PHA
    # a. Y% N; n- |6 D% {
  87. LDA $BC5 {6 @3 ~; o* b# T+ x( I7 y
  88. PHA9 I$ K5 p3 X! E/ y& v8 h- X
  89. LDA $BB6 x9 B8 d4 x2 z, h  j
  90. PHA
    2 `( h# N$ a; z% v; h8 S
  91. LDA $BA
    3 U# D- W  T" [; g0 r
  92. PHA
    2 i. F. Y9 \9 @
  93. LDA $B9
    & m1 W# l1 V8 q3 L! r/ G. ~
  94. PHA4 L9 ^5 \; U8 i5 R
  95. LDA $B8
    + ]/ }1 r; C8 m' c* V4 n# Q, I. T
  96. PHA
    3 X2 {, G7 n% V1 z3 L' K
  97. LDA #$00
    4 K) W5 R$ }+ S% ^- i
  98. STA $B8
    9 k6 {( d! P, K5 a$ U7 ^
  99. STA $B9, a+ y+ v, {; j  _
  100. STA $BA! x( G) q8 E* K% p3 L7 [
  101. STA $BB% z4 q0 @- g5 X& J& V5 n: x$ M
  102. STA $BC
    / I! o5 ?; x' W. c* a
  103. STA $BD* d+ N7 Q- }% o" F
  104. LDA #$00% T+ p/ X& y8 C
  105. STA $BA7 p* n: N6 a7 a8 y1 D/ n8 ?
  106. LDA #$20
    , ?0 N+ t. E4 ]! v
  107. STA $BB5 q# T7 m- M7 v& G, a) x0 ~- @8 @6 J
  108. LDA #$00
    " L3 P1 T. m8 @/ Z9 }8 n
  109. STA $BC
    - ~4 ]2 j& P. s* {# V+ U0 y
  110. LDA #$60
    + |  e' W5 f7 w
  111. STA $BD
    / A* b# Y3 J) s& c; H- C

  112. % u; x0 w6 A: a' b- G$ }: N; b
  113. L1:                ; PPU复制( e% |7 E& C& G( j  J' h% }) T2 }
  114. LDA $BB6 f. X. D2 I% ~
  115. CMP #$30
    8 V" A: L% W6 O) }* i$ v
  116. BNE L2; Z6 |- R! r' g. j# f
  117. LDA $BA
    ; k, o8 s$ E. s
  118. CMP #$00
    ! N- o! ~9 P9 U- P; C% A
  119. BEQ PROADPLA
    7 h, H! Y1 |' _% `5 J( C

  120.   U: q4 L+ Z4 ?# S& p
  121. L2:
    , m" ?7 U9 S( F9 E
  122. LDA $BB
    ; q1 }! v6 L. h. e
  123. STA $2006# v, Q! N0 n) y: h+ z4 U/ e7 C
  124. LDA $BA
    3 R) t8 u! e, u
  125. STA $20069 T& G1 m( X6 N& U
  126. " o' I1 A' P9 `! ]: Q
  127. L3:
    ! B4 T( [) }& N( A. s
  128. LDA $2007' k+ B* z9 ?+ d/ S9 ]
  129. LDA $2007
    6 ~0 t( G* V+ P0 R3 f
  130. STA ($BC),Y1 m/ I4 d" B" F% E
  131. 0 u9 H; E6 G+ @8 J
  132. L4:
    - B7 H; @7 i; S
  133. LDA #$00
    ( @3 {4 y2 Z' _9 F: }. d: {
  134. STA $2000  z& S, r  K0 v( S0 @3 y  o9 V: m4 i
  135. INX8 I. z( h( @1 I
  136. INC $BA1 o/ Y  R3 w$ P( |' l
  137. INC $BC
    % j/ X6 U  O2 [$ c9 s
  138. CPX #$00
    6 W, Z- d8 [6 ]/ G, g
  139. BNE L1
    1 w8 t0 t& y& ?0 e# p
  140. INC $BB
    # X+ r: V/ J0 N& \( `0 I+ C+ P
  141. INC $BD
    1 j. j5 y0 v; G, g  {% g$ L! p
  142. JMP L1
    - K4 I1 p! a. F, G1 m& C/ U
  143. * [0 W' _# n" T' n  a
  144. PROADPLA:                ;出栈' s: s; ~+ @2 h" v: E
  145. PLA
    ) B* {2 k) C* E
  146. STA $B8
    - R' a8 i" Y; T' C
  147. PLA3 m9 Q- i/ N: b6 m- J* z
  148. STA $B9
    + p! P4 k& i6 H" @/ I
  149. PLA
    / _# k$ }6 p& C+ K' x( v* M# U
  150. STA $BA
    & |- A3 R. `# g: J3 ?" Y$ m
  151. PLA7 g7 D% {# j5 W3 i/ b0 ?: A- J' r
  152. STA $BB. R  z+ ~; T. }' H, q
  153. PLA
    : T2 n' X) d2 N9 C
  154. STA $BC) i" {- |  e  P1 f+ S# |4 p
  155. PLA( T1 ^3 d$ ^; _- H
  156. STA $BD
    6 L2 p# \8 N4 E( x+ ^( u
  157. CPRE:+ m# C7 U3 s9 f* t! d2 a8 R) f- O
  158. RTS
    7 t0 K9 A1 D: t7 X# o' r, d

  159. 2 U( h# y( B& C7 H2 k2 `1 o: ~
  160. CLEANA:                ; PPU清空
    - h/ g6 u9 R/ O+ e# O9 [
  161. LDA $BD; v7 i$ [+ M) b3 r$ |
  162. PHA+ c. a; G6 \9 p
  163. LDA $BC* {& A* e3 o$ i2 C: K
  164. PHA
    5 l' x! N; w' G' j4 m
  165. LDA $BB. B2 M. m) s/ @4 U2 h8 L/ @. T- X
  166. PHA3 f: p- x6 n; i' w- Q
  167. LDA $BA
    . @/ B7 k0 W. Y6 Q! j" B8 X1 J8 f
  168. PHA. e6 u+ ^% W0 m) c: k2 n
  169. LDA $B93 U* r. `" Y1 l" F- b2 u2 [
  170. PHA
    6 B4 R5 l, u8 v
  171. LDA $B8
    ' L+ j8 I/ }, {; E3 o# I1 X& M- E) m
  172. PHA: R* U! |3 i$ o
  173. LDA #$00
    # B4 u8 z+ R" p, [6 N5 p. o
  174. STA $B8% O, O- }' D$ b9 T5 }
  175. STA $B9, t( v$ \8 e1 R6 z# O
  176. STA $BA- n6 ]+ l  D  I3 U2 k' h
  177. STA $BB6 o. t, U" x. n' n/ G" n
  178. STA $BC' L, P" E" ^5 N2 a" g
  179. STA $BD0 E; F2 ]: K6 [- q% }' T" r
  180. LDX #$005 \& w- r6 g  x& b. T
  181. LDY #$00
    9 ]$ `: @, Y/ W* ~
  182. LDA #$001 s9 I2 f$ N" u, J* l0 ^& n+ u
  183. STA $BA
    3 @, A) e) v; D  V
  184. LDA #$201 X* y: W1 b3 F9 V. L# t
  185. STA $BB
    / n  A( N; R7 N

  186.   b6 `$ z5 C+ Z5 a
  187. CL1:5 o! x# u3 \+ A. |
  188. LDA $BB8 a' Y& f; A/ z0 m
  189. CMP #$30) l. N) L# G" g0 N. j+ E$ k4 ~
  190. BNE CL2+ L$ Q% b9 U4 ^; g  R' f
  191. LDA $BA7 s; ]7 P: O7 b+ c
  192. CMP #$00% A# h$ P. {1 }! C+ W. f" o
  193. BEQ FREEWRIYE1 f. l& R* C# m" a/ L

  194. 3 Z0 P( a8 Y: x5 B0 v" ~
  195. CL2:; A, F! @" o, ~
  196. LDA $BB
    6 v2 t! J# Z. F7 C3 ]
  197. STA $2006: K4 p" l  \5 R$ H- M+ [3 B1 h4 p  l
  198. LDA $BA/ \& T6 z- q+ ?
  199. STA $2006$ o0 K  f1 T2 `8 q# b3 z; N' S0 z
  200. 3 R1 h; j6 b0 r1 m. \- v
  201. CL3:
    4 k, l; L, H: I
  202. LDA #$00
    & o% A  K. l% T3 X4 L9 T
  203. STA $2007
    / U* s, y7 P5 o' a1 }
  204. 7 h1 q9 F: }/ _" v
  205. CL4:: o7 \$ F! H) u
  206. LDA #$009 \. W) ]; n0 k$ g7 m5 V0 ^
  207. STA $2000
    ( e4 h5 f- K: H- {7 G
  208. INX
    ; O" k, R. z$ s) `
  209. INC $BA: g+ x1 R# N% |& C& h4 i2 t
  210. CPX #$00( Z4 H( H: c+ Z3 d3 N
  211. BNE CL11 l3 N0 S- z* I
  212. INC $BB  U1 R& K$ a$ o; l2 k1 C6 C
  213. JMP CL1   g; N# ]4 ?- u/ I) B4 R- S9 W6 V
  214. ' T2 q" \4 T- W9 V& q7 M/ O

  215. - f  S" y- I# X) a2 `; M
  216. FREEWRIYE:
    5 x9 E( i, w+ I
  217. JSR FREE
    1 o0 d, s1 O" s' ]
  218. * y7 J( j# T+ e0 C$ Y# ?6 m
  219. + k, o6 K! X% @2 `8 l
  220. ! w4 b- z$ p6 F$ B; |7 l/ n! B

  221. , c( I' p- M& t1 ~

  222. # p6 C: F. V5 y, t9 O% h
  223. CLEANF:                ; 恢复现场3 M- Q' F( E7 O, G8 I4 A
  224. LDA #$08; k3 Q) n+ x3 H. [2 P
  225. STA $FE
    / w3 v0 P' o2 f$ V
  226. LDA #$00
    8 `( M- I, }. J2 T) d
  227. STA $07F62 B2 _4 E$ H) ]+ X! Y
  228. LDA #$24$ Q7 U9 R' U3 e) }
  229. STA $7FC0
    % b' N1 {  W+ J
  230. PLA9 A& r# r$ ~. Z/ W1 [) X0 W- `
  231. STA $B8
    % M' ~& Y$ u: j/ q
  232. PLA
    & I' q  j/ g2 Q& L
  233. STA $B9
    9 j" X  E! Q' D5 @1 I1 e* O3 C
  234. PLA
    ) G% B2 b. u( j. ~5 Y& C
  235. STA $BA
    7 z$ t. @6 m5 h" a( q' f
  236. PLA! H  `  f; ~, q8 j. o. x9 c
  237. STA $BB% j* D4 F0 J3 \7 e0 `
  238. PLA* ~+ U! B" |& L1 @6 }
  239. STA $BC
    " ^2 @5 n2 w' N$ A/ T) h
  240. PLA
    & X4 N  t- N  A7 ]0 E
  241. STA $BD
    8 h" ~* t% u' s, E$ I
  242. CLRF:( w3 f6 J7 w9 ^3 ^' e6 Q, V
  243. RTS
    ' D5 x( _) n" L* P! [! J4 K0 K6 U
  244. 8 P" [1 s' t2 N
  245. W_DATA:
    * W3 o' b- C  ]1 W5 e; W
  246. .BYTE $00,$01,$02,$03,$04
    & `8 y7 ?& I8 j4 b/ q7 T7 i
  247.   1 @5 F: e. _2 G2 A
  248. W_PPU:
    & s. k9 \5 Q5 \( h6 m9 ?" w
  249. .BYTE $98,$97,$90,$9D,$96, k5 y* h5 ?7 ^0 G6 O, E! E

  250. 1 O7 m' n6 r9 I" C$ W; j
  251. P1_STRING:  `) `: q% B6 o9 o: t3 X2 G
  252. .BYTE $9A,$82,$00                ;"P1"8 G, l( R. E; j  L  a

  253. ) i: ?% t3 C7 D$ w8 ~8 I! q
  254. P2_STRING:. ?4 v1 r/ w1 w" m+ S+ v
  255. .BYTE $9A,$83,$00                ;"P2"0 y) h8 C0 g( h7 t
  256. & R. W8 q2 E5 y7 n0 b* z+ \
  257. WEAPON_STRING:
    . p# K# k) Y' n( `2 m
  258. .BYTE $A1,$8F,$8B,$9A,$99,$98,$00  ;"WEAPON"* a. B. j3 x" h/ g1 i

  259. , p5 z8 q4 H! M, x# [
  260. RELIFE_STRING:
      R; E- U. v$ R7 e5 h% f
  261. .BYTE $9C,$8F,$96,$93,$90,$8F,$00  ;"RELIFE"/ J8 ^! {7 y" `' P. ~

  262. * W2 e; J5 Z5 g6 I8 Y% ]- @) [1 \
  263. P1_PPU:, T$ p2 Q5 e$ U) C5 N0 j3 i
  264. LDX #$00! j7 K. F3 r. f8 Q- b

  265. 3 x2 o2 E" e% {. P8 ^2 C$ a
  266. P1_PPUW:
    ! |6 V, F" E7 G. Q% N
  267. JSR PPUADDR_PROCESS& Z! e+ w, M+ G# d- {
  268. LDA P1_STRING,X
    , p! [6 s& S# B$ P, z# q
  269. STA $2007+ L; b5 t6 O- P
  270. INX- L5 L/ }$ a, y7 n
  271. INC $BA/ ]- |7 [* C9 \( h( u8 j
  272. CPX #$03" q1 c" ?1 b9 V
  273. BCC P1_PPUW
    - O7 Z2 [# p* @& Z/ V
  274. LDX #$00
    # `  u% g0 T" U; @
  275. RTS1 |0 ]- D9 ^; E: O) F* E, E

  276. 8 ~. E8 Q5 ]+ \+ Y& H5 x0 K# J- f6 |
  277. P2_PPU:
    ( B6 c* z  K# i2 V& T* c
  278. LDX #$00
    , ?. G6 p# A! }& q% ?' {

  279. ) f$ V& e. D9 m7 k# i: k0 Y
  280. P2_PPUW:
    9 U) w) j, [5 c* a) f
  281. JSR PPUADDR_PROCESS, l- H' H/ G2 V5 g2 W
  282. LDA P2_STRING,X; H- N4 i( r8 K) j( Z9 H/ P* ]
  283. STA $2007
    0 t4 `% a" C9 o. u& z
  284. INX8 S! S- Z: O0 Q; ]* _& f
  285. INC $BA
      a. @" a( F( W. z" \4 f
  286. CPX #$03# B: ?3 m8 F) p3 s$ g" G
  287. BCC P2_PPUW
    3 {: Q2 n' m& e' X7 Q$ c* s
  288. LDX #$00) _) z2 E& a$ }$ g  b: o
  289. RTS
    ! W7 v8 ~# Q* ~& b
  290. 6 g$ Q4 _- w2 _# ?2 O

  291. ! e* d9 d8 k2 c; M
  292. LDA $BB
    ! l: f7 ~# H3 C# ], j- n  N  f, `( }
  293. STA $2006
    . V/ Y" a# K+ t+ W4 t- O9 ?7 s; z
  294. LDA $BA
    ; V# ]/ o6 h9 P" q# g
  295. STA $2006
    7 X1 e6 a3 ]/ l. K9 K6 f
  296. RTS
    " G* s# ?0 G2 l" G4 N1 V$ j& }
  297. ' Q% n$ p% H  N% m4 ~$ P

  298. ! M4 S+ |- ]+ \) Q8 a% _

  299. 3 ]6 F0 w' S4 ?# ~! Y. v
  300. PLAYERLIFE:
    ' C/ |* d, V# ]# |" o
  301. JSR LIFETODEC
      m& E$ w/ J. x( A: L
  302. LIFEPPU1:6 k6 o- e+ Q2 s: N- A
  303. LDX #$00
    " |' o9 [# N$ B# X
  304. LIFEPPU1RE:/ j# N) Y" b  u. h
  305. JSR PPUADDR_PROCESS6 m; R2 ?5 c+ D. n+ A4 ^/ l$ t
  306. LDA RELIFE_STRING,X
    + ~* ]$ p( Q* ?  I) @# y8 Y# z
  307. STA $2007* [  _" z  i$ q, E8 Q7 T- g* N
  308. INX9 M7 K8 O$ Q$ ^& e, i! ~
  309. INC $BA7 b) F# c. @0 C/ E: k
  310. CPX #$07
    # w/ t( G( ], k6 O/ C$ E* f
  311. BCC LIFEPPU1RE  l3 q9 b2 u/ H9 y/ S. B4 v
  312. / X/ @( g  h+ I5 l7 E0 {
  313. LIFEDEC:                ;生命显示写入
    $ g+ d+ |: L" v" o0 H- B# D: m
  314. LDX #$00
    " a! C" n* w  s/ R
  315. LIFEDECRE:: S" q  D, a0 n/ W2 L: c
  316. LDA $7A03,X
    5 x" r- I7 X- r* }. Y/ O! B
  317. CLC1 \. i. ^7 a+ s: Y  H$ T/ l
  318. ADC #$81/ D$ F2 l' s. ?  F$ M' [- Y) p- G
  319. STA $2007
    ) x% \2 X0 Q% |+ d. o) [8 ]0 c0 W
  320. INX
    ( \" T5 x% N+ l" {7 g
  321. INC $BA( ]: U3 E  P- o' r& |
  322. CPX #$03
    - F: ?# }) _" X8 @- A2 |
  323. BCC LIFEDECRE! J6 t" z8 Z% U$ E
  324. LDX #$00
    4 o! H4 Q0 [2 J
  325. RTS5 J; K( x8 r7 m) X
  326. 0 l/ A4 F! s" f6 t) Z' S  p
  327. LIFETODEC:                ;十进制转换
    2 F8 ~- L% q3 h) _9 ~
  328. LIFEL1:        ;initialise4 Y& g/ L; g9 m4 }  X5 `
  329. STA $7A00        ;$7A00=F3
    6 S4 P8 ^% `5 o0 D& y
  330. LDA #$00* p( h+ k( `3 D0 N6 l" k
  331. STA $7A03        ;$7A03=00
      x3 W1 o/ B' _( {9 @7 m
  332. STA $7A04        ;$7A04=00( M& X6 ^( K5 ~! n- \& Q# S
  333. STA $7A05        ;$7A05=008 k; S8 p9 l+ y, `" }1 _
  334. LIFEL2:        ;copy data $7A00 to 6001* N; k6 N( S# _: H% x( G8 t) g3 G
  335. LDA $7A00# z# g7 K6 j: U. K
  336. STA $7A01
    - S, G5 i0 k( n' Q) g+ @
  337. $ D( o3 W$ \9 Q, v9 g9 |, |
  338. LIFEL3:         ;hundred
    / ~! C6 I& o% B8 j
  339. LDA $7A01
    0 @9 Q% W% }! C# D: H
  340. CMP #$644 |8 Z0 U  n: @) V3 V2 Y* b0 y
  341. BCC LIFEL6                ;$7A01<100 goto L6
    . v4 [/ m! `9 ^$ q/ w: J5 }* ]  s! t
  342. LIFEL4:
    : L0 g" a6 x9 v" D
  343. LDA $7A01) `5 J) H( R* i9 H
  344. SEC
    , {7 D. s0 }& E3 q( P/ }
  345. SBC #$64        ;$7A01=$7A01-1009 y3 ~7 U+ C! m9 v
  346. STA $7A01
    " a- ~, u; G$ h* c( y' |& _  w
  347. INC $7A03        ;hundred+++ k1 s# c: P. C0 A, c0 h' f
  348. LIFEL5:
    * J$ x0 r- I. F. n; r
  349. LDA $7A01& [. y7 _9 |7 {0 j
  350. CMP #$64/ {0 m- U, s! ^! h% Q0 r4 q" Y# K
  351. BCS LIFEL4                ;$7A01>100 goto L4
    ; k# q6 c& k8 l' z' i" [5 C( g
  352. " E+ N0 h, N6 U4 p! ^$ k4 L+ \
  353. LIFEL6:        ;decade0 K) F, @% M% _6 e
  354. LDA $7A01
    4 g4 f: n! q' e& @5 C
  355. CMP #$0A
    ; t( V! N* O' Y" z4 V) O
  356. BCC LIFEL9                ;$7A01<10 goto L99 c/ w+ o5 m6 u7 |! ^9 H
  357. LIFEL7:       
      y' N; U7 O. b2 ^! f4 v
  358. LDA $7A01
    6 E# T' B% Z! V# F9 g
  359. SEC: @& P$ z+ y$ R. F0 n5 i
  360. SBC #$0A
    ) T( @# O. u5 {# v  ~( q
  361. STA $7A01        ;$7A01=$7A01-10
    : T' {3 u5 \5 [6 N5 n. F
  362. INC $7A04        ;decade++
    , ?5 B9 _, f+ v0 A% b6 r  P* j( y) [
  363. LIFEL8:
    7 E; `2 G+ j- W+ x0 [
  364. LDA $7A01
    - I* {6 p6 D* a, z6 Y3 o; J/ @/ \
  365. CMP #$0A' I1 T# c! b! U$ T- Z
  366. BCS LIFEL7                ;$7A01>10 goto L7* e$ t& t0 ^! w5 j" ~' H6 |% m
  367. ;unit0 w- A) `3 ~0 N7 a+ [$ h" ~
  368. LIFEL9:" M4 g$ r- Z8 p1 I* J( S
  369. LDA $7A01        ;$7A05=$7A01
    ) ~. H4 S1 z+ U$ F
  370. STA $7A05        ;unit# D. X4 |4 ^% K8 O+ _7 U
  371. RTS        ;return
    % y8 m. Q% Y4 L! N/ a/ I% J4 w1 d

  372.   x: r  u2 O: Z1 w! y

  373. " P+ R' e9 I; J2 m2 h+ d  }6 K
  374. 0 u% Q  Q6 d1 I1 ?7 Q* j; Q6 z- A/ Y
  375. WEA:                ;武器ppu写入. q5 n* s% v2 ~( J. y& k) e' b- {7 g. S
  376. LDX #$00
    / _, H7 P% b; E; ~+ T
  377. WEARE:
    # A: p1 U; A9 j8 k
  378. JSR PPUADDR_PROCESS
    . {+ ~! U7 x( x3 G
  379. LDA WEAPON_STRING,X. L6 x* g8 k1 p/ U) `6 z$ T/ ^
  380. STA $2007( p/ U% G; F( I7 U; S
  381. LDA #$00/ o  v" k2 k5 U' a. N/ f% |$ o
  382. STA $2000' H$ @* l, v6 o1 J
  383. INX
    ! S8 `. Y. r  G" ~' m/ ?$ ]! F% @: i
  384. INC $BA$ W# e$ W& U9 R+ _( H) d! E9 v# W. @
  385. CPX #$070 N$ e3 ?% n0 {- ~- Q7 M+ m
  386. BCC WEARE' u! V/ E, }9 K) _4 g* p) C
  387. 1 ?9 {$ @$ q* |, B9 W% y
  388. READ_WEA:
    4 |4 U5 V2 ?, G. z( k. s
  389. LDA $B98 M' v+ f' w5 G4 L2 f) A
  390. AND #$10
    3 q8 M: M4 x- a! E( t4 n8 x
  391. BEQ NWEA0 [3 k0 F0 C2 \+ J" x: f4 L/ m
  392. SWEA:( w2 h8 m' p6 z# v5 a# U/ n6 o

  393. : I" r* ^7 C. {. P
  394. LDA #$9D
    " a' H% |% J4 D  U: K
  395. STA $2007* P/ a. k: J1 W* v: k  a
  396. LDA #$00; f( F: f4 v0 G3 Z; Q; c8 F2 H
  397. STA $2000
    ) \/ x% L3 K3 N# V+ r% O5 P4 j& q4 N
  398. INC $BA
      I5 y9 A, `% L  @4 ]
  399. LDX #$00
      J4 U; K0 H: d* J8 Z- z- z
  400. JMP WEAREAD
    / [  a( k% a* |2 N; o
  401. NWEA:, u+ y2 Z3 n" p8 [5 Q4 t( m3 q

  402. 1 R) x5 j2 o. L& j5 Y" w( F
  403. LDA #$8D6 `" K6 |1 h3 ?2 K* b% |# b
  404. STA $2007
    ( j- E6 \+ Y3 l* [
  405. LDA #$00' u( h( p% E/ e
  406. STA $20000 W2 E7 H$ ]0 s
  407. INC $BA0 o" g. O+ z: L5 E
  408. LDX #$00: ?6 m3 G  h' r7 V8 }) O
  409. WEAREAD:
    ' I0 U- ^- C; s8 n/ G' s
  410. LDA $B9& r: a7 U9 n# D( Y: E1 i
  411. AND #$EF
    : O: ~$ z! A& c
  412. CMP W_DATA,X6 {  l) ~! M" m9 `: k
  413. BNE WEACMP$ ]" S% o, C" \% {! r
  414. 3 W; C6 b. H* }6 j
  415. LDA W_PPU,X
    4 W; X6 W: R4 x& x$ _1 r. ?: t# q5 s
  416. STA $2007
    " T! b: O0 J2 u+ Z) `6 R* q5 ~
  417. LDA #$00* h' a' j. Z8 b4 M& ]5 y# U
  418. STA $20005 O7 a- N* @8 B* A

  419. ( f$ Z0 D: L& o. T6 ^4 _
  420. WEACMP:
    $ L2 D1 `% J; Q5 ]) u* `
  421. INX/ ]5 }% ^' S; N% M" _4 H, S
  422. CPX #$05* Q& P' [% F& J( R
  423. BCC WEAREAD6 M/ \- ?# C$ x4 e
  424. RTS
    & `5 |$ ~: D) |0 V- W

  425. $ z  r' u1 `# d/ m
  426.   S, i3 G0 y" r" @7 |
  427. PPUWRITE:
    , [* s7 I7 L2 x! V: X  r
  428. PLA9 h' g% V+ v& I% ?2 B) E0 P
  429. TAY/ S) a+ r# d7 ^0 K) E' w; g$ z
  430. PLA3 v: L8 b- K# a2 B( G- l
  431. TAX; ]! [3 b( ~$ @0 P2 J* N0 B3 H
  432. PLA
    1 D9 K* E% y. v' \
  433. LDA $25# N9 D9 j) M4 C% g# g9 ]
  434. CMP #$00) ^" l" Y  v2 R! Y! w! X/ C
  435. BEQ WP1- e( Q# W0 ?1 `3 x  |
  436. LDA $25, l- v- b3 e0 S- b" \
  437. CMP #$01& @. a- E' `( L0 r  ~2 k+ _
  438. BNE WRE& z& l0 j0 ]4 t* H
  439. LDA $F5,X
    ( J9 J& K$ q/ O  n. W
  440. AND #$EF1 C9 \6 C' z. b- V% d' E
  441. BEQ WRE
    4 A) Y' ^% ^3 A$ Z* b  ]
  442. LDA #$00
    : M  C, a2 e& V! ]! O( h& j7 E1 M* E
  443. STA $7FA0
    ) _0 @3 \1 f% r4 T

  444. ; ]: o2 J6 C9 R8 M/ S7 I
  445. WRE:. C% K& |2 ~- d" B& ]* r* t
  446. JMP $A000
    + G; q$ x) z) J) _, p3 x; A5 t! N
  447. 4 x% D: c. n6 O
  448. WP1:4 w( S% ]; [2 a
  449. LDA $7FFF
    6 N, V! u" a+ v3 `8 S* L4 y
  450. CMP #$FF
    $ X% U" b. y: F5 F& D" \
  451. BNE WRE2 s# a0 W; n/ k0 Q
  452. LDA #$00
    9 V4 i' X' ~1 \! e
  453. STA $2001, q0 U6 Q5 D  J0 M! h# a, |
  454. LDA $BD
    $ w+ ?: W/ j; Z7 f. ]9 n. {# A
  455. PHA) A% D! q+ [6 q
  456. LDA $BC) L/ w* z7 c" W1 L* l. l" h
  457. PHA
    ' J; x- R: w" G4 I& Q" i3 v2 D
  458. LDA $BB
    : p1 C1 J; y0 ~4 h
  459. PHA  T6 Q0 P# x  q! F8 K; ^6 C2 q* @
  460. LDA $BA1 e5 U' O6 {. x( }! z
  461. PHA+ d" g2 b5 C2 W2 n
  462. LDA $B9* Q/ r+ a* a# K
  463. PHA
    8 O$ x3 _& q  L# m" x  M4 K
  464. LDA $B8
    , Z9 K$ j. k8 |9 S
  465. PHA
    . c) `1 V! ^* J; ^% M
  466. LDA #$00! b+ a4 m) {7 y1 |; Q( ~& i
  467. STA $B8
    : Z2 n2 F- G" T/ t" v
  468. STA $B9
    . F+ S. C- F3 T  c/ `
  469. STA $BA
    5 G7 l) P, a9 H! n7 F0 @
  470. STA $BB
    * r! R& c4 L' t2 Z2 _2 B
  471. STA $BC
    5 W7 `  L' h) C. e8 T
  472. STA $BD
    4 O5 ~# O9 V( y" O2 C# h
  473. LDA #$00
    ; J2 V, @6 P9 J& ^5 r
  474. STA $7FFF. n* v0 z6 _  h4 j8 H% {
  475. LDA $30; S' O0 N6 x  R  T9 l4 B$ x
  476. CMP #$024 K9 l  O7 b, D1 V% [- X
  477. BNE UNPROCPL
    5 n! }" D' ^; o" {( [
  478. LDA $7EFC/ H! h( z0 R) x, D
  479. STA $FC2 m) t# y, H; [* K; X; j
  480. LDA #$00- L; n! j. Q0 r  t0 r# ]6 G
  481. STA $A4; T$ u5 U) J5 i! c8 e: I: `! D# h
  482. STA $A5
    9 J, |& Q( K2 T" |  F; D
  483. UNPROCPL:
    , r- l- v. t* u) A) ?, |) p5 t; O5 x! q
  484. LDA $7EFD
    * g. ]. X) T* M; t. ~0 r6 X
  485. STA $FD1 G  v) A. ?& s( N
  486. LDA $7EFF
    + i. Z+ }, {6 S6 A8 S6 @+ E2 B
  487. STA $FF% ^! W& @5 I; |* n: S" ~" F

  488. + A/ W: v. H7 Q5 J7 d+ f
  489. WL0:
    + u/ _+ F4 l3 d' c$ d0 i; N# D
  490. LDX #$00
    % k/ R) O6 k7 K* F; @  k
  491. LDY #$00" v+ S: W% s2 y
  492. LDA #$005 T# B7 I7 e" M4 `5 v3 R
  493. STA $BA
    ( e' w! n/ J! j3 E1 N3 F0 z
  494. LDA #$20- \" O, |! N7 s7 ~
  495. STA $BB
    ! J, U5 u9 X& F5 S3 T; G: q
  496. LDA #$00
    9 K8 c8 N, v) g$ W- P- F
  497. STA $BC3 b2 j# K9 [6 P( ~8 H9 X
  498. LDA #$60
    ) u: }$ o; @( n3 c+ ~% I
  499. STA $BD
    8 w. Q2 v9 U: U3 {7 v% f( m

  500. & b  E( s9 J- F  g* C/ i1 U
  501. WL1:
    9 U% D8 J  V; S' q1 e* q
  502. LDA $BD" g: _9 U" ?& N% w. g: w
  503. CMP #$70
    ' x) ]- C( h/ ?! w; n+ ]
  504. BNE WL2* H6 L3 K# Y$ F  p7 ~6 t
  505. LDA $BC
    5 [- x; w7 b3 K1 A! Q4 x" {# l& x
  506. CMP #$00- ^# N4 C* p5 r3 ^7 T
  507. BEQ WLR
    ! x# k# T2 h/ y: S! Z; h7 b
  508. , l9 o  B3 u6 M8 A: B& Q
  509. WL2:5 Y/ v5 m* j% o6 c* N( s& p4 q
  510. LDA $BD
    0 x7 B" N6 Y, z3 N9 H; _* l5 s5 N
  511. STA $20060 ~& W0 R5 l" E. a  m9 T. z7 v
  512. LDA $BC3 M  @0 L! o3 J" L$ ]
  513. STA $2006% y1 U$ n& y2 I0 s; Y

  514. + O/ w& ?+ J# R2 ^+ u' ?/ w
  515. WL3:  H! M3 g2 A: O- E% j! `
  516. LDA ($BC),Y& w+ b8 e$ F3 p6 y# T$ ~
  517. STA $2007
    " V: ~$ d5 T' q2 p$ V! }
  518. $ ~. J7 i) }5 P* K
  519. WL4:6 `6 h" {" ~/ ~3 M/ U1 A  K; m
  520. LDA #$003 w7 p/ [  e+ S. j0 |
  521. STA $2000
    9 A% C& W9 X7 L3 a
  522. INX
    7 q6 G* [' n  n
  523. INC $BA
    0 Y4 G7 S5 a8 Q! Z, ^; _& Z
  524. INC $BC
    6 a4 \! \- ^9 t. U( v
  525. CPX #$00
    4 C( h0 D9 B# j% }
  526. BNE WL1
    4 ^3 m: z2 r7 Y5 R! L" D* a7 \
  527. INC $BB
    6 w0 o6 k. `, L
  528. INC $BD
    ) D# o% a" T; U8 G- B8 n
  529. JMP WL1  S' r, h3 r1 \# {( X  S7 m

  530. 6 _4 n$ q( `$ I: o8 P
  531. WLR:7 i$ Z7 ]& Y; r
  532. LDA $7FFE
    $ ]2 g/ Y" d2 v0 L( e6 K6 F
  533. STA $07F6
    7 C& V5 R9 H* W& a' R; B3 L
  534. LDA $7FFD
    * B0 S4 J- G* M3 l+ S  d, m, a
  535. STA $00FE
    / H% V- N( N7 c3 `
  536. LDA $7FC1
    * l5 ~2 ?) T4 u2 l5 q1 V% \
  537. STA $07C1# F3 q! {3 N: V1 r* @' Q
  538. LDA #$3F
    + A' [2 d8 v' I" F6 M& X6 ~
  539. STA $2006
    2 X4 B0 V% A) c7 s; U. l$ h. d
  540. LDA #$01
    . L' a; V2 o& \
  541. STA $2006$ C4 D* u7 F8 V  a/ x
  542. LDA $07C1% `: N- l& `5 }) o# \' r( V
  543. STA $20076 A4 @9 \- F% {6 E, S7 o7 p0 n
  544. LDA #$00* ?! X+ a7 R0 G, L
  545. STA $20008 b/ G# y& O: z! a, q, s! G3 r
  546. PLA9 _& b6 X: A" g) E# D, Q
  547. STA $B8
    $ C: A, f4 ^2 K6 }5 K4 q
  548. PLA
    ( @4 Z5 X* N- ?$ X' N
  549. STA $B9& E7 |1 z0 L9 J# p, K
  550. PLA
    " A3 w8 u" I1 b9 X
  551. STA $BA. ^* \5 t  u( B9 H# ?
  552. PLA0 `; ]+ U5 h4 w. z6 ~$ l
  553. STA $BB
    ! ~5 n5 J. L" y8 ?9 E5 b: s+ q
  554. PLA! L9 S" g7 `4 P% e) @6 q
  555. STA $BC) \+ i" Z" H7 Q4 }. Z# O2 M( _
  556. PLA1 E! K# O8 O* a7 b" a3 k
  557. STA $BD1 [- \5 V* g2 T8 [" Y0 @: U2 R
  558. JMP $A000
    & b: m) K: b5 x8 o' D; D
  559. ; M$ |% _  L; E! q  Q, N
  560. FREE:                ; 暂存器保护
    ( g$ i( H+ K+ Y% B" Z1 L( B
  561. LDA $BD
    3 e( J1 e, v8 S- d3 g' ^7 R& v/ B
  562. PHA
    $ c* r6 x4 @$ f- O5 A5 [: Y0 ?7 a
  563. LDA $BC
    ( C6 j# A% g, C4 K* ?0 D6 M
  564. PHA
    $ p8 s' Z7 |3 `4 }2 G7 `
  565. LDA $BB2 z  B& G! c* c5 u& p
  566. PHA
    ' T/ Q- P& o) x" G6 W2 Y
  567. LDA $BA, W+ z* Y+ r- ?2 F# [+ C
  568. PHA' @- S% j1 \5 ]! n! k0 o; r7 s
  569. LDA $B9
    # }2 Q5 U$ S8 s& x! k
  570. PHA+ ~7 {) C/ \7 W* W% }
  571. LDA $B8) H. e( z; {6 F  s/ {4 H! b# a
  572. PHA
    1 R: D/ ]0 n: N" j  [& [
  573. LDA #$00
    . _/ q" U9 `0 [- ]4 S
  574. STA $B85 o/ P- |  l$ U0 {& R+ v
  575. STA $B9
    2 x5 j& j* q- s& _3 [9 D
  576. STA $BA; a  r9 |- I6 C2 P8 X' Q9 _  \
  577. STA $BB
    3 y& H5 S' L; a. B3 b, `. w  a
  578. STA $BC
    9 `$ @1 Y: g$ w8 z, s, o& ~% w
  579. STA $BD( p; ~& W! I) p. `# b( k, K

  580. 7 m, p  L4 T1 R: V! c
  581. WEAWRITE:                ;武器ppu写入- @/ P) [( G; i; _( Y% z
  582. LDX #$00$ c) X5 Y2 p+ H6 R$ g
  583. LDA $AA" K* L/ q( u- M) s5 ]- B, X
  584. STA $B9' [4 D8 w+ I8 s: H" z" b
  585. WEAINI:                ;地值初始化- o* L8 K0 W- U* [/ Z5 M( U
  586. LDA #$A4$ I# G1 \; I+ t+ ^: v' E4 L
  587. STA $BA
    2 a# [1 J1 ~% v" n9 A
  588. LDA #$20
    , p- l4 R6 X0 Q) }; N. _: E9 g4 T3 d/ q
  589. STA $BB
    7 B7 D+ D# W4 E: `2 p/ |) w  O  k/ f

  590. 7 E$ E# H& s* G. w5 B7 X( L# u

  591. 3 r, s( f+ K9 E( e0 M5 o
  592. JSR WEA+ a9 c: r" t, G
  593. LDX #$00                ;武器ppu写入2 Q1 z8 o6 K" u
  594. LDA $AB. l( N# p4 J% P# u# I
  595. STA $B9
    ' {0 W8 e' A8 K, |' E; C
  596. LDA #$B3
    4 ~4 P. ^+ h  @: S/ F1 o' A
  597. STA $BA, u0 Q3 R3 L6 e- Z
  598. LDA #$20
    6 ?3 s0 a$ O8 o: M6 O
  599. STA $BB
    / B8 c3 w% u6 M
  600. : X2 R# c& A' a2 }& E; Q, N, m
  601. 3 p' J' _0 P1 t$ G+ p
  602. JSR WEA
    3 v5 @0 S# l9 W
  603. 7 w+ F8 n1 ~6 L/ ]1 n$ g
  604. LDX #$00- m/ Y; R9 E3 o# l( c  O0 C3 M
  605. LDA #$E42 _% X* B  S" l. t
  606. STA $BA
    9 g! L  a% E* x: B) I( h
  607. LDA #$20
    * I+ `, t7 M) O" Q3 m# C2 T* {
  608. STA $BB% M4 D+ S5 B& h! l  t( I
  609. 3 b! ]' v; X; M! @
  610. ( F  X, F& w6 i+ }
  611. LDA $32
    " P: S( y  y6 D3 `1 P3 g" B
  612. JSR PLAYERLIFE, o* \, J) V' s

  613. . r, Q- C9 s* q0 _, [( l: Z: e: p
  614. LDX #$00) }2 L. k. [* f% g" j, N4 e/ U
  615. LDA #$F3
    7 D! l6 ~- Z* Z' ~' q
  616. STA $BA
    ! W3 g- A3 A2 _2 ^. R0 l
  617. LDA #$20
    ! A4 E1 B/ H2 L$ [+ F
  618. STA $BB
    : ^) _2 X( W7 q8 u( w) w
  619. " e! h: v+ [  i( Y5 D

  620. + V$ @6 i4 _! _. p
  621. LDA $33/ m, h; n. l1 A, }
  622. JSR PLAYERLIFE: ?& x0 C7 N/ W/ X

  623. 0 N  O9 h$ U) ^8 W5 a
  624. 2 H  B( X1 T! i
  625. JSR PLAYER_01_PPU: ~* a, Q, |0 h) ?2 Y) u$ d
  626. JSR PLAYER_02_PPU# V' R" `9 q/ X, d8 a
  627. 5 d9 L" e3 j7 N/ H

  628. 7 b1 I3 P9 u9 f3 `9 @) X
  629. JSR PAGE_PPU
    . m6 A  q/ O' v
  630. JSR PAGESELECT
      g3 d% G. h4 G4 g/ z, O, j' p* O
  631. + V* `2 Q) ]; [; X) z2 x3 x& h% o

  632. # f  n2 ^2 I# S3 c
  633. ! o; D+ F* n) a; d

  634. 1 J  R9 |3 f" v7 s* H

  635. - o# K' e" `0 b
  636. ( V7 @' A, e" J" S# S: T% @8 Y
  637. / M& u: n; i% U$ n0 b: `! N7 O, ?
  638. 4 r' |6 W0 n2 h- z0 u$ E
  639. ' N$ H: G4 `; g& J& R

  640. / H  n" U% c& P' P

  641. " g8 f, c4 l6 c( M  H! U% @/ V) V

  642. 9 r  V6 h3 z3 e/ X7 U
  643. ' }" _% n5 f( ?* t; ~- k
  644. PLAPRO:                ;恢复现场
    , S) D! S$ z0 N6 h* D% @
  645. PLA/ ^7 `# {: W% C+ L
  646. STA $B85 Q: y, M: [4 c; ^. d6 k. N
  647. PLA
    6 ^$ l3 m9 e; ]% |3 d
  648. STA $B9( ]" V* O: V3 \$ k/ \% ~) n- t
  649. PLA, \3 ]# S7 H- G! M, }
  650. STA $BA
    / A4 i" t# R! h2 m% \
  651. PLA
    0 i, l% \/ x* L
  652. STA $BB
    8 B+ a' e( N( q" D% [. D
  653. PLA  [9 r$ U5 N$ E' w2 Z
  654. STA $BC+ R4 K/ t, o/ {# z5 M
  655. PLA  }7 {/ H4 Q: W9 W" Q) C; M
  656. STA $BD
    & @8 z& d0 z# j
  657. FREERTS:
      A+ z. w- Q8 B$ k/ [8 M& E
  658. RTS& ^+ k, Y" M# l- E# h# ~6 t

  659. 2 c8 ^: C7 }+ j
  660. INVINC_STRING:                        ;invincible  d, o; v2 N! V) `
  661. .BYTE $93,$98,$A0,$93,$98,$8D,$80
    * \3 X1 n" ^" c2 ?
  662. . G8 g6 q2 ]* @1 V
  663. INVINC_PPU:
    8 k3 F. f' v6 y0 ?- R7 U; K3 ^
  664. LDX #$00
    # e, o5 T$ S# e5 h
  665. LDA #$62
    9 u+ G3 s. ]2 F9 Y
  666. STA $BA
    6 N& r) a# [! {, O1 g: A$ }
  667. LDA #$21/ W' r/ i8 C2 W
  668. STA $BB) ?) j4 s5 F' B3 u. E( }6 _

  669. * \$ i% `9 E' l: M' j

  670. - b% |4 Z' |& a2 ~
  671. JSR UP_PPU6 Z/ P  E% U  H. S9 Q
  672. JSR INVINC_WRITE! t& ^6 j! h  L6 _8 }0 g
  673. LDX #$00
    * D/ x# k# J  t3 h
  674. LDA $07A0
    * s0 Z9 w& H6 G4 m
  675. AND #$01
    - V" U( i8 |- [. k( o& ?1 \
  676. JSR ON_OFF_PPU( x! a, U. n7 i$ R* O* P9 I6 E
  677. LDX #$00
    1 j6 ]; r( G' l, i0 L! G9 V
  678. LDA #$712 I- `* f6 t& i/ A
  679. STA $BA
    - F6 t/ b/ E0 {. D% j; @1 h
  680. LDA #$21+ h! s( `5 X9 G2 e
  681. STA $BB' a' c  g5 S. e  V

  682. ) C! w" s8 L+ ]3 x4 Z) a

  683. ! j: {5 p' G+ d6 O2 Q7 a0 k0 S! {* i$ B
  684. JSR UP_PPU9 v; w5 L, \4 t: Z/ \$ |
  685. JSR INVINC_WRITE
    * O( e9 X5 I9 A& G
  686. LDX #$00) A" k) |: j! o/ D
  687. LDA $07A1  x9 N; a3 X2 b% \, X* n' g
  688. AND #$01
    5 e$ y7 D$ T* [: x0 ~
  689. JSR ON_OFF_PPU
    ) c9 W) E/ B' c, H- H% q
  690. RTS1 A0 J! |9 X+ w" R- J

  691. 9 F" k# C  U3 n
  692. INVINC_WRITE:
    - u+ U% _% Y9 l6 r, b* _
  693. LDX #$00
    # d% Z2 k0 r6 R& v0 N7 C) D7 w
  694. INWRITE:
    3 }5 z5 H9 \/ H) B2 _  H8 I( X: W
  695. JSR PPUADDR_PROCESS  O# o: ~( U' ~6 l( K  G* r3 D9 F! ~
  696. LDA INVINC_STRING,X
    8 S& h& o1 _$ j5 W" u- b
  697. STA $2007
    . e  [& h" d. N
  698. LDA #$004 M0 r6 s2 j" A* M/ U# Y
  699. STA $2000
    8 u$ b# o) n% ?1 D# ?
  700. INC $BA
    4 v; @2 X# x$ T3 I
  701. INX, Q# s+ A* w# h. P$ @) w
  702. CPX #$07
    8 d4 k8 s$ F1 y9 c) O- ]+ I
  703. BCC INWRITE, w! I/ A7 m( F
  704. RTS
    # I0 ~5 [! W$ P  Q4 R' O& |
  705. * @9 u8 M& [4 u0 f
  706. ON_STRING:8 A; V  s/ N8 G
  707. .BYTE $99,$98,$80
    , ~3 l& |! A5 ^/ p
  708. 4 V6 I" ~: Q: C7 Y" y; D7 L: W' d
  709. OFF_STRING:
    3 _* ^& `* k* y
  710. .BYTE $99,$90,$90
    6 R1 }5 n+ Y5 i
  711. 1 k' I6 a, ^9 F& C, M" `
  712. ON_OFF_PPU:, Y0 I1 M, K2 }
  713. BEQ OFFWR6 {! L# d! P* j+ q. ?& Y$ J
  714. ONWR:3 s- {6 ]3 J& N" a
  715. JSR PPUADDR_PROCESS0 ]/ y$ c6 K0 d5 M% O* z
  716. LDA ON_STRING,X
    4 }( H5 v& w9 H4 Z# ^) d+ n, a9 S
  717. STA $2007
    + Q+ z+ S! j5 `( F6 C) H
  718. INC $BA
    . L9 W) O# \$ K& i$ Q
  719. INX
    : T  [; a& @/ s# C+ G* V4 M
  720. CPX #$03+ D0 `: E7 r7 m6 J% Q
  721. BCC ONWR
    7 S$ P7 W& t) s. C- U# ]1 b$ u
  722. RTS9 D/ U* o8 h9 J/ _3 O. l
  723. OFFWR:
    ) C# n4 f' o) l$ f4 |5 V5 F/ C
  724. JSR PPUADDR_PROCESS7 f- D/ f5 ^" @! Y& R
  725. LDA OFF_STRING,X5 G$ Z! |5 c# k2 e
  726. STA $20079 |/ L7 y, _6 x- {0 ?0 u
  727. INC $BA
    4 R; p5 L: v, M$ N; H$ `3 F
  728. INX
    - W; a3 |* Z8 b9 Q, k! t" `3 y, S3 j# ~
  729. CPX #$03
    - q1 S: y( Z) F. j
  730. BCC OFFWR5 Z0 c$ ?- F. [) P
  731. RTS
    + `( F& a! C# l0 N" d

  732. 1 p# u3 p$ D4 s/ A! P- i9 n. P7 P
  733. LIFELC15_STRING:
    ! R( S! e" ]( r5 {- z- S
  734. .BYTE $96,$93,$90,$8F,$82,$86,$80! x( u+ w5 _+ d! }9 k& k  P( f! d
  735. * J9 ~% m7 h1 L4 V
  736. LIFELC15_WRITE:0 L: l2 }/ \' }
  737. LDX #$00
    # d* @- _: A& o' W  b
  738. LIFELC15:
    # @  q' ^  a& n. j/ ^# J6 u1 U
  739. JSR PPUADDR_PROCESS
    3 \3 R- F, }5 U; O, n
  740. LDA LIFELC15_STRING,X
    / |' k) X/ G+ R. N4 r5 \+ x  d# a
  741. STA $2007
    4 }  j2 D( s; ^3 \/ c# j4 r; ?. n
  742. LDA #$00) I* `% M# N* N
  743. STA $2000; h* `' P, _) A9 j, E- g0 Q( y
  744. INC $BA; P0 `# y3 W: |0 a# l! e1 m% L; y# Y
  745. INX
    ( K1 e# B: A: L& \
  746. CPX #$07* `8 e+ Z4 S, I+ p. z
  747. BCC LIFELC15. i, h9 ]5 c- r! I
  748. RTS8 f2 S/ Q: Q5 |6 ^8 ]
  749. ! J- y+ E% v* r. w3 x( A
  750. LIFELC15_PPU:
    , t% t0 d! F8 b
  751. LDX #$00# E1 P# Y' u5 o" u
  752. LDA #$A20 p# I/ {' A5 g7 y6 R5 U2 W8 n
  753. STA $BA% K0 k1 y4 w3 \( y$ Q  `" A
  754. LDA #$21
    - f' a5 @7 ?7 X
  755. STA $BB& W9 [- u% t( B6 o$ ]+ a# o4 V
  756. JSR DN_PPU' G8 J* Q5 ~$ |4 w
  757. JSR LIFELC15_WRITE
    " a% C6 p4 t2 O: y8 E
  758. LDX #$00, B! Z. J' _+ K5 P6 u" c
  759. LDA $07A0
    8 y) j6 `" B  ]! @
  760. AND #$024 @. P; `# P: D+ R' s0 D
  761. JSR ON_OFF_PPU
    * P7 H$ |$ F4 |
  762. LDX #$00
    + T% t0 |. J1 d2 h+ K$ m
  763. LDA #$B1' k+ Z' f9 k! x% Z& T
  764. STA $BA5 a! f. u1 {! x, l0 \
  765. LDA #$21$ e% N3 t3 W$ q
  766. STA $BB5 `2 y' v$ D  [3 m+ T% K
  767. JSR DN_PPU
    7 F3 A; Y! W( v* X- m, n
  768. JSR LIFELC15_WRITE
    ; B0 t  @; Q1 f. \$ p' y
  769. LDX #$00$ g7 C8 A* `. O7 l) |2 d
  770. LDA $07A1: R7 V# N3 A% S* l7 F( J
  771. AND #$02
    / `4 D' C! d9 n+ R. M" l+ Z+ @
  772. JSR ON_OFF_PPU' D7 U1 @( q, C2 V
  773. RTS
    6 l, M& w. c# a! M2 D
  774.   [  Q+ N8 k3 P( c( y
  775. DOUCON_STRING:
    1 o& n* {  d2 {! G9 y
  776. .BYTE $8E,$99,$9F,$8D,$99,$98,$80" V1 i, ]% ?0 }  z$ L* r
  777. ( H+ t- k) Z. E$ B
  778. DOUCON_WRITE:
    ; P# O# J0 ~6 M6 o4 E
  779. LDX #$00
    ! q9 S" E* z4 k9 }4 }% D
  780. DOUCON:* U9 G5 @# x2 E7 T
  781. JSR PPUADDR_PROCESS
    + o+ m4 O# ?! ]# T4 @# s
  782. LDA DOUCON_STRING,X
    % s2 [" V: }# \" E. v
  783. STA $2007( t4 K* g6 o  ]" w, V: p  B# |  a
  784. LDA #$00
    # }9 P. N! l* f* R
  785. STA $2000' v4 C; F3 W# r; |
  786. INC $BA
    ( A, V/ i: W/ Q. B  h" V
  787. INX5 @# T1 s/ M9 B0 C  R/ i
  788. CPX #$07
    $ o; ^) Q" E* }6 v& u
  789. BCC DOUCON1 z7 E1 ]( m, ^
  790. RTS
    ) z- f; e, L  s( s0 D, u6 s0 o" t0 w
  791. ' N, M* f6 d8 ^" ~- e  I  C# j
  792. DOUCON_PPU:
    , H9 e' d# e( a- S" m( ~8 h/ V
  793. LDX #$00
    * g$ x/ D( r, t. O' `
  794. LDA #$E2
    - c  V8 F5 z8 D% S
  795. STA $BA
    % |: N4 h" |) w
  796. LDA #$215 t# p! q& J' G- b( X
  797. STA $BB# w4 Y/ ^3 E- O0 a+ w
  798. JSR LF_PPU, J5 F; t7 c) W2 y# c. j
  799. JSR DOUCON_WRITE5 f; t) r4 l, N& U: c, c& `
  800. LDX #$001 L8 `) `9 x0 I2 |: A* n5 ?7 u/ Q
  801. LDA $07A0
    * B5 V# L3 U6 [7 e
  802. AND #$04
    ! ?& q5 G: J$ ?
  803. JSR ON_OFF_PPU
    3 X6 ~" Q) h. h" G2 G( r
  804. LDX #$004 c. C, O  ]  Z# k, O8 {; a
  805. LDA #$F12 J1 w& E% e' P/ p. \" \
  806. STA $BA
    " w+ V# H" t1 I% g1 t# x$ j
  807. LDA #$21; g1 V, `6 |7 D2 e4 J
  808. STA $BB4 d" I% x5 W% I0 G
  809. JSR LF_PPU
    3 y8 i* n3 G# p6 O# H6 G
  810. JSR DOUCON_WRITE
    : W( |; [  v7 ]/ u) y' r0 O
  811. LDX #$00# U$ N" {& ^  V( U& U9 z
  812. LDA $07A15 m) J8 I# @0 Z, F
  813. AND #$04
    ) v" l2 v" Z" r+ b# J; U, M  \
  814. JSR ON_OFF_PPU1 V4 H0 c7 X3 f- `& n( p# E: x3 R4 Z$ d
  815. RTS
    # Y' Z+ o1 \. |5 m, a

  816. ( `) Q- ~: h- O, ?! j5 ~
  817. LIFELOW_STRING:( A5 g6 y7 z) b( B! m, q. H
  818. .BYTE $96,$93,$90,$96,$99,$A1,$80! I* S$ Y) K! Z- M
  819. ; O9 g- C  H; d1 w( z5 c
  820. LIFELOW_WRITE:
    $ ?! }% A% v- j: l
  821. LDX #$00
    $ K* c$ b+ x2 o
  822. LIFELOW:
    . n/ ^9 _/ e3 f  c
  823. JSR PPUADDR_PROCESS* Y& y' h% F8 X
  824. LDA LIFELOW_STRING,X
    $ O/ Q* H$ P) o, H
  825. STA $2007
    $ N/ W2 Z8 `" i# W7 ?
  826. LDA #$002 o7 }' r) j7 l8 K; B$ M
  827. STA $2000
    & C4 Q3 m# ~7 v: O# @- H. ?/ v
  828. INC $BA
    % ~- M: ~1 Z' m
  829. INX
    3 d4 j0 F3 u+ x
  830. CPX #$07
    , ^" f& N2 b1 Z& d3 x
  831. BCC LIFELOW, d  A6 W3 U2 E" F5 g: |
  832. RTS
    * @( W6 H$ L/ _! j7 N5 v  N' F
  833. 4 x- l. K) e5 t" h3 D
  834. LIFELOW_PPU:9 e- M7 b9 I0 Z. Y% P
  835. LDX #$00
    ) S2 X: p3 X$ ]! w
  836. LDA #$22- N% b) H8 P; p
  837. STA $BA
    * ~  {& z+ {& {5 }5 a
  838. LDA #$22" y7 u* `' }) \' S. p
  839. STA $BB2 R+ J- ?9 z( O6 _: o; S0 ]. o

  840. $ [9 n4 X' L. m7 A7 E3 ~7 R+ u

  841. : N8 I8 r+ [0 b& U& u- j1 ^! o' r
  842. JSR RG_PPU7 {2 x7 [  }& Y6 p7 u
  843. JSR LIFELOW_WRITE& n% k: y7 a: z$ F8 \
  844. LDX #$00
    2 M0 ^$ c& H" \8 G! _  Y
  845. LDA $07A0
    6 r& j( Y4 Q$ i0 Y# z* C7 W
  846. AND #$08. I3 P& r! j& L9 j: W8 w
  847. JSR ON_OFF_PPU. [( o8 V7 b' H6 `
  848. LDX #$00) M' k. l9 Z) i- f7 q
  849. LDA #$31( n0 x5 v+ z; Z9 {9 U
  850. STA $BA$ U$ n, x, t% [* v
  851. LDA #$22; @3 _: ?1 A! ?& _4 Q6 M
  852. STA $BB
    % O; P+ M4 _( Q' N5 b% `4 x

  853. * s0 a4 b- ^% C3 f0 [
  854. 5 n# g1 ]$ Q" G# F! s0 A1 d
  855. JSR RG_PPU9 s8 j# `) F3 C6 i0 ^
  856. JSR LIFELOW_WRITE' ~( P1 x* N9 f6 Y
  857. LDX #$00
    + `0 n3 m: M  V5 n6 e- B
  858. LDA $07A14 s" ~# L8 `( z3 Z8 q. d
  859. AND #$084 k4 V& o# n* E" J1 V
  860. JSR ON_OFF_PPU
    ) K- L4 K1 \7 t+ Q4 L
  861. RTS
    . z4 W, M  B! Q9 e8 ^
  862. - \( u# ^$ n' T* _9 N" A5 z- d
  863. KILLON_STRING:' |# P& s5 M" Q3 E
  864. .BYTE $95,$93,$96,$96,$99,$98,$801 e8 c: m- \' `% t# u

  865. - l5 z  _. p5 v" `
  866. KILLON_WRITE:
    9 |* i3 s  R( H' w: l8 y
  867. LDX #$00
    % B8 N2 l8 I# R$ t2 }) `$ C3 x
  868. KILLON:
    8 Z; A. a' p" P! T9 U
  869. JSR PPUADDR_PROCESS0 h* a2 }  @$ E+ v- U
  870. LDA KILLON_STRING,X5 k% e/ _: }! ^! s0 S
  871. STA $2007
    9 Q& a% w; N! _/ v' [7 E2 S4 n, k3 L
  872. LDA #$00
    3 H1 v, ~  [( Y" h! e) _: E: H
  873. STA $2000
    , x# z/ O6 M* [: D) [5 K. p
  874. INC $BA
    , l) D/ |/ f$ A
  875. INX
    . x9 K/ y; v' F
  876. CPX #$07+ L# L' _8 F/ p4 N
  877. BCC KILLON0 e8 m/ P/ f6 Y( r- J  z5 Q& D# k
  878. RTS
    9 p- g, i5 U1 g1 B5 t/ q
  879. # @& `( ~: w: g  d; O  u2 U
  880. KILLON_PPU:
    * m+ W+ f9 q4 G7 T* j9 q
  881. LDX #$00' ]( _/ J; z' _2 Y8 y
  882. LDA #$62* c# E5 Q0 N( m- B
  883. STA $BA8 V- C- k) J% x
  884. LDA #$22
    1 a6 Q, M; f! l0 }! W7 E; ~& `
  885. STA $BB2 E# z& ^7 q) e

  886. 5 O  i9 P# _+ B4 M, \) a" K, l8 j0 Y
  887. ' E; ]8 b' o9 _9 ?( a2 a
  888. JSR B_PPU
    8 {, o) K1 s; P# a' o- u1 ]! N
  889. JSR KILLON_WRITE1 y5 H7 c+ Y/ G$ n. {* U
  890. LDX #$00% d! e7 K% _2 V4 B, l: B- m
  891. LDA $07A0
    3 q2 t/ ?9 K1 u  u1 _% O9 u- T
  892. AND #$10) u$ a0 j8 H2 x, Y* N
  893. JSR ON_OFF_PPU
    & W; w* O3 }/ S, |& ^) o# e3 U
  894. LDX #$00
    ) K* f  e4 [! O7 T# w! p
  895. LDA #$71+ U8 R. M1 b- F9 j4 S/ A
  896. STA $BA
    & u5 V9 |7 H: v% L8 }4 w
  897. LDA #$22
    " |+ _6 N1 m( R& _; ]! Y
  898. STA $BB
    " O8 P# T  u2 B& t% _) M

  899. # q* z  r1 G/ ?$ T; v
  900. / O6 J5 E" I( B% u$ Q2 s; d- e) q
  901. JSR B_PPU) [, o( |+ K6 _: R% F
  902. JSR KILLON_WRITE
    ) n' s+ s3 X8 i. P' U7 l5 z
  903. LDX #$004 A- E, B. }6 l
  904. LDA $07A1' t+ Z2 U: u7 A4 j( b
  905. AND #$10* K& H6 Z  k9 `- M
  906. JSR ON_OFF_PPU# R8 h7 W# [: r( K0 I
  907. RTS2 N3 x' m+ Y! y. r
  908. * c; [& `$ @6 p3 _0 A6 h3 _4 E
  909. SKYFLY_STRING:
    % q6 k0 `$ I4 W2 `) t
  910. .BYTE $9D,$95,$A3,$90,$96,$A3,$80# ]9 x+ [: b" {
  911. 8 O0 l/ P: N' @5 I6 R: d8 T! _, p: K
  912. SKYFLY_WRITE:
    * U  E$ Y" w0 B, u' ?
  913. LDX #$00! s" U4 r7 x1 Y; w8 B, H+ e* B
  914. SKYFLY:4 j( E3 m7 m6 l  Y. H* |' }
  915. JSR PPUADDR_PROCESS
    / w1 s- P, q" q/ K$ L" T. ?" z
  916. LDA SKYFLY_STRING,X& E/ Q% W0 C# d) V: {
  917. STA $2007  h8 G& u% }/ [; K+ L
  918. LDA #$00- U# z: U) L* f0 |3 s% E3 N
  919. STA $20000 P; t4 ?8 t4 ~3 u) c
  920. INC $BA
    8 e- {; R2 R9 _0 Q7 V! y# Y
  921. INX# F; _6 x+ `  i/ L9 W( v# h* ?
  922. CPX #$070 A% Q5 U$ D2 |
  923. BCC SKYFLY
    4 Q1 P* I% k2 `) q% O, `( T$ k7 x
  924. RTS( ]) G& h& ?- h# K1 V) Y( V$ I
  925. 0 K( y  \6 {2 s
  926. SKYFLY_PPU:
    9 Y1 O% J0 o5 c$ M) @* R- D/ j
  927. LDX #$00
    & L8 D" i% n! l+ g" m0 Y
  928. LDA #$A2
    - d! J7 |8 b5 O, C% @. ?; N
  929. STA $BA( n. k7 C" G, R* a
  930. LDA #$22
    5 P/ ?1 h# ]3 M" \& ]4 @9 z8 }
  931. STA $BB
    3 F! e8 d0 \2 ?7 @4 h

  932. 8 L$ S+ r6 c+ s% l5 b- }+ ~* O
  933. ( G6 L: F6 Q( O" l1 r
  934. JSR A_PPU3 c& `* _* W+ A
  935. JSR SKYFLY_WRITE& g  {" Q) x2 q( t4 E- Y$ `6 @. P) j
  936. LDX #$00" E0 o) d& [5 P# Q1 D
  937. LDA $07A0; U# M  p# ]5 K4 @+ X& O, s
  938. AND #$20. N8 i) p3 G- r: R, I
  939. JSR ON_OFF_PPU
    ! U* Y, m- H3 V+ ~
  940. LDX #$00" i; W+ n# B4 m7 f
  941. LDA #$B1
    # ?5 F7 p2 O0 h" ]) x9 d4 {
  942. STA $BA, G$ \$ ?. H  g5 x  B7 W6 Z
  943. LDA #$22
    ' z9 ]" _2 Z1 N% y
  944. STA $BB
    . x6 v; y( }- E

  945. % `0 J7 x) y  T
  946.   m# N( r0 D( w# k" ^1 S
  947. JSR A_PPU
    ( i# [6 O  P1 l2 g/ g+ Z  `
  948. JSR SKYFLY_WRITE2 e, K. p( E# [- Q
  949. LDX #$00* A( {, o5 `' n3 v6 s
  950. LDA $07A1
    6 n' {6 l8 y7 ]/ \8 D- B2 B
  951. AND #$20
    & F* z6 k3 I# z  L# v
  952. JSR ON_OFF_PPU
    ( ^4 q4 g5 R' H* T) g
  953. RTS% p) O% s! q2 Q; N7 r( v0 `
  954. + d' _7 ~4 p2 l  v! n: m  y
  955. BULADD_STRING:
    4 f3 a, Y. j' a8 Y
  956. .BYTE $8C,$9F,$96,$8B,$8E,$8E,$80
    9 J1 E0 [( g2 K- C
  957. 0 K6 U6 G: A) p+ X0 w; n2 D) @' @
  958. BULADD_WRITE:& q( y3 }0 w+ b1 s* a" X& E' ^9 [
  959. LDX #$00$ [+ f) J( c" {; Y9 J3 g! K
  960. BULADD:1 _& c! M# U& q) M: m
  961. JSR PPUADDR_PROCESS
    * e3 _6 K4 A4 r5 O! D6 I* L
  962. LDA BULADD_STRING,X
    6 R& e3 U# q8 I) i  O/ S& P
  963. STA $2007  C  U. I( R! G' O( O( q0 p
  964. LDA #$00$ c' A% I' ^% P8 w
  965. STA $2000* ?) h$ m" O! `3 P2 ^
  966. INC $BA7 Z: L9 X) p& k+ e# R. }8 @5 H9 c
  967. INX0 M* o0 U1 f9 s  G
  968. CPX #$07
    6 A+ Z8 y; d9 }1 l2 B& H
  969. BCC BULADD
    1 D  m$ J4 E" w# x* x9 T2 i
  970. RTS
    6 U! S) F4 U6 F+ t. {0 d) A+ K2 n
  971. ; v4 t" `- I3 ^9 }% V7 A# y
  972. BULADD_PPU:
    * b- s( r* L  h, |, u, W* Y  x. P
  973. LDX #$00
    2 n8 y, I# v9 G3 ~
  974. LDA #$62& E2 W4 r5 T  `/ z: X( K
  975. STA $BA; h' N4 p# e( f. I! V
  976. LDA #$215 Q3 D& U0 Q4 h+ F' X
  977. STA $BB
    4 Q3 W) l6 i- e& Y# g

  978. " K2 u2 P5 r6 M
  979. ( |1 W0 W; Y& E! r+ Q6 L7 I+ r) O2 w
  980. JSR UP_PPU
    9 |3 N) {. a7 q4 X3 j8 P5 `
  981. JSR BULADD_WRITE" K" _3 ~+ m$ F- T) s; Y/ J
  982. LDX #$00) [2 F( T- ^0 m! M- ~
  983. LDA $07A2
    & m* j1 g' {5 i4 X2 |* K+ ^
  984. AND #$01
    9 C9 d3 a- X6 e4 e( X7 m# N: c
  985. JSR ON_OFF_PPU, v& F# v) D- W# _7 m& E" d" h) ^4 K
  986. LDX #$00
    / c* ?6 B0 c$ a/ V" i! r
  987. LDA #$71
    % ^! G6 g7 P6 b/ y: W# [" `# t7 O
  988. STA $BA- H4 H) ^8 K- C
  989. LDA #$21  j/ d, B+ @0 N  \
  990. STA $BB
    ) X3 u! N, H+ V/ R  i
  991. ; ]) i& Z6 o4 v# m, G
  992. 8 w3 D- L. h  h" y9 |- q
  993. JSR UP_PPU
    % ?) M  g& Y3 o' d+ o
  994. JSR BULADD_WRITE$ S4 m, [4 \7 D
  995. LDX #$00* z, _+ U8 A* S! h) w) ]. }: X9 ~
  996. LDA $07A3
    9 w) v2 J  ~9 J! ?; X3 f9 q
  997. AND #$01. K6 R3 W7 O# o% [5 B4 H
  998. JSR ON_OFF_PPU
    & c4 k8 {( r2 e* y+ ?7 o# ?
  999. RTS
    " Z2 _& z/ Z7 o6 n

  1000. ' h6 g7 f! q$ w8 w
  1001. MENU_PAGE_STRING:
    & \& s0 f# m9 h: t5 z
  1002. .BYTE $97,$8F,$98,$9F,$80,$9A,$8B,$91,$8F,$80,$81
    + d" I  l  s  k; M, ]" C

  1003. 5 g2 |4 ?. U' q( @8 g
  1004. PAGE_PPU:+ U" l1 |! h% e$ y- \' F+ @$ a& N
  1005. LDX #$001 p/ x, F' R8 p- z8 n0 @
  1006. LDA #$0A6 a9 ^! K2 g0 N+ H
  1007. STA $BA( y5 b* m; b, N6 n
  1008. LDA #$23
    5 N# G4 J7 v/ U, @
  1009. STA $BB& S0 Z9 k% m* M, r# i/ @. N
  1010. 7 D$ C% q/ ~% O3 S8 z; N

  1011. # I: J, N$ n/ u" Z8 J9 n
  1012. MENU_PAGE:! |6 J4 m* p7 y9 E3 p
  1013. JSR PPUADDR_PROCESS  V- I8 K# [- ^" U) J
  1014. LDA MENU_PAGE_STRING,X
    0 N3 n: r1 Z& P2 a' g& R
  1015. STA $2007* ]* ]. F# l) E; @7 A
  1016. LDA #$00
    / V' J! p: W/ h  `& I! N% v
  1017. STA $2000
    4 H! J5 X" y! ~. B, a
  1018. INC $BA) B; o) E$ K6 f5 f
  1019. INX
    ! ^. z& I. g1 M+ q# |5 U, {/ f
  1020. CPX #$0B
    0 N5 A* z% A! @: K
  1021. BCC MENU_PAGE
    ! ?$ ?: y8 e1 R6 O0 h' o5 s
  1022. LDA $07AA
    4 w2 X  U0 S3 W$ M
  1023. CLC
    8 _* T3 S1 h' X% `' \
  1024. ADC #$82
    ' p) M( N6 a6 W: W2 Q& Q
  1025. STA $2007
    0 t6 K6 t4 @( i9 Z# R7 B' g  w! r
  1026. LDA #$00' n# O; H1 r" r; G( t0 a
  1027. STA $2000
    , w0 [  a/ K! z+ w+ n' V' n7 l, v5 z
  1028. RTS& e+ F9 S" V9 q5 e

  1029. , ?: a) k: C9 Q6 A* N  {* \
  1030. % H% M7 J/ ]+ m) Q1 n
  1031. SKINGE_STRING:
    ( m6 U/ U3 Q9 r* z- F: M% u6 P) G
  1032. .BYTE $9D,$95,$93,$98,$91,$8F,$80
    1 H; i+ W- D* [
  1033. 9 i  N% Y: C. T, M% v1 k
  1034. SKINGE_WRITE:1 W+ K/ _+ F$ p8 v* [
  1035. LDX #$00& W6 M$ a$ j% @# z
  1036. SKINGE:9 i9 Z5 z  Z) C# [
  1037. JSR PPUADDR_PROCESS
    ) d3 Y8 t! t. A& }, a( }) `0 c
  1038. LDA SKINGE_STRING,X0 u& Z$ ?2 u( k" D. l, V# D
  1039. STA $2007
    " v2 v0 l( e! G7 D. o
  1040. LDA #$00: o& T! P. b3 G- \' {
  1041. STA $2000
    6 b2 s( h* N1 }, ?
  1042. INC $BA& c; L1 r% M' O4 W8 S
  1043. INX
    / s3 r- L- w+ i2 ~; F( u: n! I
  1044. CPX #$070 j2 H5 i& Z2 G( Z2 N: I; I3 a
  1045. BCC SKINGE  A* X4 ~8 [' O7 F" X: e8 @6 y
  1046. RTS
    1 k; X8 q! ~% l, c' a, o

  1047. 4 K, d. s! o, A0 ^
  1048. SKINGE_PPU:
    $ N7 h; K& M! B. N. p: s% P: b' G
  1049. LDX #$002 S& x: j4 x$ a$ Q: G' a$ x4 t; Y) ]
  1050. LDA #$A2! y) a. E' [' x5 A! |7 s+ |
  1051. STA $BA) k7 i1 x) W, t+ N( w' C, ]* }( N
  1052. LDA #$212 z+ v% A- v( e- B' X6 Q
  1053. STA $BB
    4 }( B' E- c: V2 @# y
  1054. 8 Y' A1 t3 [- m& O( Z: R

  1055. ( Z  h+ I3 H- e& N
  1056. JSR DN_PPU
    , U- Y8 \( U# `  q: s0 Z
  1057. JSR SKINGE_WRITE
    5 R% D; j/ H: O+ H$ g0 \
  1058. LDX #$00
    2 w. L3 o1 P7 T( D% `% ~4 C" s% X; j9 L
  1059. LDA $07A2
    & Z; ~( r0 Z4 G) W# i  i" C; Q
  1060. AND #$024 h9 S9 m2 I+ b' J- c! d5 |
  1061. JSR ON_OFF_PPU
    9 |( S. S+ Q# p6 z) G
  1062. LDX #$009 L& M( M6 y4 P& [
  1063. LDA #$B1
    + ]9 }" v' D3 G
  1064. STA $BA$ s) c6 k9 N; M8 j3 I
  1065. LDA #$21
      ]# p' Z. _+ Q, w
  1066. STA $BB
    ) q/ }1 |" X/ V" u

  1067. & h  E/ I. V4 P- O

  1068. : s& d6 Q7 {+ P- A. B; t9 g6 z
  1069. JSR DN_PPU3 c0 c& a8 X) m0 B9 {
  1070. JSR SKINGE_WRITE
    % ]/ H6 Q& N+ Y3 v# Q+ X6 b& l
  1071. LDX #$00
    ( d2 e& w( A  W0 S" K
  1072. LDA $07A3/ F& P+ H2 _& p: J3 I3 w
  1073. AND #$02! m; d$ J' j* S9 j! _
  1074. JSR ON_OFF_PPU
    / ]" L, `( v  R' j! h! d6 D/ @9 X
  1075. RTS# W3 ^& F8 F7 y' k8 ~% \! p

  1076. 5 Z4 {! S+ s2 S# v- m* I5 ^( T9 |  `7 ~! o
  1077. BULMIX_STRING:
    $ x' V, `: }  \& @
  1078. .BYTE $8C,$9F,$96,$97,$93,$A2,$80
    # ^& G; g7 {* k! V7 N! l, O
  1079. # g7 \! V  C+ ?% P- D+ E* t7 s
  1080. BULMIX_WRITE:% D5 E9 b. W5 ]4 l; @0 D5 l0 P
  1081. LDX #$00) [$ M7 a, h' k1 [
  1082. BULMIX:" M4 N/ _  }+ d. k3 y
  1083. JSR PPUADDR_PROCESS
    9 E) C8 c3 n5 Q( N/ m
  1084. LDA BULMIX_STRING,X
    9 f8 w- H5 @) U3 }
  1085. STA $2007  c: N; p1 e( ~. A; K3 z
  1086. LDA #$00
    7 i) V" i& w6 ^& ^* y& j
  1087. STA $2000& J2 V; k6 v5 x) s. m% h& K
  1088. INC $BA
    # u( q7 T' v. _
  1089. INX5 P- S1 p! ^( B9 W9 f& t
  1090. CPX #$07
    6 Y% J1 ~; T$ b" V9 _( d
  1091. BCC BULMIX' H) U1 I- n0 ]' z
  1092. RTS% I- U0 I( E% y+ E# d# [( ?; f

  1093. , Q5 t! d* d% m2 S4 w( m2 o  k
  1094. BULMIX_PPU:3 E6 b& O/ r4 U* \9 W, M4 F% n
  1095. LDX #$00
      ]! w; l& l3 u# }6 `
  1096. LDA #$E2
    8 h4 [. o$ Q6 S& u2 W1 h
  1097. STA $BA0 c. R# ?! }4 W
  1098. LDA #$21" S* A) O3 B: Q7 V  ?6 A6 {2 m: D
  1099. STA $BB( y7 e: [. e) T
  1100. $ {0 P% x: ?8 R' h1 s
  1101. 6 e: e: n) j4 Y: g) E* V6 R) e1 _
  1102. JSR LF_PPU. F8 z5 L, j6 u& w
  1103. JSR BULMIX_WRITE6 J8 `4 P9 F( ~( v6 Q; |# l! ]
  1104. LDX #$00/ l0 S% F4 E& F# v" x0 m6 r. ~( |
  1105. LDA $07A2& n9 E* q7 V% w9 M) q
  1106. AND #$04" [% Q9 D, {% G- P1 H
  1107. JSR ON_OFF_PPU
    ' w+ P& F6 L" O2 I2 J
  1108. LDX #$00
    5 j  }7 @: T& x  y3 }; ]
  1109. LDA #$F1
    2 {7 c4 m" Z$ w+ e7 i3 L; ^+ q: l7 v
  1110. STA $BA2 z+ e& \" b, ~5 V( y) Y* J
  1111. LDA #$21
    6 _# d, V1 b  F) n
  1112. STA $BB* X$ M, i) P3 p" t* I, T

  1113. / p1 P* g- h6 v3 V+ b+ s

  1114. ! J' f7 D% I- G1 U2 Y. n6 M
  1115. JSR LF_PPU
    7 o$ z' h& A( u$ ]! g3 f
  1116. JSR BULMIX_WRITE
    1 @+ O2 E6 E1 N) D! [# u0 S
  1117. LDX #$00
    + H4 d9 a( i. M, B: O
  1118. LDA $07A3
    ! @" y& |  N8 O9 ?0 Y. R( N. ~
  1119. AND #$04- K" d& ^& O) `8 C9 L& U9 i# H
  1120. JSR ON_OFF_PPU& U) {4 M  S6 N6 q4 T
  1121. RTS, N& Y$ R9 ]8 G9 i! k5 t
  1122. 4 K% }1 ?9 f6 b2 r, F# ]
  1123. ENELOC_STRING:
    : k* o6 l. z8 ]" J: Y( ~! l
  1124. .BYTE $8F,$98,$8F,$96,$99,$8D,$80( S) k' S- |+ {" I6 m

  1125. 4 ]5 L/ M5 D* V8 V* e/ c& ?
  1126. ENELOC_WRITE:) v8 t, O" V: Z0 S
  1127. LDX #$003 ~/ w2 l/ D2 u; e, K
  1128. ENELOC:
      f3 c% l, p- m- s, a
  1129. JSR PPUADDR_PROCESS
    & b0 a9 B" H, B, r1 ]
  1130. LDA ENELOC_STRING,X- F0 r* H2 C  Q8 a' X4 i( v% b* [6 Z
  1131. STA $20076 ~2 x( f! G7 t# s% R/ i1 c
  1132. LDA #$00
    # k: x, ]/ a7 {! W* h7 I
  1133. STA $2000) d" h, H6 {/ A0 r
  1134. INC $BA
    6 ]2 }2 J" k1 W4 ^2 i
  1135. INX' Z9 h. Y. t0 \* i- F1 p
  1136. CPX #$075 l  R! ?9 V5 ^
  1137. BCC ENELOC
    ; D/ h4 Q1 v7 I. c  s, ^
  1138. RTS7 E2 P. A8 v8 T+ y- H+ |

  1139. - u% Z$ \5 O, \6 L+ M$ G
  1140. ENELOC_PPU:
    + R) b  w# C( N. }( m
  1141. LDX #$00- v  q/ C9 h$ r; F' F3 U$ `
  1142. LDA #$22
    ' [. ~0 ^% h% y; D9 {
  1143. STA $BA/ b- `( ?5 |! s' U
  1144. LDA #$22
    & H' e; M8 X8 [4 u! |+ C9 O, m
  1145. STA $BB
      g9 F1 T$ f& G" M6 A2 Q
  1146. & m7 W, Y1 K2 |8 J. _9 S' B1 q7 g, J: h
  1147. , K8 s" v7 h( o* @0 m2 B3 H
  1148. JSR RG_PPU& y  W$ T" ~9 I* }( U
  1149. JSR ENELOC_WRITE
    0 j$ f& x( i8 `, N
  1150. LDX #$00
    % {. I, U' ?  o; e" E4 V( K) U
  1151. LDA $07A2
    0 ^, m& v# i$ A9 f2 S
  1152. AND #$08
    7 H4 L+ q" P4 ?0 ], u
  1153. JSR ON_OFF_PPU7 F. n; K6 \% ^& b# p* P) H) j
  1154. LDX #$00: Y+ E0 b8 h% q6 C& g8 G
  1155. LDA #$31
    . a( \- {! G2 r- u/ u: Z2 j  s
  1156. STA $BA
    ) \9 m$ j+ g' G" {4 Z- M) s
  1157. LDA #$22
    - C3 K2 h0 i" D. ?) F1 @6 X
  1158. STA $BB% S0 d# \9 S4 U. p; \
  1159. 3 d: R; `/ F: ?! g, O. j, l

  1160. 8 d* y' R, B' c$ {
  1161. JSR RG_PPU! n7 n" U$ |' C8 n* i" |  B3 I8 }
  1162. JSR ENELOC_WRITE
    . B7 I1 l7 r$ H6 j# r5 p
  1163. LDX #$00$ j) u& t. U$ Y, T+ v
  1164. LDA $07A3
    & ]: J0 m0 d) n! ^3 j6 m
  1165. AND #$08+ O4 P3 \% H7 u8 [6 h
  1166. JSR ON_OFF_PPU0 T  C; O# |! y# K. a7 m8 n8 k
  1167. RTS
    9 A$ X' Y& ?9 y) t" J
  1168. : t" }! M7 j4 m
  1169. FOCFUL_STRING:% x7 l# j7 n- k& O1 `+ M
  1170. .BYTE $90,$99,$8D,$90,$9F,$96,$80! L( C* z# f) y6 \/ a- D

  1171. $ J: ^" p7 z$ J$ ~; O

  1172. 4 B2 T( \4 Z; T) v! D& g3 s& F
  1173. FOCFUL_WRITE:
    8 A. d# w/ _/ ~" ]4 [0 K
  1174. LDX #$00
    ' a  n3 I* T% A2 |0 n% I& Q' b
  1175. FOCFUL:  E. O$ b5 V0 x) ?+ Q/ g; b
  1176. JSR PPUADDR_PROCESS
    4 F) v" }% ~" B4 Q
  1177. LDA FOCFUL_STRING,X
    - N# p" M* |1 L
  1178. STA $2007
    . V) f3 M& h; v- p
  1179. LDA #$00# O$ ~) H  A' h2 s, S
  1180. STA $2000
    / v7 V9 t9 C( S! q
  1181. INC $BA
    , z0 r& K) z4 H) T# N
  1182. INX
    # Y1 t8 h! s$ s  o8 }1 D
  1183. CPX #$07
    ) x, A7 L( m* U( n6 D4 w4 f
  1184. BCC FOCFUL2 r( B" ^1 z% [1 T8 s
  1185. RTS
    ) n& @3 @0 R9 y3 C7 o

  1186. % M/ m- ~+ A' U( e
  1187. FOCFUL_PPU:& F6 y# Z# A6 A8 a7 u
  1188. LDX #$00
    7 o* @/ S* r7 n, l
  1189. LDA #$62
    5 i: j9 K& H+ k- G3 A
  1190. STA $BA4 l, [7 a% C" F2 u; D
  1191. LDA #$22/ C- m1 M2 Y- y7 y" _2 z9 |
  1192. STA $BB
    ; J- A. i8 @- E- C
  1193. ; a5 ]' H2 R9 r/ C8 {. g* b  m* [8 Y
  1194. / R+ k4 A* d" M! {3 L+ p; }
  1195. JSR B_PPU! `- Q2 j  ~" d) ?6 t1 d# X" e3 a
  1196. JSR FOCFUL_WRITE7 J1 V4 [1 ]% x7 S/ P# ~5 r/ N
  1197. LDX #$007 x: |& r; R4 @6 Q0 `+ j. c
  1198. LDA $07A2
    ) l# ?/ `# D( K
  1199. AND #$10
    % L$ F' z# E3 b4 ~8 u
  1200. JSR ON_OFF_PPU
    # g% p  U! `* F5 a! f
  1201. LDX #$00
    % Y" C" y% c* f5 v
  1202. LDA #$71: {( g7 N' ~1 _# V
  1203. STA $BA
    ! ~4 {3 H/ c/ y6 z
  1204. LDA #$229 \$ @8 d4 p: ?# h; d" i) ~/ h
  1205. STA $BB
    4 D6 f3 f% |9 P+ V) I
  1206. ! m" V6 |- m; I" N& [. }  w
  1207.   _7 l; V! w+ J# j( E1 a
  1208. JSR B_PPU8 V! G, }. i% i0 U
  1209. JSR FOCFUL_WRITE
    - s0 Y6 F8 ?7 {' p
  1210. LDX #$00
    8 T) S0 j$ ~2 S7 x* @4 @
  1211. LDA $07A3
    * e5 B  |8 c5 g! k' F: J1 R% T2 Q
  1212. AND #$10/ l: D! q* g( _6 R- J( d
  1213. JSR ON_OFF_PPU
    / F! i$ o( H, r3 c4 [; u
  1214. RTS' a( }  K# P, M# f0 W& V' U6 i# L

  1215. 5 V; R  Q" E; x5 y9 G
  1216. BULCON_STRING:( H% ~  ~9 ~$ C
  1217. .BYTE $8C,$9F,$96,$8D,$99,$98,$80
    7 }% X! M6 K6 }: {! e

  1218. ! T+ M5 v) z8 i3 A( m4 M, k

  1219.   V' q. q$ h8 Q' q( h
  1220. BULCON_WRITE:  x& F! Z8 z% d- _1 a
  1221. LDX #$00
    3 k9 E, R# G' U5 e8 i
  1222. BULCON:# c: p$ |1 C5 W/ ?* J6 A: ]
  1223. JSR PPUADDR_PROCESS. p. u5 U9 W9 B$ _' _
  1224. LDA BULCON_STRING,X
    ' W0 L# {7 w6 V1 _( e5 d8 j. x
  1225. STA $2007
      Y- r* `* |: B3 e8 [" }( d
  1226. LDA #$00+ H% n* q* ^* |2 b: m3 T
  1227. STA $2000
    & C. b! b& e5 m2 ?" Y; i# }$ _
  1228. INC $BA: o, h$ ]0 L4 t  }
  1229. INX- v& U; |8 n. X& k, U4 ]: g( Z0 w
  1230. CPX #$07
    ( F' ?0 W+ R5 J7 R) N7 _
  1231. BCC BULCON2 {" J$ W' K, ]' J$ I, e# g6 p4 z
  1232. RTS% c2 M: s3 w+ h- M  R% V
  1233. 6 ~& a, `" ?& Z1 m! j8 `+ t) a
  1234. BULCON_PPU:
    ) w" ?: C) }/ {; n* m
  1235. LDX #$00
    2 g' C7 Y4 N2 E( C7 Q. F
  1236. LDA #$62
    % t3 E! M0 `. G3 T5 x% M7 o
  1237. STA $BA
    - l1 x* f! d) R  r. R
  1238. LDA #$21$ m" T+ q4 T/ ~: g) c- y5 `
  1239. STA $BB8 S/ y* E' R( E; G1 ^

  1240. , u! s) v+ _, g; c7 X

  1241. $ W+ `" {9 W( H8 B0 g& g' i+ {
  1242. JSR UP_PPU
    5 j. D4 n5 c# {7 b' b
  1243. JSR BULCON_WRITE
      W5 W% [5 S  M! t
  1244. LDX #$00
    ! O4 ~' [* y( f! c3 E: H2 m
  1245. LDA $07A4# j7 Z; F- b3 M) K: E
  1246. AND #$08
    0 M2 }# `: ~# F! n# E' B
  1247. JSR ON_OFF_PPU5 d2 P2 B* M$ C4 N  P" x8 t, r
  1248. LDX #$006 A2 W( {/ Z- Y9 z* R
  1249. LDA #$71; K9 i8 t; |7 F: u/ J# F
  1250. STA $BA
    0 J! c2 d- R( P5 z- c8 _8 N
  1251. LDA #$216 [" [5 k/ w; o9 F/ R
  1252. STA $BB
    9 w* K; J! x- L# Z8 v; {  r

  1253. / l3 j( \7 [% X; ?

  1254. - K: l, \- Z$ M8 X' C! V' g+ d* y
  1255. JSR UP_PPU
    5 s( A; ^4 q5 e* j" u1 i+ j
  1256. JSR BULCON_WRITE
    1 m5 ?  ~! y, W" V% W  r: c
  1257. LDX #$00
    % W% \% j9 F' z( M1 J# Z3 ^2 Q
  1258. LDA $07A5; p; e8 e4 t8 t
  1259. AND #$08
    % y+ W$ A8 W1 U3 q* s" T3 G0 _! C
  1260. JSR ON_OFF_PPU  J" A& K5 h( }: f9 n/ x4 y
  1261. RTS
    7 F! i$ E' [! E4 o9 g2 z( S& `

  1262. ' I' n- ^% X9 V# h
  1263. SPEBUL_STRING:; Y' o& e# N7 ^7 i  V) ]
  1264. .BYTE $9D,$9A,$8F,$8C,$9F,$96,$80
    & C; z5 D- z& j; ~7 h$ n
  1265. $ G) {* j! y4 Y# Z1 m' h4 l9 W2 I
  1266.   @) Z  N, g0 t- H" _' K2 F  {8 X9 {
  1267. SPEBUL_WRITE:) R9 L% d, i8 I
  1268. LDX #$00
    ! [4 o- h9 h2 c! |0 o& `
  1269. SPEBUL:
    # H" Y  e! `, i' l. y0 V
  1270. JSR PPUADDR_PROCESS
    8 K; N& [) T3 h
  1271. LDA SPEBUL_STRING,X
    " r6 r: t2 G4 d8 p: N+ J+ i1 u
  1272. STA $2007
    ' _8 \: K( a; H' s& m# U
  1273. LDA #$00
    8 l# Z2 p9 n# S$ y, v" a
  1274. STA $2000
    8 l3 [: h) W* j7 F. R1 F- ~3 g
  1275. INC $BA2 e4 h) h5 U8 k
  1276. INX
    $ }# }  B' h" t& `( S. W( ?$ ?
  1277. CPX #$07
      X' X+ S0 x  `4 U- Q& Y
  1278. BCC SPEBUL- i. ~$ }# T% L' P, u" w* b2 F
  1279. RTS* \7 U, q8 f& ~9 p  P

  1280. " i: V; A$ w: k$ _; Y3 j' q7 ~
  1281. SPEBUL_PPU:. k% M* I) i  \8 T1 V$ s+ l0 w
  1282. LDX #$00
    7 Z. j) s5 R+ h
  1283. LDA #$A25 h9 M4 v5 X3 [
  1284. STA $BA
    5 P9 H+ n+ R) Q" u0 Y5 ]
  1285. LDA #$21
    6 Z( D  M! M" b
  1286. STA $BB
    3 o0 B; A) J: `
  1287.   g: \" d; R* [9 e
  1288. , I5 |7 T# X4 X7 [7 p' @$ l! B8 c
  1289. JSR DN_PPU' p1 _/ ^4 ~0 N8 m" I
  1290. JSR SPEBUL_WRITE
    0 {' A5 L5 L: b) B
  1291. LDX #$00: N" o5 A) e8 @2 s, V- a: ^
  1292. LDA $07A4
    3 K) T' |7 X) U. e
  1293. AND #$02& D" }( @. D6 q
  1294. JSR ON_OFF_PPU+ m% d7 r% u9 L3 F" P$ r1 i
  1295. LDX #$00# Z1 h: ]- Q7 X6 {, L# i% M# `
  1296. LDA #$B1
    3 i: R9 c2 J0 O8 |: d: D
  1297. STA $BA
    : I, b  j+ r3 G$ E
  1298. LDA #$21
    7 n7 V, v' }. i$ R) {5 \6 x
  1299. STA $BB. W; K  f! b/ r- T) w) O# `( y: X
  1300. 7 R5 \$ [8 {; c( i

  1301. / C7 j* F6 s5 T
  1302. JSR DN_PPU6 N! a3 F: l. h/ j; `
  1303. JSR SPEBUL_WRITE
    " d. R6 y4 T7 g* c4 T% e
  1304. LDX #$00; j$ S5 K! @) _" U- U1 V) m
  1305. LDA $07A5: J4 p; f! V2 h3 K) a  d& b6 s' K. }
  1306. AND #$02: E! ?7 W: N8 ^6 F9 g' G
  1307. JSR ON_OFF_PPU4 c1 S& a% Q* j6 M* g) W3 @
  1308. RTS
    7 X+ P+ V+ q# ~: z' @

  1309. 7 f# |9 t; w0 o1 `8 U& k+ ]) U
  1310. .ORG $A500
    ' T( f1 Z9 o8 i+ Q. A6 T
  1311. CLEALL_STRING:
    ! O5 K) R6 P1 k# g" s
  1312. .BYTE $8D,$96,$8F,$8B,$96,$96,$80* x3 E* F, N9 e/ b# G- k6 |

  1313. % }8 L8 q( Z5 N. F/ O+ U3 g7 I/ |
  1314.   {+ T" {3 I3 l5 P( q! Y9 z
  1315. CLEALL_WRITE:$ v1 j' X( l, B; v
  1316. LDX #$00: |: {0 Q6 ^$ u. _& |- \5 y
  1317. CLEALL:3 c( q6 p: V4 Z, h& }7 g
  1318. JSR PPUADDR_PROCESS
    3 `" O# R" u4 r
  1319. LDA CLEALL_STRING,X
    ; i- U+ |9 L$ m) O
  1320. STA $2007
    : Y% K7 O% q9 Y2 _
  1321. LDA #$00
    $ f+ I2 }8 S+ h! L- ]
  1322. STA $2000, y3 w* s$ x6 j) @
  1323. INC $BA
    4 O; \: u1 z2 s/ o! h# X
  1324. INX5 M7 S) H* T9 {
  1325. CPX #$07+ S6 A, s, a5 @- u
  1326. BCC CLEALL" P+ K! \- L% R( @$ H
  1327. RTS
    8 i. g: {3 T) C0 f, \1 V
  1328. : }& ~% U' p) t; h3 K% l
  1329. CLEALL_PPU:% g* O; N& h& G
  1330. LDX #$00
    : J6 e# `" A5 ~; m- W" R. |2 m# ?
  1331. LDA #$E2& e  n9 v& C6 y4 l' H
  1332. STA $BA( ]% Y7 h6 P9 M
  1333. LDA #$21
    ( R/ q5 i5 x& ~7 i  N- t  t/ Y
  1334. STA $BB' q. B7 f8 W# [4 I1 k7 T
  1335. 6 ^' N5 S. g. h3 z+ {" ]. m
  1336.   p5 }5 c' e" I, R6 [1 ^
  1337. JSR LF_PPU+ J2 R5 ]+ I9 y7 m) t
  1338. JSR CLEALL_WRITE
    ' T/ w2 N6 u: n! W2 A: b" \
  1339. LDX #$006 g. S8 M, z. t1 L
  1340. LDA $07A4
    6 C, Z3 J9 B+ o% y  i
  1341. AND #$04: D. A. g9 L! u8 Y- Z8 {6 J
  1342. JSR ON_OFF_PPU
    6 c6 [4 m4 d/ s; l+ O* F' A" p9 I
  1343. LDX #$00. w6 l6 M( B6 S  z6 E  F
  1344. LDA #$F1
    3 m2 J& @3 O) d  o9 }$ F. D
  1345. STA $BA
    4 w7 I$ p) b- l: _5 ^
  1346. LDA #$21# D! V( i# z/ H; M, j: o: Q( H
  1347. STA $BB8 f" \. N4 `6 @" J1 ^+ `

  1348. ! I3 t8 E0 K3 y  R2 o8 U' Z

  1349. . n9 [3 ]" ]* c: k( D
  1350. JSR LF_PPU* V, w( ^: E: P7 C  K
  1351. JSR CLEALL_WRITE
    9 o% ?. K1 p8 w
  1352. LDX #$00
    ' W2 v" w" x' [) q8 ^
  1353. LDA $07A5- U4 M$ E5 W! j+ {; l% k
  1354. AND #$04, k, V+ ^- u/ s6 O6 R# j/ z5 k
  1355. JSR ON_OFF_PPU1 |' C( G) [/ x& B
  1356. RTS) C) y1 T, T4 ^. G
  1357. 3 k, {$ y( d: R, `0 F8 H) ^
  1358. HARDMODE_STRING:
    ) J5 @+ ~! U( }) C0 M' G. d/ {
  1359. .BYTE $92,$8B,$8E,$97,$99,$8E,$80
    6 \0 S/ L" S, {/ a+ T7 q: d
  1360. + D  t5 ^3 z- C& h1 b9 S% F- b
  1361. * ~& u5 m) ]& Y
  1362. HARDMODE_WRITE:5 _0 y: O( q/ H% E' y; E9 ?- L1 V; o. s
  1363. LDX #$00
    6 H; p0 t. l5 O) a! d5 ?$ M/ }. z
  1364. HARDMODE:9 M4 {- r* U8 @8 P- X
  1365. JSR PPUADDR_PROCESS. f# }, r( J( ]: L
  1366. LDA HARDMODE_STRING,X; N9 y5 S7 Z4 O5 m$ E4 ]  l! h
  1367. STA $2007/ P9 B$ O) p6 @" C2 m: B6 e- A/ q
  1368. LDA #$006 |+ m6 N5 t( P) m
  1369. STA $2000# \, [$ M- C4 Q$ Y) {0 o
  1370. INC $BA% x! K6 ^; G- l6 p
  1371. INX
    . ]2 t* J# ^, a/ e. Y
  1372. CPX #$07! B- m2 n: p4 o  E5 j: P
  1373. BCC HARDMODE
      n. b3 l; q' o5 g
  1374. RTS
    7 b$ Y8 J4 Q0 e2 n

  1375. ; S  D* X& c: o& g7 r/ L3 w
  1376. HARDMODE_PPU:
    : F6 n9 Q* j: `2 h0 S% b% c5 H
  1377. LDX #$00
    ) {) ^  O# }/ k- V7 \2 Y7 `
  1378. LDA #$22
      @* c9 s' D  t: M! J& ?2 N
  1379. STA $BA
    2 K1 a; u1 M  P5 G  `
  1380. LDA #$22
    % X: u4 v0 d+ W5 P* l
  1381. STA $BB
    : Y, Q* z  p* L& l8 A
  1382. JSR RG_PPU1 E& V, M2 X$ H/ d1 U# f0 G$ W7 {
  1383. JSR HARDMODE_WRITE
    * C$ |( M; N( b8 n9 ]* ~9 D5 x
  1384. LDX #$002 G/ v5 V* F* P0 P$ D* p
  1385. LDA $07A4
    # y8 {: i# b; [) ]( c
  1386. AND #$01
    3 {) d) n7 Q; W
  1387. JSR ON_OFF_PPU5 l$ D8 }0 P; P
  1388. LDX #$00& P3 B% s. T, e5 r
  1389. LDA #$31
    6 q6 x1 ]- x6 S" n" f$ A: `
  1390. STA $BA
    $ F2 B& l% d1 [4 ~
  1391. LDA #$22
    $ t1 }2 W1 Y; q2 T# |4 Z
  1392. STA $BB
    7 n) \) s% H6 U5 `9 U

  1393. - z8 }5 c' c4 h5 J4 N% f3 G

  1394. 8 l& i5 J7 o0 q" p
  1395. JSR RG_PPU1 |7 y5 |' q+ X4 \) [: d( c' e
  1396. JSR HARDMODE_WRITE
    + d" \4 v7 N; ^- ]6 Y
  1397. LDX #$00! K' ]8 E( o+ g6 a! r- \$ n9 B
  1398. LDA $07A5; k/ @( a9 `1 p) }5 ~, d
  1399. AND #$01
    & z3 C9 n, e1 a+ F! H" w% N5 q
  1400. JSR ON_OFF_PPU, b( g2 n$ [4 ?4 Y
  1401. RTS
      `" G& A) Z+ n# a
  1402. , X: J6 ]* r( h" \  P7 \  G# X
  1403. B_TO_JMPSTG_STRING:
    / O9 h, R9 F# `  U
  1404. .BYTE $80,$8C,$80,$9E,$99,$80,$94,$97,$9A,$9D,$9E,$91,$80
    2 ]( Z8 G1 m' z7 P
  1405. / w! b$ L0 i6 ^" q1 W. c

  1406. - q9 w; R4 }* t1 ?
  1407. B_TO_JMPSTG_WRITE:0 T& ^; Q0 g" E- q. A+ j$ \
  1408. LDX #$00
    3 J! f8 t, Q; q) }* [6 P4 G7 Y  U
  1409. B_TO_JMPSTG:  l" o9 J5 ~8 _' r! }
  1410. JSR PPUADDR_PROCESS
    9 }: y4 G; a- w4 o" z1 l
  1411. LDA B_TO_JMPSTG_STRING,X& I% {0 ^, g) x
  1412. STA $2007( {/ Y1 |8 x, r8 N: H8 c; U4 X
  1413. LDA #$00
    1 k) a% f% |; ]- ^  R. x
  1414. STA $2000
    2 h, [& W" V+ ?
  1415. INC $BA6 ]* O0 U' d0 n9 ?
  1416. INX
    . `1 O3 m: }6 r2 M
  1417. CPX #$0D! W4 w. P8 G2 R+ A' a
  1418. BCC B_TO_JMPSTG
    : G; ?3 K3 y2 C  ^7 s
  1419. LDX #$00
    2 s- M0 D& J2 ^- H7 g/ P
  1420. LDA $7FE0
    ; c# B* `3 a5 j7 f" d& ?
  1421. JSR ON_OFF_PPU
    " |1 S* C! o. Y
  1422. RTS
    4 \: n' L& m7 F0 J- ]0 v
  1423. 4 u& }3 @1 D% Z, x4 x7 Z
  1424. B_TO_JMPSTG_PPU:: ]* [$ Z% g1 A5 x* g
  1425. LDX #$00
    7 U( \& R  o; q3 i3 k! f& G; [/ [
  1426. LDA #$68
    , T# d" q: l1 `0 m* l! w
  1427. STA $BA! f- R( w: V# F0 E+ r
  1428. LDA #$22: H( [9 U  e7 P* t  s1 u6 m: g
  1429. STA $BB
    9 f! Y6 u0 Q: p, r
  1430. JSR B_TO_JMPSTG_WRITE" M3 |5 M/ b$ p1 D$ v9 r6 `! m
  1431. RTS
      U; ]* H6 l. t7 S1 T7 @

  1432. ' e; c! I5 R( k. U8 B& W
  1433. / ?! F" T* j) c$ C
  1434. A_TO_PLAMOD_STRING:! z! |4 m& D# U
  1435. .BYTE $80,$8B,$80,$9E,$99,$80,$9A,$96,$8B,$97,$99,$8E,$80
    4 D- M7 ^4 n3 d( y7 u+ W& V
  1436. . N% i6 Y  q! l6 t- C

  1437. ; ~& q. J8 L2 m6 g+ Z
  1438. A_TO_PLAMOD_WRITE:" M% G7 p# I2 X- h0 T& @2 s+ k
  1439. LDX #$00
    6 b* K8 @4 F! T6 N$ E) n' L: Z
  1440. A_TO_PLAMOD:
    3 f( y: h) ]& u# ?) @) [( E
  1441. JSR PPUADDR_PROCESS
    # X1 [3 F; _! Q/ w
  1442. LDA A_TO_PLAMOD_STRING,X: }$ G5 n& b1 y! A7 a2 F
  1443. STA $2007
    + U7 ?4 p. c" d$ ?; n$ @" q- w; c
  1444. LDA #$003 q: e! R4 I+ r- `
  1445. STA $20005 i. n- q" X- Q  s( u9 t5 c' X
  1446. INC $BA
    * T6 o  A- K- e
  1447. INX
    8 Y& v4 Z, h7 u2 W
  1448. CPX #$0D
    ( _7 C. \6 u7 l( L; X& v
  1449. BCC A_TO_PLAMOD$ O  a5 R' s( _7 W1 o  v7 R- n! _
  1450. LDX #$009 A: @0 [; v/ ^8 \, b
  1451. LDA $39+ C- }2 I1 r  i6 I/ W; |/ v& l& X
  1452. JSR ONE_TWO_PPU1 {1 n% `: r5 L
  1453. RTS
    $ T$ B: z9 L, T2 S2 S2 N- A% E
  1454. 6 l, @4 a* F$ l6 y/ u2 b- W5 g
  1455. A_TO_PLAMOD_PPU:5 N- }' L- y. a6 P0 ~' |( O
  1456. LDX #$00
    , W, C# R7 O# t9 a' u( h
  1457. LDA #$A8, S0 a  [) v: U3 y0 H, _+ c; A
  1458. STA $BA
    . ~8 a! R4 ~; @  [) M
  1459. LDA #$22( ^, F: t8 o/ L  [
  1460. STA $BB
    3 h4 W" r4 p" \- n" |4 p
  1461. JSR A_TO_PLAMOD_WRITE
    ) W8 G5 t$ D" ~# z; r2 G' V# b
  1462. RTS
    1 a2 U8 I. [) a! [

  1463. . c$ O' Q" `7 r7 _
  1464. MOVSPE_STRING:
    0 K/ M$ J( _+ F# _; Q% ~
  1465. .BYTE $97,$99,$A0,$9D,$9A,$8F,$80
    5 Y8 T- q. x2 M1 u, L; S1 x, Y
  1466. ! I! n0 b3 r0 g
  1467. 4 \  ]. l1 e; u1 T8 M
  1468. MOVSPE_WRITE:
    9 {) c0 \2 |+ I; U/ D& n" d
  1469. LDX #$00
    / G1 W. T9 S; s  L
  1470. MOVSPE:; Y5 X( n+ h4 J! t! n! n
  1471. JSR PPUADDR_PROCESS) o8 k9 X, R6 h" t: i
  1472. LDA MOVSPE_STRING,X
    ' h$ q; w! g& F6 o
  1473. STA $2007/ y+ \- k2 w  ?1 F+ c, P
  1474. LDA #$007 e, E' l: Z5 E6 j
  1475. STA $20009 z+ a% N5 w) |5 B* G9 t3 N
  1476. INC $BA
    5 g/ Y  H, G+ B% E! w2 d
  1477. INX
    / H+ r+ w9 D' p! T/ n. {
  1478. CPX #$07
    ( ^4 s* @- n0 q9 D
  1479. BCC MOVSPE8 \; k/ ~+ ?5 f, s. f  C5 L
  1480. RTS# X; B' v$ R$ m8 K' N
  1481. " _9 b1 ]3 c5 e$ }0 c$ p# K
  1482. MOVSPE_PPU:
    " t$ e" d4 s3 @: q! _
  1483. LDX #$009 E( h: e- W- |# H! G
  1484. LDA #$690 t  Y& }* f8 Y4 m) q2 u
  1485. STA $BA
    3 `! B# [3 D& O% A
  1486. LDA #$21* E- E( R" }+ o+ p/ \. b; V
  1487. STA $BB  p) u. g% H6 o  |% W

  1488.   a+ g8 O. E8 R

  1489. 9 p1 B* e2 Q& |( A
  1490. JSR UP_PPU
    ' _" T6 d4 O) i; @
  1491. JSR MOVSPE_WRITE
    7 v- W7 S% t& Q. j& U5 f$ f
  1492. LDX #$009 g8 R" H3 T' `- g7 C3 g
  1493. LDA $079F
    9 h4 T; Z: I+ V8 c
  1494. AND #$08' N$ {2 B& S8 |5 ]0 k
  1495. JSR ON_OFF_PPU( G+ Q0 `% E' s' F& y3 p. x  q
  1496. LDA #$806 Q1 ~5 `  f2 w) m
  1497. STA $2007
    , D/ l, [7 h% D0 s; o- I: f
  1498. RTS% E' e7 I$ v( r' m0 ]5 v
  1499. : Z) x$ ^& q& k: C% `6 D
  1500.   7 K( [. r8 O3 n& ]# h( `
  1501. UNLJMP_STRING:! k! g$ ~, ]8 i
  1502. .BYTE $9F,$98,$96,$94,$97,$9A,$80
    ( k' j0 T+ L( ^, K+ |/ r

  1503. ' i  j$ L. t# E8 k3 L6 D
  1504. 9 [% Q4 A# N) L; v$ u& q6 ^
  1505. UNLJMP_WRITE:
      P+ `! L# j5 h3 B# S% f1 l+ s7 h, q
  1506. LDX #$00
    ! x4 R5 q2 b; x' y  ~1 |
  1507. UNLJMP:. g% n5 O% x. M* w9 f/ h3 y
  1508. JSR PPUADDR_PROCESS' r9 m, F, w0 x7 c% N( [# i' o
  1509. LDA UNLJMP_STRING,X
    ; p0 a, M' w. `' W5 Y0 b
  1510. STA $2007
    5 B+ [7 e2 G, t! t; }/ e
  1511. LDA #$00  W; H9 \) j, `
  1512. STA $2000/ Z* L8 W/ J2 M; h6 Y/ X
  1513. INC $BA; S/ V& X: k% m1 Q4 `5 d. p6 ]
  1514. INX. d) |; x; N2 Z1 |2 Z
  1515. CPX #$07
    / r& }! T5 A3 j$ o4 i
  1516. BCC UNLJMP
    : {4 `/ _, i! {. u7 G0 A. o
  1517. RTS
    # S8 y. j; M3 d1 n; Q
  1518. ; n) f) A2 @3 @8 o
  1519. UNLJMP_PPU:
    7 W  X. ^* P! P% }+ p1 n1 ]4 ]1 \2 f
  1520. LDX #$007 w( b/ T& h; M
  1521. LDA #$A9
    / x8 j, ^! y2 `
  1522. STA $BA* |4 @  @8 ~- f! Z3 C
  1523. LDA #$21
    ! u) E4 J8 E* Z: L$ H2 L
  1524. STA $BB
    ( r) c* I( q% u+ j( Z) f

  1525. 5 x$ V0 I" {- l% S3 I
  1526. ! |! }0 \; t8 t3 x/ L9 B
  1527. JSR DN_PPU( Y; }. W. j' |7 \/ X
  1528. JSR UNLJMP_WRITE
    0 c9 @3 A1 g& X) M
  1529. LDX #$00
    ' Z! b2 |& z& U2 L- y" ~/ b! Z
  1530. LDA $079F
    8 D3 d4 i6 G5 `$ v( j; m
  1531. AND #$04$ ~- }9 |% Z% J6 w$ P
  1532. JSR ON_OFF_PPU
    ) g6 H, Y5 x3 X' y3 j) L% q
  1533. RTS  Q8 g; N: T3 \8 M: ~/ J
  1534. - i% h2 m) W* ]! G. l+ B/ r; u" `6 o
  1535. . L0 o) i- A0 T. C3 U3 K
  1536. DESTRO_STRING:
    & l- c1 Z/ v# d
  1537. .BYTE $8E,$8F,$9D,$9E,$9C,$99,$80+ l7 X# _$ O7 i# f# F2 ^8 A0 O5 B6 e; t
  1538. 7 ]; H% d# L# H' o4 h8 W

  1539. 2 B& d% Q8 ~; P5 o
  1540. DESTRO_WRITE:
    * z5 K% `) f! F  ^& N
  1541. LDX #$00
    ' U* E) X8 O: Z9 a3 n; a
  1542. DESTRO:
    ; \4 X" Z' O- G. _
  1543. JSR PPUADDR_PROCESS
    # _. G) T+ ?5 C% m2 a
  1544. LDA DESTRO_STRING,X4 A) e- u2 X2 q
  1545. STA $2007/ V& c2 s" o1 G2 F1 k
  1546. LDA #$00
    9 \5 M7 w6 U% k7 C, A! j
  1547. STA $2000, ~* z. C& h% k; F  y. f( c3 k
  1548. INC $BA* s' H- a7 P5 C, U
  1549. INX
    : {/ i7 }* y  G& |, Y* k
  1550. CPX #$07
    , w/ [# |/ e% X( h& a* N" Y: F' y
  1551. BCC DESTRO: x( d0 K& V. c$ k: _7 c
  1552. RTS
    9 u+ y9 `: q8 |0 p

  1553. $ O, F6 b6 h+ J* J
  1554. DESTRO_PPU:, O7 }, P9 P" o
  1555. LDX #$00
    4 C# A2 R- s7 Z+ f( F6 w9 J
  1556. LDA #$E9) ^& H8 \9 ^$ g
  1557. STA $BA
    ( v' J7 V) x) v$ N8 F8 U, L9 U
  1558. LDA #$21
    0 y0 z" I$ i, @4 u7 E' g# `! X* f
  1559. STA $BB/ ]/ l# G; Q. A( C0 J7 o1 I

  1560. 5 d  r& m6 ^9 A* w% W/ T0 B0 ~$ W
  1561. # V# B8 U8 Z% f
  1562. JSR B_PPU
    4 I& J. t8 M3 @5 z* h4 _" R' k
  1563. JSR DESTRO_WRITE5 `  K5 C  H8 E2 e% ^# a; b: h/ Z3 S
  1564. LDX #$00) p: ^, M) ^4 }
  1565. LDA $079F
      W) H6 b* P6 W4 a
  1566. AND #$40& N- j+ x' f( z* T% _2 g
  1567. JSR ON_OFF_PPU+ s- f: A8 o. H! \4 h, {
  1568. RTS: Z  S9 j, S& ?  E# G% c6 n
  1569. 8 v0 f1 W% l. i4 I

  1570. * @0 k3 B, W. q/ ~: @
  1571. EQUBUL_STRING:
    ' i$ b% m( b( O! E, b9 Q
  1572. .BYTE $8F,$9B,$9F,$8C,$9F,$96,$80
    ( B& G2 K) w( C+ o; _$ f

  1573. ( D, ^$ }1 j0 ]3 D$ D: X
  1574. 2 `% x! W3 ^2 k/ e2 p) _  I* i
  1575. EQUBUL_WRITE:, k: H" s+ P7 e( Z4 x/ Q- T# N& `
  1576. LDX #$00; p/ B5 V% H- X
  1577. EQUBUL:, I" X4 b- S1 M
  1578. JSR PPUADDR_PROCESS% M0 g" F8 g1 W% |$ j
  1579. LDA EQUBUL_STRING,X
    " r$ A+ v2 N- t$ i7 t' l: _1 [/ B
  1580. STA $2007; j6 F2 B, G, K( C
  1581. LDA #$00
    1 o. }8 W+ x9 H
  1582. STA $2000
    ) E4 A$ }7 B' V* i/ s7 ~
  1583. INC $BA
    $ [8 [+ J- W) @) g/ W- u
  1584. INX$ P/ s5 F9 j, Q& L
  1585. CPX #$07
    4 |4 v# ]# z# u
  1586. BCC EQUBUL- _- J, P+ e& i" I
  1587. RTS0 x  I. Q4 u7 P
  1588. 2 @. R3 {0 p7 o/ e; P, R
  1589. EQUBUL_PPU:
    ! g- f" ^" n: O
  1590. LDX #$00
    9 A, x7 \8 F# O% e( P* |8 H: c
  1591. LDA #$29! y! Q" S# A) [$ @) F4 c& ^3 n
  1592. STA $BA& W  z% m, q! D! `1 W; ^
  1593. LDA #$22
    1 [$ S& o7 [* R
  1594. STA $BB- y& S( y9 _! ]" a# j3 ^+ K

  1595. # S3 e: c1 v1 q3 Z* L3 Q( j- ?

  1596. & `, ~2 }! G! F: U3 [- U8 ]/ u
  1597. JSR A_PPU) v' n1 C) x2 w/ l' `6 s$ I
  1598. JSR EQUBUL_WRITE
    ) k8 U& C7 X% J1 I9 l
  1599. LDX #$00
    & f* Z. \( y6 J' r
  1600. LDA $079F
    ' A/ K2 \, I0 l
  1601. AND #$80: h4 [) Y0 t1 q* M9 y  _
  1602. JSR ON_OFF_PPU; b: Z$ p, F& D. S# ^9 d% H
  1603. RTS2 x& d( U5 T2 T9 `
  1604. 3 A5 X" z8 @5 `2 x' p
  1605. , ~. T& y% \0 P0 g, S/ ~
  1606. $ B" K. l+ r! V" P
  1607. BULSEL_UP_STRING:
    9 g* N7 K( [$ n% \2 V/ |  g1 T2 U
  1608. .BYTE $9F,$9A,$80,$9E,$99,$80,$9D,$9D,$807 ~# J# J" f3 J

  1609. 3 g, ]5 G; d$ p4 ?# d1 ~$ ~
  1610. BULSEL_DN_STRING:$ b3 s3 n9 d: p5 r
  1611. .BYTE $8E,$98,$80,$9E,$99,$80,$9D,$96,$80& a0 F3 k- ~3 j" s, L, t/ D

  1612. 8 q% l. j+ L7 u5 Y; F/ u
  1613. BULSEL_LF_STRING:
    9 c, s6 `8 \* O% n* b+ _
  1614. .BYTE $96,$90,$80,$9E,$99,$80,$9D,$97,$80# \+ ], Y$ o  P4 G9 `, L5 `
  1615. " C7 ~: r) r9 G: ]
  1616. BULSEL_RG_STRING:4 l3 r3 Z2 m. y( n& A3 t
  1617. .BYTE $9C,$91,$80,$9E,$99,$80,$9D,$90,$80
    6 o# e. u8 [9 o: @# Z

  1618. + w' w: P/ W9 w0 H$ ^9 G
  1619. BULSEL_B_STRING:
    ) T2 _. n+ C' k9 B2 Y2 I# ?' e
  1620. .BYTE $80,$8C,$80,$9E,$99,$80,$9D,$98,$80& D. n/ @7 {: ~2 u" g, p2 ~
  1621. % @3 v) j3 }" M, R
  1622. BULSEL_A_STRING:
    & {* \8 x# Q3 b/ I
  1623. .BYTE $80,$8B,$80,$9E,$99,$80,$8D,$99,$97,$97,$99,$98,$80,$9D,$9A,$8F,$8F,$8E+ x/ e/ \# O/ u- j
  1624. 9 }9 f3 D8 B* N. }! H

  1625. 7 k$ r9 r5 _: [; _
  1626. BULSEL_UP_WRITE:! l+ Z' O& _7 L2 o. [: \
  1627. LDX #$00' p! K9 A5 N7 ?7 H& @: y! ]
  1628. BULSEL_UP:
    / t% w3 i1 k) X, |  k8 [
  1629. JSR PPUADDR_PROCESS9 C9 x7 b) i) F
  1630. LDA BULSEL_UP_STRING,X
    ' Y6 e, d, F8 d& X0 c* Z/ u! @
  1631. STA $2007; c% S3 l4 b% g
  1632. LDA #$00
    ' u! Y  Z* i( O5 Q/ P
  1633. STA $2000
    : V! _4 R; _/ r8 K
  1634. INC $BA
    9 |+ X( r+ v- W/ @
  1635. INX, c  n! M8 o2 V- m  g- o4 F/ x2 P
  1636. CPX #$094 O. m- c- N# e+ E, b
  1637. BCC BULSEL_UP! v& u, v& t4 G7 G
  1638. RTS$ G; p4 O; y2 d7 V: F, g
  1639. BULSEL_DN_WRITE:& ^* Y/ J+ R( L6 W& E# I
  1640. LDX #$00/ G/ g& B! j- ]6 M" `
  1641. BULSEL_DN:& e3 N0 b) k+ V. `
  1642. JSR PPUADDR_PROCESS
    ) E: n+ N) j# [! ]  S
  1643. LDA BULSEL_DN_STRING,X2 q+ D7 G" ?+ S% v
  1644. STA $2007( Q! T. N. o0 W, A$ ]6 n9 O6 q
  1645. LDA #$000 u1 M3 I( R6 m8 x1 J) f
  1646. STA $2000
    2 [; D* [) ?5 N' T% B/ R/ @) m+ D
  1647. INC $BA
    * Y$ J1 Z0 j) V2 X7 t9 Y* G
  1648. INX
    4 A+ w2 O$ Q! R0 J5 Q
  1649. CPX #$09# X% [* Q. S4 n+ W; p7 Z
  1650. BCC BULSEL_DN
    % c4 Z9 p$ [! A$ b4 p- {
  1651. RTS
      d' T, d" Q9 Q" T. q+ y
  1652. BULSEL_LF_WRITE:
    # b# U% V+ N- f9 F
  1653. LDX #$00
    : Q/ s) }7 O% r/ D5 w& Z
  1654. BULSEL_LF:' @7 t* n8 F! m+ v
  1655. JSR PPUADDR_PROCESS! d' y( j* {3 |  |9 A' P
  1656. LDA BULSEL_LF_STRING,X
    # J0 P6 j3 v  L
  1657. STA $20077 |+ o( d! N2 [( w
  1658. LDA #$00
    1 _0 b; K0 x3 ~2 a- w3 t
  1659. STA $2000  d/ A% u9 g' W. ~) z4 _
  1660. INC $BA- K+ n/ E5 k  m. ~4 U: \$ |
  1661. INX0 w4 E, c& F  @8 B5 l, D) u" g2 V
  1662. CPX #$09: B- t- L8 E0 k& N# \
  1663. BCC BULSEL_LF1 h4 `# J1 C" g, _
  1664. RTS# i+ N  J. p" y
  1665. BULSEL_RG_WRITE:# t0 K5 X& }# H/ P9 L0 B
  1666. LDX #$00
    % |! m3 J( `/ I: P3 q# }' u. P
  1667. BULSEL_RG:: Y& }* t4 N* m
  1668. JSR PPUADDR_PROCESS
    - ~* \( ~2 C; p; S% k" M2 O! i. c2 i
  1669. LDA BULSEL_RG_STRING,X, @' ^/ x' @4 H  g! f
  1670. STA $2007
    ! t1 U* E; U- M; [
  1671. LDA #$00
    ! S* }2 E+ c2 Y# h/ k5 p
  1672. STA $20008 ?$ j" C% p7 s' x# q) W
  1673. INC $BA- @: q$ Z: B4 R7 Q6 _! E" v7 V7 H4 O
  1674. INX
    & ~. b! Y2 K2 _2 J4 Z2 D1 E
  1675. CPX #$092 f5 u) O( G0 L
  1676. BCC BULSEL_RG% K1 ?) Z  H! p1 w0 e
  1677. RTS2 E0 m9 l$ n1 e) [1 z3 G
  1678. BULSEL_B_WRITE:
    + R# @" [9 b. r3 M3 w( l2 U
  1679. LDX #$00- W; m1 R+ a8 n: l
  1680. BULSEL_B:$ w- g; D0 d0 y$ K# ~  A
  1681. JSR PPUADDR_PROCESS& o. ]  M0 W" S  v8 j( \
  1682. LDA BULSEL_B_STRING,X8 x4 P1 V1 y$ u. i" x
  1683. STA $20075 U: b% i  B8 A  y
  1684. LDA #$00
    & c8 H5 h: |0 L  F& U( t
  1685. STA $2000  t3 O; _( Q4 J0 l  t1 [
  1686. INC $BA
    8 A% X0 y  J  G! F% Y1 Q% w2 e5 m0 J
  1687. INX
    8 F4 j- d% Q9 J5 F3 n$ Y$ T7 p
  1688. CPX #$09. F) K9 c0 [/ m# Z* J) x) O3 g  A
  1689. BCC BULSEL_B
    / [; }" u) W& X* B6 x
  1690. RTS
    ' I# {! ]' u2 o; E
  1691. BULSEL_A_WRITE:
    , M# f" R5 ~; c! q2 a* l0 D' x
  1692. LDX #$00
    # K+ M# _. h# n1 o! i% Y( b' S0 c: j
  1693. BULSEL_A:
    ( W! t7 d( s7 Z2 T5 E/ ?
  1694. JSR PPUADDR_PROCESS
    4 }3 ^7 R) j. L+ W/ J! F& B
  1695. LDA BULSEL_A_STRING,X, ~( e& ^& P$ k7 F
  1696. STA $20079 x% E7 y% a+ ]* O5 U8 S
  1697. LDA #$00# O( j) n2 a4 n5 n0 y1 T
  1698. STA $2000* C# }$ c4 d( }4 G
  1699. INC $BA
    . f3 @  n- U% M# c
  1700. INX$ \! ]  ~6 {" ~) T
  1701. CPX #$12
    0 Y( W3 t% k' v6 H
  1702. BCC BULSEL_A
    & R* o2 i7 g, {* ]" X
  1703. RTS( W4 Z, f& a8 P; N( B
  1704. 9 v8 k# ?# e  O" k0 A
  1705. 8 w, s3 ^, B) h; k8 E1 S1 ?

  1706. 7 v+ Y/ ^* X1 h
  1707. BULSEL_PPU:- e8 F- _- V; Z# e# B: m, Z
  1708. LDA #$6C
    0 F3 q3 c' h5 {1 ?' ~9 i
  1709. STA $BA: l+ A9 y/ b' y6 \4 v( I# h6 h. r5 Y
  1710. LDA #$21- a. R: `* M; F3 q% z
  1711. STA $BB
    ( M% C9 ]% W+ i9 ~3 {& A# b
  1712. JSR BULSEL_UP_WRITE! E, b6 M* p9 Z, v
  1713. 8 N4 D) U6 X# v) G
  1714. LDA #$AC
    7 E. J; s: S' M6 v8 p0 A
  1715. STA $BA7 ^* c6 c2 |9 y4 Y
  1716. LDA #$21
    % U4 @+ P& i# l& ?- C  J
  1717. STA $BB4 u+ n& x& I! c
  1718. JSR BULSEL_DN_WRITE, k; I  v( s, J/ Q& m; n% K" A
  1719. ; `5 \" V0 B* D+ @
  1720. LDA #$EC8 c6 F0 R+ K4 \( V4 {) R
  1721. STA $BA9 U: K: G" Q0 ]
  1722. LDA #$210 e& w* m; F; w  T9 O$ l
  1723. STA $BB
    ! [2 L. B. T4 x( E- n3 Q& k1 t
  1724. JSR BULSEL_LF_WRITE2 Y6 Y+ t* k& u. x+ H

  1725. ! ?8 O% E2 }) X6 k2 T
  1726. LDA #$2C9 M1 T2 K# A9 b# Z
  1727. STA $BA
    * j+ Y0 [4 K: {% x9 V
  1728. LDA #$22/ f5 t1 G' G& G' T9 d
  1729. STA $BB
    9 u3 [: @& s9 J% \
  1730. JSR BULSEL_RG_WRITE
    * D7 p- G8 M( Q

  1731. , j1 Q2 A& \2 Y. [  @1 M
  1732. LDA #$6C
    - Y" k9 e/ x6 T$ e- |4 q1 \: H( r8 G
  1733. STA $BA& O1 @# m* ^1 L, R9 {) H
  1734. LDA #$22
    : o# [* k! w! V& _+ I" W, k& b& w
  1735. STA $BB
    * [) U# x) F* W  l
  1736. JSR BULSEL_B_WRITE
    % y6 W  G  K9 x2 g4 b( Z. V
  1737. ( ]" T" M9 _9 ?6 V' J9 r/ b
  1738. LDA #$A7
    - N9 B' {) l1 C. r  ]
  1739. STA $BA& U! D& W% j; z+ M, t# W$ f
  1740. LDA #$22; e' G5 q. u3 e! J
  1741. STA $BB
    : l; Q9 U0 w& |; M  R
  1742. JSR BULSEL_A_WRITE
    . m" M7 U0 i& g* i# _
  1743. RTS' {" p! I$ a0 F+ a& O6 ]; i3 M

  1744. 3 z6 \6 r% p& m" s) g
  1745. / E/ k/ r8 q  ]/ U$ T
  1746. " o: w3 m5 w; r% Z- [+ {
  1747. UP_STRING:
    1 h% E0 s7 t) d9 T" ^, R
  1748. .BYTE $9F,$9A,$805 w4 @6 L+ w9 F' ^4 V/ t
  1749. 4 e: X0 h. g  b. H
  1750. DN_STRING:
    # A* c: u5 O% U7 q- c- u* l
  1751. .BYTE $8E,$98,$80
    8 x1 [" x/ O. s2 C
  1752. * r4 N+ h) `2 R! H5 S& C9 }
  1753. LF_STRING:1 C& ?$ c/ y# T9 `: i
  1754. .BYTE $96,$90,$80
    0 b, A4 X+ h* t7 h3 u

  1755. 2 {) t, V  U5 \% C
  1756. RG_STRING:( ~& E# X5 R& P
  1757. .BYTE $9C,$91,$80
    7 _. b4 D' h* G

  1758. ( _# c- O! C0 c3 U, _# k
  1759. B_STRING:: a4 H/ M% f2 s' Z
  1760. .BYTE $80,$8C,$80# W- D% C( d% s$ o+ {$ D
  1761. ! R4 n' q' H( w
  1762. A_STRING:) o' V8 z* m7 l8 y" E
  1763. .BYTE $80,$8B,$80  S" ?: s9 F+ A* D- g- c7 w
  1764. ; L; J9 [8 q/ Y8 m% S

  1765. ; V" a5 Z* w" D* {% A: F1 x; v
  1766. UP_WRITE:( ]! x4 c) y+ F4 f9 t
  1767. LDX #$00
    ) T1 N! X3 L/ a/ E% o
  1768. UP:' ~7 A1 e* V/ s3 ~% }
  1769. JSR PPUADDR_PROCESS
    2 L9 C+ L! F; ~' ?% C! w$ S
  1770. LDA UP_STRING,X
    ) F& _6 \' v* U! ^0 y
  1771. STA $20075 r8 E+ R# M7 q  l& }+ A7 [
  1772. LDA #$00
    - v& u6 o- m2 ]0 f' d/ }
  1773. STA $2000
    % X3 v# C5 j/ p" F: X% @/ l
  1774. INC $BA+ j1 D1 E- s8 T8 Q& f: z+ _7 x
  1775. INX
    0 F! l3 p5 Q2 v. X5 W8 [% b
  1776. CPX #$034 I1 ]/ l& P9 n; W* W2 z- G; N2 j7 k
  1777. BCC UP
    ; J3 @* V& R5 N7 v' ]6 U
  1778. RTS6 V+ N* q; d( Z) W
  1779. 1 w% m6 v/ Z, _9 m* ?3 r
  1780. DN_WRITE:- d/ D; |& z, N7 S) W% C
  1781. LDX #$00
    % Z) C& I  u$ M$ R* I2 I
  1782. DN:8 E5 t- K0 F, w+ S  r  m
  1783. JSR PPUADDR_PROCESS2 q0 R2 |" j, k9 A& D7 v# }% E
  1784. LDA DN_STRING,X+ a2 M' I  P; ~  \6 B+ B7 U' I
  1785. STA $2007
    5 V2 J3 z! B  [" g% d" e& I/ B
  1786. LDA #$00
    4 j6 s& U  ~1 h+ o
  1787. STA $20003 t7 ?* ?" W& ^$ ]
  1788. INC $BA% s1 H! y3 q3 N2 V" c6 [( _
  1789. INX$ s) g6 ?# k! T0 W' @
  1790. CPX #$03
    ) u' j$ P" j4 F9 g- r5 @7 K
  1791. BCC DN
    $ v% f6 U$ e) X" S
  1792. RTS
    ( G5 k- O; d( l/ t1 B

  1793. 5 r2 C% i* Z1 E8 `. ]# @
  1794. LF_WRITE:+ Z3 W# s. b2 d1 I. r6 d/ \
  1795. LDX #$00
    * i3 N9 F6 v- |
  1796. LF:
    ) S# _; _* h& b
  1797. JSR PPUADDR_PROCESS
    ' H" O  B' L; b8 ~2 c
  1798. LDA LF_STRING,X8 S. U& q( L* e# h8 m3 W
  1799. STA $2007
    2 n8 k9 e, H' \. j9 w
  1800. LDA #$00$ c, H1 a; D# q
  1801. STA $2000
    % f; J4 q0 A4 W: V# Z' _3 U/ T
  1802. INC $BA, C( j# l5 O1 F. m/ E: V$ t
  1803. INX
    ! H/ ]4 s( H. J% n" ^1 }% i9 m
  1804. CPX #$03( Q; A' k0 Z! i5 Y1 l
  1805. BCC LF* @. M4 [7 w) c
  1806. RTS
    - g( y+ A  ~6 s/ U2 L/ q2 e9 g. k
  1807. & R# R" b# j" m) w" W/ r, F. q
  1808. RG_WRITE:9 N7 c" Z4 r* ?5 G
  1809. LDX #$00% B* B4 f2 ^9 \
  1810. RG:4 O0 b- `1 J% U" T& B- ~, s2 z1 }
  1811. JSR PPUADDR_PROCESS
    % p& P, Q2 g5 s. x$ N
  1812. LDA RG_STRING,X0 ^/ X/ `' L. @+ y0 z9 q
  1813. STA $2007: @' `3 O7 W( C, d9 N6 C) x
  1814. LDA #$004 t. A6 c+ ]) v. c+ E5 q
  1815. STA $2000
    ; F' a6 K+ P5 ^. q! k5 E  w4 ~
  1816. INC $BA1 |; I) A2 X4 W6 F# H0 o
  1817. INX, a) k+ k9 w/ g5 {# h( K9 h
  1818. CPX #$03
    / P- L4 r6 t* y6 s' Q; G" c
  1819. BCC RG2 G' \2 Z# Y# c$ t2 R7 K
  1820. RTS4 H- t- M/ w5 I/ M; g
  1821. 2 H. Q: I& r: Y: ]5 f
  1822. B_WRITE:- v6 p* I. R6 a4 i/ _! s# m+ B$ Q
  1823. LDX #$00: y$ \8 S3 n& K
  1824. B:4 L2 ~$ j1 W  R, c) S8 t! m
  1825. JSR PPUADDR_PROCESS. ^: ^6 h- ?! o6 d) p3 \* v
  1826. LDA B_STRING,X. m% B0 ]7 d! q& D& ]
  1827. STA $2007
    * g% p% t* h1 s5 t2 ~# k
  1828. LDA #$00
    % G9 f' p5 G( Q" {9 ~- o. |
  1829. STA $20000 W$ n3 E1 Q8 d- x9 I( e
  1830. INC $BA9 ]% H3 V$ C1 j- ]5 [8 o
  1831. INX. z: ~! [' }4 c$ z$ f. d% f
  1832. CPX #$03) a0 [8 m9 ?: l$ T8 I2 _, N8 c2 v( Q4 ]
  1833. BCC B
    ; `( S: c4 m. g# c
  1834. RTS
    : i! E2 S. z& r  d
  1835.   q) M  \% }  O4 s
  1836. A_WRITE:
    % @" J1 \' L# R7 [! e* u
  1837. LDX #$00
    9 }& o0 \7 ^1 m
  1838. A:
    $ B( x0 _- I% c% W5 i
  1839. JSR PPUADDR_PROCESS
    - h! l) u* _5 j* ^# K6 _( R
  1840. LDA A_STRING,X" L6 y, s$ ]) b
  1841. STA $20077 P( M* p4 B9 Z2 F% z
  1842. LDA #$00! Y4 Y4 S; n( H: w& a
  1843. STA $2000
    & b& V, @4 \7 \* M, B! J% D% z3 s. t
  1844. INC $BA: E- Y; [3 a' [: V( ]/ r7 ?
  1845. INX) H0 E0 P, C6 `' {- d. Y+ a& ]
  1846. CPX #$03
    ; S# J& f3 A9 N1 f( \
  1847. BCC A( ?5 q" ~* |6 D
  1848. RTS. k3 }" g, o4 p. f' P  o9 o3 O
  1849. + `, @. D& }$ W# @

  1850. ; O. L6 a; t& a. b# G9 Y
  1851. UP_PPU:
    / n1 o: D  I* S; N% e; d8 m
  1852. JSR UP_WRITE
    ! X2 V: B/ W% E, C) `8 R- W+ h
  1853. RTS1 M4 P; I. N! c  c4 ?) \

  1854. ! d# R7 c  s; u" b; E: {' x
  1855. DN_PPU:; f  U& w8 L) R4 z, Q. d. X
  1856. JSR DN_WRITE
    : r" m, n. I( v5 n* t
  1857. RTS
    " l0 R5 b6 |$ ]: F( F

  1858. 1 i' }" n+ P3 d9 H
  1859. LF_PPU:
    9 j, t) O8 w/ x( [7 N% k( i" e
  1860. JSR LF_WRITE- ~- K5 A- x1 n& R/ U6 `: Y
  1861. RTS
    & M6 p* Q' Y* g, R  m

  1862. 6 H2 k, F, X: R7 B* m) p% @  i
  1863. RG_PPU:* R" n* \$ l7 K) n* X* S; U! A
  1864. JSR RG_WRITE
    & \9 r% G: \3 ]. o/ H. p
  1865. RTS4 p3 f) L% Q, p' O" y1 g; l8 }
  1866. ) B5 P# w) B! d1 ^' k2 _0 X4 U
  1867. B_PPU:+ y9 |7 `5 _$ X/ {0 E
  1868. JSR B_WRITE; n8 p3 @, v5 w  Y" u" v
  1869. RTS* \& c! ?% ~2 }8 N3 [: M+ ]

  1870. * X( s5 E& b4 H) Y
  1871. A_PPU:/ D  h, M+ _# P3 S& @* F( I4 h
  1872. JSR A_WRITE* D& c  r9 x0 ^& e. ]
  1873. RTS
    8 l; b* I7 j, C* K0 Y* l9 k

  1874. $ o7 ^  I7 J. p

  1875. 2 n, {; `2 Y. d* Y0 \" r5 c
  1876. PAGESELECT:8 P- D( q2 r5 H7 M: |+ o( J$ J
  1877. PAGE0:
    9 _6 H: E- Z# Q% s) D
  1878. LDA $07AA
    % J( P- a1 `1 F* S! @  S5 n8 n) _7 X+ b
  1879. CMP #$00- e$ ^# J3 B% C/ H
  1880. BNE PAGE1
    + o0 c0 C. g+ E3 j
  1881. 5 |  {4 h+ y# C: D( J1 U$ f; m
  1882. PAGE_00:$ H; m* H' \+ j& M5 F6 s8 C% C
  1883. JSR BULSEL_PPU$ L# \, w/ f5 x4 A8 Q
  1884. RTS" ]0 _! l# Z* P/ g9 T+ d
  1885. # Z2 ~: ~+ l9 o* c2 U
  1886. PAGE1:
    $ ?) F+ o( i( `- Y% ~
  1887. LDA $07AA
    & X2 V+ H5 l6 D* [: X$ E
  1888. CMP #$01
    ) Q( w% q; @; P  _  u  O: i3 ]
  1889. BNE PAGE2' {" r0 u7 _6 H/ E
  1890. , h6 [/ b/ X: u8 C
  1891. PAGE_01:9 X/ i5 Q" y; E5 g: q7 i
  1892. JSR INVINC_PPU( K7 Y8 {' D( w! [
  1893. JSR LIFELC15_PPU
    - ~; a) i  z: [1 h  m9 X! v0 ]
  1894. JSR DOUCON_PPU
    + V! i: E% f  A' f/ a. ]2 T% C. m
  1895. JSR KILLON_PPU: B. |0 B: O+ K$ O9 {
  1896. JSR SKYFLY_PPU4 C' j$ v8 i" }0 D- D- P2 }2 c, I( Y
  1897. JSR LIFELOW_PPU
    8 G" l% x. w) W+ C; d4 A) N- U
  1898. RTS$ s% K: ]& B6 Q) P$ [

  1899. & G7 t. `. o* _% n$ q: h
  1900. PAGE2:
    2 |4 c1 Y9 `- i' Q+ ?" I0 L
  1901. LDA $07AA
    % T" @7 M, c. M' i
  1902. CMP #$02) Y# ?7 m: @7 P# W, S! s6 |
  1903. BNE PAGE3
    ) W9 d3 v/ L( h3 e2 }7 n

  1904. 8 C$ N" c% p8 ^- \- W
  1905. PAGE_02:) r" G4 }( l' C8 D( e
  1906. JSR BULADD_PPU
    / L. h& O8 T2 R  R# a0 l; S9 d" t
  1907. JSR SKINGE_PPU. d& [# \. D) g5 ~
  1908. JSR BULMIX_PPU/ J7 Q+ N1 p4 K
  1909. JSR ENELOC_PPU
    9 y7 q) ?3 X  A6 ?5 ^! l& v; q
  1910. JSR FOCFUL_PPU$ s. q+ n* c$ i' R! C6 I8 |" B7 W
  1911. RTS# I9 T" h9 M' W8 J7 N5 l+ o5 I

  1912. " X6 M) Y1 F% Y9 l! [) a
  1913. PAGE3: % w) m8 R; x( C& e- o
  1914. LDA $07AA
    7 N2 T6 s1 t2 B/ ~# o; A5 A$ `3 x
  1915. CMP #$032 e5 _5 i& {7 N! p( A  y1 W7 e
  1916. BNE PAGE4
    3 K% Y; y" t3 G% A$ F- j( ]

  1917. 7 J9 {0 N3 y; G7 b4 `! f& Y
  1918. PAGE_03:, B  v0 \7 t+ B/ x
  1919. JSR BULCON_PPU8 z; Z. O8 Y) H
  1920. JSR SPEBUL_PPU4 l0 H+ V+ b9 e+ O. m) I$ Z
  1921. JSR CLEALL_PPU7 _( G6 |4 a: D3 U+ b5 Q  f: B
  1922. JSR HARDMODE_PPU
    9 S. }1 y  U5 @+ A/ e
  1923. JSR B_TO_JMPSTG_PPU2 N/ T0 R, S# n- f
  1924. JSR A_TO_PLAMOD_PPU0 L! B9 x" O# \! |
  1925. RTS
    2 d3 p, f% U: l/ b3 K5 H  ^# l
  1926. # U3 W8 ^+ C8 y6 s' l  ]
  1927. PAGE4:
    ) c' h) B1 ]+ A4 K% ~
  1928. LDA $07AA
    / N( O  ^7 G1 o* |3 @: _
  1929. CMP #$04  |. `. m6 I+ s4 h2 M* V
  1930. BNE PAGERTS) Q* `- x' F, \& V6 D

  1931. 3 i% d/ ~& p/ O( g
  1932. PAGE_04:
    3 Q4 D8 y" x0 ?# I% r, E& u
  1933. JSR MOVSPE_PPU
    , I: K$ ?, U) g. c, \+ k4 s
  1934. JSR UNLJMP_PPU! u' U# w/ [0 I* p8 @5 C2 _( Q6 z: s4 i
  1935. JSR DESTRO_PPU) G9 p5 s5 w' K4 j4 _. u* L
  1936. JSR EQUBUL_PPU
    / c0 H9 F& `1 N( x3 o  b) V
  1937. JSR MOVESPEED_PPU
    # l2 S8 b- b  d) ]- o+ W
  1938. PAGERTS:
    8 s7 X8 B- N" X% }
  1939. RTS
    " [" l* G3 T2 q  l/ j$ k2 b! U
  1940. & M- W; l/ c, x! ?
  1941. $ A/ b! Q4 d! q. {9 c) w
  1942. PLAYER_01_STRING:
    : A+ f- k) L9 K; @! W7 _
  1943. .BYTE $9A,$96,$8B,$A3,$8F,$9C,$80,$81,$82,$809 K  s/ u9 a0 t) _$ x& L& a
  1944. ! k7 z- L3 T, w9 R1 Z! s

  1945. , z1 C+ o% E/ @- t$ I
  1946. PLAYER_01_WRITE:( Z" u) i$ {, w/ g" I
  1947. LDX #$00
    ; B; z; Q, s" p/ Q$ J4 A
  1948. PLAYER_01:
    0 D" t+ u- w0 Y; o. ~
  1949. JSR PPUADDR_PROCESS
      l6 k% A/ ?6 y3 r  n
  1950. LDA PLAYER_01_STRING,X
    , r; y$ n* b" b8 p& i6 v3 u, }
  1951. STA $2007
    0 T, j: R! l) f
  1952. LDA #$00
    7 l# b. W( K" I/ U8 _; {
  1953. STA $2000
    # f4 S; r% i% Q  j  Z
  1954. INC $BA
    + a, X: t) P: Y. L; M% ^3 ?9 F% ^
  1955. INX
    , ^1 @8 r% t: L! M- m" M! E
  1956. CPX #$0A) |9 N. [# b3 ]2 j
  1957. BCC PLAYER_01
    . U8 a4 \/ C9 c4 v2 R$ X7 }
  1958. RTS
    $ T+ @: c4 O3 M. x1 R* X
  1959. ) J$ z2 ]1 s; n6 _8 p+ e5 X) ?$ Y
  1960. PLAYER_01_PPU:/ T! \) t9 a6 \5 j  D
  1961. LDX #$00
    ) V0 @$ H! H4 A4 I
  1962. LDA #$64
    ! N2 W5 z8 j) q$ C! \' U
  1963. STA $BA
    $ d! V) }. {: Y6 ^) K
  1964. LDA #$20) s) G* a$ K6 F1 z* v* @9 I
  1965. STA $BB0 a$ K+ L/ l6 A& ]
  1966. JSR PLAYER_01_WRITE
    " ?5 N7 F! |  [0 P
  1967. RTS
    4 y9 e5 g) P' ?" I- s! K2 u$ s
  1968. * J) L/ X7 W" I8 L, h
  1969. PLAYER_02_STRING:
    . d9 j3 `. _4 t2 f5 O4 R/ m
  1970. .BYTE $9A,$96,$8B,$A3,$8F,$9C,$80,$81,$83,$80  c! I- ]9 C7 F- L7 v4 ~8 a; `

  1971. 2 f1 a* @1 V* q3 ~

  1972. ( c1 t  @1 R  E! R# u  A. H
  1973. PLAYER_02_WRITE:4 j& T6 q# j) Y4 S7 e
  1974. LDX #$003 f' _* c8 V! N% _+ ]& w& d
  1975. PLAYER_02:$ ^, g" b* b1 b) J1 \6 V
  1976. JSR PPUADDR_PROCESS* u! q/ M$ `+ v6 @$ [
  1977. LDA PLAYER_02_STRING,X8 x/ ?7 w) c. C9 }9 F
  1978. STA $2007" D0 F! J8 f/ A' j6 Q: D2 L
  1979. LDA #$006 Q5 c% G5 c4 z+ {3 t
  1980. STA $2000
    : D4 T% j% _* ~3 P* ^
  1981. INC $BA
    $ C% q9 L2 ]9 R2 l/ d' F  G
  1982. INX0 F9 c9 _5 d& E- }
  1983. CPX #$0A3 \+ [. N* h9 J/ P) q7 n0 ]
  1984. BCC PLAYER_026 |6 v/ k- D/ k
  1985. RTS
    7 H& B- z& `, O6 B5 L

  1986. ' ~5 k3 ^$ |9 Q9 g) }
  1987. PLAYER_02_PPU:
    4 ^, G$ A1 ]  |- q* p$ t. F
  1988. LDX #$00
    7 w  ]+ s* ^7 i; U
  1989. LDA #$733 N( v/ ]3 @$ U8 r7 B# i8 U" D$ s- `
  1990. STA $BA
    / F. R7 S5 R& P5 Y8 V
  1991. LDA #$20
    ) @  I+ }) _9 w/ o" B) i
  1992. STA $BB: n. R( B/ y, P5 |
  1993. JSR PLAYER_02_WRITE- q. E- f; t1 F7 {. n) F5 }
  1994. RTS
    ) R4 \) r$ |' j  g9 \) V. p  f

  1995. 4 V" P# |3 J1 z  H( Q2 z9 o
  1996. PPUADDR_PROCESS:. ^- w7 E2 X  r
  1997. LDA $BB# V7 n2 [  e6 U% `4 q5 D* p% c! k
  1998. STA $2006
    * P6 S  @+ `# a$ b* F  e% t7 K
  1999. LDA $BA
    + i& U/ E8 p$ ]$ p$ _
  2000. STA $2006) D# n0 R4 A. R
  2001. RTS
    - [' g# w% a+ b" v3 T

  2002. ( r% V+ |% h8 b# o
  2003. 6 M, ?. w& h- @

  2004. , X9 r4 k8 E. ?5 J3 y
  2005. ONE_STRING:1 a8 _% j6 f. _1 x/ A
  2006. .BYTE $99,$98,$8F
    3 a# A7 y3 s& z! H

  2007. # @: B, j0 D9 F' w0 X# u) y
  2008. TWO_STRING:
    1 w! D5 S, Z& j; k5 o" G
  2009. .BYTE $9E,$A1,$99( z; I* i  J8 }; q3 D- U8 U

  2010. $ c8 t% o! Y! D; U# X  q; K0 E( B
  2011. ONE_TWO_PPU:
    / y7 y: J  p1 y: c" Q
  2012. BNE ONEWR- [% _- I6 m  z- }
  2013. TWOWR:/ S+ g7 K5 M, @8 a; H
  2014. JSR PPUADDR_PROCESS* W0 C% [8 i5 Z+ V  `, j
  2015. LDA TWO_STRING,X+ L9 c" N$ R  R& b2 Q$ Q# v
  2016. STA $2007. _. W' V+ f: Z7 O3 i" |: i* @# _' k% p
  2017. INC $BA
    . o. J$ `# }# z9 M! Y) \7 c* B
  2018. INX# Z1 @3 x" x5 u! R& k" q6 r
  2019. CPX #$03' D! m% F3 h) p- V
  2020. BCC TWOWR/ y; J# M) s% X4 d( H: a
  2021. RTS
      V% e; \5 w# m+ J0 J  X8 v
  2022. ONEWR:
    4 e( E4 V0 \0 M$ P; f8 ^& X9 y
  2023. JSR PPUADDR_PROCESS
    / v$ F" E+ g/ B2 K: x7 \2 C& ?
  2024. LDA ONE_STRING,X
    & I0 S, b$ V1 ~+ C" j# N) S
  2025. STA $2007
      f3 r, t3 q! g# y8 ^
  2026. INC $BA* _: a6 n0 O" ^; X
  2027. INX
    ) {. B  O6 c& i$ x$ E
  2028. CPX #$03  q0 {; b$ L; v1 W
  2029. BCC ONEWR
      o6 ^8 S% `( W& G' B0 Q
  2030. RTS
    2 j; m  _+ I4 n0 ^! f
  2031. % x9 w: ~0 S1 I$ _  E4 c2 p
  2032. MOVESPEED_STRING:! M: o$ K; h% G' G0 F, y
  2033. .BYTE $97,$99,$A0,$8F,$80,$9D,$9A,$8F,$8F,$8F,$800 @, t: ?/ L6 b, ~" `- T

  2034. 0 S' z; I: x+ H8 W3 g8 L4 s. L" {
  2035. " J. `1 m  D( k( ?3 ~! \4 t# `$ B
  2036. MOVESPEED_WRITE:! b  g8 I0 F* T- V6 B! q' \' S9 u7 g
  2037. LDX #$00
    " R! [. c. H' m
  2038. MOVESPEED:
    7 R+ {" `( M8 d* X4 I2 I
  2039. JSR PPUADDR_PROCESS
    5 v9 h% L6 K. |: T+ J/ C$ Z* e! M
  2040. LDA MOVESPEED_STRING,X, G0 c5 y% i' L" _
  2041. STA $2007
    3 E# R) q' `% K$ k9 r: n
  2042. LDA #$00
    ' l& i; P$ D8 W9 {( ?9 u
  2043. STA $2000. I, M  @2 f4 T1 H
  2044. INC $BA2 ~* k5 k' A2 ]2 b5 t
  2045. INX
    ' A$ y; s; N% x: c# c
  2046. CPX #$0B+ N& d8 V& e/ ^
  2047. BCC MOVESPEED% d9 ]' m' w& \- k# m( z9 p
  2048. RTS2 d" J1 C6 L- j
  2049. 2 t* h% [0 U) C; D$ ]
  2050. MOVESPEED_PPU:
    % i7 Q1 `  c* O# [
  2051. LDX #$00
    - ]3 G2 Z. H  g
  2052. LDA #$AA" U) K; [2 }7 K+ N2 x' R) L4 O4 m
  2053. STA $BA' e5 Q9 p3 p4 j' j( ]! {4 T
  2054. LDA #$22& W7 S, }7 T3 r/ L4 y" c
  2055. STA $BB
    . b: E! j  J$ ]
  2056. JSR MOVESPEED_WRITE6 N& Z5 z& P! k$ L  _
  2057. LDA $7003
    " Z8 a4 g( `+ S$ W
  2058. CLC. }6 u& e# R7 s* \: _6 H# Y; v+ S  |
  2059. ADC #$82
    1 a4 G1 M3 m0 b5 Q0 H
  2060. STA $2007. I( c* e6 ^; ?. Z& U2 \5 K
  2061. RTS% A/ K! Q" E3 l
复制代码

本帖子中包含更多资源

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

x

评分

1

查看全部评分

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

签到天数: 549 天

[LV.9]以坛为家II

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

签到天数: 7 天

[LV.3]偶尔看看II

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

签到天数: 2060 天

[LV.Master]伴坛终老

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

签到天数: 3087 天

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

签到天数: 2207 天

[LV.Master]伴坛终老

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

签到天数: 135 天

[LV.7]常住居民III

发表于 2016-11-21 09:59:17 | 显示全部楼层
这东西找了好久勒,谢谢!!
; p$ i0 f3 ^/ @% |$ B9 R
[发帖际遇]: wjb19780515 发帖时在路边捡到 5 个 柠檬,偷偷放进了口袋. 幸运榜 / 衰神榜

签到天数: 2366 天

[LV.Master]伴坛终老

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

签到天数: 2203 天

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

使用道具 举报

签到天数: 810 天

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

使用道具 举报

签到天数: 227 天

[LV.7]常住居民III

发表于 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-6-7 07:45 , Processed in 1.117188 second(s), 37 queries , Gzip On.

Powered by Discuz! X3.4

© 2001-2023 Discuz! Team.

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