Hello
i need your help a little please .. i have a problem with my Mach3 Probe ... to start with i made my own probe and everything it worked fine the LED light was green when the torch touched the plate and the VBscript worked fine as well when i clicked on "ref all home" .. but heres the problem when i try to work on a file on Mach3 the probe doesnt work at all .. its like i didnt even activated it i tried to change the vbscript and many other things but nothing worked .... i need help if you could .. as soon as possible
thanks in advance.

Hi,

post your vbscript an we will see, but remember
the probing is only measuring the length of the
tool, nothing else.

Thomas

sorry i might have done something wrong ... but what i want is what in the following video:-
https://www.youtube.com/watch?v=ZwK58aWHsHQ

i want my plasma machine to work just like in the video shows ... if you have a map of how i should do that or a setting or wiring or a way of connecting or a VBscript anything that helps my plasma to work the same as the man's in the video ... please send it to me .. thanks.
(p.s. i did connect the limit switch with the Z axis)

Hi,

a simple example for metric would be:

Sub Main

cutheight = 20
cutpos = 0
ZProbePos = 0

    Code "G31 Z-200 F150" 'do the probing
    While IsMoving() 'wait for finish
    Wend           
   
    'get the position where we hit the probe
    ZProbePos = GetVar(2002)   
    cutpos = ZProbePos - cutheight

    'go to cutting heigt
    code "G1 Z" + cutpos + "F100"

    'set new z-Pos
    SetDRO(2,cutheight)

End Sub

not tested, just written down.

Thomas

im sorry but the vbscript you sent didnt work ...

what exactly did not work ?

did you do a ref all after the probe ?

only half of it worked and then it says "Error Line:17_mismatch" and yes i did click on ref all after the probe the same error appeared .... does this script that you sent me works with every time i start a program on mach3? like does it move every time or just once only when i click on ref all?? 

ok, here the corrected version:

Sub Main

cutheight = 20
cutpos = 0
ZProbePos = 0

    Code "G31 Z-200 F150" 'do the probing
    While IsMoving() 'wait for finish
    Wend           
   
    'get the position where we hit the probe
    ZProbePos = GetVar(2002)   
    cutpos = ZProbePos - cutheight

    'go to cutting heigt
    code "G1 Z" + CStr(cutpos) + "F100"

    'set new z-Pos
    SetDRO(2,cutheight)

End Sub


but the logic  sequence would be to do a ref all first,
and the run the script, because the ref Z will "destroy"
your probe height.

Thomas