Script Hilfe für Abfrage Serielle Kommunikation gesucht!

Axel Koeneke

@wendy2702 Danke für die schnelle Reaktion.
Ja die Adresse stimmt und das Paket sollte auch passen, oder?

wendy2702

@Axel-Koeneke Nullmodem Kabel verwendet?

Steckt das Kabel zur Verbindung zwischen Seriellem Port und Resümat auf dem Resümat ?

Axel Koeneke

@wendy2702 Ich habe das Kabel eben nochmal am alten XP Notebook getestet und es funktioniert prima.
Software: Waterkotte PROService v 1.4.9.
Also ist die Verbindung wohl okay.

wendy2702

@Axel-Koeneke bei mir ist zu Beginn oft der serial port „offen“ geblieben nach erstem auslesen.

Mal JS Adapter oder besser den Rechner neu starten der die WP auslesen soll.

Das ist bei mir eigentlich noch immer ein Problem weshalb ich das komplette Script alle 3 Minuten aktiviere und nach 5 Sekunden oder so wieder deaktiviere.

Axel Koeneke

@wendy2702 Alles schon probiert. Du meinst das mein (dein) Script aber so gehen müsste?
Ich werde morgen nochmal versuchen das Bluetooth am Pi4 zu deaktivieren. Vielleicht hängt es damit zusammen.
Am Pi3 gab es da wohl Probleme zusammen mit der Seriellen Schnittstelle.
Der Pi4 läuft als Client, weil ich am Nuc zu viele Probleme mit den Virtuellen Ports hatte (Zwave).
VG
Axel

wendy2702

@Axel-Koeneke ich kann mein Script nochmal neu posten wenn ich zu Hause bin. Frühestens Donnerstag denke ich.

wendy2702

Hi nochmal mein aktuell funktionierendes Script:

Script zur Abfrage welches alle 3 minuten gestartet, gestoppt wird:

createState('Waterkotte.Daten.Abfrage_Rohdaten');
//createState('Waterkotte.Daten.Abfrage_Error');
setState("javascript.2.Waterkotte.Daten.Abfrage_Error"/*Waterkotte.Daten.Abfrage_Error*/, false);

// To use the `ByteLength` parser:
const SerialPort = require('serialport');
const ByteLength = SerialPort.parsers.ByteLength;

var buffer = new Buffer(12);
buffer[0] = 0x10;
buffer[1] = 0x02;
buffer[2] = 0x01;
buffer[3] = 0x15;
buffer[4] = 0x00;
buffer[5] = 0x00;
buffer[6] = 0x00;
buffer[7] = 0xf3;
buffer[8] = 0x10;
buffer[9] = 0x03;
buffer[10] = 0x7c;
buffer[11] = 0x32;
const port = new SerialPort("/dev/ttyUSB1", {
   baudRate: 9600,
   dataBits : 8,
   parity : 'none',
   stopBits: 1
//  flowControl : false
}, function (err) {
   if (err) {
//        port.close();
       console.log('Error1: ', err.message);
       setState("javascript.2.Waterkotte.Daten.Abfrage_Error"/*Waterkotte.Daten.Abfrage_Error*/, true);
   }

   const parser = port.pipe(new ByteLength({ length: 253 }));
   parser.on('data', function (data) {
   	console.log('Data received: ' + data.toString('hex'));
   	var daten = data.toString('hex');
   	setState('Waterkotte.Daten.Abfrage_Rohdaten', daten, true);
   	//port.close();
   });

   // Flush input
   port.flush();

   // send Data
       port.write(buffer, function(err) {
   	    if (err) {
   		    return console.log('Error on write: ', err.message);
   	    }
   
   	    console.log('Daten send');
// 		    port.close();
       });
   });
   
port.on('open', function() {
   console.log('Connected');
});

port.on('error', function(err) {
   console.log('Error2: ', err.message);
//	port.close();
});

// close port if the script stopped (to be able to open it again)
onStop(function (callback) {
   if (port && port.isOpen) {
   	port.close();
   	console.log('port closed');
   }
});

Scipt zur Auswertung der Abfrage, ist ständig aktiv:

//createState('Waterkotte.Daten.Rohdaten');

createState('Waterkotte.Daten.Version');

createState('Waterkotte.Daten.Temp_Aussen_Ist');

createState('Waterkotte.Daten.Temp_Aussen_24h');

createState('Waterkotte.Daten.Temp_Aussen_1h');

createState('Waterkotte.Daten.Temp_Ruecklauf_Soll');

createState('Waterkotte.Daten.Temp_Ruecklauf_Ist');

createState('Waterkotte.Daten.Temp_Vorlauf');

createState('Waterkotte.Daten.Temp_WW_Soll');

createState('Waterkotte.Daten.Temp_WW_Ist');

createState('Waterkotte.Daten.Temp_Raum');

createState('Waterkotte.Daten.Temp_Raum_1h');

createState('Waterkotte.Daten.Temp_WQuelle_Ein');

createState('Waterkotte.Daten.Temp_WQuelle_Aus');

createState('Waterkotte.Daten.Temp_Verdampfer');

createState('Waterkotte.Daten.Temp_Kondensator');

createState('Waterkotte.Daten.Temp_Saugleitung');

createState('Waterkotte.Daten.Temp_frei');

createState('Waterkotte.Daten.Druck_Verdampfer');

createState('Waterkotte.Daten.Druck_Kondensator');

createState('Waterkotte.Daten.Temp_Ruecklauf_Soll');

createState('Waterkotte.Daten.Temp_Ruecklauf_Ist');

createState('Waterkotte.Daten.Status_Heizung');

createState('Waterkotte.Daten.Status_Warmwasser');

createState('Waterkotte.Daten.Status_Handabschaltung');



createState('Waterkotte.Daten.Status_WPumpe');

createState('Waterkotte.Daten.Mode_Heizung');

createState('Waterkotte.Daten.Mode_Heizung_EIN_Normal');

createState('Waterkotte.Daten.Mode_Heizung_EIN_Solar');

createState('Waterkotte.Daten.Mode_Heizung_EIN_externe_Anhebung');

createState('Waterkotte.Daten.Mode_Heizung_EIN_Schnellaufheizung');

createState('Waterkotte.Daten.Mode_Heizung_AUS_Zeitprogramm');

createState('Waterkotte.Daten.Mode_Heizung_AUS_Unterdrueckung');

createState('Waterkotte.Daten.Mode_Heizung_AUS_kein_Bedarf');

createState('Waterkotte.Daten.Mode_Heizung_AUS_wegen_Fuehlerfehler');

createState('Waterkotte.Daten.Mode_Warmwasser');

createState('Waterkotte.Daten.Mode_Warmwasser_EIN_Normal');

createState('Waterkotte.Daten.Mode_Warmwasser_EIN_Solar');

createState('Waterkotte.Daten.Mode_Warmwasser_AUS_Zeitprogramm');

createState('Waterkotte.Daten.Mode_Warmwasser_AUS_kein_Bedarf');

createState('Waterkotte.Daten.Mode_Warmwasser_AUS_Unterbrechung_wegen_Fuehlerfehler');

createState('Waterkotte.Daten.Mode_Warmwasser_AUS_Unterdrueckung');

createState('Waterkotte.Daten.Mode_Warmwasser_Solar');

createState('Waterkotte.Daten.Mode_Warmwasser_AUS_Solarnutzung');

createState('Waterkotte.Daten.Mode_Kuehlung_EIN_Normal');

createState('Waterkotte.Daten.Mode_Kuehlung_AUS');

createState('Waterkotte.Daten.Mode_Kuehlung_AUS_Unterbrechung');

createState('Waterkotte.Daten.Mode_Kuehlung_AUS_kein_Bedarf');

createState('Waterkotte.Daten.Mode_Kuehlung_AUS_Unterbrechung_wegen_Fuehlerfehler');

createState('Waterkotte.Daten.DI_Motorschutz_Kompressor');

createState('Waterkotte.Daten.DI_Niederdruck_Pressostat');

createState('Waterkotte.Daten.DI_Hochdruck_Pressostat');

createState('Waterkotte.Daten.DI_Pumpe_Quelle');

createState('Waterkotte.Daten.DI_Externe_Sollwertbeeinflussung');

createState('Waterkotte.Daten.DI_Externe_Abschaltung');

createState('Waterkotte.Daten.DO_Magnetventil');

createState('Waterkotte.Daten.DO_Kompressor1');

createState('Waterkotte.Daten.DO_Sammelstoermeldung');

createState('Waterkotte.Daten.DO_Umschaltventil_Kuehlung');

createState('Waterkotte.Daten.DO_Umschaltventil_Stufe2');

createState('Waterkotte.Daten.DO_Umschaltventil_Pumpe_Heizung');

createState('Waterkotte.Daten.DO_Umschaltventil_Pumpe_Warmwasser');

createState('Waterkotte.Daten.DO_Umschaltventil_Pumpe_Quelle');





var id = 'javascript.2.Waterkotte.Daten.Abfrage_Rohdaten';



var daten;

var Satz;

var inp;

var out;

var VersionsNr;

var TempAussenIst;

var TempAussen24h;

var TempAussen1h;

var TempRuecklaufSoll;

var TempRuecklaufIst;

var TempVorlauf;

var TempWWSoll;

var TempWWIst;

var TempRaum;

var TempRaum1h;

var TempWQuelleEin;

var TempWQuelleAus;

var TempVerdampfer;

var TempKondensator;

var TempSaugleitung;

var Tempfrei;



var DruckVerdampfer;

