grip编程函数问题

lthsmb

下面是我按照书上写的例子：
entity/ent(100)
( K, {# b' M5 A, O9 y' H) `
/ k# t' j% e; W8 Q7 H' Cl10:
, V0 p1 o5 ^, n  {0 b) qident/'pick entity',ent,cnt,num,resp
4 I6 o0 l1 V: ]8 Djump/l10:,trm:,,resp
* n$ ]& w+ \" |& E# T' z( h+ t
l20:
1 Z1 Z: [# K: J3 k; ido/trm:,indx,1,num
num1=&type(ent(indx))
! F+ R6 D3 A3 w7 y+ x# u- tprint/'type='+fstrl(num1)

trm:
5 _& l; w' P) @9 d% Ohalt
$ |/ k* W7 `# q/ t- q程序运行之后任意选择几何体或实体，然后自动输出实体的类型。
3 s. {1 y" M2 z$ W问题是我做的时候不能输出实体的类型，我做别的含有print/语句的例子，print语句也不起作用。是print语句用错了吗？？请问各位大侠这是为什么呢？？谢谢！

lthsmb

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

cmgs

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

* c) J. E1 v; K* x% r5 XCurve Fillet------2 Curve Fillet

lthsmb

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

pt1 =point/0,0,0
pt2 =point/8,0,0
/ h2 h' U0 h) U7 i2 L& _# K. Y) [) Npt3 =point/15,12,0
obj1 =circle/center,pt1,radius,12
, b: |( n: D- y4 }' mobj1 =circle/center,pt2,radius,12
6 n: P4 f5 C: M% P4 j5 K7 L
obj=fillet/ln1,ln2,center,pt3,radius,3,notrim
$ |3 K3 g6 V$ A! \9 ~" i  F" q+ Chalt

/ L9 R) D, ]. I+ K
7 _$ _4 s* k9 x$ I7 k9 b* F
两个obj1？
, H4 A& f. J, |& P
. Q) k% D6 {4 }! O- \. d[ 本帖最后由 阿帕奇 于 2006-10-6 12:08 编辑 ]