「LED Star」に続くクリスマス向けイルミネーション基板の第2弾、ハート形です。
IchigoJamのプログラム次第で、様々に光らせられます。
動画はこちら。
LEDをハート形に並べた基板を作成。
LEDをはんだ付けしてIchigoJamに装着。
aitendoのIchigoJam互換基板「ai.jam」に載せて、赤と白のクリスマスカラーにしてみました(^_^)
基板データ
＊この基板ガーバーデータは、CC BYライセンスとします。どうぞご利用ください。
(C) 2018 Shiro Saito (https://www.ichigojaman.jp)
このファイルをそのままFusion PCBで登録すれば、基板を発注できます。
基板寸法は70×32mmです。
プログラムリスト
セレクタ
スロット1〜3のプログラムを選択起動します。
10 '*Selecter 20 CLV 30 FOR P=1 TO 10:OUT P,0:NEXT 40 '@LOOP 50 OUT 1<<N 60 CLT 70 '@INBTN 80 IF BTN() LRUN N+1 90 IF TICK()<60 GOTO 70 100 N=N+1:IF N>2 N=0 110 GOTO 40
イルミネーション
様々なパターンでハート形のLEDが光ります。
10 '*Heart Illumination 20 CLV:OUT 0:OUT 10,0 30 @LOOP 40 FOR I=1 TO 10 50 OUT I,1 60 WAIT 10 70 NEXT 80 WAIT 20 90 FOR T=1 TO 3 100 OUT 0 110 WAIT 20 120 OUT 1023 130 WAIT 20 140 NEXT 150 FOR I=1 TO 9 160 OUT I,0 170 WAIT 10 180 NEXT 190 FOR I=1 TO 9 200 OUT I,1 210 WAIT 10 220 NEXT 230 FOR I=1 TO 10 240 OUT I,0 250 WAIT 10 260 NEXT 270 GOTO @LOOP
ルーレット
IchigoJamのボタンを押すとルーレットが回ります。もう一度ボタンを押すとゆっくりになって止まります。
「赤のLEDで止まったら今日はラッキー」と「恋占い」にしたら、女の子にウケるかも。
10 '*Roulette 20 CLV 30 OUT 0 40 OUT 10,1 50 L=10 60 @START 70 IF !BTN() CONT 80 IF BTN() CONT 90 @LOOP 100 GSB @LED1 110 WAIT 3 120 IF !BTN() GOTO @LOOP 130 Z=RND(3) 140 FOR I=1 TO 5+Z 150 GSB @LED1 160 WAIT 20 170 NEXT 180 GOTO @START 190 @LED1 200 OUT L,0 210 L=L+1 220 IF L>10 L=1 230 OUT L,1 240 BEEP 10,2 250 RTN
