Heating Control: Unterschied zwischen den Versionen
K (Sorry, aber bei dem Grammatikfehler - der leider immer mehr um sich greift - sträuben sich mir die Nackenhaare :-) ... daher: nochmal korrigiert.) |
Mitch (Diskussion | Beiträge) |
||
Zeile 125: | Zeile 125: | ||
attr HZ.Absenkung icon time_eco_mode | attr HZ.Absenkung icon time_eco_mode | ||
attr HZ.Absenkung room Heizung | attr HZ.Absenkung room Heizung | ||
attr HZ.Absenkung webCmd on:off | attr HZ.Absenkung webCmd on:off</pre> | ||
Dann habe ich dazu folgendes in meiner 99_myUtils.pm angelegt: | |||
<pre> | |||
sub ecomode { | |||
my @FHT=devspec2array("TYPE=FHT"); | |||
foreach(@FHT) | |||
{ | |||
my $tp = ReadingsVal("$_", "desired-temp", "")-2; | |||
if (ReadingsVal("$_", "desired-temp", "") > "16") { | |||
fhem("set $_ desired-temp ".$tp) | |||
} | |||
} | |||
} | |||
sub ecomodeHM { | |||
if (ReadingsVal(" | my @HM_HT=devspec2array("HZ_.*._Clima"); | ||
foreach(@HM_HT) | |||
} | { | ||
my $tpHM = ReadingsVal("$_", "desired-temp", "")-2; | |||
if (ReadingsVal("$_", "desired-temp", "") > "16") { | |||
fhem("set $_ desired-temp ".$tpHM) | |||
} | |||
} | |||
}</pre> | }</pre> | ||
Zeile 146: | Zeile 155: | ||
Diese ECO-Schalter triggere ich auch über das Modul [[PRESENCE]] und Geofancy mit einem [[watchdog]] an. Der watchdog wird bei Abwesenheit aktiviert und läuft 30 Minuten. Wenn bis dahin niemand zurück hin, wird ECO aktiviert: | Diese ECO-Schalter triggere ich auch über das Modul [[PRESENCE]] und Geofancy mit einem [[watchdog]] an. Der watchdog wird bei Abwesenheit aktiviert und läuft 30 Minuten. Wenn bis dahin niemand zurück hin, wird ECO aktiviert: | ||
<pre>define | <pre> | ||
define ECO.Mode.Aktivator DOIF([Anwesenheit] eq "Unterwegs") ({ecomode},{ecomodeHM}) DOELSEIF ([HZ.Absenkung] eq "on" or [Sonnenindikator] eq "on") ({ecomode},{ecomodeHM}) DOELSE ({Heating_Control_SetAllTemps()}</pre> | |||
Zusätzlich trigger ich ECO über die Aussentemperatur. Wird 22 Grad erreicht oder überschritten, wird ECO aktiviert. Unterhalb 22 Grad wieder deaktiviert: | Zusätzlich trigger ich ECO über die Aussentemperatur. Wird 22 Grad erreicht oder überschritten, wird ECO aktiviert. Unterhalb 22 Grad wieder deaktiviert: | ||
<pre> | <pre>define Sonnenindikator dummy | ||
define Sonnenindikator dummy | |||
attr Sonnenindikator devStateIcon on:sun27 off:sun7 | attr Sonnenindikator devStateIcon on:sun27 off:sun7 | ||
attr Sonnenindikator group HCS | attr Sonnenindikator group HCS | ||
attr Sonnenindikator icon clear3 | attr Sonnenindikator icon clear3 | ||
define | define Aussentemp.Check DOIF ([Wetterstation:temperature] >= "22") (set Sonnenindikator on) DOELSE (set Sonnenindikator off)</pre> | ||
Für meine neuen HM Thermostate musste ich dann noch etwas bzgl. Fenster ändern, da fhem beim setzten der Temeratur das Thermostat übersteuert. | |||
Somit kann es z.B. vorkommen, dass ein Fenster noch offen ist, wenn fhem eine neue Temperatur schickt und die Heizung hoch heizt, obwohl das Fenster noch offen ist. | |||
Um das zu umgehen, habe ich eine einfach Abfrage eingebaut: | |||
<pre> | |||
define Fenster.Status.Bad DOIF ([Fenster_Bad] eq "open") (set HCB disbale) DOELSE (set HCB enable) | |||
</pre> | |||
Dies soll als "Denkanstoss" dienen. Ich habe mir auch alles zu FHEM aus diesem Forum "gezogen". | Dies soll als "Denkanstoss" dienen. Ich habe mir auch alles zu FHEM aus diesem Forum "gezogen". |
Version vom 16. Februar 2015, 12:49 Uhr
Heating_Control | |
---|---|
Zweck / Funktion | |
Heizungssteuerung über ein Wochen-Heizprofil | |
Allgemein | |
Typ | Hilfsmodul |
Details | |
Dokumentation | EN / DE |
Modulname | 98_Heating_Control.pm |
Ersteller | dietmar63 / Dietmar63 |
Wichtig: sofern vorhanden, gilt im Zweifel immer die (englische) Beschreibung in der commandref! |
Heating Control ist ein Fhem-Erweiterungsmodul zur Heizungssteuerung über ein Wochen-Heizprofil.
Voraussetzungen
Keine.
Anwendung
Define
Das Heizprofil wird angelegt mit
define <name> Heating_Control <device> [<language>] <profile> <command>|<condition>
Attribute
Ausführung
Die Kommandos zur Steuerung werden mit dem Befehl
set <device> (desired-temp|desiredTemerature) <temp>
zum definierten Zeitpunkt an das Gerät gesendet.
Anwendungsbeispiele
- Vorstellung einer Lösung im Fhem Forum, die Heating Control und HCS miteinander kombiniert.
Grundsätzlich nutzte ich FHZ1300, FHT8b mit Fensterkontakten an FHEM.
Die Steuerung der Heizung erfolgt komplett über FHEM, die FHTs laufen alle auf manuell.
Den Code zum definieren der FHTs spare ich mir jetzt, das sollte Grundverständnis sein.
Als erstes Modul meiner Steuerung nutze ich das Modul Heating_Control für jedes Zimmer/jeden FHT:
define HCB Heating_Control FHT_Bad 12345|06:00|22 12345|07:30|19 67|08:30|22 67|10:00|19 18:00|21 22:00|14 (ReadingsVal("HCAutomatik", "state", "") eq "on") attr HCB alias Bad attr HCB group Heizplan attr HCB room Heizung
Den Heizplan kann ich über einen Dummy ein- und ausschalten:
define HCAutomatik dummy attr HCAutomatik alias Heizungsautomatik attr HCAutomatik devStateIcon on:general_an off:general_aus attr HCAutomatik group Automatik attr HCAutomatik icon sani_heating_automatic attr HCAutomatik room Heizung attr HCAutomatik sortby 1 attr HCAutomatik webCmd on:off
define act_on_HCAutomatikAn notify HCAutomatik:on {\ Heating_Control_SetAllTemps();;\ fhem("set HCS_System on");;\ } define act_on_HCAutomatikAus notify HCAutomatik:off {\ fhem("set FHT_.* desired-temp 14.0 ;; set HCS_System off");;\ fhem ("set Pushover msg 'FHEM' 'Heizplan ausgeschaltet'");;\ }
Bei einer Deaktivierung werden alle FHTs auf 14 Grad eingestellt und es wird mir zu Info eine Pushnachricht geschickt.
Als nächstes habe ich das Modul HCS integriert:
define HCS_System HCS Vaillant attr HCS_System alias Vaillant Steuerung attr HCS_System devStateIcon demand:sani_heating_temp idle:sani_heating_manual off:general_aus attr HCS_System deviceCmdOff off attr HCS_System deviceCmdOn on attr HCS_System event-on-change-reading state,devicestate,eco,overdrive attr HCS_System icon sani_heating_manual attr HCS_System idleperiod 5 attr HCS_System interval 5 attr HCS_System loglevel 5 attr HCS_System mode thermostat attr HCS_System room Heizung attr HCS_System thermostatThresholdOff 0.5 attr HCS_System thermostatThresholdOn 0.5 attr HCS_System valveThresholdOff 40 attr HCS_System valveThresholdOn 35 define Heizkessel FS20 xxxx xx attr Heizkessel IODev FHZ attr Heizkessel alias Vaillant Heizkessel (ON = Kessel AUS) attr Heizkessel comment Wenn ON ist Kessel aus attr Heizkessel devStateIcon on:general_an off:general_aus attr Heizkessel group HCS attr Heizkessel icon sani_boiler_temp attr Heizkessel model fs20st
Hiermit steuere ich meine Vaillant Heizung potentialfrei über einen FS20 Einkanalempfänger an. Das Relais ist so angeschlossen, dass die Heizung an ist, wenn das Relais abgefallen ist (dies hat den Vorteil, dass auch bei einem Defekt des Empfängers die Heizung funktioniert). Ich habe dazu noch einen Dummy angelegt, damit ich abfragen kann, ob schon geschaltet wurde, damit nicht alle 5 Minuten (das Abfrageintervall von HCS) der FS20 geschaltet wird:
define Vaillant dummy attr Vaillant alias Vaillant Heizsystem attr Vaillant devStateIcon on:general_an off:general_aus attr Vaillant group HCS attr Vaillant icon sani_boiler_temp attr Vaillant room Heizung attr Vaillant webCmd on:off define act_on_Vaillant notify Vaillant:.* {\ if (ReadingsVal("Vaillant", "state", "on") eq "on" && ReadingsVal("Heizkessel", "state", "off") eq "on") {\ fhem("set Heizkessel off");;\ }\ else {\ if (ReadingsVal("Vaillant", "state", "off") eq "off" && ReadingsVal("Heizkessel", "state", "off") eq "off") {\ fhem("set Heizkessel on");;\ }\ }\ }
Des weiteren habe ich mir einen "ECO-Script" angelegt (vielen Dank an das Forum für die Hilfe), welcher alle FHTs um 2 Grad runter setzt und zwar von dem im Moment anliegenden Wert:
define HZ.Absenkung dummy attr HZ.Absenkung alias ECO Mode - Heizungsabsenkung 2 Grad attr HZ.Absenkung devStateIcon on:general_an off:general_aus attr HZ.Absenkung group Automatik attr HZ.Absenkung icon time_eco_mode attr HZ.Absenkung room Heizung attr HZ.Absenkung webCmd on:off
Dann habe ich dazu folgendes in meiner 99_myUtils.pm angelegt:
sub ecomode { my @FHT=devspec2array("TYPE=FHT"); foreach(@FHT) { my $tp = ReadingsVal("$_", "desired-temp", "")-2; if (ReadingsVal("$_", "desired-temp", "") > "16") { fhem("set $_ desired-temp ".$tp) } } } sub ecomodeHM { my @HM_HT=devspec2array("HZ_.*._Clima"); foreach(@HM_HT) { my $tpHM = ReadingsVal("$_", "desired-temp", "")-2; if (ReadingsVal("$_", "desired-temp", "") > "16") { fhem("set $_ desired-temp ".$tpHM) } } }
Diese ECO-Schalter triggere ich auch über das Modul PRESENCE und Geofancy mit einem watchdog an. Der watchdog wird bei Abwesenheit aktiviert und läuft 30 Minuten. Wenn bis dahin niemand zurück hin, wird ECO aktiviert:
define ECO.Mode.Aktivator DOIF([Anwesenheit] eq "Unterwegs") ({ecomode},{ecomodeHM}) DOELSEIF ([HZ.Absenkung] eq "on" or [Sonnenindikator] eq "on") ({ecomode},{ecomodeHM}) DOELSE ({Heating_Control_SetAllTemps()}
Zusätzlich trigger ich ECO über die Aussentemperatur. Wird 22 Grad erreicht oder überschritten, wird ECO aktiviert. Unterhalb 22 Grad wieder deaktiviert:
define Sonnenindikator dummy attr Sonnenindikator devStateIcon on:sun27 off:sun7 attr Sonnenindikator group HCS attr Sonnenindikator icon clear3 define Aussentemp.Check DOIF ([Wetterstation:temperature] >= "22") (set Sonnenindikator on) DOELSE (set Sonnenindikator off)
Für meine neuen HM Thermostate musste ich dann noch etwas bzgl. Fenster ändern, da fhem beim setzten der Temeratur das Thermostat übersteuert. Somit kann es z.B. vorkommen, dass ein Fenster noch offen ist, wenn fhem eine neue Temperatur schickt und die Heizung hoch heizt, obwohl das Fenster noch offen ist.
Um das zu umgehen, habe ich eine einfach Abfrage eingebaut:
define Fenster.Status.Bad DOIF ([Fenster_Bad] eq "open") (set HCB disbale) DOELSE (set HCB enable)
Dies soll als "Denkanstoss" dienen. Ich habe mir auch alles zu FHEM aus diesem Forum "gezogen". Nachbau erlaubt und erwünscht.
Todo: Screenshots ergänzen |
Links
- Thread zum Thema im Fhem Forum
- Modulbeschreibung zu HCS
- HCS Modul auf fischer-net.de