neuer FHEM-Befehl IF

[Damian]

define LichtA notify rr_alex IF ([rr_Alex:home] and ($hms gt "18:00" and $hms lt "05:00") (set ku_Lampe_gross on-for-timer 576)

Jemand einen Tip für mich was ich falsch mache?

Es gibt keine Uhrzeit, die sowohl größer als 18:00 und gleichzeitig kleiner als 05:00 Uhr ist.

Wenn es über Mitternacht geht, gibt es zwei Intervalle von 18:00 bis 00:00 Uhr und von 0:00 bis 05:00 Uhr

In solchen Fällen,  musst du beide Intervalle mit oder verknüpfen. In diesem Fall also:

Code Auswählen Erweitern

define LichtA notify rr_alex IF ([rr_Alex:home] and ($hms gt "18:00" or $hms lt "05:00") (set ku_Lampe_gross on-for-timer 576)

Gruß

Damian

[Bartimaus]

So hat es jetzt (dank Damians Hilfe) funktioniert...

Code Auswählen Erweitern

define PoolPumpeAn at *21:00 IF (1) (set PoolPumpe on-for-timer {[Pool:state:d]/2*3600})

MoinMoin,
ich habe jetzt gemerkt, das der maximale "on-for-timer" wert "lediglich" -> 15.360s beträgt.
Das ist für meine Fälle zu wenig.
Kann man nicht auch eine "on-Till" Zeit berechnen in abhängigkeit vom einschaltzeitpunkt ?
zb

Code Auswählen Erweitern

define PoolPumpeAn at *01:00 IF (set PoolPumpe on-till {01:00 + ([Pool:state:d]/2*3600)})

[Damian]

MoinMoin,
ich habe jetzt gemerkt, das der maximale "on-for-timer" wert "lediglich" -> 15.360s beträgt.
Das ist für meine Fälle zu wenig.
Kann man nicht auch eine "on-Till" Zeit berechnen in abhängigkeit vom einschaltzeitpunkt ?
zb

Code Auswählen Erweitern

define PoolPumpeAn at *01:00 IF (set PoolPumpe on-till {01:00 + ([Pool:state:d]/2*3600)})

Im Prinzip kannst du in den geschweiften Klammern bei IF alles einbauen, was in Perl geht + Nutzung der Readings.

Code Auswählen Erweitern

define PoolPumpeAn at *01:00 IF (1) ((set  PoolPumpe on-till {sprintf("%02d:%02d",1+[Pool:state:d]/2,([Pool:state:d]/2-int([Pool:state:d]/2))*60)}))

Elegant ist anders - da könnte man schon eine Perl-Routine dafür auslagern - aber es funktioniert.

Gruß

Damian

[Bartimaus]

Hallo Damian,
wie immer erstmal ein fettes Danke für Deine schnelle Hilfe.
Ich habe das jetzt mal an einem Dummy ausprobiert. Dabei habe ich den *at-befehl auf 11:53 Uhr gelegt. Seit 11:53 sehe ich jetzt, das der Dummy eingeschaltet ist, mit "on-till 04:08".
D.h. in Deinem Code steckt irgendwo  noch die Einschaltuhrzeit "01:00:00" verschachtelt drin, richtig ? Ich hatte vermutet hier

Code Auswählen Erweitern

sprintf("%02d:%02d",1+[Pool:state:d]/4, war es aber nicht.
Pool:state = 12,6

Code Auswählen Erweitern

define PoolPumpeAutomatikMaster15 at *11:53:00 IF ($month> 2 && $month< 10 and [PoolPumpe_Master:state] eq "on" and [Pool:state:d]>= 10) ((set PoolPumpe_Master2 on-till {sprintf("%02d:%02d",1+[Pool:state:d]/4,([Pool:state:d]/4-int([Pool:state:d]/4))*60)}))

[rudolfkoenig]

Das besondere an on-for-timer ist, dass die Ablaufzeit im Geraet gespeichert wird, und keine zweite Funk-Nachricht zum abschalten notwendig ist.
D.h. wenn die Nachricht (on-for-timer) nicht ankommt, dann schaltet das Geraet nicht ein, wenn es ankommt, dann schaltet es mit grosser Wahrscheinlichkeit nach Ablauf der Zeit auch ab. Z.Bsp bei einer Bewaesserungspumpe wuerde ich nur on-for-timer senden (notfalls mehrere verteilt auf dem Tag), und nicht mit on-till arbeiten. MWn deckt on-for-timer fuer Homematic einen groesseren Zeit-Bereich ab.

Ansonsten kann man auch einen Abschalt-At definieren, on-till ist nichts anderes.

[Damian]

D.h. in Deinem Code steckt irgendwo  noch die Einschaltuhrzeit "01:00:00" verschachtelt drin, richtig ?

define PoolPumpeAutomatikMaster15 at *11:53:00 IF ($month> 2 && $month< 10 and [PoolPumpe_Master:state] eq "on" and [Pool:state:d]>= 10) ((set PoolPumpe_Master2 on-till {sprintf("%02d:%02d",1+[Pool:state:d]/4,([Pool:state:d]/4-int([Pool:state:d]/4))*60)}))

Gruß

Damian

[Damian]

Ansonsten kann man auch einen Abschalt-At definieren, on-till ist nichts anderes.

ja, dennoch wird er die Abschaltzeit dynamisch anhand des Pool-Readings bestimmen wollen.

Gruß

Damian

[Bartimaus]

Danke, habe ich gerade auch mal mit 6+ getestet. Hat funktioniert.
d.h. der *at muss identisch sein mit dem sprintf(n+)...

@Rudolf
Danke für die Info. Das mit dem Abschalttimer muss ich mir mal durch den Kopf gehen lassen, allerdings wird diese bestimmt durch einen errechneten Wert (Pooltemp / n*3600)

[betateilchen]

Es gibt keine Uhrzeit, die sowohl größer als 18:00 und gleichzeitig kleiner als 05:00 Uhr ist.

Das nicht. Aber alle anderen Uhrzeiten zeichnen sich dadurch aus, dass sie zwischen 05:00 und 18:00 liegen.
Wenn ich also eine Abfrage auf  ~~ [5..17] mache und das Ergebnis mit ! umkehre, brauche ich keine Intervalle berücksichtigen.

Gib doch mal folgendes ein:

Code Auswählen Erweitern

{!($hour ~~ [5..17])}

um die Ecke denken

[Damian]

Code Auswählen Erweitern

{!($hour ~~ [5..17])}

um die Ecke denken

Ist nicht zu empfehlen. Hier wird unnötig eine Liste durchsucht, funktioniert auch nur mit ganzen Zahlen.

Gruß

Damian

[betateilchen]

Code Auswählen Erweitern

Stunden sind meistens ganze Zahlen.

Und man kann das natürlich auch mit zwei Vergleichen > und < machen und braucht trotzdem keine zwei Intervalle.

[Damian]

Code Auswählen Erweitern

Stunden sind meistens ganze Zahlen.

Und man kann das natürlich auch mit zwei Vergleichen > und < machen und braucht trotzdem keine zwei Intervalle.

Noch mal für alle, die jetzt total verwirrt sind:

8:00 bis 15:00 Uhr ist ein Intervall, also (a >= 8 and a<=15), mathematisch dargestellt [8,15].

Von 15:00 Uhr bis 8:00 ist bis auf die Grenzen die Negation des Oberen: also not( a >= 8 and a<= 15)  ist gleich  (a<8 or a>15) bzw.

( a> 15 or a < 8 ) (vergl. mein unterer Beitrag)

Mathematisch als zwei unbeschränkte Intervalle zu sehen also: ]-unendlich,8[ bzw. ]15,unendlich[

Ist aber schon OT hier. Bei Interesse hier weiterlesen: http://de.wikipedia.org/wiki/Intervall_(Mathematik)

Gruß

Damian

[Bartimaus]

Im Prinzip kannst du in den geschweiften Klammern bei IF alles einbauen, was in Perl geht + Nutzung der Readings.

Code Auswählen Erweitern

define PoolPumpeAn at *01:00 IF (1) ((set  PoolPumpe on-till {sprintf("%02d:%02d",1+[Pool:state:d]/2,([Pool:state:d]/2-int([Pool:state:d]/2))*60)}))

Elegant ist anders - da könnte man schon eine Perl-Routine dafür auslagern - aber es funktioniert.

Gruß

Damian

Hi, darf ich nochmal ? Der Einschaltbefehl funktioniert, auch den errechneten Ausschaltzeitpunkt kann ich  erkennen (Windows zeigt diesen beim "drüberfahren" mit der Maus in einer Sprechblase an), beim Test war er zb: um 16:21Uhr. Nur hat der Dummy um 16:21 nicht den state von on nach off gewechselt, sondern leuchtet munter weiter. Liegt das an dem Dummy ? Theoretisch doch nicht.

[Damian]

Liegt das an dem Dummy ?

Wahrscheinlich.

Gruß

Damian

[Bartimaus]

Tat es