Makros vom Webinterface

[Thomas79]

Hallo zusammen,
ich benötige mal eine kleine Makrohilfe.
Ich würde gerne über das kleine Webinterface von "shen" mit nur einem Befehl alle meine Heizregler auf eine bestimmte Temp setzen. Quasi ein Button für "gehen - alles aus" und einen für "kommen - alles an". Meine Frage ist, wie ich das am einfachsten realisieren kann.
1. Eine Überlegung von mir ist. Mit Makros die Temp von einem Regler abzufragen und dann alle Regler mit einer neuen Temp überschreiben. Dann müsste ich quasi nur die Temp vom zB Wohnzimmer manuell anpassen. Oder hat vllt. schon jemand Buttons für Makros in das Webinterface rein programiert?

2. Wie macht Ihr das mit den Fenstern? Da habe ich ja dann 3 Möglichkeiten...
- Fenter auf -> 8C
- Fenster zu und es ist jmd da -> zb 22C
- Fenster zu und es ist keiner da -> zb 18C
Wie frage ich das in einem Makro denn alles zusammen ab?

Wär klasse wenn mir der eine oder andere ein paar Code-Schnipsel oder Ideen posten könnte.

Grüße, Thomas

[Micha]

Hallo Thomas,
In Susammenhang mit meiner Heizungssteuerung hat mir Bümpi ein Makro für eine Temperaturabsenkung
erstellt. Mit einem Schalter kann ich alle Raumregler sowie alle HMS100TF auf eine bestimmte Temperatur absenken.
Wurde im vergangenen Winterurlaub angewendet und und hat sehr gut funktioniert.
Meinst du so etwas?
Gruß Michael

[Thomas79]

Hallo Micha,
ja, ich glaub das klingt schon ganz gut. Schritt zwei wäre dann, das Makro vom Webinterface aus auszuführen.
Gruß, Thomas

[Micha]

Hallo Thomas,
Hier ist das beschriebene Makro

Code: Alles auswählen

Wenn DauerAbsenkung eingeschaltet dann
    HeizkreisSteuerung.TWZUSoll  := 19,0
    HeizkreisSteuerung.TWHZOSoll := 19,0

    ** usw. alle anderen HMS-gesteuerten Räume

    RaumreglerBuero.Modus := 1
    RaumreglerBuero := RaumreglerBuero.AbsenkTemperatur
    RaumreglerBad.Modus := 1
    RaumreglerBad := RaumreglerBad.AbsenkTemperatur
    RaumreglerDiele.Modus := 1
    RaumreglerDiele := RaumreglerDiele.AbsenkTemperatur
    RaumreglerSchlafzimmer.Modus := 1
    RaumreglerSchlafzimmer := RaumreglerSchlafzimmer.AbsenkTemperatur

    ** usw. alle anderen RR-gesteuerten Räume

    *******************************************************************
   
    *******************************************************************

sonst

    HeizkreisSteuerung.TWZUSoll  := 23,3

    ** Habe ich entsprechend dem Startwert in jenem Objekt von 22,3 auf 21,0 geändert!
    HeizkreisSteuerung.TWHZOSoll := 21,0

    RaumreglerBuero.Modus := 0
    RaumreglerBuero := RaumreglerBuero.KomfortTemperatur
    RaumreglerBad.Modus := 0
    RaumreglerBad : = RaumreglerBad.KomfortTemperatur
    RaumreglerDiele.Modus := 0
    RaumreglerDiele := RaumreglerDiele.KomfortTemperatur
    RaumreglerSchlafzimmer.Modus := 0
    RaumreglerSchlafzimmer := RaumreglerSchlafzimmer.KomfortTemperatur

    *******************************************************************
    
    *******************************************************************

Endewenn

Unter DauerAbsenkung / Bezüge ist folgendes Makro eingetragen

Code: Alles auswählen

wenn DauerAbsenkung eingeschaltet dann
   verlassen
endewenn

wenn Uhrzeit < "05:00:00" oder Uhrzeit >= "21:00:00" dann
    HeizkreisSteuerung.TWZUSoll  := 19,0
    HeizkreisSteuerung.TWHZOSoll := 19,0
sonst
    HeizkreisSteuerung.TWZUSoll  := 23,3
    HeizkreisSteuerung.TWHZOSoll := 21,0
endewenn

Es steht unter Objekt Makro HeizungsSOLLwerte
Ist das so OK?
Gruß Michael
Wie gesagt es funktioniert super.

[Thomas79]

Hallo Micha,
vielen Dank.

Da ich keine Heizkreissteuerung habe, hab ich die Zeilen entfernt. Und meine Regler namentlich angepasst.

Ich nehme an dass "DauerAbsenkung" ein einfacher Schalter ist, richtig?
Und dass das Makro von dir zB jede Minute ausgeführt wird, oder?

Wie man Makros vom Webinterface aus starten kann weißt du net auch zufällig?

Gruß, Thomas

[Micha]

Hallo Thomas,
DauerAbsenkung ist ein Schalter.
Ausführung ist keine Zeit hinterlegt.
Im anderen Makro ist bei Ausführung 1 Stunde eingetragen.
Bezüglich Webinterfac habe ich keinen blassen Schimmer.
Michael