自AutoCAD 2007版本加入 SWEEP掃掠 功能後，在3D建模上幫助真的很大~
但是比較遺憾的是不支援多重選取，所以當路徑越多就得一條一條的選取!
因為工作上3D建模時需要多重選取，所以寫了簡單的程式滿足工作需求，在此也和各位分享!
代碼:(DEFUN C:SweepM ()
(COMMAND "UNDO" "BE")
(SETVAR "CMDECHO" 0)
(SETQ OLAYER (GETVAR "CLAYER"))
(SETQ ODELOBJ (GETVAR "DELOBJ"))
(SETVAR "DELOBJ" 0)
(setq ENT (entsel "\n選取要掃掠的物件:"))
(IF ...
↧