Siemens SINUMERIK 840D sl Function Manual page 654

Measurement (M5)
Setting zeros, workpiece measuring and tool measuring
g1 x4
$AA_MEAS_POINT2[x] = $AA_IW[x]
$AA_MEAS_POINT2[y] = $AA_IW[y]
$AA_MEAS_POINT2[z] = $AA_IW[z]
$AA_MEAS_SETPOINT[x] = 0
$AA_MEAS_SETPOINT[y] = 0
$AA_MEAS_SETPOINT[z] = 0
$AC_MEAS_DIR_APPROACH = 0
$AC_MEAS_ACT_PLANE = 0
$AC_MEAS_FRAME_SELECT = 0
$AC_MEAS_T_NUMBER = 1
$AC_MEAS_D_NUMBER = 1
$AC_MEAS_TYPE = 12
RETVAL = MEASURE()
if RETVAL <> 0 setal(61000 + RETVAL)
endif
$P_SETFRAME = $AC_MEAS_FRAME
$P_SETFR = $P_SETFRAME
g1 x0 y0
m30
654
; Approach 2nd measuring point
; Set setpoint position of the groove center
; Set approach direction +x
; Measuring plane is G17
; Select frame - SETFRAME
; Select tool
; Set measuring type on groove
; Start measuring process
; Describe system frame in data management
; Approach the groove center
Function Manual, 03/2009, 6FC5397-1BP10-4BA0
Extended Functions