建模与矢量方向教材（列1：曲率梳）（列2：面中心线） - UG - GRIP源代码

建模与矢量方向教材(列1：曲率梳)(列2：面中心线)_UG_GRIP_源代码

$$ 建模与矢量方向教材(列1：曲率梳)

ENTITY/face,ln

NUMBER/poin(3),NUM(2,3)

$$ifthen/&ACTPRT==1 $$判断ug是否打开部件基本上用不着写这个 $$messg/'请打开一个部件!' $$jump/end: $$endif

h=10 $$偏置距离 【+-表示方向】 n=30 $$曲率梳数大于3的正整数 L10:

MASK/71

IDENT/'梅雷提示！请选择面【矢量方向】...',face,resp JUMP/L10:,end:,,,resp L20:

param/'梅雷提示!请输入参数...',$ '曲率梳数',n,$ '偏置距离',h,resp JUMP/L10:,END:,,,resp

n=absf(n) $$绝对值 n=INTF(n) $$整数

if/n<3,messg/'梅雷提示！你输入的数量不能小于3 ' if/n<3,jump/L20: LA:

CHOOSE/'梅雷提示!请选择按钮...',$ 'u方向',$

'v方向',DEFLT,1,resp JUMP/L20:,END:,,,A1:,A2:,resp A1:

XYYX=1

JUMP/L30: A2:

XYYX=2 L30:

DO/L40:,i,0,n-1 $$循环i=0~n-1

IF/XYYX==1,poin=snorf(face,.5,1/(n-1)*i) $$取面的矢量方向 IF/XYYX==1,NUM(1,1..3)=SPOSF(face,.5,1/(n-1)*i) $$取面上的点坐标 IF/XYYX<>1,poin=snorf(face,1/(n-1)*i,.5) IF/XYYX<>1,NUM(1,1..3)=SPOSF(face,1/(n-1)*i,.5)

NUM(2,1)=NUM(1,1)+poin(1)*h $$按照矢量方向偏置点的x轴坐标 NUM(2,2)=NUM(1,2)+poin(2)*h $$按照矢量方向偏置点的y轴坐标 NUM(2,3)=NUM(1,3)+poin(3)*h $$按照矢量方向偏置点的y轴坐标 ln=LINE/NUM(1,1..3),NUM(2,1..3) $$创建线 L40:

jump/L10: END: HALT

$$________________________________________________________________________ $$ 点余矢量方向

$$ 矢量方向的作用 就是 可以不改变坐标 创建想要的位置的实体

$$________________________________________________________________________ $$ 按照同一矢量方向偏置点的xyz轴坐标 且偏置距离也相同 $$ 相当于 按照一矢量方向 偏置点 $$ 矢量方向 可以通过 面或 线 取的

$$ （两个点可以确定一直线 也可以确定一矢量方向）

$$________________________________________________________________________ $$ 列：

$$ 点1 减 点2 就等于 矢量方向 反之也相同 $$ 设点1 坐标=p1(1..3)，点2 坐标=p2(1..3)

$$ 则矢量方向 p1(1)-p2(1),p1(2)-p2(2),p1(3)-p2(3)

$$________________________________________________________________________ $$ 取点函数

$$ &POINT 取点坐标 &CENTER 取圆心坐标 SPOSF取面上点坐标 $$ CPOSF 取线上的点坐标 snorf 取面的矢量方向

$$________________________________________________________________________ $$ _____梅雷

$$ _____QQ1821117007

$$________________________________________________________________________

$$ 建模与矢量方向教材(列2：面中心线)

ENTITY/face,ln(2) NUMBER/NUM(4,3) L10:

MASK/22

IDENT/'梅雷提示！请选择平面...',face,resp JUMP/L10:,end:,,,resp L20:

NUM(1,1..3)=SPOSF(face,.5,0) $$取面上的点坐标 NUM(2,1..3)=SPOSF(face,.5,1) NUM(3,1..3)=SPOSF(face,1,.5) NUM(4,1..3)=SPOSF(face,0,.5)

ln(2)=LINE/NUM(1,1..3),NUM(2,1..3) $$创建线 ln(1)=LINE/NUM(3,1..3),NUM(4,1..3)

END: HALT

$$________________________________________________________________________ $$_____面中心线 $$ _____梅雷

$$ _____QQ1821117007

$$________________________________________________________________________

本文来源：https://www.bwwdw.com/article/4dfd.html