链接：https://pan.baidu.com/s/1wlNQsID1ywoVlQNTmWn4XA 

提取码：1234

(princ "\n程序：统计线段长度 命令：zz&#​34;) (defun C:zz (/ CURVE TLEN SS N SUMLEN) (vl-load-com) (setq SUMLEN 0) (setq SS (ssget '((0 . &#​34;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共选择 &#​34; (itoa (sslength SS)) " 条线段. 线段总长: &#​34; (rtos SUMLEN 2 3) "  &#​34;)) (princ) ) 将“统计线段长度.lsp”文件保存在AutoCAD文件夹下，找不到的直接右键单击CAD桌面图标，打开文件所在位置，将.lsp文件复制粘贴到该位置。打开CAD，命令行输入‘“app”回车，搜索框内搜索“统计线段长度.lsp”，点击加载，加载刚保存的“统计线段长度.lsp”文件 ，命令框内输入“zz”，回车，框选要统计长度的线段，回车。

当回车后出现命令行空白，不要慌张，只需将光标对准命令行，鼠标滚轮向下滑动即可出现所求结果。

光标对准命令行，滚轮向下滑动

求出结果