_tport($x,$y,10000);ТП в заданную на высоту десятьтыщ
sleep(100);
_memorywrite($DvigADR,$mem,'1');Имитируем бег прямо на этой высоте
sleep(100);
_tport($x,$y,$z);ТП в заданную и на заданную высоту
func _tport($x,$y,$z)
_memorywrite($XADR,$mem,$x)
_memorywrite($YADR,$mem,$y)
_memorywrite($ZADR,$mem,$z)
endfunc