var DruckKondensator;



var TempRuecklaufSoll;

var TempRuecklaufIst;

var KuehlungTempRuecklaufSoll;

var KuehlungTempRuecklaufIst;

var TempWWIst;



var Zeit;

var Datum;

var BetriebsstundenKompressor;

var BetriebsstundenHeizung;

var BetriebsstundenWW;

var BetriebsstundenStufe2;

var BetriebsStundenMessZeitKompressor;

var BetriebsStundenMessDatumKompressor;

var BetriebsStundenMessZeitWPumpe;

var BetriebsStundenMessDatumWPumpe;

var BetriebsStundenResetKompressor;

var BetriebsStundenResetWPumpe;



var Kennwort;

var WerksEinstellungen;

var ResetWPumpe;

var CrcSumme;

var NStart;

var DisplayZeile1;

var DisplayZeile2;



var AusfallTime;

var AusfallDate;

var AusfallBetriebsZustaende;



var AusfallDoBuffer;



var AusfallDoMagnetventil;

var AusfallDoKompressor1;

var AusfallDoBufferBit3;

var AusfallDoUmschaltventilKuehlung;

var AusfallDoStufe2;

var AusfallDoPumpeHeizung;

var AusfallDoPumpeWarmwasser;

var AusfallDoPumpeQuelle;





var AusfallDiBuffer;



var AusfallDiMotorschutzkompressor;

var AusfallDiNiederdruckPressostat;

var AusfallDiHochdruckPressostat;

var AusfallDiPumpeQuelle;

var AusfallDiSoleMinnimum;

var AusfallDiBufferBit6;

var AusfallDiExterneSollwertbeeinflussung;

var AusfallDiExterneAbschaltung;

var AusfallAiTempQuelleEin;

var AusfallAiError;

var AusfallAiDi;

var AusfallAiTempAussen;

var AusfallAiTempQuelleAus;

var AusfallAiVerdampfung;

var AusfallAiTempHeizEin;

var AusfallAiTempHeizAus;

var AusfallAiKondensation;

var AusfallAiTempWWasser;

var AusfallAuxAiError;

var AusfallAuxAiDi;

var AusfallAiTempRaum;

var ClearAusfaelle;

var Unterbrechung;

var WarnungEingangsSeite;

var WarnungAusgangsSeite;

var WarnungSonstige;

var Ausfall;

var AiError;

var AiDi;

var AiCounter0;

var AuxAiError;

var AuxAiDi;

var BetriebsZustaende;

var DoBuffer;

var DiBuffer;



var GesStatus;

var StatusVerriegelung;

var StatusHeiz;

var StatusKuehl;

var StatusStufe2;

var StatusWWasser;

var StatusWPumpe;

// ------------------------------

var ModeHeiz;

var ModeHeizEINNormal;

var ModeHeizEINSolar;

var ModeHeizEinextAnhebung;

var ModeHeizEINSchnellaufheidzung;

var ModeHeizAUSZeitprogramm;

var ModeHeizAUSUnterdrueckung;

var ModeHeizAUSkeinBedarf;

var ModeHeizAUSwFuehlerf;

// ------------------------------

var ModeKuehl;

var ModeKuehlEINNormal;

var ModeKuehlAUS;

var ModeKuehlAUSUnterdrueckung;

var ModeKuehlAUSkeinBedarf;

var ModeKuehlAUSUnterbrechwFuehlerf;

// ------------------------------

var ModeWWasser;

var ModeWWassserINNormal;

var ModeWWasserEINSolar;

var ModeWWasserAUSZeitprogramm;

var ModeWWasserAUSkeinBedarf;

var ModeWWasserAUSUnterbrwFuehlerf;

var ModeWWasserAUSUnterdrueckung;

var ModeWWasserSolar;

var ModeWWasserAUSSolarNutzung;

// ------------------------------



var LoggerError;

var LoggerInitTime;

var LoggerInitDate;

var LoggerMaxRec;

var LoggerActRec;

var LoggerMaxActRec;

var LoggerSizeOfData;

var LoggerSizeOfDatenLoggerBuffer;







var DiMotorschutzkompressor;

var DiNiederdruckPressostat;

var DiHochdruckPressostat;

var DiPumpeQuelle;

var DiSoleMinnimum;

var DiBufferBit6;

var DiExterneSollwertbeeinflussung;

var DiExterneAbschaltung;



var DoMagnetventil;

var DoKompressor1;

var DoSammelstoermeldung;

var DoUmschaltventilKuehlung;

var DoStufe2;

var DoPumpeHeizung;

var DoPumpeWarmwasser;

var DoPumpeQuelle;





var VerdampfungstemperaturNiedrig;

var TempQuelleAustrittNiedrig;

var DiffQuelleEinQuelleAusHoch;

var DiffQuelleAusVerdampfungHoch;



var KondensationstemperaturHoch;

var DiffHzgVorlaufRuecklaufNiedrig;

var DiffHzgVorlaufRuecklaufHoch;

var DiffKondensationVorlaufHoch;



var HzgRuecklauffuehlerdefekt;

var HzgVorlauffuehlerdefekt;

var Aussenwandfuehlerdefekt;

var DoBufferHandstellung;

var SolestandMinimum;



var Handabschaltung;

var HzgEinsatzzeitpunktSollwert;

var HzgRuecklaufSollwertamEinsatzp;

var HeizkennlineSteigungSoll;

var HeizkennlineObereBegrenzung;

var HeizgSollwertanhebung4kfuer24h;

var PilotraumSollwert;

var PilotraumFaktor;

var ExterneAnhebung;

var FreigabeHeizung;

var SperrenHeizung;

var SollwertaenderungEin;

var SollwertaenderungAus;

var St2KlObereBegrenzung;

var KennlinieHysterese;

var PumpenNachlaufzeit;

var AbschaltungHeizung;

var KuehlungEinsatzzeitpunkt;

var RuecklauftempSollwertamEinsatzzeitp;

var KuehlungKennlinieSteigungSoll;

var KennlinieuntereBegrenzung;

var AbschaltungWW;

var WWZeitEin;

var WWZeitAus;

var WWSoll;

var BeckenwasserTempSoll;

var WarmwasserHysterese;

var BeckenwasserHysterese;

var ModemKlingelzeichen;

var Fremdzugriff;

var Schluesselnummer;

var SetBetriebsMode;



var HzgExterneFreigabe;

var HzgExterneRuecklaufsteuerung;

var St2TempQAusMin;

var St2TempVerdMin;

var EstrichAufheizen;

var HzgExterneSteuerung;

var St2beiEVUAbsch;

var FrgBeckenwasser;

var ScaleFaktor;

var OffsetNiederdr;

var OffsetHochdr;

var DoHandkanal;

var DoHandkanalEin;

var UnterdrWarnAus;

var UnterdrWarnSonst;

var UnterdrWarnEin;

var NeuStart;

var RunFlag;



