关于零件外轮廓边界的外挂

原贴由llgqxj发表：
说明下，我不懂一点计算机语句，不认得英文，不懂DO语句这些基本知识。呵呵，不过最近我还是做出了几个GRIPbbs.ica

LL0:
MASK/2,3,5,6,9,70,71,72,196,197
IDENT/'PICK GEOMETRIC',part0,CNT,K,resp
JUMP/LL0:,TRM1:,,resp
csys1(1)=&WCS
pto=POINT/&ORIGIN(csys1(1))
pt(1)=pto
DRAW/OFF
plane1(1)=PLANE/XYPLAN,10000,csys1(1)
plane1(2)=PLANE/XYPLAN,-10000,csys1(1)
plane1(3)=PLANE/XZPLAN,-10000,csys1(1)
plane1(4)=PLANE/YZPLAN,-10000,csys1(1)
plane1(5)=PLANE/XZPLAN,10000,csys1(1)
plane1(6)=PLANE/YZPLAN,10000,csys1(1)
DRAW/ON
&FONT=2
mini(1)=20000
mini(2)=20000
mini(3)=20000
mini(4)=20000
mini(5)=20000
mini(6)=20000
n=1
m=1
LOOP1:
IFTHEN/n<=k
    mindis(m,1..7)=RELDST/part0(n),plane1(1)
  IFTHEN/mindis(m,7)<=mini(1)
    mini(1)=mindis(m,7)
  ENDIF
    n=n+1
    m=m+1
  JUMP/LOOP1:
ENDIF
你的只是单体的吧.
我的就是这样,不用但心准不准.在后面多加几个IFTHEN循环就是多体的了

原贴由llgqxj发表：
我现在考虑的是，假始当工件在坐标很远点，超过你的辅助面，比如辅助面是1000，而工件在5000的超过辅助面，坐标系又不平

很好,你的这个问题我也想过,但这个只是为我自己写的,所以自己知道了就会出现你说的坐标系又不平的问题.其实这个问也是好解决的.用绝对坐标的就行了.如再好点还可变成可选项,相对坐标&绝对坐标

至于超过辅助面的问题,我的是10000,还可改成20000....更多,我想没有哪个图会建在偏离坐标系这么远的吧.我的原则,自己能用就可以了.用你的那方法可以改成多体的吗？

"请问谁或哪里有能出零件外轮廓边界的外挂.GRIP或DLL的都可以."

强烈要求版大出手给与支持,,,,!

[ 本帖最后由 y_kevin 于 2006-9-26 10:10 编辑 ]

不懂,支持一下.

原帖由 y_kevin 于 2006-9-26 08:58 发表


LL0:
MASK/2,3,5,6,9,70,71,72,196,197
IDENT/'PICK GEOMETRIC',part0,CNT,K,resp
JUMP/LL0:,TRM1:,,resp
csys1(1)=&WCS
pto=POINT/&ORIGIN(csys1(1))
pt(1)=pto
DRAW/OFF
plane1(1)=PLANE/X ...

我在做选取1000个体生成边界盒的，单体我做也没有问题。你可以试下，solbox可以找到边界盒，不过在我说的坐标系有角度时那他就不是最大外形了，有几个面包不到，不过中心点还是一致的，可以再以solbox做六个偏置1000面来二次计算。要做多个体的边界盒用个DO语句就可以了。你的做法面偏得越大，GRIP程序生成就越大，不好的机子有可能死机，在试验时选取多个体比较慢，费时。用solbox加你的方法可以减小程序KB量，呵呵，你可以试下。要做就做个好的程序，不要凑和

DDDDDDDDD

后处理就就这么二招,关键是在编程呀,

楼主精神可佳呀,值的我们学习呀,

顶！

怎么用了

下载以后放在UG哪里啊,要怎么用了,请大哥指点一二