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 00:56:41

MixJuice GET URL : kidspod.club/mj/531

ワンライン 星くず ヘリコプター

上下キーで動いて、流れてくる星くず(:)を集めてください。
大きな星に当たるとゲームオーバーです。

難しいときは「R=RND(99)」の99を大きくすると、大きな星が少なくなりやさしくなります。

(2019/06/06 IchigoJam BASIC 1.2.3と1.3.1で動作確認済)

  • 1
  • 1

SOURCE CODE

10 CLS:CLV:FOR I=0 TO #E9:R=RND(99):POKE #BDF,(R=0)*#E9+(R>80)*#3A:POKE V,0:COPY #920,#921,703:Y=Y+BTN(DOWN)*(Y<21)-BTN(UP)*(Y>1):V=#903+Y*32:I=PEEK(V):POKE V,#F3:S=S+(I=#3A):LC 13,0:? "SC:";S:NEXT

COMMENT

Kidspod運営チーム
Kidspod運営チーム2018/08/23 18:25:19

このスピード感、いいですね。星くずを集めるという設定もロマンチックで素敵です。