Siemens SINUMERIK 840D sl Programming Manual page 230

Measuring variants
3.3 Measure workpiece (milling)
; --------------------- 1st measurement, rotary axis 1
N99 G1 G710 G90 Z30 FFWON F2000
TOFFL=_BALL/2+_SAVB
D1 B=_P1[0] C=_P1[1] ;Kinematics initial state
Z = _SAVB
TOFFL=0
X0 Y0
;Circle around the sphere.
TOROT
CYCLE996(10101,1,1,_BALL,0,0,0,0,0,0,0,0,_U_FA,_U_TSA,1,,1,)
M1
STOPRE
M1
Z=IC(-_U_FA+_SAVB)
TOROTOF
M1
; --------------------- 2nd measurement, rotary axis 1
G1 F2000
TOFFL=_BALL/2+_SAVB ;When repositioning, correct the tool online
B=_P2[0] C=_P2[1]
TOFFL=0 ;Disable online correction again
;Circle around the sphere, starting angle 45 degrees
TOROT
CYCLE996(10102,1,1,_BALL,45,0,0,0,0,0,0,0,_U_FA,_U_TSA,1,,1,)
Z=IC(-_U_FA+_SAVB) ;Approach starting position
TOROTOF
;--------------------- 3rd measurement, rotary axis 1
G1 F2000
TOFFL=_BALL/2+_SAVB
D1 B=_P3[0] C=_P3[1]
TOFFL=0
TOROT
CYCLE996(10103,1,1,_BALL,210,0,0,0,0,0,0,0,_U_FA,_U_TSA,1,,1,)
Z=IC(-_U_FA+_SAVB)
TOROTOF
;--------------------- 1st measurement, rotary axis 2
; initial state 1st measurement rotary axis 1 = 1st measurement, rotary axis 2
230
Programming Manual, 12/2017, 6FC5398-4BP40-6BA1
Measuring cycles