ＰＲＧ：ＣＡＶＥ
セツメイＥＸＰＬＡＮＡＴＩＯＮ
下方向に勝手にスクロールするので、プレイヤーを十字ボタンの左右で操作して壁に当たらないようにする。You can move by cross-key horizontally to avoid walls.
1段スクロールする毎に1点加算。壁に当たるとゲームオーバー。You get 1 point by every 1 line scroll. If you bump the wall, the game is over.
ゲームオーバーになったら、Aボタンで再開、Bボタンで終了。Press A button to retry game. Press B button to exit.
ＱＲコードＱＲ ＣＯＤＥ
プログラムコードＰＲＯＧＲＡＭ ＣＯＤＥ
表示 Show
| Ｂ＄ | 壁の状態 |
| Ｃ | プレイヤー位置のキャラ情報 |
| Ｅ＄ | 新規に発生させる壁／空白の内容 |
| Ｉ | 汎用ループカウンタ |
| Ｋ | ボタンの状態 |
| Ｌ | 新規に発生させる壁／空白の位置 |
| Ｌ＄ | 壁の状態変更処理用 |
| Ｓ | スコア |
| Ｘ | プレイヤーのX座標 |
01. ＠ＴＯＰЛ
02. ＣＬＳ：Ｘ＝１５：Ｓ＝０：Ｂ＄＝”┿”Л
03. ＦＯＲ Ｉ＝Ｏ ＴＯ ２８：Ｂ＄＝Ｂ＄＋” ”：ＮＥＸＴЛ
04. ＢＧＭＰＬＡＹ ２７：Ｂ＄＝Ｂ＄＋”┿”：ＣＯＬＯＲ ４Л
05. ＦＯＲ Ｉ＝０ ＴＯ ２３：ＰＲＩＮＴ Ｂ＄：ＮＥＸＴЛ
06. ＠ＬＯＯＰЛ
07. Ｅ＄＝ＭＩＤ＄（” ╂╂ ”，ＲＮＤ（５），２）Л
08. Ｌ＝ＲＮＤ（２８）＋１：Ｌ＄＝ＭＩＤ＄（Ｂ＄，０，Ｌ）Л
09. Ｂ＄＝Ｌ＄＋Ｅ＄＋ＭＩＤ＄（Ｂ＄，Ｌ＋２，２９－Ｌ）Л
10. ＬＯＣＡＴＥ ０，２３：ＣＯＬＯＲ ４：ＰＲＩＮＴ Ｂ＄Л
11. Ｃ＝ＣＨＫＣＨＲ（Ｘ，６）：Ｋ＝ＢＵＴＴＯＮ（）Л
12. ＬＯＣＡＴＥ Ｘ，６：ＣＯＬＯＲ ３：ＰＲＩＮＴ”г”Л
13. Ｓ＝Ｓ＋１：Ｘ＝Ｘ－（Ｋ＝＝４）＋（Ｋ＝＝８）Л
14. ＷＡＩＴ ５：ＩＦ Ｃ＝＝３２ ＧＯＴＯ ＠ＬＯＯＰЛ
15. ＣＯＬＯＲ ０：ＰＲＩＮＴ ”Ｓ：”；Ｓ：ＢＧＭＳＴＯＰЛ
16. ＠ＥＮＤЛ
17. Ｋ＝ＢＵＴＴＯＮ（）：ＩＦ Ｋ＝＝３２ ＴＨＥＮ ＥＮＤЛ
18. ＩＦ Ｋ＝＝１６ ＧＯＴＯ ＠ＴＯＰ ＥＬＳＥ ＠ＥＮＤЛ
※コードのHTML生成にPTC2HTMLを使用しています。
モドル ＢＡＣＫ