Added first hmi interface implementation

This commit is contained in:
2026-02-19 00:20:05 +01:00
parent 0c40092d8f
commit a3ad956f0d
29 changed files with 591 additions and 240 deletions

View File

@@ -1,7 +1,7 @@
<?xml version="1.0" encoding="utf-8"?>
<TcPlcObject Version="1.1.0.1">
<POU Name="FB_HotPlate" Id="{317a2373-f886-4e32-b683-81b726d00aac}" SpecialFunc="None">
<Declaration><![CDATA[FUNCTION_BLOCK FB_HotPlate
<POU Name="FB_Hotplate" Id="{317a2373-f886-4e32-b683-81b726d00aac}" SpecialFunc="None">
<Declaration><![CDATA[FUNCTION_BLOCK FB_Hotplate EXTENDS FB_PackMLGeneric
VAR_INPUT
xEnable : BOOL;
rTargetTemp : REAL;
@@ -14,7 +14,7 @@ VAR_OUTPUT
uiNextReadySlot : UINT;
END_VAR
VAR_IN_OUT
stHMIInterface : ST_HCPlateHMIInterface;
stHMIInterface : ST_HMI_Hotplate;
END_VAR
VAR
xEnableHotplate AT %Q* : BOOL;
@@ -41,10 +41,25 @@ VAR
_fbPITempControl : FB_PI;
_fbLimit : FB_Limit;
_fbPWMOut : FB_PWM;
_xEnable : BOOL;
_xFirstCycle : BOOL := TRUE;
END_VAR
]]></Declaration>
<Implementation>
<ST><![CDATA[// Call sensor fbs
<ST><![CDATA[IF _xFirstCycle THEN
_xFirstCycle := FALSE;
stHMIInterface.stSetpoint.rMin := 0;
stHMIInterface.stSetpoint.rMax := 140.0;
stHMIInterface.stSetpoint.sUnit := '°C';
stHMIInterface.stSetpoint.sName := 'Temp. Hotplate';
END_IF
A_HandleHMIInput();
// Call sensor fbs
_fbTempSensor(
stAnalogIOConfig:= _stTempSensorConfig,
stAnalogEWConfig:= _stTempSEnsorEWConfig,
@@ -52,24 +67,15 @@ _fbTempSensor(
xReleaseLimitErrors:= FALSE,
xReleaseHardwareErrors:= TRUE,
xConfirmAlarms:= xConfirmAlarms,
stHMIInterface=> );
// Clamp HMI Setpoint
IF stHMIInterface.rSetpoint > 140.0 THEN
stHMIInterface.rSetpoint := 140;
END_IF
IF stHMIInterface.rSetpoint < 0.0 THEN
stHMIInterface.rSetpoint := 0.0;
END_IF
stHMIInterface=> stHMIInterface.stPV);
// For now get setpoint from HMI interface
_fbPITempControl(
rSP:= stHMIInterface.rSetpoint,
rSP:= stHMIInterface.stSetpoint.rValue,
rPV:= _fbTempSensor.rScaledValue,
rKp:= 6,
rTn:= 0,
xEnable:= stHMIInterface.xEnable,
xEnable:= _xEnable,
rMV=> _fbLimit.rIn);
_fbLimit(
@@ -83,10 +89,36 @@ _fbPWMOut(
timPeriod:= T#100MS,
xOutput=> xEnableHotplate);
// Output HMI Interface
stHMIInterface.rPV := _fbTempSensor.rScaledValue;
SUPER^(stPackMLHMIInterface := stHMIInterface.stStationCmds);
]]></ST>
</Implementation>
<Action Name="A_HandleHMIInput" Id="{d22cec08-4a88-4001-b04b-e7a9775ff9a8}">
<Implementation>
<ST><![CDATA[// Clamp HMI Setpoint
IF stHMIInterface.stSetpoint.rValue > 140.0 THEN
stHMIInterface.stSetpoint.rValue := 140;
END_IF
IF stHMIInterface.stSetpoint.rValue < 0.0 THEN
stHMIInterface.stSetpoint.rValue := 0.0;
END_IF]]></ST>
</Implementation>
</Action>
<Method Name="FB_Init" Id="{b45cedd9-9c6c-4658-b56c-da5577886b8f}">
<Declaration><![CDATA[//FB_Init is always available implicitly and it is used primarily for initialization.
//The return value is not evaluated. For a specific influence, you can also declare the
//methods explicitly and provide additional code there with the standard initialization
//code. You can evaluate the return value.
METHOD FB_Init: BOOL
VAR_INPUT
bInitRetains: BOOL; // TRUE: the retain variables are initialized (reset warm / reset cold)
bInCopyCode: BOOL; // TRUE: the instance will be copied to the copy code afterward (online change)
END_VAR
]]></Declaration>
<Implementation>
<ST><![CDATA[]]></ST>
</Implementation>
</Method>
<Method Name="M_AddItem" Id="{9707459a-6558-487c-b730-c9dc92d598ed}">
<Declaration><![CDATA[METHOD M_AddItem
VAR_INPUT