New タイマー

IchigoJam BASIC 1.2.2 より採用されている

VIDEO コマンドの文字拡大機能を用いて

タイマーを作りなおしてみました。

20 の M で分、S で秒を設定できます。
C は誤差補正用です。

20 CLV:M=3:S=0:C=60

RUN すると 2:59 という感じに拡大表示され、

カウントダウンしていきます。

0:00 の後は反転と LED が点灯します。

必要な場合、LED 端子経由で何かを動作可能です。

何かキーを押してプログラムを終了します。

再度実行する場合は改めて RUN させます。

10 'New Timer
20 CLV:M=3:S=0:C=60
30 VIDEO 7:CLS:LED 0
40 T=(M*60+S)*C:CLT
50 N=T-TICK()
60 IF N<0 GOTO 110
70 S=N/C:M=S/60:S=S%60
80 IF S=R AND M=L GOTO 50
90 R=S:L-M
100 LC 0,1:? M;":";
110 IF S<10 ?"0"; 
120 ? S;:GOTO 50
130 LED 1:VIDEO 8
140 IF !INKEY() GOTO 140
150 LED 0:VIDEO 1:END

IchigoJam web でプログラムを実行します。

このQRコードはアクセス解析のためにCookieを使用しています。

アクセス解析は匿名で収集されており、個人を特定するものではありません。

この機能はCookieを無効にすることで収集を拒否することができますので、
お使いのデバイスのブラウザの設定をご確認ください。

IchigoJam web でプログラム実行

Kidspod; でプログラム参照

GitHub でプログラム参照 (再配布向け)

MixJuice ダウンロード ?"MJ GET kidspod.club/mj/606

MicJack ダウンロード ?"MJ GKP 606

他のバージョン

BASIC/プログラム/3分タイマー - 原作版。左上に表示。多くの IchigoJam で実行可能
BASIC/プログラム/3分タイマー電卓文字風版 - 電卓文字風の拡大表示版
BASIC/プログラム/1分タイマー風船 - IchigoJam BASIC 1.3b9 以降。どんどん白い風船が……
PanCake/BASIC プログラム/1分タイマー風船 - IchigoJam BASIC+PanCake 版。赤い風船＋音付き