こどもプログラミング
教室掲示板

変数Aの値を画面に表示することをかんがえてみましょう。

次のプログラムを使っていろいろ考えてみます。

　10 A=15
　20 ?A

RUNと実行すると、画面に変数Aの値15が2桁で表示されます。

次に、変数Aの値の値を1桁の数にしてみます。

　10 A=5
　20 ?A

RUNと実行すると、画面に変数Aの値5が1桁で表示されます。

ご質問は、1桁の数の場合、表示を時計のように2桁にして前に[0]をつけるということですね。
これは、表示したい数が1桁の時（つまり10より小さい時）にまず[0]を表示するように次のプログラムにすれば実現できます。

　10 A=5
　15 IF A<10 THEN ?0;
　20 ?A

付け加えたのは15行目です。変数Aの値が10より小さい時に、画面に0を出すだけですが、注意していただきたいのは、最後に[:]（セミコロン）が付いていることです。画面表示命令である？の最後にセミコロンがあると、0を表示したあと改行しません。

この考え方で、プログラムを見直してください。

ご質問ありがとうございます．
下記ページからご覧いただけます．

https://33gaku.jp/サザンガク動画-on-youtube/

ありがとうございます。
次回までに作品を作って、どこかにアップすることがしゅくだいですか？

マナヲさん

次回に宿題を再度説明し、アップ方法も説明します。それまでは、いろいろプログラム作りを楽しんでください。

書き込みありがとうございます。
楽しんでいただいているようで、何よりです。

次回までにレッスン2を終えていることを目標にしてもらえればと思います。また、ゲームプログラム等をメールで紹介します。

質問ありがとうございます．
作成中のプログラムリストを書き込んで頂けますか．

質問ありがとうございます。
川下りゲームは次のプログラムです。
実行（RUN)として、左右のカーソルキーで岩をよけながら川を下ってください。

10 CLS:CLT:X=16
20 K=INKEY()
30 X=X+(K=RIGHT)-(K=LEFT)
40 IF SCR(X,5)!=0 ?TICK():END
50 LC X,5:?"O"
60 LC RND(32),23:?"*"
70 WAIT 3
80 GOTO 20

川下りゲーム出来ました。WAITを変えることにより、ゲームの速さを変えられることも分かりました。ありがとうございました。

コンセントを抜いて別の場所へ移動してプログラムミングの復習をしようとしたら電源が入らなくなりました。直す方法はありますか？

電源が入らなくなった件、IchigoJamへ電源を供給するUSBケーブルを手持ちのUSBケーブルと交換したら、電源が入るようになりました。お騒がせしました。

よかったです．USBケーブルが断線しやすく，面倒をおかけします．

修正　BTNがBNTで掲示板のみで、間違えてました。

プログラムリストの提示，ありがとうございます．
このプログラムでは，10行目〜40行目のメロディを奏でるところではボタンが押されているかどうかの判断がされておらず，演奏が終わった後，55行目でだけボタンの確認をしています．このため，メロディが鳴り終わるまでずっとボタンを押し続ける必要があります．

メロディを演奏している10行目〜40行目の中でもボタンが押されていないかの確認をするようにすればどうでしょうか．
例えば，10行目は次のように分解します．

10 BEEP10,40:LED1:WAIT 40
11 IF BTN(0)=1 THEN GOTO60
12 BEEP12,40 LED0:WAIT40
13 IF BTN(0)=1 THEN GOTO60
14 BEEP16,40:LED1:WAIT40
15 IF BTN(0)=1 THEN GOTO60

同様に20,30,40行目も分解します．

なるほど！アドバイスありがとうございました！おかげで完成しました！あとでファイルをアップロードしますので。ぜひ見てください。

素晴らしいです．目的を実現できるプログラムが出来て良かったです．
タイマープログラムが動作する様子を是非教えてください．

IchigjJamの音は、あまり正確な音階ではないで、限界がありますね。
音とLEDが同時に制御できてよかったです。

ボタンを押してもプログラムが終了しないとのこと、一緒に考えましょう。
まずは、現在のプログラムリストを教えてもらえませんか。

質問ありがとうございます．

PLAY命令を使った音の流れの中に，LEDを点滅させる命令を入れると，音を流しながらLEDの点滅をさせることができます．

例えば，「ドレミファソラシ」を鳴らす命令は次のようになります．
　PLAY"CDEFGAB"
これを，「ドレミファ」と鳴ったところでLEDを点灯し，その後「ソラシ」と鳴ってLEDを消灯するのであれば，
　PLAY"CDEF":LED1:PLAY"GAB":LED0
です．試してみてください．

ありがとうございます。早速試してみます。

また結果を教えて下さい．

質問をありがとう．

通常は時計として動いていて，設定した時刻になったらブザーが鳴ったりLEDが光るものを作りたいということですね．
一緒に考えてみましょう（1歩づつ説明するので長い説明となりますが，簡単です）．

まず，通常の時計を作ってみましょう．パソコンなどは，内部にリアルタイムクロックという素子が入っていて，この素子が常に現在の時刻を刻んでいるのですが，IchigoJamにはそのような素子はありません．

でも，wait命令で時間を計ることができるので，これを組み合わせて時計を作る事ができます．

ここで，次の3つの変数を用いる事にします．
　S：秒の値が入っている変数
　M：分の値が入っている変数
　H：時の値が入っている変数

時計の基本は1秒を計測することです．これは
　WAIT60
とすると1秒計測できますね．そして，そのときにSの値を1つ増やします．
BASICで書くと次のようになりますね．

WAIT60:S=S+1

次にS（秒）が60になったらM（分）の値を1つ増やしてS（秒）を0に戻すと分の計測ができますね．
先ほどのプログラムの後ろにこの事をBASICで書くと次のようになりますね．

WAIT60:S=S+1
IF S=60 THEN M=M+1:S=0

さらに，Mの値を増やした時にそのM（分）の値が60になったら，H（時）の値を1つ増やしてM（分）の値を0に戻すと時の計測ができますね．
先ほどのプログラムにこのことを付け足すと，次のようになりますね．

WAIT60:S=S+1
IF S=60 THEN M=M+1:S=0:IF M=60 THEN H=H+1:M=0

最後に，Hの値を増やした時にHの値が24になったら，翌日になるのでHの値を0にする必要があります．そこ事を付け足すと，次のようになります．

WAIT60:S=S+1
IF S=60 THEN M=M+1:S=0:IF M=60 THEN H=H+1:M=0:IF H=24 THEN H=0

以上をまとめると，次のプログラムができあがります．

10 H=23:M=58:S=45
20 CLS:LOCATE 0,0:? H;":";M;":";S
30 WAIT60:S=S+1
40 IF S=60 THEN M=M+1:S=0:IF M=60 THEN H=H+1:M=0:IF H=24 THEN H=0
50 GOTO20

なお，10行目はこのプログラムを動かし始める時刻をセットする行です．
例えば，今が8時15分30秒だったとしたら，
　10 H=8:M=15:S=30
としてください．

まず，このプログラムを理解して，IchigoJamに入力して動かしてみてください．
そのあと，また掲示板で報告してください．次は特定の時刻になったらブザーを鳴らすことにしましょう．

よろしくお願いします．

返信ありがとうございます。
字面だけ追うと難しそうで、足がすくみますが、挑戦してみます。

是非挑戦してください．どんどん質問をしてください．