プチコンまとめWiki (初代/mkII)

投稿プログラム : 8Cheeses

パンくずリスト

2012年5月12日投稿 / 投稿者 : サブ / タグ : 投稿プログラム ゲーム パズル QRコード mkII専用

概要

左に積まれたチーズを全て右端に移動させるゲームです。移動するチーズより数字の大きいチーズの上には置けません。 要するにハノイの塔です。絵的にチーズに見えないと思いますがご勘弁ください。チーズの数は８，９，１０のいずれかから選べます。

元ネタはH.E.Dudeneyの"The Canterbury Puzzles"というパズル本です。The Canterbury PuzzlesではThe Reve's Puzzlesという題で 載っていますが、今回は"8Cheeses"というわかりやすい題名にしました。

このゲームをクリアするのに必要な最小移動数は、チーズが８個のときは３３手、９個のときは（たぶん）４１手、１０個のときは４９手になります。 原文にはチーズが８，１０個のときの答えは載っているのですが９個の場合が記載されていません。そのため９個の場合の最小移動数は僕が 計算しましたが、もしかしたら間違っているかもしれません。もし４１手より少ない移動数でクリアできた時はご報告いただけるとうれしいです。

スクリーンショット・動画

QR コード

プチコンmkII 向けの QR コードです。

1/2

qr0.png

2/2

qr1.png

