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

2018/06/05 09:31:58

MixJuice GET URL : kidspod.club/mj/489

dj

dj

バベル Jam版

運営さんの投稿したJSをJamに移植

  • 1
  • 1

SOURCE CODE

10 T=0:C=15:G=20:X=15:Y=2:V=1:E=0:F=0:B=0:D=0
15 CLS
20 FOR I=1 TO 32
30 LC I-1,G:?CHR$(143);
40 NEXT
100 LC 0,0:?"time:";T;
110 LC X,Y:?" ";
120 IF X<=5 V=1
130 IF X>=25 V=-1
140 X=X+V
150 LC X,Y:?CHR$(237)
160 IF BTN(SPACE)*(B=0) B=1:E=X:F=Y
170 IF B<>1 GOTO 400
180 LC E,F:?" ";
190 F=F+1
200 Z=247
210 S=SCR(E,F+1)
220 IF ((S==0)+(S==32))*((F+1)<G) GOTO 300
230 B=0:Z=143
240 IF F<=(Y+1) D=1
300 LC E,F:?CHR$(Z);
400 IF D=1 LC 3,15:?"Your Tower is The Babel!!":END
500 T=T+1
600 WAIT 6
610 GOTO 100

COMMENT

Kidspod運営チーム
Kidspod運営チーム2018/06/08 13:31:59

移植してくれてありがとうございます! こちらはスペースキーで発射になっているのですね。