ＰＲＧ：ＳＬＩＤＥ
セツメイＥＸＰＬＡＮＡＴＩＯＮ
シンプルなパズルゲームです。全100パターン。This is a simple puzzle game. There are 100 patterns.
5×5マスのフィールドには、"Z"が描かれたパネル、矢印が描かれたパネル、空のパネルが配置されています。There are a "Z" panel, arrow-panels and empty-panels in the 5x5 grid field.
矢印パネルをタップすると、その矢印パネルは空パネルになり、矢印の方向に横1列または縦1列が1マス分スライドします。フィールド外に出て行ったパネルは反対側から出てきます。If you tap an arrow-panel, it becomes an empty-panel and its row or column is slid in the direction of its arrow. A panel going out of field appears from opposite.
スライドした際、その列がすべて空パネルだった場合、空転操作と判定されてしまいます。(その際、画面に "IDLED.." と表示される)If there are only empty-panels on the sliding row or column, it is an idling slide. ( and "IDLED.." message is displayed. )
このスライドのルールを用いて、If it fulfills following conditions:
- 空転操作なしに、No idling slide.
- 全ての矢印パネルを使用して、No other arrow-panels.
- フィールドの左上にある"Z"パネルを右下に移動"Z" panel is at the right-bottom corner.
させればクリアです。Then the pattern is cleared.
フィールドを初期状態に戻します。Reset the pattern.
パズルのパターン番号を変更します。Change the pattern.
現在までの進捗をセーブします。Save your achievement.
ＱＲコードＱＲ ＣＯＤＥ
プログラムコードＰＲＯＧＲＡＭ ＣＯＤＥ
表示 Show
| Ａ | 空転操作していないか |
| Ｃ | パネルのカラーパレット番号 |
| Ｆ | アニメーション処理時のスプライトID |
| Ｆ（，） | フィールドの状態(スプライトID) |
| Ｆ＄ | パズルのパターンデータ |
| Ｉ | 汎用ループカウンタ |
| Ｋ | 各種判定用 |
| Ｌ | 1フレーム前のタッチの状態 |
| Ｍ＄ | 進捗状況の保存先ファイル名 |
| Ｎ | 矢印パネルの枚数 |
| Ｐ，Ｑ | アニメーション処理時のパネルの座標 |
| Ｒ | パズルのパターン番号 |
| Ｓ | パズルのパターン復号処理用 |
| Ｓ（） | パネルの種類(スプライトIDに対して) |
| Ｔ | 現在のタッチの状態 |
| Ｕ | アニメーション処理用スプライトID |
| Ｖ，Ｗ | パネルの移動方向 |
| Ｘ，Ｙ | パネルの座標(パターン復号時、ゲーム中) |
| Ｚ | アニメーション処理時のパネル移動速度 |
01. ＡＣＬＳ：ＣＬＥＡＲ：ＤＩＭ Ｆ（５，５），Ｓ（２６）ＳＰＰＡＧＥ １ＢＧＰＡＧＥ １ＰＮＬＴＹＰＥ”ＯＦＦЛ
02. Ｍ＄＝”ＭＥＭ：”＋ＰＲＧＮＡＭＥ＄ＬＯＡＤ Ｍ＄，０ＩＦ！ＲＥＳＵＬＴ ＴＨＥＮ ＭＥＭ＄＝”０”＊１０１Л
03. ＢＧＦＩＬＬ ０，０，０，３１，２３，１４ＢＧＦＩＬＬ ０，６，０，２５，１９，０Ｒ＝ＡＳＣ（ＭＩＤ＄（ＭＥＭ＄，１００，１））－４８Л
04. ＩＣＯＮＳＥＴ ０，６２ＩＣＯＮＳＥＴ １，４７ＩＣＯＮＳＥＴ ２，４５ＩＣＯＮＳＥＴ ３，５９ＢＧＭＰＬＡＹ ２７Л
05. ＠ＲЛ
06. Ｘ＝０Ｙ＝０Ｓ＝０Ｎ＝２４Ａ＝１Ｃ＝Ｒ／２０＋１０ＭＥＭ＄＝ＳＵＢＳＴ＄（ＭＥＭ＄，１００，１，ＣＨＲ＄（Ｒ＋４８））ＣＨＲＲＥＡＤ（”ＳＰＳ”，Ｒ／４＋９６），Ｆ＄Л
07. ＦＯＲ Ｉ＝０ＴＯ ２４ＩＦ Ｉ％３＝＝１ＴＨＥＮ Ｓ＝ＶＡＬ（”＆Ｈ”＋ＭＩＤ＄（Ｆ＄，Ｒ％４＊１６＋Ｉ／３＊２，２））Л
08. Ｆ（Ｘ，Ｙ）＝Ｉ：Ｓ（Ｉ）＝Ｓ％５＋！Ｉ＊５Ｎ＝Ｎ－！Ｓ（Ｉ）ＳＰＳＥＴ Ｉ，Ｓ（Ｉ）＊４，Ｃ，０，０，３，３２，３２ＳＰＯＦＳ Ｉ，Ｘ＊３２＋４８，Ｙ＊３２Л
09. Ｓ＝Ｓ／５ＯＲ ０Ｘ＝（Ｘ＋１）％５Ｙ＝Ｙ＋！Ｘ：ＮＥＸＴЛ
10. ＳＰＳＥＴ ２５，０，Ｃ，０，０，３，３２，３２Ｕ＝２５ＢＥＥＰ ９ＣＬＳЛ
11. ＠ＥЛ
12. Ｋ＝ＶＡＬ（ＭＩＤ＄（ＭＥＭ＄，Ｒ，１））ＰＮＬＳＴＲ ６，２２，”＃”＋ＲＩＧＨＴ＄（ＳＴＲ＄（Ｒ＋１００１），３）＋” И”＊Ｋ，Ｋ＊３Л
13. ＠ＬЛ
14. Ｘ＝（ＴＣＨＸ－４８）／３２ＯＲ ０Ｙ＝ＴＣＨＹ／３２ＯＲ ０Ｋ＝ＩＣＯＮＣＨＫ（）Ｌ＝Ｔ：Ｔ＝ＴＣＨＳＴЛ
15. ＶＳＹＮＣ １ＩＦ Ｋ＝＝３ＴＨＥＮ ＳＡＶＥ Ｍ＄ＧＯＴＯ＠ＬЛ
16. ＩＦ Ｋ＞＝０ＴＨＥＮ Ｒ＝（Ｒ＋（Ｋ＝＝２）＋（Ｋ＝＝１）＊９９）％１００ＧＯＴＯ＠ＲЛ
17. ＩＦ！Ｔ＋Ｌ ＯＲ Ｘ＜０ＯＲ Ｘ＞４ＯＲ Ｙ＜０ＯＲ Ｙ＞４ＴＨＥＮ＠ＬЛ
18. ＩＦ！（Ｓ（Ｆ（Ｘ，Ｙ））％５）ＴＨＥＮ＠ＬЛ
19. Ｆ＝Ｆ（Ｘ，Ｙ）Ｓ＝Ｓ（Ｆ）Ｖ＝（Ｓ＝＝１）－（Ｓ＝＝２）Ｗ＝（Ｓ＝＝３）－（Ｓ＝＝４）Л
20. Ｋ＝０ＦＯＲ Ｉ＝０ＴＯ ４Ｋ＝Ｋ＋！Ｓ（Ｆ（Ｉ＊！Ｗ＋Ｘ＊！Ｖ，Ｉ＊！Ｖ＋Ｙ＊！Ｗ））ＮＥＸＴЛ
21. Ｎ＝Ｎ－１ＢＥＥＰ ２９＋（Ｋ＝＝４）＊１１ＩＦ Ｋ＝＝４ＴＨＥＮ Ａ＝０ＰＮＬＳＴＲ １３，２２，”ＩＤＬＥＤ．．”，２Л
22. Ｓ（Ｆ）＝０ＳＰＣＨＲ Ｆ，０ＩＦ Ｖ ＴＨＥＮ Ｘ＝２＋Ｖ＊２ＥＬＳＥ Ｙ＝２＋Ｗ＊２Л
23. Ｓ（Ｕ）＝Ｓ（Ｆ（Ｘ，Ｙ））ＳＰＣＨＲ Ｕ，Ｓ（Ｕ）＊４ＳＰＯＦＳ Ｕ，（Ｘ－Ｖ＊５）＊３２＋４８，（Ｙ－Ｗ＊５）＊３２Л
24. ＳＷＡＰ Ｕ，Ｆ（Ｘ，Ｙ）ＦＯＲ Ｉ＝０ＴＯ ３ＳＷＡＰ Ｆ（Ｘ，Ｙ），Ｆ（Ｘ－Ｖ，Ｙ－Ｗ）Ｘ＝Ｘ－Ｖ：Ｙ＝Ｙ－Ｗ：ＮＥＸＴЛ
25. ＦＯＲ Ｚ＝８ＴＯ １ＳＴＥＰ －１ＦＯＲ Ｉ＝０ＴＯ ４Ｆ＝Ｆ（Ｉ＊！Ｗ＋Ｘ＊！Ｖ，Ｉ＊！Ｖ＋Ｙ＊！Ｗ）ＧＯＳＵＢ＠Ｍ：ＮＥＸＴ：Ｆ＝Ｕ：ＧＯＳＵＢ＠Ｍ：Ｚ＝Ｚ－（Ｚ＝＝５）ＶＳＹＮＣ １ＮＥＸＴЛ
26. ＩＦ！Ｎ＊Ａ＊Ｓ（Ｆ（４，４））＜５ＴＨＥＮ＠ＬЛ
27. ＢＥＥＰ ３２ＭＥＭ＄＝ＳＵＢＳＴ＄（ＭＥＭ＄，Ｒ，１，”１”）ＰＮＬＳＴＲ １３，２２，”ＣＬＥＡＲ！”，１２ＧＯＴＯ＠ＥЛ
28. ＠ＭЛ
29. ＳＰＲＥＡＤ（Ｆ），Ｐ，Ｑ：ＳＰＯＦＳ Ｆ，Ｐ＋Ｖ＊Ｚ，Ｑ＋Ｗ＊Ｚ：ＲＥＴＵＲＮЛ
※コードのHTML生成にPTC2HTMLを使用しています。
| ＳＰＳ |  |
モドル ＢＡＣＫ