$$/* Header
DMISMN/'Created by [山涧果子] on 星期五, 四月 22, 2022', 4.0
UNITS/MM, ANGDEC, MMPS
WKPLAN/XYPLAN
PRCOMP/ON
TECOMP/ON
FLY/1.0000
MODE/MAN
SNSET/APPRCH, 2.0000
SNSET/RETRCT, 2.0000
SNSET/DEPTH, 0.0000
SNSET/SEARCH, 10.0000
SNSET/CLRSRF, 15.0000
RECALL/D(MCS)
SNSLCT/S(10-D0.5L20)
GEOALG/BF, LSTSQR
GEOALG/ANGLB, DEFALT
GEOALG/CIRCLE, LSTSQR
GEOALG/ARC, LSTSQR
GEOALG/PLANE, LSTSQR
$$
$$
$$*/
MODE/MAN
F(PLN1)=FEAT/PLANE,CART,-32.8182,3.8780,29.0377,0.0000,0.0000,1.0000
$$ Measurement points are created through actual points
MEAS/PLANE, F(PLN1), 3
PTMEAS/CART, -48.1588, 2.4992, 29.0377, 0.0000, 0.0000, 1.0000
PTMEAS/CART, -47.7382, 5.4880, 29.0377, 0.0000, 0.0000, 1.0000
PTMEAS/CART, -2.5577, 3.6469, 29.0377, 0.0000, 0.0000, 1.0000
ENDMES
D(CRD1) = DATSET/FA(PLN1), ZDIR
F(LN1)=FEAT/LINE,BND,CART,-49.5977,7.0001,27.9058,-13.0122,7.0001,27.4539,-0.0000,1.0000,0.0000
$$ Measurement points are created through actual points
MEAS/LINE, F(LN1), 2
PTMEAS/CART, -49.5977, 7.0001, 27.9058, -0.0000, 1.0000, 0.0000
PTMEAS/CART, -13.0122, 7.0001, 27.4539, -0.0000, 1.0000, 0.0000
ENDMES
F(PT1)=FEAT/POINT,CART,-51.2084,3.8215,28.1728,-1.0000,0.0000,0.0000
MEAS/POINT, F(PT1), 1
PTMEAS/CART, -51.2084,3.8215,28.1728,-1.0000,0.0000,0.0000
ENDMES
D(CRD2) = DATSET/FA(PLN1), ZDIR, ZORIG, FA(LN1), XDIR, YORIG, FA(PT1), XORIG
D(CRD2) = TRANS/ZORIG, -29.0377, YORIG, -7.0001, XORIG, 51.2084
$$ Set.CAD2PCS.CADM_1
MODE/PROG,MAN
F(PLN2)=FEAT/PLANE,CART,-69.8145,7.3865,-5.5623,-0.0021,1.0000,0.0047
$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
$$ 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, 2003
M(EASI_CLEARPLN_GOTO) = MACRO/ISNOM, TARX, TARY, TARZ
DECL/LOCAL, REAL, CCX, CCY, CCZ, CCI, CCJ, CCK
DECL/LOCAL, REAL, CURX, CURY, CURZ, TD, CLRDIST, SDIAM
DECL/LOCAL, CHAR, 255, CLRLABEL, FLABEL, MMODE, SNAME
MMODE = VALUE/MODE
CLRLABEL = VALUE/SNSET, CLRSRF
IF/ ( (LEN(CLRLABEL) .GT. 0) .AND. (MMODE .EQ. 'PROG,MAN') )
CLRDIST = VALUE/SNSET, CLRSRF, DIST
FLABEL = ASSIGN/'FA'
IF/ ISNOM .EQ. 0
FLABEL = ASSIGN/'F'
ENDIF
CCX = OBTAIN/FLABEL(@CLRLABEL), 3
CCY = OBTAIN/FLABEL(@CLRLABEL), 4
CCZ = OBTAIN/FLABEL(@CLRLABEL), 5
CCI = OBTAIN/FLABEL(@CLRLABEL), 6
CCJ = OBTAIN/FLABEL(@CLRLABEL), 7
CCK = OBTAIN/FLABEL(@CLRLABEL), 8
SNAME = VALUE/SNSLCT
SDIAM = OBTAIN/SS(SNAME), 8
CCX = ASSIGN/CCX + CCI * SDIAM/2
CCY = ASSIGN/CCY + CCJ * SDIAM/2
CCZ = ASSIGN/CCZ + CCK * SDIAM/2
CURX = VALUE/GOTOM, XAXIS
CURY = VALUE/GOTOM, YAXIS
CURZ = VALUE/GOTOM, ZAXIS
TD = ASSIGN/(CURX - CCX) * CCI + (CURY - CCY) * CCJ + (CURZ - CCZ) * CCK
IF/ TD .LT. CLRDIST
TD = ASSIGN/(CLRDIST - TD)
GOTO/CURX+CCI*TD, CURY+CCJ*TD, CURZ+CCK*TD
ENDIF
TD = ASSIGN/(TARX - CCX) * CCI + (TARY - CCY) * CCJ + (TARZ - CCZ) * CCK
IF/ TD .LT. CLRDIST
TD = ASSIGN/(CLRDIST - TD)
GOTO/TARX+CCI*TD, TARY+CCJ*TD, TARZ+CCK*TD
ENDIF
ENDIF
ENDMAC
SNSET/APPRCH, 2
SNSET/RETRCT, 2
SNSET/DEPTH, 0.0000
SNSET/SEARCH, 10.0000
SNSLCT/S(10-D0.5L20)
SNSET/CLRSRF, FA(PLN1), 30
F(PLN6)=FEAT/PLANE,CART,57.9442,3.4067,29.0376,0.0000,-0.0000,1.0000
$$ Measurement points are created through nominal points
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -52.4495, 37.2412, 26.8501
MEAS/PLANE,F(PLN6),4,CLRSRF,FA(PLN1),30.0000,CLRSRF,FA(PLN1),30.0000
PTMEAS/CART, -48.8457, 5.3475, 29.0377, -0.0000, 0.0000, 1.0000
PTMEAS/CART, -49.2015, 1.6212, 29.0377, -0.0000, 0.0000, 1.0000
PTMEAS/CART, 162.5019, 1.6163, 29.0377, -0.0000, 0.0000, 1.0000
PTMEAS/CART, 167.3219, 5.0417, 29.0377, -0.0000, 0.0000, 1.0000
ENDMES
D(CRD8) = DATSET/FA(PLN6), ZDIR
F(LN3)=FEAT/LINE,BND,CART,-48.8523,7.0001,26.0000,167.1282,7.0001,26.0000,-0.0000,1.0000,0.0000
$$ Measurement points are created through nominal points
$$ CALL/M(EASI_CLEARPLN_GOTO), 1, 167.3219, 5.0417, 59.2789
MEAS/LINE, F(LN3), 2
GOTO/CART, 167.3219, 5.0417, 59.2789
GOTO/CART, -48.8523, 8.2412, 59.2789
PTMEAS/CART, -48.8523, 7.0001, 26.0000, 0.0000, 1.0000, 0.0000
PTMEAS/CART, 167.1282, 7.0001, 26.0000, 0.0000, 1.0000, 0.0000
ENDMES
F(点T12)=FEAT/POINT,CART,-51.2084,4.6031,26.0000,-1.0000,-0.0000,0.0000
$$ CALL/M(EASI_CLEARPLN_GOTO), 1, -52.4496, 4.6031, 26.0000
MEAS/POINT, F(点T12), 1
GOTO/CART, -52.4496,2.3797,59.2789
GOTO/CART, -52.4496,4.6031,59.2789
PTMEAS/CART, -51.2084,4.6031,26.0000,-1.0000,-0.0000,0.0000
ENDMES
D(CRD9) = DATSET/FA(PLN6), ZDIR, ZORIG, FA(LN3), XDIR, YORIG, FA(点T12), XORIG
D(CRD9) = TRANS/ZORIG, -29.0377, YORIG, -7.0001, XORIG, 51.2084
$$ Set.CAD2PCS.CADM_1
(L1)
$$ DCC测量开始！！！$$$$$$$$$$
$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
MODE/PROG,MAN
FEDRAT/MESVEL, MMPS, 1.0000
FEDRAT/POSVEL, MMPS, 180.0000
FEDRAT/SCNVEL, MMPS, 20.0000
ACLRAT/MESACL, MMPSS, 3.0000
ACLRAT/POSACL, MMPSS, 200.0000
ACLRAT/SCNACL, MMPSS, 150.0000
$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
$$$$$$$$
$$$$ 换从此行运行 $$$$$$$$
$$$$$$$$$$$$$$
$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
DECL/COMMON, INTGR, KNPTN1,VAR2
VAR2 = PROMPT/'请输入循环次数'
DO/KNPTN1,1,VAR2
$$请插入要循环的内容
RECALL/D(CRD9)
D(TRA1) = TRANS/XORIG, 75*(KNPTN1-1)
GOTO/-52.4465, 3.8215, 128.1728
SNSLCT/S(10-D0.5L20_A90_B0)
F(PLN3)=FEAT/PLANE,CART,-15.2949,0.0000,-6.8427,0.0000,1.0000,0.0000
$$ Measurement points are created through actual points
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -3.2514, 1.4764, -1.7307
MEAS/PLANE,F(PLN3),3,CLRSRF,F(PLN2),12.0000,CLRSRF,F(PLN2),12.0000
PTMEAS/CART, -3.2514, 0.0000, -1.7307, 0.0000, 1.0000, 0.0000
PTMEAS/CART, -20.0462, 0.0000, -2.8900, 0.0000, 1.0000, 0.0000
PTMEAS/CART, -22.5873, 0.0000, -15.9076, 0.0000, 1.0000, 0.0000
ENDMES
D(CRD3) = DATSET/FA(PLN3), YDIR, YORIG
D(CRD3) = TRANS/YORIG, -0
SNSET/APPRCH, 0.4
SNSET/RETRCT, 0.4
SNSET/DEPTH, 0.0000
SNSET/SEARCH, 10.0000
SNSET/CLRSRF, F(PLN2), 30.0000
F(LN2)=FEAT/LINE,BND,CART,-0.0000,-0.6000,-5.7337,-0.0000,-0.6000,5.4630,1.0000,-0.0000,0.0000
$$ Measurement points are created through nominal points
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -22.6027, 37.2367, -15.9094
MEAS/LINE,F(LN2),2,CLRSRF,F(PLN2),12.0000,CLRSRF,F(PLN2),12.0000
GOTO/CART, -22.6027, 37.2367, -15.9094
GOTO/CART, 0.7369, 37.2380, -5.7355
PTMEAS/CART, 0.0000, -0.6000, -5.7336, 1.0000, -0.0000, -0.0000
PTMEAS/CART, 0.0000, -0.6000, 5.4631, 1.0000, -0.0000, -0.0000
ENDMES
F(PT2)=FEAT/POINT,CART,-16.2203,-0.9753,0.0000,-0.0000,0.0000,1.0000
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -16.2203, -0.9752, 0.6382
MEAS/POINT,F(PT2),1,CLRSRF,F(PLN2),12.0000,CLRSRF,F(PLN2),12.0000
GOTO/CART, -16.2216,37.2377,0.6363
PTMEAS/CART, -16.2203,-0.9753,0.0000,-0.0000,0.0000,1.0000
ENDMES
D(CRD4) = DATSET/FA(PLN3), YDIR, YORIG, FA(LN2), ZDIR, XORIG, FA(PT2), ZORIG
D(CRD4) = TRANS/YORIG, -0, XORIG, -0, ZORIG, -0
MODE/PROG,MAN
F(PLN4)=FEAT/PLANE,CART,-13.7079,0.0000,0.9635,-0.0000,1.0000,-0.0000
SNSET/APPRCH, 1.0000
SNSET/RETRCT, 1.0000
SNSET/DEPTH, 0.0000
SNSET/SEARCH, 10.0000
SNSET/CLRSRF, F(PLN4), 12
F(点A1) = FEAT/POINT,CART, -0.7,-0.05,7.23, -0.0000023,1,0
F(点A2) = FEAT/POINT,CART, -10.32,-0.05,7.23, -0.0000023,1,0
F(点A3) = FEAT/POINT,CART, -0.7,-0.05,2.57, -0.0000023,1,0
F(点A4) = FEAT/POINT,CART, -10.32,0,2.57, -0.0000023,1,0
F(点A5) = FEAT/POINT,CART, -0.7,-0.05,-3.69, -0.0000023,1,0
F(点A6) = FEAT/POINT,CART, -5.65,0,-3.69, -0.0000023,1,0
F(点A7) = FEAT/POINT,CART, -10.32,0,-1.5, -0.0000023,1,0
F(点A12) = FEAT/POINT,CART, -18.01,0,-2.03, -0.0000023,1,0
F(点A11) = FEAT/POINT,CART, -13.13,0,-4.93, -0.0000023,1,0
F(点A18) = FEAT/POINT,CART, -10.22,0,-9.81, -0.0000023,1,0
F(点A13) = FEAT/POINT,CART, -22.89,0,-4.93, -0.0000023,1,0
F(点A8) = FEAT/POINT,CART, -25.92,0,-1.5, -0.0000023,1,0
F(点A14) = FEAT/POINT,CART, -25.8,0,-9.81, -0.0000023,1,0
F(点A17) = FEAT/POINT,CART, -13.13,0,-14.69, -0.0000023,1,0
F(点A15) = FEAT/POINT,CART, -22.89,0,-14.69, -0.0000023,1,0
F(点A16) = FEAT/POINT,CART, -18.01,0,-17.6, -0.0000023,1,0
F(点A10) = FEAT/POINT,CART, -25.92,0,-17.96, -0.0000023,1,0
F(点A9) = FEAT/POINT,CART, -10.11,0,-17.96, -0.0000023,1,0
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -0.7000, 0.5882, 7.2300
MEAS/POINT, F(点A1), 1
GOTO/CART, -0.7000,12.2382,7.2300
PTMEAS/CART, -0.7000,-0.0500,7.2300,-0.0000,1.0000,0.0000
ENDMES
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -10.3200, 0.5882, 7.2300
MEAS/POINT, F(点A2), 1
GOTO/CART, -10.3200,12.2382,7.2300
PTMEAS/CART, -10.3200,-0.0500,7.2300,-0.0000,1.0000,0.0000
ENDMES
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -0.7000, 0.5882, 2.5700
MEAS/POINT, F(点A3), 1
GOTO/CART, -0.7000,12.2382,2.5700
PTMEAS/CART, -0.7000,-0.0500,2.5700,-0.0000,1.0000,0.0000
ENDMES
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -10.3200, 0.6382, 2.5700
MEAS/POINT, F(点A4), 1
GOTO/CART, -10.3200,12.2382,2.5700
PTMEAS/CART, -10.3200,0.0000,2.5700,-0.0000,1.0000,0.0000
ENDMES
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -0.7000, 0.5882, -3.6900
MEAS/POINT, F(点A5), 1
GOTO/CART, -0.7000,12.2382,-3.6900
PTMEAS/CART, -0.7000,-0.0500,-3.6900,-0.0000,1.0000,0.0000
ENDMES
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -5.6500, 0.6382, -3.6900
MEAS/POINT, F(点A6), 1
GOTO/CART, -5.6500,12.2382,-3.6900
PTMEAS/CART, -5.6500,0.0000,-3.6900,-0.0000,1.0000,0.0000
ENDMES
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -10.3200, 0.6382, -1.5000
MEAS/POINT, F(点A7), 1
GOTO/CART, -10.3200,12.2382,-1.5000
PTMEAS/CART, -10.3200,0.0000,-1.5000,-0.0000,1.0000,0.0000
ENDMES
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -18.0100, 0.6382, -2.0300
MEAS/POINT, F(点A12), 1
GOTO/CART, -18.0100,12.2382,-2.0300
PTMEAS/CART, -18.0100,0.0000,-2.0300,-0.0000,1.0000,0.0000
ENDMES
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -13.1300, 0.6382, -4.9300
MEAS/POINT, F(点A11), 1
GOTO/CART, -13.1300,12.2382,-4.9300
PTMEAS/CART, -13.1300,0.0000,-4.9300,-0.0000,1.0000,0.0000
ENDMES
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -10.2200, 0.6382, -9.8100
MEAS/POINT, F(点A18), 1
GOTO/CART, -10.2200,12.2382,-9.8100
PTMEAS/CART, -10.2200,0.0000,-9.8100,-0.0000,1.0000,0.0000
ENDMES
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -22.8900, 0.6382, -4.9300
MEAS/POINT, F(点A13), 1
GOTO/CART, -22.8900,12.2382,-4.9300
PTMEAS/CART, -22.8900,0.0000,-4.9300,-0.0000,1.0000,0.0000
ENDMES
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -25.9200, 0.6382, -1.5000
MEAS/POINT, F(点A8), 1
GOTO/CART, -25.9200,12.2382,-1.5000
PTMEAS/CART, -25.9200,0.0000,-1.5000,-0.0000,1.0000,0.0000
ENDMES
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -25.8000, 0.6382, -9.8100
MEAS/POINT, F(点A14), 1
GOTO/CART, -25.8000,12.2382,-9.8100
PTMEAS/CART, -25.8000,0.0000,-9.8100,-0.0000,1.0000,0.0000
ENDMES
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -13.1300, 0.6382, -14.6900
MEAS/POINT, F(点A17), 1
GOTO/CART, -13.1300,12.2382,-14.6900
PTMEAS/CART, -13.1300,0.0000,-14.6900,-0.0000,1.0000,0.0000
ENDMES
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -22.8900, 0.6382, -14.6900
MEAS/POINT, F(点A15), 1
GOTO/CART, -22.8900,12.2382,-14.6900
PTMEAS/CART, -22.8900,0.0000,-14.6900,-0.0000,1.0000,0.0000
ENDMES
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -18.0100, 0.6382, -17.6000
MEAS/POINT, F(点A16), 1
GOTO/CART, -18.0100,12.2382,-17.6000
PTMEAS/CART, -18.0100,0.0000,-17.6000,-0.0000,1.0000,0.0000
ENDMES
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -25.9200, 0.6382, -17.9600
MEAS/POINT, F(点A10), 1
GOTO/CART, -25.9200,12.2382,-17.9600
PTMEAS/CART, -25.9200,0.0000,-17.9600,-0.0000,1.0000,0.0000
ENDMES
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -10.1100, 0.6382, -17.9600
MEAS/POINT, F(点A9), 1
GOTO/CART, -10.1100,12.2382,-17.9600
PTMEAS/CART, -10.1100,-0.0000,-17.9600,-0.0000,1.0000,0.0000
ENDMES
F(平面_A)=FEAT/PLANE,CART,-13.597,0,-5.844,0.0000,1.0000,0.000
CONST/PLANE,F(平面_A),BF,FA(点A1),FA(点A2),FA(点A3),FA(点A4),FA(点A5),FA(点A6),FA(点A7),FA(点A12),FA(点A11),FA(点A18),FA(点A13),FA(点A8),FA(点A14),FA(点A17),FA(点A15),FA(点A16),FA(点A10),FA(点A9)
D(CRD5) = DATSET/FA(平面_A), YDIR
D(CRD5) = TRANS/YORIG, FA(平面_A)
SNSET/APPRCH, 0.5
SNSET/RETRCT, 0.5
SNSET/DEPTH, 0.0000
SNSET/SEARCH, 10.0000
SNSET/CLRSRF, F(PLN2), 30.0000
F(点C1) = FEAT/POINT,CART, -15.05,-0.6,0, 0,-0.0000004,1
F(点C2) = FEAT/POINT,CART, -15.05,-2.96,0, 0,-0.0000004,1
F(点C3) = FEAT/POINT,CART, -17.38,-0.6,0, 0,-0.0000004,1
F(点C4) = FEAT/POINT,CART, -17.38,-2.96,0, 0,-0.0000004,1
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -15.0500, -0.6000, 0.6382
MEAS/POINT, F(点C1), 1
GOTO/CART, -15.0657,12.2818,0.6251
PTMEAS/CART, -15.0500,-0.6000,0.0000,0.0000,-0.0000,1.0000
ENDMES
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -15.0500, -2.9600, 0.6382
MEAS/POINT, F(点C2), 1
GOTO/CART, -15.0686,12.2818,0.6227
PTMEAS/CART, -15.0500,-2.9600,0.0000,0.0000,-0.0000,1.0000
ENDMES
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -17.3800, -0.6000, 0.6382
MEAS/POINT, F(点C3), 1
GOTO/CART, -17.3957,12.2790,0.6251
PTMEAS/CART, -17.3800,-0.6000,0.0000,0.0000,-0.0000,1.0000
ENDMES
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -17.3800, -2.9600, 0.6382
MEAS/POINT, F(点C4), 1
GOTO/CART, -17.3986,12.2790,0.6227
PTMEAS/CART, -17.3800,-2.9600,0.0000,0.0000,-0.0000,1.0000
ENDMES
F(基准平面_C)=FEAT/PLANE,CART,-16.2150,-1.7800,0.0000,-0.0000,0.0000,1.0000
CONST/PLANE,F(基准平面_C),BF,FA(点C1),FA(点C2),FA(点C3),FA(点C4)
F(点B1) = FEAT/POINT,CART, 0,-2.06,4.34, 1,0,0
F(点B2) = FEAT/POINT,CART, 0,-0.6,4.34, 1,0,0
F(点B3) = FEAT/POINT,CART, 0,-2.06,2.27, 1,0,0
F(点B4) = FEAT/POINT,CART, 0,-0.6,2.27, 1,0,0
F(点B5) = FEAT/POINT,CART, 0,-2.46,-13.67, 1,0,0
F(点B6) = FEAT/POINT,CART, 0,-0.6,-13.67, 1,0,0
F(点B7) = FEAT/POINT,CART, 0,-2.46,-15.05, 1,0,0
F(点B8) = FEAT/POINT,CART, 0,-0.6,-15.05, 1,0,0
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, 0.6382, -2.0600, 4.3400
MEAS/POINT, F(点B1), 1
GOTO/CART, 0.6207,12.3047,4.3254
PTMEAS/CART, 0.0000,-2.0600,4.3400,1.0000,-0.0000,0.0000
ENDMES
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, 0.6382, -0.6000, 4.3400
MEAS/POINT, F(点B2), 1
GOTO/CART, 0.6225,12.3047,4.3269
PTMEAS/CART, 0.0000,-0.6000,4.3400,1.0000,-0.0000,0.0000
ENDMES
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, 0.6382, -2.0600, 2.2700
MEAS/POINT, F(点B3), 1
GOTO/CART, 0.6207,12.3026,2.2554
PTMEAS/CART, 0.0000,-2.0600,2.2700,1.0000,-0.0000,0.0000
ENDMES
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, 0.6382, -0.6000, 2.2700
MEAS/POINT, F(点B4), 1
GOTO/CART, 0.6225,12.3026,2.2569
PTMEAS/CART, 0.0000,-0.6000,2.2700,1.0000,-0.0000,0.0000
ENDMES
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, 0.6382, -2.4600, -13.6700
MEAS/POINT, F(点B5), 1
GOTO/CART, 0.6202,12.2864,-13.6850
PTMEAS/CART, 0.0000,-2.4600,-13.6700,1.0000,-0.0000,0.0000
ENDMES
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, 0.6382, -0.6000, -13.6700
MEAS/POINT, F(点B6), 1
GOTO/CART, 0.6225,12.2864,-13.6831
PTMEAS/CART, 0.0000,-0.6000,-13.6700,1.0000,-0.0000,0.0000
ENDMES
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, 0.6382, -2.4600, -15.0500
MEAS/POINT, F(点B7), 1
GOTO/CART, 0.6202,12.2850,-15.0649
PTMEAS/CART, 0.0000,-2.4600,-15.0500,1.0000,-0.0000,0.0000
ENDMES
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, 0.6382, -0.6000, -15.0500
MEAS/POINT, F(点B8), 1
GOTO/CART, 0.6225,12.2850,-15.0631
PTMEAS/CART, 0.0000,-0.6000,-15.0500,1.0000,-0.0000,0.0000
ENDMES
F(基准平面_B)=FEAT/PLANE,CART,0.0000,-1.4300,-5.5275,1.0000,-0.0000,-0.0000
CONST/PLANE,F(基准平面_B),BF,FA(点B1),FA(点B2),FA(点B3),FA(点B4),FA(点B5),FA(点B6),FA(点B7),FA(点B8)
D(ABC) = DATSET/FA(平面_A), YDIR, FA(基准平面_B), XDIR, XORIG, FA(基准平面_C), ZORIG
D(ABC) = TRANS/YORIG, FA(平面_A), XORIG, -0, ZORIG, -0
MODE/PROG,MAN
SNSET/APPRCH, 0.4000
SNSET/RETRCT, 0.4000
SNSET/DEPTH, 0.0000
SNSET/SEARCH, 10.0000
SNSET/CLRSRF, F(PLN4), 12
F(点501) = FEAT/POINT,CART, -4.5,-2.11,-12.5, -0.0000015,1,0.0000004
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -4.5000, -1.4718, -12.5000
MEAS/POINT, F(点501), 1
GOTO/CART, -4.5000,12.2382,-12.5000
PTMEAS/CART, -4.5000,-2.1100,-12.5000,-0.0000,1.0000,0.0000
ENDMES
DECL/COMMON,REAL,V__501_Y
V__501_Y = OBTAIN/FA(点501),4
F(点502) = FEAT/POINT,CART, -0.6,V__501_Y+1.6,-7.5, -1,0,0
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -1.2382, -0.5377, -7.5000
MEAS/POINT, F(点502), 1
GOTO/CART, -1.2382,12.2382,-7.5000
PTMEAS/CART, -0.6000,V__501_Y+1.6,-7.5000,-1.0000,0.0000,0.0000
ENDMES
F(点503) = FEAT/POINT,CART, -2.2,V__501_Y+1.6,-5.78, 0,0,-1
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -2.2000, -0.5377, -6.4182
MEAS/POINT, F(点503), 1
GOTO/CART, -2.2000,12.2382,-6.4182
PTMEAS/CART, -2.2000,V__501_Y+1.6,-5.7800,0.0000,-0.0000,-1.0000
ENDMES
F(点504) = FEAT/POINT,CART, -6.6,V__501_Y+1.6,-5.78, 0,0,-1
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -6.6000, -0.5377, -6.4182
MEAS/POINT, F(点504), 1
GOTO/CART, -6.6000,12.2382,-6.4182
PTMEAS/CART, -6.6000,V__501_Y+1.6,-5.7800,0.0000,-0.0000,-1.0000
ENDMES
F(点505) = FEAT/POINT,CART, -7.991,V__501_Y+1.6,-9.5, 1,0,0
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -7.3528, -0.5377, -9.5000
MEAS/POINT, F(点505), 1
GOTO/CART, -7.3528,12.2382,-9.5000
PTMEAS/CART, -7.9910,V__501_Y+1.6,-9.5000,1.0000,-0.0000,0.0000
ENDMES
F(点506) = FEAT/POINT,CART, -7.991,V__501_Y+1.6,-13.6, 1,0,0
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -7.3528, -0.5377, -13.6000
MEAS/POINT, F(点506), 1
GOTO/CART, -7.3528,12.2382,-13.6000
PTMEAS/CART, -7.9910,V__501_Y+1.6,-13.6000,1.0000,-0.0000,0.0000
ENDMES
F(点507) = FEAT/POINT,CART, -8.739,V__501_Y+1.6,-17.2, 1,0,0
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -8.1008, -0.5377, -17.2000
MEAS/POINT, F(点507), 1
GOTO/CART, -8.1008,12.2382,-17.2000
PTMEAS/CART, -8.7390,V__501_Y+1.6,-17.2000,1.0000,-0.0000,0.0000
ENDMES
F(点508) = FEAT/POINT,CART, -7.2,V__501_Y+0.45,-18.862, 0,0,1
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -7.2000, -1.6877, -18.2238
MEAS/POINT, F(点508), 1
GOTO/CART, -7.2000,12.2382,-18.2238
PTMEAS/CART, -7.2000,V__501_Y+0.45,-18.8620,0.0000,0.0000,1.0000
ENDMES
F(点509) = FEAT/POINT,CART, -4.2,V__501_Y+0.45,-18.862, 0,0,1
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -4.2000, -1.6877, -18.2238
MEAS/POINT, F(点509), 1
GOTO/CART, -4.2000,12.2382,-18.2238
PTMEAS/CART, -4.2000,V__501_Y+0.45,-18.8620,0.0000,0.0000,1.0000
ENDMES
F(点510) = FEAT/POINT,CART, -0.6,V__501_Y+1.6,-14, -1,0,0
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -1.2382, -0.5377, -14.0000
MEAS/POINT, F(点510), 1
GOTO/CART, -1.2382,12.2382,-14.0000
PTMEAS/CART, -0.6000,V__501_Y+1.6,-14.0000,-1.0000,0.0000,0.0000
ENDMES
D(A501) = TRANS/XORIG, FA(点510), ZORIG, FA(点509)
D(A502) = TRANS/XORIG, -1, ZORIG, 3.004
F(点511) = FEAT/POINT,CART, 0.997,V__501_Y+0.45,-0.084, -0.9965104,0,0.0834687
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, 0.3610, -1.6877, -0.0307
MEAS/POINT, F(点511), 1
GOTO/CART, 0.3610,12.2382,-0.0307
PTMEAS/CART, 0.9970,V__501_Y+0.45,-0.0840,-0.9965,-0.0000,0.0835
ENDMES
F(点512) = FEAT/POINT,CART, 0.918,V__501_Y+0.45,-0.398, -0.9176573,0,0.3973728
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, 0.3324, -1.6877, -0.1444
MEAS/POINT, F(点512), 1
GOTO/CART, 0.3324,12.2382,-0.1444
PTMEAS/CART, 0.9180,V__501_Y+0.45,-0.3980,-0.9177,0.0000,0.3974
ENDMES
DECL/COMMON,REAL,V__512_Y
V__512_Y = OBTAIN/FA(点512),4
F(点513) = FEAT/POINT,CART, 0.762,V__501_Y+0.45,-0.648, -0.7619818,0,0.6475984
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, 0.2757, -1.6877, -0.2347
MEAS/POINT, F(点513), 1
GOTO/CART, 0.2757,12.2382,-0.2347
PTMEAS/CART, 0.7620,V__501_Y+0.45,-0.6480,-0.7620,-0.0000,0.6476
ENDMES
RECALL/D(A501)
D(A503) = TRANS/XORIG, -3.004, ZORIG, 1
F(点514) = FEAT/POINT,CART, 0.651,V__501_Y+0.45,-0.759, -0.6511327,0,0.7589639
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, 0.2355, -1.6877, -0.2746
MEAS/POINT, F(点514), 1
GOTO/CART, 0.2355,12.2382,-0.2746
PTMEAS/CART, 0.6510,V__501_Y+0.45,-0.7590,-0.6511,-0.0000,0.7590
ENDMES
F(点515) = FEAT/POINT,CART, 0.378,V__501_Y+0.45,-0.926, -0.3778798,0,0.9258547
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, 0.1368, -1.6877, -0.3351
MEAS/POINT, F(点515), 1
GOTO/CART, 0.1368,12.2382,-0.3351
PTMEAS/CART, 0.3780,V__501_Y+0.45,-0.9260,-0.3779,-0.0000,0.9259
ENDMES
DECL/COMMON,REAL,V__515_Y
V__515_Y = OBTAIN/FA(点515),4
F(点516) = FEAT/POINT,CART, 0.089,V__501_Y+0.45,-0.996, -0.0883941,0,0.9960856
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, 0.0326, -1.6877, -0.3603
MEAS/POINT, F(点516), 1
GOTO/CART, 0.0326,12.2382,-0.3603
PTMEAS/CART, 0.0890,V__501_Y+0.45,-0.9960,-0.0884,0.0000,0.9961
ENDMES
RECALL/D(ABC)
GOTO/-3.5995, 18.2848, -18.2222
F(点518)=FEAT/POINT,CART,-0.3,-0.54,-14.525,0.0000,0.000,1.0000
CONST/POINT, F(点518), MIDPT, FA(点510), FA(点B8), PTPT, NOREDUCE
DECL/COMMON,REAL,V__518_X
V__518_X = OBTAIN/FA(点518),3
F(点519) = FEAT/POINT,CART, V__518_X+0,-0.88,-15.858, 0.0000081,0.0000004,-1
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -0.3071, -0.8800, -16.4962
MEAS/POINT, F(点519), 1
GOTO/CART, -0.3071,12.2382,-16.4962
PTMEAS/CART, V__518_X+0,-0.8800,-15.8580,0.0000,0.0000,-1.0000
ENDMES
RECALL/D(ABC)
D(A504) = TRANS/XORIG, FA(点510), YORIG, FA(点501), ZORIG, FA(点519)
D(A505) = TRANS/YORIG, 1.58, ZORIG, 0.5
F(点520) = FEAT/POINT,CART, -V__518_X+0,0.119,-0.486, 0.000008,0.238091,-0.971243
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, 0.3071, 0.2709, -1.1058
MEAS/POINT, F(点520), 1
GOTO/CART, 0.3071,12.7959,-1.1058
PTMEAS/CART, -V__518_X+0,0.1190,-0.4860,0.0000,0.2381,-0.9712
ENDMES
F(点521) = FEAT/POINT,CART, -V__518_X+0,0.338,-0.369, 0.000005,0.6752193,-0.737617
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, 0.3071, 0.7689, -0.8397
MEAS/POINT, F(点521), 1
GOTO/CART, 0.3071,12.7959,-0.8397
PTMEAS/CART, -V__518_X+0,0.3380,-0.3690,0.0000,0.6752,-0.7376
ENDMES
DECL/COMMON,REAL,V__521_X
V__521_X = OBTAIN/FA(点521),3
F(点522) = FEAT/POINT,CART, -V__518_X+0,0.477,-0.151, 0.000001,0.9531901,-0.3023718
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, 0.3071, 1.0853, -0.3440
MEAS/POINT, F(点522), 1
GOTO/CART, 0.3071,12.7959,-0.3440
PTMEAS/CART, -V__518_X+0,0.4770,-0.1510,0.0000,0.9532,-0.3024
ENDMES
RECALL/D(ABC)
F(点530) = FEAT/POINT,CART, -4.005,V__501_Y+0.1,-19.462, 0.0000081,0.0000004,-1
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -4.0050, -2.0377, -20.1002
MEAS/POINT, F(点530), 1
GOTO/CART, -4.0050,12.2382,-20.1002
PTMEAS/CART, -4.0050,V__501_Y+0.1,-19.4620,0.0000,0.0000,-1.0000
ENDMES
RECALL/D(ABC)
GOTO/-4.0189, 27.9349, -20.1001
GOTO/-4.0328, 27.9061, 129.8987
SNSLCT/S(10-D0.5L20_A90_B180)
GOTO/-1.2850, -25.6557, 129.4064
GOTO/-25.0000, -25.0000, 0.0000
F(点G1) = FEAT/POINT,CART, -24.73,-0.13,-3.1, 0.0000015,-1,-0.0000004
F(PLN5)=FEAT/PLANE,CART,-18.0108,-4.0000,-7.9239,0.0000,-1.0000,0.0000
SNSET/APPRCH, 0.4000
SNSET/RETRCT, 0.4000
SNSET/DEPTH, 0.0000
SNSET/SEARCH, 10.0000
SNSET/CLRSRF, F(PLN5), 12.0000
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -24.7300, -0.7687, -3.1000
MEAS/POINT, F(点G1), 1
GOTO/CART, -24.7300,-16.2387,-3.1000
PTMEAS/CART, -24.7300,-0.1300,-3.1000,0.0000,-1.0000,-0.0000
ENDMES
F(点G2) = FEAT/POINT,CART, -22.89,-0.13,-4.93, 0.0000015,-1,-0.0000004
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -22.8900, -0.7687, -4.9300
MEAS/POINT, F(点G2), 1
GOTO/CART, -22.8900,-16.2387,-4.9300
PTMEAS/CART, -22.8900,-0.1300,-4.9300,0.0000,-1.0000,-0.0000
ENDMES
F(点G12) = FEAT/POINT,CART, -18.01,-0.13,-2.03, 0.0000015,-1,-0.0000004
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -18.0100, -0.7687, -2.0300
MEAS/POINT, F(点G12), 1
GOTO/CART, -18.0100,-16.2387,-2.0300
PTMEAS/CART, -18.0100,-0.1300,-2.0300,0.0000,-1.0000,-0.0000
ENDMES
F(点G11) = FEAT/POINT,CART, -11.29,-0.13,-3.1, 0.0000015,-1,-0.0000004
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -11.2900, -0.7687, -3.1000
MEAS/POINT, F(点G11), 1
GOTO/CART, -11.2900,-16.2387,-3.1000
PTMEAS/CART, -11.2900,-0.1300,-3.1000,0.0000,-1.0000,-0.0000
ENDMES
F(点G10) = FEAT/POINT,CART, -13.13,-0.13,-4.93, 0.0000015,-1,-0.0000004
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -13.1300, -0.7687, -4.9300
MEAS/POINT, F(点G10), 1
GOTO/CART, -13.1300,-16.2387,-4.9300
PTMEAS/CART, -13.1300,-0.1300,-4.9300,0.0000,-1.0000,-0.0000
ENDMES
F(点G9) = FEAT/POINT,CART, -10.22,-0.13,-9.81, 0.0000015,-1,-0.0000004
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -10.2200, -0.7687, -9.8100
MEAS/POINT, F(点G9), 1
GOTO/CART, -10.2200,-16.2387,-9.8100
PTMEAS/CART, -10.2200,-0.1300,-9.8100,0.0000,-1.0000,-0.0000
ENDMES
F(点G7) = FEAT/POINT,CART, -11.29,-0.13,-16.53, 0.0000015,-1,-0.0000004
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -11.2900, -0.7687, -16.5300
MEAS/POINT, F(点G7), 1
GOTO/CART, -11.2900,-16.2387,-16.5300
PTMEAS/CART, -11.2900,-0.1300,-16.5300,0.0000,-1.0000,-0.0000
ENDMES
F(点G8) = FEAT/POINT,CART, -13.13,-0.13,-14.69, 0.0000015,-1,-0.0000004
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -13.1300, -0.7687, -14.6900
MEAS/POINT, F(点G8), 1
GOTO/CART, -13.1300,-16.2387,-14.6900
PTMEAS/CART, -13.1300,-0.1300,-14.6900,0.0000,-1.0000,-0.0000
ENDMES
F(点G6) = FEAT/POINT,CART, -18.01,-0.13,-17.6, 0.0000015,-1,-0.0000004
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -18.0100, -0.7687, -17.6000
MEAS/POINT, F(点G6), 1
GOTO/CART, -18.0100,-16.2387,-17.6000
PTMEAS/CART, -18.0100,-0.1300,-17.6000,0.0000,-1.0000,-0.0000
ENDMES
F(点G4) = FEAT/POINT,CART, -24.73,-0.13,-16.53, 0.0000015,-1,-0.0000004
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -24.7300, -0.7687, -16.5300
MEAS/POINT, F(点G4), 1
GOTO/CART, -24.7300,-16.2387,-16.5300
PTMEAS/CART, -24.7300,-0.1300,-16.5300,0.0000,-1.0000,-0.0000
ENDMES
F(点G5) = FEAT/POINT,CART, -22.89,-0.13,-14.69, 0.0000015,-1,-0.0000004
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -22.8900, -0.7687, -14.6900
MEAS/POINT, F(点G5), 1
GOTO/CART, -22.8900,-16.2387,-14.6900
PTMEAS/CART, -22.8900,-0.1300,-14.6900,0.0000,-1.0000,-0.0000
ENDMES
F(点G3) = FEAT/POINT,CART, -25.8,-0.13,-9.81, 0.0000015,-1,-0.0000004
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -25.8000, -0.7687, -9.8100
MEAS/POINT, F(点G3), 1
GOTO/CART, -25.8000,-16.2387,-9.8100
PTMEAS/CART, -25.8000,-0.1300,-9.8100,0.0000,-1.0000,-0.0000
ENDMES
F(点T8) = FEAT/POINT,CART, -4.69,-2.41,-16.05, 0.0000015,-1,-0.0000004
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -4.6900, -3.0487, -16.0500
MEAS/POINT, F(点T8), 1
GOTO/CART, -4.6900,-16.2387,-16.0500
PTMEAS/CART, -4.6900,-2.4100,-16.0500,0.0000,-1.0000,-0.0000
ENDMES
F(点T9) = FEAT/POINT,CART, -2.5,-2.41,-16.05, 0.0000015,-1,-0.0000004
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -2.5000, -3.0487, -16.0500
MEAS/POINT, F(点T9), 1
GOTO/CART, -2.5000,-16.2387,-16.0500
PTMEAS/CART, -2.5000,-2.4100,-16.0500,0.0000,-1.0000,-0.0000
ENDMES
F(点T7) = FEAT/POINT,CART, -2.5,-2.41,-13.09, 0.0000015,-1,-0.0000004
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -2.5000, -3.0487, -13.0900
MEAS/POINT, F(点T7), 1
GOTO/CART, -2.5000,-16.2387,-13.0900
PTMEAS/CART, -2.5000,-2.4100,-13.0900,0.0000,-1.0000,-0.0000
ENDMES
F(点T6) = FEAT/POINT,CART, -6.24,-2.41,-13.09, 0.0000015,-1,-0.0000004
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -6.2400, -3.0487, -13.0900
MEAS/POINT, F(点T6), 1
GOTO/CART, -6.2400,-16.2387,-13.0900
PTMEAS/CART, -6.2400,-2.4100,-13.0900,0.0000,-1.0000,-0.0000
ENDMES
F(点T5) = FEAT/POINT,CART, -2.5,-2.41,-10.14, 0.0000015,-1,-0.0000004
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -2.5000, -3.0487, -10.1400
MEAS/POINT, F(点T5), 1
GOTO/CART, -2.5000,-16.2387,-10.1400
PTMEAS/CART, -2.5000,-2.4100,-10.1400,0.0000,-1.0000,-0.0000
ENDMES
F(点T4) = FEAT/POINT,CART, -6.24,-2.41,-10.14, 0.0000015,-1,-0.0000004
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -6.2400, -3.0487, -10.1400
MEAS/POINT, F(点T4), 1
GOTO/CART, -6.2400,-16.2387,-10.1400
PTMEAS/CART, -6.2400,-2.4100,-10.1400,0.0000,-1.0000,-0.0000
ENDMES
F(点T2) = FEAT/POINT,CART, -4.69,-2.41,-7.18, 0.0000015,-1,-0.0000004
F(点T3) = FEAT/POINT,CART, -2.5,-2.41,-7.18, 0.0000015,-1,-0.0000004
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -4.6900, -3.0487, -7.1800
MEAS/POINT, F(点T2), 1
GOTO/CART, -4.6900,-16.2387,-7.1800
PTMEAS/CART, -4.6900,-2.4100,-7.1800,0.0000,-1.0000,-0.0000
ENDMES
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -2.5000, -3.0487, -7.1800
MEAS/POINT, F(点T3), 1
GOTO/CART, -2.5000,-16.2387,-7.1800
PTMEAS/CART, -2.5000,-2.4100,-7.1800,0.0000,-1.0000,-0.0000
ENDMES
F(点54) = FEAT/POINT,CART, -3.8,-1.8,-2.453, 0,0,1
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -3.8000, -1.8000, -1.8143
MEAS/POINT, F(点54), 1
GOTO/CART, -3.8000,-16.2387,-1.8143
PTMEAS/CART, -3.8000,-1.8000,-2.4530,0.0000,0.0000,1.0000
ENDMES
DECL/COMMON,REAL,V__54_Z
V__54_Z = OBTAIN/FA(点54),5
F(点T1) = FEAT/POINT,CART, -4.69,-2.41,V__54_Z-0.347, 0.0000015,-1,-0.0000004
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -4.6900, -3.0487, -2.8000
MEAS/POINT, F(点T1), 1
GOTO/CART, -4.6900,-16.2387,-2.8000
PTMEAS/CART, -4.6900,-2.4100,V__54_Z-0.347,0.0000,-1.0000,-0.0000
ENDMES
RECALL/D(ABC)
DECL/COMMON,REAL,V__T9_Y
V__T9_Y = OBTAIN/FA(点T9),4
F(点O1) = FEAT/POINT,CART, -2.295,V__T9_Y+0.45,-18.816, 0.7071125,0.0000013,-0.7071011
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -1.8433, -1.9875, -19.2677
MEAS/POINT, F(点O1), 1
GOTO/CART, -1.8433,-16.2387,-19.2677
PTMEAS/CART, -2.2950,V__T9_Y+0.45,-18.8160,0.7071,0.0000,-0.7071
ENDMES
F(点O2) = FEAT/POINT,CART, -1.446,V__T9_Y+0.45,-17.966, 0.7071125,0.0000013,-0.7071011
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -0.9943, -1.9875, -18.4177
MEAS/POINT, F(点O2), 1
GOTO/CART, -0.9943,-16.2387,-18.4177
PTMEAS/CART, -1.4460,V__T9_Y+0.45,-17.9660,0.7071,0.0000,-0.7071
ENDMES
F(点O3) = FEAT/POINT,CART, -0.579,V__T9_Y+0.45,-17.1, 0.7071125,0.0000013,-0.7071011
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -0.1273, -1.9875, -17.5517
MEAS/POINT, F(点O3), 1
GOTO/CART, -0.1273,-16.2387,-17.5517
PTMEAS/CART, -0.5790,V__T9_Y+0.45,-17.1000,0.7071,0.0000,-0.7071
ENDMES
RECALL/D(ABC)
F(点F1) = FEAT/POINT,CART, -1.97,-0.267,6.24, 0.0000015,-1,-0.0000004
F(点F2) = FEAT/POINT,CART, -1.97,-0.267,-1.45, 0.0000015,-1,-0.0000004
F(点F3) = FEAT/POINT,CART, -8.29,-0.267,-1.45, 0.0000015,-1,-0.0000004
F(点F4) = FEAT/POINT,CART, -9.35,-0.267,6.24, 0.0000015,-1,-0.0000004
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -1.9700, -0.9057, 6.2400
MEAS/POINT, F(点F1), 1
GOTO/CART, -1.9700,-16.2387,6.2400
PTMEAS/CART, -1.9700,-0.2670,6.2400,0.0000,-1.0000,-0.0000
ENDMES
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -1.9700, -0.9057, -1.4500
MEAS/POINT, F(点F2), 1
GOTO/CART, -1.9700,-16.2387,-1.4500
PTMEAS/CART, -1.9700,-0.2670,-1.4500,0.0000,-1.0000,-0.0000
ENDMES
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -8.2900, -0.9057, -1.4500
MEAS/POINT, F(点F3), 1
GOTO/CART, -8.2900,-16.2387,-1.4500
PTMEAS/CART, -8.2900,-0.2670,-1.4500,0.0000,-1.0000,-0.0000
ENDMES
$$ CALL/M(EASI_CLEARPLN_GOTO), 0, -9.3500, -0.9057, 6.2400
MEAS/POINT, F(点F4), 1
GOTO/CART, -9.3500,-16.2387,6.2400
PTMEAS/CART, -9.3500,-0.2670,6.2400,0.0000,-1.0000,-0.0000
ENDMES
GOTO/-9.3650, -25.9341, 6.2400
GOTO/-9.3800, -25.9611, 256.2389
SNSLCT/S(10-D0.5L20_A90_B0)
$$ Set.Term.Delete
$$ 报告2022 4-22
DID(NAN) = DEVICE/STOR,'C:\RationalDMIS64\Output\LY2022.xlsm'
ASSOCIATE/DID(NAN),EXCEL,TEMP,'C:\RationalDMIS64\templates\2022 4-22.tet'
OPEN/DID(NAN), FDATA, V(DEFAULTFORMAT), OUTPUT, APPEND
DMESW/COMAND,'ProfTol/ISO1101'
F(平面G)=FEAT/PLANE,CART,-18.0100,-0.1300,-9.812,-0.0000,-1.0000,0.0000
CONST/PLANE,F(平面G),BF,FA(点G1),FA(点G2),FA(点G12),FA(点G11),FA(点G10),FA(点G9),FA(点G7),FA(点G8),FA(点G6),FA(点G4),FA(点G5),FA(点G3)
F(平面_F)=FEAT/PLANE,CART,-5.3950,-0.2670,2.3950,0.0000,-1.0000,0.0000
CONST/PLANE,F(平面_F),BF,FA(点F1),FA(点F2),FA(点F3),FA(点F4)
F(平面_A)=FEAT/PLANE,CART,-13.597,0,-5.844,0.0000,1.0000,0.000
F(基准平面_B)=FEAT/PLANE,CART,0.0000,-1.4300,-5.5275,1.0000,-0.0000,-0.0000
F(基准平面_C)=FEAT/PLANE,CART,-16.2150,-1.7800,0.0000,-0.0000,0.0000,1.0000
DATDEF/FA(平面_A), DAT(A)
T(FAI76_1)=TOL/DISTB,NOMINL,0.6000,-0.0400,0.0200,XAXIS,AVG
OUTPUT/FA(点502),FA(基准平面_B),TA(FAI76_1)
T(FAI76_2)=TOL/DISTB,NOMINL,0.6000,-0.0400,0.0200,XAXIS,AVG
OUTPUT/FA(点510),FA(基准平面_B),TA(FAI76_2)
T(FAI97_1)=TOL/DISTB,NOMINL,7.9910,-0.0300,0.0300,XAXIS,AVG
OUTPUT/FA(点505),FA(基准平面_B),TA(FAI97_1)
T(FAI97_2)=TOL/DISTB,NOMINL,7.9910,-0.0300,0.0300,XAXIS,AVG
OUTPUT/FA(点506),FA(基准平面_B),TA(FAI97_2)
T(FAI78)=TOL/DISTB,NOMINL,8.7390,-0.0300,0.0300,XAXIS,AVG
OUTPUT/FA(点507),FA(基准平面_B),TA(FAI78)
F(直线3)=FEAT/LINE,BND,CART,-0.6000,-0.51,-14.0000,-0.6000,-0.51,-7.5000,-1.0000,0.0000,0.0000
CALL/M(EASI_2PT_TO_LINE),(点510),(点502),(LN_BF3), -1.0000, 0.0000, 0.0000
CONST/LINE,F(直线3),BF,FA(点510),FA(点502)
F(直线4)=FEAT/LINE,BND,CART,-7.9910,-0.51,-13.6000,-7.9910,-0.51,-9.5000,1.0000,-0.0000,-0.0000
CALL/M(EASI_2PT_TO_LINE),(点506),(点505),(LN_BF1), 1.0000, -0.0000, -0.0000
CONST/LINE,F(直线4),BF,FA(点506),FA(点505)
T(ADD4)=TOL/DISTB,NOMINL,7.3910,-0.0100,0.0200,XAXIS,AVG
OUTPUT/FA(直线3),FA(直线4),TA(ADD4)
F(直线5)=FEAT/LINE,BND,CART,-2.2000,-0.51,-5.7800,-6.6000,-0.51,-5.7800,0.0000,-0.0000,-1.0000
CALL/M(EASI_2PT_TO_LINE),(点503),(点504),(LN_BF1), 0.0000, -0.0000, -1.0000
CONST/LINE,F(直线5),BF,FA(点503),FA(点504)
F(直线6)=FEAT/LINE,BND,CART,-4.2000,-1.66,-18.8620,-7.2000,-1.66,-18.8620,-0.0000,0.0000,1.0000
CALL/M(EASI_2PT_TO_LINE),(点509),(点508),(LN_BF2), -0.0000, 0.0000, 1.0000
CONST/LINE,F(直线6),BF,FA(点509),FA(点508)
T(ADD5)=TOL/DISTB,NOMINL,13.0820,-0.0100,0.0200,ZAXIS,AVG
OUTPUT/FA(直线5),FA(直线6),TA(ADD5)
T(FAI79_1)=TOL/DISTB,NOMINL,5.7800,-0.0400,0.0200,ZAXIS,AVG
OUTPUT/FA(点503),FA(基准平面_C),TA(FAI79_1)
T(FAI79_2)=TOL/DISTB,NOMINL,5.7800,-0.0400,0.0200,ZAXIS,AVG
OUTPUT/FA(点504),FA(基准平面_C),TA(FAI79_2)
T(FAI87_1)=TOL/DISTB,NOMINL,18.8620,-0.0300,0.0300,ZAXIS,AVG
OUTPUT/FA(点509),FA(基准平面_C),TA(FAI87_1)
T(FAI87_2)=TOL/DISTB,NOMINL,18.8620,-0.0300,0.0300,ZAXIS,AVG
OUTPUT/FA(点508),FA(基准平面_C),TA(FAI87_2)
T(ADD3)=TOL/DISTB,NOMINL,0.6000,-0.0400,0.0200,ZAXIS,AVG
OUTPUT/FA(点509),FA(点530),TA(ADD3)
T(FAI83)=TOL/DISTB,NOMINL,15.8580,-0.0600,0.0600,ZAXIS,AVG
OUTPUT/FA(点519),FA(基准平面_C),TA(FAI83)
RECALL/D(ABC)
RECALL/D(A502)
F(点0) = FEAT/POINT,CART, 0,0,0, 0,0,1
FA(点0) = FEAT/POINT,CART, 0,0,0, 0,0,1
F(点523)=FEAT/POINT,CART,0.0000,-1.63,0.0000,0.0000,0.0000,1.0000
CONST/POINT,F(点523),MOVEPT,FA(点0),0,V__512_Y+0,0
T(FAI80_01)=TOL/DISTB,NOMINL,1.0000,-0.0400,0.0400,PT2PT,AVG
OUTPUT/FA(点523),FA(点511),TA(FAI80_01)
T(AI80_02)=TOL/DISTB,NOMINL,1.0000,-0.0400,0.0400,PT2PT,AVG
OUTPUT/FA(点523),FA(点512),TA(AI80_02)
T(FAI80_03)=TOL/DISTB,NOMINL,1.0000,-0.0400,0.0400,PT2PT,AVG
OUTPUT/FA(点523),FA(点513),TA(FAI80_03)
DECL/COMMON,REAL,FAI80_01_ACT
FAI80_01_ACT = VALUE/TA(FAI80_01),ACT
DECL/COMMON,REAL,FAI80_02_ACT
FAI80_02_ACT = VALUE/TA(AI80_02),ACT
DECL/COMMON,REAL,FAI80_03_ACT
FAI80_03_ACT = VALUE/TA(FAI80_03),ACT
DECL/COMMON,DOUBLE,V501
V501=ASSIGN/(FAI80_01_ACT+FAI80_02_ACT+FAI80_03_ACT)/3
F(点524)=FEAT/POINT,CART,0.0000,0.0000,1,0.0000,0.0000,1.0000
CONST/POINT,F(点524),MOVEPT,FA(点0),0,0,V501
T(FAI80_1)=TOL/CORTOL,ZAXIS,-0.0400,0.0400
OUTPUT/FA(点524),TA(FAI80_1)
RECALL/D(A503)
F(点0) = FEAT/POINT,CART, 0,0,0, 0,0,1
FA(点0) = FEAT/POINT,CART, 0,0,0, 0,0,1
F(点525)=FEAT/POINT,CART,0,-1.63,0,0.0000,0.0000,1.0000
CONST/POINT,F(点525),MOVEPT,FA(点0),0,V__515_Y+0,0
T(FAI80_04)=TOL/DISTB,NOMINL,1.0000,-0.0400,0.0400,PT2PT,AVG
OUTPUT/FA(点525),FA(点514),TA(FAI80_04)
T(FAI80_05)=TOL/DISTB,NOMINL,1.0000,-0.0400,0.0400,PT2PT,AVG
OUTPUT/FA(点525),FA(点515),TA(FAI80_05)
T(FAI80_06)=TOL/DISTB,NOMINL,1.0000,-0.0400,0.0400,PT2PT,AVG
OUTPUT/FA(点525),FA(点516),TA(FAI80_06)
DECL/COMMON,DOUBLE,V502
DECL/COMMON,REAL,FAI80_04_ACT
FAI80_04_ACT = VALUE/TA(FAI80_04),ACT
DECL/COMMON,REAL,FAI80_05_ACT
FAI80_05_ACT = VALUE/TA(FAI80_05),ACT
DECL/COMMON,REAL,FAI80_06_ACT
FAI80_06_ACT = VALUE/TA(FAI80_06),ACT
V502 = ASSIGN/(FAI80_04_ACT+FAI80_05_ACT+FAI80_06_ACT)/3
F(点526)=FEAT/POINT,CART,-0.0000,0.0000,1,0.0000,0.0000,1.0000
CONST/POINT,F(点526),MOVEPT,FA(点0),0,0,V502
T(FAI80_2)=TOL/CORTOL,ZAXIS,-0.0400,0.0400
OUTPUT/FA(点526),TA(FAI80_2)
RECALL/D(A505)
F(点0) = FEAT/POINT,CART, 0,0,0, 0,0,1
FA(点0) = FEAT/POINT,CART, 0,0,0, 0,0,1
F(点527)=FEAT/POINT,CART,0.3,0,0,0.0000,0.0000,1.0000
CONST/POINT,F(点527),MOVEPT,FA(点0),V__521_X+0,0,0
T(FAI109_01)=TOL/DISTB,NOMINL,0.5000,-0.0800,0.0800,PT2PT,AVG
OUTPUT/FA(点527),FA(点520),TA(FAI109_01)
T(FAI109_02)=TOL/DISTB,NOMINL,0.5000,-0.0800,0.0800,PT2PT,AVG
OUTPUT/FA(点527),FA(点521),TA(FAI109_02)
T(FAI109_03)=TOL/DISTB,NOMINL,0.5000,-0.0800,0.0800,PT2PT,AVG
OUTPUT/FA(点527),FA(点522),TA(FAI109_03)
DECL/COMMON,DOUBLE,V503
DECL/COMMON,REAL,FAI109_01_ACT
FAI109_01_ACT = VALUE/TA(FAI109_01),ACT
DECL/COMMON,REAL,FAI109_02_ACT
FAI109_02_ACT = VALUE/TA(FAI109_02),ACT
DECL/COMMON,REAL,FAI109_03_ACT
FAI109_03_ACT = VALUE/TA(FAI109_03),ACT
V503 = ASSIGN/(FAI109_01_ACT+FAI109_02_ACT+FAI109_03_ACT)/3
F(点0) = FEAT/POINT,CART, 0,0,0, 0,0,1
FA(点0) = FEAT/POINT,CART, 0,0,0, 0,0,1
F(点528)=FEAT/POINT,CART,0.0000,0.0000,0.5,0.0000,0.0000,1.0000
CONST/POINT,F(点528),MOVEPT,FA(点0),0,0,V503
T(FAI109)=TOL/CORTOL,ZAXIS,-0.0800,0.0800
OUTPUT/FA(点528),TA(FAI109)
RECALL/D(ABC)
F(点O1)=FEAT/POINT,CART,-2.2950,-1.9875,-18.8160,0.7071,0.0000,-0.7071
F(点O2)=FEAT/POINT,CART,-1.4460,-1.9875,-17.9660,0.7071,0.0000,-0.7071
F(点O3)=FEAT/POINT,CART,-0.5790,-1.9875,-17.1000,0.7071,0.0000,-0.7071
T(FAI102_O1)=TOL/PROFP,-0.0350,0.0350
OUTPUT/FA(点O1),TA(FAI102_O1)
T(FAI102_O2)=TOL/PROFP,-0.0350,0.0350
OUTPUT/FA(点O2),TA(FAI102_O2)
T(FAI102_O3)=TOL/PROFP,-0.0350,0.0350
OUTPUT/FA(点O3),TA(FAI102_O3)
F(PATERN1)=FEAT/PATERN,F(点O1),F(点O2),F(点O3)
T(FAI102)=TOL/PROFS,0.1000,0.1000
OUTPUT/FA(PATERN1),TA(FAI102)
D(CRD6) = DATSET/FA(平面G), -YDIR
D(CRD6) = TRANS/YORIG, FA(平面G)
F(点T1)=FEAT/POINT,CART,-4.6899,-2.28,-2.7998,0.0000,-1.0000,0.0000
F(点T2)=FEAT/POINT,CART,-4.6899,-2.28,-7.1799,0.0000,-1.0000,0.0000
F(点T3)=FEAT/POINT,CART,-2.4999,-2.28,-7.1799,0.0000,-1.0000,0.0000
F(点T4)=FEAT/POINT,CART,-6.2399,-2.28,-10.1399,0.0000,-1.0000,0.0000
F(点T5)=FEAT/POINT,CART,-2.4999,-2.28,-10.1399,0.0000,-1.0000,0.0000
F(点T6)=FEAT/POINT,CART,-6.2399,-2.28,-13.0899,0.0000,-1.0000,0.0000
F(点T7)=FEAT/POINT,CART,-2.4999,-2.28,-13.0899,0.0000,-1.0000,0.0000
F(点T8)=FEAT/POINT,CART,-4.6899,-2.28,-16.0499,0.0000,-1.0000,0.0000
F(点T9)=FEAT/POINT,CART,-2.4999,-2.28,-16.0499,0.0000,-1.0000,0.0000
T(FAI48_T1)=TOL/CORTOL,YAXIS,-0.0500,0.0500
OUTPUT/FA(点T1),TA(FAI48_T1)
T(FAI48_T2)=TOL/CORTOL,YAXIS,-0.0500,0.0500
OUTPUT/FA(点T2),TA(FAI48_T2)
T(FAI48_T3)=TOL/CORTOL,YAXIS,-0.0500,0.0500
OUTPUT/FA(点T3),TA(FAI48_T3)
T(FAI48_T4)=TOL/CORTOL,YAXIS,-0.0500,0.0500
OUTPUT/FA(点T4),TA(FAI48_T4)
T(FAI48_T5)=TOL/CORTOL,YAXIS,-0.0500,0.0500
OUTPUT/FA(点T5),TA(FAI48_T5)
T(FAI48_T6)=TOL/CORTOL,YAXIS,-0.0500,0.0500
OUTPUT/FA(点T6),TA(FAI48_T6)
T(FAI48_T7)=TOL/CORTOL,YAXIS,-0.0500,0.0500
OUTPUT/FA(点T7),TA(FAI48_T7)
T(FAI48_T8)=TOL/CORTOL,YAXIS,-0.0500,0.0500
OUTPUT/FA(点T8),TA(FAI48_T8)
T(FAI48_T9)=TOL/CORTOL,YAXIS,-0.0500,0.0500
OUTPUT/FA(点T9),TA(FAI48_T9)
F(PATERN2)=FEAT/PATERN,F(点T1),F(点T2),F(点T3),F(点T4),F(点T5),F(点T6),F(点T7),F(点T8),F(点T9)
T(FAI48)=TOL/PROFS,0.1500,0.1500
OUTPUT/FA(PATERN2),TA(FAI48)
RECALL/D(ABC)
F(点520)=FEAT/POINT,CART,-0.300869,-0.410931,-15.843932,-0.000001,0.238090,-0.971243
F(点521)=FEAT/POINT,CART,-0.300868,-0.192366,-15.727119,-0.000002,0.675219,-0.737617
F(点522)=FEAT/POINT,CART,-0.300867,-0.053381,-15.509497,-0.000002,0.953190,-0.302372
T(ADD1_01)=TOL/PROFP,-0.0500,0.0500
OUTPUT/FA(点520),TA(ADD1_01)
T(ADD1_02)=TOL/PROFP,-0.0500,0.0500
OUTPUT/FA(点521),TA(ADD1_02)
T(ADD1_03)=TOL/PROFP,-0.0500,0.0500
OUTPUT/FA(点522),TA(ADD1_03)
DECL/COMMON,DOUBLE,V504
DECL/COMMON,REAL,ADD1_01_ACT
ADD1_01_ACT = VALUE/TA(ADD1_01),ACT
DECL/COMMON,REAL,ADD1_02_ACT
ADD1_02_ACT = VALUE/TA(ADD1_02),ACT
DECL/COMMON,REAL,ADD1_03_ACT
ADD1_03_ACT = VALUE/TA(ADD1_03),ACT
V504 = ASSIGN/2*MX(ABS(ADD1_01_ACT),ABS(ADD1_02_ACT),ABS(ADD1_03_ACT))
F(点0) = FEAT/POINT,CART, 0,0,0, 0,0,1
FA(点0) = FEAT/POINT,CART, 0,0,0, 0,0,1
F(点529)=FEAT/POINT,CART,0,0,0,0.0000,0.0000,1.0000
CONST/POINT,F(点529),MOVEPT,FA(点0),0,0,V504
T(ADD1)=TOL/CORTOL,ZAXIS,-0.0500,0.0500
OUTPUT/FA(点529),TA(ADD1)
T(FAI64)=TOL/PARLEL,0.0500,FA(平面_A)
OUTPUT/FA(平面G),TA(FAI64)
T(FAI66)=TOL/PARLEL,0.0500,FA(平面_A)
OUTPUT/FA(平面_F),TA(FAI66)
CLOSE/DID(NAN)
ENDDO
TEXT/OPER, '请更换工件，继续测量（3件一组）！'
JUMPTO/(L1)
