Here is the program in our machine that works well for us.
There are parameters to be set, Tool to be measured, and off sets for large tools.
Hope this helps.
Scott Bridges
%
O1234(TOOL LENGTH MEASURE)
(SET #500=TOOL TO BE MEASURED)
IF[#500EQ0]GOTO3000
GOTO500
N500
T#500
M6
M19
M00(SET VARIABLES BELOW)
(SET #501=X AXIS SHIFT)
(SET #502=Y AXIS SHIFT)
G324X#501Y#502H#148R3
#500=0
#501=0
#502=0
M30
N3000
#3000=1(TOOL NUMBER NOT SET)
% |