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

zmjacky

目标如图的效果。最后一步卡住了，那位高手可以指点一下实体偏置OFFSRF 的gri源码。
用下面命令出错了：
entity/obj1,obj2(100),obj3(100),$
! ~% @0 q4 A5 M. z7 z/ isolid1,solid2,solid3,solid4,solid5,solid6
1 e1 A& Y+ P7 M! j) m/ }& ~$ {number/h1,h2,mat1(12)
NUMBER/poin(3)
6 t1 V8 F6 A+ X; X* Z6 p) R* W! bmask/71
" e) V6 w( d5 o) v1 {ident/'选择要拉升的平面:',obj1,cnt,num,rsp
jump/reject1:,term:,,rsp

。。。
7 ~, D) D( E% |# n1 c
. m# B. a1 ^% Y: |) |% Zsolid2=solext/obj2(1..c),height,h1+h2,AXIS,poin(1),poin(2),poin
。。。
' L( g: N0 z7 }7 P) Rsolid4=OFFSRF/solid2,.4 运行到这句就出错
。。。
: b7 C- [) r3 e' b# v$ E

yeyanqiu

ENTITY/obj
NUMBER/poin(3)
9 s( I  e) J) e- C1 t7 rstart:
   h=2
, G& D) D) r9 `( a, `L10:
      param/'请输入偏置距离',$
             '偏置距离=',h,resp
      JUMP/L10:,END:,,,resp
L20:
      MASK/71
      ident/'请选择目标面',obj,resp
      JUMP/L10:,END:,,,resp
8 Q; p& ]1 a  O3 r) i

' R/ g8 Y4 U& G% E
L30:
poin=snorf(obj,.5,.5)  
IF/h==0,JUMP/L10:
IF/h>0,FACMOV/obj,TRIM,HEIGHT,h,AXIS,poin(1),poin(2),poin(3),IFERR,BN:
3 |3 s' K0 J6 Y* ?* EIF/h<0,FACMOV/obj,TRIM,HEIGHT,ABSF(h),AXIS,-poin(1),-poin(2),-poin(3),IFERR,BN:
! S0 x% W2 c5 \4 ~JUMP/L20:
( Z: @0 ?" z1 G
5 n1 M" Q6 T  v; Y& fEND:
HALT
3 u* v* w, _8 v. e
  L. p4 q0 d5 d4 X& J+ |4 EBN:
/ C  p# i& ]& z# PPRINT/'由于参数不符...所以不能偏置此面...'
5 h7 e: o0 q; qJUMP/END:

zmjacky

没人理，自己顶

-KASA-

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

zmjacky

-KASA- 发表于 2013-11-25 17:03
! |4 H! d5 ]8 o+ k6 Q. O偏置面命令，在GRIP中没有；
# s) Y( i& y- E( Z6 M# }- ?如果要求不高，可以用 FACMOV 代替；也就是单向偏执

5 ^% Q) \! F* u; k,我试试

Uq0501uq

学习了

zmjacky

yeyanqiu 发表于 2013-12-13 12:40
7 u1 ?$ _, X3 s2 X: @' {$ j+ f- BENTITY/obj
* T2 E3 Z/ k8 E* NNUMBER/poin(3)
start:

5 {8 M2 S$ k: {2 Y1 o5 A方形就没问题，方体一有R倒角时会出现变形，平面正常，R面就变得奇形怪状，还是没办法。