提示： 这个功能利用一个单一的测点或当前测头位置创建参考系。参考系的轴会平行于选择的参考系. 此功能一般用于程序自动建立参考系之前快速建立预参考系。（1）可以取探针的球心作为坐标原点（按操纵盒上F2按键）或设置手动采点最少点数为0将机器移动到工件的隅角点（如下图）位置处。（2）也可以手动触测一个点作为坐标原点。DMISMN/'Created by [深圳力合精密装备科技有限公司-090118] on 星期五, 七月 13, 2018', 4.0UNITS/MM, ANGDEC, MMPSWKPLAN/XYPLANPRCOMP/ONTECOMP/ONFLY/1.000000MODE/PROG, MANSNSET/APPRCH, 10.000000SNSET/RETRCT, 10.000000SNSET/DEPTH, 0.000000SNSET/SEARCH, 10.000000SNSET/CLRSRF, 30.000000RECALL/D(MCS)SNSLCT/S(ROOTSN1)GEOALG/BF, LSTSQRGEOALG/ANGLB, DEFALTGEOALG/CIRCLE, LSTSQRGEOALG/ARC, LSTSQRGEOALG/PLANE, LSTSQR$$$$MODE/MAN$$TEXT/OPER, '手动在三面相交处测点（隅角点）！'KNPTN1 = PROMPT/PICTURE, 'C:\山涧果子\4.jpg'$$F(PT1)=FEAT/POINT,CART,104.468298,225.702563,-13.094656,0.000000,0.000000,1.000000MEAS/POINT, F(PT1), 1 PTMEAS/CART, 104.468298,225.702563,-13.094656,0.000000,0.000000,1.000000ENDMESD(CRD1) = TRANS/XORIG, FA(PT1), YORIG, FA(PT1), ZORIG, FA(PT1)$$ Set.CAD2PCS.CADM_1D(CRD2) = TRANS/XORIG, 0, YORIG, -14.9792, ZORIG, -35$$ Set.CAD2PCS.CADM_1$$MODE/PROG,MANGOTO/0.013562, 14.973826, 79.465856F(PLN1)=FEAT/PLANE,CART,46.415502,48.845361,34.974146,0.000654,0.000062,1.000000$$ Measurement points are created through actual pointsMEAS/PLANE, F(PLN1), 4 PTMEAS/CART, 5.163376, 20.832956, 35.002863, 0.000654, 0.000062, 1.000000 PTMEAS/CART, 5.176993, 76.339746, 34.999407, 0.000654, 0.000062, 1.000000 PTMEAS/CART, 94.120625, 80.444967, 34.940985, 0.000654, 0.000062, 1.000000 PTMEAS/CART, 81.201012, 17.763776, 34.953327, 0.000654, 0.000062, 1.000000ENDMES$$ MACRO: EASI_CLEARPLN_GOTO$$ FUNCTION: CLEARANCE SURFACE IMPLEMENTATION$$ Move machine CLEAR SURFACE DIST above the current clear surface $$plane and then move machine parallel to the clear surface plane $$ ALL Macro parameters are in PCS and Current UNITS$$ Last update: 3-1-04 Add mode checking. only works in PROG MODE$$ Last update: 8-24-04 Clear position is based on the surface of$$$$ This sample DMIS Macro is provided by External-Array Software, Inc.$$ It should be modified for your own use. There is no guarantee for$$ the quality of this Macro. November, 2003M(EASI_CLEARPLN_GOTO) = MACRO/ISNOM, TARX, TARY, TARZDECL/LOCAL, REAL, CCX, CCY, CCZ, CCI, CCJ, CCKDECL/LOCAL, REAL, CURX, CURY, CURZ, TD, CLRDIST, SDIAMDECL/LOCAL, CHAR, 255, CLRLABEL, FLABEL, MMODE, SNAMEMMODE = VALUE/MODECLRLABEL = VALUE/SNSET, CLRSRFIF/ ( (LEN(CLRLABEL) .GT. 0) .AND. (MMODE .EQ. 'PROG,MAN') )CLRDIST = VALUE/SNSET, CLRSRF, DISTFLABEL = ASSIGN/'FA'IF/ ISNOM .EQ. 0FLABEL = ASSIGN/'F'ENDIFCCX = OBTAIN/FLABEL(@CLRLABEL), 3CCY = OBTAIN/FLABEL(@CLRLABEL), 4CCZ = OBTAIN/FLABEL(@CLRLABEL), 5CCI = OBTAIN/FLABEL(@CLRLABEL), 6CCJ = OBTAIN/FLABEL(@CLRLABEL), 7CCK = OBTAIN/FLABEL(@CLRLABEL), 8SNAME = VALUE/SNSLCTSDIAM = OBTAIN/SS(SNAME), 8CCX = ASSIGN/CCX + CCI * SDIAM/2CCY = ASSIGN/CCY + CCJ * SDIAM/2CCZ = ASSIGN/CCZ + CCK * SDIAM/2CURX = VALUE/GOTOM, XAXISCURY = VALUE/GOTOM, YAXISCURZ = VALUE/GOTOM, ZAXISTD = ASSIGN/(CURX - CCX) * CCI + (CURY - CCY) * CCJ + (CURZ - CCZ) * CCKIF/ TD .LT. CLRDISTTD = ASSIGN/(CLRDIST - TD)GOTO/CURX+CCI*TD, CURY+CCJ*TD, CURZ+CCK*TDENDIFTD = ASSIGN/(TARX - CCX) * CCI + (TARY - CCY) * CCJ + (TARZ - CCZ) * CCKIF/ TD .LT. CLRDISTTD = ASSIGN/(CLRDIST - TD)GOTO/TARX+CCI*TD, TARY+CCJ*TD, TARZ+CCK*TDENDIFENDIFENDMACSNSET/APPRCH, 10.0000SNSET/RETRCT, 10.0000SNSET/DEPTH, 0.0000SNSET/SEARCH, 10.0000SNSET/CLRSRF, FA(PLN1), 30.0000F(LN1)=FEAT/LINE,BND,CART,6.171875,-1.177584,14.662777,45.159265,-0.879174,14.660907,0.007654,-0.999971,0.000000$$ Measurement points are created through actual pointsCALL/M(EASI_CLEARPLN_GOTO), 1, 6.278971, -15.169747, 14.662776MEAS/LINE, F(LN1), 2 PTMEAS/CART, 6.171875, -1.177584, 14.662776, 0.007654, -0.999971, 0.000000 PTMEAS/CART, 45.159265, -0.879174, 14.660906, 0.007654, -0.999971, 0.000000ENDMESF(LN_PROJ1)=FEAT/LINE,BND,CART,6.185177,-1.176320,35.003563,45.172552,-0.877912,34.978047,0.000654,0.000062,1.000000CONST/LINE,F(LN_PROJ1),PROJLI,FA(LN1),FA(PLN1)F(LN2)=FEAT/LINE,BND,CART,-1.697516,20.338457,31.586667,-2.097006,72.605347,31.583397,-0.999971,-0.007643,-0.000000$$ Measurement points are created through actual pointsCALL/M(EASI_CLEARPLN_GOTO), 1, -15.689680, 20.231511, 31.586666MEAS/LINE, F(LN2), 2 PTMEAS/CART, -1.697516, 20.338457, 31.586666, -0.999971, -0.007643, -0.000000 PTMEAS/CART, -2.097006, 72.605347, 31.583396, -0.999971, -0.007643, -0.000000ENDMESF(LN_PROJ2)=FEAT/LINE,BND,CART,-1.695279,20.338670,35.007380,-2.094769,72.605560,35.004394,0.000654,0.000062,1.000000CONST/LINE,F(LN_PROJ2),PROJLI,FA(LN2),FA(PLN1)F(PT_INTER1)=FEAT/POINT,CART,-1.530383,-1.235375,35.008612,0.000654,0.000062,1.000000CONST/POINT,F(PT_INTER1),INTOF,FA(LN_PROJ1),FA(LN_PROJ2)D(CRD3) = DATSET/FA(PLN1), ZDIR, ZORIG, FA(LN_PROJ1), XDIR, FA(PT_INTER1), XORIGD(CRD3) = TRANS/ZORIG, -35, YORIG, FA(PT_INTER1), XORIG, -0$$ Set.CAD2PCS.CADM_1GOTO/-12.055480, 75.180401, 125.156688MODE/PROG,MANSNSET/APPRCH, 2SNSET/RETRCT, 2SNSET/DEPTH, 0.0000SNSET/SEARCH, 10.0000SNSET/CLRSRF, FA(PLN1), 30.0000F(CIR1)=FEAT/CIRCLE,INNER,CART,8.000000,55.000000,32.000000,-0.000000,0.000000,1.000000, 10.000000$$ Measurement points are created through nominal pointsCALL/M(EASI_CLEARPLN_GOTO), 1, 9.003714, 55.000000, 66.996286MEAS/CIRCLE, F(CIR1), 4 GOTO/CART, 9.003714, 55.000000, 66.996286 GOTO/CART, 9.003714, 55.000000, 62.000000 PTMEAS/CART, 13.000000, 55.000000, 32.000000, -1.000000, 0.000000, 0.000000 PTMEAS/CART, 8.000000, 50.000000, 32.000000, -0.000000, 1.000000, 0.000000 PTMEAS/CART, 3.000000, 55.000000, 32.000000, 1.000000, -0.000000, -0.000000 PTMEAS/CART, 8.000000, 60.000000, 32.000000, 0.000000, -1.000000, -0.000000 GOTO/CART, 8.000000, 56.003714, 62.000000ENDMESF(CIR2)=FEAT/CIRCLE,INNER,CART,24.000000,82.712813,32.000000,-0.000000,0.000000,1.000000, 10.000000$$ Measurement points are created through nominal pointsCALL/M(EASI_CLEARPLN_GOTO), 1, 8.012321, 55.997522, 66.996286MEAS/CIRCLE, F(CIR2), 4 GOTO/CART, 8.012321, 55.997522, 66.996286 GOTO/CART, 25.003714, 82.712813, 66.996286 GOTO/CART, 25.003714, 82.712813, 62.000000 PTMEAS/CART, 29.000000, 82.712813, 32.000000, -1.000000, 0.000000, 0.000000 PTMEAS/CART, 24.000000, 77.712813, 32.000000, -0.000000, 1.000000, 0.000000 PTMEAS/CART, 19.000000, 82.712813, 32.000000, 1.000000, -0.000000, -0.000000 PTMEAS/CART, 24.000000, 87.712813, 32.000000, 0.000000, -1.000000, -0.000000 GOTO/CART, 24.000000, 83.716527, 62.000000ENDMESF(CIR3)=FEAT/CIRCLE,INNER,CART,56.000000,82.712813,32.000000,-0.000000,0.000000,1.000000, 10.000000$$ Measurement points are created through nominal pointsCALL/M(EASI_CLEARPLN_GOTO), 1, 24.012836, 83.712339, 66.996286MEAS/CIRCLE, F(CIR3), 4 GOTO/CART, 24.012836, 83.712339, 66.996286 GOTO/CART, 57.003714, 82.712813, 66.996286 GOTO/CART, 57.003714, 82.712813, 62.000000 PTMEAS/CART, 61.000000, 82.712813, 32.000000, -1.000000, 0.000000, 0.000000 PTMEAS/CART, 56.000000, 77.712813, 32.000000, -0.000000, 1.000000, 0.000000 PTMEAS/CART, 51.000000, 82.712813, 32.000000, 1.000000, -0.000000, -0.000000 PTMEAS/CART, 56.000000, 87.712813, 32.000000, 0.000000, -1.000000, -0.000000 GOTO/CART, 56.000000, 83.716527, 62.000000ENDMESF(CIR4)=FEAT/CIRCLE,INNER,CART,72.000000,55.000000,32.000000,-0.000000,0.000000,1.000000, 10.000000$$ Measurement points are created through nominal pointsCALL/M(EASI_CLEARPLN_GOTO), 1, 56.012334, 83.710560, 66.996286MEAS/CIRCLE, F(CIR4), 4 GOTO/CART, 56.012334, 83.710560, 66.996286 GOTO/CART, 73.003714, 55.000000, 66.996286 GOTO/CART, 73.003714, 55.000000, 62.000000 PTMEAS/CART, 77.000000, 55.000000, 32.000000, -1.000000, 0.000000, 0.000000 PTMEAS/CART, 72.000000, 50.000000, 32.000000, -0.000000, 1.000000, 0.000000 PTMEAS/CART, 67.000000, 55.000000, 32.000000, 1.000000, -0.000000, -0.000000 PTMEAS/CART, 72.000000, 60.000000, 32.000000, 0.000000, -1.000000, -0.000000 GOTO/CART, 72.000000, 56.003714, 62.000000ENDMESF(CIR5)=FEAT/CIRCLE,INNER,CART,56.000000,27.287187,32.000000,-0.000000,0.000000,1.000000, 10.000000$$ Measurement points are created through nominal pointsCALL/M(EASI_CLEARPLN_GOTO), 1, 72.012087, 55.997787, 66.996286MEAS/CIRCLE, F(CIR5), 4 GOTO/CART, 72.012087, 55.997787, 66.996286 GOTO/CART, 57.003714, 27.287187, 66.996286 GOTO/CART, 57.003714, 27.287187, 62.000000 PTMEAS/CART, 61.000000, 27.287187, 32.000000, -1.000000, 0.000000, 0.000000 PTMEAS/CART, 56.000000, 22.287187, 32.000000, -0.000000, 1.000000, 0.000000 PTMEAS/CART, 51.000000, 27.287187, 32.000000, 1.000000, -0.000000, -0.000000 PTMEAS/CART, 56.000000, 32.287187, 32.000000, 0.000000, -1.000000, -0.000000 GOTO/CART, 56.000000, 28.290901, 62.000000ENDMESF(CIR6)=FEAT/CIRCLE,INNER,CART,24.000000,27.287187,32.000000,-0.000000,0.000000,1.000000, 10.000000$$ Measurement points are created through nominal pointsCALL/M(EASI_CLEARPLN_GOTO), 1, 56.011987, 28.284787, 66.996286MEAS/CIRCLE, F(CIR6), 4 GOTO/CART, 56.011987, 28.284787, 66.996286 GOTO/CART, 25.003714, 27.287187, 66.996286 GOTO/CART, 25.003714, 27.287187, 62.000000 PTMEAS/CART, 29.000000, 27.287187, 32.000000, -1.000000, 0.000000, 0.000000 PTMEAS/CART, 24.000000, 22.287187, 32.000000, -0.000000, 1.000000, 0.000000 PTMEAS/CART, 19.000000, 27.287187, 32.000000, 1.000000, -0.000000, -0.000000 PTMEAS/CART, 24.000000, 32.287187, 32.000000, 0.000000, -1.000000, -0.000000 GOTO/CART, 24.000000, 28.290901, 62.000000ENDMESF(φ45)=FEAT/CIRCLE,INNER,CART,40.000000,55.000000,32.000000,-0.000000,0.000000,1.000000, 45.000000$$ Measurement points are created through nominal pointsCALL/M(EASI_CLEARPLN_GOTO), 1, 24.012306, 28.287628, 66.996286MEAS/CIRCLE, F(Φ45), 4 GOTO/CART, 24.012306, 28.287628, 66.996286 GOTO/CART, 58.503714, 55.000000, 66.996286 GOTO/CART, 58.503714, 55.000000, 62.000000 PTMEAS/CART, 62.500000, 55.000000, 32.000000, -1.000000, 0.000000, 0.000000 GOTO/CART, 57.095202, 47.918935, 32.000000 GOTO/CART, 53.084101, 41.915899, 32.000000 GOTO/CART, 47.081065, 37.904798, 32.000000 PTMEAS/CART, 40.000000, 32.500000, 32.000000, -0.000000, 1.000000, 0.000000 GOTO/CART, 32.918935, 37.904798, 32.000000 GOTO/CART, 26.915899, 41.915899, 32.000000 GOTO/CART, 22.904798, 47.918935, 32.000000 PTMEAS/CART, 17.500000, 55.000000, 32.000000, 1.000000, -0.000000, -0.000000 GOTO/CART, 22.904798, 62.081065, 32.000000 GOTO/CART, 26.915899, 68.084101, 32.000000 GOTO/CART, 32.918935, 72.095202, 32.000000 PTMEAS/CART, 40.000000, 77.500000, 32.000000, 0.000000, -1.000000, -0.000000 GOTO/CART, 40.000000, 73.503714, 62.000000ENDMESF(Φ30)=FEAT/CIRCLE,OUTER,CART,40.000000,55.000000,27.000000,-0.000000,0.000000,1.000000, 30.000000$$ Measurement points are created through nominal pointsCALL/M(EASI_CLEARPLN_GOTO), 1, 40.012243, 73.499410, 66.996286MEAS/CIRCLE, F(Φ30), 4 GOTO/CART, 40.012243, 73.499410, 66.996286 GOTO/CART, 58.996286, 55.000000, 66.996286 GOTO/CART, 58.996286, 55.000000, 57.000000 PTMEAS/CART, 55.000000, 55.000000, 27.000000, 1.000000, -0.000000, -0.000000 GOTO/CART, 57.550280, 47.730436, 27.000000 GOTO/CART, 53.432403, 41.567597, 27.000000 GOTO/CART, 47.269564, 37.449720, 27.000000 PTMEAS/CART, 40.000000, 40.000000, 27.000000, 0.000000, -1.000000, -0.000000 GOTO/CART, 32.730436, 37.449720, 27.000000 GOTO/CART, 26.567597, 41.567597, 27.000000 GOTO/CART, 22.449720, 47.730436, 27.000000 PTMEAS/CART, 25.000000, 55.000000, 27.000000, -1.000000, 0.000000, 0.000000 GOTO/CART, 22.449720, 62.269564, 27.000000 GOTO/CART, 26.567597, 68.432403, 27.000000 GOTO/CART, 32.730436, 72.550280, 27.000000 PTMEAS/CART, 40.000000, 70.000000, 27.000000, -0.000000, 1.000000, 0.000000 GOTO/CART, 40.000000, 73.996286, 57.000000ENDMESF(Φ20)=FEAT/CIRCLE,INNER,CART,40.000000,55.000000,27.000000,-0.000000,0.000000,1.000000, 20.000000$$ Measurement points are created through nominal pointsCALL/M(EASI_CLEARPLN_GOTO), 1, 40.015409, 73.990564, 66.996286MEAS/CIRCLE, F(Φ20), 4 GOTO/CART, 40.015409, 73.990564, 66.996286 GOTO/CART, 46.003714, 55.000000, 66.996286 GOTO/CART, 46.003714, 55.000000, 57.000000 PTMEAS/CART, 50.000000, 55.000000, 27.000000, -1.000000, 0.000000, 0.000000 GOTO/CART, 45.546708, 52.702478, 27.000000 GOTO/CART, 44.245267, 50.754733, 27.000000 GOTO/CART, 42.297522, 49.453292, 27.000000 PTMEAS/CART, 40.000000, 45.000000, 27.000000, -0.000000, 1.000000, 0.000000 GOTO/CART, 37.702478, 49.453292, 27.000000 GOTO/CART, 35.754733, 50.754733, 27.000000 GOTO/CART, 34.453292, 52.702478, 27.000000 PTMEAS/CART, 30.000000, 55.000000, 27.000000, 1.000000, -0.000000, -0.000000 GOTO/CART, 34.453292, 57.297522, 27.000000 GOTO/CART, 35.754733, 59.245267, 27.000000 GOTO/CART, 37.702478, 60.546708, 27.000000 PTMEAS/CART, 40.000000, 65.000000, 27.000000, 0.000000, -1.000000, -0.000000 GOTO/CART, 40.000000, 61.003714, 57.000000ENDMEST(TCOR1)=TOL/CORTOL,XAXIS,-0.050000,0.050000T(TCOR2)=TOL/CORTOL,YAXIS,-0.050000,0.050000OUTPUT/FA(CIR1),TA(TCOR1),TA(TCOR2)OUTPUT/FA(CIR2),TA(TCOR1),TA(TCOR2)OUTPUT/FA(CIR3),TA(TCOR1),TA(TCOR2)OUTPUT/FA(CIR4),TA(TCOR1),TA(TCOR2)OUTPUT/FA(CIR5),TA(TCOR1),TA(TCOR2)OUTPUT/FA(CIR6),TA(TCOR1),TA(TCOR2)OUTPUT/FA(Φ45),TA(TCOR1),TA(TCOR2)OUTPUT/FA(Φ30),TA(TCOR1),TA(TCOR2)OUTPUT/FA(Φ20),TA(TCOR1),TA(TCOR2)来源：山涧果子
