Hacka en billig USB-leksak till en färgskiftande Crystal klocka! (3 / 4 steg)
Steg 3: Programmering klockan
Stor! Räddade mig en massa tid. Nu skulle mitt manus behöver bara att referera till föraren och avgöra vilka kommandoradsargument att köra. (Programmeraren var även nådig nog att ge mig tillstånd att lägga till en länk till sin chaufför i detta instructable.)
Så nedan är mitt manus (det är mycket redigerbar om du ville Visa minuter eller sekunder eller månad ect. istället). Efter några sekunder skriptet kontrollerar tiden på det lokala systemet och ändrar den led färg beroende på timme. långsamt att arbeta sin väg upp ROYGBIV. Så senare i dag är det, det längre upp på spektrumet det är lysande, cykling varje 12 timmar. Jag också ställa in den att blinka timmen. Så om det var 3:00, skulle sakta tonas in och ut en gång, och sedan blinka snabbt tre gånger.
Du kommer att behöva ladda ner drivrutiner från länken ovan, och sedan kopiera & klistra in koden nedan i anteckningar och spara den som "crystalclock.pl". Placera filen i samma mapp på datorn som förare. Sedan bara koppla in klockan till en USB-port på datorn och klicka på skriptet för att slå på klockan.
#! usr/local/bin/perl
medan ($lamprun! = 1) # loop håller klockan löpning
{($second, $minute, $hour, $dayOfMonth, $month, $yearOffset, $dayOfWeek, $dayOfYear, $daylightSavings) = localtime(); # finner datorns tid
om ($hour == 1 eller $hour == 13)
{
$color = röd;
$blink = 1;
}elsif ($hour == 2 eller $hour == 14)
{
$color = orangered;
$blink = 2;
}elsif ($hour == 3 eller $hour == 15)
{
$color = orange;
$blink = 3;
}elsif ($hour == 4 eller $hour == 16)
{
$color = gul;
$blink = 4;
}elsif ($hour == 5 eller $hour == 17)
{
$color = gulgrön;
$blink = 5;
}
elsif ($hour == 6 eller $hour == 18)
{
$color = grön,
$blink = 6;
}
elsif ($hour == 7 eller $hour == 19)
{
$color = lightcyan;
$blink = 7.
}
elsif ($hour == 8 eller $hour == 20)
{
$color = aqua;
$blink = 8;
}
elsif ($hour == 9 eller $hour == 21)
{
$color = blå;
$blink = 9;
}
elsif ($hour == 10 eller $hour == 22)
{
$color = indigo;
$blink = 10;
}
elsif ($hour == 11 eller $hour == 23)
{
$color = purpur;
$blink = 11;
}
elsif ($hour == 12 eller $hour == 24)
{
$color = vit;
$blink = 12;
}
system ("DreamCheekyLED.exe nopause fade = 4000 blink = $blink färg = $color");
}