トップ «前の日記(2013-09-20(Fri)) 最新 次の日記(2013-10-03(Thu))» 編集

屑俺日記

僕の備忘録(PC、UN*X、ネットワーク関連が中心)なんです。
自分の書いたところは適当(な時とか)に書き換えますので御了承を。


2013-09-27(Fri) 秋晴れか否か迷う

/bin/sh で Lチカつづく

他のファイルからの読み込みは、 シェルスクリプトでは . ./file とか。

関数の引数は $1 とか。
関数定義の() の中には入れず、 関数にも func $1 とかするだけ。
で、RaspberryHabu のLED は、

gpon() 
{ 
  gpio mode $1 out
  gpio write $1 1    
}
gpoff()
{ 
  gpio mode $1 in
  gpio write $1 0
}
allon() {
  for x in 3 2 1 0
    do gpon $x
  done
}
alloff() {
  for x in 0 1 2 3
    do gpoff $x
  done
}

を読み込んで、

#!/bin/sh
. ./gpio.inc
 
times=5
wait=0.5
rev=0
 
if [ $rev -eq 0 ]; then
  line="0 1 2 3"
else
  line="3 2 1 0"
fi
 
for x in `seq $times`
do
  for y in $line
    do
       gpon $y
       sleep $wait
       gpoff $y
    done
       sleep $wait
done

流石にシェルスクリプトのせいか、 あるいはRaspberryPIのOSのせいか、 ともかく、allon() alloff() やっても、 LED4つが同時に点灯/消灯するようには 見えてくれない。どうしても 指定した順番が見えてしまう。


リンクはご自由にどうぞ。でもURLや内容が変った場合はあしからず。

index.htmlは ここから。