福野泰介の一日一創 - create every day

こどもも大人もコードフォーじぶんのまち! 品川区はんだづけ&センサー入門、練馬区IoT資料 - with PCN

2018/08/11
#opendata #IchigoJam #KidsIT #shinagawa #nerima #codefor #PCN #doc 

プログラミングでまちづくりを自分ごとに!
品川区役所の提供、Code for Tokyo と Code for Sabae 共催で贈る夏休みイベントDay1スタート!

自分だけのパソコンできあがり!


IchigoJamはんだづけスタート!


はんだごてより危ないニッパー!便利な道具は時には危険。
友達を傷つけない、道具の使い方も体験と合わせて学ぼう。


みんなみるみる腕を上げるはんだづけ


14ピンソケット、5ピンソケットをカラフルなものに交換できるようにしておくとオリジナルIchigoJamを楽しめます!

カラフルピンソケット購入先
赤、緑、青、黄:aitendo(14P 35円、5P 20円)
http://www.aitendo.com/product/12743
白:秋月電子通商(14P 40円、5P 20円
http://akizukidenshi.com/catalog/g/gC-11571/
http://akizukidenshi.com/catalog/g/gC-11572/


できあがったマイIchigoJam、はじめてのタイピング、LED1


ひかった!


うれしそう!


PCN五反田、PCN札幌、PCN高専(?)協力によって、午前中のはんだづけパートスムーズに完了!
大橋編集長のプロ用小手先クリーナーがすごかった!


休み時間にも熱中、自分で作った初ゲーム「かわくだり改」
おにぎりアイテムを取ったら、自分がおにぎりに変わるオリジナル仕様!


IchigoSensorsを合体させて、試しにベランダに出てみました。一気に跳ね上がる湿度!


品川区でのまちあるき、見どころ紹介!
明日はいよいよ、自分でつくったパソコンを持ってデータ収集&アプリづくり!


資料:親子でチャレンジ まちをプログラミングでよくしよう!(Day1、はんだづけ&プログラミング)


IchigoSensorsのテストを兼ねて、品川区から練馬区へ移動!
大井町駅付近で40度オーバーを記録!移動中の電車内も不快指数は75を下回りません。


Code for Nerima 代表青木さん挨拶 & Code for Shinjuku 伊藤さん到着。


UDトークで自動的(人手による修正もリアルタイム!)に字幕が付く Code for Nerima イベント!
スポ小のプログラミング版、地域ICTクラブ、福井県でも始まってます!
福井県こどもプログラミング協議会


資料:はじめてのIoTプログラミング(大人向け)
IchigoSodaを使って、IoTプログラミングワークショップ、みんなでつくろうIoT!


不思議なつながり、愛知&札幌!


点字でメモする長谷川さん!その場で読めて便利とのこと。ITでもっと楽しく便利にインクルーシブ!


青木さん、楽しいイベント、ありがとうございました!

links
- 地図アプリでふりかえる、センサーとまちあるき!まちをよりよくするアイデアとIchigoJamプログラミングつぎのいっぽ

How to make the Inclusive City - Learn Braille (点字を学ぼう) on IchigoJam / Alphabet(+和文)

2018/05/15
#IchigoJam #IoT #js #africa #codefor #nerima 

インクルーシブシティとは、いろんな壁を越えて誰もが豊かに暮らせる都市。
The Inclusive City makes everyone happy.

「はじめのいっぽ」は関心。
The first step is the interest.

見えなくても聞こえなくても伝わる、点字を学習するプログラムを作りました。
I made a program to learn braille, characters for everyone.


キーボードで打つと、対応する点字が表示されます。(A-Z版とひらがな版、プログラムは後半に)
You can check the braille with typing A-Z or Kana of Japanese.
(RUN on Ichigojam web)


アフリカ各国からのインターン生と、お互いの紹介とIT使った社会発展に向けたディスカッション。
Mutual introduction and discussion to improve this society with IT with interns from Africa.


アフリカと日本、つなぎましょう!
Let's connect Africa to Japan.


Code for Nerima では、体表点字の開発者、長谷川さんに見てもらえました。
I met Mr. Hasegawa, an inventer of braille with motors at Code for Nerima.


コードでつながる練馬と鯖江。
Sabae(Fukui) connected Nerima(Tokyo) with the code.


Code for Nerima 青木さん作のデジタルメガネ体験。メガネ新ジャンル、熱い!
I enjoyed the digital eye-glasses by Mr. Aoki. It's hot to create new glasses!


インクルーシブシティづくり、ぜひご一緒に!
Let's create the inclusive city!

点字学習プログラムのつくりかた on IchigoJam
How to make to learn braille on IchigoJam

点字をデータ化する(点字 - Wikipedia
Make the code(number) from the braille (braille - Wikipedia)

?`100000 32

10 00 00 - braille in binary (2進数化した点字) → 32

10 LET[0],32,40,48,52,36,56,60,44,24,28,34,42,50,54,38,58,62,46,26,30,35,43,29,51,55,39 100 K=INKEY():IF K=0 CONT 105 ?CHR$(K) 110 IF K<65 OR K>90 GOTO100 120 B=[K-65] 300 ?BIN$(B,6) 390 GOTO 100

タイプすると対応する点字コードを表示
Show the code by typed character.

300 FORI=0TO5 310 LC 5+I%2*4,2+I/2*4 320 ?CHR$(232+B>>(5-I)&1) 330 NEXT 60 CLS 70 VIDEO3 105 LC5,0:?CHR$(24,K);

点字っぽく表示を工夫してできあがり!(24=特殊キーコード、行削除)
Make up the display to finishi!(24=special key code, delete line)

ひらがなバージョン。
Japanese Kana version.
(RUN on IchigoJam web)

10 LET[0],`100,`101,`110,`111,`011:'AIUEO 20 LET[5],`001,`101,`110,`010,`011,`111,`100:'KSTNHMR 30 LET[12],`010010,`010011,`010110:'YYY 40 LET[15],`0010,`0110,`0111:'W 50 S="AIUEOKSTNHMRYYYW" 100 K=INKEY():IF K=0 CONT 105 ?CHR$(K); 110 N=-1:FORI=0TOLEN(S)-1:IF ASC(S+I)=K N=I:NEXT:ELSE NEXT 120 IF N<0 GOTO100 130 IF N<5 B=[N]<<3:GOTO300 140 K=INKEY():IF K=0 CONT 145 ?CHR$(K) 150 IF N=8 AND K=ASC("N") B=[17]:GOTO300 160 M=-1:FORI=0TO4:IF ASC(S+I)=K M=I:NEXT:ELSE NEXT 170 IF M<0 GOTO100 180 IF N<12 B=[M]<<3+[N] 190 IF N=14 B=[12+M/2] 200 IF N=15 B=[15+M/4] 300 ?BIN$(B,6) 390 GOTO100 60 CLS 70 VIDEO3 105 LC5,0:?CHR$(24,K); 300 FORI=0TO5 310 LC 5+I%2*4,2+I/2*4 320 ?CHR$(232+B>>(5-I)&1) 330 NEXT

ローマ字で打つと対応する点字が出ます。
This program shows in braille by your type in Roman letters.

濁点半濁点などへ拡張してみましょう。容量不足対策はこちら。
Let's make extension versions! If you want to more memory...

?FREE() 362 ?"10 LET[0]";:FORI=0TO17:?",";[I];:NEXT:? 10 LET[0],4,5,6,7,3,1,5,6,2,3,7,4,18,19,22,2,6,7 20 30 40 ?FREE() 480

118byte縮みます。
You can save 118byte.

links
- Programming for Rwandan kids! Open Teaching Materials
- デジタル指点字はじめのいっぽ「数字」の点字表現を体得する読み上げ学習マシーン

Tweet
クリエイティブ・コモンズ・ライセンス
この作品は「Creative Commons — CC BY 4.0」の下に提供されています。
CC BY 福野泰介 - Taisuke Fukuno / @taisukef / アイコン画像 / プロフィール画像