求当前线段的角度

jimmy8135 · 发表于 2002-11-25 10:34:00

打个比方,原来就有一线段,线段各顶点未知
现在只给线段上一点
如何求该线段的角度呢?
是不是要用ssget命令?怎么用呢?

jimmy8135 · 发表于 2002-11-25 16:15:00

请各位赐教

chg · 发表于 2002-11-25 19:35:00

(setq ss (ssget 'pt))
(setq ename (ssname ss 0))
(setq pt10 (cdr (assoc 10 (entget ename)))
pt11 (cdr (assoc 11 (entget ename)))
)
(setq ang (angle pt10 pt11))
这里通过点pt的实体多过一个时，其中ename就不一定是你想要的线段的名称
了，这点你要考虑进去。

求当前线段的角度

发表回复

精选推荐