iCAx开思网

标题: 【分享】Nurbs 擬合 [打印本页]

作者: sinderal    时间: 2003-7-1 08:56
标题: 【分享】Nurbs 擬合
粉多人希望將G01三維的走刀NC輸出為Nurbs... 在 Surfcam裡有兩種處理方式,  
  
第一種:
使用GPost裡的 Curve Fitting -->Enable Curve Fitting --> Enable Spline Fitting ... 功能..
作者: sinderal    时间: 2003-7-1 09:02
第二種:
利用Operation Manager裡的Nurbfltr,
作者: sinderal    时间: 2003-7-1 09:06
不過, 你的GPost Uncx01.Pxx, Uncx0.Fxx裡要寫FIL (第二種)
  
Cimfil/on,Fedrat
   fedrt=Postf(7,5)
   rslt=postf(13)
Cimfil/off
  
CIMFIL/ON,CTRLPT
knt=postf(7,4)
xcmp=postf(7,5)
ycmp=postf(7,6)
zcmp=postf(7,7)
wght=postf(7,8)
       If (cntr.EQ.0)then
              IF(MODE.EQ.1) POSTN/IN,G,1,X,XCMP,Y,YCMP,Z,ZCMP
              Postn/in,U,06.2,P,odr,K,knt,X,xcmp,Y,ycmp,Z,zcmp,R,wght,$
              F,fedrt
              hgspd=1; MODE=6
              cod=1
       Else
             Postn/in,K,knt,X,xcmp,Y,ycmp,Z,zcmp,R,wght
       endif
cntr=cntr+1
CIMFIL/OFF
  
CIMFIL/ON,NCRV
Odr=Postf(7,4)
If (hgspd.eq.0) then  
          Postn/in,G,05,P,10000
endif
CIMFIL/OFF
  
CIMFIL/ON,KNOT
knt=postf(7,4)
  postn/in,K,knt
cntr=0
CIMFIL/OFF
  
Cimfil/on,rapid
Rslt=postf(13)
If (hgspd.eq.1) then
     POSTN/IN,g,5,p,0
    cntr=0
     hgspd=0
Endif
Cimfil/off
  
CIMFIL/ON,GOTO
    RSLT=POSTF(13); MODE=1
CIMFIL/OFF
  
Cimfil/on,5
Rslt=postf(20)
If (cod.eq.1) then
     POSTN/IN,g,1,next
cod=0
   Endif
rslt=postf(21)
rslt=postf(13)
zchk=postf(7,8)
Cimfil/off
  
*** 要設置U 為 G
作者: ystlh    时间: 2003-7-15 16:08
thanks




欢迎光临 iCAx开思网 (https://www.icax.org/) Powered by Discuz! X3.3