MOSES系列经典结构小程序
imoses
imoses Lv.2
2008年08月09日 12:06:37
只看楼主

今天,我决定把近几年写的几个小程序集中拿出来,跟大家共享,都是结合结构人常用的一些机械劳动而写。这些程序主要是用VB对AutoCAD进行的二次开发,使用前最好先打开AutoCAD,且所有程序均支持AutoCAD 2004~2006版本。首先把程序可能用到的两个字体传上来。如果有朋友对编辑字体文件感兴趣,我后面跟贴详解怎么自己修改字体文件,如用(代替%%130作为钢筋符号等。很多人用探索者的钢筋字体是因为自己不会编写钢筋字体。其实我觉得探索者的钢筋字体确实非常难看,打印出来干巴巴的。

今天,我决定把近几年写的几个小程序集中拿出来,跟大家共享,都是结合结构人常用的一些机械劳动而写。这些程序主要是用VB对AutoCAD进行的二次开发,使用前最好先打开AutoCAD,且所有程序均支持AutoCAD 2004~2006版本。首先把程序可能用到的两个字体传上来。如果有朋友对编辑字体文件感兴趣,我后面跟贴详解怎么自己修改字体文件,如用(代替%%130作为钢筋符号等。很多人用探索者的钢筋字体是因为自己不会编写钢筋字体。其实我觉得探索者的钢筋字体确实非常难看,打印出来干巴巴的。
其实探索者里面的很多功能根本就用不着的,CAD本身都有该功能,只是很多初学者不知道怎么用而已,比如关闭层和显示层命令,用CAD本身的该命令比探索者的关层显层速度不知道快了多少倍。
[attach]3364680[/attac

[ 本帖最后由 imoses 于 2008-8-20 21:10 编辑 ]
755143734a7a00823419.rar
600 KB
立即下载
免费打赏
imoses
2008年08月09日 12:19:21
2楼
1、程序开发背景:使用过PKPM出计算书的朋友都知道,如果要出漂亮的计算书(如文字重叠等问题),一般是把T文件转换成dwg文件,再进行处理,如删除构件编号、文字处理(对齐方式、高宽比),以及一张一张的dwg文件打开再打印,非常麻烦,一般用ctr+c和ctrl+v把要打印的合并到一个文件,再处理。程序就是简化这些操作而写。
2、程序使用方法:将需要打印的T文件均转换成DWG格式,并把这些DWG格式文件拷贝到一个单独文件夹。再启动AutoCAD,执行本程序,在程序中指定该文件夹,程序自动把该文件夹中所有DWG文件分行列合并到一个输出文件中,程序还可以按需要进行删除不需要的构件编号等内容,文字替换、文字高宽比、生成计算书封面、比例自动缩放以协调输出大小等自动处理
3、界面预览如图
计算书整理.JPG
4、计算书整理( 合并图纸)程序

回复
imoses
2008年08月09日 12:31:29
3楼
1、程序开发背景:相信结构人拿到一套建筑图,如果一张张的将他们打印出来肯定感觉很烦吧,尤其是超高层的计算书内容有时候很多很多,一张张的法哦那个多么麻烦啊,本程序就是把模型空间所有需要打印的内容一张张自动的发送到打印机或者打印成pdf或者其他图像文件。
2、使用方法:如果需要打印的的每张图纸有一个相同的图框(块参照),则选择批量打印依据为按图框图块。如果没有图框(图块),如计算书整理生成的计算书输出,则在某一单独图层中用一个个的rec对象将要打印的内容框起来,选择批量打印依据为按矩形图层。
3、功能:如果是按矩形图层的话,还可以像PKPM一样居中打印和自动缩放(如内容很小,而外框很大时,内容自动放大等)、打印顺序适应部分打印机反向出图等。
4、运行界面预览
批量打印.JPG
5、模型空间批量打印程序
回复
imoses
2008年08月09日 12:39:10
4楼
1、程序开发背景:使用过AutoCAD的朋友估计都想它拥有像Word一样的对齐均布的功能吧。比如有10行文字,每行间距比较随便,而且每行凹凸不齐,如果要使之美观,也不容易。本程序就是对此而开发。
2、使用方法:选中需要对齐或者均布的对象,再启动本程序,选择对齐或者均布或者二者均选中。可以让程序根据最两端的对象推算中间的间距,也可以由用户自己指定一个间距,比如可以让每个对象按指定间距排列。
3、运行界面预览
对齐均布.JPG
4、AutoCAD对齐均布程序
回复
imoses
2008年08月09日 12:49:15
5楼
1、当有修改时,如何检查用平法绘制的梁图配筋是否小于SATWE的配筋文件?当箍筋肢数较多,有时候还有二级箍,全部心算也很累吧。本程序的作用就是把已经绘制好的平法梁图转换成SATWE那样的结果,供核查用。
2、使用方法:启动程序,框选梁图,程序自动会把含钢筋的文字挑选出来,并逐个翻印成satwe输出的那种格式。特别注意程序中统一钢筋等级问题。程序对箍筋、纵筋以及扭筋按指定等级等强度转换,所以转换出来的数字未必就是简单的面积和了。另外,对构造钢筋不作强度变换,仅输出其面积供核查腰筋率用,单位也是平方毫米。程序为避免改变原图,将原图的钢筋层关闭并冻结,翻译后的数字放在一新建图层中,该图层删除没有关系。
3、程序运新界面预览
钢筋翻译.JPG
4、平法钢筋翻译软件
回复
imoses
2008年08月09日 13:02:07
6楼
1、程序开发背景:不知道朋友们有没有碰到用PKPM后处理绘制出的钢筋居然比SATWE的配筋文件小的情况,我就碰到过,咨询PKPM公司也说不出个所以然,无奈之际只好逐层按照SATWE的配筋结果自己配钢筋了,谁叫我们做结构呢?做结构安全第一阿,累就累吧,没办法。但是如果碰到一个高层,对每个标准层每根梁去对照配筋文件简直是要命,而且对得人头晕眼花,谁都不敢担保没有疏忽,可这配筋是最严肃的原则问题阿。本程序对此而开发。
2、使用方法:将SATWE结果文件需要归并的几层转换成dwg格式(如WPJ2~WPJ15),将他们拷贝到一个单独的文件夹中,再启动本程序,指定该文件夹,且确认要比较的构件类别,程序自动逐层比较每个配筋文字取其大值输出。比如WPJ2某根梁为8-9-10,而WPJ3该梁为10-0-12。仅此两层比较的话,输出结果该梁配筋为10-9-12。
3、注意:使用本程序时不能用时satwe里面的文字避让,也不要移动或者改变文件里文字对象的位置。另外,如果某层有一个梁,而某层又没有,则归并结果显示该梁配筋在归并异常层。
4、程序运行界面预览
归并钢筋.JPG
5、归并钢筋程序


[ 本帖最后由 imoses 于 2008-8-9 22:22 编辑 ]
回复
imoses
2008年08月09日 13:07:44
7楼
今天就传到这里,大家对以上程序尽管测试挑错,有问题我就修改,呵呵呵。还有梁柱截面配筋(箍)率计算及自动绘图、图纸存档拆分、提取图纸字体、整理梁编号、轴线名加前缀或者后缀、可自动修改的层高表、自动填写图名及生成目录单、扩初图纸中梁截面文字自动偏移半梁宽等等程序。等注册考试结束,如果大家盖楼能盖到80楼以上,我就把剩下的都传上来,如果不够我就删除闪人,免得放版面上浪费资源哈

[ 本帖最后由 imoses 于 2008-8-9 22:33 编辑 ]
回复
ahhuicao
2008年08月09日 16:16:56
8楼
:kiss: 好家伙 顶
回复
xjlml
2008年08月09日 18:35:19
9楼
看不到啊,怎么回事啊
回复
imoses
2008年08月09日 22:16:25
10楼
楼上的朋友是看不到界面预览,还是看不到下载链接阿?应该不会看不到吧,难不成还要重传不成?那太麻烦了哦

[ 本帖最后由 imoses 于 2008-8-9 22:18 编辑 ]
回复
lobby832003
2008年08月09日 23:28:27
11楼
测试下,楼主强人啦:)
回复

相关推荐

APP内打开