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