Mit Twilight Lampe lichtabhängig steuern

[vestaxb]

Hallo zusammen,

ich möchte in Abhängigkeit des Tageslichtes eine Lampe schalten. Hier nutze ich das Modul Twilight. Leider bekomme ich es nicht so recht zum Laufen.

Twilight habe ich so definiert (die Werte habe ich mir für diesen Beitrag ausgedacht):

Code Auswählen Erweitern

#Twilight
define T Twilight 55.7289353 8.9078766 1 654456
attr T comment Location: Musterhausen
attr T group Umwelt
attr T room 9.02_Steuerung

Dann habe ich meine zu schaltende Lampe definiert:

Code Auswählen Erweitern

define myN notify T:light.* {if($value{T}<6){fhem ("set KE.Fensterbanklampe on")}}


Aber das klappt einfach nicht. Selbst, wenn ich in der Abfrage den Licht-Wert auf den aktuell gesetzten lege, schaltet die Lampe nicht.

Was mache ich falsch?

Danke und Viele Grüße!

[kaihs]

Code Auswählen Erweitern

define myN notify T:light.* {if($value{T}<6){fhem ("set KE.Fensterbanklampe on")}}


Sollte das nicht

Code Auswählen Erweitern

define myN notify T:light.* {if($value{"T"}<6){fhem ("set KE.Fensterbanklampe on")}}

heißen? Beachte die Anführungszeichen bei $value("T").

[Dietmar63]

Das $ vor value darf auch nicht sein. Und Value wird gross geschrieben - gross Kleinschreibung ist wichtig in Perl. Und der Parameter von Value darf nicht in {} sondern muss in () angegeben werden.

[vestaxb]

Danke euch für die Hinweise. Ich habe den Code angepasst. Morgen folgt dann ein ausgiebiger Test.

Ich melde mich mit Ergebnissen!

[vestaxb]

Hat nun soweit funktioniert! Danke für eure Tipps!

Nun ist es so, dass bei jedem neuen Status die Lampe geschaltet wird.

Meine Idee war, dass das Licht angeht, sobald eine Gewitterwolke vorbeikommt und sobald sie sich verzogen hat, soll das Licht wieder ausgehen. Ich nahm an, das geht über "light". Oder gibt es hier noch eine andere Möglichkeit?

Ich habe mal testweise das so eingebaut:

Code Auswählen Erweitern

define myN notify T:twilight_weather.* {if(Value("T")==100){fhem ("set KE.Fensterbanklampe on")}}

Aber das klappt leider nicht.

Danke und Gruß!

[Dietmar63]

die Abfrage kann deshalb nicht funktionieren, weil das Reading nicht exakt zum Wert 100 feuert.
Nimm die Abfrage auf 100 heraus und logge einfach nur die Werte, dann siehst du was ich meine:

Code Auswählen Erweitern

define myN notify T:twilight_weather.* {Log 3, "@ %"}

twilight_weather wird alle 5 Minuten aktualisiert.
Eventuell erweiere ich das Modul, so dass immer zum vollen Zehnerwert gefeuert wird. Dies ist aber noch im frühen Planungsstatus.

[vestaxb]

OK, danke für die Info. Ich habe jetzt folgende Logeinträge:

Code Auswählen Erweitern

2014.04.18 06:39:25 3: T twilight_weather: 51.5
2014.04.18 06:44:25 3: T twilight_weather: 55.4
2014.04.18 06:49:26 3: T twilight_weather: 59.4

Nun habe ich testweise mal folgendes definiert:

Code Auswählen Erweitern


define myN notify T:twilight_weather.* {if(Value("T")>50){fhem ("set KE.Fensterbanklampe on")}}

Nun hätte ich gedacht, dass die Lampe schaltet. Der Wert twilight_weather ist ja nun größer 50. Aber irgendwie klappt das nicht.

Wo liegt der Fehler?

Danke und Gruß

[Dietmar63]

Mit Value() bekommst du denWert von state. Du musst mit ReadingsVal() twiligh_weather abfragen, und eventuell nur dann schalten wenn das Gerät off ist.

Beachte auch, dass perl zwei Vergleichsoperatoren kennt: gt bzw. >. In deinem Fall sollte > aber richtig sein.

[vestaxb]

Danke! Das war genau der richtige Hinweis!

So funktioniert es nun:

Code Auswählen Erweitern

define myN notify T:.* {if(ReadingsVal("T","twilight_weather",0)>50){fhem ("set KE.Fensterbanklampe on")}}

[mi.ke]

Danke! Das war genau der richtige Hinweis!

So funktioniert es nun:

Code Auswählen Erweitern

define myN notify T:.* {if(ReadingsVal("T","twilight_weather",0)>50){fhem ("set KE.Fensterbanklampe on")}}

Glaub ich nicht so ganz.....
Deine Lampe geht nur an wenn's hell ist !

[Dietmar63]

vielleicht will er das ja erreichen.

[mi.ke]

mag sein 

Meine Idee war, dass das Licht angeht, sobald eine Gewitterwolke vorbeikommt und sobald sie sich verzogen hat, soll das Licht wieder ausgehen.

[Dietmar63]

Gewitterwolken ...

So genau kann der Twilightwert nicht auflösen.
Wenn du aufmerksam die doku liest, wirst du feststellen, dass Twilight nur rechnisch den Sonnenstand in einen Helligkeitswert verwandelt. Am Abend wird zwar noch das Wetter teilweise eingerechnet.
Gewitterwolken werden von Google aber nicht geliefert.
Dafür wirst du dir einen Sensor kaufen müssen.

[vestaxb]

Glaub ich nicht so ganz.....
Deine Lampe geht nur an wenn's hell ist !

Stimmt natürlich! Das war ja mein Testschnipsel. Ich habe das jetzt so gemacht:

Code Auswählen Erweitern

define KE.Fensterbanklampe_WetterAn notify T:.* {if ((ReadingsVal("T","twilight_weather",0)<50) && ($hour >=6 || $hour<18) && (Value("KE.Fensterbanklampe") ne "on")){fhem ("set KE.Fensterbanklampe on")}}

Leider klappt das noch nicht so ganz mit der Zeitsteuerung. Wo liegt da mein Fehler?

So genau kann der Twilightwert nicht auflösen....

OK! Dann hatte ich das falsch verstanden. Ich hatte mich auch gewundert, dass gestern den Tag über der Wert die ganze Zeit auf 100 war, obwohl teilweise echt dunkel durch Regen und Hagel war.