Hallo Allemaal,
Inmiddels ben ik een paar weken aan het stoeien met het programmeren van een zelfbouw Nodo (Mega), welke gekoppeld is aan de webapp.
Heb zelf op dit forum vragen gesteld en ben elke keer netjes verder geholpen met voorbeelden, wat (voor mij) altijd verhelderend werkt.
Bij deze een stukje script dat ik inmiddels werkend heb voor het aansturen van rolluiken. Wellicht dat ik daarmee iemand anders een plezier doe en/of verder kan helpen.
Onderstaande code is om een rolluik naar BOVEN te laten gaan, rekening houdend met:
`- Random gekozen moment 15 minuten na zonsopgang
`- EN het is 7:45 uur geweest.
`- Rolluik eerst voor 2/3 omhoog ivm laagstaande/felle zon (19 seconden)
`- Random binnen 30 minuten na 10:45 gaat rolluik volledig omhoog
EventlistWrite; Time 00:00,*; VariableSet 14,0; (zet variabele 14 op nul / beginstand)
EventlistWrite; ClockDaylight 2; VariableInc 14,1; (zonsopgang: verhoog var 14 met 1)
EventlistWrite; Time 7:45,*; VariableInc 14,1; (kwart voor acht `s morgens: verhoog var14 met 1)
EventlistWrite; Variable 14,2; TimerRandom 13,900; (var14 heeft waarde 2: start timer (13) met random waarde 1..15 minuten(900 sec.))
EventlistWrite; Timer 13; NewKAKUSend 10,On; (timer loopt af: rolluik (gekoppeld aan: NewKAKUSend 10) gaat omhoog. De zon is op, en het is minimaal kwart voor acht)
EventlistWrite; Timer 13; TimerSet 12,19;(Timer 12 met duur van 19 sec wordt gestart, rolluik is dan 2/3 open)
EventlistWrite; Timer 12; NewKAKUSend 10,On;(Timer loopt af: Rolluik wordt in het opgaan nogmaals op gestuurd, 2e keer betekent stoppen op de positie waar rolluik is.)
EventlistWrite; Time 10:45,*; TimerRandom 11,1800;(kwart voor elf `s morgens: random 1..30 minuten(1800 sec.) wordt gestart)
EventlistWrite; Timer 11; NewKAKUSend 10,On;(kwart voor elf `s morgens: random na 1..30 minuten(1800 sec.) helemaal omhoog)
Onderstaande code is om een rolluik naar BENEDEN te laten gaan, rekening houdend met:
`- Random gekozen moment 15 minuten na zonsondergang
`- OF het is 22:00 uur geweest.
// Rolluik naar BENEDEN
EventlistWrite; Time 00:00,*; VariableSet 15,0; (zet variabele 15 op nul / beginstand)
EventlistWrite; ClockDaylight 4; VariableInc 15,1; (zonsondergang: verhoog var 15 met 1)
EventlistWrite; Time 22:00,*; VariableInc 15,1; (tien uur `s avonds: verhoog var15 met 1)
EventlistWrite; Variable 15,1; TimerRandom 15,900; (var15 heeft waarde 1: start timer (15) met random waarde 1..15 minuten (900 sec.))
EventlistWrite; Timer 15; NewKAKUSend 10,Off; (timer loopt af: rolluik (gekoppeld aan: NewKAKUSend 10) gaat omlaag. De zon is onder, en het is minimaal tien uur)
EventlistWrite; Timer 15; TimerSet 14,180;(Timer 14 met duur van 3 minuut (180 sec.) wordt gestart)
EventlistWrite; Timer 14; NewKAKUSend 10,Off;(Timer 14 loopt af: Rolluik wordt nogmaals naar beneden gestuurd mocht eerste signaal niet goed aangekomen zijn)
Verbeterpunten / wensen in bovenstaand script zijn nog:
- LDR input toevoegen, bij weinig licht `s morgens helemaal omhoog;
- Windmetern input toevoegen, bij harde wind rolluiken `s morgens helemaal omhoog;
- Timers kunnen hergebruikt worden;
- Variabelen kunnen hergebruikt worden;
Ter info:
Het gebruik van een losse KAKU handzender tussentijds heeft geen invloed op het uitvoeren van het script.