nsbin/old/leds2
Nico Schottelius c23bfc5a82 reorganise more old stuff
Signed-off-by: Nico Schottelius <nico@ikn.schottelius.org>
2009-12-28 20:13:28 +01:00

31 lines
565 B
Text
Executable file

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