[资料原创]土钉墙自动绘图程序（Autolisp编写） [复制链接]

程序主界面，可以将参数保持到文件，可以导入理正4.3以上版本的计算结果。

图片:01.jpg

l^ 4OC
 
4E"d/  
参数设置，可以对图形形式及工作量计算参数进行设置

图片:02.jpg

  Y4~vC[$x'  
H$!-f>Rxa  
工作量及概算结果，可以保存到文件

图片:03.jpg

  R$b,h  
0*(K DDv  
概算参数的设置

图片:04.jpg

:B#EqeI  
":WYcaSi  
一个小小的土钉墙工具计算器

图片:05.jpg

  }X1.Wt=?  
t/:w1rw  
文件导入界面

图片:07.jpg

5 Rz/Ri\c=  
`ENP=kL(+  
程序注册界面

图片:08.jpg

P!\hnm)%4  
J6|JWp  
如有好的意见和建议，请联系本人。 4e%8D`/=M  
下面是tdq的主程序，可在CAD2004及其以上版本加载 N2~$rpU3  
附件：1、无人顶贴暂停下载 jW5iqU"{*  
            2、dytxt1及Hztxt3字体 Font support.rar (588 K) 下载次数:153

程序在哪？贴出来共享一下。

对不起，刚才没看见。

引用第1楼hyflying于2008-06-03 22:20发表的  : _<u;4RO(s  
程序在哪？贴出来共享一下。

jaqV[*440U  
Yq0# #__  
你的速度真快，我的帖子还没有发完呢。

那你什么时候发啊，我急用啊

情人阿

引用第4楼xyx_34于2008-06-04 02:17发表的  : @|'Z@>!/pV  
那你什么时候发啊，我急用啊

wNR=?Z~  
6>lW5U^yA\  
最新版本已经上传，请关注

怎么用呀楼主

楼主，运行时提示缺少字形文件呀，dytxt1.shx 或 hztxt3.shx

提示如下 zM)M_L  
Command: tdq I>!|3ElT  
缺少字库文件：dytxt1.shx 或 hztxt3.shx vo.EM1x  
**Outside limits |:}L<9Sq  
程序非正常退出。 0x6@{0  
Specify start point: *Cancel*

对了，我用的是CAD2008

引用第9楼algor于2008-06-05 20:00发表的  : zCyR<as7  
提示如下 wX@H &)<s  
Command: tdq L/c4"f|.*v  
缺少字库文件：dytxt1.shx 或 hztxt3.shx 3KR2TcT#{  
**Outside limits zv&ePq\#  
程序非正常退出。 m<~>&mWr  
.......

'! #On/  
L,tZh0  
可自行下载，本贴也已贴出。