[分享]：我收集修改的LISP。

saltxf

asc.lsp --- 将文本文件内容写入图中，字符是单个的
wf.lsp --- 将图中字符写入磁盘
exstr.lsp --- 将字符串分解成单字
pgtxt.lsp --- 将字符合成字符串
pb.lsp --- 通过给出长度将字符串分成两个串
cht.lsp --- 直接修改文字内容或块属性
ct.lsp --- 对数字串进行加减
chh.lsp --- 直接修改文字高度
chhw.lsp --- 直接修改文字高宽比(针对PKPM软件将字符定位点改为左下角)
chst.lsp --- 直接修改文字字体
bg.lsp --- 表格自动生成
txt.shx --- 修改后的标准txt.shx文件
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 --- 构造柱绘制

biham

哇，真的很好，谢谢楼主的提供。

hust_laohu

好东西
我来用用看

Cyberyll

不错,谢谢楼主了!!

armand

都是好动动啊。可惜我下载不了啊。

simy

楼主辛苦了
我来下一个

modaosy

好！不错！谢谢！比我的全多了！

hyx_lyn

谢谢楼主，对于我来说这是一个学习的好例子

就是说明少一些，我自己加吧

lhj743

楼主你好！
我没法下载，
给我一个邮件好吗？
lhj743@163.com
拜托了！

lzy9788

还不错，不过也有些希望你能改进，你的ax.lsp要是能加个DCL就好了。标注的尺寸是散的，ax中的线型最好是acad通用的，要不你上个自定义的线型文件。
我觉得ax最需要改进，否则用途不大。

gdqbx

有几个是找了很久的，谢谢楼主。

许展

好东东要一起分享

whcdy

这些是不是FOR ACADR14的？

saltxf

最初由 whcdy 发布
[B]这些是不是FOR ACADR14的？ [/B]

可以，直接加载就行了。

li_seashore

哇，真的很好，谢谢楼主的提供。