Added AnalogInput

This commit is contained in:
2025-11-05 11:56:57 +01:00
parent 8b0251687e
commit 7e8ded6ec9
16 changed files with 2859 additions and 80 deletions

View File

@@ -1,25 +1,14 @@
<?xml version="1.0" encoding="utf-8"?>
<TcPlcObject Version="1.1.0.1">
<POU Name="MAIN" Id="{c66c285f-4cfe-4893-8066-e22fe681dd3f}" SpecialFunc="None">
<POU Name="MAIN" Id="{f325d0cd-99c8-4d5b-980f-1fc96ab1417c}" SpecialFunc="None">
<Declaration><![CDATA[PROGRAM MAIN
VAR
_fbMachine : FB_Machine(0, 'Machine');
// Startup state machine
_iState : INT := 0;
// Analog I/O tests
_fbAnalogInputTest : FB_AnalogInputTest;
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>
<ST><![CDATA[TcUnit.RUN();]]></ST>
</Implementation>
</POU>
</TcPlcObject>