AC-DMIS 5.3 脱机编程实例1： （条件：测内圆直径）

Posted 2022-06-07 山涧果子

INIT 
LOAD-COORSYS（"123"）-此处是调出坐标系
INPUT-VAR（V20，"被测圆半径"）
INPUT-VAR（V64，"被测圆个数"）
INPUT-VAR（V40，"被测圆深度"）
FOR（V1，1，32）
FOR（V2，1，V64）
V52=360/V64*（V2-1）
V14=V20*SIN（V52）
V15=V20*COS（V52）
V17=（V20-3）*SIN（V52）
V18=（V20-3）*cos（V52）
MOVE-TO（V18，V17，0-V40）
READ-PROBE（V15.V14.0-V40）
NEXT
 MOVE-TO(V18,V17,-10) 
SET-OUTPUT("DIA")
 CIRCLE("") 
NEXT 
END

注意：
脱机编程前需先建立一个坐标系保存后再调出，然后再在编辑器中写程序，适应于无模型测量。