SHIROのIchigoJam日記

IchigoJamの電子工作とプログラミングをメインに

100mダッシュ・展示用

IchigoJamスポーツ」の中の人気プログラム「100mダッシュ」を、展示用に改造してみました。
スペースキーの代わりに、大きなボタンスイッチを押してプレイします。


※(11/17)改良版の画面に差し替え。

※(11/17)スイッチについて差し替え。
大きなボタンスイッチは結構高価なので、工場などで使われるフットスイッチにしました。
こちらのフットスイッチだと、分解しなくても軽い力で押せるのでお勧めします。リード線も白・黒の2本しか出ていないのでわかりやすいです。
https://www.monotaro.com/p/0851/9524/
Amazonだとこちら。(写真では5個のスイッチが写っていますが、赤1個だけです)

画面はこちらの8インチモニタを使いました。12VのACアダプタが付属していて、背面のUSB-5V出力からIchigoJamの電源も取れて便利です。

プログラム

VIDEO 3(16文字×12行モード)で、大きな表示にしています。
※(11/17修正)実際に子どもに体験してもらった結果から、タイム表示をReady画面へ移動。画面遷移をワンタッチにしました。ゴールライン表示も追加。

10 '*100m Dash Event
20 VIDEO 3:CLV
30 @TITLE
40 CLS
50 LC 2,0:?"*100m Dash*"
60 LC 6,3:?"TIME"
70 LC 6,4:?T/60;".";T%60/6;
80 WAIT 120
90 LC 5,7:?"READY?";
100 IF BTN() CONT
110 IF !BTN() CONT
120 CLS
130 LC 0,1:?CHR$(251)
140 LC 4,7:?"|";
150 LC 0,0
160 FOR T=3 TO 1 STEP -1
170 ?T;" ";:BEEP:WAIT 60
180 NEXT
190 ?"GO!":BEEP 10,60
200 LC 1,1:CLT
210 FOR R=1 TO 100
220 IF !BTN() CONT
230 IF BTN() CONT
240 ?CHR$(8,46,251);
250 NEXT
260 T=TICK()
270 ?" GOAL!";
280 BEEP 10,60:WAIT 60
290 GOTO @TITLE

(11/4追記)モバイル版

aitendoのSPI液晶に表示するモバイル版を作りました。
これで展示会に持って行けます(^_^)

プログラムはこちら。最初の画面設定を「SWITCH 1」に変更しただけです。

10 '*100m Dash Event
20 SWITCH 1:CLV
30 @TITLE
40 CLS
50 LC 2,0:?"*100m Dash*"
60 LC 6,3:?"TIME"
70 LC 6,4:?T/60;".";T%60/6;
80 WAIT 120
90 LC 5,7:?"READY?";
100 IF BTN() CONT
110 IF !BTN() CONT
120 CLS
130 LC 0,1:?CHR$(251)
140 LC 4,7:?"|";
150 LC 0,0
160 FOR T=3 TO 1 STEP -1
170 ?T;" ";:BEEP:WAIT 60
180 NEXT
190 ?"GO!":BEEP 10,60
200 LC 1,1:CLT
210 FOR R=1 TO 100
220 IF !BTN() CONT
230 IF BTN() CONT
240 ?CHR$(8,46,251);
250 NEXT
260 T=TICK()
270 ?" GOAL!";
280 BEEP 10,60:WAIT 60
290 GOTO @TITLE