湜１只鱼 发表于 2013-6-27 12:47:02

快捷偏移

看看这个快捷偏移怎么简化语言

sachindkini 发表于 2013-7-1 16:45:22

dear sir,
better try this

(defun OffsetTemplate (dist)
(command "_.offset" dist)
(while (> (getvar 'cmdactive) 0)
    (command pause)
)
)

(defun c:100 () (OffsetTemplate 100) (princ))
(defun c:150 () (OffsetTemplate 150) (princ))
(defun c:230 () (OffsetTemplate 230) (princ))

hao3ren 发表于 2013-6-27 12:54:05

还是你牛逼
页: [1]
查看完整版本: 快捷偏移