中统计多条线段长度

1. 新建文本文档，将以下代码复制在记事本内，“另存为”→“统计线段长度.lsp” 。(princ "\n程序：统计线段长度 命令：zz") (defun C:zz (/ CURVE TLEN SS