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

2018/07/28 22:18:05

MixJuice GET URL : kidspod.club/mj/532

ワンライン 地底探検

左右キーで自分(M)を動かして、床(O)に乗りながら地下へ降りてください。
床がなければ落ちますが、落ちている最中も移動できます。

床はせり上がってきます。自分が一番上に行ってしまうか、床に乗れずに一番下に落ちてしまうとゲームオーバーです。

ゲーム開始時、自分は左上から落ちてきますので、まず床に乗ってください。
左上の数字は降りた深さです。

  • 1
  • 1

SOURCE CODE

10 CLS:CLV:FORI=0TO9:B=I/9:LCX,Y:?" ":LCRND(31),22+B:?"O":Y=Y+(SCR(X,Y-B+1)<33)-B:I=I*((I<9)+(Y<1)+(Y>21)):M=BTN(29)*(X<30)-BTN(28)*(X>0):X=X+M*(SCR(X+M,Y)<33):LCX,Y:?"M":S=S+B:LC0,0:?S;"m":WAIT5:NEXT

COMMENT