Siemens SINUMERIK 840D sl Programming Manual

Also see for SINUMERIK 840D sl: Manual Function manual Function manual Function manual Function manual

Contents

Frames6.8 Frame calculation from three measuring points in space (MEAFRAME)Job planning6-24 Programming Manual, 03/2006 Edition, 6FC5398-2BP10-1BA0N200 CORR_FRAME=MEAFRAME(IDEAL_POINT,MEAS_POINT,FIT_QUALITY);N230 IF FIT_QUALITY < 0SETAL(65000)GOTOF NO_FRAMEENDIF,N240 IF FIT_QUALITY > FIT_QUALITY_LIMITSETAL(65010)GOTOF NO_FRAMEENDIF;N250 IF CORR_FRAME[X,RT] > ROT_FRAME_LIMIT ;limitation of the 1st RPY;angleSETAL(65020)GOTOF NO_FRAMEENDIF;N260 IF CORR_FRAME[Y,RT] > ROT_FRAME_LIMIT ;limitation of the 2nd;RPY;angleSETAL(65021)GOTOF NO_FRAMEENDIF;N270 IF CORR_FRAME[Z,RT] > ROT_FRAME_LIMIT ;limitation of the 3rd RPY;angleSETAL(65022)GOTOF NO_FRAMEENDIF;N300 $P_IFRAME=CORR_FRAME ;activate the probe frame via a settable frame;;check the frame by positioning the geometry axes at the ideal points;N400 X=IDEAL_POINT[0,0] Y=IDEAL_POINT[0,1] Z=IDEAL_POINT[0,2]N410 SHOW_MCS_POS1[0]=$AA_IM[X]N410 SHOW_MCS_POS1[1]=$AA_IM[X]N430 SHOW_MCS_POS1[2]=$AA_IM[Z];N500 X=IDEAL_POINT[1,0] Y=IDEAL_POINT[1,1] Z=IDEAL_POINT[1,2]N510 SHOW_MCS_POS2[0]=$AA_IM[X]N520 SHOW_MCS_POS2[1]=$AA_IM[Y]N530 SHOW_MCS_POS2[2]=$AA_IM[Z];