grip编程函数问题

lthsmb

下面是我按照书上写的例子：
entity/ent(100)
$ |6 Z! H" r7 ^# Q- F$ d
l10:
ident/'pick entity',ent,cnt,num,resp
9 D4 j1 o& [7 M7 L! |7 U( {jump/l10:,trm:,,resp

l20:
do/trm:,indx,1,num
num1=&type(ent(indx))
print/'type='+fstrl(num1)
$ Q- s- l$ P+ S5 E9 h" z+ X$ [
trm:
+ j! G( e% X) z, J* yhalt
* y! }& ^& A. W. l0 ?5 I程序运行之后任意选择几何体或实体，然后自动输出实体的类型。
问题是我做的时候不能输出实体的类型，我做别的含有print/语句的例子，print语句也不起作用。是print语句用错了吗？？请问各位大侠这是为什么呢？？谢谢！

lthsmb

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

cmgs

原帖由 lthsmb 于 2006-10-1 08:12 发表
' [: z' L# |" C/ J2 x# R2 e有人知道怎样给两个圆或者是两段圆弧倒圆吗，

( r5 I  A: d' M/ F* @/ Y$ r3 YCurve Fillet------2 Curve Fillet

lthsmb

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

( F5 T6 S, h, W/ m: i0 Kpt1 =point/0,0,0
0 f3 e( X- _7 |/ ?2 ?* X7 Fpt2 =point/8,0,0
pt3 =point/15,12,0
obj1 =circle/center,pt1,radius,12
6 \- o7 D  L5 ^/ x% Wobj1 =circle/center,pt2,radius,12
3 U! f* g% u. w8 r2 ~5 I
( l' A/ K" i5 M% _; D4 O2 nobj=fillet/ln1,ln2,center,pt3,radius,3,notrim
  J% z) q! Q2 ?1 H! J) vhalt

6 h- i+ c: v+ _; e6 M& s( N& ~
  X. [9 w, k/ |7 c% }+ g
两个obj1？
! W5 @1 i" K5 S5 b+ H2 a" c' D
[ 本帖最后由 阿帕奇 于 2006-10-6 12:08 编辑 ]