IV AHU Läs Börvärden
Detaljer
- Typ
- Drivrutin
- Upplaggd av
- Ove Jansson, Abelko Innovation
- Version
- 2
- Uppdaterad
- 2015-04-22
- Skapad
- 2015-04-22
- Kategori
- Modbus, Ventilation
- Visningar
- 1926
Beskrivning
Observera att detta är för kommunikation med den enklare standardstyrningen på IV aggregaten. Du kan också beställa aggregat från IV för styrning direkt från IMSE WMPro eller IMSE Ultra.
Bruksanvisning
.
Juridisk information
Alla skript tillhandahålls i befintligt skick och all användning sker på eget ansvar. Felaktig använding kan leda till skadad eller förstörd utrustning.
Skript kod
% 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 AHUSP NAMED "SHUSP" TYPEID 16464 IS
PARAMETER
Id : "Adress";
PUBLIC
V1 : "HeatingSP" ["°C"]DEC1;
V2 : "CoolingSP" ["°C"]DEC1;
V3 : "SupHeatSP" ["°C"]DEC1;
V4 : "SupCoolSP" ["°C"]DEC1;
V5 : "SupFanSP" [""]; % %, Pa or l/s
V6 : "ExhFanSP" [""]; % %, Pa or l/s
PRIVATE
BAUDRATE 9600;
CHECKSUM MODBUS SWAPPED;
TELEGRAM Read4 NAMED "Read 4" IS
QUESTION
DATA[0] := BYTE(Id); % Enhetens Modbus adress
DATA[1] := HEX(04); % Modbus kommando för att läsa register kod 04
DATA[2] := RWORD(103); % 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(04);
DATA[2] = BYTE(20); % Antal Bytes
DATA[3] -> RWORD(IF (DATA>=32768) THEN V1:=(DATA-65536)/10; ELSE V1:=DATA/10; ENDIF;);
DATA[5] -> RWORD(IF (DATA>=32768) THEN V2:=(DATA-65536)/10; ELSE V2:=DATA/10; ENDIF;);
DATA[7] -> RWORD(IF (DATA>=32768) THEN V3:=(DATA-65536)/10; ELSE V3:=DATA/10; ENDIF;);
DATA[9] -> RWORD(IF (DATA>=32768) THEN V4:=(DATA-65536)/10; ELSE V4:=DATA/10; ENDIF;);
DATA[19] -> RWORD(V5 := DATA;);
DATA[21] -> RWORD(V6 := DATA;);
TIMEOUT 300
END;
END;
% - 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 AHUSP NAMED "SHUSP" TYPEID 16464 IS
PARAMETER
Id : "Adress";
PUBLIC
V1 : "HeatingSP" ["°C"]DEC1;
V2 : "CoolingSP" ["°C"]DEC1;
V3 : "SupHeatSP" ["°C"]DEC1;
V4 : "SupCoolSP" ["°C"]DEC1;
V5 : "SupFanSP" [""]; % %, Pa or l/s
V6 : "ExhFanSP" [""]; % %, Pa or l/s
PRIVATE
BAUDRATE 9600;
CHECKSUM MODBUS SWAPPED;
TELEGRAM Read4 NAMED "Read 4" IS
QUESTION
DATA[0] := BYTE(Id); % Enhetens Modbus adress
DATA[1] := HEX(04); % Modbus kommando för att läsa register kod 04
DATA[2] := RWORD(103); % 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(04);
DATA[2] = BYTE(20); % Antal Bytes
DATA[3] -> RWORD(IF (DATA>=32768) THEN V1:=(DATA-65536)/10; ELSE V1:=DATA/10; ENDIF;);
DATA[5] -> RWORD(IF (DATA>=32768) THEN V2:=(DATA-65536)/10; ELSE V2:=DATA/10; ENDIF;);
DATA[7] -> RWORD(IF (DATA>=32768) THEN V3:=(DATA-65536)/10; ELSE V3:=DATA/10; ENDIF;);
DATA[9] -> RWORD(IF (DATA>=32768) THEN V4:=(DATA-65536)/10; ELSE V4:=DATA/10; ENDIF;);
DATA[19] -> RWORD(V5 := DATA;);
DATA[21] -> RWORD(V6 := DATA;);
TIMEOUT 300
END;
END;
Användarnas noteringar
Du måste vara inloggad för att göra en notering. Bli medlem eller logga in. Vi använder en moderator som godkänner noteringarna innan de visas.