筆者在
AUTOCAD中編輯大量圖形時，發(fā)現(xiàn)僅用AUOTCAD本身提供的命令，效率實在太低，故編寫系列批量處理
程序以提高工作效率、工作質(zhì)量。
N)Z,/w 9 sHulaX{ 1.批量修改POLYLINE的線寬(CH_w)：
as6YjE.Yy k
GzosUt 我們知道編輯一條POLYLINE的線寬可以通過Pedit命令來完成，如果需要編輯多條POLYLINE時還使用Pedit命令則不但需要選擇目標，還要輸入線寬，實在有點不方便，而且還可能漏選。其實編寫個小小的LISP程序便可一次性完成。程序CH_W.LSP如下：
w;Na9tR [Y]\sF;J (DEFUN C:CH_W( / wid ent_ss n_ss ent_n j ent_a)
6rOd80 \ 5*pCb,z>q (PRINC " 請選擇目標(W C WP CP F)")
vL7 JzSU_ R nf$
(SETQ ENT_SS (SSGET) WID (GETREAL" 請輸入線寬<0.3>："))
5r pTR
