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

2020/02/03 20:10:58

MixJuice GET URL : kidspod.club/mj/942

Shooting (BASIC 1.2.2~)

詳細は イチゴジャム レシピ で公開しています。
「プログラムをみる」を参照して下さい。

SOURCE CODE

CLS:'

NEW

10 'Shooting
20 VIDEO 7:CLS:CLV
30 IF PEEK(#1002)==0 CONT
40 CLT:S=60*10
50 IF TICK()>=S GOTO 100
60 LC 2,0:?9-(TICK()/60)
70 IF(PEEK(#1002)!=0)!=T GOTO 50
80 T=1-T:C=C+T
90 LC 0,1:?C;:GOTO 50
100 LC 2,0:?CHR$(0,0)
110 LC 0,2:IF INKEY()<>10 CONT
120 RUN

'OK

COMMENT

Kidspod運営チーム
Kidspod運営チーム2020/02/06 19:50:37

これはまさしく、意地になって何度も挑戦してしまうゲーム! 押しっぱなしを認めていない厳しさがいいですね。