Mach3 Macro: G31 Auto Tool Zero

Full source code is here: &that cutter position is at XYZ(0,0,25) &position is at XY(100, 20) &cutter to probe position Code "G0 X100 Y20" While IsMoving() &previous command is completed Wend &fast moving Code "G31 Z-10 F200" While IsMoving() Wend answer = MachMsg("End of G31 fast moving", "M779 Auto Tool Zero", 0) &slow moving z = GetOEMDRO(802) ¤t Z coordinate value Code "G0 Z" &(z+1) &back 1mm Code "G31 Z-10 F25" While IsMoving() Wend answer = MachMsg("End of G31 slow moving", "M779 Auto Tool Zero", 0) &zero OR plate thickness here SetOEMDRO(802, 0) &hold Z coordinate value 'End