25 lines
565 B
XML
25 lines
565 B
XML
<?xml version="1.0" encoding="utf-8"?>
|
|
<TcPlcObject Version="1.1.0.1">
|
|
<POU Name="FB_Etcher" Id="{e75b6d70-36db-4c78-b78d-a594609441d1}" SpecialFunc="None">
|
|
<Declaration><![CDATA[FUNCTION_BLOCK FB_Etcher
|
|
VAR_INPUT
|
|
xOpenDoor : BOOL;
|
|
END_VAR
|
|
VAR_OUTPUT
|
|
END_VAR
|
|
VAR
|
|
_xOpenDoor AT %Q* : BOOL;
|
|
_xCloseDoor AT %Q* : BOOL;
|
|
END_VAR
|
|
]]></Declaration>
|
|
<Implementation>
|
|
<ST><![CDATA[IF xOpenDoor THEN
|
|
_xOpenDoor := TRUE;
|
|
_xCloseDoor := FALSE;
|
|
ELSE
|
|
_xOpenDoor := FALSE;
|
|
_xCloseDoor := TRUE;
|
|
END_IF]]></ST>
|
|
</Implementation>
|
|
</POU>
|
|
</TcPlcObject> |