设为首页收藏本站

晓东CAD家园-论坛

 找回密码
 立即注册

QQ登录

只需一步,快速开始

扫一扫,访问微社区

返回列表
查看: 142|回复: 6

[曲线] 曲线选点、等分、拟合点打断

[复制链接]

签到天数: 973 天

连续签到: 37 天

[LV.10]以坛为家III

已领礼包: 39个

财富等级: 招财进宝

发表于 2017-12-29 14:11:14 | 显示全部楼层 |阅读模式

  • 插件名称 : 断开曲线
  • 作  者 : newer
  • 运行环境 :XDRX API 晓东工具箱 
  • 发布时间 :2017-12-29
  • 命令名称 :xdtb_crvbrk
  • 插件介绍 :曲线选点、等分、拟合点打断
  • 备  注 : (点击图片可以放大)
(点击图片可以放大)

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

插件详细内容

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

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

x
  1. (defun c:XDTB_CrvBrk ( / div e pt pts sel)
  2.   (defun _break-pnt ()
  3.     (if (setq
  4.           e (car (xdrx_entsel
  5.                    "\n选择要断开的曲线<退出>:"
  6.                    '((0 . "LINE,ARC,CIRCLE,ELLIPSE,SPLINE,*POLYLINE"))
  7.                  )
  8.             )
  9.         )
  10.       (progn (while (setq pt (getpoint "\n拾取断开点<结束>:"))
  11.                (setq pts (cons pt pts))
  12.              )
  13.              (if pts
  14.                (xdrx_curve_getsplitcurves e pts)
  15.              )
  16.       )
  17.     )
  18.     (princ)
  19.   )
  20.   (defun _break-divide ()
  21.     (if (and (setq
  22.                e (car (xdrx_entsel
  23.                         "\n选择要断开的曲线<退出>:"
  24.                         '((0 . "LINE,ARC,CIRCLE,ELLIPSE,SPLINE,*POLYLINE"))
  25.                       )
  26.                  )
  27.              )
  28.              (setq div (getint "\n输入等分数<退出>:"))
  29.         )
  30.       (progn (xdrx_curve_getsplitcurves
  31.                e
  32.                (setq pts (xdrx_getsamplept e div))
  33.              )
  34.       )
  35.     )
  36.     (princ)
  37.   )
  38.   (defun _break-fit ()
  39.     (if (setq e (car (xdrx_entsel "\n选择要断开的SPLINE<退出>:"
  40.                                   '((0 . "SPLINE"))
  41.                      )
  42.                 )
  43.         )
  44.       (progn
  45.         (if (setq pts (xdrx_getpropertyvalue e "fitpoints"))
  46.           (xdrx_curve_getsplitcurves e pts)
  47.           (progn (xdrx_prompt "\nSPLINE 没有拟合点. 断开失败."))
  48.         )
  49.       )
  50.     )
  51.     (princ)
  52.   )
  53.   (xdrx_begin)
  54.   (if (not #xd_var_global_break_mode)
  55.     (setq #xd_var_global_break_mode "D")
  56.   )
  57.   (xdrx_initget "A S D")
  58.   (if (setq sel (getkword
  59.                   (xdrx_prompt "\n操作方式[选点(A)/等分(S)/拟合点(D)<"
  60.                                #xd_var_global_break_mode
  61.                                ">:"
  62.                                t
  63.                   )
  64.                 )
  65.       )
  66.     (setq #xd_var_global_break_mode sel)
  67.   )
  68.   (cond ((= #xd_var_global_break_mode "A") (_break-pnt))
  69.         ((= #xd_var_global_break_mode "S") (_break-divide))
  70.         ((= #xd_var_global_break_mode "D") (_break-fit))
  71.   )
  72.   (if pts
  73.     (xdrx_prompt "\n如你所愿.")
  74.   )
  75.   (xdrx_end)
  76.   (princ)
  77. )





上一篇:“动态”制作遮盖块
下一篇:【批量】处理DWG,所有实体(嵌套块)图层归0,颜色BYLAYER,块内BYBLOCK并Purge图形
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复
百度谷歌雅虎搜狗搜搜有道360奇虎

使用道具 举报

签到天数: 24 天

连续签到: 1 天

[LV.4]偶尔看看III

已领礼包: 7个

财富等级: 恭喜发财

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

使用道具 举报

签到天数: 27 天

连续签到: 1 天

[LV.4]偶尔看看III

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

使用道具 举报

签到天数: 1813 天

连续签到: 842 天

[LV.Master]伴坛终老I

已领礼包: 5435个

财富等级: 富甲天下

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

使用道具 举报

签到天数: 114 天

连续签到: 1 天

[LV.6]常住居民II

已领礼包: 205个

财富等级: 日进斗金

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

使用道具 举报

签到天数: 343 天

连续签到: 9 天

[LV.8]以坛为家I

已领礼包: 465个

财富等级: 日进斗金

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

使用道具 举报

签到天数: 111 天

连续签到: 1 天

[LV.6]常住居民II

已领礼包: 228个

财富等级: 日进斗金

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

使用道具 举报

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

本版积分规则

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

辽公网安备 21040202000005号

GMT+8, 2018-4-23 15:47 , Processed in 0.477826 second(s), 94 queries , Gzip On.

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

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