63 lines
1.9 KiB
XML
63 lines
1.9 KiB
XML
<?xml version="1.0" encoding="utf-8"?>
|
|
<TcPlcObject Version="1.1.0.1" ProductVersion="3.1.4024.6">
|
|
<POU Name="FB_CmdOldDInfo" Id="{a08c7560-7f97-4dff-8602-2d2f0ae3c977}" SpecialFunc="None">
|
|
<Declaration><![CDATA[FUNCTION_BLOCK FB_CmdOldDInfo IMPLEMENTS ITF_ToolAction
|
|
VAR_INPUT
|
|
END_VAR
|
|
VAR_OUTPUT
|
|
END_VAR
|
|
VAR
|
|
_tool : TC3_CNC.ST_CNC_TOOL_DATA_EXT;
|
|
END_VAR
|
|
]]></Declaration>
|
|
<Implementation>
|
|
<ST><![CDATA[]]></ST>
|
|
</Implementation>
|
|
<Method Name="Commit" Id="{5fb9d6fd-121d-4d04-a478-855a86ce4c09}">
|
|
<Declaration><![CDATA[(* Commits the tool data transfer action if it returns true*)
|
|
METHOD Commit : BOOL
|
|
VAR_INPUT
|
|
t : Tc3_CNC.ST_CNC_TOOL_DATA_EXT;
|
|
END_VAR
|
|
]]></Declaration>
|
|
<Implementation>
|
|
<ST><![CDATA[_tool := t;
|
|
|
|
IF _tool.tool_desc.param[9] = 1 THEN
|
|
_tool.laenge := LREAL_TO_DINT(_tool.tool_desc.param[10] * 10000);
|
|
_tool.tool_desc.param[9] := 0;
|
|
END_IF
|
|
|
|
Commit := TRUE;]]></ST>
|
|
</Implementation>
|
|
</Method>
|
|
<Property Name="Tool" Id="{1a4f8238-9d9a-4932-b866-1ce4c82e67e8}">
|
|
<Declaration><![CDATA[PROPERTY Tool : Tc3_CNC.ST_CNC_TOOL_DATA_EXT
|
|
]]></Declaration>
|
|
<Get Name="Get" Id="{950e7d8b-6a41-4aac-8e65-03f8966c7c3a}">
|
|
<Declaration><![CDATA[VAR
|
|
END_VAR
|
|
]]></Declaration>
|
|
<Implementation>
|
|
<ST><![CDATA[Tool := _tool;]]></ST>
|
|
</Implementation>
|
|
</Get>
|
|
</Property>
|
|
<LineIds Name="FB_CmdOldDInfo">
|
|
<LineId Id="9" Count="0" />
|
|
</LineIds>
|
|
<LineIds Name="FB_CmdOldDInfo.Commit">
|
|
<LineId Id="15" Count="0" />
|
|
<LineId Id="20" Count="0" />
|
|
<LineId Id="18" Count="0" />
|
|
<LineId Id="17" Count="0" />
|
|
<LineId Id="19" Count="0" />
|
|
<LineId Id="21" Count="0" />
|
|
<LineId Id="16" Count="0" />
|
|
<LineId Id="8" Count="0" />
|
|
</LineIds>
|
|
<LineIds Name="FB_CmdOldDInfo.Tool.Get">
|
|
<LineId Id="2" Count="0" />
|
|
</LineIds>
|
|
</POU>
|
|
</TcPlcObject> |