SHIROのIchigoJam日記

IchigoJamの電子工作とプログラミングをメインに

エモ万華鏡

エモシリーズ第4弾、万華鏡です。筒の中でLEDテープを光らせて、穴から覗いて見ます。
動画はこちら。

筒はマーブルチョコレートを使います。
もちろん中身はおいしくいただきました(^_^)

ふたにのぞき穴を開けます。

回路はエモディスクなどと同じで、IchigoDakeでWS2812Bを制御します。

内面鏡の材料は、ダイソーのハードカードケースです。

ハサミで切って、12cm×1.9cm×3面の正三角柱を作ります。

底面にLEDテープを両面テープで貼り付け。

三角柱の外側を黒ビニールテープで覆います。

筒の中に三角柱を挿入。

筒の外側に回路基板を固定して完成。

プログラムはこちら。

10 '*WS2812B Kaleidoscope
20 VIDEO 0
30 POKE #700,102,32,240,181,114,182,8,36,36,2,9,25,11,76,128,37,11,120,255,34,34,96,3,39,10,38,43,66,1,208,10,39,3,38,1,63,253,209,0,34
40 POKE #728,34,96,1,62,253,209,109,8,239,209,2,49,1,56,234,209,98,182,240,189,16,0,0,80
50 POKE #740,2,73,8,104,4,34,16,67,8,96,112,71,0,128,0,80:U=USR(#740,0)
60 FOR I=0 TO 4
70 LET [I*3],RND(100),RND(100),RND(100)
80 NEXT
90 '@LOOP
100 FOR I=0 TO 3
110 FOR J=0 TO 2
120 [I*3+J]=[I*3+J+3]
130 NEXT
140 NEXT
150 LET [12],RND(100),RND(100),RND(100)
160 U=USR(#700,0)
170 WAIT 10
180 GOTO 90