ola a todos ,,,,,a minha probe e o script ja estao funcionando perfeitamente ,,, só gostaria de adicionar um comando no script , e este seria qdo o contato da fresa com a plaquinha haja um retorno  rapido ..... pois a minha encontra o contato e depois de alguns segundo retorna ......o meu script é este :



 PlateThickness = 3 'Z-plate espessura DRO
Se GetOemLed (825) =0 Then 'Verifique se a sonda já está aterrada ou defeituoso
DoOEMButton (1010) "zero do eixo Z de modo que o movimento da sonda vai começar daqui
Code "G4 P2" "este atraso me dá tempo para ir de computador para manter sonda no lugar
Code "G31Z-40 F500" 'sondagem movimento, pode definir a taxa de alimentação aqui, bem como quanto mover
Enquanto IsMoving () 'aguarde enquanto acontece
Wend
ZProbePos = getvar (2002) 'chegar ao ponto axact a sonda foi atingido
Code "G0 Z" e ZProbePos 'voltar a esse ponto, sempre uma quantidade muito pequena de superação
Enquanto IsMoving ()
Wend
Chamada SetDro (2 , PlateThickness) 'definir o eixo Z DRO para o que é definido como a placa de espessura
Code "G4 P0.25" 'Pausa para Dro para atualizar.
Code "G0 Z40" 'colocar a Z retrair altura que você quer aqui
Code "(eixo Z é agora zerou) " 'coloca essa mensagem na barra de status
Code "F" e CurrentFeed 'Retorna para alimentar antes taxa
Else
Code "(Z-Plate está aterrada, verifique a conexão e tente novamente)" "isso vai na barra de status se aplicable
Exit Sub
End If

obrigado 
parrinha