Examples 3-6: Settcor Function For Tool Environments - Siemens SINUMERIK 840Di Function Manual

Examples
4.2 Examples 3–6: SETTCOR function for tool environments
4.2 Examples 3–6: SETTCOR function for tool environments
4.2
Example 3:
N10
N20
N30
N40
N50
N60
N70
N80
N90
_CORCOMP is 2, therefore, the compensation effective in the Z direction is entered in the
geometry component (the old value is overwritten) and the wear value is deleted. The
resulting total tool length is thus:
L1 = 0.333 + 0.0 = 0.333.
Example 4:
N10
N20
N30
N40
N50
N60
N70
N80
N90
_CORCOMP is 3, therefore, the wear value and compensation value are added to the
geometry component and the wear component is deleted. The resulting total tool length is
thus L1 = 11.333 + 0.0 = 11.333.
4-8
def real _CORVAL[3]
$TC_DP1[1,1] = 120
$TC_DP3[1,1] = 10.0
$TC_DP12[1,1]= 1.0
_CORVAL[0] = 0.333
t1 d1 g17 g0
r1 = settcor(_CORVAL, "GW", 0, 2, 2)
t1 d1 x0 y0 z0
M30
def real _CORVAL[3]
$TC_DP1[1,1] = 120
$TC_DP3[1,1] = 10.0
$TC_DP12[1,1]= 1.0
_CORVAL[0] = 0.333
t1 d1 g17 g0
r1 = settcor(_CORVAL, "GW", 0, 3, 2)
t1 d1 x0 y0 z0
M30
; Milling tool
; Geometry L1
; Wear L1
; ==> MCS position X0.000 Y0.000
Z0.333
; Milling tool
; Geometry L1
; Wear L1
;==> MCS position X0.000 Y0.000
Z11.333
Function Manual, 08/2005 Edition, 6FC5397-0BP10-0BA0
Tool Compensation (W1)