% Skapad med Modbus Creator
% - OBS! Användaren ansvarar själv för att samma TYPID inte används flera gånger i samma apparat.
%   TYPID 10000-19999 är för användardefinierade enheter
DEVICETYPE Netavent NAMED "NESL_Holding" TYPEID 10801 IS

 PARAMETER
  Id       : "Adress";

 PUBLIC
  V1 : "RegSet1" [""]; % Regulator börvärde
  V2 : "RegSet2" [""]; % Regulator börvärde
  V3 : "CtsSet" ["°C"]DEC1; % Börvärde från CTS
  V4 : "MinSet" ["°C"]DEC1; % Min börvärde
  V5 : "MaxSet" ["°C"]DEC1; % Max börvärde
  V6 : "TempOffset" ["°C"]DEC1; % Korrektion av temperatur
  V7 : "MinOut" ["%"]DEC1; % Min ut till spridare
  V8 : "PbVent" ["°C"]DEC1; % P band ventilation
  V9 : "PbHeat" ["°C"]DEC1; % P band värme
  V10 : "DeadBand" ["°C"]DEC1; % Dödband i värme/kyla regulator
  V11 : "VentOut" ["V"]DEC2; % Värde för fast vent ut
  V12 : "HeatOut" ["V"]DEC2; % Värde för fast värme ut
  V13 : "WinSet" ["°C"]DEC1; % Börvärde fönster regulator
  V14 : "WinVal" ["%"]DEC1; % % ut från fönster regulator
  V15 : "LightTime" ["min"]; % Ljus tid
  V16 : "RegTime" ["min"]; % Ventilations tid
  V17 : "VentOutMode" [""]; % Funktionsval vent. utgång
  V18 : "HeatOutMode" [""]; % Funktionsval Värme utgång
  V19 : "NightTemp" ["°C"]DEC1; % Önskad Temp vid nattsänkning

 PRIVATE

 BAUDRATE 9600;

 PARITY EVEN;

 CHECKSUM MODBUS SWAPPED;


 TELEGRAM Read3 NAMED "Read 3" IS
  QUESTION
   DATA[0] := BYTE(Id); % Enhetens Modbus adress
   DATA[1] :=  HEX(03); % Modbus kommando för att läsa register kod 03
   DATA[2] := RWORD(4096); % Start address
   DATA[4] := RWORD(23); % Antal register att läsa
  ANSWER SIZE 51 % (Antal register * 2) + 5
   DATA[0] = BYTE(Id);
   DATA[1] = BYTE(03);
   DATA[2] = BYTE(46); % Antal Bytes
   DATA[3] -> RWORD(V1 := DATA;);
   DATA[5] -> RWORD(V2 := DATA;);
   DATA[7] -> RWORD(V3 := DATA/10;);
   DATA[9] -> RWORD(V4 := DATA/10;);
   DATA[11] -> RWORD(V5 := DATA/10;);
   DATA[13] -> RWORD(V6 := DATA/10;);
   DATA[15] -> RWORD(V7 := DATA/10;);
   DATA[17] -> RWORD(V8 := DATA/10;);
   DATA[19] -> RWORD(V9 := DATA/10;);
   DATA[21] -> RWORD(V10 := DATA/10;);
   DATA[23] -> RWORD(V11 := DATA/100;);
   DATA[25] -> RWORD(V12 := DATA/100;);
   DATA[27] -> RWORD(V13 := DATA/10;);
   DATA[29] -> RWORD(V14 := DATA/10;);
   DATA[31] -> RWORD(V15 := DATA;);
   DATA[33] -> RWORD(V16 := DATA;);
   DATA[43] -> RWORD(V17 := DATA;);
   DATA[45] -> RWORD(V18 := DATA;);
   DATA[47] -> RWORD(V19 := DATA/10;);
  TIMEOUT 300
 END;
END;