grip 曲线分割 曲面

曲线分割 曲面

entity/crv,f,objlist(1000)
number/resp,r(7),n,nm

L10:
mask/71
ident/'梅雷提示！请选取面',f,resp
jump/trm:,trm:,,resp

l20:
MASK/3,5,6,8,9
IDEnT/'梅雷提示！请选择曲线',crv,resp
jump/L10:,trm:,,resp

$$ 曲线分割 曲面
objlist = FACDIV/f,WITH,crv,CnT,n,IFERR,ERR1:


TRM:
HALT

ERR1:
messg/'梅雷提示！你选择的曲线不能分割曲面。'
JUMP/l10:

_____________________________________________________________________________ _

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