プログラムリスト

  1. ＣＬＥＡＲ
  2. ＶＩＳＩＢＬＥ　１，１，０，０，０，０
  3. ＣＬＳ
  5. ＮＵＭ＿ＳＴＯＯＬ＝４
  6. ＭＯＶＥ＝１
  7. ＭＩＮ＿ＭＯＶＥ＝３３
  9. ＰＲＩＮＴ”┌───────────────────┐”
  10. ＰＲＩＮＴ”│ヒタ゛リニツマレタチース゛ヲスヘ゛テ　│”
  11. ＰＲＩＮＴ”│ミキ゛ハシニイト゛ウサセテクタ゛サイ。│”
  12. ＰＲＩＮＴ”│イト゛ウスルチース゛ヨリスウシ゛カ゛　│”
  13. ＰＲＩＮＴ”│オオキイチース゛ノウエニハオケマセン。│”
  14. ＰＲＩＮＴ”└───────────────────┘”
  16. ＩＮＰＵＴ”チースノカス゛ハ（８，９，１０イツ゛レカ）”；ＣＨＳ＿ＮＵＭ
  17. ＩＦ　ＣＨＳ＿ＮＵＭ！＝９　ＡＮＤ　ＣＨＳ＿ＮＵＭ！＝１０　ＴＨＥＮ　ＣＨＳ＿ＮＵＭ＝８
  18. ＣＬＳ
  20. ＩＦ　ＣＨＳ＿ＮＵＭ＝＝９　ＴＨＥＮ　ＭＩＮ＿ＭＯＶＥ＝４１
  21. ＩＦ　ＣＨＳ＿ＮＵＭ＝＝１０　ＴＨＥＮ　ＭＩＮ＿ＭＯＶＥ＝４９
  23. ＤＩＭ　ＣＨＥＥＳＥ＄（ＣＨＳ＿ＮＵＭ）
  24. ＤＩＭ　ＳＴＯＯＬ（ＮＵＭ＿ＳＴＯＯＬ）
  25. ＤＩＭ　ＣＨＳ＿ＰＯＳ（ＣＨＳ＿ＮＵＭ＊ＮＵＭ＿ＳＴＯＯＬ）
  26. ＤＩＭ　ＴＯＰ（ＮＵＭ＿ＳＴＯＯＬ）
  27. ＤＩＭ　ＣＯＬＵＭＮ（ＮＵＭ＿ＳＴＯＯＬ）
  29. ＦＯＲ　Ｉ＝０　ＴＯ　ＣＨＳ＿ＮＵＭ−１
  30. 　ＲＥＡＤ　ＣＨＥＥＳＥ＄（Ｉ）
  31. ＮＥＸＴ
  33. ＤＡＴＡ”├─０─┤”
  34. ＤＡＴＡ”├─１─┤”
  35. ＤＡＴＡ”├─２─┤”
  36. ＤＡＴＡ”├─３─┤”
  37. ＤＡＴＡ”├─４─┤”
  38. ＤＡＴＡ”├─５─┤”
  39. ＤＡＴＡ”├─６─┤”
  40. ＤＡＴＡ”├─７─┤”
  41. ＤＡＴＡ”├─８─┤”
  42. ＤＡＴＡ”├─９─┤”
  44. ＦＯＲ　Ｉ＝０　ＴＯ　ＮＵＭ＿ＳＴＯＯＬ−１
  45. 　ＳＴＯＯＬ（Ｉ）＝Ｉ＊６
  46. ＮＥＸＴ
  48. ＦＯＲ　Ｉ＝１　ＴＯ　ＮＵＭ＿ＳＴＯＯＬ−１
  49. 　ＦＯＲ　Ｊ＝０　ＴＯ　ＣＨＳ＿ＮＵＭ−１
  50. 　　ＣＨＳ＿ＰＯＳ（Ｉ＊ＣＨＳ＿ＮＵＭ＋Ｊ）＝−１
  51. 　ＮＥＸＴ
  52. ＮＥＸＴ
  53. ＦＯＲ　Ｋ＝０　ＴＯ　ＣＨＳ＿ＮＵＭ−１
  54. 　ＣＨＳ＿ＰＯＳ（Ｋ）＝Ｋ
  55. ＮＥＸＴ
  57. ＦＯＲ　Ｉ＝１　ＴＯ　ＮＵＭ＿ＳＴＯＯＬ−１
  58. 　ＴＯＰ（Ｉ）＝ＣＨＳ＿ＮＵＭ
  59. ＮＥＸＴ
  60. ＴＯＰ（０）＝０
  62. ＦＯＲ　Ｉ＝１　ＴＯ　ＮＵＭ＿ＳＴＯＯＬ−１
  63. 　ＣＯＬＵＭＮ（Ｉ）＝０
  64. ＮＥＸＴ
  65. ＣＯＬＵＭＮ（０）＝ＣＨＳ＿ＮＵＭ
  67. ＦＯＲ　Ｉ＝０　ＴＯ　ＣＨＳ＿ＮＵＭ−１
  68. 　ＬＯＣＡＴＥ　ＳＴＯＯＬ（０），Ｉ
  69. 　ＰＲＩＮＴ　ＣＨＥＥＳＥ＄（Ｉ）
  70. ＮＥＸＴ
  72. ＦＯＲ　Ｉ＝０　ＴＯ　ＮＵＭ＿ＳＴＯＯＬ−１
  73. 　ＬＯＣＡＴＥ　ＳＴＯＯＬ（Ｉ）＋１，ＣＨＳ＿ＮＵＭ
  74. 　ＰＲＩＮＴ”（”；Ｉ＋１；”）”
  75. ＮＥＸＴ
  77. ＠ＭＡＩＮ
  79. ＬＯＣＡＴＥ　０，ＣＨＳ＿ＮＵＭ＋２
  80. ＰＲＩＮＴ”ＭＯＶＥ：”；ＭＯＶＥ；”　サイショウイト゛ウ　”；ＭＩＮ＿ＭＯＶＥ
  82. ＦＲＯＭ＿ＳＴＬ＝０
  83. ＴＯ＿ＳＴＬ＝０
  85. ＧＯＳＵＢ　＠ＩＮＰＵＴ
  87. ＰＲＩＮＴ　ＦＲＯＭ＿ＳＴＬ；”カラ”；ＴＯ＿ＳＴＬ；”ニイト゛ウ　　　”
  88. Ｆ＿ＳＴＬ＝ＦＲＯＭ＿ＳＴＬ−１
  89. Ｔ＿ＳＴＬ＝ＴＯ＿ＳＴＬ−１
  91. ＬＯＣＡＴＥ　ＳＴＯＯＬ（Ｆ＿ＳＴＬ），ＣＨＳ＿ＮＵＭ−ＣＯＬＵＭＮ（Ｆ＿ＳＴＬ）
  92. ＰＲＩＮＴ”　　　　　”
  93. ＬＯＣＡＴＥ　ＳＴＯＯＬ（Ｔ＿ＳＴＬ），ＣＨＳ＿ＮＵＭ−ＣＯＬＵＭＮ（Ｔ＿ＳＴＬ−１）
  94. ＰＲＩＮＴ　ＣＨＥＥＳＥ＄（ＴＯＰ（Ｆ＿ＳＴＬ））
  96. ＣＨＳ＿ＰＯＳ（ＣＨＳ＿ＮＵＭ＊Ｆ＿ＳＴＬ＋ＣＨＳ＿ＮＵＭ−ＣＯＬＵＭＮ（Ｆ＿ＳＴＬ））＝−１
  97. ＣＯＬＵＭＮ（Ｆ＿ＳＴＬ）＝ＣＯＬＵＭＮ（Ｆ＿ＳＴＬ）−１
  98. ＣＯＬＵＭＮ（Ｔ＿ＳＴＬ）＝ＣＯＬＵＭＮ（Ｔ＿ＳＴＬ）＋１
  99. ＣＨＳ＿ＰＯＳ（ＣＨＳ＿ＮＵＭ＊Ｔ＿ＳＴＬ＋ＣＨＳ＿ＮＵＭ−ＣＯＬＵＭＮ（Ｔ＿ＳＴＬ））＝ＴＯＰ（Ｆ＿ＳＴＬ）
  100. ＴＯＰ（Ｔ＿ＳＴＬ）＝ＴＯＰ（Ｆ＿ＳＴＬ）
  101. ＩＦ　ＣＯＬＵＭＮ（Ｆ＿ＳＴＬ）＝＝０　ＴＨＥＮ　ＴＯＰ（Ｆ＿ＳＴＬ）＝ＣＨＳ＿ＮＵＭ
  102. ＩＦ　ＣＯＬＵＭＮ（Ｆ＿ＳＴＬ）＞０　ＴＨＥＮ　ＴＯＰ（Ｆ＿ＳＴＬ）＝ＣＨＳ＿ＰＯＳ（ＣＨＳ＿ＮＵＭ＊Ｆ＿ＳＴＬ＋ＣＨＳ＿ＮＵＭ−ＣＯＬＵＭＮ（Ｆ＿ＳＴＬ））
  104. ＭＯＶＥ＝ＭＯＶＥ＋１
  106. ＩＦ　ＣＯＬＵＭＮ（ＮＵＭ＿ＳＴＯＯＬ−１）＜ＣＨＳ＿ＮＵＭ　ＴＨＥＮ　ＧＯＴＯ　＠ＭＡＩＮ　ＥＬＳＥ　ＰＲＩＮＴ”ＣＬＥＡＲ！”
  108. ＥＮＤ
  110. ＠ＩＮＰＵＴ
  111. ＧＯＳＵＢ　＠ＩＮＰＵＴ＿Ｆ
  112. ＰＲＩＮＴ”　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　”
  113. ＧＯＳＵＢ　＠ＩＮＰＵＴ＿Ｔ
  114. ＰＲＩＮＴ”　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　”
  115. ＩＦ　ＴＯＰ（ＦＲＯＭ＿ＳＴＬ−１）＜ＴＯＰ（ＴＯ＿ＳＴＬ−１）　ＡＮＤ　ＣＯＬＵＭＮ（ＦＲＯＭ＿ＳＴＬ−１）＞０　ＴＨＥＮ　ＲＥＴＵＲＮ
  116. ＰＲＩＮＴ”ムコウナイト゛ウテ゛ス”
  117. ＧＯＴＯ　＠ＩＮＰＵＴ
  119. ＠ＩＮＰＵＴ＿Ｆ
  120. ＬＯＣＡＴＥ　０，ＣＨＳ＿ＮＵＭ＋３
  121. ＩＮＰＵＴ”ト゛コカラ”；ＦＲＯＭ＿ＳＴＬ
  122. ＩＦ　ＦＲＯＭ＿ＳＴＬ＞０　ＡＮＤ　ＦＲＯＭ＿ＳＴＬ＜ＮＵＭ＿ＳＴＯＯＬ＋１　ＴＨＥＮ　ＲＥＴＵＲＮ
  123. ＰＲＩＮＴ”１，２，３，４ノイツ゛レカヲニュウリョクシテクタ゛サイ”
  124. ＧＯＴＯ　＠ＩＮＰＵＴ＿Ｆ
  126. ＠ＩＮＰＵＴ＿Ｔ
  127. ＬＯＣＡＴＥ　０，ＣＨＳ＿ＮＵＭ＋６
  128. ＩＮＰＵＴ”ト゛コニ”；ＴＯ＿ＳＴＬ
  129. ＩＦ　ＴＯ＿ＳＴＬ＞０　ＡＮＤ　ＴＯ＿ＳＴＬ＜ＮＵＭ＿ＳＴＯＯＬ＋１　ＴＨＥＮ　ＲＥＴＵＲＮ
  130. ＰＲＩＮＴ”１，２，３，４ノイツ゛レカヲニュウリョクシテクタ゛サイ”
  131. ＧＯＴＯ　＠ＩＮＰＵＴ＿Ｔ

