タイピング10

★「IchigoJam Advent Calendar 2021」にエントリーしています。

中学校の技術科授業用に作った、簡単なタイピングゲームです。
10個の単語が出題され、それを入力するとタイムを表示して終了します。
10個の出題は好きな単語にカスタマイズできます。

出題される単語を1文字ずつタイピング。

10個タイピングすると、タイムが表示されます。

プログラム

10 LET [1],"RUN","LIST","LED","WAIT","GOTO","IF","FOR","NEXT","SAVE","LOAD"
20 CLS:CLT
30 FOR Q=1 TO 10
40 ?">Q";Q
50 ?STR$([Q])
60 FOR X=0 TO LEN([Q])-1
70 K=INKEY():IF K!=PEEK([Q]+X) CONT
80 ?CHR$(K);
90 NEXT
100 BEEP:?:?
110 NEXT
120 ?"TIME=";TICK()/60

★IchigoJam web版はこちら。

10行目の10個の単語を変えれば、出題が変わります。
いろいろ変えて試してみてください。

新幹線編

10 LET [1],"ASAMA","HAKUTAKA","KAGAYAKI","TSURUGI","TOKI","TANIGAWA","NOZOMI","HIKARI","KODAMA","SAKURA"

戦国武将編

10 LET [1],"SANADA","ODA","TOYOTOMI","TOKUGAWA","HOUJOU","UESUGI","IMAGAWA","DATE","MAEDA","AKECHI"