NETDMIS5.0矢量点测量2023

矢量点适用于检测工件变形不严重，实际法线矢量和理论法线矢量之间没有大的误差，可以得到正确的测头半径补偿。如果工件的变形比较大，会影响到测头半径的补偿，就不能使用矢量点的方法测量。

$$ NET_DMIS_20160720
$$ MADE IN DE 2023-2-11 9:47:28
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,24.1268,25.5185,0,0,0,1.00000000
MEAS/PLANE,F(平面1),3
PTMEAS/CART,4.1684,56.7918,0,0,0,1.00000000
PTMEAS/CART,6.3117,11.3853,0,0,0,1.00000000
PTMEAS/CART,61.9002,8.3783,0,0,0,1.00000000
ENDMES
SNSET/DEPTH,0
DMESW/COMAND,'CONST/SET_PROJ_VEC,FA(平面1),1'
F(直线1)=FEAT/LINE,UNBND,CART,3.7914,0,-2.1375,0.99998863,0,-0.00476906,0,-1.00000000,0
MEAS/LINE,F(直线1),2
PTMEAS/CART,3.7914,0,-2.2749,0,-1.00000000,0
PTMEAS/CART,61.4172,0,-2.2749,0,-1.00000000,0
ENDMES
F(点1)=FEAT/POINT,CART,0,4.2887,-2.4453,-1.00000000,0,0
MEAS/POINT,COMP,DME,F(点1),1
PTMEAS/CART,0,4.2887,-2.4453,-1.00000000,0,0
ENDMES
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)
D(坐标系1_T)=TRANS/YORIG,FA(直线1)
D(坐标系1_T)=TRANS/ZORIG,FA(平面1)
DMESW/COMAND,'COORDSYS/CAD=PART'
SAVE/DA(坐标系1)
MODE/AUTO,PROG,MAN
DMESW/COMAND,'SNSET/MANRETRCT,1.0000'
DMESW/COMAND,'CLEARP/ZDIR,10.0000,ZDIR,10.0000,ON'
F(点2)=FEAT/POINT,CART,67.7720,28.6789,-0.6933,0.40721060,0,0.91333429
CALL/EXTERN,DMIS,M(NETDMIS_AUTO_POINT_1007),AUTOFIGURE,F(点2),POINT,CART,DME,67.7720,28.6789,-0.6933,0.40721060,$
0,0.91333429,0,0,0,FALSE,FALSE,FALSE,10.0000,"CUR",TRUE,FALSE,0,FA(VECBLD),10.0000,2.5000,3,XYPLAN,"",$
"EXT1","EXT2","EXT3",ENDCAL
F(点3)=FEAT/POINT,CART,68.2224,68.6644,-0.9113,0.46350915,0,0.88609213
CALL/EXTERN,DMIS,M(NETDMIS_AUTO_POINT_1007),AUTOFIGURE,F(点3),POINT,CART,DME,68.2224,68.6644,-0.9113,0.46350915,$
0,0.88609213,0,0,0,FALSE,FALSE,FALSE,10.0000,"CUR",TRUE,FALSE,0,FA(VECBLD),10.0000,2.5000,3,XYPLAN,"",$
"EXT1","EXT2","EXT3",ENDCAL
F(点4)=FEAT/POINT,CART,68.0366,86.4719,-0.8171,0.44028833,0,0.89785644
CALL/EXTERN,DMIS,M(NETDMIS_AUTO_POINT_1007),AUTOFIGURE,F(点4),POINT,CART,DME,68.0366,86.4719,-0.8171,0.44028833,$
0,0.89785644,0,0,0,FALSE,FALSE,FALSE,10.0000,"CUR",TRUE,FALSE,0,FA(VECBLD),10.0000,2.5000,3,XYPLAN,"",$
"EXT1","EXT2","EXT3",ENDCAL