grip编程函数问题

lthsmb

下面是我按照书上写的例子：
2 O7 B4 p6 o" O' ^$ Sentity/ent(100)
: @% I7 \* l+ s' [' y+ b6 y
' p- K* |( ?1 m1 W6 K  Ll10:
: ?" b2 G0 b: Lident/'pick entity',ent,cnt,num,resp
jump/l10:,trm:,,resp
; e2 M* K" ^& r: _0 ^6 [' |6 F
l20:
do/trm:,indx,1,num
! {4 T7 K7 ^" d7 P+ u+ pnum1=&type(ent(indx))
print/'type='+fstrl(num1)
) k, d: f1 j4 ?* c# q: f. ~+ V
trm:
halt
程序运行之后任意选择几何体或实体，然后自动输出实体的类型。
问题是我做的时候不能输出实体的类型，我做别的含有print/语句的例子，print语句也不起作用。是print语句用错了吗？？请问各位大侠这是为什么呢？？谢谢！

lthsmb

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

cmgs

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

# X# H! o# g8 ~Curve Fillet------2 Curve Fillet

lthsmb

两个圆或者是两段圆弧倒圆，我这样写的程序为什么不对呢？请指教！谢谢！
entity/pt1,obj1,obj2,pt2,pt3,obj

pt1 =point/0,0,0
pt2 =point/8,0,0
- J# J% l: J* K+ |& h* M: Spt3 =point/15,12,0
obj1 =circle/center,pt1,radius,12
obj1 =circle/center,pt2,radius,12
. k' I; b) M& h0 t8 [
obj=fillet/ln1,ln2,center,pt3,radius,3,notrim
- K5 o9 f( J" f  N1 b) V, Hhalt
' v. l9 I5 J- q. ]' ]7 }  F


0 x6 ]) t: T4 b  l' X3 D& q2 s两个obj1？

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