% 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 TVAflow NAMED "TVAflow" TYPEID 13570 IS

 PARAMETER
  Id       : "Adress" [""]INT;

 PUBLIC
  V1 : "Total low" ["Kg"]INT;
  V3 : "Flow" ["Kg/h"]INT;
  V4 : "Pressure" ["BarG"]DEC2;
  V5 : "Temperature" ["°C"]DEC1;
  V6 : "Water eq flow" ["l/h"]DEC1;
  V7 : "Power" ["kW"]INT;
  V8 : "Energy" ["kWh"]INT;
  V10 : "Alarm status" [""]INT;

 PRIVATE
  tmp;

 BAUDRATE 9600;
 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(0); % Start address
   DATA[4] := RWORD(10); % Antal register att läsa
  ANSWER SIZE 25 % (Antal register * 2) + 5
   DATA[0] = BYTE(Id);
   DATA[1] = BYTE(03);
   DATA[2] = BYTE(20); % Antal Bytes
   DATA[3] -> RWORD(tmp := DATA;);
   DATA[5] -> RWORD(V1 := (DATA*65536)+tmp;);
   DATA[7] -> RWORD(V3 := DATA;);
   DATA[9] -> RWORD(V4 := DATA/100;);
   DATA[11] -> RWORD(V5 := DATA/10;);
   DATA[13] -> RWORD(V6 := DATA/10;);
   DATA[15] -> RWORD(V7 := DATA;);
   DATA[17] -> RWORD(tmp := DATA;);
   DATA[19] -> RWORD(V8 := (DATA*65536)+tmp;);
   DATA[21] -> RWORD(V10 := DATA;);
  TIMEOUT 300
 END;
END;