プチコンmkII
  1. ’┌──────────────────┐
  2. ’│シュ－ティンク゛サンフ゜ル　ｖ１．１│
  3. ’└──────────────────┘
  4. ’スフ゜ライト　ワリアテ
  5. ’　　０〜：Г　ｍｙｓｈｉｐ
  6. ’　　８〜：↑　ｍｙｓｈｏｔ
  7. ’　１６〜：Е　ｅｎｅｍｙ
  8. ’　２４〜：↓　ｅｎｓｈｏｔ
  9. ’　６４〜：●　ｅｘｐｌｏｓｉｏｎ
  10. ’　７２〜：Н　ｂｏｓｓ
  12. ＠ＩＮＩＴ　’ショキカ
  13. 　ＣＬＥＡＲ
  14. 　ＵＮＵＳＥＤ＝－４０９６
  15. 　ＰＨＡＳＥ＝０
  16. 　ＳＴＡＧＥ＝１
  17. 　ＰＨＡＳＣＮＴ＝０
  19. 　’カ゛メン
  20. 　ＡＣＬＳ
  21. 　ＢＧＭＰＬＡＹ　２３
  22. 　ＶＩＳＩＢＬＥ　０，１，０，０，０，０
  23. 　ＶＳＹＮＣ　１
  25. 　’フ゜レイヤ－
  26. 　ＳＣＯＲＥ＝０：　ＨＩＳＣＯＲＥ＝０
  27. 　ＭＹＸ＝１２０　：　ＭＹＹ＝１９２　：　ＭＹＳＰＤ＝３
  28. 　ＭＹＣＮＴ＝０　：　ＭＹＳＴＡＴ＝１
  29. 　ＳＰＳＥＴ　０，２８８，１１，０，０，１
  30. 　ＳＰＯＦＳ　０，ＭＹＸ，ＭＹＹ
  31. 　ＳＰＳＥＴ　１，２８９，１１，０，０，１
  32. 　ＳＰＯＦＳ　１，ＭＹＸ，ＭＹＹ＋１０
  34. 　’ショット
  35. 　ＭＳＨＭＡＸ＝４
  36. 　ＭＳＨＣＮＴ＝０
  37. 　ＤＩＭ　ＭＹＳＨＯＴＸ（４），ＭＹＳＨＯＴＹ（４）
  38. 　ＦＯＲ　Ｉ＝０　ＴＯ　３
  39. 　　ＭＹＳＨＯＴＸ（Ｉ）　＝　ＵＮＵＳＥＤ
  40. 　　ＭＹＳＨＯＴＹ（Ｉ）　＝　０
  41. 　　ＳＰＳＥＴ　Ｉ＋８，２２３，１２，０，０，１
  42. 　　ＳＰＯＦＳ　Ｉ＋８，－１６，－１６
  43. 　ＮＥＸＴ
  45. 　’ハイケイ
  46. 　ＤＩＭ　ＳＴＡＲＸ（１６），ＳＴＡＲＹ（１６）
  47. 　ＤＩＭ　ＳＴＡＲＳＰＤ（１６）
  48. 　ＦＯＲ　Ｉ＝０　ＴＯ　１５
  49. 　　ＳＴＡＲＸ（Ｉ）　＝　ＲＮＤ（２５６）
  50. 　　ＳＴＡＲＹ（Ｉ）　＝　ＲＮＤ（１９２）
  51. 　　ＳＴＡＲＳＰＤ（Ｉ）　＝　（ＲＮＤ（１６）＋１）／４
  52. 　ＮＥＸＴ
  54. 　’テキ
  55. 　ＤＩＭ　ＥＮＭＸ（８），ＥＮＭＹ（８），ＥＮＭＣＮＴ（８），ＥＮＭＨＰ（８）
  56. 　ＧＥＮＭＣＮＴ＝０　：　ＥＮＭＭＡＸ＝８
  57. 　ＦＯＲ　Ｉ＝０　ＴＯ　７
  58. 　　ＥＮＭＸ（Ｉ）　＝　ＵＮＵＳＥＤ
  59. 　　ＥＮＭＹ（Ｉ）　＝　０
  60. 　　ＥＮＭＨＰ（Ｉ）　＝　０
  61. 　　ＳＰＳＥＴ　Ｉ＋１６，１７８，１１，０，０，１
  62. 　　ＳＰＡＮＩＭ　Ｉ＋１６，３，４，０
  63. 　　ＳＰＯＦＳ　Ｉ＋１６，－１６，－１６
  64. 　ＮＥＸＴ
  66. 　’テキタ゛ン
  67. 　ＤＩＭ　ＥＮＳＨＯＴＸ（３２），ＥＮＳＨＯＴＹ（３２），ＥＮＳＨＤＩＲ（３２）
  68. 　ＥＳＨＴＣＮＴ＝０　：　ＥＳＨＴＭＡＸ＝３２
  69. 　ＦＯＲ　Ｉ＝０　ＴＯ　３１
  70. 　　ＥＮＳＨＯＴＸ（Ｉ）　＝　ＵＮＵＳＥＤ
  71. 　　ＥＮＳＨＯＴＹ（Ｉ）　＝　０
  72. 　　ＳＰＳＥＴ　Ｉ＋２４，２１４，０，０，０，１
  73. 　　ＳＰＡＮＩＭ　Ｉ＋２４，２，４，０
  74. 　　ＳＰＯＦＳ　Ｉ＋２４，－１６，－１６
  75. 　ＮＥＸＴ
  77. 　’ハ゛クハツ
  78. 　ＤＩＭ　ＥＸＰＸ（４），ＥＸＰＹ（４），ＥＸＰＣＮＴ（４）
  79. 　ＧＥＸＰＣＮＴ＝０　：　ＥＸＰＭＡＸ＝４
  80. 　ＦＯＲ　Ｉ＝０　ＴＯ　３
  81. 　　ＥＸＰＸ（Ｉ）　＝　ＵＮＵＳＥＤ
  82. 　　ＥＸＰＹ（Ｉ）　＝　０
  83. 　　ＥＸＰＣＮＴ（Ｉ）　＝　０
  84. 　　ＳＰＳＥＴ　Ｉ＋６４，２４８，０，０，０，１
  85. 　　ＳＰＯＦＳ　Ｉ＋６４，－１６，－１６
  86. 　ＮＥＸＴ
  88. 　’ホ゛ス
  89. 　ＳＰＳＥＴ　７２，３４０，１１，０，０，１
  90. 　ＳＰＳＥＴ　７３，３４１，１１，０，０，１
  91. 　ＳＰＳＥＴ　７４，３４２，１１，０，０，１
  92. 　ＳＰＳＥＴ　７５，３４３，１１，０，０，１
  93. 　ＳＰＯＦＳ　７２，－１６，－１６
  94. 　ＳＰＯＦＳ　７３，－１６，－１６
  95. 　ＳＰＯＦＳ　７４，－１６，－１６
  96. 　ＳＰＯＦＳ　７５，－１６，－１６
  97. 　ＢＯＳＳＸ＝ＵＮＵＳＥＤ
  98. 　ＢＯＳＳＹ＝０
  99. 　ＢＯＳＳＨＰ＝６０
  100. 　ＢＯＳＳＣＮＴ＝０
  102. 　ＶＩＳＩＢＬＥ　１，１，０，０，１，１
  104. ＠ＭＡＩＮ　’メインル－フ゜
  105. 　ＯＬＤＢＴＮ　＝　ＢＴＮ
  106. 　ＢＴＮ　＝　ＢＵＴＴＯＮ（）
  107. 　ＯＮ　ＰＨＡＳＥ　ＧＯＳＵＢ　＠ＴＩＴＬＥ，＠ＧＡＭＥ，＠ＢＯＳＳＳＣＮ，＠ＧＡＭＥＯＶＥＲ
  108. 　ＰＨＡＳＣＮＴ＝ＰＨＡＳＣＮＴ＋１
  109. 　ＶＳＹＮＣ　１
  110. ＧＯＴＯ　＠ＭＡＩＮ
  112. ＠ＡＮＹＢＴＮ
  113. 　Ｒ＝０
  114. 　ＩＦ　ＯＬＤＢＴＮ　ＴＨＥＮ　ＲＥＴＵＲＮ
  115. 　ＩＦ　ＢＴＮ　ＴＨＥＮ　Ｒ＝ＢＴＮ
  116. ＲＥＴＵＲＮ
  118. ＠ＴＩＴＬＥ
  119. 　ＧＯＳＵＢ　＠ＡＮＹＢＴＮ
  120. 　ＬＯＣＡＴＥ　６，４：ＰＲＩＮＴ”┗┫┻┻┓┨┻┏┓┛　┣━　┗┫┃┣┳┏┫”
  121. 　ＬＯＣＡＴＥ　６，５：ＰＲＩＮＴ”┫┓┻┻┃┻┻┠━┛　┯┓　┫┓　┛┻┳┠”
  122. 　ＬＯＣＡＴＥ　６，６：ＰＲＩＮＴ”┓┻┻┻　┻┻　　┛　┛　　┓┻　┛┻　┻”
  123. 　ＬＯＣＡＴＥ　６，７：ＰＲＩＮＴ”┃━┃┃　┃┃　　┏━┏━　┃━　━　┏━”
  125. 　ＬＯＣＡＴＥ　９，１７：ＰＲＩＮＴ”ＰＵＳＨ　ＡＮＹ　ＢＵＴＴＯＮ”
  127. 　ＩＦ　ＰＨＡＳＣＮＴ＜２　ＴＨＥＮ　ＲＥＴＵＲＮ
  128. 　ＩＦ　Ｒ　ＴＨＥＮ　ＰＨＡＳＥ　＝　１：ＢＧＭＰＬＡＹ　２３：ＰＨＡＳＣＮＴ＝０：ＣＬＳ
  129. ＲＥＴＵＲＮ
  131. ＠ＧＡＭＥ
  132. 　ＩＦ　ＰＨＡＳＣＮＴ＜６０　ＴＨＥＮ　ＬＯＣＡＴＥ　１１，１１：ＰＲＩＮＴ　”ＳＴＡＧＥ　”；ＳＴＡＧＥ
  133. 　ＩＦ　ＰＨＡＳＣＮＴ＝＝６０　ＴＨＥＮ　ＬＯＣＡＴＥ　１１，１１：ＰＲＩＮＴ　”　　　　　　　　　　”
  134. 　ＧＯＳＵＢ　＠ＤＩＳＰＢＧ
  135. 　ＧＯＳＵＢ　＠ＤＩＳＰＳＣＯＲ
  136. 　ＧＯＳＵＢ　＠ＥＮＳＨＯＴ
  137. 　ＧＯＳＵＢ　＠ＥＮＥＭＹ
  138. 　ＧＯＳＵＢ　＠ＭＹＳＨＯＴ
  139. 　ＧＯＳＵＢ　＠ＭＹＳＨＩＰ
  140. 　ＧＯＳＵＢ　＠ＥＸＰＬＳＩＯＮ
  141. 　ＩＦ　ＰＨＡＳＣＮＴ＝＝１２００　ＴＨＥＮ　ＧＯＳＵＢ　＠ＴＯＢＯＳＳ
  142. ＲＥＴＵＲＮ
  144. ＠ＴＯＢＯＳＳ
  145. 　ＰＨＡＳＥ＝２
  146. 　ＰＨＡＳＣＮＴ＝０
  147. 　ＢＧＭＳＴＯＰ
  148. 　ＢＯＳＳＸ＝１１２
  149. 　ＢＯＳＳＹ＝－３２
  150. 　ＢＯＳＳＨＰ＝６０＋ＳＴＡＧＥ
  151. 　ＢＯＳＳＣＮＴ＝１
  152. 　ＴＡＲＧＥＴＸ＝１１２
  153. 　ＳＰＣＨＲ　７２，３４０
  154. 　ＳＰＣＨＲ　７３，３４１
  155. 　ＳＰＣＨＲ　７４，３４２
  156. 　ＳＰＣＨＲ　７５，３４３
  157. ＲＥＴＵＲＮ
  159. ＠ＢＯＳＳＳＣＮ
  160. 　ＣＯＬＯＲ　１３
  161. 　ＩＦ　ＰＨＡＳＣＮＴ＜６０　ＴＨＥＮ　ＬＯＣＡＴＥ　１２，１１：ＰＲＩＮＴ　”ＷＡＲＮＩＮＧ！！”
  162. 　ＩＦ　ＰＨＡＳＣＮＴ＝＝６０　ＴＨＥＮ　ＬＯＣＡＴＥ　１２，１１：ＰＲＩＮＴ　”　　　　　　　　　”
  163. 　ＣＯＬＯＲ　０
  164. 　ＩＦ　ＰＨＡＳＣＮＴ＝＝１２０　ＴＨＥＮ　ＢＧＭＰＬＡＹ　１３
  165. 　ＧＯＳＵＢ　＠ＤＩＳＰＢＧ
  166. 　ＧＯＳＵＢ　＠ＤＩＳＰＳＣＯＲ
  167. 　ＧＯＳＵＢ　＠ＥＮＳＨＯＴ
  168. 　ＧＯＳＵＢ　＠ＥＮＥＭＹ
  169. 　ＧＯＳＵＢ　＠ＭＹＳＨＯＴ
  170. 　ＧＯＳＵＢ　＠ＭＹＳＨＩＰ
  171. 　ＧＯＳＵＢ　＠ＥＸＰＬＳＩＯＮ
  172. 　ＧＯＳＵＢ　＠ＢＯＳＳ
  173. ＲＥＴＵＲＮ
  175. ＠ＢＯＳＳ　’ホ゛ス
  176. 　ＩＦ　ＢＯＳＳＨＰ＝＝０　ＴＨＥＮ　＠ＢＯＳＳＴＨＲＵ
  178. 　’ホ゛スノ　ウコ゛キ
  179. 　ＩＦ　ＢＯＳＳＣＮＴ％１２０＝＝０　ＴＨＥＮ　ＴＡＲＧＥＴＸ＝ＲＮＤ（１６０）＋３２
  180. 　ＩＦ　ＢＯＳＳＸ＞ＴＡＲＧＥＴＸ　ＴＨＥＮ　ＢＯＳＳＸ＝ＢＯＳＳＸ－１
  181. 　ＩＦ　ＢＯＳＳＸ＜ＴＡＲＧＥＴＸ　ＴＨＥＮ　ＢＯＳＳＸ＝ＢＯＳＳＸ＋１
  183. 　ＩＦ　ＢＯＳＳＣＮＴ＜８０　ＴＨＥＮ　ＢＯＳＳＹ＝ＢＯＳＳＹ＋１：ＧＯＴＯ　＠ＢＯＳＨＴＨＲＵ
  184. 　ＩＦ　ＢＯＳＳＣＮＴ％３０＝＝０　ＴＨＥＮ　ＧＯＳＵＢ　＠ＢＯＳＳＳＨＯＴ
  185. 　＠ＢＯＳＨＴＨＲＵ
  187. 　ＳＰＯＦＳ　７２，ＢＯＳＳＸ，ＢＯＳＳＹ
  188. 　ＳＰＯＦＳ　７３，ＢＯＳＳＸ＋１６，ＢＯＳＳＹ
  189. 　ＳＰＯＦＳ　７４，ＢＯＳＳＸ，ＢＯＳＳＹ＋１６
  190. 　ＳＰＯＦＳ　７５，ＢＯＳＳＸ＋１６，ＢＯＳＳＹ＋１６
  192. 　’ハンテイ
  193. 　ＦＯＲ　Ｉ＝０　ＴＯ　３
  194. 　　ＩＦ　ＢＯＳＳＸ－８＞ＭＹＳＨＯＴＸ（Ｉ）　ＴＨＥＮ　＠ＢＯＳＳＪＤＮＸ
  195. 　　ＩＦ　ＢＯＳＳＸ＋２４＜ＭＹＳＨＯＴＸ（Ｉ）　ＴＨＥＮ　＠ＢＯＳＳＪＤＮＸ
  196. 　　ＩＦ　ＢＯＳＳＹ－８＞ＭＹＳＨＯＴＹ（Ｉ）　ＴＨＥＮ　＠ＢＯＳＳＪＤＮＸ
  197. 　　ＩＦ　ＢＯＳＳＹ＋８＜ＭＹＳＨＯＴＹ（Ｉ）　ＴＨＥＮ　＠ＢＯＳＳＪＤＮＸ
  198. 　　ＢＯＳＳＨＰ＝ＢＯＳＳＨＰ－１
  199. 　　ＭＹＳＨＯＴＹ（Ｉ）＝－１６
  200. 　　ＳＰＯＦＳ　Ｉ＋８，０，－１６
  201. 　　ＢＥＥＰ　０
  202. 　　ＩＦ　ＢＯＳＳＨＰ＝＝０　ＴＨＥＮ　ＢＯＳＳＣＮＴ＝０：ＢＧＭＳＴＯＰ：ＳＣＯＲＥ＝ＳＣＯＲＥ＋５０００
  203. 　　＠ＢＯＳＳＪＤＮＸ
  204. 　ＮＥＸＴ
  206. 　＠ＢＯＳＳＴＨＲＵ
  207. 　ＢＯＳＳＣＮＴ＝ＢＯＳＳＣＮＴ＋１
  209. 　ＩＦ　ＢＯＳＳＨＰ＝＝０　ＴＨＥＮ　ＧＯＳＵＢ　＠ＢＯＳＳＥＸＰ
  210. ＲＥＴＵＲＮ
  212. ＠ＢＯＳＳＳＨＯＴ
  213. 　ＤＩＲ　＝　（ＲＮＤ（２５６）－１２８）＊ＰＩ（）／５１２
  214. 　ＦＯＲ　Ｉ＝０　ＴＯ　ＳＴＡＧＥ
  215. 　　ＩＦ　Ｉ＝＝６　ＴＨＥＮ　ＲＥＴＵＲＮ
  216. 　　ＩＦ　ＥＮＳＨＯＴＸ（ＥＳＨＴＣＮＴ）！＝ＵＮＵＳＥＤ　ＴＨＥＮ　ＲＥＴＵＲＮ
  217. 　　ＥＮＳＨＯＴＸ（ＥＳＨＴＣＮＴ）＝ＢＯＳＳＸ＋８
  218. 　　ＥＮＳＨＯＴＹ（ＥＳＨＴＣＮＴ）＝ＢＯＳＳＹ＋８
  219. 　　ＥＮＳＨＤＩＲ（ＥＳＨＴＣＮＴ）＝（ＲＮＤ（２５６）－１２８）＊ＰＩ（）／５１２
  220. 　　ＳＰＯＦＳ　ＥＳＨＴＣＮＴ＋２４，ＥＮＳＨＯＴＸ（ＥＳＨＴＣＮＴ），ＥＮＳＨＯＴＹ（ＥＳＨＴＣＮＴ）
  221. 　　ＥＳＨＴＣＮＴ＝ＥＳＨＴＣＮＴ＋１
  222. 　　ＩＦ　ＥＳＨＴＣＮＴ＞＝ＥＳＨＴＭＡＸ　ＴＨＥＮ　ＥＳＨＴＣＮＴ＝０
  223. 　ＮＥＸＴ
  224. ＲＥＴＵＲＮ
  226. ＠ＢＯＳＳＥＸＰ　’ホ゛ス　キエル
  227. 　ＩＦ　ＢＯＳＳＣＮＴ＜６４　ＴＨＥＮ　ＢＥＥＰ　１３
  228. 　ＩＦ　ＢＯＳＳＣＮＴ＝＝１　ＴＨＥＮ　＠ＢＯＳＳＥＸＰ１
  229. 　ＩＦ　ＢＯＳＳＣＮＴ＝＝１６　ＴＨＥＮ　＠ＢＯＳＳＥＸＰ２
  230. 　ＩＦ　ＢＯＳＳＣＮＴ＝＝３２　ＴＨＥＮ　＠ＢＯＳＳＥＸＰ３
  231. 　ＩＦ　ＢＯＳＳＣＮＴ＝＝４８　ＴＨＥＮ　＠ＢＯＳＳＥＸＰ４
  232. 　ＩＦ　ＢＯＳＳＣＮＴ＝＝６４　ＴＨＥＮ　＠ＢＯＳＳＣＬＲ
  233. 　ＩＦ　ＢＯＳＳＣＮＴ＝＝２４０　ＴＨＥＮ　ＰＨＡＳＥ＝１：ＳＴＡＧＥ＝ＳＴＡＧＥ＋１：ＰＨＡＳＣＮＴ＝０：ＢＧＭＰＬＡＹ　２３
  234. 　ＲＥＴＵＲＮ
  235. 　＠ＢＯＳＳＥＸＰ１
  236. 　ＳＰＣＨＲ　７２，３５２
  237. 　ＳＰＣＨＲ　７３，３５３
  238. 　ＳＰＣＨＲ　７４，３５４
  239. 　ＳＰＣＨＲ　７５，３５５
  240. 　ＲＥＴＵＲＮ
  241. 　＠ＢＯＳＳＥＸＰ２
  242. 　ＳＰＣＨＲ　７２，３５６
  243. 　ＳＰＣＨＲ　７３，３５７
  244. 　ＳＰＣＨＲ　７４，３５８
  245. 　ＳＰＣＨＲ　７５，３５９
  246. 　ＲＥＴＵＲＮ
  247. 　＠ＢＯＳＳＥＸＰ３
  248. 　ＳＰＣＨＲ　７２，３６０
  249. 　ＳＰＣＨＲ　７３，３６１
  250. 　ＳＰＣＨＲ　７４，３６２
  251. 　ＳＰＣＨＲ　７５，３６３
  252. 　ＲＥＴＵＲＮ
  253. 　＠ＢＯＳＳＥＸＰ４
  254. 　ＳＰＣＨＲ　７２，３６４
  255. 　ＳＰＣＨＲ　７３，３６５
  256. 　ＳＰＣＨＲ　７４，３６６
  257. 　ＳＰＣＨＲ　７５，３６７
  258. 　ＲＥＴＵＲＮ
  259. 　＠ＢＯＳＳＣＬＲ
  260. 　ＳＰＯＦＳ　７２，－１６，－１６
  261. 　ＳＰＯＦＳ　７３，－１６，－１６
  262. 　ＳＰＯＦＳ　７４，－１６，－１６
  263. 　ＳＰＯＦＳ　７５，－１６，－１６
  264. ＲＥＴＵＲＮ
  266. ＠ＧＡＭＥＯＶＥＲ
  267. 　ＦＯＲ　Ｉ＝０　ＴＯ　９９
  268. 　　ＳＰＣＬＲ　Ｉ
  269. 　ＮＥＸＴ
  270. 　ＧＬＩＮＥ　ＭＹＸ＋８，ＭＹＹ＋８，ＲＮＤ（２５６），ＲＮＤ（２５６），ＲＮＤ（２５６）
  271. 　ＧＣＩＲＣＬＥ　ＭＹＸ＋８，ＭＹＹ＋８，ＲＮＤ（１００）＋２，ＲＮＤ（２５６）
  272. 　ＬＯＣＡＴＥ　１２，１２：ＰＲＩＮＴ　”ＧＡＭＥ　ＯＶＥＲ”
  273. 　ＧＯＳＵＢ　＠ＡＮＹＢＴＮ
  274. 　ＩＦ　Ｒ　ＡＮＤ　１６　ＴＨＥＮ　＠ＩＮＩＴ
  275. ＲＥＴＵＲＮ
  277. ＠ＤＩＳＰＢＧ　’ハイケイ　ヒョウシ゛
  278. 　ＦＯＲ　Ｉ＝０　ＴＯ　７
  279. 　　ＧＰＳＥＴ　ＳＴＡＲＸ（Ｉ），ＳＴＡＲＹ（Ｉ），０
  280. 　　ＳＴＡＲＹ（Ｉ）＝ＳＴＡＲＹ（Ｉ）＋ＳＴＡＲＳＰＤ（Ｉ）
  281. 　　ＧＰＳＥＴ　ＳＴＡＲＸ（Ｉ），ＳＴＡＲＹ（Ｉ），ＳＴＡＧＥ
  282. 　　ＩＦ　ＳＴＡＲＹ（Ｉ）　＞　１９２　ＴＨＥＮ　ＧＯＳＵＢ　＠ＳＴＡＲＩＮＩＴ
  283. 　ＮＥＸＴ
  284. ＲＥＴＵＲＮ
  286. ＠ＳＴＡＲＩＮＩＴ　’ホシノイチ　モト゛ス
  287. 　ＳＴＡＲＸ（Ｉ）　＝　ＲＮＤ（２５６）
  288. 　ＳＴＡＲＹ（Ｉ）　＝　０
  289. 　ＳＴＡＲＳＰＤ（Ｉ）　＝　（ＲＮＤ（１６）＋１）／４
  290. ＲＥＴＵＲＮ
  292. ＠ＥＮＳＨＯＴ　’テキ　ショット
  293. 　ＦＯＲ　Ｉ＝０　ＴＯ　３１
  294. 　　ＩＦ　ＥＮＳＨＯＴＸ（Ｉ）＝＝ＵＮＵＳＥＤ　ＴＨＥＮ　＠ＥＳＨＴＨＲＵ
  295. 　　ＥＮＳＨＯＴＸ（Ｉ）＝ＥＮＳＨＯＴＸ（Ｉ）＋ＳＩＮ（ＥＮＳＨＤＩＲ（Ｉ））＊２
  296. 　　ＥＮＳＨＯＴＹ（Ｉ）＝ＥＮＳＨＯＴＹ（Ｉ）＋ＣＯＳ（ＥＮＳＨＤＩＲ（Ｉ））＊２
  297. 　　ＳＰＯＦＳ　Ｉ＋２４，ＥＮＳＨＯＴＸ（Ｉ），ＥＮＳＨＯＴＹ（Ｉ），２
  299. 　　ＩＦ　ＥＮＳＨＯＴＸ（Ｉ）＞２５６　ＴＨＥＮ　ＥＮＳＨＯＴＸ（Ｉ）＝ＵＮＵＳＥＤ
  300. 　　ＩＦ　ＥＮＳＨＯＴＸ（Ｉ）＜－１６　ＴＨＥＮ　ＥＮＳＨＯＴＸ（Ｉ）＝ＵＮＵＳＥＤ
  301. 　　ＩＦ　ＥＮＳＨＯＴＹ（Ｉ）＞１９２　ＴＨＥＮ　ＥＮＳＨＯＴＸ（Ｉ）＝ＵＮＵＳＥＤ
  302. 　　ＩＦ　ＥＮＳＨＯＴＹ（Ｉ）＜－１６　ＴＨＥＮ　ＥＮＳＨＯＴＸ（Ｉ）＝ＵＮＵＳＥＤ
  303. 　　＠ＥＳＨＴＨＲＵ
  304. 　ＮＥＸＴ
  305. ＲＥＴＵＲＮ
  307. ＠ＥＮＥＭＹ　’テキ
  308. 　ＩＦ　ＰＨＡＳＥ！＝１　ＴＨＥＮ　＠ＧＥＮＭＴＨＲＵ
  309. 　ＩＦ　ＭＡＩＮＣＮＴＬ％６４　ＴＨＥＮ　＠ＧＥＮＭＴＨＲＵ
  310. 　ＩＦ　ＥＮＭＸ（ＧＥＮＭＣＮＴ）！＝ＵＮＵＳＥＤ　ＴＨＥＮ　＠ＧＥＮＭＴＨＲＵ
  311. 　　ＥＮＭＸ（ＧＥＮＭＣＮＴ）　＝　ＲＮＤ（２４０）
  312. 　　ＥＮＭＹ（ＧＥＮＭＣＮＴ）　＝　－１６
  313. 　　ＥＮＭＨＰ（ＧＥＮＭＣＮＴ）＝　ＳＴＡＧＥ
  314. 　　ＥＮＭＣＮＴ（ＧＥＮＭＣＮＴ）　＝　０
  315. 　　ＳＰＯＦＳ　ＧＥＮＭＣＮＴ＋１６，ＥＮＭＸ（ＧＥＮＭＣＮＴ），－１６
  316. 　　ＧＥＮＭＣＮＴ＝ＧＥＮＭＣＮＴ＋１
  317. 　　ＩＦ　ＧＥＮＭＣＮＴ＞＝ＥＮＭＭＡＸ　ＴＨＥＮ　ＧＥＮＭＣＮＴ＝０
  318. 　＠ＧＥＮＭＴＨＲＵ
  320. 　ＦＯＲ　Ｉ＝０　ＴＯ　７
  321. 　　ＩＦ　ＥＮＭＸ（Ｉ）＝＝ＵＮＵＳＥＤ　ＴＨＥＮ　＠ＥＮＭＴＨＲＵ
  322. 　　ＥＮＭＹ（Ｉ）　＝　ＥＮＭＹ（Ｉ）＋０．７５
  323. 　　ＥＮＭＣＮＴ（Ｉ）　＝　ＥＮＭＣＮＴ（Ｉ）＋１
  324. 　　ＩＦ　ＥＮＭＹ（Ｉ）＞１９２　ＴＨＥＮ　ＥＮＭＸ（Ｉ）＝ＵＮＵＳＥＤ
  325. 　　ＩＦ　ＥＮＭＣＮＴ（Ｉ）％６０＝＝０　ＴＨＥＮ　ＧＯＳＵＢ　＠ＧＥＮＭＳＨＯＴ
  327. 　　’ハンテイ
  328. 　　Ｊ＝０
  329. 　　＠ＥＮＭＪＵＤＧＥ
  330. 　　　ＩＦ　ＭＹＳＨＯＴＸ（Ｊ）＝＝ＵＮＵＳＥＤ　ＴＨＥＮ　＠ＥＮＭＪＤＧＮＸ
  331. 　　　ＩＦ　ＥＮＭＸ（Ｉ）－８＞ＭＹＳＨＯＴＸ（Ｊ）　ＴＨＥＮ　＠ＥＮＭＪＤＧＮＸ
  332. 　　　ＩＦ　ＥＮＭＸ（Ｉ）＋８＜ＭＹＳＨＯＴＸ（Ｊ）　ＴＨＥＮ　＠ＥＮＭＪＤＧＮＸ
  333. 　　　ＩＦ　ＥＮＭＹ（Ｉ）－８＞ＭＹＳＨＯＴＹ（Ｊ）　ＴＨＥＮ　＠ＥＮＭＪＤＧＮＸ
  334. 　　　ＩＦ　ＥＮＭＹ（Ｉ）＋８＜ＭＹＳＨＯＴＹ（Ｊ）　ＴＨＥＮ　＠ＥＮＭＪＤＧＮＸ
  335. 　　　ＥＮＭＨＰ（Ｉ）＝ＥＮＭＨＰ（Ｉ）－１
  336. 　　　ＭＹＳＨＯＴＹ（Ｊ）＝－３２
  337. 　　　ＳＰＯＦＳ　Ｊ＋８，－３２，０
  338. 　　　ＩＦ　ＥＮＭＨＰ（Ｉ）＞０　ＴＨＥＮ　＠ＥＮＭＪＤＧＮＸ
  339. 　　　Ｐ１＝ＥＮＭＸ（Ｉ）：Ｐ２＝ＥＮＭＹ（Ｉ）
  340. 　　　ＧＯＳＵＢ　＠ＧＥＮＥＸＰ
  341. 　　　ＥＮＭＸ（Ｉ）＝ＵＮＵＳＥＤ
  342. 　　　ＳＣＯＲＥ＝ＳＣＯＲＥ＋２００
  343. 　　　＠ＥＮＭＪＤＧＮＸ
  344. 　　　Ｊ＝Ｊ＋１
  345. 　　ＩＦ　Ｊ＜＝３　ＴＨＥＮ　＠ＥＮＭＪＵＤＧＥ
  347. 　　ＳＰＯＦＳ　Ｉ＋１６，ＥＮＭＸ（Ｉ），ＥＮＭＹ（Ｉ），２
  349. 　　＠ＥＮＭＴＨＲＵ
  350. 　ＮＥＸＴ
  351. ＲＥＴＵＲＮ
  353. ＠ＧＥＮＭＳＨＯＴ　’テキタ゛ン　ハッシャ
  354. 　ＦＯＲ　Ｊ＝０　ＴＯ　ＳＴＡＧＥ
  355. 　　ＩＦ　Ｊ＝＝６　ＧＯＴＯ　＠ＥＮＳＨＴＨＲＵ
  356. 　　ＩＦ　ＥＮＳＨＯＴＸ（ＥＳＨＴＣＮＴ）！＝ＵＮＵＳＥＤ　ＴＨＥＮ　＠ＥＮＳＨＴＨＲＵ
  357. 　　ＥＮＳＨＯＴＸ（ＥＳＨＴＣＮＴ）＝ＥＮＭＸ（Ｉ）
  358. 　　ＥＮＳＨＯＴＹ（ＥＳＨＴＣＮＴ）＝ＥＮＭＹ（Ｉ）
  359. 　　ＥＮＳＨＤＩＲ（ＥＳＨＴＣＮＴ）＝ＲＮＤ（１０２４）＊ＰＩ（）／５１２
  360. 　　ＳＰＯＦＳ　ＥＳＨＴＣＮＴ＋２４，ＥＮＳＨＯＴＸ（ＥＳＨＴＣＮＴ），ＥＮＳＨＯＴＹ（ＥＳＨＴＣＮＴ）
  361. 　　ＥＳＨＴＣＮＴ＝ＥＳＨＴＣＮＴ＋１
  362. 　　ＩＦ　ＥＳＨＴＣＮＴ＞＝ＥＳＨＴＭＡＸ　ＴＨＥＮ　ＥＳＨＴＣＮＴ＝０
  363. 　　＠ＥＮＳＨＴＨＲＵ
  364. 　ＮＥＸＴ
  365. ＲＥＴＵＲＮ
  367. ＠ＧＥＮＥＸＰ　’ハ゛クハツ　セイセイ
  368. 　ＢＥＥＰ　１１
  369. 　ＥＸＰＸ（ＧＥＸＰＣＮＴ）＝Ｐ１
  370. 　ＥＸＰＹ（ＧＥＸＰＣＮＴ）＝Ｐ２
  371. 　ＥＸＰＣＮＴ（ＧＥＸＰＣＮＴ）＝０
  372. 　ＳＰＯＦＳ　ＧＥＸＰＣＮＴ＋６４，Ｐ１，Ｐ２
  373. 　ＳＰＡＮＩＭ　ＧＥＸＰＣＮＴ＋６４，４，８，１
  374. 　ＧＥＸＰＣＮＴ＝ＧＥＸＰＣＮＴ＋１
  375. 　ＩＦ　ＧＥＸＰＣＮＴ＞＝ＥＸＰＭＡＸ　ＴＨＥＮ　ＧＥＸＰＣＮＴ＝０
  376. ＲＥＴＵＲＮ
  378. ＠ＭＹＳＨＯＴ　’シ゛キ　ショット
  379. 　ＦＯＲ　Ｉ＝０　ＴＯ　３
  380. 　　ＩＦ　ＭＹＳＨＯＴＸ（Ｉ）＝＝ＵＮＵＳＥＤ　ＴＨＥＮ　＠ＭＹＳＨＴＨＲ
  381. 　　ＭＹＳＨＯＴＹ（Ｉ）　＝　ＭＹＳＨＯＴＹ（Ｉ）－８
  382. 　　ＳＰＯＦＳ　Ｉ＋８，ＭＹＳＨＯＴＸ（Ｉ），ＭＹＳＨＯＴＹ（Ｉ），２
  383. 　　ＩＦ　ＭＹＳＨＯＴＹ（Ｉ）　＜　－１６　ＴＨＥＮ　ＧＯＳＵＢ　＠ＲＭＶＭＹＳＨＴ
  384. 　　＠ＭＹＳＨＴＨＲ
  385. 　ＮＥＸＴ
  386. ＲＥＴＵＲＮ
  388. ＠ＲＭＶＭＹＳＨＴ　’ショット　ケス
  389. 　ＭＹＳＨＯＴＸ（Ｉ）　＝　ＵＮＵＳＥＤ
  390. ＲＥＴＵＲＮ
  392. ＠ＥＸＰＬＳＩＯＮ　’ハ゛クハツ
  393. 　ＦＯＲ　Ｉ＝０　ＴＯ　３
  394. 　　ＩＦ　ＥＸＰＣＮＴ（Ｉ）　＝＝　２０　ＴＨＥＮ　ＳＰＯＦＳ　Ｉ＋６４，－１６，－１６
  395. 　　ＥＸＰＣＮＴ（Ｉ）＝ＥＸＰＣＮＴ（Ｉ）＋１
  396. 　ＮＥＸＴ
  397. ＲＥＴＵＲＮ
  399. ＠ＤＩＳＰＳＣＯＲ　’スコア　ヒョウシ゛
  400. 　ＬＯＣＡＴＥ　８，０
  401. 　ＰＲＩＮＴ　”ＳＣＯＲＥ：”；ＳＣＯＲＥ
  402. ＲＥＴＵＲＮ
  404. ＠ＭＹＳＨＩＰ　’フ゜レイヤ－
  405. 　ＩＦ　ＭＹＣＮＴ＜２４　ＴＨＥＮ　ＭＹＹ＝ＭＹＹ－２
  406. 　ＩＦ　ＭＹＣＮＴ＝＝１２８　ＴＨＥＮ　ＭＹＳＴＡＴ＝０
  408. 　ＳＰＣＨＲ　０，２８８：ＳＰＣＨＲ　１，２８９
  409. 　ＩＦ　ＢＴＮ　ＡＮＤ　１　ＴＨＥＮ　ＭＹＹ＝ＭＹＹ－ＭＹＳＰＤ
  410. 　ＩＦ　ＢＴＮ　ＡＮＤ　２　ＴＨＥＮ　ＭＹＹ＝ＭＹＹ＋ＭＹＳＰＤ
  411. 　ＩＦ　ＢＴＮ　ＡＮＤ　４　ＴＨＥＮ　ＭＹＸ＝ＭＹＸ－ＭＹＳＰＤ：ＳＰＣＨＲ　０，２９２：ＳＰＣＨＲ　１，２９３
  412. 　ＩＦ　ＢＴＮ　ＡＮＤ　８　ＴＨＥＮ　ＭＹＸ＝ＭＹＸ＋ＭＹＳＰＤ：ＳＰＣＨＲ　０，２９０：ＳＰＣＨＲ　１，２９１
  414. 　ＩＦ　ＭＹＸ＜０　ＴＨＥＮ　ＭＹＸ＝０
  415. 　ＩＦ　ＭＹＸ＞２３９　ＴＨＥＮ　ＭＹＸ＝２３９
  416. 　ＩＦ　ＭＹＹ＜０　ＴＨＥＮ　ＭＹＹ＝０
  417. 　ＩＦ　ＭＹＹ＞１７５　ＴＨＥＮ　ＭＹＹ＝１７５
  419. 　ＩＦ　ＭＹＣＮＴ％４　ＴＨＥＮ　＠ＧＭＳＨＴＨＲＵ
  420. 　ＩＦ　ＢＴＮ　ＡＮＤ　１６　ＴＨＥＮ　ＧＯＳＵＢ　＠ＧＥＮＭＹＳＨＴ
  421. 　＠ＧＭＳＨＴＨＲＵ
  423. 　ＦＯＲ　Ｉ＝０　ＴＯ　３１
  424. 　　ＩＦ　ＥＮＳＨＯＴＸ（Ｉ）＝＝ＵＮＵＳＥＤ　ＴＨＥＮ　＠ＥＳＪＤＴＨＲＵ
  425. 　　ＩＦ　ＥＮＳＨＯＴＸ（Ｉ）＜ＭＹＸ－８　ＴＨＥＮ　＠ＥＳＪＤＴＨＲＵ
  426. 　　ＩＦ　ＥＮＳＨＯＴＸ（Ｉ）＞ＭＹＸ＋８　ＴＨＥＮ　＠ＥＳＪＤＴＨＲＵ
  427. 　　ＩＦ　ＥＮＳＨＯＴＹ（Ｉ）＜ＭＹＹ－８　ＴＨＥＮ　＠ＥＳＪＤＴＨＲＵ
  428. 　　ＩＦ　ＥＮＳＨＯＴＹ（Ｉ）＞ＭＹＹ＋８　ＴＨＥＮ　＠ＥＳＪＤＴＨＲＵ
  429. 　　ＧＭＯＶＦＬＧ＝ＴＲＵＥ
  430. 　　ＰＨＡＳＥ＝３
  431. 　　ＢＥＥＰ　１１
  432. 　　ＢＧＭＰＬＡＹ　６
  433. 　　ＳＰＯＦＳ　０，－１６，－１６
  434. 　　ＳＰＯＦＳ　１，－１６，－１６
  435. 　　ＲＥＴＵＲＮ
  436. 　　＠ＥＳＪＤＴＨＲＵ
  437. 　ＮＥＸＴ
  439. 　ＳＰＯＦＳ　０，ＭＹＸ，ＭＹＹ－５，２
  440. 　ＳＰＯＦＳ　１，ＭＹＸ，ＭＹＹ＋５，２
  441. 　ＭＹＣＮＴ＝ＭＹＣＮＴ＋１
  442. ＲＥＴＵＲＮ
  444. ＠ＧＥＮＭＹＳＨＴ　’ショット　セイセイ
  445. 　Ｍ＝ＭＳＨＣＮＴ
  446. 　ＩＦ　ＭＹＳＨＯＴＸ（Ｍ）！＝ＵＮＵＳＥＤ　ＴＨＥＮ　ＲＥＴＵＲＮ
  447. 　ＢＥＥＰ　９
  448. 　ＭＹＳＨＯＴＸ（Ｍ）＝ＭＹＸ
  449. 　ＭＹＳＨＯＴＹ（Ｍ）＝ＭＹＹ
  450. 　ＳＰＯＦＳ　Ｍ＋８，ＭＹＸ，ＭＹＹ
  451. 　ＭＳＨＣＮＴ＝ＭＳＨＣＮＴ＋１
  452. 　ＩＦ　ＭＳＨＣＮＴ＞＝ＭＳＨＭＡＸ　ＴＨＥＮ　ＭＳＨＣＮＴ＝０
  453. ＲＥＴＵＲＮ
  455. ’┌─────────────────────────┐
  456. ’│オワリ　　　　　　　　　　　　　　　　　　　　　　│
  457. ’└─────────────────────────┘