Siemens SINUMERIK Series

M5: Measurement
7.5 Setting zeros, workpiece measuring and tool measuring
Extended Functions
472 Function Manual, 03/2013, 6FC5397-1BP40-3BA1
Program code Comment
$TC_DP5[1,1]=0 ; (x)
$TC_DP6[1,1]=2 ; Radius
T1 D1
g0 x0 y0 z0 f10000
G54
$P_CHBFRAME[0] = crot(z,45)
$P_IFRAME[x,tr] = -sin(45)
$P_IFRAME[y,tr] = -sin(45)
$P_PFRAME[z,tr] = -45
;Measure corner with 3 measuring points
$AC_MEAS_VALID = 0 ; Set all input values to invalid
g1 x-1 y-3 ; 1. Approach measuring point
$AC_MEAS_LATCH[0] = 1 ; Pick up measuring point P1
g1 x-4 y4 ; 3. Approach measuring point
$AC_MEAS_LATCH[2] = 1 ; Pick up measuring point P3
g1 x-4 y1 ; 4. Approach measuring point
$AC_MEAS_LATCH[3] = 1 ; Pick up measuring point P4
$AA_MEAS_SETPOINT[x] = 0 ; Set position setpoint of the corner to
(0, 0, 0)
$AA_MEAS_SETPOINT[y] = 0
$AA_MEAS_SETPOINT[z] = 0
$AC_MEAS_CORNER_SETANGLE = 90 ; Define setpoint angle of intersection ϕ
$AC_MEAS_ACT_PLANE = 0 ; Measuring plane is G17
$AC_MEAS_FRAME_SELECT = 0 ; Select frame - SETFRAME
$AC_MEAS_T_NUMBER = 1 ; Select tool
$AC_MEAS_D_NUMBER = 1
$AC_MEAS_TYPE = 4 ; Set measuring type on corner 1
RETVAL = MEASURE() ; Start measuring process
if RETVAL <> 0
setal(61000 + RETVAL)
endif