grip编程函数问题

lthsmb

下面是我按照书上写的例子：
4 [8 _! Z4 v) y8 h. L& `- p; P2 Xentity/ent(100)
4 I6 _) I+ V, p2 P( @. P; b
9 R9 H9 d  }* ]3 ]  ]1 bl10:
# `& O8 Z$ `1 _5 `ident/'pick entity',ent,cnt,num,resp
! v- k* ~* J9 e7 b: Gjump/l10:,trm:,,resp

& v% `* C9 f" |' nl20:
% ^. }  G$ ?, Q' @" W4 Ado/trm:,indx,1,num
num1=&type(ent(indx))
print/'type='+fstrl(num1)
# h4 x7 @" M& b( L7 v9 ]
trm:
halt
3 u/ u/ F$ h; k" z$ p! ]程序运行之后任意选择几何体或实体，然后自动输出实体的类型。
$ p$ A+ f8 u: l. W8 W7 a问题是我做的时候不能输出实体的类型，我做别的含有print/语句的例子，print语句也不起作用。是print语句用错了吗？？请问各位大侠这是为什么呢？？谢谢！

lthsmb

有人知道怎样给两个圆或者是两段圆弧倒圆吗，

cmgs

原帖由 lthsmb 于 2006-10-1 08:12 发表
有人知道怎样给两个圆或者是两段圆弧倒圆吗，

Curve Fillet------2 Curve Fillet

lthsmb

两个圆或者是两段圆弧倒圆，我这样写的程序为什么不对呢？请指教！谢谢！
entity/pt1,obj1,obj2,pt2,pt3,obj
7 J9 G. C" l' t* T0 C- g
" e* V+ B& Q' o  v& c7 Zpt1 =point/0,0,0
pt2 =point/8,0,0
pt3 =point/15,12,0
obj1 =circle/center,pt1,radius,12
% q2 Y; k5 E3 B, G; I, V, ~  A! \obj1 =circle/center,pt2,radius,12

obj=fillet/ln1,ln2,center,pt3,radius,3,notrim
  m- g8 o: ^# \% r' ghalt
9 N; `4 j, N: ?& k
* f: c* ?4 @! y! S  @/ V

两个obj1？

[ 本帖最后由 阿帕奇 于 2006-10-6 12:08 编辑 ]