[编程申请]：画管道的命令，任意角弯管

David Li · 发表于 2004-1-27 15:54:53

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

新年好！
我们公司的原材料大部分是管材（圆管、方管、异型管），不同规格的管有不同半径的弯管模。哪位朋友能帮我用Lisp写一个“(defun C:Tube (...)...) ”程序，执行过程与Cad的Mline命令(justification type=Zero；再加上中心线)相似：
先输入管宽度W、半径R:
输入起点start point:P0
next point:P1 ;;;完成一直段
next point:P2 ;;;中心线过程：先判断P2在P0P1哪一侧，过P1做与直线P0P1相切的弧，弧的另一端与P2的连线与该弧也相切（也可以选择输入弯管角度加直段长度的方式往下画）
...
next point: ;;;回车结束
封闭两端（开始时就可以封闭起始端）

eachy · 发表于 2004-1-27 18:18:03

最初由 David Li 发布
[B]新年好！
我们公司的原材料大部分是管材（圆管、方管、异型管），不同规格的管有不同半径的弯管模。哪位朋友能帮我用Lisp写一个“(defun C:Tube (...)...) ”程序，执行过程与Cad的Mline命令(justification type=Ze... [/B]

好像画管道和画墙体没有本质的区别，都是双线，找个建筑软件的墙体绘制命令试试。

David Li · 发表于 2004-1-28 08:17:24

能画圆角吗？能不能告诉我哪里找得到？

陌生人 · 发表于 2004-1-28 10:15:54

教你个另类的方法，你得先感谢ｗｋａｉ。：）
１．用有宽度的ｐｌ线画出管线，
２．对ｐｌ倒角(filter)
３．对ｐｌ线做投影ok!
wkai 的程序：
http://www.xdcad.net/forum/showthread.php?s=&threadid=131498

lsjjm · 发表于 2004-1-28 14:09:45

参考<<弯管参数设计及绘图程序实例>>：
http://www.xdcad.net/forum/showt ... hlight=%CD%E4%B9%DC

David Li · 发表于 2004-1-28 17:32:55

谢谢你们的帮助

sxlxf · 发表于 2004-2-2 13:58:07

我们经常做污水管道的设计与施工,这个东东太好了,谢谢

账号		自动登录	找回密码
密码			立即注册

[编程申请]：画管道的命令，任意角弯管

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子

Re: [编程申请]：画管道的命令，任意角弯管

浏览过的版块