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

2020/06/09 09:31:04

MixJuice GET URL : kidspod.club/mj/973

タイムアタック☆四則計算！

タイトルの通り、タイムアタック系の計算ゲームです。10問の問題に答えましょう。
1～2桁と1桁の計算です。
正解すると音、LEDが作動し、不正解の場合は音が作動し正しい答えが表示されます。
割り算は余りを切り捨てて整数を入力してください。
割り算では商を正解したら余りを聞かれるので答えましょう。
問題が終了すると得点とかかった時間、総合スコアが表示されます。

  • 1
  • 2
  • 3
  • 4
  • 5
  • 1
  • 2
  • 3
  • 4
  • 5

SOURCE CODE

10 CLP:L=5:W=1:S=0:VIDEO3:POKE#7F8,0,16,0,124,0,16,0,0:CLT
11 Z=RND(4):CLS:
12 IF Z=L GOTO 11 ELSE L=Z
15 LC8,0:? W;"/10"
20 X=RND(100):Y=RND(10):W=W+1
30 IF (Z=1||Z=3)&&X<Y||Z=3&&Y=0 GOTO 20
40 IF Z=0 Q=X+Y:? X;"+";Y;"=?"
50 IF Z=1 Q=X-Y:? X;"-";Y;"=?"
60 IF Z=2 Q=X*Y:? X;"X";Y;"=?" ELSE IF Z=3 Q=X/Y:?X;CHR$(~0);Y;"=?"
70 INPUT"",A:IF Q=A ?"Correct answer!":S=S+10:PLAY"O4E8O4C4":LED1:WAIT20:LED0:WAIT100 ELSE ?"Incorrect answer":?"The correct answer is ";Q:PLAY"O2C16O2C4":WAIT120
75 IF Q=A&&Z=3 S=S-5:GSB90
80 IF W>10 VIDEO1:?"Result:";S;"point":?"Your time:";TICK()/60;"s":?"Overall score:";S-TICK()/60:END ELSE GOTO11
90 Q=X%Y:INPUT"remainder?",R:IF Q=R ?"Correct answer!":S=S+5:PLAY"O4E8O4C4":LED1:WAIT20:LED0:WAIT100:RTN ELSE ?"Incorrect answer":?"The answer is ";Q:PLAY"O2C16O2C4":WAIT120:RTN

COMMENT