那位高手可以指点一下实体偏置OFFSRF的问题

zmjacky

目标如图的效果。最后一步卡住了，那位高手可以指点一下实体偏置OFFSRF 的gri源码。
用下面命令出错了：
entity/obj1,obj2(100),obj3(100),$
solid1,solid2,solid3,solid4,solid5,solid6
number/h1,h2,mat1(12)
NUMBER/poin(3)
. z; N  Q  g1 R2 b0 [mask/71
0 f1 M# [) n1 H+ D" U3 u( Xident/'选择要拉升的平面:',obj1,cnt,num,rsp
jump/reject1:,term:,,rsp

。。。

solid2=solext/obj2(1..c),height,h1+h2,AXIS,poin(1),poin(2),poin
。。。
7 c* T8 W# C5 b. J' Gsolid4=OFFSRF/solid2,.4 运行到这句就出错
。。。

yeyanqiu

ENTITY/obj
NUMBER/poin(3)
start:
  T; M( Y" Z. v+ z6 X8 N   h=2
L10:
7 s2 W, g7 F( u. d. G      param/'请输入偏置距离',$
/ P: A3 j! w! n9 L' m. e3 t/ z             '偏置距离=',h,resp
' E" c7 X9 o1 g      JUMP/L10:,END:,,,resp
L20:
      MASK/71
      ident/'请选择目标面',obj,resp
. I3 g, z2 D5 K( q7 o( P      JUMP/L10:,END:,,,resp

% m- P' p) c; c$ J8 {- t" n, z! ?

/ x% }) C% P) X3 \. U' {L30:
% F( }# n6 O6 {4 W8 R# t" T9 R& Xpoin=snorf(obj,.5,.5)  
IF/h==0,JUMP/L10:
7 K. Z) L, H5 }  h0 U, N( \4 [- [IF/h>0,FACMOV/obj,TRIM,HEIGHT,h,AXIS,poin(1),poin(2),poin(3),IFERR,BN:
IF/h<0,FACMOV/obj,TRIM,HEIGHT,ABSF(h),AXIS,-poin(1),-poin(2),-poin(3),IFERR,BN:
$ k$ _: \5 q8 }" wJUMP/L20:

) F- W. v( S* e( p: QEND:
8 E! F. j/ W. zHALT
8 `7 q  B8 O, h7 F1 U
BN:
PRINT/'由于参数不符...所以不能偏置此面...'
JUMP/END:

+ C% N& X; b; {# m

zmjacky

没人理，自己顶

-KASA-

偏置面命令，在GRIP中没有；
如果要求不高，可以用 FACMOV 代替；也就是单向偏执

zmjacky

-KASA- 发表于 2013-11-25 17:03
4 V0 j5 R% k; U" T3 ]9 u偏置面命令，在GRIP中没有；
1 y* ?8 |& c, Q, R如果要求不高，可以用 FACMOV 代替；也就是单向偏执

5 I- Z# |" ]  k+ |# a/ t0 |* |1 a" H. S,我试试

Uq0501uq

学习了

zmjacky

yeyanqiu 发表于 2013-12-13 12:40
  e* _+ n, `3 s  y7 r7 U5 }ENTITY/obj
NUMBER/poin(3)
1 H0 B6 [( c% F9 kstart:

1 F, B" n4 ^8 M3 q4 C+ E方形就没问题，方体一有R倒角时会出现变形，平面正常，R面就变得奇形怪状，还是没办法。