*/
// Qui la conversione delle due matricole Dosatore e fotometro in numeri duble
// Vengono fatti dei controlli sui valori per capire se questi sono accettabili:
// I valori che devono essere riscontrati devono essere compresi fra:
// Per CDS1000 fra 159000 - 159999, sostituito in 175000 - 179999
// Per TT6 fra 161000 - 161999
//var_dump($PIP300);
//var_dump($ADDR_V);
//var_dump($Analizzatore);
//die();
//$Dos = 1;
//if ($Dosatore < 1) { $Dos = 0; } //Se $Dos esce con 1 si assume come sistema di controllo il dosatore era 159000 - 159999
//if ($Dosatore > 10) { $Dos = 0; }
$Matricola_CALL = 0;
$Ana = 1;
if ($Analizzatore < 1) { $Ana = 0; } //Solo per essere sicuri che l'analizzatore abbia un riferimento giusto
if ($Analizzatore > 10) { $Ana = 0; }
//var_dump($Analizzatore);
// die();
IF ($Ana ==1 ){
$Matricola_CALL = $Analizzatore; //In realtà adesso questo prende il tipo strumento 1 = Pto3, 2 = Pro5 ...
if ($Matricola_CALL ==1 ){
$Analisi35 = 1; // Si considera che il sistema esegua solo le tre misure pH, cloro e temperatura
} else {
$Analisi35 = 0; // Si considera che il sistema esegua solo le tre misure pH, cloro e temperatura
}
}
//if ($Dos ==1 ) { // Se è presente il dosatore si nega l'uso della centralina
// $Ana = 0;
// $Matricola_CALL = $Dosatore; //In realtà adesso questo prende il tipo Dosatore 1... x
// }
//Si passa la variabile aggiornata a quella globale
//$Analisi35 = $Ana;
$_SESSION['Matricola_CALL'] = $Matricola_CALL;
$_SESSION['Analisi35'] = $Analisi35; // Questa variabile se 0 = 5 analisi, se 1 = 3 analisi
$_SESSION['nvasca'] = $nomevasca;
/*
echo 'Tipo strumento - ' ;var_dump($Matricola_CALL); // Adesso tipo macchina 1 = Pro3, 2 = Pro5
echo '3 o 5 misure - ' ;var_dump($Analisi35); // Tipologia macchina per 3 o 5 misure | Con 1=tre parametri, ...
echo 'SK Impianto - ' ;var_dump($PIP300); // Address scheda impianto
echo 'Indirizzo Macchina - ' ;var_dump($ADDR_V); //Numero vasca o indirizzo ztrumento
die();
*/
if ($Ana == 0 ) { // Se questa condizione è vera non abiamo alcun sistema definito e quindi si esce dalla pagina tornando alla precedente.
?>
ATTENZIONE!
Nessun Analizzatore Configurato, su questa Vasca!
Verifica la configurazione e/o l'indirizzo della centralina!
";
exit();
} else {
// Si invia la richiesta stringa al server destinatario...
//$Communication = 0;
//Must be same with server
//$host = "5.249.147.67";
//$host = "195.231.71.78";
$host = "95.110.210.60";
$port = 20;
// No Timeout
set_time_limit(0);
//Create Socket
$sock = socket_create(AF_INET, SOCK_STREAM, 0) or die("Could not create socket\n");
//Connect to the server
$result = socket_connect($sock, $host, $port) or die("Non è possibile connettersi al Server !!!\n");
$message = $stringa;
//Write to server socket
socket_write($sock, $message, strlen($message)) or die("Non è stato possibile inviare i dati al Server !!!\n");
//Read server respond message
//$result = socket_read($sock, 1024) or die(" *** Nessuna risposta dal Server !!! *** \n" . $oggi);
//Qui di seguito un time out per la risposta dal server
socket_set_option($sock, SOL_SOCKET, SO_RCVTIMEO, [
'sec' => 5,
'usec' => 0
]);
$result = @socket_read($sock, 1024); // Qui viene caricata la stringa giunta dal server AQC
if ($result === false) {
$err = socket_last_error($sock);
socket_close($sock);
$buttonStyle = "background-color: #f01010;
border: none;
color: white;
padding: 20px 40px;
text-align: center;
text-decoration: none;
display: inline-block;
font-size: 16px;
margin: 4px 2px;
cursor: pointer;
border-radius: 12px;";
echo "
";
exit();
}
if ($result === false || $result === "" || strlen($result) < 152) { //Si attendono non meno di 152 Byte
// Se la funzione socket_read non riesce a leggere i dati, impostiamo $Sock a 1
$buttonStyle = "background-color: #f01010;
border: none;
color: white;
padding: 20px 40px;
text-align: center;
text-decoration: none;
display: inline-block;
font-size: 16px;
margin: 4px 2px;
cursor: pointer;
border-radius: 12px;";
echo "";
socket_close($sock);
exit();
}
socket_close($sock);
// echo "Questi sono i dati ricevuti dal Server_Cloud HSP ! - [ ". $result." ]";
?>
Misure Analitiche
";
$pH_formatted = number_format($pH, 2, '.', '');
$Cl2 = conv16_2D($result[18], $result[19]); // Valore Cloro libero della vasca
// echo "[" . $Cl2 . "] Cloro ppm ";
$PrimaAnalisiCl2 = conv16($result[5], chr(0)); //Flagh prima misura cloro
if ($PrimaAnalisiCl2 > 0) {
$Cl2_formatted = number_format($Cl2, 2, '.', '');
} else {
$Cl2_formatted = "-.--";
}
}
if($Matricola_CALL == 2) {
// Qui si aggiorna il PRO5
$pH = conv16_2D($result[36], $result[35]); // Valore pH
//echo "[" . $pH . "] pH ";
$pH_formatted = number_format($pH, 2, '.', '');
$Cl2 = conv16_2D($result[32], $result[31]); // Valore Cloro libero della vasca
if ($Cl2 < 10) {
$Cl2_formatted = number_format($Cl2, 2, '.', '');
} else {
$Cl2_formatted = "-.--";
}
$Clc = conv16_2D($result[34], $result[33]); // Valore Cloro combinato
if ($Clc < 10) {
$Clc_formatted = number_format($Clc, 2, '.', '');
} else {
$Clc_formatted = "-.--";
}
$Redox = conv16($result[38], $result[37]); // Valore Redox
$Redox_formatted = number_format($Redox, 0, '.', '');
//var_dump($Cl2_formatted );
//var_dump($Clc_formatted );
//die();
}
//var_dump($pH);
//die();
if($Matricola_CALL == 1) {
$T = conv16_1D($result[24], $result[25]); // Valore Temperatura
// echo "[" . $T . "] °C ";
$T_formatted = number_format($T , 1, '.', '');
}
if($Matricola_CALL == 2) {
$T = conv16_1D($result[42], $result[41]); // Valore Temperatura 40 39
// echo "[" . $T . "] °C ";
$T_formatted = number_format($T , 1, '.', '');
}
?>