Nibe F1345 enligt LOG.SET
Detaljer
- Typ
- Drivrutin
- Upplaggd av
- Ove Jansson, Abelko Innovation
- Version
- 2
- Uppdaterad
- 2016-03-08
- Skapad
- 2016-02-16
- Kategori
- Modbus, Värme, Ventilation
- Visningar
- 2280
Beskrivning
.
Bruksanvisning
För LOG.SET fil med innehåll:
[NIBL;20160209;3152]
Divisors 1 1 10 10 10 10 10 10 10 10 1 1
Date Time Compressor status EP14 Compressor status EP15 EB100-EP14-BT10 Brine in temp [°C] EB100-EP14-BT11 Brine out temp [°C] EB100-EP14-BT12 Cond. out [°C] EB100-EP14-BT3 Return temp [°C] EB100-EP15-BT10 Brine in temp [°C] EB100-EP15-BT11 Brine out temp [°C] EB100-EP15-BT12 Cond. out [°C] EB100-EP15-BT3 Return temp [°C] Brinepump Status EP14 Brinepump Status EP15
43435
43434
40015
40016
40017
40012
40100
40085
40086
40011
43439
43438
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
% TYPID 10000-19999 är för användardefinierade enheter
DEVICETYPE NibeF1345 NAMED "NibeF1345" TYPEID 15438 IS
PARAMETER
Id : "Adress";
PUBLIC
V1 : "EB100-EP15-BT3 Return temp" ["°C"]DEC1;
V2 : "EB100-EP14-BT3 Return temp" ["°C"]DEC1;
V3 : "EB100-EP14-BT10 Brine in temp" ["°C"]DEC1;
V4 : "EB100-EP14-BT11 Brine out temp" ["°C"]DEC1;
V5 : "EB100-EP14-BT12 Cond. out" ["°C"]DEC1;
V6 : "EB100-EP15-BT11 Brine out temp" ["°C"]DEC1;
V7 : "EB100-EP15-BT12 Cond. out" ["°C"]DEC1;
V8 : "EB100-EP15-BT10 Brine in temp" ["°C"]DEC1;
V9 : "Compressor status EP15" [""];
V10 : "Compressor status EP14" [""];
V11 : "Brinepump Status EP15" [""];
V12 : "Brinepump Status EP14" [""];
PRIVATE
count3;
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
DATA[2] <- RWORD(
IF(count3>11) THEN count3 := 0; ENDIF;
IF (count3=0) THEN tmp := 10;
ELSIF (count3=1) THEN tmp := 11;
ELSIF (count3=2) THEN tmp := 14;
ELSIF (count3=3) THEN tmp := 15;
ELSIF (count3=4) THEN tmp := 16;
ELSIF (count3=5) THEN tmp := 84;
ELSIF (count3=6) THEN tmp := 85;
ELSIF (count3=7) THEN tmp := 99;
ELSIF (count3=8) THEN tmp := 3433;
ELSIF (count3=9) THEN tmp := 3434;
ELSIF (count3=10) THEN tmp := 3437;
ELSIF (count3=11) THEN tmp := 3438;
ENDIF;
DATA:= tmp;
);
DATA[4] := RWORD(01);
ANSWER SIZE 7
DATA[0] = BYTE(Id);
DATA[1] = BYTE(03);
DATA[3] -> RWORD(
IF (count3=0) THEN IF (DATA>=32768) THEN V1:=(DATA-65536)/10; ELSE V1:=DATA/10; ENDIF;
ELSIF (count3=1) THEN IF (DATA>=32768) THEN V2:=(DATA-65536)/10; ELSE V2:=DATA/10; ENDIF;
ELSIF (count3=2) THEN IF (DATA>=32768) THEN V3:=(DATA-65536)/10; ELSE V3:=DATA/10; ENDIF;
ELSIF (count3=3) THEN IF (DATA>=32768) THEN V4:=(DATA-65536)/10; ELSE V4:=DATA/10; ENDIF;
ELSIF (count3=4) THEN IF (DATA>=32768) THEN V5:=(DATA-65536)/10; ELSE V5:=DATA/10; ENDIF;
ELSIF (count3=5) THEN IF (DATA>=32768) THEN V6:=(DATA-65536)/10; ELSE V6:=DATA/10; ENDIF;
ELSIF (count3=6) THEN IF (DATA>=32768) THEN V7:=(DATA-65536)/10; ELSE V7:=DATA/10; ENDIF;
ELSIF (count3=7) THEN IF (DATA>=32768) THEN V8:=(DATA-65536)/10; ELSE V8:=DATA/10; ENDIF;
ELSIF (count3=8) THEN V9 := DATA;
ELSIF (count3=9) THEN V10 := DATA;
ELSIF (count3=10) THEN V11 := DATA;
ELSIF (count3=11) THEN V12 := DATA;
ENDIF;
count3 := count3+1;
);
TIMEOUT 500
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.