SolidWorks机械工程师网——最大的SolidWorks学习平台

 找回密码
 立即注册

QQ登录

只需一步,快速开始

查看: 3793|回复: 55
打印 上一主题 下一主题

AutoCAD Lisp程序100例

  [复制链接]

8

主题

44

帖子

47

金币

天使

Rank: 2Rank: 2

积分
132
QQ
跳转到指定楼层
楼主
发表于 2009-9-24 15:42:35 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式

   经典图书
压缩包中含有以下面程序,且均以源程序方式给出,您可以使用、参考、修改它。解压缩后请先看说明文件。
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 -- 直接修改实体的颜色

acad tools.rar (269.83 KB, 下载次数: 89)
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏1 转播转播 分享教程|习题|模型|技巧 点赞点赞 拍砖拍砖
SolidWorks机械工程师网
提示:建议使用谷歌浏览器浏览本网站!如单击这里下载!否则,可能无法下载附件文件!(支持大多数版本的谷歌浏览器,支持360和QQ浏览器的极速模式,即谷歌内核模式,使用IE和Edge浏览器,浏览个别网页以及下载文件时,会误报“***不安全”,此时需要单击“继续访问此不安全站点(不推荐)”才可以继续下载,另外,本网站不含任何不安全的文件,已联系微软公司解决,纯属IE和Edge浏览器误报)
回复

使用道具 举报

6

主题

50

帖子

36

金币

天使

Rank: 2Rank: 2

积分
127
QQ
沙发
发表于 2009-9-27 00:26:52 | 只看该作者
goodgood.........
SolidWorks机械工程师网
提示:建议使用谷歌浏览器浏览本网站!如单击这里下载!否则,可能无法下载附件文件!(支持大多数版本的谷歌浏览器,支持360和QQ浏览器的极速模式,即谷歌内核模式,使用IE和Edge浏览器,浏览个别网页以及下载文件时,会误报“***不安全”,此时需要单击“继续访问此不安全站点(不推荐)”才可以继续下载,另外,本网站不含任何不安全的文件,已联系微软公司解决,纯属IE和Edge浏览器误报)
回复 支持 反对

使用道具 举报

3

主题

37

帖子

19

金币

天使

Rank: 2Rank: 2

积分
88
QQ
板凳
发表于 2009-9-27 15:53:56 | 只看该作者

   经典图书
goodgood.........
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

5

主题

51

帖子

35

金币

天使

Rank: 2Rank: 2

积分
131
QQ
地板
发表于 2009-9-29 14:45:50 | 只看该作者
ding ding ding
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

2

主题

38

帖子

12

金币

天使

Rank: 2Rank: 2

积分
75
QQ
5#
发表于 2009-10-5 04:06:37 | 只看该作者

   经典案例图书
ding ding ding
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

4

主题

41

帖子

21

金币

天使

Rank: 2Rank: 2

积分
101
QQ
6#
发表于 2009-10-6 08:53:18 | 只看该作者
solidworks网,必须顶一下
3qsolidworks网,必须顶一下
solidworks网,必须顶一下
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

1

主题

43

帖子

10

金币

天使

Rank: 2Rank: 2

积分
60
QQ
7#
发表于 2009-10-8 10:14:36 | 只看该作者

   经典案例图书
solidworks网,必须顶一下
3qsolidworks网,必须顶一下
solidworks网,必须顶一下
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

5

主题

35

帖子

27

金币

天使

Rank: 2Rank: 2

积分
107
QQ
8#
发表于 2009-10-9 01:37:16 | 只看该作者
一共几个包啊~~~
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

2

主题

41

帖子

14

金币

天使

Rank: 2Rank: 2

积分
54
QQ
9#
发表于 2009-10-11 01:17:30 | 只看该作者
一共几个包啊~~~
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

7

主题

51

帖子

44

金币

天使

Rank: 2Rank: 2

积分
153
QQ
10#
发表于 2009-10-11 02:49:46 | 只看该作者

   经典图书
ddddddddddddd
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

3

主题

40

帖子

23

金币

天使

Rank: 2Rank: 2

积分
63
QQ
11#
发表于 2009-10-14 20:36:21 | 只看该作者
谢谢very much@!
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

3

主题

38

帖子

19

金币

天使

Rank: 2Rank: 2

积分
82
QQ
12#
发表于 2009-10-14 20:53:55 | 只看该作者
xiexie la!!!!!!!!!!!!!!!!!!!!!!!!!!!!11
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

5

主题

38

帖子

30

金币

天使

Rank: 2Rank: 2

积分
102
QQ
13#
发表于 2009-10-14 23:18:55 | 只看该作者
好东本,谢了
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

4

主题

50

帖子

21

金币

天使

Rank: 2Rank: 2

积分
90
QQ
14#
发表于 2009-10-20 15:44:13 | 只看该作者
谢谢了.
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

1

主题

41

帖子

9

金币

混混

Rank: 1

积分
29
QQ
15#
发表于 2009-10-21 01:32:58 | 只看该作者
加入QQ群
参与讨论和学习

SolidWorks技术交流群

或扫描二维码加入

很厚道,不看说明差点下了
我已经有了
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

9

主题

46

帖子

53

金币

天使

Rank: 2Rank: 2

积分
160
QQ
16#
发表于 2009-10-22 00:45:44 | 只看该作者

   经典案例图书
好东西,多谢,分享
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

7

主题

55

帖子

39

金币

天使

Rank: 2Rank: 2

积分
142
QQ
17#
发表于 2009-10-25 03:14:03 | 只看该作者
加入QQ群
参与讨论和学习

SolidWorks技术交流群

或扫描二维码加入

怎么下载不了啊
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

2

主题

54

帖子

12

金币

混混

Rank: 1

积分
43
QQ
18#
发表于 2009-10-28 05:51:08 | 只看该作者

   经典案例图书
楼主能发一份给我吗,下载不了
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

6

主题

47

帖子

33

金币

天使

Rank: 2Rank: 2

积分
113
QQ
19#
发表于 2009-10-30 13:43:28 | 只看该作者
好啊,谢谢了,楼主
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

5

主题

42

帖子

33

金币

天使

Rank: 2Rank: 2

积分
122
QQ
20#
发表于 2009-10-31 22:14:14 | 只看该作者
goodgood.........
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

SOLIDWORKS 2023 机械设计从入门到精通

手机版|小黑屋| GMT+8, 2025-6-2 20:46 , Processed in 0.285878 second(s), 25 queries , Memcache On.

SolidWorks机械工程师网 ( 鲁ICP备14025122号-2 ) 鲁公网安备 37028502190335号

声明:本网言论纯属发表者个人意见,与本网立场无关。
如涉版权,可发邮件: admin@swbbsc.com

快速回复 返回顶部 返回列表