[原创]cad工具8.29更新-源码
xshrimp
xshrimp Lv.7
2005年11月16日 12:16:58
只看楼主

没时间测试,bug发至xshrimp@21cn.com.版本 2006.12.12公布主要函数的源代码,方便会的人修改。最新版本见 http://shlisp.ys168.com【注意】: 本工具集为各种CAD免费软件的集合(大部分自己编写),个别在未经原作者许可下可能被修改过,若原作者对本工具集整合了您的软件有异议,请与我联系,我立刻将去掉。看到好的程序不免想集成在里面.很多程序非本人编写,列表如下:

没时间测试,bug发至xshrimp@21cn.com.版本 2006.12.12公布主要函数的源代码,方便会的人修改。
最新版本见 http://shlisp.ys168.com
【注意】:
本工具集为各种CAD免费软件的集合(大部分自己编写),个别在未经原作者许可下可能被修改过,若原作者对本工具集整合了您的软件有异议,请与我联系,我立刻将去掉。看到好的程序不免想集成在里面.很多程序非本人编写,列表如下:
1.图库管理程序blockwerx,命令tk
2.批量打印程序,作者秋枫,命令pplot
3.平面图转45°轴侧图,作者zhuxiaofeng,命令lrr
4.选择易,作者张帆,命令s1
5.单行文字,作者小河弯弯.命令cz
6.侧边栏,ScMenuBar.arx记得好像应该是理正建筑里的。
7.公布的lsp函数源码中也有很多,记不清是谁原创的,有许多被参考修改。
8.安装程序使用秋枫的AutoLISPSetupWizard2.2006.5.25制作而成。

【重要提示】:
1. 如果加载本工具后cad的命令和你使用的插件命令冲突。
打开diy.pgp文件(语法同cad系统的acad.pgp文件),自行修改-->命令diy。
2. sz字高、hz字高、ws线宽、js线宽、bl比例等设置在系统配置中修改.-->命令diy。
3. 命令q1,可以调用GpsTools菜单。试试命令q2,q3 。
4. 不想加多文档插件,打开main.lsp文件,删除(arxload "arxtab16.arx" "")这一行就行了。

【文件说明】:
man.lsp 主文件(控制加载菜单,其余的lsp文件)。
diy.pgp (Do It yourself)简化命令用文件,运行命令diy打开。
diy.ini 系统参数配置数据储存
diy.dcl dcl对话框配置文件
lib.lsp 主要函数(源码),所有命令均可自己修改。
libsub.vlx 程序中使用的通用公共函数库,无需修改.

【更新日期内容】:
待下、下个版本更新的内容:
.....网友提出的有建设性的意见及建议。
.....总图部分整合优化。


2006.6.22
这几天忙于工作和看世界杯,等有空时再好好整整吧.
1. 修正了几个已知的错误。
2.增加252命令,所有图层均转化成252号色,处理建筑图时用,这样可以凸出给排水图层。

2006.6.15
1.公布主要函数(源码),所有命令均可自己修改。
2.重新打包,取消时间限制。
3.水平有限汉化了部分blockwerx,希望有能力者继续汉化之。
4.秋枫的批量打印程序更新版本。

2006.5.26
1.q3命令插入阀门时.阀门不随比例一起缩放。
2.bz命令线的长度不随比例一起缩放。

2006.5.11
1.更新后多出来的bug修正,bz命令必需先运行gpstc。
2.q1命令菜单调用问题。
3.lxc测量连续长度的优化,采用Jimmy Bergmark的连续测量长度程序。

2006.2.22
________________________________________________________________

1.给diy命令提供对话框,增加系统配置.提供参数配置。
可定义标注的字线距离、标注线的长度。等等.自己运行diy命令看看.
2.总图部分还不够完善.有时间再继续优化.欢迎测试提供意见.
3.将diy.pgp系统参数配置数据储存至新增文件diy.ini。
4.新增对话框文件diy.pgp
________________________________________________________________
2006.2.15

1.优化菜单,部分程序.
2.总图部分程序重新编写.增设对话框,设置更加方便。
3.wq、de、dn、bz等程序优化一下.方便使用.

2006.1.13
1.优化拷贝命令C,锁定的物体将不能选中,拷贝的时候不易出错。
2.插入图框的加长不保存上一次的显示错误。
3.用户可以定义字体样式gps_hz,gps_sz的字体,在diy.pgp文件最后面修改。
4.不认识的字体自动替换成自己设置的字体,命令rep调用。

2006.1.9
1.增加阀门菜单,命令q3调用。自动将调整角度及将线断开。
2.增加插入图框功能,命令tt。

2006.1.5
增加部分
gpstc批量建立给排水图层
绘制管线增加.详见菜单.

2005.12.31
1.修正新增bug,比例多次输入,字体会一次次累加增大。

2005.12.28

1.捕捉自定义.
2.js,ws线宽自定义.
3.hz,sz 字高自定义.
修改方法diy打开diy.pgp文件,在#,#内容下面修改。


2005.12.27
1.修正wq命令标注.字的基点不随比例变动.
2.命令TK 增加图块管理工具blockWerx (不要到处传播,是注册版的)
因blockwerx是For AutoCAD 2004/5/6,所以在cad2002下无法使用.
如果要用去www.cadwerx.net下载For AutoCAD 2002的版本.
等有空的时候我再整合一下.
增加了我用的一些图块,文件块头增加了不少。
3.修改快捷键更加方便了,diy打开diy.pgp文件,语法同acad.pgp,修改更简便。