on(id, function (obj) {

//function myScript() {



//Bitauswertung



function bitauswertung(Adresse)

{

//Bit 1

inp = Woerter[Adresse];

out = parseInt(inp,16);

out &= 1;

if (out == 1) { Bit1 = 1; }

 else { Bit1 = 0; }





//Bit 2

inp = Woerter[Adresse];

out = parseInt(inp,16);

out &= 2;

if (out == 2) { Bit2 = 1; }

 else { Bit2 = 0; }





//Bit 3

inp = Woerter[Adresse];

out = parseInt(inp,16);

out &= 4;

if (out == 4) { Bit3 = 1; }

 else { Bit3 = 0; }





//Bit 4

inp = Woerter[Adresse];

out = parseInt(inp,16);

out &= 8;

if (out == 8) { Bit4 = 1; }

 else { Bit4 = 0; }





//Bit 5

inp = Woerter[Adresse];

out = parseInt(inp,16);

out &= 16;

if (out == 16) { Bit5 = 1; }

 else { Bit5 = 0; }





//Bit 6

inp = Woerter[Adresse];

out = parseInt(inp,16);

out &= 32;

if (out == 32) { Bit6 = 1; }

 else { Bit6 = 0; }





//Bit 7

inp = Woerter[Adresse];

out = parseInt(inp,16);

out &= 64;

if (out == 64) { Bit7 = 1; }

 else { Bit7 = 0; }





//Bit 8

inp = Woerter[Adresse];

out = parseInt(inp,16);

out &= 128;

if (out == 128) { Bit8 = 1; }

 else { Bit8 = 0; }



}



// Formatierung des Integerbereichs

function dezInt(num,size,prefix)

{

 prefix=(prefix)?prefix:"0";

 var minus=(num<0)?"-":"", result=(prefix=="0")?minus:"";

 num=Math.abs(parseInt(num,10)); size-=(""+num).length;

 for(var i=1;i<=size;i++) { result+=""+prefix; }

 result+=((prefix!="0")?minus:"")+num; return result;

}



   

//IEEE nach Hex umrechnen

function IEEE754_Hex32ToDez(hexstr)

{

 var dez,bin1,bin2,bin3,bin4,bin,sign,expo,mant,nul8='00000000';



 bin1=nul8+parseInt(hexstr.substr(0,2),16).toString(2);

 bin2=nul8+parseInt(hexstr.substr(2,2),16).toString(2);

 bin3=nul8+parseInt(hexstr.substr(4,2),16).toString(2);

 bin4=nul8+parseInt(hexstr.substr(6,2),16).toString(2);



 bin1=bin1.substr(bin1.length-8,8);

 bin2=bin2.substr(bin2.length-8,8);

 bin3=bin3.substr(bin3.length-8,8);

 bin4=bin4.substr(bin4.length-8,8);



 bin=bin1+bin2+bin3+bin4;



 sign=parseInt(bin.charAt(0),2);    // Vorzeichen

 expo=parseInt(bin.substr(1,8),2);  // Exponent

 mant=parseInt(bin.substr(9,23),2); // Mantisse



 dez=(1-2*sign)*Math.pow(2,expo-127)*(1+mant/Math.pow(2,23));



   dez = dez*100;

   dez = Math.round(dez);

   dez = dez/100;



 return(dez);

}



daten = getState("javascript.2.Waterkotte.Daten.Abfrage_Rohdaten").val;





console.log('Daten:' + daten); 



i = 0;

var Satz = [];

while (i < daten.length) {

   var byte = daten.substr(i, 2);

   Satz = Satz + ' ' + byte;

   i=i+2;

}



console.log('Daten split:' + Satz); 



//WP-Antwort auf 10 10 durchsuchen und durc 10 ersetzen

Satz = Satz.replace(/10 10/g, "10");





// WP-Antwort in einzelne Bytes zerlegen

var Woerter = Satz.split(" ");



// Versions-Nr. berechnen

inp = Woerter[6]+ Woerter[7];

out=parseInt(inp,16);

VersionsNr = out;



console.log('Daten split:' + inp); 



// Versions-Datum berechnen

inp = Woerter[8];

out=parseInt(inp,16);

out =dezInt(out,2);

Merker1 = out;

inp = Woerter[9];

out=parseInt(inp,16);

out =dezInt(out,2);

Merker2 = out;

inp = Woerter[10];

out=parseInt(inp,16);

out =dezInt(out,2);

Merker3 = out;

VersionsDatum = Merker1+ "." +Merker2+ "." +Merker3;



//Betriebsmode auslesen

inp = Woerter[11];

out=parseInt(inp,16);

out =dezInt(out,2);

Merker1 = out;

inp = Woerter[12];

out=parseInt(inp,16);

out =dezInt(out,2);

Merker2 = out;

inp = Woerter[13];

out=parseInt(inp,16);

out =dezInt(out,2);

Merker3 = out;

Betriebsmode = Merker1+ "." +Merker2+ "." +Merker3;



//Temp-Aussen-Ist auslesen

TempAussenIst = IEEE754_Hex32ToDez(Woerter[17]+ Woerter[16]+ Woerter[15]+ Woerter[14]);



//Temp-Aussen-24h auslesen

TempAussen24h = IEEE754_Hex32ToDez(Woerter[21]+ Woerter[20]+ Woerter[19]+ Woerter[18]);



//Temp-Aussen-1h auslesen

TempAussen1h = IEEE754_Hex32ToDez(Woerter[25]+ Woerter[24]+ Woerter[23]+ Woerter[22]);



//Temp-Ruecklauf Soll auslesen

TempRuecklaufSoll = IEEE754_Hex32ToDez(Woerter[29]+ Woerter[28]+ Woerter[27]+ Woerter[26]);



//Temp-Ruecklauf IST auslesen

TempRuecklaufIst = IEEE754_Hex32ToDez(Woerter[33]+ Woerter[32]+ Woerter[31]+ Woerter[30]);



//Temp-Vorlauf auslesen

TempVorlauf = IEEE754_Hex32ToDez(Woerter[37]+ Woerter[36]+ Woerter[35]+ Woerter[34]);



//Temp-WW Soll auslesen

TempWWSoll = IEEE754_Hex32ToDez(Woerter[41]+ Woerter[40]+ Woerter[39]+ Woerter[38]);



//Temp-WW Ist auslesen

TempWWIst = IEEE754_Hex32ToDez(Woerter[45]+ Woerter[44]+ Woerter[43]+ Woerter[42]);



//Temp-Raum auslesen

TempRaum = IEEE754_Hex32ToDez(Woerter[49]+ Woerter[48]+ Woerter[47]+ Woerter[46]);



//Temp-Raum-1h auslesen

TempRaum1h = IEEE754_Hex32ToDez(Woerter[53]+ Woerter[52]+ Woerter[51]+ Woerter[50]);



//Temp-WQuelle-Ein

TempWQuelleEin = IEEE754_Hex32ToDez(Woerter[57]+ Woerter[56]+ Woerter[55]+ Woerter[54]);



//Temp-WQuelle-Aus

TempWQuelleAus = IEEE754_Hex32ToDez(Woerter[61]+ Woerter[60]+ Woerter[59]+ Woerter[58]);



//Temp-Verdampfer

TempVerdampfer= IEEE754_Hex32ToDez(Woerter[65]+ Woerter[64]+ Woerter[63]+ Woerter[62]);



//Temp-Kondensator

TempKondensator = IEEE754_Hex32ToDez(Woerter[69]+ Woerter[68]+ Woerter[67]+ Woerter[66]);



//Temp-Saugleitung

TempSaugleitung = IEEE754_Hex32ToDez(Woerter[73]+ Woerter[72]+ Woerter[71]+ Woerter[70]);



//Temp-frei

Tempfrei = IEEE754_Hex32ToDez(Woerter[77]+ Woerter[76]+ Woerter[75]+ Woerter[74]);



//Druck-Verdampfer

DruckVerdampfer = IEEE754_Hex32ToDez(Woerter[81]+ Woerter[80]+ Woerter[79]+ Woerter[78])



//Druck-Kondensator

DruckKondensator = IEEE754_Hex32ToDez(Woerter[85]+ Woerter[84]+ Woerter[83]+ Woerter[82]);



//Temp-Ruecklauf Soll

TempRuecklaufSoll = IEEE754_Hex32ToDez(Woerter[89]+ Woerter[88]+ Woerter[87]+ Woerter[86]);



//Temp-Ruecklauf Ist

TempRuecklaufIst = IEEE754_Hex32ToDez(Woerter[93]+ Woerter[92]+ Woerter[91]+ Woerter[90]);



//Kuehlung Temp Ruecklauf Soll

KuehlungTempRuecklaufSoll = IEEE754_Hex32ToDez(Woerter[97]+ Woerter[96]+ Woerter[95]+ Woerter[94]);



//Kuehlung Temp Ruecklauf Ist

KuehlungTempRuecklaufIst = IEEE754_Hex32ToDez(Woerter[101]+ Woerter[100]+ Woerter[99]+ Woerter[98]);



//Warmwasser Temp Ist

TempWWIst = IEEE754_Hex32ToDez(Woerter[105]+ Woerter[104]+ Woerter[103]+ Woerter[102]);



//Zeit

inp = Woerter[108];

out=parseInt(inp,16);

out =dezInt(out,2);

Merker1 = out;

inp = Woerter[107];

out=parseInt(inp,16);

out =dezInt(out,2);

Merker2 = out;

inp = Woerter[106];

out=parseInt(inp,16);

out =dezInt(out,2);

Merker3 = out;

Zeit = Merker1+ ":" +Merker2+ ":" +Merker3;



//Datum

inp = Woerter[109];

out=parseInt(inp,16);

out =dezInt(out,2);

Merker1 = out;

inp = Woerter[110];

out=parseInt(inp,16);

out =dezInt(out,2);

Merker2 = out;

inp = Woerter[111];

out=parseInt(inp,16);

out =dezInt(out,2);

Merker3 = out;

Datum = Merker1+ "." +Merker2+ "." +Merker3;



//Betriebsstunden Kompressor

BetriebsstundenKompressor = IEEE754_Hex32ToDez(Woerter[115]+ Woerter[114]+ Woerter[113]+ Woerter[112]);



//Betriebsstunden Heizung

BetriebsstundenHeizung = IEEE754_Hex32ToDez(Woerter[119]+ Woerter[118]+ Woerter[117]+ Woerter[116]);



//Betriebsstunden WW

BetriebsstundenWW = IEEE754_Hex32ToDez(Woerter[123]+ Woerter[122]+ Woerter[121]+ Woerter[120]);



//Betriebsstunden Stufe 2

BetriebsstundenStufe2 = IEEE754_Hex32ToDez(Woerter[127]+ Woerter[126]+ Woerter[125]+ Woerter[124]);



//BetriebsStunden MessZeit Kompressor

inp = Woerter[128];

out=parseInt(inp,16);

out =dezInt(out,2);

Merker1 = out;

inp = Woerter[129];

out=parseInt(inp,16);

out =dezInt(out,2);

Merker2 = out;

inp = Woerter[130];

out=parseInt(inp,16);

out =dezInt(out,2);

Merker3 = out;

BetriebsStundenMessZeitKompressor = Merker1+ ":" +Merker2+ ":" +Merker3;



//BetriebsStunden MessDatum Kompressor

inp = Woerter[133];

out=parseInt(inp,16);

out =dezInt(out,2);

Merker1 = out;

inp = Woerter[132];

out=parseInt(inp,16);

out =dezInt(out,2);

Merker2 = out;

inp = Woerter[131];

out=parseInt(inp,16);

out =dezInt(out,2);

Merker3 = out;

BetriebsStundenMessDatumKompressor = Merker1+ "." +Merker2+ "." +Merker3;



//BetriebsStunden MessZeit WPumpe

inp = Woerter[134];

out=parseInt(inp,16);

out =dezInt(out,2);

Merker1 = out;

inp = Woerter[135];

out=parseInt(inp,16);

out =dezInt(out,2);

Merker2 = out;

inp = Woerter[136];

out=parseInt(inp,16);

out =dezInt(out,2);

Merker3 = out;

BetriebsStundenMessZeitWPumpe = Merker1+ ":" +Merker2+ ":" +Merker3;



//BetriebsStunden MessDatum WPumpe

inp = Woerter[139];

out=parseInt(inp,16);

out =dezInt(out,2);

Merker1 = out;

inp = Woerter[138];

out=parseInt(inp,16);

out =dezInt(out,2);

Merker2 = out;

inp = Woerter[137];

out=parseInt(inp,16);

out =dezInt(out,2);

Merker3 = out;

BetriebsStundenMessDatumWPumpe = Merker1+ "." +Merker2+ "." +Merker3;



//BetriebsStunden Reset Kompressor

inp = Woerter[140];

BetriebsStundenResetKompressor = parseInt(inp,16);



//BetriebsStunden Reset WPumpe

inp = Woerter[141];

BetriebsStundenResetWPumpe = parseInt(inp,16);



//Kennwort

inp = Woerter[142];

Kennwort = parseInt(inp,16);



//WerksEinstellungen

inp = Woerter[143];

WerksEinstellungen = parseInt(inp,16);



//Reset WPumpe

inp = Woerter[144];

ResetWPumpe = parseInt(inp,16);



//Crc Summe

inp = Woerter[145]+ Woerter[146];

CrcSumme = parseInt(inp,16);



//NStart

inp = Woerter[147];

NStart = parseInt(inp,16);



//Display Zeile 1

inp = Woerter[148]+ Woerter[149];

DisplayZeile1 = parseInt(inp,16);



//Display Zeile 2

inp = Woerter[150];

DisplayZeile2 = parseInt(inp,16);



//AusfallTime

inp = Woerter[153];

out=parseInt(inp,16);

out =dezInt(out,2);

Merker1 = out;

inp = Woerter[152];

out=parseInt(inp,16);

out =dezInt(out,2);

Merker2 = out;

inp = Woerter[151];

out=parseInt(inp,16);

out =dezInt(out,2);

Merker3 = out;

AusfallTime = Merker1+ ":" +Merker2+ ":" +Merker3;



//Ausfalldatum

inp = Woerter[154];

out=parseInt(inp,16);

out =dezInt(out,2);

Merker1 = out;

inp = Woerter[155];

out=parseInt(inp,16);

out =dezInt(out,2);

Merker2 = out;

inp = Woerter[156];

out=parseInt(inp,16);

out =dezInt(out,2);

Merker3 = out;

AusfallDate = Merker1+ "." +Merker2+ "." +Merker3;



//Ausfall BetriebsZustaende.dec

inp = Woerter[157];

out = parseInt(inp,16);

out = out.toString(2);

AusfallBetriebsZustaende = dezInt(out,8)



//----------------------------------------------



//Ausfall DoBuffer.dec

inp = Woerter[158];

out = parseInt(inp,16);

out = out.toString(2);

AusfallDoBuffer = dezInt(out,8)





//Bitauswertung Ausfall DoBuffer



bitauswertung(158);



AusfallDoMagnetventil = Bit1;

AusfallDoKompressor1 = Bit2;

AusfallDoBufferBit3 = Bit3;

AusfallDoUmschaltventilKuehlung = Bit4;

AusfallDoStufe2 = Bit5;

AusfallDoPumpeHeizung = Bit6;

AusfallDoPumpeWarmwasser = Bit7;

AusfallDoPumpeQuelle = Bit8;



//-----------------------------------------------------



//Ausfall DiBuffer.dec

inp = Woerter[159];

out = parseInt(inp,16);

out = out.toString(2);

AusfallDiBuffer = dezInt(out,8)



// Bitauswertung Ausfall DiBuffer

bitauswertung (159);



AusfallDiMotorschutzkompressor = Bit1;

AusfallDiNiederdruckPressostat = Bit2;

AusfallDiHochdruckPressostat = Bit3;

AusfallDiPumpeQuelle = Bit4;

AusfallDiSoleMinnimum = Bit5;

AusfallDiBufferBit6 = Bit6;

AusfallDiExterneSollwertbeeinflussung = Bit7;

AusfallDiExterneAbschaltung = Bit8;



//------------------------------------------------------



//AusfallAiError.dec

inp = Woerter[160];

out = parseInt(inp,16);

out = out.toString(2);

AusfallAiError = dezInt(out,8);



//AusfallAiDi.dec

inp = Woerter[161];

out = parseInt(inp,16);

out = out.toString(2);

AusfallAiDi = dezInt(out,8);



//AusfallAiTempAussen

AusfallAiTempAussen = IEEE754_Hex32ToDez(Woerter[165]+ Woerter[164]+ Woerter[163]+ Woerter[162]);



//AusfallAiTempQuelleEin

AusfallAiTempQuelleEin = IEEE754_Hex32ToDez(Woerter[169]+ Woerter[168]+ Woerter[167]+ Woerter[166]);



//AusfallAiTempQuelleAus

AusfallAiTempQuelleAus = IEEE754_Hex32ToDez(Woerter[173]+ Woerter[172]+ Woerter[171]+ Woerter[170]);



//AusfallAiVerdampfung

AusfallAiVerdampfung = IEEE754_Hex32ToDez(Woerter[177]+ Woerter[176]+ Woerter[175]+ Woerter[174]);



//AusfallAiTempHeizEin

AusfallAiTempHeizEin = IEEE754_Hex32ToDez(Woerter[181]+ Woerter[180]+ Woerter[179]+ Woerter[178]);



//AusfallAiTempHeizAus

AusfallAiTempHeizAus = IEEE754_Hex32ToDez(Woerter[185]+ Woerter[184]+ Woerter[183]+ Woerter[182]);



//AusfallAiKondensation

AusfallAiKondensation = IEEE754_Hex32ToDez(Woerter[189]+ Woerter[188]+ Woerter[187]+ Woerter[186]);



//AusfallAiTempWWasser

AusfallAiTempWWasser = IEEE754_Hex32ToDez(Woerter[193]+ Woerter[192]+ Woerter[191]+ Woerter[190]);



//AusfallAuxAiError.dec

inp = Woerter[194];

out = parseInt(inp,16);

out = out.toString(2);

AusfallAuxAiError = dezInt(out,8);



//AusfallAuxAiDi.dec

inp = Woerter[195];

out = parseInt(inp,16);

out = out.toString(2);

AusfallAuxAiDi = dezInt(out,8);



//AusfallAiTempRaum

AusfallAiTempRaum = IEEE754_Hex32ToDez(Woerter[199]+ Woerter[198]+ Woerter[197]+ Woerter[196]);



//ClearAusfaelle

inp = Woerter[200];

out=parseInt(inp,16);

ClearAusfaelle = out



//Unterbrechung.dec

inp = Woerter[201];

out = parseInt(inp,16);

out = out.toString(2);

Unterbrechung = dezInt(out,8);



//WarnungEingangsSeite.dec

inp = Woerter[202];

out = parseInt(inp,16);

out = out.toString(2);

WarnungEingangsSeite = dezInt(out,8);



//Bitauswertung WarnungEingangsSeite.dec

bitauswertung(202);

VerdampfungstemperaturNiedrig = Bit1;

TempQuelleAustrittNiedrig = Bit2;

DiffQuelleEinQuelleAusHoch = Bit3;

DiffQuelleAusVerdampfungHoch = Bit4;



//WarnungAusgangsSeite.dec

inp = Woerter[203];

out = parseInt(inp,16);

out = out.toString(2);

WarnungAusgangsSeite = dezInt(out,8);



//Bitauswertung WarnungAusgangsSeite.dec

bitauswertung(203);

KondensationstemperaturHoch = Bit2;

DiffHzgVorlaufRuecklaufNiedrig = Bit3;

DiffHzgVorlaufRuecklaufHoch = Bit4;

DiffKondensationVorlaufHoch = Bit6;



//WarnungSonstige.dec

inp = Woerter[204];

out = parseInt(inp,16);

out = out.toString(2);

WarnungSonstige = dezInt(out,8);



//Bitauswertung WarnungSonstige.dec

bitauswertung(204);

HzgRuecklauffuehlerdefekt = Bit1;

HzgVorlauffuehlerdefekt = Bit2;

Aussenwandfuehlerdefekt = Bit3;

DoBufferHandstellung = Bit4;

SolestandMinimum = Bit5;



//Ausfall.dec

inp = Woerter[205];

out = parseInt(inp,16);

out = out.toString(2);

Ausfall = dezInt(out,8);



//AiError.dec

inp = Woerter[206];

out = parseInt(inp,16);

out = out.toString(2);

AiError = dezInt(out,8);



//AiDi.dec

inp = Woerter[207];

out = parseInt(inp,16);

out = out.toString(2);

AiDi = dezInt(out,8);



//AiCounter0

inp = Woerter[208]+ Woerter[209];

out=parseInt(inp,16);

AiCounter0 = out;



//AuxAiError.dec

inp = Woerter[210];

out = parseInt(inp,16);

out = out.toString(2);

AuxAiError = dezInt(out,8);



//AuxAiDi.dec

inp = Woerter[211];

out = parseInt(inp,16);

out = out.toString(2);

AuxAiDi = dezInt(out,8);



//BetriebsZustaende.dec

inp = Woerter[212];

out = parseInt(inp,16);

out = out.toString(2);

BetriebsZustaende = dezInt(out,8);



//DoBuffer.dec

inp = Woerter[213];

out = parseInt(inp,16);

out = out.toString(2);

DoBuffer = dezInt(out,8);



//Bitauswertung DoBuffer

bitauswertung(213);



DoMagnetventil = Bit1;

DoKompressor1 = Bit2;

DoSammelstoermeldung = Bit3;

DoUmschaltventilKuehlung = Bit4;

DoStufe2 = Bit5;

DoPumpeHeizung = Bit6;

DoPumpeWarmwasser = Bit7;

DoPumpeQuelle = Bit8;



//DiBuffer.dec

inp = Woerter[214];

out = parseInt(inp,16);

out = out.toString(2);

DiBuffer = dezInt(out,8);



//Bitauswertung DiBuffer

bitauswertung(214);



DiMotorschutzkompressor = Bit1;

DiNiederdruckPressostat = Bit2;

DiHochdruckPressostat = Bit3;

DiPumpeQuelle = Bit4;

DiSoleMinnimum = Bit5;

DiBufferBit6 = Bit6;

DiExterneSollwertbeeinflussung = Bit7;

DiExterneAbschaltung = Bit8;



//GesStatus

inp = Woerter[215];

out = parseInt(inp,16);

out = out.toString(2);

Merker1 = dezInt(out,8);

inp = Woerter[216];

out = parseInt(inp,16);

out = out.toString(2);

Merker2 = dezInt(out,8);

GesStatus = Merker1+ "&nbsp;" +Merker2;



//StatusVerriegelung

inp = Woerter[217];

out = parseInt(inp,16);

out = out.toString(2);

Merker1 = dezInt(out,8);

inp = Woerter[218];

out = parseInt(inp,16);

out = out.toString(2);

Merker2 = dezInt(out,8);

StatusVerriegelung = Merker1+ "&nbsp;" +Merker2;



//StatusHeiz

inp = Woerter[219];

out = parseInt(inp,16);

out = out.toString(2);

Merker1 = dezInt(out,8);

inp = Woerter[220];

out = parseInt(inp,16);

out = out.toString(2);

Merker2 = dezInt(out,8);

StatusHeiz = Merker1+ "&nbsp;" +Merker2;



//StatusKuehl

inp = Woerter[221];

out = parseInt(inp,16);

out = out.toString(2);

Merker1 = dezInt(out,8);

inp = Woerter[222];

out = parseInt(inp,16);

out = out.toString(2);

Merker2 = dezInt(out,8);

StatusKuehl = Merker1+ "&nbsp;" +Merker2;



//StatusStufe2

inp = Woerter[223];

out = parseInt(inp,16);

out = out.toString(2);

Merker1 = dezInt(out,8);

inp = Woerter[224];

out = parseInt(inp,16);

out = out.toString(2);

Merker2 = dezInt(out,8);

StatusStufe2 = Merker1+ "&nbsp;" +Merker2;



//StatusWWasser

inp = Woerter[225];

out = parseInt(inp,16);

out = out.toString(2);

Merker1 = dezInt(out,8);

inp = Woerter[226];

out = parseInt(inp,16);

out = out.toString(2);

StatusWWasser = Merker1+ "&nbsp;" +Merker2;



//StatusWPumpe

inp = Woerter[227];

out = parseInt(inp,16);

out = out.toString(2);

Merker1 = dezInt(out,8);

inp = Woerter[228];

out = parseInt(inp,16);

out = out.toString(2);

StatusWPumpe = Merker1+ "&nbsp;" +Merker2;



//ModeHeiz.dec

inp = Woerter[229];

out = parseInt(inp,16);

out = out.toString(2);

ModeHeiz = dezInt(out,8);



//Bitauswertung ModeHeizung

bitauswertung(229);



ModeHeizEINNormal = Bit1;

ModeHeizEINSolar = Bit2;

ModeHeizEinextAnhebung = Bit3;

ModeHeizEINSchnellaufheidzung = Bit4;

ModeHeizAUSZeitprogramm = Bit5;

ModeHeizAUSUnterdrueckung = Bit6;

ModeHeizAUSkeinBedarf = Bit7;

ModeHeizAUSwFuehlerf = Bit8;



//ModeKuehl.dec

inp = Woerter[230];

out = parseInt(inp,16);

out = out.toString(2);

ModeKuehl = dezInt(out,8);



//Bitauswertung ModeKuehlen

bitauswertung(230);



ModeKuehlEINNormal = Bit1;

ModeKuehlAUS = Bit2;

ModeKuehlAUSUnterdrueckung = Bit3;

ModeKuehlAUSkeinBedarf = Bit4;

ModeKuehlAUSUnterbrechwFuehlerf = Bit5;





//ModeWWasser

inp = Woerter[231];

out = parseInt(inp,16);

out = out.toString(2);

ModeWWasser = dezInt(out,8);



//Bitauswertung ModeWWasser

bitauswertung(231);

ModeWWassserINNormal = Bit1;

ModeWWasserEINSolar = Bit2;

ModeWWasserAUSZeitprogramm = Bit3;

ModeWWasserAUSkeinBedarf = Bit4;

ModeWWasserAUSUnterbrwFuehlerf = Bit5;

ModeWWasserAUSUnterdrueckung = Bit6;

ModeWWasserSolar = Bit7;

ModeWWasserAUSSolarNutzung = Bit8;



//LoggerError

inp = Woerter[232];

out=parseInt(inp,16);

LoggerError = out;



//LoggerInitTime

inp = Woerter[235];

out=parseInt(inp,16);

out =dezInt(out,2);

Merker1 = out;

inp = Woerter[234];

out=parseInt(inp,16);

out =dezInt(out,2);

Merker2 = out;

inp = Woerter[233];

out=parseInt(inp,16);

out =dezInt(out,2);

Merker3 = out;

LoggerInitTime = Merker1+ ":" +Merker2+ ":" +Merker3;



//LoggerInitDate

inp = Woerter[236];

out=parseInt(inp,16);

out =dezInt(out,2);

Merker1 = out;

inp = Woerter[237];

out=parseInt(inp,16);

out =dezInt(out,2);

Merker2 = out;

inp = Woerter[238];

out=parseInt(inp,16);

out =dezInt(out,2);

Merker3 = out;

LoggerInitDate = Merker1+ "." +Merker2+ "." +Merker3;



//LoggerMaxRec

inp = Woerter[239]+ Woerter[240];

out=parseInt(inp,16);

LoggerMaxRec = out;



//LoggerActRec

inp = Woerter[241]+ Woerter[242];

out=parseInt(inp,16);

LoggerActRec = out;



//LoggerMaxActRec

inp = Woerter[243]+ Woerter[244];

out=parseInt(inp,16);

LoggerMaxActRec = out;



//LoggerSizeOfData

inp = Woerter[245]+ Woerter[246];

out=parseInt(inp,16);

LoggerSizeOfData = out;



//LoggerSizeOfDatenLoggerBuffer

inp = Woerter[247]+ Woerter[248];

out=parseInt(inp,16);

LoggerSizeOfDatenLoggerBuffer = out;



//Handabschaltung

inp = Woerter[249];

out = parseInt(inp,16);

Handabschaltung = out;



//Hzg Einsatzzeitpunkt Sollwert

//HzgEinsatzzeitpunktSollwert = IEEE754_Hex32ToDez(Woerter[253]+ Woerter[252]+ Woerter[251]+ Woerter[250]);



//Hzg Ruecklauf Sollwert am Einsatzp.

//HzgRuecklaufSollwertamEinsatzp = IEEE754_Hex32ToDez(Woerter[257]+ Woerter[256]+ Woerter[255]+ Woerter[254]);



//Heizkennline Steigung Soll

//HeizkennlineSteigungSoll = IEEE754_Hex32ToDez(Woerter[261]+ Woerter[260]+ Woerter[259]+ Woerter[258]);



//Heizkennline Obere Begrenzung

//HeizkennlineObereBegrenzung = IEEE754_Hex32ToDez(Woerter[265]+ Woerter[264]+ Woerter[263]+ Woerter[262]);



//Heizung - Sollwertanhebung 4k fuer 24 Stunden

inp = Woerter[266];

out = parseInt(inp,16);

HeizgSollwertanhebung4kfuer24h = out



//Pilotraum Sollwert

//PilotraumSollwert = IEEE754_Hex32ToDez(Woerter[270]+ Woerter[269]+ Woerter[268]+ Woerter[267]);



//Pilotraum Faktor

inp = Woerter[271];

out = parseInt(inp,16);

PilotraumFaktor = out;



//Externe Anhebung

//ExterneAnhebung = IEEE754_Hex32ToDez(Woerter[275]+ Woerter[274]+ Woerter[273]+ Woerter[272]);



//Freigabe Heizung

inp = Woerter[278];

out=parseInt(inp,16);

Merker1 = out;

inp = Woerter[277];

out=parseInt(inp,16);

Merker2 = out;

inp = Woerter[276];

out=parseInt(inp,16);

Merker3 = out;

FreigabeHeizung = Merker1+ ":" +Merker2+ ":" +Merker3;



//Sperren Heizung

inp = Woerter[281];

out=parseInt(inp,16);

Merker1 = out;

inp = Woerter[280];

out=parseInt(inp,16);

Merker21 = out;

inp = Woerter[279];

out=parseInt(inp,16);

Merker3 = out;

SperrenHeizung = Merker1+ ":" +Merker2+ ":" +Merker3;



//Sollwertaenderung Ein

inp = Woerter[284];

out=parseInt(inp,16);

Merker1 = out;

inp = Woerter[283];

out=parseInt(inp,16);

Merker2 = out;

inp = Woerter[282];

out=parseInt(inp,16);

Merker3 = out;

SollwertaenderungEin = Merker1+ ":" +Merker2+ ":" +Merker3;



//Sollwertaenderung Aus

inp = Woerter[287];

out=parseInt(inp,16);

Merker1 = out;

inp = Woerter[286];

out=parseInt(inp,16);

Merker2 = out;

inp = Woerter[285];

out=parseInt(inp,16);

Merker3 = out;

SollwertaenderungAus = Merker1+ ":" +Merker2+ ":" +Merker3;



//Stufe 2 Kl. Obere Begrenzung

//St2KlObereBegrenzung = IEEE754_Hex32ToDez(Woerter[291]+ Woerter[290]+ Woerter[289]+ Woerter[288]);



//Kennlinie Hysterese

//KennlinieHysterese = IEEE754_Hex32ToDez(Woerter[295]+ Woerter[294]+ Woerter[293]+ Woerter[292]);



//Pumpen Nachlaufzeit

inp = Woerter[296];

out=parseInt(inp,16);

PumpenNachlaufzeit = out;



//Abschaltung Heizung

inp = Woerter[297];

out=parseInt(inp,16);

AbschaltungHeizung = out;



//Kuehlung Einsatzzeitpunkt

//KuehlungEinsatzzeitpunkt = IEEE754_Hex32ToDez(Woerter[301]+ Woerter[300]+ Woerter[299]+ Woerter[298]);



//Ruecklauftemp. Sollwert am Einsatzzeitp.

//RuecklauftempSollwertamEinsatzzeitp = IEEE754_Hex32ToDez(Woerter[305]+ Woerter[304]+ Woerter[303]+ Woerter[302]);



//Kuehlung Kennlinie Steigung Soll

//KuehlungKennlinieSteigungSoll = IEEE754_Hex32ToDez(Woerter[309]+ Woerter[308]+ Woerter[307]+ Woerter[306]);



//Kennlinie untere Begrenzung

//KennlinieuntereBegrenzung = IEEE754_Hex32ToDez(Woerter[313]+ Woerter[312]+ Woerter[311]+ Woerter[310]);



//Abschaltung Warmwasser

inp = Woerter[314];

out=parseInt(inp,16);

AbschaltungWW = out;



//Warmwasser Zeit ein

inp = Woerter[317];

out=parseInt(inp,16);

Merker1 = out;

inp = Woerter[316];

out=parseInt(inp,16);

Merker2 = out;

inp = Woerter[315];

out=parseInt(inp,16);

Merker3 = out;

WWZeitEin = Merker1+ ":" +Merker2+ ":" +Merker3;



//Warmwasser Zeit aus

inp = Woerter[320];

out=parseInt(inp,16);

Merker1 = out;

inp = Woerter[319];

out=parseInt(inp,16);

Merker2 = out;

inp = Woerter[318];

out=parseInt(inp,16);

Merker3 = out;

WWZeitAus = Merker1+ ":" +Merker2+ ":" +Merker3;



//Warmwasser Soll

//WWSoll = IEEE754_Hex32ToDez(Woerter[324]+ Woerter[323]+ Woerter[322]+ Woerter[321]);



//Beckenwasser Temperatur Soll

//BeckenwasserTempSoll = IEEE754_Hex32ToDez(Woerter[328]+ Woerter[327]+ Woerter[326]+ Woerter[325]);



//Warmwasser Hysterese

//WarmwasserHysterese = IEEE754_Hex32ToDez(Woerter[332]+ Woerter[331]+ Woerter[330]+ Woerter[329]);



//Beckenwasser Hysterese

//BeckenwasserHysterese = IEEE754_Hex32ToDez(Woerter[336]+ Woerter[335]+ Woerter[334]+ Woerter[333]);



//Modem Klingelzeichen

inp = Woerter[337];

out=parseInt(inp,16);

ModemKlingelzeichen = out;



//Fremdzugriff

inp = Woerter[338];

out=parseInt(inp,16);

Fremdzugriff = out;



//Schluesselnummer

inp = Woerter[339];

out=parseInt(inp,16);

Schluesselnummer = out;



//SetBetriebsMode

inp = Woerter[340];

out=parseInt(inp,16);

Merker1 = out;

inp = Woerter[341];

out=parseInt(inp,16);

Merker2 = out;

inp = Woerter[342];

out=parseInt(inp,16);

Merker3 = out;

SetBetriebsMode = Merker1+ "." +Merker2+ "." +Merker3;



//Hzg: Externe Freigabe

inp = Woerter[343];

out=parseInt(inp,16);

HzgExterneFreigabe = out;



//Hzg: Externe Ruecklaufsteuerung

//HzgExterneRuecklaufsteuerung = IEEE754_Hex32ToDez(Woerter[347]+ Woerter[346]+ Woerter[345]+ Woerter[344]);



//St2: TempQAus < Min

//St2TempQAusMin = IEEE754_Hex32ToDez(Woerter[351]+ Woerter[350]+ Woerter[349]+ Woerter[348]);



//St2: TempVerd < Min

//St2TempVerdMin = IEEE754_Hex32ToDez(Woerter[355]+ Woerter[354]+ Woerter[353]+ Woerter[352]);



//Estrich Aufheizen

inp = Woerter[356];

out=parseInt(inp,16);

EstrichAufheizen = out;



//Hzg: Externe Steuerung

inp = Woerter[357];

out=parseInt(inp,16);

HzgExterneSteuerung = out;



//St2 bei EVU Absch.

inp = Woerter[358];

out=parseInt(inp,16);

St2beiEVUAbsch = out;



//Frg. Beckenwasser

inp = Woerter[359];

out=parseInt(inp,16);

FrgBeckenwasser = out;



//Scale Faktor

//ScaleFaktor = IEEE754_Hex32ToDez(Woerter[363]+ Woerter[362]+ Woerter[361]+ Woerter[360]);



//Offset Niederdr.

//OffsetNiederdr = IEEE754_Hex32ToDez(Woerter[367]+ Woerter[366]+ Woerter[365]+ Woerter[364]);



//Offset Hochdr.

//OffsetHochdr = IEEE754_Hex32ToDez(Woerter[371]+ Woerter[370]+ Woerter[369]+ Woerter[368]);



//DO-Handkanal

inp = Woerter[372];

out=parseInt(inp,16);

DoHandkanal = out



//DO-Handkanal Ein

inp = Woerter[373];

out=parseInt(inp,16);

DoHandkanalEin = out;



//Unterdrückung Warnmeldungen Eingänge

inp = Woerter[374];

out=parseInt(inp,16);

out = out.toString(2);

UnterdrWarnEin = dezInt(out,8);



//Unterdrückung Warnmeldungen Ausgänge

inp = Woerter[375];

out=parseInt(inp,16);

out = out.toString(2);

UnterdrWarnAus = dezInt(out,8);



//Unterdrückung Warnmeldungen Sonstige

inp = Woerter[376];

out=parseInt(inp,16);

out = out.toString(2);

UnterdrWarnSonst = dezInt(out,8);



//Neu-Start

inp = Woerter[377];

out=parseInt(inp,16);

NeuStart = out;



//Run-Flag

inp = Woerter[378];

out=parseInt(inp,16);

RunFlag = out;







//------------------------------------------------

console.log('Temp aussen ist:' + TempAussenIst); 



setState('Waterkotte.Daten.Version', VersionsNr);

setState('Waterkotte.Daten.Temp_Aussen_Ist', TempAussenIst);

setState('Waterkotte.Daten.Temp_Aussen_24h', TempAussen24h);

setState('Waterkotte.Daten.Temp_Aussen_1h', TempAussen1h);

setState('Waterkotte.Daten.Temp_Ruecklauf_Soll', TempRuecklaufSoll);

setState('Waterkotte.Daten.Temp_Ruecklauf_Ist', TempRuecklaufIst);

setState('Waterkotte.Daten.Temp_Vorlauf', TempVorlauf);

setState('Waterkotte.Daten.Temp_WW_Soll', TempWWSoll);

setState('Waterkotte.Daten.Temp_WW_Ist', TempWWIst);

setState('Waterkotte.Daten.Temp_Raum', TempRaum);

setState('Waterkotte.Daten.Temp_Raum_1h', TempRaum1h);

setState('Waterkotte.Daten.Temp_WQuelle_Ein', TempWQuelleEin);

setState('Waterkotte.Daten.Temp_WQuelle_Aus', TempWQuelleAus);

setState('Waterkotte.Daten.Temp_Verdampfer', TempVerdampfer);

setState('Waterkotte.Daten.Temp_Kondensator', TempKondensator);

setState('Waterkotte.Daten.Temp_Saugleitung', TempSaugleitung);

setState('Waterkotte.Daten.Temp_frei', Tempfrei);

setState('Waterkotte.Daten.Druck_Verdampfer', DruckVerdampfer);

setState('Waterkotte.Daten.Druck_Kondensator', DruckKondensator);

setState('Waterkotte.Daten.Temp_Ruecklauf_Soll', TempRuecklaufSoll);

setState('Waterkotte.Daten.Temp_Ruecklauf_Ist', TempRuecklaufIst);

setState('Waterkotte.Daten.Status_Heizung', StatusHeiz);

setState('Waterkotte.Daten.Status_Handabschaltung',Handabschaltung);



setState('Waterkotte.Daten.Status_Warmwasser', StatusWWasser);

setState('Waterkotte.Daten.Status_WPumpe', StatusWPumpe);

setState('Waterkotte.Daten.Mode_Heizung', ModeHeiz);

setState('Waterkotte.Daten.Mode_Heizung_EIN_Normal', ModeHeizEINNormal);

setState('Waterkotte.Daten.Mode_Heizung_EIN_Solar', ModeHeizEINSolar);

setState('Waterkotte.Daten.Mode_Heizung_EIN_externe_Anhebung', ModeHeizEinextAnhebung);

setState('Waterkotte.Daten.Mode_Heizung_EIN_Schnellaufheizung', ModeHeizEINSchnellaufheidzung);

setState('Waterkotte.Daten.Mode_Heizung_AUS_Zeitprogramm', ModeHeizAUSZeitprogramm);

setState('Waterkotte.Daten.Mode_Heizung_AUS_Unterdrueckung', ModeHeizAUSUnterdrueckung);

setState('Waterkotte.Daten.Mode_Heizung_AUS_kein_Bedarf', ModeHeizAUSkeinBedarf);

setState('Waterkotte.Daten.Mode_Heizung_AUS_wegen_Fuehlerfehler', ModeHeizAUSwFuehlerf);

setState('Waterkotte.Daten.Mode_Warmwasser', ModeWWasser);

setState('Waterkotte.Daten.Mode_Warmwasser_EIN_Normal', ModeWWassserINNormal);

setState('Waterkotte.Daten.Mode_Warmwasser_EIN_Solar', ModeWWasserEINSolar);

setState('Waterkotte.Daten.Mode_Warmwasser_AUS_Zeitprogramm', ModeWWasserAUSZeitprogramm);

setState('Waterkotte.Daten.Mode_Warmwasser_AUS_kein_Bedarf', ModeWWasserAUSkeinBedarf);

setState('Waterkotte.Daten.Mode_Warmwasser_AUS_Unterbrechung_wegen_Fuehlerfehler', ModeWWasserAUSUnterbrwFuehlerf);

setState('Waterkotte.Daten.Mode_Warmwasser_AUS_Unterdrueckung', ModeWWasserAUSUnterdrueckung);

setState('Waterkotte.Daten.Mode_Warmwasser_Solar', ModeWWasserSolar);

setState('Waterkotte.Daten.Mode_Warmwasser_AUS_Solarnutzung', ModeWWasserAUSSolarNutzung);

setState('Waterkotte.Daten.Mode_Kuehlung_EIN_Normal', ModeKuehlEINNormal);

setState('Waterkotte.Daten.Mode_Kuehlung_AUS', ModeKuehlAUS);

setState('Waterkotte.Daten.Mode_Kuehlung_AUS_Unterbrechung', ModeKuehlAUSUnterdrueckung);

setState('Waterkotte.Daten.Mode_Kuehlung_AUS_kein_Bedarf', ModeKuehlAUSkeinBedarf);

setState('Waterkotte.Daten.Mode_Kuehlung_AUS_Unterbrechung_wegen_Fuehlerfehler', ModeKuehlAUSUnterbrechwFuehlerf);

setState('Waterkotte.Daten.DI_Motorschutz_Kompressor', DiMotorschutzkompressor);

setState('Waterkotte.Daten.DI_Niederdruck_Pressostat', DiNiederdruckPressostat);

setState('Waterkotte.Daten.DI_Hochdruck_Pressostat', DiHochdruckPressostat);

setState('Waterkotte.Daten.DI_Pumpe_Quelle', DiPumpeQuelle);

setState('Waterkotte.Daten.DI_Externe_Sollwertbeeinflussung', DiExterneSollwertbeeinflussung);

setState('Waterkotte.Daten.DI_Externe_Abschaltung', DiExterneAbschaltung);

setState('Waterkotte.Daten.DO_Magnetventil', DoMagnetventil);

setState('Waterkotte.Daten.DO_Kompressor1', DoKompressor1);

setState('Waterkotte.Daten.DO_Sammelstoermeldung', DoSammelstoermeldung);

setState('Waterkotte.Daten.DO_Umschaltventil_Kuehlung', DoUmschaltventilKuehlung);

setState('Waterkotte.Daten.DO_Umschaltventil_Stufe2', DoStufe2);

setState('Waterkotte.Daten.DO_Umschaltventil_Pumpe_Heizung', DoPumpeHeizung);

setState('Waterkotte.Daten.DO_Umschaltventil_Pumpe_Warmwasser', DoPumpeWarmwasser);

setState('Waterkotte.Daten.DO_Umschaltventil_Pumpe_Quelle', DoPumpeQuelle);





});

