Siemens SINUMERIK 840D sl Programming Manual page 824

Work preparation
3.13 Tool offsets
Program code
N70 R1=SETTCOR(_CORVAL,"G",0,0,2)
N80 T1 D1 X0 Y0 Z0
N90 M30
<CorComp> is "0", therefore, the coordinate value of the geometry component acting in the Z
direction must be replaced by the offset value 0.333.
The resulting total tool length is thus: L1 = 0.333 + 1.000 = 1.333
Example 2
Program code
N10 DEF REAL _CORVAL[3]
N20 $TC_DP1[1,1]=120
N30 $TC_DP3[1,1]=10.0
N40 $TC_DP12[1,1]=1.0
N50 _CORVAL[0]=0.333
N60 T1 D1 G17 G0
N70 R1=SETTCOR(_CORVAL,"W",0,1,2)
N80 T1 D1 X0 Y0 Z0
N90 M30
<CorComp> is "1", this means that the offset value of 0.333 – acting in the Z axis – is added to
the wear value of 1.0.
The resulting total tool length is thus: L1 = 10.0 + 1.333 = 11.333
Example 3
Program code
N10 DEF REAL _CORVAL[3]
N20 $TC_DP1[1,1]=120
N30 $TC_DP3[1,1]=10.0
N40 $TC_DP12[1,1]=1.0
N50 _CORVAL[0]=0.333
N60 T1 D1 G17 G0
N70 R1=SETTCOR(_CORVAL,"GW",0,2,2)
N80 T1 D1 X0 Y0 Z0
N90 M30
<CorComp> is "2", therefore, the offset effective in the Z axis 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
Program code
N10 DEF REAL _CORVAL[3]
N20 $TC_DP1[1,1]=120
N30 $TC_DP3[1,1]=10.0
824
Comment
; ==> MCS position X0.000 Y0.000 Z1.333
Comment
; milling tool
; geometry L1
; wear L1
; ==> MCS position X0.000 Y0.000 Z11.333
Comment
; Milling tool
; Geometry L1
; Wear L1
; ==> MCS position X0.000 Y0.000 Z0.333
Comment
; Milling tool
; Geometry L1
Programming Manual, 12/2019, 6FC5398-2EP40-0BA0
NC programming