ＰＲＧ：ＣＬＩＭＢ
セツメイＥＸＰＬＡＮＡＴＩＯＮ
伸び縮みするワイヤーを駆使して画面上方向に進む。ワイヤーの先にはフックがあり、画面内のバーにひっかける事ができる。Climb up using the special elastic wire. A hook is at the end of wire, and you can hook the bars by it.
Aボタンでワイヤー射出。通常は上方向だが、十字キー左右を押しながらだと斜め方向に射出される。The wire is shot by A button. It flies vertically usually. Or it flies diagonally if you also press left or right of cross-key.
4段分(32ドット)スクロールする毎に1点加算。プレイヤーが画面下に落下してしまうとゲームオーバー。You got 1 point by every 4 lines (32 pixels) scroll. If you fall out of screen, the game is over.
ゲームオーバーになったら、Bボタンで再開。Press B button to retry game.
ＱＲコードＱＲ ＣＯＤＥ
プログラムコードＰＲＯＧＲＡＭ ＣＯＤＥ
表示 Show
| Ａ | ゲーム開始後、一度でもフックが射出されたか |
| Ｂ | バーに引っかかったか判定用 |
| Ｃ | プレイヤーのスプライトキャラ番号 |
| Ｄ，Ｚ | 雑用 |
| Ｅ | 次に発生させるバー左端の位置 |
| Ｈ | フックの状態(0：出していない／1以上：射出中／-1：引っかかった) |
| Ｋ | ボタンの状態 |
| Ｌ | 次に発生させるバーが出てくるまでの間隔 |
| Ｍ | プレイヤーとフックのX方向差分 |
| Ｎ | プレイヤーとフックのY方向差分 |
| Ｑ | プレイヤーのスプライトの向き |
| Ｒ | スクロールするまでのループカウンタ |
| Ｓ | スクロール量(これを32で割った値がスコア) |
| Ｔ | フックのX座標 |
| Ｕ | フックのY座標 |
| Ｖ | プレイヤーのX方向速度 |
| Ｗ | プレイヤーのY方向速度 |
| Ｘ | プレイヤーのX座標 |
| Ｙ | プレイヤーのY座標 |
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. ＠ＤЛ
30. ＳＰＡＮＧＬＥ １，ＤＥＧ（ＡＴＡＮ（Ｍ，Ｎ））ＳＰＯＦＳ １，Ｔ，ＵЛ
31. ＠ＥЛ
32. ＧＬＩＮＥ Ｘ，Ｙ，Ｔ，Ｕ，７ＳＰＳＥＴ ０，Ｃ，２，Ｑ，０，１ＳＰＨＯＭＥ ０，８，４ＳＰＯＦＳ ０，Ｘ，ＹЛ
33. ＣＬＳ？ＦＬＯＯＲ（Ｓ／３２）Л
34. ＶＳＹＮＣ ２ＧＬＩＮＥ Ｘ，Ｙ，Ｔ，ＵЛ
35. ＩＦ Ｕ＜２５６ＯＲ Ｗ＜０ＧＯＴＯ＠ＬЛ
36. ＢＧＭＳＴＯＰЛ
37. ＢＥＥＰ １１Л
38. ＠ＶЛ
39. ＩＦ ＢＴＲＩＧ（）＝＝３２ＧＯＴＯ＠Ｉ ＥＬＳＥ＠ＶЛ
※コードのHTML生成にPTC2HTMLを使用しています。
モドル ＢＡＣＫ