Blockly Script zum Starten/Stoppen der Abfrage, ist immer aktiv:

<xml xmlns="https://developers.google.com/blockly/xml">
 <variables>
   <variable type="cron" id="schedule1">schedule1</variable>
 </variables>
 <block type="schedule_create" id="U^a/a|R.Ag0SUHC5`R_X" x="-512" y="-63">
   <field name="NAME">schedule1</field>
   <value name="SCHEDULE">
     <shadow type="field_cron" id="RoVW,)EZwML}A7XD8Xc/">
       <field name="CRON">12 */3 * * * *</field>
     </shadow>
   </value>
   <statement name="STATEMENT">
     <block type="debug" id=";E~}`cmu%ZUC50DV#p?Y">
       <field name="Severity">log</field>
       <value name="TEXT">
         <shadow type="text" id="0w!y-Pmlm,f`O0?~@jC@">
           <field name="TEXT">Abfrage_Waterkotte</field>
         </shadow>
       </value>
       <next>
         <block type="controls_if" id="WEoLFzJ0#-xub!Bwhv~H">
           <value name="IF0">
             <block type="logic_operation" id="%[579SWxQ72Thpq|e}II" inline="false">
               <field name="OP">AND</field>
               <value name="A">
                 <block type="logic_compare" id=";I2G)sOC7K3E#aG*1^{n">
                   <field name="OP">EQ</field>
                   <value name="A">
                     <block type="get_value" id="2wot(2t*g8UEm.+2pLu@">
                       <field name="ATTR">val</field>
                       <field name="OID">javascript.2.scriptEnabled.Waterkotte.Abfrage_Waterkotte_Test</field>
                     </block>
                   </value>
                   <value name="B">
                     <block type="logic_boolean" id="/w]{^LZ9,e*gI5Na*=AX">
                       <field name="BOOL">FALSE</field>
                     </block>
                   </value>
                 </block>
               </value>
               <value name="B">
                 <block type="logic_operation" id="DFqv1XTuf5Jcd6~d4Pl9">
                   <field name="OP">AND</field>
                   <value name="A">
                     <block type="logic_compare" id="Q%hn`r~GuwSiW|`lwXy4">
                       <field name="OP">EQ</field>
                       <value name="A">
                         <block type="get_value" id="=gAZ0qIl%Q2=a)w=}wsm">
                           <field name="ATTR">val</field>
                           <field name="OID">javascript.2.scriptEnabled.Waterkotte.WW_Temp_45</field>
                         </block>
                       </value>
                       <value name="B">
                         <block type="logic_boolean" id="z(f3588pY)X5T1JY`L}o">
                           <field name="BOOL">FALSE</field>
                         </block>
                       </value>
                     </block>
                   </value>
                   <value name="B">
                     <block type="logic_compare" id="QF-a*[%R+[u!Z(LIu]Nj">
                       <field name="OP">EQ</field>
                       <value name="A">
                         <block type="get_value" id="`P_T2QF-wSoJ!ZJN0:^y">
                           <field name="ATTR">val</field>
                           <field name="OID">javascript.2.scriptEnabled.Waterkotte.WW_Temp_60</field>
                         </block>
                       </value>
                       <value name="B">
                         <block type="logic_boolean" id="nI4s86@mVMZfHAb+k9u+">
                           <field name="BOOL">FALSE</field>
                         </block>
                       </value>
                     </block>
                   </value>
                 </block>
               </value>
             </block>
           </value>
           <next>
             <block type="debug" id="-twd|JK7:Q5Q6+M2lTmO">
               <field name="Severity">log</field>
               <value name="TEXT">
                 <shadow type="text" id="e+uKa0:h7S7tL{x@5ZIM">
                   <field name="TEXT">Aktiviere Abfrage Waterkotte</field>
                 </shadow>
               </value>
               <next>
                 <block type="control" id="Hh@%xY%GsRI1g208b7ce">
                   <mutation xmlns="http://www.w3.org/1999/xhtml" delay_input="false"></mutation>
                   <field name="OID">javascript.2.scriptEnabled.Waterkotte.Abfrage_Waterkotte_Test</field>
                   <field name="WITH_DELAY">FALSE</field>
                   <value name="VALUE">
                     <block type="logic_boolean" id="dJ]azVd7r~N1IN8Wdlr-">
                       <field name="BOOL">TRUE</field>
                     </block>
                   </value>
                   <next>
                     <block type="control" id="S[V15.2;~h|N4vnsb3J0">
                       <mutation xmlns="http://www.w3.org/1999/xhtml" delay_input="true"></mutation>
                       <field name="OID">javascript.2.scriptEnabled.Waterkotte.Abfrage_Waterkotte_Test</field>
                       <field name="WITH_DELAY">TRUE</field>
                       <field name="DELAY_MS">3</field>
                       <field name="UNIT">sec</field>
                       <field name="CLEAR_RUNNING">FALSE</field>
                       <value name="VALUE">
                         <block type="logic_boolean" id="c`7aVan7RyUsJ=0=)={!">
                           <field name="BOOL">FALSE</field>
                         </block>
                       </value>
                     </block>
                   </next>
                 </block>
               </next>
             </block>
           </next>
         </block>
       </next>
     </block>
   </statement>
 </block>
