Условное движение в макросе Mach3

[Andrey_tlt]

Доброго времени суток!
Помогите разобраться.
Требуется включить движение оси, до срабатывания датчика.
Причем, в начальном положении датчик может быть либо включен, либо выключен, поэтому G31 не очень подходит.
Написал макрос:

Код: Выделить всё

If isActive(Input1) <> 0 Then	'если датчик активен
	        Code "F50"
	JogOn(2,0)					'то включить движение Z в -
	While (isActive(Input1)<>0) 'продолжать движение, пока активен датчик	
	Sleep(5)
	Wend
End If
JogOff(2)			'выключить движение
Sleep(100)

If isActive(Input1) = 0 Then	'если датчик не активен
	JogOn(2,1)					'включить движение Z в +
	While (isActive(Input1)=0) ' продолжать, пока датчик не активен
	Sleep(5)
	Wend
	Wend

'End If
JogOff(2)			'выключить движение

Работает, но...
Проблема в том, что команда JogOn - это движение на скорости ручного перемещения
и задание подачи - F - не работает, и если оператор во время выполнения скрипта нажмет
Shift или Ctrl, то скорость, соответственно, поменяется. И задавать скорость хочется в программе.
Вопрос - как еще можно организовать движение с остановкой при срабатывании датчика
с заданными параметрами подачи.