grip编程函数问题

lthsmb

下面是我按照书上写的例子：
entity/ent(100)

l10:
ident/'pick entity',ent,cnt,num,resp
jump/l10:,trm:,,resp
) e& J' L4 M2 H% Z- u; X5 v
l20:
% u9 Z' u+ Z; }! j( o% ]do/trm:,indx,1,num
num1=&type(ent(indx))
print/'type='+fstrl(num1)
5 m! l  h- M4 s; ?6 k
trm:
2 a3 H# v5 l) v+ _2 W5 k$ uhalt
2 t, y. V" w2 q8 ~7 P程序运行之后任意选择几何体或实体，然后自动输出实体的类型。
- w) {" F9 g# S: W9 C$ g问题是我做的时候不能输出实体的类型，我做别的含有print/语句的例子，print语句也不起作用。是print语句用错了吗？？请问各位大侠这是为什么呢？？谢谢！

lthsmb

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

cmgs

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

Curve Fillet------2 Curve Fillet

lthsmb

两个圆或者是两段圆弧倒圆，我这样写的程序为什么不对呢？请指教！谢谢！
entity/pt1,obj1,obj2,pt2,pt3,obj
, [9 i$ K! |0 S% Y  q* b( Q) P
* v) j2 y7 S0 I: c% Rpt1 =point/0,0,0
0 |: B) A8 W& x# Z+ y: Y+ jpt2 =point/8,0,0
pt3 =point/15,12,0
obj1 =circle/center,pt1,radius,12
obj1 =circle/center,pt2,radius,12

. U4 r# y' H  f# b* jobj=fillet/ln1,ln2,center,pt3,radius,3,notrim
4 {% @0 h+ ~/ y* A5 p! phalt
0 J9 ?' |% P& A- X1 x8 z
5 G/ i$ {3 g% K4 H, `

两个obj1？
. C: M: K2 X* {3 L6 @
[ 本帖最后由 阿帕奇 于 2006-10-6 12:08 编辑 ]