DOIF: Indirekte Zeitangaben auch innerhalb Perl-Funktion möglich?

[FunkOdyssey]

Ich habe in der CommandRef folgendes Beispiel gesehen:

Code Auswählen Erweitern

define di_time DOIF ([[begin]-[end]]) (set lamp on, set end {(OffTime("[begin]"))}) DOELSE (set lamp off)

Hier wird im Ausführungsteil innerhalb einer Perl-Funktion die DOIF-Syntax für einen Zeitdummy genutzt.

Versuche ich dies jedoch im Bedingungsteil des DOIFs, dann wird die Zeit bei mir nicht ausgelesen. Der Wert ist leer.

Ist dies ein Fehler auf meiner Seite oder geht das einfach nur nicht?

Code Auswählen Erweitern

(
    [{(SucheZeit("[time]"))}]
)
    (set light on)
DOELSE
    (set light off)

Danke vielmals.

[Damian]

Ich habe in der CommandRef folgendes Beispiel gesehen:

Code Auswählen Erweitern

define di_time DOIF ([[begin]-[end]]) (set lamp on, set end {(OffTime("[begin]"))}) DOELSE (set lamp off)

Hier wird im Ausführungsteil innerhalb einer Perl-Funktion die DOIF-Syntax für einen Zeitdummy genutzt.

Versuche ich dies jedoch im Bedingungsteil des DOIFs, dann wird die Zeit bei mir nicht ausgelesen. Der Wert ist leer.

Ist dies ein Fehler auf meiner Seite oder geht das einfach nur nicht?

Code Auswählen Erweitern

(
    [{(SucheZeit("[time]"))}]
)
    (set light on)
DOELSE
    (set light off)

Danke vielmals.

Was macht deine Funktion SucheZeit?

Gruß

Damian

[FunkOdyssey]

Das war nur ein Beispiel, um es anschaulicher zu machen. In Wirklichkeit geht es mir um die Twilight-Funktion: twilight($twilight, $reading, $min, $max)

[Damian]

Das war nur ein Beispiel, um es anschaulicher zu machen. In Wirklichkeit geht es mir um die Twilight-Funktion: twilight($twilight, $reading, $min, $max)

Wichtig ist der Returnwert der Funktion. Es muss entweder eine Zeit im Format HH:MM oder eine Zahl (Sekunden nach Mitternacht) sein.

Dann kann man es so angeben:

Code Auswählen Erweitern

[{Zeit("[time]")}]


oder:

Code Auswählen Erweitern

[({Zeit("[time]")})]

Gruß

Damian

[FunkOdyssey]

Hmm. Sämtliche Schreibweisen funktionieren nicht bei mir leider nicht.

So sieht das Grundgerüst ohne die Klammern aus:

Code Auswählen Erweitern


[{twilight("twilight", "sr_indoor", "[testtime]", "10:00")}]


[Damian]

Hmm. Sämtliche Schreibweisen funktionieren nicht bei mir leider nicht.

So sieht das Grundgerüst ohne die Klammern aus:

Code Auswählen Erweitern


[{twilight("twilight", "sr_indoor", "[testtime]", "10:00")}]


ja, offenbar ist das schon eine Ebene zu viel, dann halt:

Code Auswählen Erweitern

[{twilight("twilight", "sr_indoor", Value("testtime"), "10:00")}]

Gruß

Damian

[FunkOdyssey]

Schade. Darauf und auf ReadingsVal wollte ich eigentlich verzichten, da ich sonst die Aktualisierung der Uhrzeit im Dummy nicht unmittelbar im DOIF mitbekomme. Ich müsste also wieder ein weiteres DOIF nehmen, welches auf Veränderung des Dummys triggert.

Du hattest ja vor einiger Zeit das wahnsinnig praktische Feature aufgenommen, dass Änderungen in [[Dummys]] die DOIFs triggern. Dieses Feature wollte ich halt auch innerhalb einer Perl-Funktion nutzen.

Ich hatte gehofft, dass ich etwas falsch mache und es eine schlanke Lösung gibt. Ist aber nicht so schlimm. Danke dir.

[Damian]

Schade. Darauf und auf ReadingsVal wollte ich eigentlich verzichten, da ich sonst die Aktualisierung der Uhrzeit im Dummy nicht unmittelbar im DOIF mitbekomme. Ich müsste also wieder ein weiteres DOIF nehmen, welches auf Veränderung des Dummys triggert.

Du hattest ja vor einiger Zeit das wahnsinnig praktische Feature aufgenommen, dass Änderungen in [[Dummys]] die DOIFs triggern. Dieses Feature wollte ich halt auch innerhalb einer Perl-Funktion nutzen.

Ich hatte gehofft, dass ich etwas falsch mache und es eine schlanke Lösung gibt. Ist aber nicht so schlimm. Danke dir.

ja, so tief hatte ich nicht mehr programmiert, aber mal schauen, vielleicht reicht intern ein zusätzlicher Funktionsaufruf - muss ich mir mal anschauen.

Gruß

Damian