</xml>

So sieht das im log bei mir aus:

javascript.2	2020-11-11 17:39:15.061	info	(24856) script.js.Waterkotte.Abfrage_Waterkotte_Test: port closed
javascript.2	2020-11-11 17:39:15.059	info	(24856) Stop script script.js.Waterkotte.Abfrage_Waterkotte_Test
javascript.2	2020-11-11 17:39:12.527	info	(24856) script.js.Waterkotte.Auswertung_Waterkotte: Temp aussen ist:12.57
javascript.2	2020-11-11 17:39:12.522	info	(24856) script.js.Waterkotte.Auswertung_Waterkotte: Daten split:1fbe
javascript.2	2020-11-11 17:39:12.521	info	(24856) script.js.Waterkotte.Auswertung_Waterkotte: Daten split: ff 10 02 00 17 1f be 12 0c 06 03 05 29 a8 2b 49 41 17 4c 4c 41 3d 4d 53 41 2b 5d a5 41 4a a4 c1 41 69 8e d4 41 23 00 34 42 8e 8d 35 42
javascript.2	2020-11-11 17:39:12.519	info	(24856) script.js.Waterkotte.Auswertung_Waterkotte: Daten:ff100200171fbe120c06030529a82b4941174c4c413d4d53412b5da5414aa4c141698ed441230034428e8d35425238dec200007041f919e540c5cf08419e970641dc93c841000
javascript.2	2020-11-11 17:39:12.509	info	(24856) script.js.Waterkotte.Abfrage_Waterkotte_Test: Data received: ff100200171fbe120c06030529a82b4941174c4c413d4d53412b5da5414aa4c141698ed441230034428e8d35425238dec200007041f919e540c5cf08419e970641
javascript.2	2020-11-11 17:39:12.160	info	(24856) script.js.Waterkotte.Abfrage_Waterkotte_Test: Daten send
javascript.2	2020-11-11 17:39:12.153	info	(24856) script.js.Waterkotte.Abfrage_Waterkotte_Test: Connected
javascript.2	2020-11-11 17:39:12.147	info	(24856) script.js.Waterkotte.Abfrage_Waterkotte_Test: registered 0 subscriptions and 0 schedules
javascript.2	2020-11-11 17:39:12.085	info	(24856) Start javascript script.js.Waterkotte.Abfrage_Waterkotte_Test
javascript.2	2020-11-11 17:39:12.016	info	(24856) script.js.Waterkotte.Restart_Abfrage_Waterkotte_Test: Aktiviere Abfrage Waterkotte
javascript.2	2020-11-11 17:39:12.014	info	(24856) script.js.Waterkotte.Restart_Abfrage_Waterkotte_Test: Abfrage_Waterkotte

