Hatena::ブログ(Diary)

SHIROのモバイル日記 RSSフィード Twitter

2017-09-24

[]5セグメントLED

福野さんがブログで書いた「5セグメントLED」が、昔のゼビウス文字を思い出してなかなか面白いです。
福野さんはWeb時計アプリを作っていますが、私はリアルにIchigoJam拡張基板を作って動かしてみました。
プレイ動画がこちら。
D

ユニバーサル基板に角型LEDを5個並べて、抵抗でOUTポートにつなげました。
LEDの配置とつなぎ方はこんな感じです。
f:id:shiro0922:20170924230939p:image:w360

プログラムとして、カウンターとルーレットを作ってみました。

カウンター

ボタンを押すと、0〜9まで数字をカウントします。9の次は0に戻ります。

10 '*5 Segment Counter
20 CLV:OUT 0
30 LET [0],`11011,`10000,`01101,`10101,`11100,`10110,`11110,`10001,`11111,`10111
40 '@LOOP
50 FOR N=0 TO 9
60 OUT [N]
70 IF !BTN() CONT
80 IF BTN() CONT
90 NEXT
100 GOTO 40

ルーレット

ボタンを押すと、数字がランダムに回ります。もう一度ボタンを押すと止まります。

10 '*5 Segment Roulette
20 CLV:OUT 0
30 LET [0],`11011,`10000,`01101,`10101,`11100,`10110,`11110,`10001,`11111,`10111
40 OUT [0]
50 '@START
60 IF !BTN() CONT
70 IF BTN() CONT
80 '@LOOP
90 BEEP 10,2
100 OUT [RND(10)]
110 WAIT 6
120 IF !BTN() GOTO 80
130 FOR I=1 TO 5
140 BEEP 10,2
150 OUT [RND(10)]
160 WAIT 20
170 NEXT
180 GOTO 50

ダウンロード
リンク集
アクセスカウンター