プチコン

  1. ’┌──────────────┐
  2. ’│ＳＡＭＰＬＥ６　　　　　　　│
  3. ’│　シ－ケンサ－　ｖ１．００　│
  4. ’└──────────────┘
  5. ＶＩＳＩＢＬＥ　１，１，１，１，０，０
  6. ＢＧＭＳＴＯＰ
  7. ’－－－
  8. ＣＬＥＡＲ
  9. ＤＩＭ　Ｓ（８，１６）
  10. ＤＩＭ　Ｎ（８）
  11. ＤＩＭ　Ｆ（８，１６），Ｖ（８，１６），Ｐ（８，１６）
  12. ＤＡＴＡ　５２，５３，２７，２６，２８，６２，４７，２５
  13. ＦＯＲ　Ｉ＝０　ＴＯ　７：ＲＥＡＤ　Ｎ（Ｉ）：ＮＥＸＴ
  14. ＭＡＸ＝８
  15. ＧＯＳＵＢ　＠ＳＣＩＮＩＴ
  17. ’－－－
  18. ＧＯＳＵＢ　＠ＩＮＩＴ
  19. ＧＯＳＵＢ　＠ＳＣＰＵＴ
  20. ＩＣＯＮＳＥＴ　２，５　：’ＰＥＮ
  21. ＩＣＯＮＳＥＴ　３，３９：’ＥＲＡＳＥＲ
  23. ’－－－
  24. ＴＭＰ＝１２０：ＴＴ＝１／６０：ＴＣ＝ＴＴ
  25. ＧＯＳＵＢ　＠ＣＬＣＴＭＰ
  26. ＭＤ＝０：ＯＦＳ＝０
  27. ＰＬＹ＝ＦＡＬＳＥ
  29. ’－－－
  30. ＠ＬＯＯＰ
  31. 　’
  32. 　ＯＬＤＢ＝Ｂ：Ｂ＝ＢＵＴＴＯＮ（）
  33. 　ＯＬＤＳＴ＝ＴＳＴ：ＯＴＸ＝ＴＸ：ＯＴＹ＝ＴＹ
  34. 　ＴＳＴ＝ＴＣＨＳＴ：ＴＸ＝ＴＣＨＸ：ＴＹ＝ＴＣＨＹ
  35. 　’
  36. 　ＧＯＳＵＢ　＠ＣＴＲＬ
  37. 　ＧＯＳＵＢ　＠ＳＥＱＥＤＩＴ
  38. 　ＧＯＳＵＢ　＠ＳＥＱＰＬＡＹ
  39. 　ＧＯＳＵＢ　＠ＰＵＴＳＴ
  40. 　’
  41. 　ＶＳＹＮＣ（１）
  42. 　’
  43. ＧＯＴＯ　＠ＬＯＯＰ
  45. ＥＮＤ
  47. ’－－－
  48. ＠ＰＵＴＳＴ
  49. ＬＯＣＡＴＥ　２４，０
  50. ＰＲＩＮＴ　”ＳＰＤ：　　　”；
  51. ＬＯＣＡＴＥ　ＣＳＲＸ－３，０
  52. ＰＲＩＮＴ　ＴＭＰ；
  53. ＲＥＴＵＲＮ
  55. ’－－－
  56. ＠ＣＴＲＬ
  57. ＯＴ＝ＴＭＰ
  58. Ｉ＝ＩＣＯＮＣＨＫ（）
  59. ＩＦ　Ｉ！＝－１　ＴＨＥＮ　ＭＤ＝Ｉ－２
  60. ’－－－
  61. ＩＦ　ＯＬＤＢ＝＝Ｂ　ＴＨＥＮ　ＲＥＴＵＲＮ
  62. ＩＦ　Ｂ＝＝６４　ＴＨＥＮ　ＧＯＳＵＢ　＠ＳＣＣＬＲ
  63. ＩＦ　Ｂ＝＝４　ＴＨＥＮ　ＴＭＰ＝ＴＭＰ－１
  64. ＩＦ　Ｂ＝＝８　ＴＨＥＮ　ＴＭＰ＝ＴＭＰ＋１
  65. ＩＦ　ＴＭＰ＜１０　　ＴＨＥＮ　ＴＭＰ＝１０
  66. ＩＦ　ＴＭＰ＞２４０　ＴＨＥＮ　ＴＭＰ＝２４０
  67. ＩＦ　ＯＴ！＝ＴＭＰ　ＴＨＥＮ　ＧＯＳＵＢ　＠ＣＬＣＴＭＰ
  68. ＲＥＴＵＲＮ
  70. ’－－－
  71. ＠ＳＣＣＬＲ
  72. ＧＯＳＵＢ　＠ＳＣＩＮＩＴ
  73. ＦＯＲ　Ｉ＝０　ＴＯ　ＭＡＸ－１
  74. 　ＦＯＲ　Ｏ＝０　ＴＯ　１５
  75. 　　ＧＯＳＵＢ　＠ＳＣＰＵＴ１
  76. 　ＮＥＸＴ
  77. ＮＥＸＴ
  78. ＲＥＴＵＲＮ
  80. ’－－－
  81. ＠ＳＥＱＥＤＩＴ
  82. ＩＦ　ＴＳＴ＝＝ＦＡＬＳＥ　ＴＨＥＮ　ＲＥＴＵＲＮ
  83. Ｃ＝１：ＩＦ　ＭＤ＝＝１　ＴＨＥＮ　Ｃ＝０
  84. Ｘ＝ＦＬＯＯＲ（ＴＸ／８）
  85. Ｙ＝ＦＬＯＯＲ（ＴＹ／８）
  86. ＥＹ＝ＭＡＸ＊２＋ＳＹ－１
  87. ＩＦ　Ｙ＜ＳＹ　ＴＨＥＮ　ＲＥＴＵＲＮ
  88. ＩＦ　Ｙ＞ＥＹ　ＴＨＥＮ　ＲＥＴＵＲＮ
  89. Ｏ＝ＦＬＯＯＲ（Ｘ／２）
  90. Ｉ＝ＦＬＯＯＲ（（Ｙ－ＳＹ）／２）
  91. Ｓ（Ｉ，Ｏ）＝Ｃ
  92. ＧＯＳＵＢ　＠ＳＣＰＵＴ１
  93. ＲＥＴＵＲＮ
  95. ’－－－
  96. ＠ＣＬＣＴＭＰ
  97. Ｔ＝６０＊６０　：’ＶＳＹＮＣ（１）→１／６０ＳＥＣ
  98. Ｃ＝ＴＭＰ＊４　：’１６フ゛オンフ゜キシ゛ュン
  99. ＴＭＡＸ＝Ｔ／Ｃ／４８　：’フ゛ンカイノウ４８
  100. ＲＥＴＵＲＮ
  102. ’－－－
  103. ＠ＳＥＱＰＬＡＹ
  104. ’－－－
  105. ＬＯＣＡＴＥ　０，２２：ＰＲＩＮＴ　ＴＭＡＸ，ＴＴ，ＴＣ
  106. ＴＣ＝ＴＣ－ＴＴ
  107. ＩＦ　ＴＣ＞０　ＴＨＥＮ　ＲＥＴＵＲＮ
  108. ＧＯＳＵＢ　＠ＳＣＰＬＡＹ
  109. ＴＣ＝ＴＣ＋ＴＭＡＸ
  110. ＲＥＴＵＲＮ
  111. ’－－－
  112. ＠ＳＣＰＬＡＹ
  113. ＦＯＲ　Ｉ＝０　ＴＯ　ＭＡＸ－１
  114. 　ＩＦ　Ｓ（Ｉ，ＯＦＳ）＝＝０　ＧＯＴＯ　＠ＳＣＰＳＫＩＰ
  115. 　ＢＥＥＰ　Ｎ（Ｉ），Ｆ（Ｉ，ＯＦＳ），Ｖ（Ｉ，ＯＦＳ），Ｐ（Ｉ，ＯＦＳ）
  116. ＠ＳＣＰＳＫＩＰ
  117. ＮＥＸＴ
  118. ’－－－
  119. ＯＦＳ＝ＯＦＳ＋１
  120. ＯＦＳ＝ＯＦＳ　ＡＮＤ　１５
  121. ＢＧＰＡＧＥ　１
  122. ＢＧＯＦＳ　１，－ＯＦＳ＊１６，０
  123. ＢＧＰＡＧＥ　０
  124. ＢＧＯＦＳ　１，－ＯＦＳ＊１６，０
  125. ＲＥＴＵＲＮ
  127. ’－－－
  128. ＠ＳＣＩＮＩＴ
  129. ’－－－
  130. ＦＯＲ　Ｉ＝０　ＴＯ　ＭＡＸ－１
  131. 　ＦＯＲ　Ｏ＝０　ＴＯ　１５
  132. 　　Ｓ（Ｉ，Ｏ）＝０：’ＲＮＤ（２）
  133. 　　Ｆ（Ｉ，Ｏ）＝０：’ＲＮＤ（８１９２）－４０９６
  134. 　　Ｖ（Ｉ，Ｏ）＝１２７：’ＲＮＤ（１００）＋２７
  135. 　　Ｐ（Ｉ，Ｏ）＝６４：’ＲＮＤ（１２８）
  136. 　ＮＥＸＴ
  137. ＮＥＸＴ
  138. ＲＥＴＵＲＮ
  140. ’－－－
  141. ＠ＳＣＰＵＴ１　’Ｉ＝ＮＯ，Ｏ＝ＯＦＳ
  142. ’－－－
  143. Ｘ＝Ｏ＊２＋ＳＸ：Ｙ＝Ｉ＊２＋ＳＹ：Ｃ＝０
  144. Ｄ＝Ｉ＋２：ＩＦ　Ｓ（Ｉ，Ｏ）＝＝０　ＴＨＥＮ　Ｄ＝０
  145. ＢＧＰＡＧＥ　１
  146. ＧＯＳＵＢ　＠ＢＧＢＯＸ
  147. Ｃ＝１
  148. ＢＧＰＡＧＥ　０
  149. ’－－－
  150. ＠ＢＧＢＯＸ
  151. ＢＧＰＵＴ　０，Ｘ＋０，Ｙ＋０，Ｄ，Ｃ，０，０
  152. ＢＧＰＵＴ　０，Ｘ＋１，Ｙ＋０，Ｄ，Ｃ，０，０
  153. ＢＧＰＵＴ　０，Ｘ＋０，Ｙ＋１，Ｄ，Ｃ，０，０
  154. ＢＧＰＵＴ　０，Ｘ＋１，Ｙ＋１，Ｄ，Ｃ，０，０
  155. ＲＥＴＵＲＮ
  156. ’－－－
  157. ＠ＳＣＰＵＴ
  158. ’－－－
  159. ＦＯＲ　Ｉ＝０　ＴＯ　ＭＡＸ－１
  160. 　ＦＯＲ　Ｏ＝０　ＴＯ　１５
  161. 　　ＧＯＳＵＢ　＠ＳＣＰＵＴ１
  162. 　ＮＥＸＴ
  163. ＮＥＸＴ
  164. ＲＥＴＵＲＮ
  166. ’－－－
  167. ＠ＩＮＩＴ
  168. ＰＮＬＴＹＰＥ　”ＯＦＦ”
  169. ＦＯＲ　Ｉ＝０　ＴＯ　１
  170. 　ＢＧＰＡＧＥ　Ｉ
  171. 　ＢＧＯＦＳ　０，０，０
  172. 　ＢＧＯＦＳ　１，０，０
  173. 　ＢＧＣＬＩＰ　０，０，３１，２３
  174. ＮＥＸＴ
  175. ’－－－
  176. ＣＬＳ：ＣＯＬＯＲ　７
  177. ＰＲＩＮＴ”┌┐┌┐┌┐──┌┐┬┐┌┐┌┐┬┐”
  178. ＰＲＩＮＴ”└┐├┘││││├┘│││　├┘│　”
  179. ＰＲＩＮＴ”└┘└┘└┤└┴└┘──└┘└┘──　ｖ１．０”
  180. ＣＯＬＯＲ　０
  181. Ｘ＝０：Ｙ＝ＣＳＲＹ＋１
  182. ＣＯＬＯＲ　１
  183. ＬＯＣＡＴＥ　Ｘ，Ｙ：ＰＲＩＮＴ”０　１　２　３　４　５　６　７　８　９　Ａ　Ｂ　Ｃ　Ｄ　Ｅ　Ｆ”；
  184. ＣＯＬＯＲ　０
  185. ＰＮＬＳＴＲ　Ｘ，Ｙ，”０　１　２　３　４　５　６　７　８　９　Ａ　Ｂ　Ｃ　Ｄ　Ｅ　Ｆ”；
  186. Ｙ＝Ｙ＋１
  187. ＳＸ＝Ｘ：ＳＹ＝Ｙ
  188. ＦＯＲ　Ｉ＝０　ＴＯ　ＭＡＸ－１
  189. 　ＣＯＬＯＲ　１
  190. 　ＬＯＣＡＴＥ　Ｘ，Ｙ＋０：ＰＲＩＮＴ”ТТСТСТСТСТСТСТСТСТСТСТСТСТСТСТСТ”；
  191. 　ＬＯＣＡＴＥ　Ｘ，Ｙ＋１：ＰＲＩＮＴ”　　У　У　У　У　У　У　У　У　У　У　У　У　У　У　У　”；
  192. 　ＣＯＬＯＲ　０
  193. 　ＰＮＬＳＴＲ　Ｘ，Ｙ＋０，”ТТСТСТСТСТСТСТСТСТСТСТСТСТСТСТСТ”；
  194. 　ＰＮＬＳＴＲ　Ｘ，Ｙ＋１，”　　У　У　У　У　У　У　У　У　У　У　У　У　У　У　У　”；
  195. 　Ｙ＝Ｙ＋２
  196. ＮＥＸＴ
  197. ＣＯＬＯＲ　１
  198. ＬＯＣＡＴＥ　Ｘ，Ｙ：ＰＲＩＮＴ”ТТТТТТТТТТТТТТТТТТТТТТТТТТТТТТТТ”；
  199. ＣＯＬＯＲ　０
  200. ＰＮＬＳＴＲ　Ｘ，Ｙ，”ТТТТТТТТТТТТТТТТТТТТТТТТТТТТТТТТ”；
  201. ’－－－
  202. ＰＮＬＳＴＲ　０，０，”Ф：ＣＬＥＡＲ”
  203. ’－－－
  204. ＢＧＰＡＧＥ　１
  205. ＧＯＳＵＢ　＠ＢＧＣＬＳ
  206. Ｃ＝１：ＧＯＳＵＢ　＠ＯＦＳＢＡＲ
  207. ＢＧＰＡＧＥ　０
  208. ＧＯＳＵＢ　＠ＢＧＣＬＳ
  209. Ｃ＝２：ＧＯＳＵＢ　＠ＯＦＳＢＡＲ
  210. ＲＥＴＵＲＮ
  212. ’－－－
  213. ＠ＯＦＳＢＡＲ
  214. Ｏ＝８＊２
  215. ＦＯＲ　Ｙ＝０　ＴＯ　２３
  216. 　ＢＧＰＵＴ　１，０，Ｙ，１５，Ｃ，０，０
  217. 　ＢＧＰＵＴ　１，１，Ｙ，１５，Ｃ，０，０
  218. ＮＥＸＴ
  219. ＲＥＴＵＲＮ
  221. ’－－－
  222. ＠ＢＧＣＬＳ
  223. ＦＯＲ　Ｘ＝０　ＴＯ　６３
  224. 　ＦＯＲ　Ｙ＝０　ＴＯ　２３
  225. 　　ＢＧＰＵＴ　０，Ｘ，Ｙ，０，０，０，０
  226. 　　ＢＧＰＵＴ　１，Ｘ，Ｙ，１５，１４，０，０
  227. 　ＮＥＸＴ
  228. ＮＥＸＴ
  229. ＲＥＴＵＲＮ

動作ムービーを見る