andcl

CurrentFeed = GetOemDRO(818)			' Obtención de la velocidad de avance (feedrate) para después
DoSpinStop()					' Paramos la fresa (spindle) por seguridad
	
ZMax = 20.00 					' Longitud máxima de movimiento antes de abortar la operación de puesta a cero del eje Z
ZSonda = 19.75 					' Altura / grosor de la peana de la sonda
ZSeparacion = 2					' Altura de separación entre la sonda y la fresa una vez realizada la operación
ZFinal = ZSonda + ZSeparacion

If GetOemLed (825) = 0 Then			' Si el eje Z no está ya sondeado (entrada de sonda ya activa)...