2005.12.12
文字增量拷贝优化修改.可以批量选择.可以选择所有物体.拷贝后只有文字值增加。

选择数值递增减,可多选,修改后的小数点位数与原数值保持一致。

2005.12.6
将图块的版本转化为CAD R14格式.
增加总图方面的一些内容.
[图中1单位表示1米]命令1、15、2、25、3、35、4、45、5、55分别表示用0.00?的坡度计算井标高.
[1000单位表示1米]命令1、15、2、25、3、35、4、45、5、55分别表示用0.00?的坡度计算井标高.
选择数字递增减
管长标注
以0,0为基点批量插图1
以0,0为基点批量插图2
Z坐标归零

2005.11.30
增加修改后的hztxt_e.shx和hztxt.shx字体。
增加上标,下标。及一些特殊字符。
菜单[文字相关]-->[字体输入法说明]。中可以看到使用方法.

2005.11.19
修正wq.dn.de.zt等角度不是整数.镜像不对的问题.
重复标注是不对的bug。

2005.11.03
修正wq标注90角时会反向的问题

2005.11.02
立管标注命令优化
管径标注DN、De命令优化,增加文字镜像,适合管上下标注。
绘制管道命令ws、js、xf、ys优化,运行前不再需要运行gpstc命令。
集成一些常用的工具--文字、图块、标注等等
详见安装完加载的菜单。

2005.9.23
多年网络搜集的cad工具集。推荐搞给排水的使用!!
雏形形成。

1135749518007.jpg


1135749518155.JPG

免费打赏
xshrimp
2005年11月29日 10:43:22
12楼
试试看就知道楼.可以用解压缩软件解开看看.
回复
mercuryers
2005年11月29日 16:18:35
13楼
先试用一下,谢谢楼主!
回复
xshrimp
2005年12月01日 16:15:10
14楼
软件先暂时更新一下.
回复
水晴
2005年12月04日 23:39:19
15楼
楼主,我那天看到 ABD 软件里有一个 修改字型 的命令,很好用,就是直接选择要改的字,然后用那个命令一改就行了,不用用CAD命令里的修改字体
还有一个问题,我发现你的图块显示和我用的版本(CAD2002)不兼容.
回复
leehuihai
2005年12月05日 10:21:38
16楼
谢谢
回复
xshrimp
2005年12月05日 11:46:23
17楼
块是用cad2004做的.转换一下就行了.已更新。
ABD软件是什么.编辑的界面,能否抓个图看看.
回复
xshrimp
2005年12月07日 10:50:06
18楼
2005.12.6.更新.
修正部分bug.
增加总图部分些东西.
回复
shockdone@co163
2005年12月09日 20:43:06
19楼
楼主 你的软件做得很好~~~我觉得比天正给排水更适用~!!而且还不断地在进步。。。希望你一直做下去~~!!呵呵 估计再搞哈是不是就要成收费软件了?
回复
shockdone@co163
2005年12月09日 22:42:31
20楼
你能不能说说我怎么把你的那些图块更改为我自己想要的图块??或者我怎么添加我自己的图块并且能被你的那个q2命令所调用?比如说存水湾图块你的只有一个方向的,我想多添加几个方向的进去该怎么办??希望指教
回复
xshrimp
2005年12月10日 14:21:25
21楼
q2对应的菜单文件见shlisp.mns中
**P06
[污水配件]
[->存水弯]
[污水盆](gps_inblk "GPS_ws_csw" "污")
[洗脸盆](gps_inblk "GPS_ws_csw" "洗")
[盥洗池](gps_inblk "GPS_ws_csw" "盥")
[小便器](gps_inblk "GPS_ws_csw" "小")
[厨房](gps_inblk "GPS_ws_csw" "厨")
[<-淋浴器](gps_inblk "GPS_ws_csw" "淋")
[->地漏]
[平面](gps_inblk "GPS_ws_dlpm" nil)
[系统P弯](gps_inblk "GPS_ws_dlpw" "漏")
[<-系统S弯](gps_inblk "GPS_ws_dlsw" "漏")
[->蹲便器]
[P弯](gps_inblk "GPS_ws_dbqpw" "蹲")
[<-S弯](gps_inblk "GPS_ws_dbqsw" "蹲")
[->清扫口]
[平面](gps_inblk "GPS_ws_qskpm" nil)
[<-系统](gps_inblk "GPS_ws_qsk" "扫")
[->浴盆]
[上](gps_inblk "GPS_ws_yps" "浴")
[下](gps_inblk "GPS_ws_ypx" "浴")
[<-左右](gps_inblk "GPS_ws_ypzy" "浴")
[坐便器](gps_inblk "GPS_ws_zbq" "坐")
菜单语法见cad帮助.比如要添加一个图块名: 闸阀.dwg
在菜单中添加 [闸阀](gps_inblk "闸阀" nil)
就行了插入图块的语法.(gps_inblk 图块名 图中加的文字)
当不加文字时,应加上nil.
回复

相关推荐

APP内打开