So sehen die DP's aus:

Axel Koeneke

@wendy2702 Moin, es finktioniert leider immer noch nicht.
Beim Blockly habe ich mal die UND-Verknüpfung entfernt. Vermutlich hast du da noch ein anderes Script mit drin.

Die Instanzen habe ich überall bei mir auf ".0." gesetzt.
Beim Aufruf musste ich das Abfrage-Script unter .common. ansprechen.
Ich vermute ganz stark das an der Schnittstelle liegt. Kann ich die irgendwie unter iO prüfen?
VG
Axel

Axel Koeneke

@Axel-Koeneke Juhu, habe es gefunden:
Schnittstelle hat mich auf die Idee gebracht mal meine Instanzen zu checken.
Das Problem war der Multihost Modus. Dies hatte ich dato noch nie berücksichtigen müssen.
Also habe ich einen zweiten JS-Adapter installiert und dazu noch eine Instanz. Beides dem Client zugewiesen und dann noch den Scripten gesagt das sie auf dem Client laufen sollen. Evtl. sollte man die Doku dazu nochmal erweitern.
Vielen Dank für das geile Script. Werde meine Visu demnächst mal posten.
VG
Axel

wendy2702

@Axel-Koeneke Sorry... hättest du das mit dem Multihost mal erwähnt wären wir der Sache schneller auf die Schliche gekommen.

