CAD繪圖中多個線段的總長度測量方法
1,打開記事本,然後将下列命令複制到記事本,保存後,将記事本名稱改為 “統計線段長度.LSP”。
(princ "\n程序:統計線段長度 命令:zz")
(defun C:zz (/ CURVE TLEN SS N SUMLEN)
(vl-load-com) (setq SUMLEN 0)
(setq SS (ssget '((0 . "CIRCLE,ELLIPSE,LINE,*POLYLINE,SPLINE,ARC"))))
(setq N 0)
(repeat (sslength SS)
(setq CURVE (vlax-ename->vla-object (ssname SS N)))
(setq TLEN (vlax-curve-getdistatparam CURVE (vlax-curve-getendparam CURVE)))
(setq SUMLEN ( SUMLEN TLEN))
(setq N (1 N))
)
(princ (strcat "\n共選擇 " (itoa (sslength SS)) " 條線段. 線段總長: " (rtos SUMLEN 2 3) " .")) (princ)
)
2,打開CAD,輸入APPLOAD,然後加載統計線段長度.LSP文件。如下圖所示,顯示已“成功加載 統計線段長度.LSP” 。這樣就可以統計多條線段的總長度了。
3,打開CAD軟件,畫幾條線段(畫圖中,線纜方面建議使用
PLINE多段線畫圖,快捷鍵PL ,這樣方便統計總長度).用ZZ指令,然後選擇1條或者多條需要測量的線段,按回車命令欄裡就是出現多天線段的總長度.如下圖所示:
打出指令按回車:
選擇需要測量的線段:
按回車總長度統計出來了:
注:上圖中亂碼部分不影響供能的使用.有高手知道亂碼原因可以評論留言,多多指教。
,更多精彩资讯请关注tft每日頭條,我们将持续为您更新最新资讯!