Measurement Of An Oblique Angle (Measurement Type 24) - Siemens SINUMERIK 840D sl Function Manual

Example
3-dimensional setpoint selection
DEF INT RETVAL
DEF REAL _CORMW_XX,
_CORMW_YY,
_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.4.3.12

Measurement of an oblique angle (measurement type 24)

Measurement method for converting a measuring point in any coordinate system
Coordinate transformation of a position ($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.
Extended Functions
Function Manual, 09/2009, 6FC5397-1BP20-0BA0
8.4 Setting zeros, workpiece measuring and tool measuring
; 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: Measuring
659