Zur weiteren Optimierung der Heizkosten habe ich nach einer Möglichkeit gesucht, meine PC-basierte FHZ-Steuerung (Homeputer Studio) selbbsttätig erkennen zu lassen wenn niemand im Haus ist, um nach einer gewissen Zeit die Heizung vom Normalbetrieb auf den Sparbetrieb (Absenkung) umzuschalten. Eine manuelle Lösung mithilfe eines neben der Haustür plazierten Schalter, der manuell betätigt werden muß um eine Abwesenheit zu signalisieren, kommt für mich nicht infrage.
Ich habe auch im Internet einen sog. "Riegelschaltkontakt" (von Abus: http://www.abus-sc.de/silver.econtent/c ... der/RS1000) gefunden, der, im Türrahmen eingebaut, erkennt, wenn die Tür verriegelt ist. Unter obigem Link findet man u.a. die Dokumentation zum Schaltkontakt. Normalerweise wird über solch einen Schalter eine Alarmanlage automatisch scharf geschaltet. Diesen Schalter habe ich hinter dem Türbeschlag eingebaut und an einen HMS 100TFK angeschlossen.
Wenn ich das Haus verlasse schließe ich grundsätzlich ab, dadurch wird der Riegelschaltkontakt aktiviert und via HMS100TFK eine Meldung (geschlossen) an die FHZ-Zentrale abgesetzt. Insoweit habe ich jetzt den folgenden Vorschlag umgesetzt: http://homematic-forum.de/forum/viewtop ... 179#p25031. Die Zentrale schaltet nach 15 Minuten die Heizung in den Absenkbetrieb. Wenn ich wiederkomme wird beim Aufschließen der Riegelschalter zurückgestellt und eine Meldung (offen) an die Zentrale abgesetzt. Die Heizung wird wieder in den Automatikbetrieb versetzt.
Zusätzlich habe ich noch eine Erkennung für längere Abwesenheit eingebaut. Wenn die Tür länger als ca. 2 Tage ununterbrochen verschlossen ist geht die Zentrale davon aus, daß ich im Urlaub bzw. längere Zeit abwesend bin. Dann werden die automatisierten Thermostate noch um ein weiteres Grad abgesenkt.
So sieht der Türbeschlag mit eingebautem Riegelschaltkontakt aus:
Das Makro für den HMS100TFK:
Code: Alles auswählen
**! ============================================================
**! OBJEKT Haustuer
**! ============================================================
**! OBJEKT-TYP : TuerFenster
**! BEZEICHNUNG : Haustuer
**! STARTWERT : offen
**! ------------------------------------------------------------
**! AUSFÜHRUNGSINTERVALL : nein
**! AUSFÜHRUNG BEI EINGABE : ja
**! AUSFÜHRUNG BEI EMPFANG : ja
**!
**! ============================================================
**! VARIABLENDEFINITIONEN
**! ============================================================
**! NAME TYP STARTWERT
**! ------------------------------------------------------------
Kueche_buzzer einschalten
wenn geschaltet(Haustuer) und Haustuer geschlossen und Uhrzeit zwischen "05:00:00" und "21:00:00" dann
** Weniger als 15 min. Abwesenheit wird ignoriert
erledigt(Haustuer)
warte("00:15:00")
** Nur wenn auch der Beamer ausgeschaltet ist, ist niemand zuhause
wenn beamer_steckdose ausgeschaltet dann
abwesend einschalten
wenn-block-ende
sonst
wenn geschaltet(Haustuer) und Haustuer offen und abwesend eingeschaltet dann
wenn abwesend.urlaub eingeschaltet dann
** Im Urlaub abwesenheit erst nach 7 min. aktivieren, weil evtl. die Nachbarn nur die Blumen gießen
erledigt(Haustuer)
warte("00:07:00")
endewenn
abwesend.urlaub ausschalten
abwesend ausschalten
endewenn
endewenn
erledigt(Haustuer)
Code: Alles auswählen
wenn geschaltet(Haustuer) und Haustuer geschlossen und Uhrzeit zwischen "05:00:00" und "21:00:00" dann
Code: Alles auswählen
wenn beamer_steckdose ausgeschaltet dann
abwesend einschalten
wenn-block-ende
Code: Alles auswählen
** Weniger als 15 min. Abwesenheit wird ignoriert
erledigt(Haustuer)
warte("00:15:00")
Code: Alles auswählen
wenn geschaltet(Haustuer) und Haustuer offen und abwesend eingeschaltet dann
.
.
abwesend.urlaub ausschalten
abwesend ausschalten
endewenn
Code: Alles auswählen
wenn abwesend.urlaub eingeschaltet dann
** Im Urlaub abwesenheit erst nach 7 min. aktivieren, weil evtl. die Nachbarn nur die Blumen gießen
erledigt(Haustuer)
warte("00:07:00")
endewenn
Code: Alles auswählen
**! ============================================================
**! OBJEKT Abwesend
**! ============================================================
**! OBJEKT-TYP : Schalter
**! BEZEICHNUNG : Abwesend
**! STARTWERT : aus
**! ------------------------------------------------------------
**! AUSFÜHRUNGSINTERVALL : nein
**! AUSFÜHRUNG BEI EINGABE : ja
**! AUSFÜHRUNG BEI ÄNDERUNG : ja
**!
**! ============================================================
**! VARIABLENDEFINITIONEN
**! ============================================================
**! NAME TYP STARTWERT
**! ------------------------------------------------------------
**! urlaub Schalter aus
**! schalte_d Datum
**! schalte_t Uhr
Wenn abwesend eingeschaltet und abwesend.urlaub eingeschaltet dann
** Urlaub ist aktiv wenn die Tuer länger t+2 abgeschlossen ist (wird im alarmsenden makro gesetzt)
** Temperatur noch um ein Grad reduzieren
Buero setzen auf 16,5
Wohnzimmer setzen auf 16,5
Esszimmer setzen auf 16,5
gaestezimmerneu setzen auf 16,5
Badezimmer setzen auf 16,5
sonst
Wenn abwesend eingeschaltet und abwesend.urlaub ausgeschaltet dann
** Bei einfacher Abwesenheit auf Absenktemperatur schalten
abwesend.schalte_d := datum
abwesend.schalte_t := Uhrzeit
Buero.Modus setzen auf Manuell
Wohnzimmer.Modus setzen auf Manuell
Esszimmer.Modus setzen auf Manuell
gaestezimmerneu.modus setzen auf manuell
Badezimmer.modus setzen auf manuell
Buero setzen auf Buero.Absenktemperatur
Wohnzimmer setzen auf Wohnzimmer.Absenktemperatur
Esszimmer setzen auf Esszimmer.Absenktemperatur
gaestezimmerneu setzen auf GaestezimmerNeu.Komforttemperatur
Badezimmer setzen auf Badezimmer.Absenktemperatur
sonst
wenn abwesend ausgeschaltet dann
** Bei Anwesenheit wieder auf Automatikbetrieb schalten
** Automatikbetrieb via Partyfunktion setzt aktuelle Temperatur lt. Profil
abwesend.schalte_t := Uhrzeit + "00:15:00"
Wohnzimmer.Modus := abwesend.schalte_t
Esszimmer.Modus := abwesend.schalte_t
Gaestezimmerneu.Modus := abwesend.schalte_t
Buero.Modus := abwesend.schalte_t
Badezimmer.Modus := abwesend.schalte_t
endewenn
endewenn
endewenn
Code: Alles auswählen
abwesend.schalte_t := Uhrzeit + "00:15:00"
Wohnzimmer.Modus := abwesend.schalte_t
Code: Alles auswählen
**! ============================================================
**! OBJEKT alarmsenden
**! ============================================================
**! OBJEKT-TYP : Makro
**! BEZEICHNUNG : alarmsenden
**! STARTWERT :
**! ------------------------------------------------------------
**! AUSFÜHRUNGSINTERVALL : bei Tageswechsel
**! AUSFÜHRUNG BEI EINGABE : nein
**! AUSFÜHRUNG BEI ÄNDERUNG : nein
**!
**! ============================================================
**! VARIABLENDEFINITIONEN
**! ============================================================
**! NAME TYP STARTWERT
**! ------------------------------------------------------------
**! today Datum
** hier steht alles drin, was einmal am Tag geprüft werden muß
** pruefen wie lange die haustuer abgeschlossen bzw abwesend gesetzt ist,ggf. Urlaub
today := datum - abwesend.schalte_d
wenn abwesend eingeschaltet und abwesend.urlaub ausgeschaltet und today > 2 dann
abwesend.urlaub einschalten
makro starten abwesend
endewenn
Gruß
F.Sommer