第一基准为顶部平面,第二基准为前平面,第三基准为左平面。
平面 (平面 1):测量顶平面
直线 (直线 1):前平面由左向右
直线 (直线 2):左平面由前至后
交点 (点 1) 两直线间“相交”构造交点
$$ NET_DMIS_20160720
$$ MADE IN DE 2023-2-10 14:10:20
INCLUD/DMIS,'NET_DMIS_DEFINES.DMI'
INCLUD/DMIS,'VARDEFINE'
DMESW/COMAND,'PROBE_VAL/INIT'
UNITS/MM,ANGDEC
D(MACHINE)=DATSET/MCS
DMESW/COMAND,'COORDSYS/ALIGN'
WKPLAN/XYPLAN
PRCOMP/ON
PRCOMP/ON
FEDRAT/POSVEL,MMPS,300.0000
ACLRAT/POSACL,MMPSS,100.0000
FEDRAT/MESVEL,MMPS,20.0000
ACLRAT/MESACL,MMPSS,100.0000
SNSET/RETRCT,2.0000
SNSET/SEARCH,5.0000
SNSET/APPRCH,2.0000
DMESW/COMAND,'SNSET/MANRETRCT,2.0000'
DMESW/COMAND,'REPORT/CLEAR'
MODE/MAN
DID(D2L40)=DEVICE/STOR,'D2L40'
OPEN/DID(D2L40),SNS
S(A0B0)=SNSDEF/PROBE,INDEX,POL,0.0,0.0,0.0000,0.0000,1.0000,189.6500,2.0000
SNSLCT/SA(A0B0)
GEOALG/PLANE,LSTSQR
F(平面1)=FEAT/PLANE,CART,33.3102,37.8945,0,0,0,1.00000000
MEAS/PLANE,F(平面1),4
PTMEAS/CART,7.7022,64.5229,0,0,0,1.00000000
PTMEAS/CART,5.3395,9.1670,0,0,0,1.00000000
PTMEAS/CART,60.0571,5.6613,0,0,0,1.00000000
PTMEAS/CART,60.1421,72.2267,0,0,0,1.00000000
ENDMES
SNSET/DEPTH,0
DMESW/COMAND,'CONST/SET_PROJ_VEC,FA(平面1),1'
F(直线1)=FEAT/LINE,UNBND,CART,5.4385,0,-2.2250,0.99996976,0,-0.00777697,0,-1.00000000,0
MEAS/LINE,F(直线1),2
PTMEAS/CART,5.4385,0,-2.4464,0,-1.00000000,0
PTMEAS/CART,62.3580,0,-2.4464,0,-1.00000000,0
ENDMES
SNSET/DEPTH,0
DMESW/COMAND,'CONST/SET_PROJ_VEC,FA(平面1),1'
F(直线2)=FEAT/LINE,UNBND,CART,0,4.3937,-2.6559,0,0.99997367,-0.00725712,-1.00000000,0,0
MEAS/LINE,F(直线2),2
PTMEAS/CART,0,4.3937,-2.8519,-1.00000000,0,0
PTMEAS/CART,0,58.4001,-2.8519,-1.00000000,0,0
ENDMES
F(点1)=FEAT/POINT,CART,0.0017,-0.0016,-2.4034,-0.00777677,-0.00725690,-0.99994343
CONST/POINT,F(点1),INTOF,FA(直线1),FA(直线2)
DATDEF/F(平面1),DAT(A_平面1)
D(坐标系1_S)=DATSET/DAT(A_平面1),ZDIR
D(坐标系1_R)=ROTATE/ZAXIS,FA(直线1),XDIR
D(坐标系1_T)=TRANS/XORIG,FA(点1),YORIG,FA(点1)
D(坐标系1_T)=TRANS/ZORIG,FA(平面1)
DMESW/COMAND,'COORDSYS/CAD=PART'
SAVE/DA(坐标系1)