[原创]：单线图焊口标记程序0.6

gewanjia

这是我自己开发的单线图焊口标记程序，其中原代码全部公开程序，为中石油做资料时使用的程序，比较简陋，我希望有电脑高手不断完善这个程序，能像LIUNX那样就好了。

成不了也没有关系，供初学者参考吧！！

支持自由软件事业，支持原代码开放！！

为了使穷人也能看坚决不收币。

该程序基于 AutoCAD2006开发而成，使用Autolisp语言编写代码，适用CAD2000 – CAD2008，程序能快速绘制工艺管线正等侧轴视图.

    程序主要有两个功能：快速插入块、快速标记焊口为主；其它有些自定义命令，如旋转文字、打断直线交点等。

    程序由吉化集团北建第九分公司安装技术人员开发，由于工艺管线没有规定的制图标准，所以采用自定义图块。

    本软件为自由软件代码公开，可以修改、发布，传播，但必须明确标注原作者葛万佳。

gewanjia

哈哈

njshf

做个说明好吗

gewanjia

1.  程序简介

该程序基于 AutoCAD2006开发而成，使用Autolisp语言编写代码，适用CAD2000 – CAD2006，程序能快速绘制工艺管线正等侧轴视图.

程序主要有两个功能：快速插入块、快速标记焊口为主；其它有些自定义命令，如旋转文字、打断直线交点等。

程序由吉化集团北建第二分公司安装技术人员开发，由于工艺管线没有规定的制图标准，所以采用自定义图块。

本软件为自由软件，可以修改、发布，传播，但必须明确标注原作者。



2.程序文件简介

程序文件主要由块库—draw文件夹、程序库—program、帮助文件、单线图模板组成。

其中大部分管件在draw文件夹中，程序加载需要program文件中的ID.vlx，OL.mnu。

如果使用者懂得AUTLLISP语言可以增加功能，我的原代码是公开的，在code文件夹中。



3.程序使用方法

   第一  双击setup.exe文件，一路下一步就可以了。

第二  加载程序菜单文件：

      操作方法：输入menuload→对话框→菜单栏→菜单组→选择piping→插入→用上移和下移调整插入位置。

   最后，使用单线图模板，模板中已经设置好一些功能和图层，该程序必须依赖此模板；如果不用，程序也能进行，只是会自动生成图层,如果对命令熟悉可以不加载菜单文件，视个人喜好而定。





4.命令使用

命令以快速插入图块命令为主，其中的大部分管件为阀类、大小头等；由于代码公开，所以有能力者可以自定义图块。

4.1 插入图块的命令：

球阀：    Q1、Q2、Q3。

闸阀：    Z1、Z2、Z3

截止阀：  J1、J2、J3

电动调节阀：DD1、DD2

安全阀：  A1、A2

大小头：  D1、D2、D3、D4、D5、D6

疏水阀：  S1  S2  S3

旋起阀：  XQ1

阻火器：  ZH1

方向表示： FX

单线图图框TK

探伤符号： TS

这些命令是以管件汉字拼音缩写。

命令执行需要输入比例，如使用默认，那么回车即可，命令中的阿拉伯数字和下图的方向是一致的。





4.2标记焊口命令

命令为：WLC     输入后提示选择对象：选取标记焊口管段，输入到管线两端的距离，最后输入标记点的半径，如图黄点为标记焊口。


4.3标记焊口序号命令

命令为：WT    命令执行提示输入字符高度、起始字符、然后可以点。

序号会自动递增1。


4.4手动标焊口命令

命令为: WL

这个命令和上个命令类似，只是能自动在管线标出焊口位置，并且序号自动递增；

注意在管线附近点，程序会自动捕捉离管线最近的点，同时生成焊口符号，如果太远程序会提示捕捉不到。


4.5 打断选取区域内直线交点命令

命令为：OL

这个命令主要处理管线中三通，使其也能标记焊口；注意该命令效率并不高，打断20000交点需要159s，乱打断是恢复不了。

    选取直线，命令执行后返回消耗的时间，通过WLC来验证如图：


4.6打断命令

命令为： BI

主要形成立体感，先选两直线的交点，后选要断直线，必须点在直线上。

注意：先选交点时，只要把光标放在交点附近不要太远，程序会自动捕捉的；第二个点一定要在那个要打断直线上。

建议使用AutoCAD2005、AutoCAD2006,因为选取时会高亮显示。


4.7 BREAK的改进版

命令为：BV 先选取直线，然后直接选择直线上的两个点。

4.8 旋转文字命令

命令为：T3、T5、T9。

依次逆时针旋转30度、顺时针旋转30，旋转90度。


4.9 恢复命令

   命令 BZ

   人有失误，马有失蹄！！  程序也不是那么完善的。

   如果命令使用不当，或不小心、失误，可以用该命令来恢复先前的捕捉设置。

   另外，介绍一个小命令（不是我开发的）命令为 JOIN 可以把断开的直线连接上（两直线在一条直线上）。

4.10 连续标记焊口命令

   命令为 GW

   该命令应该慎用，因为还有不完善地方，实在是小弟本人水平有限，但是这个命令也是最强大的。

   使用方法：第一选择管线的开始点和开始点所在的直线。

             第二 选择分支点后你想标记正确方向那个直线（是直线不是点），有几个分支标记几个。

             第三 选择管线最后一个直线。

   注     意：如果管线没有分支，那么第二就不用选；在程序执行的过程中图形会缩放一下；在测试版中会显示一些执行过程中的数据，在正式版中就不会显示了。

              如果有分支的话，分支必须用ol命令把分支的直线打断（切记）。




5. 关于模板的说明

   模板自动设置一些图层，为了方便绘图和以后升级使用，主要是管线层、无损检验层、标注尺寸层、标注文字层，

同时，还有一些必要设置，这样可以使绘图事半功倍。

6. 存在的问题

   6.1  程序不能屏蔽ESC键，所以在程序命令还有执行完时；如果按下ESC，那么导致程序中间变量不能恢复，结果是“对象捕捉”栏所有的设置全部重新设置。

   6.2  养成良好的绘图习惯，因为该程序少部分命令不可以Ctrl + Z撤消。

   6.3  还有标注部分程序，我可以在以后完成，如果有好的意见及时联系我。

   6.4  本人将在明年为程序添加读写Excel文件的功能，为定位测量做准备。

7.使用反馈

如果使用本软件，发现有任何问题请与作者联系。

邮箱为：gewanjia@163.com。

                               
登录/注册后可看大图

[IMG]

                               
登录/注册后可看大图

[/IMG] [PHP]SSS[/PHP]

hbwalter

谢谢你，可惜我现在不能下载

gewanjia

没有问题  可以下载！！

我真希望有高手修改完善呀 ，不过这么长的时间没有高手完善或提出意见，我有点失望呀！！！！

不过 我还会不断完善的！！！

wawbt

楼主厉害,值得学习,有专门标注焊缝的程序没?

lhb0630

今天才知道规则，有时间一定多来

jason6188

感谢楼主提供！

huahuagupiao

今天才知道规则，有时间一定多来