Aber nun ist ja gut.

Bin mal auf deine Visu gespannt.

Axel Koeneke

@wendy2702 Moin, leider habe noch ein kleines Problem: Die Werte wurden nur einmal übertragen. Ich sehe auch im Log keinen Fehler... Muss ich am Wochenende noch mal in Ruhe drüber schauen.
Hier mal ein Screenshot:

Ich kann morgen auch mal die View hochladen.
VG
Axel

wendy2702

@Axel-Koeneke was heißt immer nur einmal?

Ablauf bei mir ist so:

Das Blockly Script aktiviert das Abfrage Script, nach 3 Sekunden wird es wieder deaktiviert damit der Com Port geschlossen wird. Langer string wird ausgelesen und vom auswerte Script entschlüsselt.
Nach 3 Minuten beginnt das von vorne.

Das die Werte nur einmal ausgelesen werden könnte daran liegen das der COM Port noch geschlossen wird. Das hatte ich zu Beginn als ich das anfrage Script per Cron gestartet/gestoppt hatte.

Axel Koeneke

@wendy2702 sagte in Script Hilfe für Abfrage Serielle Kommunikation gesucht!:

@Axel-Koeneke was heißt immer nur einmal?

Ablauf bei mir ist so:

Das Blockly Script aktiviert das Abfrage Script, nach 3 Sekunden wird es wieder deaktiviert damit der Com Port geschlossen wird. Langer string wird ausgelesen und vom auswerte Script entschlüsselt.
Nach 3 Minuten beginnt das von vorne.

