【求助】曲面法向线

shuixingcmm

在一个曲面或实体面上，生成经过1个点（存在点或曲面点）和曲面法向同向或反向（有时实体面的法向线指向实体内部，故需反向）的直线，且能够指定曲线长度，这样的GRIP程序该怎么编啊？

4 y3 I! P: i* A2 {' v8 Q/ F主要我要想知道如何得到点所在的曲面（曲面点）及离一个点最近的曲面（存在点）
1 c! N" t* {! Z5 X) [2 A9 M$ J! D
[ 本帖最后由 shuixingcmm 于 2007-11-19 13:02 编辑 ]

折翅天使

二次开发不发。我还以为是问指令呢？

shuixingcmm

原帖由 折翅天使 于 2007-11-19 11:45 发表
5 M+ p# _/ V9 g1 X+ k7 g5 \, D& l二次开发不发。我还以为是问指令呢？

谁知道指令也可以指点一下啊！

shuixingcmm

遍历所有的面用什么命令？

shuixingcmm

有人提供指点吗？

bigearrabbit

$$画曲面法向线段程序
* G/ O* x1 S% s  A/ L$$作者：杨海华  $$2007-12-7
/ \, ]9 d+ M- ^% }8 ~3 xENTITY/SURF1,VECTOR
0 N6 [* |' X$ v( C* Gentity/PT
number/u,v $$ 曲面的U，V参数
NUMBER/A(3),B(3),C(3)
number/x,y,z
$ N- k/ H4 \* b  z0 V0 B9 D    L=5                     $$设置线段长度
Set00:
% \( E6 ?% f/ B/ [7 R8 v    param/'设置参数（负数表示反向),杨海华','曲线长度',L,resp
$ L' V0 P# J6 P( c    jump/trm:,trm:,,resp
! U. h9 j* B% a! q3 lL00:
; a9 @; _# R1 A8 B1 o4 D    mask/16,17,18,19,20,22,23,43,65,66,70,71
    ident/'选择曲面,杨海华',surf1,resp
    jump/Set00:,trm:,,resp
  R+ c+ O9 w) }7 f. W2 XL10:   
9 S+ q9 a8 N5 k/ P; L    gpos/'选择点,杨海华',x,y,z,resp
; E( x, Q5 Z# ?7 v/ l    $$jump/1 back,2 cancle,3 ok,4 not used,5 position defined,resp
: I0 O: s% ^. C9 i, k! ]6 T    jump/L00:,trm:,,trm:,,resp
% y0 J  ~. k3 F1 L   
% \0 ]0 l9 U: t* U! P& {    $$ident/'选择一个点,杨海华',PT,resp
    $$jump/L00:,trm:,,resp
   
    $$下面一句也可以用坐标形式：
, ]& @; F! {/ @0 ~+ h    SPARF/SURF1,X,Y,Z,U,V     $$获取U，V参数 坐标形式
* P3 X5 K- l. l0 x( z4 K& u    $$SPARF/SURF1,PT,U,V      $$获取U，V参数 点形式
- T2 A7 K8 r. z    A=SPOSF(SURF1,u,v)      $$获取曲面上点的坐标,
    $$如果点在曲面上，上句同 a=&point(PT)
, u7 N* q: f' |7 E: q2 U7 C   
    B=SNORF(SURF1,u,v)      $$获取法向向量
    $$如果需要反向：B=-B
& C8 u+ O* m4 C4 O    B=SCALVF(L,B)           $$延长线段，设为L倍。
, o* C3 J7 k2 ?2 ]    C=A+B                   $$获取法向线段终点
% d+ r! ^  T% D    VECTOR=LINE/A,C         $$画出法向线段
) q4 E. t& ~: ^  L, M  I    jump/L10:               $$循环画法向线段
trm:
halt

6 Z. W+ f2 `/ b( S8 H; @0 _[ 本帖最后由 bigearrabbit 于 2007-12-7 09:10 编辑 ]

shuixingcmm

谢谢提供，试过了，你用的方法和我的一样，我的就是直线的长短在后面设置，好处是每次可以制定不同的长短，不足是每次都要多按一下中键。
2 Y8 D# U! W+ z5 U/ |: k( ?我想要的理想程序是只需要选择一个点，就可以自动查找最近的曲面，生成法向线，不知道能否实现这样的功能。

bigearrabbit

http://user.qzone.qq.com/3301647/blog/1197168697
* k) _9 O& i5 @# G! ~
$$画曲面法向线段程序：YHH.EE3.FAC.normal.grs
$$作者：杨海华  $$2007-12-9更新
7 l1 z& g3 X4 b6 q$ h* e$$实现面遍历，缺实体中面的遍历，
$$可以实现动态曲线调节
$ t6 m" x' N8 W6 z& o
[ 本帖最后由 bigearrabbit 于 2007-12-9 11:10 编辑 ]

shuixingcmm

不错，比我的好，离最后目标仅一步之遥了！