ParamManagerScripts/backend/script_groups/TwinCat/.example/CVQ_0_6_PERC.EXP

25 lines
561 B
Plaintext

(* @PATH := '\/Functions_Collection' *)
(* @SYMFILEFLAGS := '0' *)
aFUNCTION CVQ_0_6_Perc : REAL
VAR_INPUT
i_Temp : REAL ;
END_VAR
VAR
a : REAL ;
b : REAL ;
c : REAL ;
d : REAL ;
END_VAR
(* @END_DECLARATION := '0' *)
(* CVQ Valve in 0 - 6 bar range. Min Actuator Temperature 91°C; max Actuator temperature 110°C *)
(* 110 - 91 = 19°C *)
a := 0.000429997 ;
b := -0.014260836 ;
c := 1.362579549 ;
d := 93.71557018 ;
CVQ_0_6_Perc := LIMIT(0, ((EXPT(i_Temp,3) * a + EXPT(i_Temp,2) * b + i_Temp * c + d) - 91) / 19 * 100.0, 100) ;
END_PROGRAM