From f2d73d013f423eb385fa3e1b294d196e9c46b7e0 Mon Sep 17 00:00:00 2001 From: Paul Barron Date: Wed, 11 Dec 2019 15:24:00 +0100 Subject: [PATCH] Fix whitespace damage No code changes --- solution/tc_project_app/POUs/MAIN.TcPOU | 18 +++++++++--------- 1 file changed, 9 insertions(+), 9 deletions(-) diff --git a/solution/tc_project_app/POUs/MAIN.TcPOU b/solution/tc_project_app/POUs/MAIN.TcPOU index d460284..e3f3ab0 100644 --- a/solution/tc_project_app/POUs/MAIN.TcPOU +++ b/solution/tc_project_app/POUs/MAIN.TcPOU @@ -133,15 +133,15 @@ fbEL1808( 0 THEN - bMovingAtShutdown[i]:=TRUE; - ELSE - bMovingAtShutdown[i]:=FALSE; - END_IF - bMovingAtShutdown[i]:=bMovingAtShutdown[i] OR gvl.axes[i].Axis.Status.Moving; - END_FOR + FOR i:=1 TO gvl_app.axisNum DO + iPositionAtShutdown[i]:=gvl.axes[i].Axis.NcToPlc.ActPos; + IF gvl.axes[i].Axis.NcToPlc.ActVelo <> 0 THEN + bMovingAtShutdown[i]:=TRUE; + ELSE + bMovingAtShutdown[i]:=FALSE; + END_IF + bMovingAtShutdown[i]:=bMovingAtShutdown[i] OR gvl.axes[i].Axis.Status.Moving; + END_FOR END_IF]]>