Siemens SINUMERIK 840D sl Function Manual page 561

Output variable
$AC_MEAS_RESULTS[4]
$AC_MEAS_RESULTS[5]
Example
Measuring the tool length
Program code
DEF INT RETVAL
T0 D0
g0 x0 y0 z0 f10000
$AC_MEAS_VALID = 0
g1 z10
$AC_MEAS_LATCH[0] = 1
$AC_MEAS_DIR_APPROACH = 5
$AA_MEAS_SETPOINT[x] = 0
$AA_MEAS_SETPOINT[y] = 0
$AA_MEAS_SETPOINT[z] = 0
$AC_MEAS_ACT_PLANE = 0
$AC_MEAS_T_NUMBER = 0
$AC_MEAS_D_NUMBER = 0
$AC_MEAS_TYPE = 10
RETVAL = MEASURE()
if RETVAL <> 0 setal(61000 + RETVAL)
endif
if $AC_MEAS_TOOL_LENGTH <> 10
setal(61000 + $AC_MEAS_TOOL_LENGTH)
endif
m30
Extended Functions
Function Manual, 10/2015, 6FC5397-1BP40-5BA3
8.5 Setting zeros, workpiece measuring and tool measuring
Meaning
Tool length L2
Tool length L3
Comment
; Measure tool length
; Set all input values to invalid
; Move tool towards reference part
; Pick up measuring point 1
; Set approach direction -z
; Set reference position
; Measuring plane is G17
; No tool has been selected
; Set measuring type on tool length
, Start measuring process
; Query known tool length
M5: Measurement
561