Helios/PHT/PLC/POUs/FB/RANGEJD.TcPOU

<?xml version="1.0" encoding="utf-8"?>
<TcPlcObject Version="1.1.0.1" ProductVersion="3.1.4024.12">
  <POU Name="RANGEJD" Id="{d7453e68-226c-409d-a63d-b2bebd96b3c9}" SpecialFunc="None">
    <Declaration><![CDATA[FUNCTION_BLOCK RANGEJD
VAR_INPUT
	ENABLE:BOOL;
	SV:LREAL;
	PV:LREAL;
	RANGE_ALARM_H:LREAL;
	RANGE_ALARM_L:LREAL;
	RANGE_WARNING_H:LREAL;
	RANGE_WARNING_L:LREAL;
	TIME_ALARM:LREAL;
	TIME_WARNING:LREAL;
	
END_VAR
VAR_OUTPUT
	ALARM:BOOL;
	WARNING:BOOL;
END_VAR
VAR
	TON_ALARM:TON;
	TON_WARNING:TON;
	STATUS_ALARM:BOOL;
	STATUS_WARNING:BOOL;
END_VAR
]]></Declaration>
    <Implementation>
      <ST><![CDATA[IF ENABLE
	THEN	
	IF PV	>=	(SV+RANGE_ALARM_H) OR 	PV	<=	(SV-RANGE_ALARM_L)
		THEN	STATUS_ALARM:=TRUE;
		ELSE	STATUS_ALARM:=FALSE;
	END_IF		
	
	IF PV	>=	(SV+RANGE_WARNING_H) OR 	PV	<=	(SV-RANGE_WARNING_L)
		THEN	STATUS_WARNING:=TRUE;
		ELSE	STATUS_WARNING:=FALSE;
	END_IF	
	
	TON_ALARM(IN:=STATUS_ALARM , PT:= LREAL_TO_TIME(TIME_ALARM)*1000, Q=> , ET=> );		
	IF TON_ALARM.Q		
		THEN	
		ALARM:=TRUE;	
		ELSE	
		ALARM:=FALSE;	
	END_IF	
	
	TON_WARNING(IN:=STATUS_WARNING , PT:= LREAL_TO_TIME(TIME_WARNING)*1000, Q=> , ET=> );		
	IF TON_WARNING.Q		
		THEN	
		WARNING:=TRUE;	
		ELSE	
		WARNING:=FALSE;	
	END_IF	

	ELSE
		STATUS_ALARM:=FALSE;
		STATUS_WARNING:=FALSE;
		ALARM:=FALSE;
		WARNING:=FALSE;	
END_IF
	
	IF NOT ENABLE
	THEN
	STATUS_ALARM:=FALSE;
	STATUS_WARNING:=FALSE;
	END_IF
	]]></ST>
    </Implementation>
    <LineIds Name="RANGEJD">
      <LineId Id="248" Count="0" />
      <LineId Id="210" Count="0" />
      <LineId Id="247" Count="0" />
      <LineId Id="174" Count="2" />
      <LineId Id="196" Count="0" />
      <LineId Id="177" Count="3" />
      <LineId Id="197" Count="0" />
      <LineId Id="181" Count="6" />
      <LineId Id="198" Count="0" />
      <LineId Id="188" Count="5" />
      <LineId Id="9" Count="0" />
      <LineId Id="207" Count="0" />
      <LineId Id="212" Count="0" />
      <LineId Id="216" Count="1" />
      <LineId Id="213" Count="0" />
      <LineId Id="215" Count="0" />
      <LineId Id="214" Count="0" />
      <LineId Id="249" Count="0" />
      <LineId Id="241" Count="1" />
      <LineId Id="244" Count="2" />
      <LineId Id="243" Count="0" />
    </LineIds>
  </POU>
</TcPlcObject>