
请问怎么用LISP语言,提取多段线的端点坐标,在获得属性列表后,我只能通过assoc判断出第一个端点坐标
展开全部
加循环
(setq el (car (entsel)))
(foreach n (entget el)
(if (= 10 (car n))
(setq ptlist (cons (cdr n) ptlist)) )
)
(setq el (car (entsel)))
(foreach n (entget el)
(if (= 10 (car n))
(setq ptlist (cons (cdr n) ptlist)) )
)
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询