293 lines
11 KiB
PHP
293 lines
11 KiB
PHP
<?php
|
|
|
|
class Puffer_Speicher extends IPSModule
|
|
{
|
|
private array $leistungArray = [];
|
|
|
|
public function Create()
|
|
{
|
|
parent::Create();
|
|
|
|
|
|
$this->RegisterPropertyString("LeistungsStufen", json_encode([])); // Bezeichnung der Liste
|
|
$this->RegisterPropertyInteger("ZeitKonstante", 120);
|
|
$this->RegisterPropertyInteger("Pufferfuehler_PT1", 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("Puffertemperatur_glätten", false);
|
|
$this->RegisterPropertyString("Zeitplan", "");
|
|
$this->RegisterPropertyInteger("Interval", 5); // Recheninterval
|
|
|
|
|
|
// Puffer spezifische Variablen
|
|
$this->RegisterVariableInteger("Steigung","Steigung","",0);
|
|
$this->RegisterVariableInteger("Maximaltemperatur"," Berechnete Maximaltemperatur VT","",60);
|
|
$this->RegisterVariableInteger("Puffertemperatur", "Puffertemperatur", "", 40);
|
|
$this->RegisterVariableInteger("Aussentemperatur", "Aussentemperatur", "", 15);
|
|
$this->RegisterVariableBoolean("Hysterese", "Hysterese","",false);
|
|
|
|
|
|
// 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);
|
|
|
|
}
|
|
|
|
private function LadeUndSortiereLeistungen()
|
|
{
|
|
// Array initialisieren, immer mit 0
|
|
$this->leistungArray = [0];
|
|
|
|
// JSON aus der Property auslesen
|
|
$json = $this->ReadPropertyString("LeistungsStufen");
|
|
$leistungsStufen = json_decode($json, true);
|
|
|
|
if (is_array($leistungsStufen)) {
|
|
foreach ($leistungsStufen as $stufe) {
|
|
$this->leistungArray[] = $stufe['Leistung'] ?? 0;
|
|
}
|
|
}
|
|
|
|
// Array sortieren (Bubble Sort)
|
|
$len = count($this->leistungArray);
|
|
for ($i = 0; $i < $len - 1; $i++) {
|
|
for ($j = 0; $j < $len - $i - 1; $j++) {
|
|
if ($this->leistungArray[$j] > $this->leistungArray[$j + 1]) {
|
|
$temp = $this->leistungArray[$j];
|
|
$this->leistungArray[$j] = $this->leistungArray[$j + 1];
|
|
$this->leistungArray[$j + 1] = $temp;
|
|
}
|
|
}
|
|
}
|
|
|
|
}
|
|
|
|
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)
|
|
{
|
|
// Lade sicherheitshalber das aktuelle LeistungArray
|
|
$this->LadeUndSortiereLeistungen();
|
|
|
|
// Schleife über alle Leistungsstufen
|
|
foreach ($this->leistungArray as $leistung) {
|
|
$kontaktID = $this->GetKontaktIDZuLeistung($leistung);
|
|
|
|
// Prüfen, ob Variable existiert und gültige ID
|
|
if ($kontaktID > 0 && IPS_VariableExists($kontaktID)) {
|
|
// Setze TRUE für die aktuelle Leistungsstufe, FALSE für alle anderen
|
|
SetValue($kontaktID, ($leistung === $power));
|
|
} else {
|
|
if ($kontaktID > 0) {
|
|
IPS_LogMessage("ERROR", "KontaktID $kontaktID existiert nicht oder ist ungültig!");
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
// 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();
|
|
}
|
|
|
|
|
|
|
|
|
|
private function GetKontaktIDZuLeistung(int $leistung): int
|
|
{
|
|
$json = $this->ReadPropertyString("LeistungsStufen");
|
|
$leistungsStufen = json_decode($json, true);
|
|
|
|
if (is_array($leistungsStufen)) {
|
|
foreach ($leistungsStufen as $stufe) {
|
|
if (($stufe['Leistung'] ?? 0) == $leistung) {
|
|
return $stufe['Schaltkontakt_Stufe'] ?? 0;
|
|
}
|
|
}
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
|
|
|
|
|
|
// Methode zum Abrufen der aktuellen Daten
|
|
public function GetCurrentData(bool $Peak)
|
|
{
|
|
|
|
$this->LadeUndSortiereLeistungen();
|
|
$boilertemperatur_glätten = $this->ReadPropertyBoolean("Puffertemperatur_glätten");
|
|
if ($boilertemperatur_glätten) {
|
|
// Wenn Glättung aktiviert ist, führe das Glätten durch
|
|
$boilerFuehlerPT1ID = $this->ReadPropertyInteger("Pufferfuehler_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("Puffertemperatur", $newBoilerTemp);
|
|
} else {
|
|
// Wenn Glättung nicht aktiviert ist, setze die Boilertemperatur direkt auf den Wert des Boilerfühlers
|
|
$boilerFuehlerPT1ID = $this->ReadPropertyInteger("Pufferfuehler_PT1");
|
|
|
|
if (IPS_VariableExists($boilerFuehlerPT1ID)) {
|
|
$boilerPT1 = GetValue($boilerFuehlerPT1ID);
|
|
} else {
|
|
$boilerPT1 = 0.0; // Standardwert
|
|
}
|
|
// Setze Boilertemperatur direkt auf den Wert des Boilerfühlers
|
|
$this->SetValue("Puffertemperatur", $boilerPT1);
|
|
}
|
|
|
|
|
|
$at = GetValue($this->ReadPropertyInteger("Aussentemp"));
|
|
$this->SetValue("Aussentemperatur", $at);
|
|
$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
|
|
$m = ($maxVT - $minVT) / ($minAT - $maxAT);
|
|
$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("Puffertemperatur");
|
|
$hyst = $this->GetValue("Hysterese");
|
|
|
|
if($VT < $boilerTemp){
|
|
$this->SetValue("Hysterese", false );
|
|
}elseif($VT-5 >= $boilerTemp){
|
|
$this->SetValue("Hysterese", true);
|
|
}
|
|
|
|
IPS_LogMessage("LeistungArray_Get", json_encode($this->leistungArray));
|
|
|
|
if ($Peak) {
|
|
$this->SetValue( "PowerSteps", json_encode([0]) );
|
|
} else {
|
|
if ($boilerTemp < $VT && $hyst== true) {
|
|
$this->SetValue("PowerSteps", json_encode($this->leistungArray));
|
|
} elseif ($boilerTemp > $VT - 5 && $hyst== false) {
|
|
$this->SetValue("PowerSteps", json_encode([0]));
|
|
} 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);
|
|
}
|
|
}
|
|
|
|
|
|
}
|
|
|
|
?>
|