怎么把大量的圆变成十字叉
<p>我有个图纸,里面有1000多个圆的标志,我想把圆变成十字叉,怎么弄,原来学过,很长时间不用了,忘了,请高手解答。</p> 怎么一个高手都没有?只看不回复?我的QQ是19764929,帮我解答啊 <p>(setq ss (ssget "X" ''((0 . "circle"))))</p><p>(setq n (sslength ss) i 0)</p><p>(while (< i n)</p><p>(setq pt (cdr (assoc 10 (entget (ssname ss i))))) ;pt 就是圆心坐标</p><p>;十字叉就不用多说了吧?</p><p>;"(entmake ……)"</p><p>(setq i (1+ i))</p><p>)</p> 看不懂啊,全是什么东西 对牛弹琴 function XML() {}
页:
[1]