234 lines
8.9 KiB
PHP
234 lines
8.9 KiB
PHP
<?php
|
|
|
|
class Puffer extends IPSModule
|
|
{
|
|
public function Create()
|
|
{
|
|
parent::Create();
|
|
|
|
// Boiler spezifische Properties
|
|
|
|
$this->RegisterPropertyInteger("PufferLeistung", 6000);
|
|
$this->RegisterPropertyInteger("ZeitKonstante", 120);
|
|
$this->RegisterPropertyInteger("Boilerfuehler_PT1", 0);
|
|
$this->RegisterPropertyInteger("Heizkontakt_Puffer", 0);
|
|
$this->RegisterPropertyInteger("Aussentemp", 20);
|
|
$this->RegisterPropertyInteger("MinVT_Temp", 20);
|
|
$this->RegisterPropertyInteger("MaxVT_Temp", 80);
|
|
$this->RegisterPropertyInteger("MaxAT_Temp", 20);
|
|
$this->RegisterPropertyInteger("MinAT_Temp", 0);
|
|
$this->RegisterPropertyBoolean("Boilertemperatur_glätten", false);
|
|
$this->RegisterPropertyString("Zeitplan", "");
|
|
$this->RegisterPropertyInteger("Interval", 5); // Recheninterval
|
|
|
|
// Puffer spezifische Variablen
|
|
$this->RegisterVariableInteger("Steigung","Steigung","",0);
|
|
$this->RegisterVariableInteger("Maximaltemperatur","Maximaltemperatur","",60);
|
|
$this->RegisterVariableInteger("Boilertemperatur", "Boilertemperatur", "", 40);
|
|
$this->RegisterVariableInteger("Aussentemperatur", "Aussentemperatur", "", 15);
|
|
|
|
|
|
|
|
// Variabeln für Kommunkation mit Manager
|
|
$this->RegisterVariableInteger("Sperre_Prio", "Sperre_Prio");
|
|
$this->RegisterVariableInteger("PV_Prio", "PV_Prio");
|
|
$this->RegisterVariableBoolean("Idle", "Idle", "", 0);
|
|
$this->RegisterVariableInteger("Aktuelle_Leistung", "Aktuelle_Leistung", "", 0);
|
|
$this->RegisterVariableFloat("Bezogene_Energie", "Bezogene_Energie", "", 0);
|
|
$this->RegisterVariableString("PowerSteps", "PowerSteps");
|
|
$this->RegisterVariableInteger("Power", "Power", '', 0);
|
|
$this->RegisterVariableBoolean("Is_Peak_Shaving", "Is_Peak_Shaving", "", true);
|
|
$this->RegisterVariableInteger("Leistung_Delta", "Leistung_Delta", "", 0);
|
|
|
|
// Hilfsvariabeln für Idle zustand
|
|
$this->RegisterPropertyInteger("IdleCounterMax", 2);
|
|
$this->RegisterVariableInteger("IdleCounter", "IdleCounter", "", 0);
|
|
$this->SetValue("IdleCounter", 0);
|
|
|
|
// Initialisiere Idle
|
|
$this->SetValue("Idle", true);
|
|
$this->RegisterTimer("Timer_Do_UserCalc_Boiler",$this->ReadPropertyInteger("Interval")*1000,"IPS_RequestAction(" .$this->InstanceID .', "Do_UserCalc", "");');
|
|
|
|
}
|
|
|
|
public function ApplyChanges()
|
|
{
|
|
parent::ApplyChanges();
|
|
$this->SetTimerInterval("Timer_Do_UserCalc_Boiler",$this->ReadPropertyInteger("Interval")*1000);
|
|
|
|
}
|
|
|
|
public function RequestAction($Ident, $Value)
|
|
{
|
|
switch ($Ident) {
|
|
|
|
case "SetAktuelle_Leistung":
|
|
$this->SetValue("Power", (int)$Value);
|
|
break;
|
|
|
|
case "GetCurrentData":
|
|
$this->SetValue("Is_Peak_Shaving", (bool)$Value);
|
|
break;
|
|
|
|
case "Do_UserCalc":
|
|
|
|
$this->SetAktuelle_Leistung($this->GetValue("Power"));
|
|
$this->GetCurrentData($this->GetValue("Is_Peak_Shaving"));
|
|
break;
|
|
|
|
default:
|
|
throw new Exception("Invalid Ident");
|
|
}
|
|
}
|
|
|
|
// Methode zum Setzen des aktuellen Stromverbrauchs
|
|
public function SetAktuelle_Leistung(int $power)
|
|
{
|
|
// Schalte Kontakt Teillast und Vollast entsprechend der Power-Einstellung
|
|
if ($power == $this->ReadPropertyInteger("PufferLeistung")) {
|
|
SetValue($this->ReadPropertyInteger("Heizkontakt_Puffer"), true);
|
|
} else {
|
|
SetValue($this->ReadPropertyInteger("Heizkontakt_Puffer"), false);
|
|
}
|
|
|
|
// Prüfe auf Änderung der Power im Vergleich zur letzten Einstellung
|
|
$lastPower = GetValue($this->GetIDForIdent("Aktuelle_Leistung"));
|
|
if ($power != $lastPower) {
|
|
$this->SetValue("Idle", false);
|
|
$this->SetValue(
|
|
"IdleCounter",
|
|
$this->ReadPropertyInteger("IdleCounterMax")
|
|
);
|
|
}
|
|
|
|
// Setze die neue Aktuelle_Leistung
|
|
$this->SetValue("Aktuelle_Leistung", $power);
|
|
$this->SetValue("Bezogene_Energie", ($this->GetValue("Bezogene_Energie") + ($this->GetValue("Aktuelle_Leistung")*($this->ReadPropertyInteger("Interval")/3600))));
|
|
// IdleCounter verarbeiten
|
|
$this->ProcessIdleCounter();
|
|
}
|
|
|
|
// Methode zum Abrufen der aktuellen Daten
|
|
public function GetCurrentData(bool $Peak)
|
|
{
|
|
|
|
|
|
$boilertemperatur_glätten = $this->ReadPropertyBoolean("Boilertemperatur_glätten");
|
|
|
|
if ($boilertemperatur_glätten) {
|
|
// Wenn Glättung aktiviert ist, führe das Glätten durch
|
|
$boilerFuehlerPT1ID = $this->ReadPropertyInteger("Boilerfuehler_PT1");
|
|
|
|
if (IPS_VariableExists($boilerFuehlerPT1ID)) {
|
|
$boilerPT1 = GetValue($boilerFuehlerPT1ID);
|
|
} else {
|
|
$boilerPT1 = 0.0; // Standardwert
|
|
}
|
|
|
|
$boilerTempID = $this->GetIDForIdent("Boilertemperatur");
|
|
if (IPS_VariableExists($boilerTempID)) {
|
|
$boilerTemp = $this->GetValue("Boilertemperatur");
|
|
} else {
|
|
$boilerTemp = 0.0; // Standardwert
|
|
}
|
|
|
|
// PT
|
|
$time_constant= $this->ReadPropertyInteger("ZeitKonstante");
|
|
$delta_t = 5; // Zeitdifferenz zwischen den Messungen (30 Sekunden)
|
|
$alpha = $delta_t / ($time_constant + $delta_t);
|
|
$newBoilerTemp = $boilerTemp + $alpha * ($boilerPT1 - $boilerTemp);
|
|
$this->SetValue("Boilertemperatur", $newBoilerTemp);
|
|
} else {
|
|
// Wenn Glättung nicht aktiviert ist, setze die Boilertemperatur direkt auf den Wert des Boilerfühlers
|
|
$boilerFuehlerPT1ID = $this->ReadPropertyInteger("Boilerfuehler_PT1");
|
|
|
|
if (IPS_VariableExists($boilerFuehlerPT1ID)) {
|
|
$boilerPT1 = GetValue($boilerFuehlerPT1ID);
|
|
} else {
|
|
$boilerPT1 = 0.0; // Standardwert
|
|
}
|
|
// Setze Boilertemperatur direkt auf den Wert des Boilerfühlers
|
|
$this->SetValue("Boilertemperatur", $boilerPT1);
|
|
}
|
|
|
|
|
|
|
|
$at = GetValue($this->ReadPropertyInteger("Aussentemp"));
|
|
$this->SetValue("Aussentemperatur", $at);
|
|
|
|
IPS_LogMessage("Puffer", "aa " . $at);
|
|
IPS_LogMessage("Puffer", "Property Aussentemp: " . $this->ReadPropertyInteger("Aussentemp"));
|
|
IPS_LogMessage("Puffer", "Variable Aussentemperatur: " . $this->GetValue("Aussentemperatur"));
|
|
|
|
$m = $this->GetValue("Steigung");
|
|
$minVT = $this->ReadPropertyInteger("MinVT_Temp"); // z.B. 20
|
|
$maxVT = $this->ReadPropertyInteger("MaxVT_Temp"); // z.B. 80
|
|
$maxAT = $this->ReadPropertyInteger("MaxAT_Temp"); // z.B. 20
|
|
$minAT = $this->ReadPropertyInteger("MinAT_Temp"); // z.B. 0
|
|
IPS_LogMessage("Puffer", "minVT: $minVT, maxVT: $maxVT, minAT: $minAT, maxAT: $maxAT");
|
|
$m = ($maxVT - $minVT) / ($minAT - $maxAT);
|
|
IPS_LogMessage("Puffer", "Steigung: " . $m);
|
|
$this->SetValue("Steigung", $m);
|
|
|
|
if ($at < $minAT){
|
|
$VT = $maxVT;
|
|
} elseif ($at > $maxAT){
|
|
$VT = $minVT;
|
|
} else {
|
|
$VT = $m * $at + $maxVT;
|
|
}
|
|
$this->SetValue("Maximaltemperatur", $VT );
|
|
|
|
$boilerTemp = $this->GetValue("Boilertemperatur");
|
|
$pufferLeistung = $this->ReadPropertyInteger("PufferLeistung");
|
|
|
|
|
|
IPS_LogMessage("Puffer", "vor peak if");
|
|
if ($Peak) {
|
|
$this->SetValue( "PowerSteps", json_encode([0]) );
|
|
} else {
|
|
if ($boilerTemp < $VT) {
|
|
$this->SetValue("PowerSteps", json_encode([$pufferLeistung]));
|
|
} else {
|
|
$this->SetValue("PowerSteps", json_encode([0]));
|
|
}
|
|
}
|
|
}
|
|
|
|
private function ProcessIdleCounter()
|
|
{
|
|
// IdleCounter auslesen und verarbeiten
|
|
$idleCounter = $this->GetValue("IdleCounter");
|
|
if ($idleCounter > 0) {
|
|
$this->SetValue("Idle", false);
|
|
$this->SetValue("IdleCounter", $idleCounter - 1);
|
|
} else {
|
|
$this->SetValue("Idle", true);
|
|
}
|
|
}
|
|
|
|
private function CheckIdle($power)
|
|
{
|
|
$lastpower = GetValue("Aktuelle_Leistung");
|
|
if ($lastpower != GetValue("Aktuelle_Leistung")) {
|
|
$this->SetValue("Idle", false);
|
|
$this->SetValue(
|
|
"IdleCounter",
|
|
$this->ReadPropertyInteger("IdleCounterMax")
|
|
);
|
|
}
|
|
// IdleCounter auslesen und verarbeiten
|
|
$idleCounter = $this->GetValue("IdleCounter");
|
|
if ($idleCounter > 0) {
|
|
$this->SetValue("Idle", false);
|
|
$this->SetValue("IdleCounter", $idleCounter - 1);
|
|
} else {
|
|
$this->SetValue("Idle", true);
|
|
}
|
|
}
|
|
|
|
|
|
}
|
|
|
|
?>
|