AC-DMIS提供了一整套完整的,方便的,快捷的指令编辑系统,有利于用户根据工件的具体要求写出简洁,高效的测量程序。以下列举了一些测量程序的实例,供您借鉴。
例1
!测圆程序
INIT !初始化为机器坐标系
LOAD-COORSYS(1) !调出刚建立的1号坐标系
FOR(V11,1,V88) !在孔内探测V88个点,V11为整型变量,从1递加到V88
READ-MAN(4,“上平面圆”) !在上平面圆上采四点
NEXT!循环体终结
CIRCLE("")!做圆
END
例2
INIT!初始化为机器坐标系
READ-MAN(1,"")!手动采集平面上1个点
POINT("")!作点
P-OFFSET("",“X,Y,Z”)!点平移置零
V97=OPEN(“ONE.DAT”,“W”)!打开(创建)名称为ONE.DAT的文件
V98=OPEN(“TOW.DAT”,“W”)!打开(创建)名称为TOW.DAT的文件
FOR(V10,1,10) !循环十次
IF(V10<=5) !前5次循环重复测量第一条直线
READ-MAN(2,"第一条直线")
ELSE!后5次循环重复测量第二条直线
READ-MAN(2,"第二条直线")
ENDIF
LINE("")
V1=X!将直线上特征点的X坐标赋值给变量V1
V2=Y!将直线上特征点的Y坐标赋值给变量V2
V3=Z!将直线上特征点的Z坐标赋值给变量V3
S(V1) !将数字V1转换成字符串赋给字符串变量S$1
S(V2) !将数字V2转换成字符串赋给字符串变量S$2
S(V3) !将数字V3转换成字符串赋给字符串变量S$3
S$4=S$1+S$2+S$3!将字符串S$1,S$2,S$3连接起来赋给字符串变量S$4
IF(V10<=5)
WRITE(V97,S$4)!将字符串变量S$4的值写进V97所指定的文件(ONE.DAT)中
ELSE!不是第一条直线
WRITE(V98,S$4)!将字符串变量S$4的值写进V98所指定的文件(TOW.DAT)中
ENDIF
NEXT
CLOSE(V97)!关闭V97所指定的文件(即ONE.DAT)
CLOSE(V98)!关闭V98所指定的文件(即TOW.DAT)
END!程序结束
说明:该程序使用了选择条件语句IF…… ELSE,可在一个平面上先后对两条平行直线各进行5次重复测量,并将测量结果分别保存在ONE.DAT和TOW.DAT两个文件中。