Added possibility to charge with cv

This commit is contained in:
Matthias Heisig
2025-10-01 10:45:51 +02:00
parent 698451cc1f
commit 26d602eafc
5 changed files with 168 additions and 5 deletions

View File

@@ -0,0 +1,30 @@
<?xml version="1.0" encoding="utf-8"?>
<TcPlcObject Version="1.1.0.1" ProductVersion="3.1.4026.12">
<POU Name="FB_Limit" Id="{d4518907-6b63-4dbf-8339-7e925234f00a}" SpecialFunc="None">
<Declaration><![CDATA[FUNCTION_BLOCK FB_Limit
VAR_INPUT
rIn : REAL;
rMin : REAL;
rMax : REAL;
END_VAR
VAR_OUTPUT
rOut : REAL;
xClamped : BOOL;
END_VAR
VAR
END_VAR
]]></Declaration>
<Implementation>
<ST><![CDATA[IF rIn > rMax THEN
rOut := rMax;
xClamped := TRUE;
ELSIF rIn < rMin THEN
rOut := rMin;
xClamped := TRUE;
ELSE
rOut := rIn;
xClamped := FALSE;
END_IF]]></ST>
</Implementation>
</POU>
</TcPlcObject>