608 B
608 B
FUNCTION "TankLevelToHeight" : Real
{ S7_Optimized_Access := 'FALSE' }
AUTHOR : 'Author'
FAMILY : 'Function'
NAME : 'Name'
VERSION : 1.0
VAR_INPUT
Level_Percentage : Real;
Level_Perc0 : Real;
Level_Height0 : Real;
Level_Perc1 : Real;
Level_Height1 : Real;
END_VAR
BEGIN
IF #Level_Perc1 <> 0 THEN
#TankLevelToHeight := (#Level_Percentage * (#Level_Height1 - #Level_Height0) / #Level_Perc1) + #Level_Height0 ;
END_IF;
#TankLevelToHeight := (#Level_Percentage * (#Level_Height1 - #Level_Height0) / #Level_Perc1) + #Level_Height0;
END_FUNCTION