Wärmeinhalt Pufferspeicher berechnen mit IP-Symcon

<?


$volumen = 12345;  //Volumen Pufferspeicher in Litern, bei 12345 Wert eintragen
$temp1 = GetValueFloat(12345);  //Temp oben Pufferspeicher, bei 12345 Variable eintragen
$temp2 = GetValueFloat(12345);  //Temp mitte Pufferspeicher, bei 12345 Variable eintragen
$temp3 = GetValueFloat(12345);  //Temp unten Pufferspeicher, bei 12345 Variable eintragen
//ggf. Weitere anlegen und unten einbinden


$energie1 = ($volumen/3 * 4.183 * ($temp1-99)/3600);  //bei 99 die unterste nutzbare Temperatur eintragen und bei 3 die Anzahl der Fühler
$energie2 = ($volumen/3 * 4.183 * ($temp2-99)/3600);  //bei 99 die unterste nutzbare Temperatur eintragen und bei 3 die Anzahl der Fühler
$energie3 = ($volumen/3 * 4.183 * ($temp3-99)/3600);  //bei 99 die unterste nutzbare Temperatur eintragen und bei 3 die Anzahl der Fühler
$energie = ($energie1 + $energie2 + $energie3);
echo $energie;


If ($energie > 0) {
SetValueFloat(12345, $energie);  //Ausgabe Energieinhalt, bei 12345 Variable eintragen
}else{
SetValueFloat(12345, 0);}  //Ausgabe Energiegehalt, bei 12345 Variable eintragen


$energie_zu_la = (99 - $energie);  //Berechnung der noch zu ladenden Energie, bei 99 Maxwert eintragen
SetValueFloat(12345,$energie_zu_la);  //Ausgabe noch zu Ladende Energie, bei 12345 Variable eintragen


?>

<?
/*
*******************************
 IP-SYMCON Event Scripting
*******************************
File     : Berechnung_zu_ladende_Energie_in_Puffer.ips.php
Trigger  : 
Interval : 
*/


$vol1 = 500; // Volumen Pufferspeicher
//$ww_vol = 160; // Volumen WW-Speicher


$temp1 = GetValueFloat("Puffer_oben");// Temp oben Pufferspeicher
$temp2 = GetValueFloat("Puffer_1_3_tel");// Temp 1/3tel Pufferspeicher
$temp3 = GetValueFloat("Puffer_2_3_tel");// Temp 2/3tel Pufferspeicher
$temp4 = GetValueFloat("Puffer_unten");// Temp unten Pufferspeicher
{
$energie1 = ($vol1/4 * 4.183 * ($temp1-50)/3600);
$energie2 = ($vol1/4 * 4.183 * ($temp2-40)/3600);
$energie3 = ($vol1/4 * 4.183 * ($temp3-35)/3600);
$energie4 = ($vol1/4 * 4.183 * ($temp4-30)/3600);
$energie = ($energie1 + $energie2 + $energie3 + $energie4);
echo $energie;
   }
   If ($energie > 0) {
SetValueFloat("Puffer_Energieinhalt",$energie);
}else{
SetValueFloat("Puffer_Energieinhalt",0);
}
$value3 = GetValueFloat("Puffer_Energieinhalt");
{
$energie = (24 - $value3);
SetValueFloat("Puffer_Zu_ladender_Energieinhalt",$energie);
//SetValueFloat("WW_Zu_ladender_Energieinhalt",$ww_energie);
}
echo $energie;
//Laufzeit Dachs berechnen um Puffer zu füllen
$thl1 = 14; //Thermische Leistung HKA angeben
$thl2 = GetValueFloat("Mbus_Energie_aktl_Dachs");
 If ($thl2 < 8){$thlakt=$thl1;}
 else{$thlakt= $thl2;}
$value1 = GetValueFloat("Puffer_Zu_ladender_Energieinhalt");
$value2 = 0;//GetValueFloat("WWB_Zu_ladender_Energieinhalt");
$value3 = GetValueFloat("Mbus_Energie_aktl_Hoose");
$value4 = GetValueFloat("Mbus_Energie_aktl_Sieberg");
//$lfz = (($value1 + $value2)/$thl);
//$lfz = (($value1 + $value2 + $value3 + $value4)/$thlakt);
$lfz = $value1 / ($thlakt - $value3 - $value4);
echo $lfz;
If ($lfz < 0) {$tl = 24;}
else {$tl=sprintf("%1.2f",$lfz);}


$zeichen = preg_split('//',$tl,-1, PREG_SPLIT_DELIM_CAPTURE);
print_r($zeichen);


 If ($zeichen[2] == "."){
 $h= $zeichen[1] ;
 If ($h > 9){ $h = 9;}
 $m= (($zeichen[3]*10) + $zeichen[4])*0.6;
 If ($m > 60){ $mh = 60;}
 } else{
 $h= (($zeichen[1]*10)+ $zeichen[2]) ;
 If ($h > 20){ $h = 24;}
 $m= (($zeichen[4]*10) + $zeichen[5])*0.6;
 If ($m > 60){ $mh = 60;}
 }
   If ($m < 10){
 $sm=sprintf("%1.0f",$m);
 }else{
 $sm=sprintf("%2.0f",$m);
 }
 If ($sm < 10){
 SetValueString("Puffer_Berechnete_Laufzeit_zur_Ladung",$h.":0".$sm);
  }else{
 SetValueString("Puffer_Berechnete_Laufzeit_zur_Ladung",$h.":".$sm);
 }
?>