Das die Werte nur einmal ausgelesen werden könnte daran liegen das der COM Port noch geschlossen wird. Das hatte ich zu Beginn als ich das anfrage Script per Cron gestartet/gestoppt hatte.

Ich werde es morgen testen. Was mir noch aufgefallen ist, sehe ich auch den Status der Pumpe?
Vielleicht erkenne ich es auch nicht, weil ich ja aktuell keine Änderung habe...

wendy2702

@Axel-Koeneke gibt zwei DP's für Pumpe. Ich meine die Verändern sich auch bei mir je nach Status.

Axel Koeneke

@wendy2702 Moin, läuft jetzt alles richtig gut. Abfrage machen ich alle 30 sek. Ich habe noch im Intervall Blockly einen zusätzlichen Datenpunkt für die Warmwasserpumpe erstellt. Außerdem färbe ich die Rohrleitung hinter dem 3-Wege-Ventil ein, damit ich sehe ob gerade Heizung oder Warmwassererzeugung läuft.

Dies habe ich schon lange vermisst, da ich in drei Kellerräumen Kovektorheizkörper habe, welche an der Wärmepumpe hängen und die Wärme mittels Ventilator abgeben. Wenn der Ventilator läuft, aber die WP keine Wärme erzeugt, bläst das eher unangenehm in den Raum. Jetzt kann ich bei Bedarf und wenn die WP auf Heizbetrieb ist, mittels Funksteckdose die Gebläse zuschalten.
Hier die View:
Waermepumpe.txt
Die Grafik als svg - Bitte Endung anpassen.
Waterkotte.svg.txt
VG
Axel

wendy2702

@Axel-Koeneke Hi, kannst du mir sagen welche Widget Sätze du für den View verwendet hast und wo du das SVG abgelegt hast?

Und wieso hast du eine SVG Grafik hochgeladen? Laut deinem View Export benutzt du eine "png" ?

Wenn ich die SVG im Widget auswähle passen die Seitenverhältnisse nicht.

Kannst du das Bild bitte nochmal hochladen. Irgendwie kann ich das nur mit einem Browser öffnen und dann ist ein Teil davon abgeschnitten.

Danke!

Axel Koeneke

@wendy2702 Moin, ich benutze fast ausschließlich die InvenTwo Widgets.
In der View hast du richtig erkannt benutze ich die PNG Grafik. Die SVG habe ich hochgeladen, damit du sie z.B. mit Inkscape nach deinen Bedürfnissen anpassen kannst. Dazu einfach das ".TXT" an Ende entfernen und mit Inkscape bearbeiten. Ich werde mal mein Projekt aufräumen (Grafiken in vernünftige Ordnerstrukturen packen) und kann ich es als Projekt hochladen.
VG
Axel

wendy2702

@axel-koeneke sagte in Script Hilfe für Abfrage Serielle Kommunikation gesucht!:

Ich habe noch im Intervall Blockly einen zusätzlichen Datenpunkt für die Warmwasserpumpe erstellt.

Hi,

kannst du mir das mal kurz zeigen.

Danke

Axel Koeneke

@wendy2702
Ich habe das zusammen mit dem Soll-, Istwert des Homematic Thermostaten gekoppelt.
Außerdem soll das nur passieren, wenn der PC in dem Raum läuft (IP)

wendy2702

@axel-koeneke Hallo Axel,

Danke für die Antwort aber ich glaube wir haben uns missverstanden.

Du hast geschrieben das zu einen Datenpunkt erstellt hast, dein Blockly zeigt aber nur wie du nach Zeitplan etwas steuerst.

Icn deinem View benutzt du hier:

In dem Widget das den Grünen Kreis einblendet diesen DP:

Diesen Datenpunkt gibt es aber bei mir nicht und ich wollte wissen wie du diesen erstellt hast bzw. welcher wert aus den Rohdaten den befüllt.

Danke und Gruß

Community Forum

NEWS

Script Hilfe für Abfrage Serielle Kommunikation gesucht!

Support us

607

32.4k

81.4k

1.3m