Files
Adeco_20220119-01/TC3_CNCPLCBase/FAST.TcPOU
Matthias Heisig 51d6e7e5c4 Initial commit
2024-10-22 14:22:54 +02:00

61 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="FAST" Id="{16c202d0-b697-4d74-8856-0055624c8fd5}" SpecialFunc="None">
<Declaration><![CDATA[PROGRAM FAST
VAR
//nChan : INT;
//MOS_TS: INT;
//i: INT;
//ChannelMHTFunction : ARRAY[0..MAX_USED_CHANNEL_IDX] OF HLI3_QuitChannelMHTFunction;
bMesstaster AT %I* : BOOL;
END_VAR
]]></Declaration>
<Implementation>
<ST><![CDATA[(****************************************************************************************)
(* Wait for HLI initialization *)
(****************************************************************************************)
IF NOT CNCSystem.bHLIInit THEN
RETURN;
END_IF
gpAx[0]^.lr_mc_control.probing_signal.enable_w := TRUE;
gpAx[0]^.lr_mc_control.probing_signal.command_w := bMesstaster;
gpAx[1]^.lr_mc_control.probing_signal.enable_w := TRUE;
gpAx[1]^.lr_mc_control.probing_signal.command_w := bMesstaster;
gpAx[2]^.lr_mc_control.probing_signal.enable_w := TRUE;
gpAx[2]^.lr_mc_control.probing_signal.command_w := bMesstaster;
(*
IF PRG_CNCChannelHandler.stOptions.bDisableMFunctHandling THEN
FOR i := 0 TO MAX_USED_CHANNEL_IDX DO
ChannelMHTFunction[i](nChanIdx:=0, bM30Acknowledgement := TRUE);
END_FOR
END_IF
PRG_LSB();
*)
(* Programm call for MOS_TS M functions *)
// PRG_FastMFunctions();]]></ST>
</Implementation>
<LineIds Name="FAST">
<LineId Id="3" Count="5" />
<LineId Id="54" Count="1" />
<LineId Id="53" Count="0" />
<LineId Id="69" Count="1" />
<LineId Id="66" Count="0" />
<LineId Id="72" Count="1" />
<LineId Id="71" Count="0" />
<LineId Id="56" Count="0" />
<LineId Id="20" Count="4" />
<LineId Id="18" Count="0" />
<LineId Id="34" Count="0" />
<LineId Id="33" Count="0" />
<LineId Id="43" Count="0" />
<LineId Id="9" Count="2" />
</LineIds>
</POU>
</TcPlcObject>