2020-09-06
神山町に続き、本日は永平寺町でIchigoJamプログラミングワークショップ!


永平寺開発センターにて、福井県永平寺町のこどもプログラミングのキックオフ! 越前がにロボコンや、PCNこどもプロコンなど、創造的人材育成に向けた継続的な活動、応援します!


検温・飛沫防止・疎、コロナ対策万全でリアル開催。


なんと、オリジナルイチゴマスクをご用意いただいてました!


今日、仲良くなる予定のコンピューター、IchigoDyhookをさしこみます。


ちっちゃくてかわいいコンピューター、でもその実力はあなどれません!エルチカで仕事の速いコンピューターくんを体験し、コンピューターとの距離がぐっと縮まるエルチカゲーム。


休憩時間は、ドローンのラジコンが人気!ドローンにもコンピューター、姿勢制御しながら無線でコントローラーの動きに応えてます。


作ったゲームが動いた!

10 CLT:CLS:X=15:PLAY"$CDE2" 20 LC X,5:?"V" 30 LC RND(32),23:?"**" 35 WAIT 3 36 X=X-BTN(28)+BTN(29) 37 X=X&31 39 IF SCR(X,5) BEEP:?TICK():END 40 GOTO20

キャラクターを変えて、点数を付けて、BGMとゲームオーバー時の効果音を付けたかわくだりゲーム。


更に、改造リクエストに応えます。

1000点でクリアとしたい!

34 IF TICK()>1000 ?"OME!":END

(メインループ内に、時間=スコアが1000を超えていたらメッセージ表示と終了を追加)

即死ではなく、ダメージ制にしたい!

10 CLT:CLS:X=15:L=3:PLAY"$CDE2" 39 IF SCR(X,5) BEEP:L=L-1:IF L=0 ?TICK():END

(ライフの残数を表すLを追加し、当たり判定でLを引き算、0になったときだけゲームオーバー)

回復アイテムをつくりたい!

30 LC RND(32),23:IF RND(10)=0 ?"%" ELSE ?"**" 38 IF SCR(X,5)=ASC("%") BEEP5:L=L+1 39 IF SCR(X,5)=ASC("*") BEEP:L=L-1:IF L=0 ?TICK():END

(1/10の確率で敵*ではなくアイテム%を表示するようにして、38行でアイテムだったらライフ+1、敵だったら当たり判定処理と変更)

BGMの音を高くしたい!

10 CLT:CLS:X=15:L=3:PLAY"$O5CDE2"

BGMのテンポを速くしたい!

10 CLT:CLS:X=15:L=3:PLAY"$O5T240CDE2"

BGMのテンポをもっと速くしたい!

10 CLT:CLS:X=15:L=3:PLAY"$O5T2400CDE2"

BGM、ドから高いドまで鳴らしたい!

10 CLT:CLS:X=15:L=3:PLAY"$O5T240CDEFGAB<C"

(<で1オクターブアップ、>で1オクターブダウン)

IchigoJamミニゲームズ」「IchigoJamプリント」や「IchigoJam BASIC 1.4 コマンド一覧」を見て、いろいろチャレンジしてみよう!


福井市少年少女発明クラブの会長、高橋さんと!


まちづくり株式会社ZENコネクトの方から動画インタビューに受けている様子。いちごづくし。

地域のIT人材育成、IoTによる事業創出、オープンデータによる支援に関心ある自治体の方にオススメのプログラム。まずは大人もプログラミング、体験してDXしましょう!
地域情報化アドバイザー派遣制度 - 総務省地域情報化アドバイザー一覧

links
- 神山町、遠隔プログラミングワークショップとPS/2ゲーミングキーボードの実力を計測!(オンライン開催)

Tweet
クリエイティブ・コモンズ・ライセンス
本ブログの記事や写真は「Creative Commons — CC BY 4.0」の下に提供します。記事内で紹介するプログラムや作品は、それぞれに記載されたライセンスを参照ください。
CC BY / @taisukef / アイコン画像 / プロフィール画像 / 「一日一創」画像 / RSS