M5: Measurement
7.5 Setting zeros, workpiece measuring and tool measuring
Extended Functions
Function Manual, 03/2013, 6FC5397-1BP40-3BA1
499
Program code Comment
$AC_MEAS_P1_COORD=0 ; Converting a position from WCS into WCS'
$AC_MEAS_P2_COORD=0
;Set WCS
; Entire frame results in
CTRANS(_xx,0,_yy,0,_zz,5,A,6,B,0)
; Stop cycle frame
$AC_MEAS_CHSER=$MC_MM_SYSTEM_FRAME_MASK B_AND 'B1011111'
$AC_MEAS__NCBFR='B0' ; Stop global basic frame
$AC_MEAS__CHBFR='B1' ; Channel basic frame 1 from data management
$AC_MEAS__UIFR=2 ; Settable frame G55 from data management
$AA_MEAS_PFRAME=1 ; Do not include programmable frame in
calculation
RETVAL = MEASURE() ; Start measurement calculation
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