nsbin/leds2

32 lines
565 B
Text
Raw Normal View History

2006-07-20 07:54:37 +00:00
PROG="setleds"
kbset()
{
if [ $# -ne 2 ]; then return; fi
param=$1
case $2 in
on)
$PROG +$param ;;
off)
$PROG -$param ;;
esac
}
keyb_sequence()
{
kbset num off; kbset caps off; kbset scroll off; sleep 1
kbset num on;kbset scroll on;sleep 1
kbset num off;kbset scroll off;kbset caps on;sleep 1
kbset caps off; kbset num on; sleep 1;
kbset num off; kbset caps on; sleep 1;
kbset caps off; kbset scroll on; sleep 1;
kbset caps on; kbset scroll off; sleep 1;
kbset num on; kbset caps off; sleep 1;
}
while [ true ]; do keyb_sequence; done