got this to work. it changes the dros but the leds only change if dros
are different(off) otherwise if same(on). does change anything
when movement.
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)
While IsMoving()
Wend
If CurrXPos <> OldXPos Then
SetUserLED(X_MovingLED,1)
SetUserDRO(2001,CurrXPos)
Else
SetUserLED(X_MovingLED,0)
SetUserDRO(2001,CurrXPos)
End If
While IsMoving()
Wend
If CurrYPos <> OldYPos Then
SetUserLED(Y_MovingLED,1)
SetUserDRO(2002,CurrYPos)
Else
SetUserLED(Y_MovingLED,0)
SetUserDRO(2002,CurrYPos)
End If
While IsMoving()
Wend
If CurrZPos <> OldZPos Then
SetUserLED(Z_MovingLED,1)
SetUserDRO(2003,CurrZPos)
Else
SetUserLED(Z_MovingLED,0)
SetUserDRO(2003,CurrZPos)
End If