サッカーの試合の合間を使って、50分のプログラミング体験 with IchigoJam。講師はなんと、早速、弓削商船高専生!マイコン部で昨日、一回体験しただけなのに、すぐに立候補して立派にこなす姿に感動。
IchigoJamプログラミング教室の入り口、看板を持っているのは上島町の神様キャラクター、かみりん!
短めの時間でしたが、弓削高専生によるサポートにより、短時間でLED制御を使ったエルチカゲームから、かわくだりまでしっかり体験!(本カリキュラムは、総合の時間、45分x2コマを使って実施する内容の短縮版でした)
みるみる上達していく姿が、うれしい!
お隣、和室では上島町近所から来る子供たちへの個別体験会。
VRだってプログラミングできちゃいますよ!
(わずか50行でつくるマイクラ風と、瀬戸内バージョン!)
マイコン部2年生も初講師!自分の言葉で伝えている様子、さすが!
島で誰かに伝授できるように、高専生向けにミニIchigoJamのはんだづけ講座!
弓削商船高専マイコン部、ありがとう!PCN弓削、はじめましょう!
バトンタッチして、18時過ぎ。試合を終えて雨でびしょ濡れで入ってきたサッカー少年たち、50分のプログラミング教室、元気いっぱいで楽しんでくれました!
時には真剣にタイピング!さすが、スポーツ少年、ゲームへの執念もすごい!
愛媛県上島町でも SAP x IchigoJam! SAPアメリカ、Tsubotaさんと。
「Hana道場」ロゴも!
お隣Spheroプログラミングを提供、SAPのみなさんには、エルチカ、かわくだり、64円IoTプログラミングまで、体験いただきました!
「すべての企業がIT企業になるIoT時代、おとなIoTプログラミング企業研修と少し高度な新機能」
橋本英郎さん、上島町商工会青年部のみなさんと!楽しい企画、ありがとうございました!
「はじめてのプログラミング with IchigoJam(PDF)」(Keynote / PowerPoint)
こちら資料、今回のこどもたちの反応を見てのブラッシュアップした最新バージョン。
オープンデータなので、ご自由に改変、加工してお使いください!
フォントはこちら2つ「手書き風フォント「こども丸ゴシック」 - フォント無料ダウンロード|Typing Art」と「IchigoJam フォント TrueType - イチゴジャム レシピ」をダウンロードください
追記したスライド。セットアップ(準備)とメインループがプログラムの基本の構造。大きなプログラムもそれが単につながったものに過ぎません。8x8のかみりん(?)キャラクターを使ったダッシュゲーム。タイトル、メイン、クリア画面と3つの構造、見えてきたら、中級者!
やればやるほど、おもしろく���るのがプログラミング!
大人の方もぜひご一緒に!PCNこどもプロコンへの応募もオススメです。
打ち上げに、上島町商工会青年部の人たちと、フェリーで渡った因島(いんのしま)の中華料理屋さん、西華園!
台湾ラーメン、2辛、おいしい!からい!
楽しいお食事会も、ありがとうございました!
教室の入口もかわいく飾ってくれた、かみりん!
許可いただいた「かみりん」をドット絵にしてみて、歩かせてみたプログラム「KAMIRIN WALK」
100 POKE#700,0,0,0,0,0,0,56,71,134,163,131,139,75,66,46,17,134,163,131,139,83,66,54,41,134,163,131,139,71,66,62,41 110 VIDEO5:CLS 120 LC0,4:?"~~~~~~~~"; 130 LC0,0:?"KAMIRIN!" 140 LC4,2:?CHR$(224) 150 LC4,3:?CHR$(225):WAIT30 160 LC4,3:?CHR$(226):WAIT30 170 LC4,3:?CHR$(225):WAIT30 180 LC4,3:?CHR$(227):WAIT30 190 GOTO 150
同じく、かみりんドット絵を使った、キーボードのキーをすばやく押して、タイムを競う「KAMIRIN DASH」ゲーム。
100 POKE224*8,0,0,0,0,0,0,56,71,134,163,131,139,75,66,46,17,134,163,131,139,83,66,54,41,134,163,131,139,71,66,62,41 110 'TITLE 120 VIDEO5:CLS 130 LC0,2:?"KAMIRIN" 140 LC0,3:?" DASH" 150 IF INKEY()=0 CONT 160 'GAME 170 X=7:CLT:BEEP 180 CLS:LCX,2:?CHR$(224) 190 LCX,3:?CHR$(225):GSB280 200 LCX,3:?CHR$(226):GSB280 210 LCX,3:?CHR$(225):GSB280 220 LCX,3:?CHR$(227):GSB280 230 X=X-1:IF X>=0 GOTO180 240 'CLEAR 250 PLAY"T300O5G8R8G2":CLS 260 LC0,1:?"TIME:";TICK():END 270 'SUB 280 IF INKEY()=0 CONT ELSE RTN
F8でVIDEO1コマンド(F8)で、文字の大きさに戻せます!(100行はKAMIRIN WALKと同じです)
Let's create something!
links
- 瀬戸内25島、愛媛県上島町のこどもたちへプログラミングとサッカーを!
- 瀬戸内の夕日をバックにボックスクラフトVR、弓削商船高専マイコン部IchigoJam&VRレクチャー編
- 翌日にはプログラミングの先生に! 弓削商船高専マイコン部の高専生大活躍、サッカー少年 meets IchigoJamゲームプログラミング!+かみりんゲーム
- 360度写真でまとめる、上島町(弓削島/佐島/生名島)の記憶のVR追体験