tried below with Curr?Pos = IsMoving
with nothing changing
X_MovingLED = 1120
Y_MovingLED = 1121
Z_MovingLED = 1122
CurrXPos = GetOEMDRO(800)
CurrYPos = GetOEMDRO(801)
CurrZPos = GetOEMDRO(802)
If CurrXPos = IsActive(X) Then
SetUserLED(X_MovingLED,1)
Else
SetUserLED(X_MovingLED,0)
End If
If CurrYPos = IsActive(Y) Then
SetUserLED(Y_MovingLED,1)
Else
SetUserLED(Y_MovingLED,0)
End If
If CurrZPos = IsActive(Z) Then
SetUserLED(Z_MovingLED,1)
Else
SetUserLED(Z_MovingLED,0)
End If
X_MovingLED = 1120
Y_MovingLED = 1121
Z_MovingLED = 1122
CurrXPos = GetOEMDRO(800)
'OldXPos = GetUserDRO(2001)
CurrYPos = GetOEMDRO(801)
'OldYPos = GetUserDRO(2002)
CurrZPos = GetOEMDRO(802)
'OldZPos = GetUserDRO(2003)
If CurrXPos = IsActive(800) Then
SetUserLED(X_MovingLED,1)
'SetUserDRO(2001,CurrXPos)
Else
SetUserLED(X_MovingLED,0)
'SetUserDRO(2001,CurrXPos)
End If
If CurrYPos = IsActive(801) Then
SetUserLED(Y_MovingLED,1)
'SetUserDRO(2002,CurrYPos)
Else
SetUserLED(Y_MovingLED,0)
'SetUserDRO(2002,CurrYPos)
End If
If CurrZPos = IsActive(802) Then
SetUserLED(Z_MovingLED,1)
'SetUserDRO(2003,CurrZPos)
Else
SetUserLED(Z_MovingLED,0)
'SetUserDRO(2003,CurrZPos)
End If