home *** CD-ROM | disk | FTP | other *** search
/ SeeIn AO / ALICE-CD.BIN / ‚g‚s‚l‚k / update / tt_fix.lzh / TT_FIX / SRC_FIX.LZH / MAZE06.ADV < prev    next >
Text File  |  1998-01-06  |  10KB  |  334 lines
  1. ;
  2. ;  ô¼É_ôsÄs for System3.5  "û└ï{éUèK"
  3. ;
  4. ;  D01: ╜═▐┘:
  5. ;  D02: ╩▌─▐┘
  6. ;  D03: ╬▐└▌
  7. ;  D08: └╢╫
  8. ;
  9.   ~BGM 20:
  10.   !PAGE:#MAZE06.ADV!!MZ6:1!!MAZE:6!
  11.   ~Y25 0:~Y25 64:~Y25 1:~Y25 77:~Y25 9:
  12.   {MAP=1:!MAP:0!~Y7 0:~GA 45:~Y32 1:&#MAZE06.ADV:}
  13.   
  14.   {RND=0:@╖¼▌╠▀:}
  15.   {RND=10:@╛▌─│:}
  16.   {RND=11:@║╧▌─▐:}
  17.   {RND=2:@─▐╕:}
  18.   {RND=3:@╡─╝▒┼:}
  19. *MAZE:
  20.   {(X=29)*(Y=17):@╔╬▐╪:}
  21.   {(X=53)*(Y=68):@╝└═:}
  22.   {(X=23)*(Y=32):@╥├▐:}
  23.   {(X=43)*(Y=15):@▄░╠▀:}
  24.   {(X=53)*(Y=37):@╜═▐┘:}
  25.   {(X=59)*(Y=25):@▓╝:}
  26.   {(X=53)*(Y=64):@─╦▐╫:}
  27.   {(X=14)*(Y=31):@╢▐░└:}
  28.   {(X=62)*(Y=28):@LOOM1:}
  29.   {(X=68)*(Y=28):@LOOM2:}
  30.   {(X=62)*(Y=34):@LOOM3:}
  31.   {(X=69)*(Y=34):@LOOM4:}
  32.   {(X=23)*(Y=33):@├▐┘├▐┘:}
  33.   {(X=1)*(Y=31):!D08:1!@└╢╫:}
  34.   {(X=1)*(Y=28):!D08:2!@└╢╫:}
  35.   {(X=1)*(Y=25):!D08:3!@└╢╫:}
  36.   {(X=1)*(Y=22):!D08:4!@└╢╫:}
  37.   {(X=7)*(Y=23):!D08:5!@└╢╫:}
  38.   {(X=23)*(Y=35):!D08:6!@└╢╫:}
  39.   {(X=53)*(Y=65):!Y:63!@NO:}
  40.   {(X=7)*(Y=30):@╩╞░:}
  41.   {(X=45)*(Y=19):@╬▐└▌:}
  42.   ~Y32 0:&#MAZE06.ADV:
  43.  
  44. *╖¼▌╠▀:
  45.   ~Y34 1:&#╖¼▌╠▀.ADV:
  46. *╛▌─│:{╩»╛▓╪┬\0:{╗▐║=39:!╩»╛▓╪┬:0!}!╗▐║:╗▐║+1!}
  47. *╛▌─│2:
  48.   Y4,7:{RND=MONS:Y4,7:}
  49.   {RND=1:!MONS:23!}{RND=2:!MONS:27!}{RND=3:!MONS:40!}{RND=4:!MONS:51!}
  50.   {RND=5:!MONS:53!}{RND=6:!MONS:62!}{RND=7:!MONS:63!}
  51.   ~Y34 1:&#FIG1.ADV:
  52. *║╧▌─▐:
  53.   Y1,0:
  54.   {(X=11)*(Y=25)*((╤╖=6)+(╤╖=7)):@╩▌─▐┘:}
  55.   'é╞é¡é╔ò╧éφé┴é╜Åèé═é╚éóéµéñé╛üB'R
  56.   {(XX=X)*(YY=Y)*(╤╖╤╖=╤╖):@╗╢▐╜:}!XX:X!!YY:Y!!╤╖╤╖:╤╖!!PC98:0!
  57.   @NO:
  58. *╗╢▐╜:
  59.   {PC98=5:@NO:}!PC98:PC98+1!
  60. *╗╢▐╜A:
  61.   'âéâôâXâ^ü[é≡ÆTé╡é▄é╖é⌐üH'R
  62.   $NO$ÆTé│é╚éó$
  63.   $╛▌─│2$ÆTé╖$
  64.   ]@╗╢▐╜A:
  65. *NO:~K_CLR:~Y32 1:&#MAZE06.ADV:
  66. *NO2:~BGM 20:~Y7 0:~Y9 1:~Y9 0:~GA 45:~K_CLR:~Y32 1:&#MAZE06.ADV:
  67. *├▐┘├▐┘:
  68.   !Y:31!@NO:
  69. *╔╬▐╪:
  70.   Y1,0:
  71.   'Åπé╔ôoéΘèKÆié¬éáé╠é▄é╖üB'R
  72.   $╔╬▐┘┘$ôoéΘ$
  73.   $NO$ôoéτé╚éó$
  74.   ]@╔╬▐╪:
  75. *╔╬▐┘┘:
  76.   'èKÆié≡ôoéΦé▄é╖üB'R
  77.   ~Y34 0:~Y30 5:~Y31 0:!MAP:1!Y2,0:!╗▐║:0!!╩»╛▓╪┬:100!
  78.   &#MAZE05.ADV:
  79. *╝└═:
  80.   Y1,0:
  81.   'ë║é╓ì~éΦéΘèKÆié¬éáéΦé▄é╖üB'R
  82.   $╡╪┘$ì~éΦéΘ$
  83.   $NO$ì~éΦé╚éó$
  84.   ]@╝└═:
  85. *╡╪┘:
  86.   'èKÆié≡ì~éΦé▄é╖üB'R
  87.   ~Y34 0:~Y30 7:~Y31 2:!MAP:1!Y2,0:!╗▐║:0!!╩»╛▓╪┬:100!
  88.   &#MAZE07.ADV:
  89. *╩╞░:
  90.   Y1,0:
  91.   'é╚é±é╛é▒é╠î⌐ÆúéΦé╠ânâjü[é═üAïÅû░éΦé╡é─éΓé¬éΘüB'R
  92.   'é┼éαüAé¿é⌐é░é┼Åòé⌐éΘé╚üB'~A:
  93.   'ânâjü[üué«éñü@é«éñü@é«éñü@üEüEüEüBüv'~A:
  94.   
  95.   'ânâjü[üué╖éñü@é╖éñü@üEüEüBüv'R
  96.   'ânâjü[é¬ÉQé─éóéΘüB'@NO:
  97. *╥├▐:
  98.   Y1,0:
  99.   {╧╙╔╔╢╖▐=1:
  100.     'ûéò¿é╠î«é≡Ägé┴é─Æåé╔é═éóéΦé▄é╖üB'R!Y:34!
  101.     {▒─╫▌└=0:
  102.       'É║ü@üuÆNé╚é╠üEüEÄäé≡Åòé»é─é¡éΩéΘé╠üEüEüBüv'R
  103.       'Æåé⌐éτÉ║é¬ò╖é▒éªé─ùêéΘüB'~A:
  104.       X1:'üuìíüAÅòé»é─éΓéΘé╝üBüv'R
  105.       'é▒é╠Æåé╔Éßòùé┴é─Äqé¬éóéΘé╠é⌐éαé╡éΩé╚éóüB'~A:
  106.       !MONS:33!~Y34 1:&#FIG1.ADV:}
  107.     @NO:}
  108.   'é▒é╠öαé╔é═üAî«é¬è|é⌐é┴é─éóé─ôⁿéΘÄûé¬Åoùêé╚éóüBüiûéò¿é╠î«üj'R
  109.   'é±üAÆåé⌐éτë╜é⌐ÿbé╡É║é¬ò╖é▒éªéΘé╝üB'~A:
  110.   
  111.   'É║ü@üué╗é▒é╔ÆNé⌐éóéτé┴é╡éßéΘé±é┼é╖é⌐üH'R
  112.   'ü@ü@ü@Ääé═üAê½éóûéò¿é╔é▒é▒é╔ò┬é╢ì₧é▀éτéΩé─é╡é▄é┴é╜é±é┼é╖üB'R
  113.   'ü@ü@ü@é¿èΦéóé╡é▄é╖üBÅòé»é─ë║é│éóüBüv'R
  114.   'öⁿé╡éóÉ║é¬Æåé⌐éτò╖é▒éªé─ùêéΘüB'~A:
  115.   !Y:31!@NO:
  116. *▄░╠▀:
  117.   Y1,0:
  118.   'âÅü[âvé╡é▄é╖üB'!X:53!!Y:30!@NO:
  119. *╡─╝▒┼:
  120.   Y1,0:
  121.   ~Y7 0:WZ 0,0:~GA 337:~GA 227:WZ 0,1:
  122.   'éφü[ü[ü[ü[ü[ü[ü[ü[ü[ü[üB'R
  123.   'ë┤é═üAô▐ùÄé╠ÆΩé╔ùÄé┐é─ìsé┴é╜üB'~A:
  124.   !HP:1!~Y9 0:!MAP:1!
  125.   !X:30!!Y:20!&#MAZE06.ADV:
  126. *─▐╕:
  127.   Y1,0:
  128.   {╣▐─▐╕=1:
  129.     'ë≡ô┼ì▄é¬î°éóé─éóéΘé»é╟üAÅ¡é╡âsâèâsâèé╞é╖éΘüB'@NO:}
  130.   X1:'üué«éφé┴üEüEüEüEüBüv'!HP:1!~Y9 0:~A:
  131.   !Y:Y+1!
  132.   'æ½î│é⌐éτæ╠Æåé≡ô┼é¬ï∞é»ÅäéΦéαé╠é╖é▓éóâ_âüü[âWé≡Ä≤é»é╜üB'R
  133.   'ë┤é═üAÄvéφé╕ö≥é╤æ▐éóé╜üB'~A:
  134.   @NO:
  135. *╜═▐┘:
  136.   Y1,0:
  137.   'éφé┴üEüEüEé╖é╫éΘü[ü[ü[ü[éúüié┬éΘé┬éΘé┬éΘé┬éΘé┬éΘüj'R
  138.   {╤╖=6:@LOOP╤╖6:}
  139.   {╤╖=2:@LOOP╤╖2:}
  140. *LOOP╤╖6:
  141.   {Y=30:@╜═▐┘OUT:}
  142.   !Y:Y-1!~Y37 0:@LOOP╤╖6:
  143. *LOOP╤╖2:
  144.   {Y=57:@╜═▐┘OUT:}
  145.   !Y:Y+1!~Y37 0:@LOOP╤╖2:
  146. *╜═▐┘OUT:
  147.   'é╙éúüAéΓé┴é╞Ä~é▄é┴é╜üB'R
  148.   @NO:
  149. *▓╝:
  150.   Y1,0:
  151.   {▓╝B=1:@NO:}
  152.   !D01:63!
  153. *▓╝LOOP1:
  154.   {D01=59:'é░é┴üAÉ╬é¬öùé┴é─ùêé╜üIüI'!╤╖:0!@▓╝LOOP2:}
  155.   ~Z D01,25:~Y33 17:~Z D01-1,25:~Y33 62:~Y37 0:!D01:D01-1!@▓╝LOOP1:
  156. *▓╝LOOP2:
  157.   {X=45:!D01:44!@▓╝LOOP3:}
  158.   !X:X-1!~Z X+1,25:~Y33 62:~Z X+2,25:~Y33 17:~Y37 0:@▓╝LOOP2:
  159. *▓╝LOOP3:
  160.   {D01=50:@▓╝LOOPOUT:}
  161.   !D01:D01+1!~Z D01,25:~Y33 17:~Z D01+1,25:~Y33 62:~Y37 0:@▓╝LOOP3:
  162. *▓╝LOOPOUT:
  163.   ~Z 51,25:~Y33 17:~Z 59,25:~Y33 60:~Z 45,25:~Y33 16:@NO:
  164. *─╦▐╫:
  165.   Y1,0:
  166.   {╦╨┬╔╢╖▐=1:@─╦▐╫OP:}
  167.   'é▒é╠öαé═üAî«é¬é⌐é⌐é┴é─éóé─ôⁿéΘÄûé¬Åoùêé╚éóüBüiöΘûºé╠î«üj'R
  168.   !Y:63!@NO:
  169. *─╦▐╫OP:
  170.   'ë┤é═üAöΘûºé╠î«é≡Ägé┴é─öαé≡èJé»é╜üB'~A:
  171.   'üiâKâ`ââüj'R
  172.   !Y:66!@NO:
  173. *╢▐░└:
  174.   Y1,0:
  175.   {├─╫╛▐╫┴▌=1:~Z 14,31:~Y33 17:@NO:}
  176.   !X:15!!MONS:22!~Y34 1:&#FIG1.ADV:
  177. *LOOM1:
  178. *LOOM2:
  179. *LOOM3:
  180. *LOOM4:
  181.   Y1,0:
  182.   {╒╖╢╛▐=0:@╒╖╢╛▐0:}
  183.   {╒╖╢╛▐=2:@╒╖╢╛▐2:}
  184.   ~Y34 1:WZ 0,0:~GA 337:~GA 280:WZ 0,1:
  185.   'ë┤é═üAöαé≡èJé»é╜é¬é▒é╠òöë«é╔é═üAÆNéαéóé╚é⌐é┴é╜üB'~A:
  186.   @NO2:
  187. *╒╖╢╛▐0:!╒╖╢╛▐:1!
  188.   ~Y34 1:~Y9 2:~BGM 17:
  189.   ~Y40 1:~GA 338:~GA 234:~GA 414:~Y40 0:
  190.   'ë┤é═üAòöë«é╔ôⁿéΘé╚éΦé╞é±é┼éαé╚éóî⌡îié╔Åoë∩é┴é╜üB'R
  191.   'ÅXéóë÷ò¿é¬ôVêΣé⌐éτÆ▌é│éΩé╜Å¡Åùé≡éóé╜é╘é┴é─ùVé±é┼éóéΘüB'~A:
  192.   
  193.   'ë÷ò¿ü@üué┘éΩüAé«éóé«éóé╞üEüEé¬é═é═é═üB'R
  194.   'ü@ü@ü@ü@Élè╘é╠Åùé═üAé╖é«ïâé¡é⌐éτé¿éαé╡éδéóé╠éúüB'R
  195.   'ü@ü@ü@ü@ìíôxé═üAÉlÄQé┼éαôⁿéΩé─éΓéδéñé⌐üBüv'~A:
  196.   
  197.   'Åùé╠ÄqüuéóéΓüAéΓé▀é─üEüEâoâJüIüIüv'R
  198.   'òKÄÇé┼Æ∩ìRé╖éΘÅùé╠Äqé╛é¬üAö¢éτéΩé─éóé─é═Æ∩ìRéαÅoùêé╚éóüB'R
  199.   'éµé╡üAé▒é▒é═Åòé»é─éΓéΘé⌐üB'~A:
  200.   
  201.   X1:'üué¿éóüAé╗é▒é╠âéâôâXâ^ü[üBüv'~A:
  202.   
  203.   'ë÷ò¿ü@üué░é┴üAÉφÄmé╛é║üB'R
  204.   'ü@ü@ü@ü@é▒é±é╚é¿éαé┐éßé╔é⌐é▄é┴é─éóé─ÄEé│éΩé╜éτé╜é▄éτé±é║üBüv'R
  205.   'ë┤é¬é╖é▓é▌é≡ùÿé⌐é╣é─ô{û┬éΘé╞âéâôâXâ^ü[é═üAé╖é«é╔ôªé░Åoé╡é╜üB'R
  206.   'éñü[é±üAéáé┴é»é╚éóé╝üB'~A:
  207.   ~BGM 16:~GA 235:
  208.   'Éßòùü@üuÅòé»é─ë║é│é┴é─éáéΦé¬é╞éñé▓é┤éóé▄é╖üB'R
  209.   'ü@ü@ü@ü@ÄäüAÉßòùé╞éóéóé▄é╖üBüv'R
  210.   'é╗é╠Äqé═üAÆÜÅdé╔ë┤é╔êÑÄAé≡é╡é╜üB'~A:
  211.   'é╗éñé⌐üAé▒é╠Äqé¬Éßòùé│é±é⌐üB'R
  212.   'ë┤é═üAéΓéµéóé│é±é⌐éτé╠é▒é╞é├é»é≡é╗é╠Éßòùé┴é─Äqé╔ÿbé╡é╜üB'~A:
  213.   'Éßòùü@üuéªé┴üAéΓéµéóùlé¬î─é±é┼éóé╜é┴é─üB'R
  214.   'ü@ü@ü@ü@é╟éñé╡é╜é╠é⌐é╡éτüAéΓéµéóùlüEüEë╜é⌐ò¬é⌐é┴é╜Äûé┼éαüEüEüBüv'~A:
  215.   X1:'üué±üAò¬é⌐é┴é╜é┴é─ë╜é¬üHüH'R
  216.   'ü@ü@ü@ü@ü@îNé╜é┐é═üAéóé┴é╜éóë╜Ä╥é╚é±é╛üHüv'~A:
  217.   'Éßòùü@üuÄäé═üAéié`éoé`émé╠ŽîRéµéΦöhî¡é│éΩé╜öEÄ╥é┼é╖üBâXâpâCé╞éαéóéó'R
  218.   'ü@ü@ü@ü@éáé┴üAé╡é▄é┴é╜üIé▒éΩé═üAÆNé╔éαÿbé╡é╜éτéóé»é╚é⌐é┴é╜é±é╛üBüv'R
  219.   'Ådæσé╚öΘûºé≡îyé¡ÿbé╡é─é╡é▄é┴é╜éτé╡é¡Éßòùé═üAâIâìâIâìé╞é╡é─éóéΘüB'~A:
  220.   'Éßòùü@üuéΓéµéóé│é±é╔é═üAÄäé¬ÿbé╡é╜é┴é─Äûé═üAöΘûºé╔é╡é─éαéτéªé▄é╖üH'R
  221.   'ü@ü@ü@ü@é╦éÑé╦éÑüAé¿èΦéóé┼é╖üBüv'~A:
  222.   X1:'üuîNÆBé¬Æ▓é╫é─éóéΘÄûé≡ï│éªé─é¡éΩé╜éτû┘é┴é─éóé─éáé░éµéñüBüv'R
  223.   'é╞é╔é⌐é¡éié`éoé`émé╠âXâpâCÆBé¬Æ▓é╫éµéñé╞é╡é─éóéΘÄûé¬ïCé╔é╚éΘüB'~A:
  224.   'Éßòùü@üuéφé⌐éΦé▄é╡é╜üAé¿ÿbé╡é▄é╖üBé┼éαÆNé╔éαôαÅÅé┼é╖éµüB'R
  225.   'ü@ü@ü@ü@é▒é╠ô¼É_ôsÄsé╔é═üAöΘûºé¬éáéΘé±é┼é╖üBùáé┼ë╜é⌐é¬ìsé╚éφéΩé─éΘ'R
  226.   'ü@ü@ü@ü@é╠é═üAèmé⌐é╚é±é┼é╖üBüv'~A:
  227.   'Éßòùü@üué▒é╠ô¼É_æσë∩é╔ÅoÅΩé╡é╜ÉφÄmé╗é╡é─âpü[âgâiü[ÆBé═üAé┘é╞é±é╟é¬'R
  228.   'ü@ü@ü@ü@ìíüAìsò√òsû╛é╔é╚é┴é─éóé▄é╖üB'R
  229.   'ü@ü@ü@ü@é╗éΩé╔ë╜é╠É╢ÄYéαé╡é─éóé╚éóé▒é╠ôsÄsé¬öNé╔êΩôxé╠ô¼É_æσë∩é╛é»é┼'R
  230.   'ü@ü@ü@ü@é▒éΩé┘é╟ö╔ëhé╖éΘé╞éóéñé╠éαôΣé┼é╖üBüv'~A:
  231.   'Éßòùü@üué╞é╔é⌐é¡ë║é╠èKé╔öΘûºé¬éáéΦé╗éñé╚é±é┼é╖é¬üEüEüB'R
  232.   'ü@ü@ü@ü@ë║é╠èKé╓ì~éΦéΘümöΘûºé╠î«üné≡éΓé┴é╞ÄΦé╔ôⁿéΩé╜é╞Ävé┴é╜éτ'R
  233.   'ü@ü@ü@ü@âéâôâXâ^ü[é╔ò▀é▄é┴é─é╡é▄é┴é─üAé▒é╠ùLéΦùlé╚é╠üBüv'~A:
  234.   X1:'üué╗é╠öΘûºé╠î«é═üAé╟éñé╡é╜é±é╛üHüv'~A:
  235.   'Éßòùü@üuÄ¥é┴é─é▄é╖éµüAë÷ò¿é╔î⌐é┬é⌐éτé╚éóéµéñé╔ëBé╡é─éóé▄é╡é╜é⌐éτüB'R
  236.   'ü@ü@ü@ü@Åùé╠Äqé═üAëBé╖Åèé¬æ≥ÄRéáéΘé╠üBüv'~A:
  237.   'Éßòùü@üué╛é▀éµüAéóé¡éτû╜é╠ë╢Élé╠ïMò√é╔é┼éαé▒é╠î«é═üAôné╣é╚éóéφüB'R
  238.   'ü@ü@ü@ü@é▒é╠î«é═üAéΓéµéóùlé╔ô═é»é╚éóé╞éóé»é▄é╣é±é⌐éτüB'R
  239.   'ü@ü@ü@ü@ù~é╡é⌐é┴é╜éτéΓéµéóùlé╞î≡Å┬é╡é─é╦üBüv'~A:
  240.   'é╗éñî╛éñé╞Éßòùé═üAé│é┴é╞Å┴éªïÄé┴é╜üB'~A:
  241.   @NO2:
  242. *╒╖╢╛▐2:!╒╖╢╛▐:3!
  243.   ~Y34 1:~Y9 2:~BGM 17:
  244.   ~Y40 1:~GA 338:~GA 176:~Y40 0:
  245.   'Åùé╠Äqé¬ë÷ò¿é╔éóé╜é╘éτéΩé─éóéΘüEüEüEéáéΩé┴üEüEé▄é╜üAÉßòùé│é±é╢éßé╚éóé⌐üB'~A:
  246.   
  247.   'ë÷ò¿ü@üué┐éδé┐éδüAé▒é╠Åùé═üAâoâJé╢éßé╚éóé╠é⌐üB'R
  248.   'ü@ü@ü@ü@é▒é±é╚è╚ÆPé╔ò▀é▄éΘé╞é═üEüEüBüv'~A:
  249.   
  250.   'Éßòùü@üuéóéΓéµéúüAâoâJâoâJüEüEéáé±üAò╧é╚Åèé≡é╚é▀é╚éóé┼üIüIüv'~A:
  251.   
  252.   'ë÷ò¿ü@üuéóéΓé¬é┴é─éóéΘé╠éαìíé╠ôαéµüAë┤é╠Éπé╠ïCÄ¥é┐éµé│é≡ï│éªé─éΓéΘé║üB'R
  253.   'ü@ü@ü@ü@éαéñüAë┤é╠Éπê╚èOé╢éßè┤é╢é╚éóæ╠é╔é╚éΘé║üBüv'~A:
  254.   
  255.   'Éßòùü@üué╗é±é╚âUâëâUâëé╡é╜Éπé┼è┤é╢éΘéαé±é┼é╖é⌐üIüI'R
  256.   'ü@ü@ü@ü@éáé┴'X1:'é│é±üAÅòé»é─üEüEüBüv'R
  257.   'ë┤é╔ïCòtéóé╜Éßòùé│é±é¬Åòé»é≡ïüé▀é─ùêé╜üB'~A:
  258.   
  259.   X1:'üué╡é⌐é╜é╚éóüAé¿éóë÷ò¿üAé╗é╠Åùé╠Äqé≡üEüEüBüv'~A:
  260.   
  261.   'é¬üAë÷ò¿é═ë┤é¬âZâèâté≡î╛éóÅIéφéτé╚éóôαé╔ôªé░Åoé╡é╜üB'~A:
  262.   
  263.   ~BGM 16:~Y40 1:~GA 235:~Y40 0:
  264.   'Éßòùü@üuéáé═é═é═üAé▄é╜âhâWé╡é─ò▀é▄é┴é─é╡é▄é┴é╜é╠üB'R
  265.   'ü@ü@ü@ü@Ääé┴é─öEÄ╥Ä╕èié⌐é╡éτüEüEüBüv'~A:
  266.   'Éßòùü@üué╛é▀é╦üBâéâôâXâ^ü[é¬ÅoéΘé╞é╟éñéαò|é¡é╚é┴é─öEÅpé¬Ägéªé╚é¡'R
  267.   'ü@ü@ü@ü@é╚é┴é─é╡é▄éñéφüBéáé┴üEüEÅ╬é┴é╜éφé╦üB'R
  268.   'ü@ü@ü@ü@éΓéµéóùlé╛é┴é─âJâGâïé¬ïΩÄΦé╚é╠éµüBüv'~A:
  269.   X1:'üué⌐éªéΘé┴é─è^üHüHüv'~A:
  270.   'Éßòùü@üué╗éñé╗éñüAâJâGâïéµüB'R
  271.   'ü@ü@ü@ü@âJâGâïé¬Åoé╜é╛é»é┼é½éßéáé½éßéáè½é¡é±é╛é⌐éτüEüEüB'R
  272.   'ü@ü@ü@ü@éáé┴é╞üAé▒éΩéαôαÅÅé╦üBéΓéµéóùlé╔é═üAî╛éφé╚éóé┼é╦üBüv'~A:
  273.   
  274.   'é▒éΩé═üAéóéóÄûé≡ò╖éóé╜é╝üAâJâGâïé⌐üEüEèmé⌐é╟é▒é⌐é╔éóé╜é═é╕é╛üB'~A:
  275.   
  276.   'Éßòùü@üué╗éΩé╢éßÄäé═üAé▒éΩé┼üEüEüB'R
  277.   'ü@ü@ü@ü@ìíôxé═üAë÷ò¿é╔ò▀é▄éτé╚éóé⌐éτê└ÉSé╡é─é╦üBüv'~A:
  278.   
  279.   X1:'üué┘é±é╞é⌐é╚üEüEüBüv'~A:
  280.   
  281.   @NO2:
  282. *└╢╫:
  283.   Y1,0:
  284.   'ò≤öáé¬éáéΦé▄é╖üB'R
  285.   $OPEN$èJé»éΘ$
  286.   $NO$èJé»é╚éó$
  287.   ]@└╢╫:
  288. *OPEN:
  289.   {(D08=1)*(└╢╫18=0):@MAGIC1:}
  290.   {(D08=2)*(└╢╫19=0):@MAGIC2:}
  291.   {(D08=3)*(└╢╫20=0):@MAGIC3:}
  292.   {(D08=4)*(└╢╫21=0):@MAGIC4:}
  293.   {(D08=5)*(└╢╫22=0):@MAGIC5:}
  294.   {(D08=6)*(▓╝B=0):@MAGIC6:}
  295.   'ò≤öáé═üAé⌐éτé┴é█é╛é┴é╜üB'@NO:
  296. *MAGIC1:
  297.   'ò≤öáé╠Æåé⌐éτâpâÅü[âVü[âïâhé¬Åoé─ùêé╜üB'R
  298.   {S┼╧┤>3:'é┼éαë┤é╔é═üAòKùvé╚éóüB'@NO:}
  299.   !S┼╧┤:3!!S╬▐│╖▐«:5!!┐│║│:S╬▐│╖▐«+A╬▐│╖▐«!!└╢╫18:1!
  300.   'âpâÅü[âVü[âïâhé≡æòö⌡é╡é▄é╖üB'@NO:
  301. *MAGIC2:
  302.   'ò≤öáé╠Æåé⌐éτèEÉwé╠èZé¬Åoé─ùêé╜üB'R
  303.   {A┼╧┤>4:'é┼éαë┤é╔é═üAòKùvé╚éóüB'@NO:}
  304.    !A┼╧┤:4!!A╝¡│╛▓:2!!A╬▐│╖▐«:10!!┐│║│:S╬▐│╖▐«+A╬▐│╖▐«!!└╢╫19:1!
  305.    'èEÉwé╠èZé≡æòö⌡é╡é▄é╖üB'@NO:
  306. *MAGIC3:
  307.   'ò≤öáé╠Æåé⌐éτæ║É│é¬Åoé─ùêé╜üB'R
  308.   {╤╫╧╗=1:'é╡é⌐é╡ë┤é═üAè∙é╔Ä¥é┴é─éóéΘüB'@NO:}
  309.   {╠▐╖=3:'òÉèφé¬è∙é╔éRû{éáéΘé╠é┼ĵéΩé╚éóüB'@NO:}
  310.   'æ║É│é≡ÄΦé╔ôⁿéΩé╜üB'R
  311.   !╠▐╖:╠▐╖+1!!╤╫╧╗:1!!└╢╫20:1!@NO:
  312. *MAGIC4:!└╢╫21:1!
  313.   'ò≤öáé╠Æåé⌐éτÉóÉFèαéQé¬éPéOî┬Åoé─ùêé╜üB'R!╛▓█╢▐▌2:╛▓█╢▐▌2+10!
  314.   'ÉóÉFèαéQé¬'H0,╛▓█╢▐▌2:'î┬é╔é╚éΦé▄é╡é╜üB'@NO:
  315. *MAGIC5:!└╢╫22:1!
  316.   'ò≤öáé╠Æåé⌐éτûéò¿é╠î«é¬Åoé─ùêé╜üB'R
  317.   'ûéò¿é╠î«é≡ÄΦé╔ôⁿéΩé╜üB'!╧╙╔╔╢╖▐:1!@NO:
  318. *MAGIC6:!▓╝B:1!
  319.   'ò≤öáé≡èJé»éΘé╞öÆéóëîéΦé¬éαé¡éαé¡é╞ö≥é╤Åoé╡é╜üB'R
  320.   'é╗é╡é─üAæSé─é╠ëîéΦé¬Åoé╜îπé╔é═üAò≤öáé╔é═é╟é▒é╔é┼éαéáéΘżÉ╬é¬êΩé┬'R
  321.   'ùÄé┐é─éóéΘé╛é»é╛é┴é╜üB'@NO:
  322. *╩▌─▐┘:
  323.   'ò╟é╔æσé½é╚ânâôâhâïé¬éáéΦé▄é╖üBë±é╡é▄é╖é⌐üH'R
  324.   $╩▌─▐┘ON$ô«é⌐é╖$
  325.   $NO$ô«é⌐é│é╚éó$
  326.   ]@╩▌─▐┘:
  327. *╩▌─▐┘ON:
  328.   {D02\1:!D02:1!~Z 7,23:~Y33 19:@NO:}
  329.   !D02:0!~Z 7,23:~Y33 16:@NO:
  330. *╬▐└▌:
  331.   Y1,0:
  332.   {D03\1:!D03:1!~Z 20,15:~Y33 16:'âsâôâ|ü[âô'@NO:}
  333.   !D03:0!~Z 20,15:~Y33 46:'âuü['@NO:
  334.