Siemens SINUMERIK 840D sl Function Manual page 554

M5: Measurement
8.5 Setting zeros, workpiece measuring and tool measuring
Program code
$AC_MEAS_P2_COORD=0
$AC_MEAS_CHSER=$MC_MM_SYSTEM_FRAME_MASK B_AND 'B1011111'
$AC_MEAS__NCBFR='B0'
$AC_MEAS__CHBFR='B1'
$AC_MEAS__UIFR=2
$AA_MEAS_PFRAME=1
RETVAL = MEASURE()
if RETVAL <> 0
setal(61000 + RETVAL)
endif
if $AA_MEAS_PIONT2[_xx] <> 10
setal(61000)
M0
stopre
endif
if $AA_MEAS_PIONT2[_yy] <> -1
setal(61000)
M0
stopre
if $AA_MEAS_PIONT2[_zz] <> 0
setal(61000)
M0
stopre
if $AA_MEAS_PIONT2[A] <> 0
setal(61000)
M0
stopre
if $AA_MEAS_PIONT2[B] <> 7
setal(61000)
M0
stopre
m30
554
Comment
; Set WCS
; Entire frame results in CTRANS(_xx,0,_yy,
0,_zz,5,A,6,B,0)
; Stop cycle frame
; Stop global basic frame
; Channel basic frame 1 from data management
; Settable frame G55 from data management
; Do not include programmable frame in cal-
culation
; Start measurement calculation
Function Manual, 10/2015, 6FC5397-1BP40-5BA3
Extended Functions