Problema Auto Zeramento do Eixo Z

[warleyfirefox]

Bom dia amigos, talvez alguém saiba o que possa estar acontecendo com o script de auto zero do eixo Z.

Bom vamos ao problema que na verdade parece ser mais uma anomalia ou do mach3 ou do script, o script eu peguei pronto e fiz as modificações para se adaptar a minha cnc. O que acontece é o seguinte: Ao clicar no botão Auto Tool Zero, o script executa e para corretamente ao tocar na ponta de Probe que está configurado no Pino 15 da controladora BD25-1205 e faz o auto zero conforme o script. É aí que começa a anomalia, se eu executar o script assim que abro o mach3 ele executa de forma correta, mas logo ao executar outras vezes o mach3 executa o script de forma totalmente diferente do programado no script, onde as velocidades ficam alteradas e não executa o stop ao encostar no Probe. Imagino que por algum motivo que desconheço o script está capturando algum valor "Lixo" em alguma variável.
Alguém poderia me dar uma luz do que possa ser esse erro? Segue o script configurado no mach3.

Message "Z Automatico"
'Script de Auto Zero do Eixo Z.\par
'VB Code Start\par
'-----------------
CurrentFeed = GetOemDRO(818)   'Captura o feed rate atual.
DoSpinStop()

ZMove = 50.00    'Configura a altura que o Z deve se mover.
ZOffset = 2.00   'Configura a espessura da placa de prova.
ZSal = ZOffset + 2.00    'Incrementa o Z em 2mm.

StopZmove = 0
If GetOemLed (825)= 0 Then
DoOEMButton (1010)   'Comando para zerar o Eixo Z.
Code "G4 P3"   'Configura o atraso de inicio do movimento de Z.            
Code "G31 Z-"& ZMove & "F700" 'F700 é a velocidade de avanço de Z
While IsMoving()
Sleep(200)
Wend
Probepos = GetVar(2002)   'Este comando captura a posição exata em que Z tocou na prova.
If Probepos = - ZMove Then
Code "G0 Z15"  'Sobe o eixo Z 15mm
StopZmove = 1
Code "F700"
End If
If StopZmove = 0 Then
Code "G0 Z" & Probepos
While IsMoving ()
Sleep (200)
Wend
Call SetDro (2, ZOffset)
Code "G4 P1"
Code "G0 Z" & ZSal
Code "(Eixo Z foi Zerado. )"
Code "F" &CurrentFeed
End If
Else
Code "(Cheque o GNG Probe)"
End If
Exit Sub
'------------
'VB Code Stop

[gladiador]

não sei se é este teu nome warleyfirefox mais bem.

estive olhando teu  script de auto zero parece que falta alguma linha, mais quem sou eu pra te falar. se quiser tentar o meu  script não custa tentar.

mude a linha 3,4,5 mais deixe em ordem como esta, se mudar não vai funcionar.

[warleyfirefox]

não sei se é este teu nome warleyfirefox mais bem.

estive olhando teu  script de auto zero parece que falta alguma linha, mais quem sou eu pra te falar. se quiser tentar o meu  script não custa tentar.

mude a linha 3,4,5 mais deixe em ordem como esta, se mudar não vai funcionar.

violar, obrigado pela resposta vou fazer o teste do teu script valeu. Se mais alguém puder dar uma opinião eu agradeço.

[pnmello]

 Boa noite amigos, recente adquiri uma router cnc e também estou tentando configurar o auto zero. No meu caso depois de incluir o script e pedir para zerar, a fresa apenas sobe. Ela não faz o percurso de decida para tocar o contato em nenhum dos scripts citados acima. Bom meu auto zero está ligado a porta 1 e pino 10 nos fios livres na saída do cabo e não ligados na placa controladora, isso foi recomendação do fornecedor. Caso possam me ajudar serei muito grato. Obrigado a todos!