grip 分割列子 分割拉伸面

分割拉伸面


$$ 选择面拉伸，分割被选择实体

entity/face,obj(10),ln(2000),sp,st
number/poin(3)
number/mat(12)
l10:
mask/70
ident/'梅雷提示：选择被分割实体',st,resp
jump/l10:,end:,,,resp
l20:
mask/71
ident/'梅雷提示：选择面',face,resp
jump/l10:,end:,,,resp
l30:
poin=snorf(face,0.5,0.5)
ln=soledg/face,cnt,n
obj(1)=solext/ln(1..n),height,-5000,axis,poin(1),poin(2),poin(3)
sp=split/st,with,obj(1)   $$分割
delete/ln(1..n),obj(1)   
end:
halt
_____________________________________________________________________________ _

中磊UG二次开发教程 梅雷著 qq1821117007
学UG就上UG网 http://www.9sug.com/