簡単なタイピング練習ソフトを作ってみました。
問題文はIchigoJam BASIC関連にしていますので、プログラミング教室で使うと、いい入力練習になると思います。
100行以降の問題文は自由に変更できますので、いろいろ変えてみてください。
- 実行すると、スコアと問題文が表示されます。問題文のとおりにキーボードから文字を入力してください。
- 間違わずに入力できると、スコアが1点加算されて、次の問題文へ移ります。
- 入力を間違えると、それまでのプレイ時間が表示されて終了します。
1文字でも間違うとアウトなので、大人でも結構プレッシャーがかかります（笑）
10 '*Typing* 20 CLV:CLT 30 CLS:?"SCORE=";S:? 40 GOSUB 100+RND(30)*10:X=0 50 C=SCR(X,2) 60 IF C=0 THEN BEEP 10:WAIT 30:S=S+1:GOTO 30 70 K=INKEY():IF K=0 THEN GOTO 70 80 IF K=C THEN ?CHR$(C);:X=X+1:GOTO 50 90 BEEP 30,30:?:?:?"TIME=";TICK()/60:END 100 ?"RUN":RETURN 110 ?"LIST":RETURN 120 ?"LOAD":RETURN 130 ?"SAVE":RETURN 140 ?"FILES":RETURN 150 ?"NEW":RETURN 160 ?"LED 1":RETURN 170 ?"PRINT":RETURN 180 ?"INPUT":RETURN 190 ?"LOCATE":RETURN 200 ?"CLS":RETURN 210 ?"CLV":RETURN 220 ?"IF":RETURN 230 ?"THEN":RETURN 240 ?"ELSE":RETURN 250 ?"FOR I=1 TO 10":RETURN 260 ?"NEXT":RETURN 270 ?"BEEP":RETURN 280 ?"WAIT":RETURN 290 ?"END":RETURN 300 ?"RETURN":RETURN 310 ?"GOTO 120":RETURN 320 ?"GOSUB 340":RETURN 330 ?"INKEY()":RETURN 340 ?"TICK()":RETURN 350 ?"RND(10)":RETURN 360 ?"SCR(0,0)":RETURN 370 ?"BTN(LEFT)":RETURN 380 ?"CHR$(1)":RETURN 390 ?"X=X+1":RETURN
（10/5）教室用ペーパー
子ども向けプログラミング教室で使うことを想定して、改めてペーパーを作りました。
- 1ページ目：説明テキスト
- 2ページ目：プログラムリスト
- 3ページ目：説明テキスト（スロット3にプログラムを仕込んで実行してもらう場合）
配布する時は教室の進行に応じて、1〜2ページ、あるいは2〜3ページを印刷して配布するとよいでしょう。
IchigoJamはんだ付け工作が早く終わった子にやってもらうなら、プログラムをあらかじめスロット3に仕込んでおいて「LRUN3」で実行してもらうといいでしょう。
このペーパーとプログラムは、CC BYライセンスとします。ご自由にお使いください。
→PDFファイル
