25 lines
582 B
XML
25 lines
582 B
XML
<?xml version="1.0" encoding="utf-8"?>
|
|
<TcPlcObject Version="1.1.0.1">
|
|
<POU Name="MAIN_TESTS" Id="{c66c285f-4cfe-4893-8066-e22fe681dd3f}" SpecialFunc="None">
|
|
<Declaration><![CDATA[PROGRAM MAIN_TESTS
|
|
VAR
|
|
_fbMachine : FB_Machine(0, 'Machine');
|
|
|
|
// Startup state machine
|
|
_iState : INT := 0;
|
|
END_VAR
|
|
]]></Declaration>
|
|
<Implementation>
|
|
<ST><![CDATA[CASE _iState OF
|
|
0:
|
|
IF IsSuccessful(_fbMachine.InitialOP()) THEN
|
|
_fbMachine.CyclicOP();
|
|
_iState := 10;
|
|
END_IF
|
|
|
|
10:
|
|
_fbMachine.CyclicOP();
|
|
END_CASE]]></ST>
|
|
</Implementation>
|
|
</POU>
|
|
</TcPlcObject> |