cad lsp插件大全

system

软件标签:  cad插件   autocad
cad lsp插件合集是由绿色资源网小编精心为大家整理的autocad软件的应用插件，主要是用于拓展autocad软件的一些功能，有需要的朋友欢迎来绿色资源网免费下载使用。
autocad软件介绍
autocad（autodeskcomputer aided design）是用于二维绘图、详细绘制、设计文档和基本三维设计，现已经成为国际上广为流行的绘图工具。autocad具有良好的用户界面，通过交互菜单或命令行方式便可以进行各种操作。它的多文档设计环境，让非计算机专业人员也能很快地学会使用。在不断实践的过程中更好地掌握它的各种应用和开发技巧，从而不断提高工作效率。autocad具有广泛的适应性，它可以在各种操作系统支持的微型计算机和工作站上运行。




   autocad 2017简体中文 for 32位/64位 win 7/8/10 汉化版     授权：软件 winall, winxp, win7, win8    大小：1000m    语言：中文

  autocad2017是一款专为用户带来的最新本，具有完善的图形绘制功能、强大的图形编辑功能同时支持多种硬件设备和操作平台，还可以通过多种应用软件适应于建筑、机械、测绘、电子、服装以及航空航天等行业的
    下载地址  


cad lsp插件大全包含：
bg.lsp --- 表格自动生成

asc.lsp --- 将文本文件内容写入图中，字符是单个的

wf.lsp --- 将图中字符写入磁盘

exstr.lsp --- 将字符串分解成单字

pgtxt.lsp --- 将字符合成字符串

pb.lsp --- 通过给出长度将字符串分成两个串

cht.lsp --- 直接修改文字内容或块属性

ct.lsp --- 对数字串进行加减

chh.lsp --- 直接修改文字高度

chhw.lsp --- 直接修改文字高宽比(针对pkpm软件将字符定位点改为左下角)

chst.lsp --- 直接修改文字字体

txt.shx --- 修改后的标准txt.shx文件。(kuozhan.sld为增强的内容幻灯片)

tiao.lsp --- 配合修改过的标准字体文件，将中文字符调大

tiao1.lsp --- 配合修改过的标准字体文件，将英文字符调小

untiao.lsp --- 上两个程序的复原

sht.lsp --- 在图中查找字符串

zhuang.lsp --- 桩点及钎探号绘制（勘测图）

dim.lsp --- 配合jt.dwg将尺寸标注调成适合建筑结构设计(1:1)

dimm.lsp --- 配合jt.dwg将尺寸标注调成适合建筑结构设计(1:100)

di1.lsp～di8.lsp --- 直接连续标注尺寸(用于1:1的图)

di100.lsp～di800.lsp --- 直接连续标注尺寸(用于1:100的图)

brk.lsp --- 将一线条在与其它线条相交处断开

peditx.lsp --- 成批修改线条的线宽

ex.lsp --- 分别或一起或通过层来炸开块、尺寸标注及pline线

chcr.lsp --- 修改园和园弧的半径

lay.lsp --- 通过点取层上一实体来实现层操作：删除/解冻/冻结

bg0.lsp --- 直接将正负零标注在图纸中(建筑结构图用)

bg1.lsp～bg4.lsp --- 标注各种标高

hu.lsp --- 直接给出园弧长度

jdx.lsp --- 截断线

jdx2.lsp --- 双截断线

bdgj.lsp --- 板底钢筋(土建结构图用)

bdgj1.lsp,bdgj2.lsp --- 板顶钢筋(土建结构图用)

dk1.lsp～dk8.lsp --- 配合pkpm软件生成的图绘洞口(基础留洞）

gl1.lsp～gl8.lsp --- 配合pkpm软件生成的图绘过梁(结构平面图）

gzz.lsp --- 构造柱绘制

acad.lin --- 增强的线型文件, 扩充线型(线型比例为1)如下:

xx -- 虚线(用于1:1的图)

dhx -- 点划线(用于1:1的图)

xx100 -- 虚线(用于1:100的图)

dhx100 -- 点划线(用于1:100的图)

acad.lsp --- 增强的acad启动文件, 命令扩展如下:

chxx -- 将线型改为虚线(用于1:1的图)

chdhx -- 将线型改为点划线(用于1:1的图)

chxx100 -- 将线型改为虚线(用于1:100的图)

chdhx100 -- 将线型改为点划线(用于1:100的图)

chcon -- 将线型改为连续线

chc -- 直接修改实体的颜色
cad lsp插件使用方法
需加载统计块数命令，创建一个文本文档，把下面的内容复制进去，保存-退出-修改文件名后缀为lsp文件，用cad加载这个lsp，执行命令bn-选择要统计的块（点选一个样本），框选-右键后命令栏就有了。




;;; 统计图块

(defun c:bn ( )

(princ "
请选择图块")

(seleblk) ;选择块

(setq blkname (cdr (assoc 2 (entget blk)))) ;得到块名

(setq ss1 (ssget (list (
cons 2 blkname))))
(setq blknumber (sslength ss1))

;(textscr)

(princ "你选择的图块名为 ")(princ blkname)(princ " 共有 ")(princ blknumber)(princ "个")(prin1)

)

(defun seleblk()

(setq blk (car (entsel "
select source block:")))

(if (/= "insert" (cdr (assoc 0 (entget blk))))

(progn

(princ "
你选择的不是块，请重新选择")

(seleblk)

https://blog.51cto.com/u_16099270/9147646