プチコンmkII
  1. ’┌───────────────────┐
  2. ’│ＳＡＭＰＬＥ３　　　　　　　　　　　　│
  3. ’│　カンイ「ケンハ゛ン」ト「ト゛ラム」　│
  4. ’└───────────────────┘
  5. ＶＩＳＩＢＬＥ　１，１，０，０，０，０
  6. ＣＬＳ：ＣＯＬＯＲ　０
  7. ＳＹＳＢＥＥＰ＝ＦＡＬＳＥ
  8. ＰＲＩＮＴ”ＫＥＹＢＯＡＲＤ＋ＤＲＵＭＳ　ｖ１．１”
  9. ＰＲＩＮＴ
  10. ＰＲＩＮＴ”　┌─┬─┐　┌─┬─┬─┐　┌─┬─┐　┌─┐”
  11. ＰＲＩＮＴ”　│Ａ│Ｓ│　│Ｆ│Ｇ│Ｈ│　│Ｋ│Ｌ│　│：│”
  12. ＰＲＩＮＴ”┌┴┬┴┬┴┬┴┬┴┬┴┬┴┬┴┬┴┬┴┬┴┬┴┐”
  13. ＰＲＩＮＴ”│’│Ｚ│Ｘ│Ｃ│Ｖ│Ｂ│Ｎ│Ｍ│，│．│／│％│”
  14. ＰＲＩＮＴ”└─┴─┴─┴─┴─┴─┴─┴─┴─┴─┴─┴─┘”
  15. ＰＲＩＮＴ
  16. ＰＲＩＮＴ”↑：ＢＡＳＳＤＲＵＭ”
  17. ＰＲＩＮＴ”←：ＣＯＷＢＥＬＬ”
  18. ＰＲＩＮＴ”→：ＣＹＭＢＡＬ”
  19. ＰＲＩＮＴ”↓：ＳＮＡＲＥＤＲＵＭ”
  20. ＰＲＩＮＴ
  21. ＰＲＩＮＴ”Ф：ＥＸＩＴ”
  23. ’－－－　ケンハ゛ン（０－１９）
  24. ＤＡＴＡ　”’”，”Ａ”
  25. ＤＡＴＡ　”Ｚ”，”Ｓ”
  26. ＤＡＴＡ　”Ｘ”
  27. ＤＡＴＡ　”Ｃ”，”Ｆ”
  28. ＤＡＴＡ　”Ｖ”，”Ｇ”
  29. ＤＡＴＡ　”Ｂ”，”Ｈ”
  30. ＤＡＴＡ　”Ｎ”
  31. ＤＡＴＡ　”Ｍ”，”Ｋ”
  32. ＤＡＴＡ　”，”，”Ｌ”
  33. ＤＡＴＡ　”．”
  34. ＤＡＴＡ　”／”，”：”
  35. ＤＡＴＡ　”％”
  37. ’－－－
  38. ＣＬＥＡＲ
  39. ＤＩＭ　Ｎ＄（２０）
  40. ＫＣＮＴ＝２０
  41. ＦＯＲ　Ｉ＝０　ＴＯ　ＫＣＮＴ－１
  42. 　ＲＥＡＤ　Ｎ＄（Ｉ）
  43. ＮＥＸＴ　Ｉ
  45. ’－－－
  46. Ｆ＝４０９６／１２
  47. Ｖ＝２２
  49. ’
  50. ’－－－　メインル－フ゜
  51. ’
  52. ＠ＬＯＯＰ
  54. ’－－－　ト゛ラム
  55. Ｂ＝ＢＴＲＩＧ（）
  56. ＩＦ　Ｂ　ＡＮＤ　１　ＴＨＥＮ　ＢＥＥＰ　５２
  57. ＩＦ　Ｂ　ＡＮＤ　２　ＴＨＥＮ　ＢＥＥＰ　５３
  58. ＩＦ　Ｂ　ＡＮＤ　４　ＴＨＥＮ　ＢＥＥＰ　６２
  59. ＩＦ　Ｂ　ＡＮＤ　８　ＴＨＥＮ　ＢＥＥＰ　２５
  60. ＩＦ　Ｂ＝＝６４　ＧＯＴＯ　＠ＥＸＩＴ
  61. ＶＳＹＮＣ　１
  63. ’－－－
  64. ’－－－　ＦＯＲ－ＮＥＸＴ　テ゛
  65. ’－－－　トチュウカラヌケルト
  66. ’－－－　ナイフ゛メモリカ゛ヘルノテ゛
  67. ’－－－　ＧＯＴＯ　ヲツカッタル－フ゜
  68. ’－－－　
  70. Ｋ＄＝ＩＮＫＥＹ＄（）
  71. ＩＦ　Ｋ＄＝＝””　ＧＯＴＯ　＠ＬＯＯＰ
  72. Ｉ＝０
  73. ＠ＫＬＯＯＰ
  74. 　ＩＦ　Ｋ＄＝＝Ｎ＄（Ｉ）　ＧＯＴＯ　＠ＰＬＡＹ
  75. 　Ｉ＝Ｉ＋１
  76. ＩＦ　Ｉ＜ＫＣＮＴ　ＧＯＴＯ　＠ＫＬＯＯＰ
  77. ＧＯＴＯ　＠ＬＯＯＰ
  79. ’－－－
  80. ＠ＰＬＡＹ
  81. Ｐ＝Ｆ＊（Ｉ）－４０９６
  82. ＢＥＥＰ　Ｖ，Ｐ
  83. ＧＯＴＯ　＠ＬＯＯＰ
  85. ’－－－
  86. ＠ＥＸＩＴ
  87. ＳＹＳＢＥＥＰ＝ＴＲＵＥ
  88. ＥＮＤ