明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
楼主: 【KAIXIN】

批量交点打断(秒杀)

  [复制链接]
 楼主| 发表于 2011-12-15 14:21 | 显示全部楼层
w245272914 发表于 2011-12-15 13:53
KAIIXIN 我来看你来了。

  谢谢!
发表于 2011-12-15 15:17 | 显示全部楼层
有没有把断的合并成一条直线的程序啊!!比如两条直线首尾相连的合并成一条
 楼主| 发表于 2011-12-15 15:22 | 显示全部楼层
328302216 发表于 2011-12-15 15:17
有没有把断的合并成一条直线的程序啊!!比如两条直线首尾相连的合并成一条
  1.                                         ;
  2. (defun ss-sslist (ss / n en enlis)
  3.   (setq n (sslength ss))
  4.   (repeat n
  5.     (setq en (ssname ss (setq n (1- n))))
  6.     (setq enlis (cons en enlis))
  7.   )
  8. )
  9. (defun c:test (/ ss)
  10.   (setvar "CMDECHO" 0)
  11.   (command "undo" "be")
  12.   (setq ss (ssget))
  13.   (setq ss (ss-sslist ss))
  14.   (foreach x ss
  15.     (mapcar '(lambda (y)
  16.                (command "join" x y "")
  17.              )
  18.             ss
  19.     )
  20.   )
  21.   (command "undo" "e")
  22.   (setvar "CMDECHO" 1)
  23.   (princ)
  24. )

评分

参与人数 1明经币 +1 收起 理由
flytoday + 1 很给力!

查看全部评分

发表于 2011-12-15 21:03 | 显示全部楼层
厉害。。。支持
发表于 2011-12-15 21:54 | 显示全部楼层
不行呀,我下不了呀
发表于 2011-12-16 09:13 | 显示全部楼层
有这个功能用就可以
发表于 2011-12-16 11:15 | 显示全部楼层

本帖子中包含更多资源

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

x
 楼主| 发表于 2011-12-16 11:23 | 显示全部楼层
flytoday 发表于 2011-12-16 11:15

你没仔细用程序,有提示打断不了多段线!

不过解决办法是用分解功能可以分解。
  1. ;打碎多段线线
  2. (defun c:KK ()
  3.   (if (setq ss (ssget "X" '((0 . "*POLYLINE"))))
  4.     (command "_explode" ss "")
  5.   )
  6. )
发表于 2011-12-16 13:24 | 显示全部楼层
【KAIXIN】 发表于 2011-12-16 11:23
你没仔细用程序,有提示打断不了多段线!

不过解决办法是用分解功能可以分解。

太强大了~~~~~~~~
 楼主| 发表于 2011-12-16 13:46 | 显示全部楼层
flytoday 发表于 2011-12-16 13:24
太强大了~~~~~~~~

谢谢!比起版主们我差远了!

好的东西你适当的支持下我就行!
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2024-3-28 19:20 , Processed in 0.145372 second(s), 17 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

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