AC-DMIS測量程式應用舉例

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$1=STR$(V1) !將數字V1轉換成字串賦給字串變數S$1

S$2=STR$(V2) !將數字V2轉換成字串賦給字串變數S$2

S$3=STR$(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兩個檔案中。