设为首页收藏本站

晓东CAD家园-论坛

 找回密码
 立即注册

QQ登录

只需一步,快速开始

扫一扫,访问微社区

查看: 157|回复: 16

[组管理] 【组】批量做组

[复制链接]

已领礼包: 40个

财富等级: 招财进宝

发表于 2020-7-23 13:03:52 | 显示全部楼层 |阅读模式
  • 插件名称 : 批量做组
  • 作  者 : newer
  • 运行环境 :XDRX API 晓东工具箱 
  • 发布时间 :2020-07-23
  • 命令名称 :xdtb_plin2group
  • 插件介绍 :图中批量查找独立最大的封闭的多段线做边界,将内部实体做组
  • 备  注 : (点击图片可以放大)
(点击图片可以放大)

晓东温馨提示 1、运行环境为 晓东工具箱XDRX API 的插件,请下载最新版本的 晓东工具箱XDRX API开发环境 一键安装
2、在ACAD中如何加载插件,请看 论坛插件使用方法
3、如果您有要求需要定制插件,请到 编程申请 论坛发帖求助

插件详细内容

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

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

x
游客,本帖隐藏的内容需要积分高于 30 才可浏览,您当前积分为 0

论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
发表于 2020-7-23 14:55:04 | 显示全部楼层
感谢楼主分享!!!
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 166个

财富等级: 日进斗金

发表于 2020-7-23 16:47:45 | 显示全部楼层
命令: TT
选择对象: 指定对角点: 找到 80 个
选择对象:
>>正在制作组.
发现80个独立最大的封闭区域,其中实体已经制作成组.
执行时间:0.072s.

tt还是用的你这段程序,仅将选取ss改为(setq ss (ssget '((62 . 2))))
运行时间怎么相差这么大呢?
你的执行时间为:0.251s


00000000.png
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 166个

财富等级: 日进斗金

发表于 2020-7-23 17:09:31 | 显示全部楼层
(defun c:tt (/ len box ss ss1 x)
          (if (setq ss (ssget '((62 . 2))))
                    (progn
                              (xdrx-begin)
                              (setq len (sslength ss))
                              (xdrx-ui-prgcmdbar "\n>>正在制作组..." len 0.1)
                              (xdrx-setsstodb ss 0)
                              (while (setq x (xdrx-getentdata 0))
                                (xdrx-ui-prgcmdbar t)
                                (xdrx-polyline-compress x 7)
                                (setq box (xdrx-entity-box x))
                                (setq ss1 (ssget "cp" box))
                                    (xdrx_group_make "*" ss1)
                             );;;while       
                              (xdrx-ui-prgcmdbar)
                              (xdrx-prompt "\n发现" len "个独立最大的封闭区域,其中实体已经制作成组。")
                              (xdrx-end t)
                    );;;progn
          );;;if
          (princ)
);;;defun

还是我上面那个图,运行时间为:
命令: TT
选择对象: 指定对角点: 找到 80 个
选择对象:
>>正在制作组.
发现80个独立最大的封闭区域,其中实体已经制作成组。
执行时间:0.057s.

点评

上面的代码执行时间,演示的是 xdrx-end的用法, 是 xdrx-begin 和 xdrx-end之间的时间,换句话说,中间任何交互等待的时间,都计算在内。  详情 回复 发表于 2020-7-23 17:13
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

点击这里给我发消息

已领礼包: 145个

财富等级: 日进斗金

发表于 2020-7-23 17:13:23 | 显示全部楼层
dyjwyqz5221 发表于 2020-7-23 17:09
(defun c:tt (/ len box ss ss1 x)
          (if (setq ss (ssget '((62 . 2))))
                    (progn

上面的代码执行时间,演示的是 xdrx-end的用法,

找到选择集,做组,时间不多,主要是在寻找封闭最大多边形里面。

应该是函数 (setq ss (xd::polyline:maxIsolated nil 10)) 这个里面,
有时间计时器


这个函数是计算最大独立的封闭多边形的

评分

参与人数 1D豆 +5 收起 理由
dyjwyqz5221 + 5 热心帮忙奖!

查看全部评分

论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 2个

财富等级: 恭喜发财

发表于 2020-7-23 17:19:42 | 显示全部楼层
命令: XDTB_PLIN2GROUP
错误: no function definition: XD::POLYLINE:MAXISOLATED
插件安装了 XDRX API 2020.07.22

点评

在下载下API装下, 然后看看 xd-lisp-lib.vlx的时间是什么?  详情 回复 发表于 2020-7-23 17:21
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

点击这里给我发消息

已领礼包: 145个

财富等级: 日进斗金

发表于 2020-7-23 17:21:49 | 显示全部楼层
woody_10 发表于 2020-7-23 17:19
命令: XDTB_PLIN2GROUP
错误: no function definition: XD::POLYLINE:MAXISOLATED
插件安装了 XDRX API 2 ...

在下载下API装下,
然后看看 xd-lisp-lib.vlx的时间是什么?应该是 22日22.57
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 2个

财富等级: 恭喜发财

发表于 2020-7-23 17:26:20 | 显示全部楼层
2020/07/21  03:14

点评

http://bbs.xdcad.net/thread-669133-1-1.html 去下载下最新的通用LISP函数库,覆盖  详情 回复 发表于 2020-7-23 18:12
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 2个

财富等级: 恭喜发财

发表于 2020-7-23 17:29:05 | 显示全部楼层
百度云的文件 下载下来总是出错

点评

版本不对,重新下载,换 蓝奏云 那个  详情 回复 发表于 2020-7-23 17:58
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

点击这里给我发消息

已领礼包: 145个

财富等级: 日进斗金

发表于 2020-7-23 17:58:51 | 显示全部楼层
woody_10 发表于 2020-7-23 17:29
百度云的文件 下载下来总是出错

版本不对,重新下载,换 蓝奏云 那个
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

点击这里给我发消息

已领礼包: 145个

财富等级: 日进斗金

发表于 2020-7-23 18:12:26 | 显示全部楼层

http://bbs.xdcad.net/thread-669133-1-1.html

去下载下最新的通用LISP函数库,覆盖
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 1532个

财富等级: 堆金积玉

发表于 2020-7-23 19:42:18 | 显示全部楼层
做个对论坛有益的人。
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2020-7-25 19:28:12 | 显示全部楼层
积分不够啊  我是小白 积分怎么来的  ?
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2020-7-25 20:31:04 | 显示全部楼层
大哥 我看不了啊  积分不够啊
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2020-7-26 21:25:02 | 显示全部楼层
为什么要设置门槛呢  还给新人机会不
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|申请友链|小黑屋|手机版|Archiver|辽公网安备|晓东CAD家园 ( 辽ICP备15016793号 )  

GMT+8, 2020-8-4 16:05 , Processed in 0.246717 second(s), 93 queries , Gzip On, WinCache On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

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