查看单个帖子
旧 2009-04-26, 12:22 PM   #1
yang686526
高级会员
 
注册日期: 06-11
帖子: 14579
精华: 1
现金: 224494 标准币
资产: 234494 标准币
yang686526 向着好的方向发展
默认 [求助]同心圆、弧判断

[求助]同心圆、弧判断
www.dimcax.com
[求助]同心圆、弧判断
我在写一个画中心线的命令,现在有个问题,我用如下函数获取所有圆和圆弧的
(setq cobj (ssget '((-4 . "<or") (0 . "circle") (0 . "arc") (-4 . "or>"))))
那么请问大家,如果存在同心圆或者圆弧,怎么忽略掉其中比较小的圆或者弧,直接加大的选择集呢?
因为螺丝过孔经常是两个同心圆...所以,中心线画重了
d
顾名思义,比较圆心。
好好学习cad,天天向上搞设计。
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
( dxg (code ele)
( ( code ( ele)))
)
;; ( cobj ( "x" '((0 . "circle,arc"))))
;; 单试同一圆心选择集
( cobj ( '((0 . "circle,arc"))))
(
(( ( nn ( cobj)) 2))
(
( ee ( cobj (1- nn))
rad (dxg 40 ee)
nn (1- (1- nn))
)
( ( e1 ( cobj nn))
( rad1 (dxg 40 e1)
nn (1- nn)
)
(
(( rad1 rad)
( ee cobj)
( ee e1
rad rad1
))
( ( e1 cobj))
))) )
===>cobj (nn=1 / max rad)
d
谢谢andyhon
不过现在又有个问题,只能对一个对象操作了?
我框选n个圆,只能画出一个
d
解决思路:提取所有圆和圆弧的圆心坐标后,将其组成表,然后消除相同坐标后组成新表,再进行其它操作。
yang686526离线中   回复时引用此帖
GDT自动化论坛(仅游客可见)