社区 › AutoLISP/Visual LISP 编程技术 › 选择的直线归到某个图层中lisp语言

r02t 发表于 2014-1-19 16:21:51

选择的直线归到某个图层中lisp语言

我编了个简单的cadlisp，想实现，选个直线后偏移，偏移后的哪个直线设置到名称为“200”图层中去，但是往下编就不会了。(defun C:ofe (/ a b)(setq a (ssget))(command "offset" 50 a pause "")(setq b (entlast))(command ？？？)(princ))

edata 发表于 2014-1-19 23:40:27

(command "CHPROP" b "" "la" "200" "")

r02t 发表于 2014-1-20 13:33:42

弄好了，十分感谢edata，不过只能一根根直线依次点击，能否同时处理多个直线，对于偏移的方向不做要求，比如我输入ofe命定后，一次选择多个直线，回车后，这多个直线旁边都生产了图层为200的直线。

查看完整版本: 选择的直线归到某个图层中lisp语言