找回密码
 立即注册

QQ登录

只需一步,快速开始

扫一扫,访问微社区

查看: 587|回复: 10

[已解决] [已解决]各位好有关圆避让,是否可实现?谢谢

[复制链接]

已领礼包: 5个

财富等级: 恭喜发财

发表于 2020-12-20 15:07:12 | 显示全部楼层 |阅读模式

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

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

×
本帖最后由 cam0668 于 2020-12-21 14:41 编辑

微信图片_20201220140036.png
如上图   直径20是基准圆。往外偏移10mm后
如果有与之相交的,则把外面8.0的圆移动到10mm安全距离 请各位高手出手相助,谢谢
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!

已领礼包: 511个

财富等级: 财运亨通

发表于 2020-12-21 09:34:52 | 显示全部楼层
本帖最后由 pxr201419 于 2020-12-21 10:14 编辑

(defun c:tt  (/ e pt r ss i e1 st pt1 r1)
  (setq e  (car (entsel "选择基准圆"))
        pt (cdr (assoc 10 (entget e)))
        r  (cdr (assoc 40 (entget e))))
  (setq ss (ssdel e (ssget "x" '((0 . "circle")))))
  (cond ((and r (> (sslength ss) 0))
         (setq i 0)
         (while (< i (sslength ss))
           (setq e1  (ssname ss i)
                 st  (entget e1)
                 pt1 (cdr (assoc 10 st))
                 r1  (cdr (assoc 40 st))
                 i   (1+ i))
           (if (< (distance pt pt1) (+ r1 r 10.))
             (vla-put-center
               (vlax-ename->vla-object e1)
               (vlax-3d-point (polar pt (angle pt pt1) (+ r r1 10.))))))))
  (princ))
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 1 反对 0

使用道具 举报

已领礼包: 19个

财富等级: 恭喜发财

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

使用道具 举报

已领礼包: 5个

财富等级: 恭喜发财

 楼主| 发表于 2020-12-20 21:06:02 | 显示全部楼层
请点击此处下载

查看状态:需购买或无权限

您的用户组是:游客

文件名称:test.rar 
下载次数:2  文件大小:62.33 KB 
下载权限: 不限 以上  [免费赚D豆]


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

使用道具 举报

已领礼包: 5个

财富等级: 恭喜发财

 楼主| 发表于 2020-12-20 21:07:16 | 显示全部楼层
Lisphk 发表于 2020-12-20 20:05
先前图什么样,结果图什么样?

你好.
  麻烦你看一下附件,有处理前和处理后的,谢谢

点评

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

使用道具 举报

已领礼包: 5个

财富等级: 恭喜发财

 楼主| 发表于 2020-12-21 08:57:23 | 显示全部楼层
早,各位。

点评

(defun c:tt (/ e pt r ss i e1 st pt1 r1) (setq e (car (entsel "选择基准圆")) pt (cdr (assoc 10 (entget e))) r (cdr (assoc 40 (entget e)))) (setq ss (ssdel e (ssget "x" '((0  详情 回复 发表于 2020-12-21 09:34
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复

使用道具 举报

已领礼包: 40个

财富等级: 招财进宝

发表于 2020-12-21 09:23:51 | 显示全部楼层
cam0668 发表于 2020-12-20 21:07
你好.
  麻烦你看一下附件,有处理前和处理后的,谢谢

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

使用道具 举报

已领礼包: 5个

财富等级: 恭喜发财

 楼主| 发表于 2020-12-21 10:16:56 | 显示全部楼层
pxr201419 发表于 2020-12-21 09:34
(defun c:tt  (/ e pt r ss i e1 st pt1 r1)
  (setq e  (car (entsel "选择基准圆"))
        pt (cdr ...

微信截图_20201221101413.png
首先非常感觉pxr201419的帮忙
程序基本符合 还是有些出入,我表达问题
处理后是边到边10mm距离,不是圆心到边10mm.谢谢
另是否可以多选?有时有多个这样的情况需做调整,非常感谢
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 511个

财富等级: 财运亨通

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

使用道具 举报

已领礼包: 5个

财富等级: 恭喜发财

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

使用道具 举报

已领礼包: 5个

财富等级: 恭喜发财

 楼主| 发表于 2020-12-21 13:18:13 | 显示全部楼层
pxr201419 发表于 2020-12-21 10:19
倒数第二行最后改了


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

使用道具 举报

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

本版积分规则

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

GMT+8, 2024-3-28 21:28 , Processed in 0.418882 second(s), 57 queries , Gzip On.

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

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