CHECKER FLAG (ひとことコメント)

この作品に対するコメントがあれば一言どうぞ。(作品に直接関係ない質問や雑談は掲示板へ)

  • 名無しさん : QRコード欲しいっていうやつが現れそうだから　つhttp://www2.u-netsurf.ne.jp/~ozawa/petitcom/petiteditor.html (2012/05/12 (土) 14:23:06)
  • サブ : ＱＲコードを追加しました (2012/05/12 (土) 14:49:05)
  • ジオライド : 手数は確か 個数^2-1だったハズ。 (2012/05/12 (土) 15:27:21)
  • 名無しさん : タッチペンでできるようにしたほうが良いと思う (2012/05/12 (土) 19:15:11)
  • ロジウム : Cheeseの複数形はCheeseでは? (2012/05/12 (土) 21:13:11)
  • 名無しさん : そうだ!そうだ! (2012/05/13 (日) 18:03:51)
  • tokei : レイトン教授悪魔の箱にあった。パンケーキで。 (2012/07/15 (日) 15:31:31)

表示モード : [ スマホ・3DS対応表示 | クラシック表示 ]
PukiWiki 1.4.7 Copyright © 2001-2006 PukiWiki Developers Team. License is GPL. Based on "PukiWiki" 1.3 by yu-ji
ページの処理時間 : 0.114 秒 | このページの最終更新 : 2022/09/20 (火) 12:44:09 (565d) | ログイン
Copyright(C) 2011-2014 プチコンまとめWiki ◆1sxkymI8ji30