CAD中如何一次性统计多条直线(曲线)的长度Word文档格式.docx

CAD中如何一次性统计多条直线(曲线)的长度Word文档格式.docx

《CAD中如何一次性统计多条直线(曲线)的长度Word文档格式.docx》由会员分享，可在线阅读，更多相关《CAD中如何一次性统计多条直线(曲线)的长度Word文档格式.docx（2页珍藏版）》请在冰点文库上搜索。

e1 

e2 

l 

s 

x1 

x2 

y1 

y2 

xx 

yy 

ll 

lll） 

（setq 

ln 

0 

lll 

0） 

（ssget）） 

;

Select 

objects 

（if 

（progn 

If 

any 

selected 

（sslength 

p）） 

（while 

（<

n） 

For 

each 

object... 

（= 

"

LINE"

（cdr 

（assoc 

（entget 

（ssname 

l）））））） 

10 

e） 

11 

e）） 

（cadr 

e1） 

（caddr 

e1）） 

（se

tq 

e2） 

e2）） 

（abs 

（- 

x1）） 

y1））） 

（sqrt 

（+ 

（* 

xx） 

yy）））

） 

ll）） 

1）） 

（1+ 

l）） 

（print 

total 

line 

number= 

（princ 

ln） 

length= 

（terpri） 

2、另存为cdtj.lsp

cdtj自己命名，之后将能作为快捷方式使用，示例cdtj为长度统计拼音首字母

3、打开CAD或天正建筑

4、点击“管理”→“加载应用程序”→选择“cdtj.lsp”→“加载”→“关闭”

5、在cad命令栏输入：

cdtj

6、“请选择需统计长度的曲线（支持直线、多段线、圆弧、圆、椭圆弧、椭圆、样条曲线）:

”

7、“请点取结果标注位置<

退出>

:

”