Enjoy programming more!
Kidspod is a post site which supports young programmers.
First step to join us.
Register as a member
For members

ワンライン 追尾ミサイル

2019/09/16 10:44:00

ワンライン 追尾ミサイル

あべのぶひで

あべのぶひで

開始少し後にミサイルが発射されます。
ミサイルはプレイヤーを容赦なく追ってきます。
できるだけ長い時間生きのびてください。

操作はカーソルキーです。
画面左右と下へのプレイヤーの移動範囲制限をしていないので、動かしすぎると不利になります。
ゲームレベルは超ハードですが、気に入っているのでそのままにしています。
U=!!(T%7)のところの数字を小さくすると易しくなります。

友達の家で見せてもらったこんな感じのゲームが、初めて見た一行プログラムだったので、思い出して作ってみました。

----------------------------

行に分けると、こんな感じになります。

10 CLV:Z=70
20 A="*|/-\"   ←ここの「\」マークはバックスラッシュです
30 FOR I=0 TO 1
40 X=X-BTN(28)+BTN(29)
50 Y=Y-BTN(30)*(Y>1)+BTN(31)
60 M=(X>Z)-(X<Z):N=(Y>V)-(Y<V)
70 T=T+1:U=!!(T%7)
80 Z=Z+M*U:V=V+N*U
90 CLS:? T
100 LC X,Y:? "M";
110 LC Z,V:I=SCR():? STR$(A+ABS(M*3+N),1)
120 NEXT

PLAY

Programmers played with this program.1 programmers

Kidspod運営チーム
Kidspod運営チーム
2019/09/27 16:29:29