原帖由 hyf-hb 于 2006-7-5 19:21 发表
GPOST怎样处理不带刀长补长的机床
寫FIL, 然後Pormpt 問你 刀長多長? 加入後處理裡面計算來輸出
下面這個FIL 可以是偏心距的, 不單是補刀長值...
CIMFIL/ON,PARTNO
PROMPT=TEXT/'ENTER THE TRANS X VALUE'
RSLT=FILEF(0,1,PROMPT)
STRNG=TEXT/READ,0
XVALUE=SCALF(STRNG)
PROMPT=TEXT/'ENTER THE TRANS Y VALUE'
RSLT=FILEF(0,1,PROMPT)
STRNG=TEXT/READ,0
YVALUE=SCALF(STRNG)
PROMPT=TEXT/'ENTER THE TRANS Z VALUE'
RSLT=FILEF(0,1,PROMPT)
STRNG=TEXT/READ,0
ZVALUE=SCALF(STRNG)
CIMFIL/OFF
CIMFIL/ON,MACHIN
RSLT=POSTF(13)
TRANS/XVALUE,YVALUE,ZVALUE
CIMFIL/OFF
[ 本帖最后由 sinderal 于 2006-7-6 10:15 编辑 ] |