需要自定义多段线Lisp
我需要一个命令来提示用户选择对象,然后用4“大概是空间的问题。虽然我知道我可以手动完成,但我通常在角度变化很大的大面积上完成,这可能会非常耗时。我知道这是一个很高的要求,但我保持乐观。我真的不知道从哪里开始,但我非常感谢你们的任何意见。我附上了一张最终结果的图片,希望clarif能看到y这将为您提供大部分方法:轮廓对象 我想建议:
(defun C:test ( / d SS )
(initget 1)
(setq d (getreal "\nSpecify offset distance :"))
(if (and d (setq SS (ssget)) (setq SS (LM:outline SS)))
(progn
(command "_.offset" d (ssname SS 0) "\\" "")
(entdel (ssname SS 0))
)
)
(princ)
) 这绝对是一个开始。谢谢大家!关于让它将未连接的对象识别为块并围绕它们进行跟踪,就好像它们是连接的,有什么想法吗?
页:
[1]