If GetOemLED(821) Then
	Code "G0 G54 Z110"
	ResetOutBit(90,11)  'Collet close reset
	SetOutBit(90,9)     'Collet Open
        SetOutBit(90,6)     'Collet Open
        SetUserLed(1001,1)  'Set Collet open LED ON
        While Not IsActive(input2)                     
                Wend
                Code "G0 G54 Z-35"
                Sleep 1000
                While Not IsActive(input2)                     
                Wend
                ResetOutBit(90,9)   'Reset Collet Open
                ResetOutBit(90,6)   'Reset Collet Open
                SetOutBit(90,11)    'Collet Close
                Sleep 100
                SetUserLed(1001,0)  'Set Collet open LED OFF
                Sleep 2000
        
                
Else
	ResetOutBit(90,11)  'Collet close reset
	sleep 100
	SetOutBit(90,9)     'Collet Open
        SetOutBit(90,6)     'Collet Open
        SetUserLed(1001,1)  'Set Collet open LED ON
        While Not IsActive(input2)
                Wend
                
        ResetOutBit(90,9)   'Reset Collet Open
        ResetOutBit(90,6)   'Reset Collet Open
        SetOutBit(90,11)    'Collet Close
        sleep 100
        SetUserLed(1001,0)  'Set Collet open LED OFF
        Sleep 2000

End If