给大家贡献一个地形剖面线绘制程序(源码公开！！）

mkhsj928 · 发表于 2004-7-30 23:32:00

本帖最后由作者于 2005-4-29 22:24:40 编辑

对搞土木工程的人员很有用的哦！

下载解压后把pmx.fas和pmx.dcl两个文件复制到CAD的Support目录下，加载pmx.fas程序

运行命令：pmx

完善版见14楼

——Lsp程序源码＋dcl文件

wmz · 发表于 2004-7-31 10:42:00

你又不提供源程序,别人用时遇到了问题,不知如何解决.

mkhsj928 · 发表于 2004-7-31 10:51:00

一般在CAD2002以上版本下运行应该没问题

wmz · 发表于 2004-7-31 15:51:00

我不是那个意思,比如运行中提示"数据输入有误",我不知道倒底要什么样的数据,是个什么格式的数据!

nodbird · 发表于 2004-7-31 16:09:00

如果你想让大家分享，那应该把原程序拿出来，大家根据自己所需修改使用.你现在的这种不叫分享,只叫让大家试用,别告诉我们你后面会推出收费版哦~~!

cqnj023 · 发表于 2004-7-31 16:21:00

很好，只是当剖面线是折线时好象有点问题，长度不够。另外想在没有等高线的地方内插一个点，不知怎么处理？在数据输入时，自动获取的对象出现顺序有点跳跃，不是连续出现，不知是什么原因？

mkhsj928 · 发表于 2004-7-31 21:48:00

mkhsj928 · 发表于 2004-7-31 22:14:00

本程序完全是在工作中为了偷懒自己编的，程序从CADR14开始到现在已经多次修改功能基本上够用！但由于还有待改进，暂不会出现收费情况。

如等高线呈连续递增或递减情况，为减少键盘输入，输入第一条等高线高程后，在提示输入第二条等高线高程时，输入“＋n”或“－n”，其中n表示等高距，后面的直接回车（鼠标右键）即可，遇到不需要的交点，输入“r”跳过。

关于剖切线为折线的问题：以前程序设计上失误，折线的顶点数不能超过128个，现已经过修改，已无顶点数量限制，但限用Pline线，不能有弧线，这在以后将会改进

在没有等高线的地方内插一个点：在这两条等高线之间随便加一条线，只要和剖切线相交就行，程序运行时会提示要求你输入此点的高程

自动获取的对象出现顺序有点跳跃，不是连续出现：这种情况还没遇到过，请6楼朋友把图形发个email给我，我一定改进

cqnj023 · 发表于 2004-8-1 02:05:00

欢迎交流，图已发到邮箱

wmz · 发表于 2004-8-1 10:28:00

难道你没有自动获取等高线高程,还要手工输入吗?

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

给大家贡献一个地形剖面线绘制程序(源码公开！！）

本帖子中包含更多资源