mittlere Tagestemperatur

Wer sich, wie ich, etwas intensiver mit Energieverbrauch und dem Energiemanagement beschäftigt, der möchte gern den Heizenergiebedarf überwachen. Da das Wetter aber keiner Norm gehorcht sondern (zum Glück) macht was es will, benötigt man eine vergleichende Betrachtung des Heizenergiebedarfs und der Außentemperatur. Denn nur so kann man herausfinden ob der Heizenergiebedarf angestiegen ist oder sich durch geeignete Maßnahmen sinken ließ.

Um einen ersten Schritt hierfür vorzubereiten nutze ich wieder meine Homematic Steuerung. Da ich seit kurzem eine Wetterstation besitze wollte ich gern die Außentemperatur als ein Parameter mitbebutzen. Die Homematic Wetterstation misst automatisch ca. alle 2-4 Minuten die Außentemperatur und stellt diese als Messwert zur Verfügung. Zur Aufzeichnung aller Mess- und Schaltinformationen meiner Homematic Steuerung nutze ich auf einem Raspberry Pi die hervorragende Freeware CCU-Historian um alle Daten in einer Datenbank abspeichern und zu beliebigen Zeitpunkten Grafiken oder weitere Auswertungen durchführen zu können. Vielen Dank an dieser Stelle für den Autor der Software.

Durch einen CSV export lassen sich alle Werte weiter verarbeiten. Um hier mir aber Arbeit bei der Auswertung zu sparen programmierte ich ein kleines Script für die Homematic um die „Tagesmitteltemperatur“ zu berechnen. Diese werden ich zukünftig als vergleichenden Wert für den Heizenergieverbrauch unserer Heizung weiterverwenden.

Anbei der Quellcode zur weiteren Verwendung. Bitte die wenigen Anweisungen im Quellcode an die eigenen Gegebenheiten anpassen!

!! Tagesmitteltemperatur V1.2
!! Ermittlung der mittleren Tagestemperatur gemaess den Vorgaben vom DWD
!! siehe https://www.dwd.de/DE/leistungen/klimadatendeutschland/beschreibung_tagesmonatswerte.html
!!
!! Das Script sollte jede volle Stunde aufgerufen werden.
!! Ein CUXD Timer kann mit dem Parameter ":0:0" untern "SYSTEM|TIMER_PRESET" mit "SYSTEM|REPEAT" entsprechend konfiguriert werden
!! Funktionsweise:
!! Jede volle Stunde (aufgrund des CUXD Timers) den aktuellen Wert der Aussentemperatur einlesen und der bisher abgespeicherten Temperatur
!! in der Systemvariable 2 aufaddieren.
!! Um 0:00 Uhr die bisherigen addierten Werte (ausser dem aktuellen 0:00 Uhr Wert) durch 24 teilen und dann das Ergebnis
!! in die Systemvariable 1 (Tagesmittelwert) ablegen. Die Systemvariable 1 (Tagesmittelwert) wird daher nur
!! um 0:00 Uhr mit dem errechneten Tagesmittelwert des vergangenen Tages neu ueberschrieben.
!! Die vorhandene Systemvariable 2 loeschen und den gemessenen 0:00 Temperaturwert dort dann als erstes ablegen.
!! Wenn es nicht 0:00 Uhr ist wird einfach der gemessene Temperaturwert in der Systemvariable 2 addiert abgelegt
!! Ab V1.2 wird die Uhrzeit auf UTC umgerechnet und damit dann um 0:00 Uhr UTC die Mittelwertbildung durchgefuehrt.
!! Der Tagesmittelwert in der Variablen (z.B. CCU-Historian Datenbank) gilt also fuer den vergangenen Tag!
!! Ein neuer Tag wird erkannt wenn die Stunde der aktuellen UTC Zeit "0" ist.
!! Es wird der in der CCU bekannte Wert der Temperatur vom Sensor abgefragt, es wird keine direkte Abfrage gestartet. Bei Bedarf umstellen!
!!
!!(c) duralis; zur beliebigen freien Verwendung
!!
!!
!! benoetigte Systemvariablen
!! Systemvariable 1 -> Name: v_MT_-TagesmitteltemperaturWetterstation -> Integer; (die errechtete Tagesmitteltemperatur vom vergangenen Tag)
!! Systemvariable 1 -> Name: v_MT_-01-TempTagesmittel01 -> Real; (Zwischensumme der Addition der Tagestemperaturen, maxmal 24x)

! Sensor und Variablendeklaration
! anpassen auf die eigenen Gegebenheiten
string dpTemperatursensor = "OEQ1864668"; ! abzufragender Temperatursensor eintragen
string Var_Mittelwert = "v_MT_-TagesmitteltemperaturWetterstation"; ! Name der Systemvariable fuer die Tagesmitteltemperatur eintragen
string Var_Zwischenspeicher = "v_MT_-01-TempTagesmittel01"; ! Name der Systemvariable fuer den Zwischenspeicher eintragen

! ab hier werden keine weiteren Anpassungen benoetigt
var dpname = "TEMPERATURE";
real Temperatur = 0;

var Zwischenspeicher = dom.GetObject(Var_Zwischenspeicher);
var Mittelwert = dom.GetObject(Var_Mittelwert);
integer UTCStunde = system.Date("%H").ToInteger() - (system.Date("%z").ToInteger()/100); ! UTC Verschiebung berechnen
if (UTCStunde < 0)
{
UTCStunde = UTCStunde + 24;
}

if (UTCStunde == 0)
{
Temperatur = dom.GetObject(Zwischenspeicher).Value();
Temperatur = Temperatur / 24;
dom.GetObject(Mittelwert).State(Temperatur);
dom.GetObject(Zwischenspeicher).State(0);
}

object ObjektSensor = dom.GetObject("BidCos-RF."#dpTemperatursensor#":1."#dpname);
Temperatur = ObjektSensor.Value(); ! vom Temperatursensor den in der CCU aktuell gespeicherten Wert abfragen und in die Variable speichern
dom.GetObject(Zwischenspeicher).State(dom.GetObject(Zwischenspeicher).Value()+Temperatur);