program P819[WM1,WM2]
element_array MEMORY[300]
metric_mode
deg_angle
set_dim (dm=whole,a=full,arel=acute,amode=a360)
dy
noprn
!
load (refsys,"C:\WTUTOR\DATA\MANUALSE.REF") 这是调用手动建的坐标系
!
load (probe,"C:\WTUTOR\DATA\JDCZ.TIP") 这是调用测针文件
!
blknb 5
ncmove
probe (1,1)
MEMORY[5]="面"
mpl (MEMORY[5],3) path PT1
!
MEMORY[6]="X轴"
mline (MEMORY[6],2) path PT2
!
MEMORY[7]="Y轴"
mline (MEMORY[7],2) path PT3
!
skew1 (MEMORY[5],1,zdir)
!
skew2 (MEMORY[6],1,z,xdir)
!
preset (MEMORY[5],Z=.0,1)
!
preset (MEMORY[6],Y=.0,1)
!
preset (MEMORY[7],X=.0,1)
!
save (refsys,"C:\WTUTOR\DATA\AUTO.REF") 这是储存精检坐标系
!
load (refsys,"C:\WTUTOR\DATA\AUTO.REF") 调用
!
MEMORY[8]="圆1"
mcir (MEMORY[8],4) path PT4
!
MEMORY[9]="圆2"
mcir (MEMORY[9],4) path PT5
!
MEMORY[10]="圆3"
mcir (MEMORY[10],4) path PT6
!
MEMORY[11]="圆心距"
dist_3d (MEMORY[11],MEMORY[9],MEMORY[10])
!
MEMORY[12]="位置度"
geo_tol (tp,>MEMORY[12],MEMORY[8],inner,MEMORY[9],inner,mmc2,dm=50.,Ldm=0.05,Udm=0.05)
!
format (circle,x=oot,y=oot,dm=oot,f=oot)
open ("C:\WTUTOR\MEAS\0819.MEA")
file
!
theo (x=33.4,Lx=0.02,Ux=0.02,y=32.05,Ly=0.02,Uy=0.02,dm=50.,Ldm=0.01,Udm=0.01)
output file MEMORY[8]
!
output file MEMORY[9]
!
theo (x=203.4,y=32.7,dm=42.)
output file MEMORY[10]
!
format (rel,line,ds=oot,a=oot)
!
theo (ds=170.,Lds=0.02,Uds=0.02)
output file MEMORY[11]
!
theo (x=.0,y=.0)
output file MEMORY[12]
endstat
end_program
#include C:\WTUTOR\PROG\0819.PAT