Paso 3: Programación del reloj
¡ Excelente! Me salvó un montón de tiempo. Ahora mi script sólo necesitará el controlador de referencia y determinar qué argumento de línea de comandos para ejecutar. (El programador era incluso bastante gracioso que me diera permiso para añadir un enlace a su conductor en este instructable.)
Así que abajo está mi script (es muy editable si desea mostrar los minutos o segundos o mes etc. en lugar de otro). Cada pocos segundos la secuencia de comandos comprueba el tiempo en el sistema local y cambia color del led dependiendo de la hora; poco a poco trabajando su camino hasta ROYGBIV. Así que más adelante en el día es más hasta en el espectro de color está encendida, cada 12 horas de ciclismo. Yo también lo fijó a parpadear la hora. Así que si se tratara de 3:00, desvanecerse lentamente y una vez y entonces parpadeará rápidamente tres veces.
Usted tendrá que descargar los drivers desde el enlace de arriba, luego copie y pegue el código siguiente en Bloc de notas y guardarlo como "crystalclock.pl". Coloque el archivo en la misma carpeta en su computadora como los controladores. Entonces sólo Conecte el reloj a cualquier puerto usb de su ordenador y haga clic en la secuencia de comandos para activar el reloj.
#! usr/local/bin/perl
mientras que ($lamprun! = 1) loop # mantiene el funcionamiento del reloj
{($second, $minute, $hour, $dayOfMonth, $month, $yearOffset, $dayOfWeek, $dayOfYear, $daylightSavings) = localtime(); # encuentra hora del equipo
Si ($hour == 1 o $hour == 13)
{
$color = rojo;
$blink = 1;
}ELSIF ($hour == 2 o $hour == 14)
{
$color = orangered;
$blink = 2;
}ELSIF ($hour == 3 o $hour == 15)
{
$color = naranja;
$blink = 3;
}ELSIF ($hour == 4 o $hour == 16)
{
$color = amarillo;
$blink = 4;
}ELSIF ($hour == 5 o $hour == 17)
{
$color = amarillo verdoso;
$blink = 5;
}
ELSIF ($hour == 6 o $hour == 18)
{
$color = verde;
$blink = 6;
}
ELSIF ($hour == 7 o $hour == 19)
{
$color = lightcyan;
$blink = 7;
}
ELSIF ($hour == 8 o $hour == 20)
{
$color = aqua;
$blink = 8;
}
ELSIF ($hour == 9 o $hour == 21)
{
$color = azul;
$blink = 9;
}
ELSIF ($hour == 10 o $hour == 22)
{
$color = añil;
$blink = 10;
}
ELSIF ($hour == 11 o $hour == 23)
{
$color = púrpura;
$blink = 11;
}
ELSIF ($hour == 12 o $hour == 24)
{
$color = blanco;
$blink = 12;
}
sistema ("DreamCheekyLED.exe nopause fade = 4000 blink = $blink color = $color");
}