申明：内容来自用户上传，著作权归原作者所有，如涉及侵权问题，请点击此处联系，我们将及时处理！
0人已收藏
0人已打赏
免费0人已点赞
分享
阅读下一篇
....求LISP高手...关于OFFSET命令的LISP....求LISP高手...关于OFFSET命令的LISPdefun cfe (/ en i d p1 ss en1) (prompt "选择要偏离的目标:")(setq en (ssget ) i 0 ss (sslength en))(setq d (getstring "要偏离的距离:") p1 (getpoint "偏离的方向(所有目标)"))(repeat ss (setq en1 (ssname en i) i (+ i 1))
回帖成功
经验值 +10
全部回复（1 ）
只看楼主 我来说两句 抢板凳