プチコンmkII
  1. ’┌─────────────────┐
  2. ’│ＳＡＭＰＬＥ２　　　　　　　　　　│
  3. ’│　モシ゛ニュウリョクト　フ゛ンキ　│
  4. ’└─────────────────┘
  5. ＶＩＳＩＢＬＥ　１，１，０，０，０，０
  6. ＣＬＳ：ＣＯＬＯＲ　０
  7. ＰＲＩＮＴ”┌────────────────────┐”
  8. ＰＲＩＮＴ”│ケイサンＣＯＭＰＵＴＥＲ（ニコチャンЖ）│”
  9. ＰＲＩＮＴ”└────────────────────┘”
  10. ＰＲＩＮＴ”Ж：コンニチハ　ニコチャンテ゛ス”
  11. ＰＲＩＮＴ”Ж：ホ゛クノシツモンニ　コタエテネ”
  12. ’－－－
  13. ＠ＬＯＯＰ
  14. ＰＲＩＮＴ
  15. ＣＯＬＯＲ　９
  16. ＩＮＰＵＴ”Ж：１ツメノ　スウシ゛ハ”；ＮＯ１
  17. ＣＯＬＯＲ　７
  18. ＩＮＰＵＴ”Ж：２ツメノ　スウシ゛ハ”；ＮＯ２
  19. ’－－－
  20. ＠ＭＡＲＫ
  21. ＣＯＬＯＲ　０
  22. ＰＲＩＮＴ”Ж：（１）”；ＮＯ１；”ト”；
  23. ＰＲＩＮＴ”（２）”；ＮＯ２；”テ゛スネ”
  24. ＣＯＬＯＲ　２
  25. ＰＲＩＮＴ”＋　→　（１）ト（２）ヲタス”
  26. ＰＲＩＮＴ”－　→　（１）カラ（２）ヲヒク”
  27. ＰＲＩＮＴ”／　→　（１）ヲ（２）テ゛ワル”
  28. ＰＲＩＮＴ”％　→　（１）ヲ（２）テ゛ワッタアマリ”
  29. ＰＲＩＮＴ”＊　→　（１）ト（２）ヲカケル”
  30. ＣＯＬＯＲ　０
  31. ＩＮＰＵＴ”Ж：キコ゛ウハ（＋－／％＊）”；Ｋ＄
  32. ＰＲＩＮＴ”Ж：オコタエシマス・・・”
  33. ’－－－
  34. ＭＡＲＫ＝０
  35. ＩＦ　Ｋ＄＝＝”＋”　ＴＨＥＮ　ＭＡＲＫ＝１
  36. ＩＦ　Ｋ＄＝＝”－”　ＴＨＥＮ　ＭＡＲＫ＝２
  37. ＩＦ　Ｋ＄＝＝”／”　ＴＨＥＮ　ＭＡＲＫ＝３
  38. ＩＦ　Ｋ＄＝＝”％”　ＴＨＥＮ　ＭＡＲＫ＝４
  39. ＩＦ　Ｋ＄＝＝”＊”　ＴＨＥＮ　ＭＡＲＫ＝５
  40. ＯＮ　ＭＡＲＫ　ＧＯＴＯ　＠ＳＫＩＰ，＠ＰＬＵＳ，＠ＭＩＮＵＳ，＠ＤＩＶ，＠ＭＯＤ，＠ＭＵＬ
  41. ’－－－
  42. ＠ＳＫＩＰ
  43. ＢＥＥＰ　４
  44. ＰＲＩＮＴ”Ё：シラナイキコ゛ウテ゛ス・・コ゛メン”
  45. ＰＲＩＮＴ
  46. ＧＯＴＯ　＠ＭＡＲＫ
  47. ’－－－
  48. ＠ＰＬＵＳ
  49. ＰＲＩＮＴ　ＮＯ１；”＋”；ＮＯ２；”＝”；ＮＯ１＋ＮＯ２
  50. ＧＯＴＯ　＠ＬＯＯＰ
  51. ’－－－
  52. ＠ＭＩＮＵＳ
  53. ＰＲＩＮＴ　ＮＯ１；”－”；ＮＯ２；”＝”；ＮＯ１－ＮＯ２
  54. ＧＯＴＯ　＠ＬＯＯＰ
  55. ’－－－
  56. ＠ＤＩＶ
  57. ＰＲＩＮＴ　ＮＯ１；”／”；ＮＯ２；”＝”；ＮＯ１／ＮＯ２
  58. ＧＯＴＯ　＠ＬＯＯＰ
  59. ’－－－
  60. ＠ＭＯＤ
  61. ＰＲＩＮＴ　ＮＯ１；”％”；ＮＯ２；”＝”；ＮＯ１％ＮＯ２
  62. ＧＯＴＯ　＠ＬＯＯＰ
  63. ’－－－
  64. ＠ＭＵＬ
  65. ＰＲＩＮＴ　ＮＯ１；”ｘ”；ＮＯ２；”＝”；ＮＯ１＊ＮＯ２
  66. ＧＯＴＯ　＠ＬＯＯＰ