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

2017/08/10 12:21:28

MixJuice GET URL : kidspod.club/mj/230

タイピング練習

タイピングの練習ができます。
20 GOSUB200 を書き換えると文字の種類が変わります。

GOSUB200 大文字アルファベット
GOSUB210 大文字アルファベット + アラビア数字
GOSUB220 大文字アルファベット + アラビア数字 + 記号
GOSUB230 アラビア数字

  • 1
  • 1

SOURCE CODE

1 'typing
10 VIDEO5: CLT: I=0
20 GOSUB200
30 CLS: ?CHR$(C)
40 K=INKEY()
50 IF K=0 GOTO40 
60 IF K!=C ?"No Good..": GOTO40
70 CLS: ?"OK!": WAIT10: I=I+1
80 IF I<10 GOTO20
90 CLS: ?"Good Job!!:";TICK(): END

200 C=65+RND(26)
201 RETURN
210 C=RND(36): IF C<10 C=C+48 ELSE C=C-10+65
211 RETURN
220 C=33+RND(64)
221 RETURN
230 C=48+RND(10)
231 RETURN

COMMENT

Kidspod運営チーム
Kidspod運営チーム2017/08/10 18:23:56

シンプルながらいいタイピング練習ができますね。4つのモードを自由に使い分けるというところも素晴らしいです!