Measuring A Measuring Point In Any Coordinate System (Measurement Type 24) - Siemens SINUMERIK 840D sl Function Manual

Program code
_CORMW_ZZ
DEF AXIS _XX, _YY, _ZZ
T1 D1
G54
$AC_MEAS_VALID = 0
$AC_MEAS_TYPE = 21
$AC_MEAS_ACT_PLANE = 0
_XX=$P_AXN1
_YY=$P_AXN2
_ZZ=$P_AXN3
$AA_MEAS_POINT1[_xx] = $AA_MW[_xx]
$AA_MEAS_POINT1[_yy] = $AA_MW[_yy]
$AA_MEAS_POINT1[_zz] = $AA_MW[_zz]
$AA_MEAS_SETPOINT[_xx] = 10
$AA_MEAS_SETPOINT[_yy] = 10
$AA_MEAS_SETPOINT[_zz] = 10
$AC_MEAS_FRAME_SELECT = 102
$AA_MEAS_SETPOINT[_yy] = 10
RETVAL = MEASURE()
if RETVAL <> 0
setal(61000 + RETVAL)
endif
$P_UIFR[2] = $AC_MEAS_FRAME
G55 G0 AX[_xx]=10 AX[_yy]=10
m30
8.5.3.12

Measuring a measuring point in any coordinate system (measurement type 24)

Measurement method for converting a measuring point in any coordinate system ($AC_MEAS_TYPE
= 24)
With this method of measurement, a measuring point in any coordinate system (WCS, BCS,
MCS) can be converted with reference to a new coordinate system by coordinate
transformation.
The new coordinate system is generated by specifying a desired frame chain.
Extended Functions
Function Manual, 10/2015, 6FC5397-1BP40-5BA3
8.5 Setting zeros, workpiece measuring and tool measuring
Comment
; Activate probe
; Activate all frames and G54
; Set all input values to invalid
; Set measurement type for 3-dimensional
setpoint selection
; Measuring plane is G17
; Define axes according to the plane
; Assign measured values
; Assign measurement value to abscissa
; Assign measurement value to ordinate
; Assign measurement value to applicate
; Define setpoint for abscissa, ordinate and
applicate
; Define
; Select target frame - G55
; Start measurement calculation
; Write measurement frame in data management
(G55)
; Activate frame and traverse
M5: Measurement
551