明经CAD社区

 找回密码
 注册

扫一扫,访问微社区

QQ登录

只需一步,快速开始

查看: 1735|回复: 23

自己写的一些小程序

  [复制链接]
发表于 2017-10-23 10:24 | 显示全部楼层 |阅读模式
本帖最后由 sasufa 于 2018-1-10 18:25 编辑

由于论坛被黑,帖子丢了,再发一下。1、根据设定长度和模式,分割多段线。





2、图层管理。11显示全部图层,22隐藏所选对象所属图层,33仅显示所选对象所属图层


3、分割多段线中的圆弧
      大转折处打断多段线
      删除平滑节点



4、中线法求多边形内部一点
(来源一篇文章,文章中代码有点小问题,修改了
http://www.doc88.com/p-4931544312400.html



5、程序用来提取某个文件夹下所有dwg文件中某一个图层
比如有3000张地形图,只想要其中的高程点这个图层,并且把图都拼到一起去。
原理是把图作为块插入,炸开,删除无效图层,然后下一张。

插入的时候要注意,插入比例和单位!否则可能出现图分成好几块的情况。
可以通过批处理工具,对所有图纸都执行某个命令(命令忘了)后,再拼接

6、cad中高程点提取。可以是文字,也可以是有Z的点


7、多边形根据内部文字分配图层



8、分割填充(使用了G版的“选择直线 园弧 园自动生成边界”的程序)

使用时需注意:
1、填充需有颜色,不能是bylayer
2、分割线相互之间不能形成闭合区域
3、好像填充不能自己有边界线

这些问题我自己不想改进了。


9、分图层批量生产填充边界线(更新了代码)


本来想修改下程序思路,通过填充的组码获取创建边界所需的信息,然后通过entmake直接创建边界,而不是用command,但是失败了,下面是修改的代码,有兴趣的可以研究下。


测试用的CAD文件


本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x

评分

参与人数 7明经币 +7 收起 理由
LPACMQ + 1 很给力!
kwok + 1
天涯2011 + 1
q3_2006 + 1
shh1980 + 1 楼主好人,赞一个!
USER2128 + 1 很给力!
zzyong00 + 1 很给力!

查看全部评分

本帖被以下淘专辑推荐:

  • · excel|主题: 75, 订阅: 1
发表于 2017-10-27 13:38 | 显示全部楼层
赞一个,特别是最后一个
回复 支持 0 反对 1

使用道具 举报

发表于 2017-10-24 13:19 | 显示全部楼层
感谢楼主分享
发表于 2017-10-24 23:51 | 显示全部楼层
代码都很好,感谢楼主分享
发表于 2017-10-25 08:07 | 显示全部楼层
感谢楼主分享!!!!!
发表于 2017-10-25 13:53 | 显示全部楼层
谢谢楼主分享
发表于 2017-10-26 09:44 | 显示全部楼层
非常好  谢谢分享
发表于 2017-10-26 15:20 | 显示全部楼层
回帖是一种美德!感谢楼主的无私分享 谢谢
发表于 2017-10-28 16:16 | 显示全部楼层
谢谢楼主分享
发表于 2017-10-28 23:38 | 显示全部楼层
这么多好东西,必须顶
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号  
©2000-2017 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2018-4-27 00:55 , Processed in 0.171311 second(s), 32 queries , Gzip On.

Powered by Discuz! X3.3

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表