Heisig_GmbH/BasicComponents
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Fixed AxisPTP MoveVelocity

Browse Source
This commit is contained in:
Matthias Heisig
2026-03-19 19:40:53 +01:00
parent cf9501ea01
commit 8f93e0f076
3 changed files with 5 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
BaseComponents.tsproj
View File

@@ -136,7 +136,7 @@
</System> </System>
<Plc> <Plc>
<Project GUID="{4E62D9E7-436C-457D-8DC4-82D2FEF91C96}" Name="BasicComponents" PrjFilePath="BasicComponents\BasicComponents.plcproj" TmcFilePath="BasicComponents\BasicComponents.tmc" ReloadTmc="true" AmsPort="851" FileArchiveSettings="#x000e" CopyTmcToTarget="true" CopyTpyToTarget="false" SymbolicMapping="true"> <Project GUID="{4E62D9E7-436C-457D-8DC4-82D2FEF91C96}" Name="BasicComponents" PrjFilePath="BasicComponents\BasicComponents.plcproj" TmcFilePath="BasicComponents\BasicComponents.tmc" ReloadTmc="true" AmsPort="851" FileArchiveSettings="#x000e" CopyTmcToTarget="true" CopyTpyToTarget="false" SymbolicMapping="true">
<Instance Id="#x08502000" TcSmClass="TComPlcObjDef" KeepUnrestoredLinks="2" TmcHash="{864A6F78-5663-9977-8C53-B90BFD312EA0}" TmcPath="BasicComponents\BasicComponents.tmc"> <Instance Id="#x08502000" TcSmClass="TComPlcObjDef" KeepUnrestoredLinks="2" TmcHash="{F7EEFF71-0952-DE86-79DA-785827446F08}" TmcPath="BasicComponents\BasicComponents.tmc">
<Name>BasicComponents Instance</Name> <Name>BasicComponents Instance</Name>
<CLSID ClassFactory="TcPlc30">{08500001-0000-0000-F000-000000000064}</CLSID> <CLSID ClassFactory="TcPlc30">{08500001-0000-0000-F000-000000000064}</CLSID>
<Contexts> <Contexts>

BIN
BasicComponents.library
View File

Binary file not shown.

8
BasicComponents/Components/AxisPTP/POUs/FB_AxisPTP.TcPOU
View File

@@ -537,7 +537,7 @@ END_VAR
<Implementation> <Implementation>
<ST><![CDATA[// Reject command if axis is not enabled <ST><![CDATA[// Reject command if axis is not enabled
IF (NOT _fbPower.Status) THEN IF (NOT _fbPower.Status) THEN
M_MoveRel := E_CmdResult.REJECTED; M_MoveVelocity := E_CmdResult.REJECTED;
RETURN; RETURN;
END_IF END_IF
@@ -548,13 +548,13 @@ CASE _eState OF
xBusy := TRUE; xBusy := TRUE;
xDone := FALSE; xDone := FALSE;
M_MoveRel := E_CmdResult.ACCEPTED; M_MoveVelocity := E_CmdResult.ACCEPTED;
E_AXIS_PTP_STATE.ERROR: E_AXIS_PTP_STATE.ERROR:
M_MoveRel := E_CmdResult.ERROR; M_MoveVelocity := E_CmdResult.ERROR;
ELSE ELSE
M_MoveRel := E_CmdResult.BUSY; M_MoveVelocity := E_CmdResult.BUSY;
END_CASE]]></ST> END_CASE]]></ST>
</Implementation> </Implementation>
</Method> </Method>