Siemens SINUMERIK 828D Function Manual page 1605

Example 8
N10 def real _CORVAL[3]
N20 $TC_DP1[1,1] = 500
N30 $TC_DP3[1,1] = 10.0
N40 $TC_DP4[1,1] = 15.0
N50 $TC_DP5[1,1] = 20.0
N60 $TC_DP12[1,1]= 10.0
N70 $TC_DP13[1,1] =0.0
N80 $TC_DP14[1.1] =0.0
N90 $SC_WEAR_SIGN = TRUE
N100 _CORVAL[0] = 10.0
N110 _CORVAL[1] = 15.0
N120 _CORVAL[2] = 5.0
N130 rot y 30
N140 t1 d1 g18 g0
N150 r1 = settcor(_CORVAL, "W", 1, 1)
N160 t1 d1 x0 y0 z0
In N90 the setting data is enabled:
SD42930 $SC_WEAR_SIGN (sign of wear)
i.e. the wear must be valued with a negative sign.
The compensation is vectorial (_CORCOMP = 1), and the compensation vector must be added to the wear
(_CORMODE = 1). The geometric conditions in the Z/X plane are shown in the figure below:
Figure 18-55 Tool length compensation, example 8
Basic Functions
Function Manual, 09/2011, 6FC5397-0BP40-2BA0
; Turning tool
; Geometry L1
; Geometry L2
; Geometry L3
; Wear L1
; Wear L2
; Wear L3
; ==> MCS position X7.990 Y25.000
Z31.160
W1: Tool offset
18.15 Examples
1605