[求助]：请帮助编线在交叉处自动断开一定距离的程序

sailorjt · 发表于 2004-5-12 22:29:47

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

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

×

由于工作需要，经常须要在线与线的交叉时断开，故希望能有一个这样的程序。（在天正电气上有这样的自动断导线的程序）

iam0411 · 发表于 2004-5-13 07:38:33

搜索 CAD超级伴侣，You can got it!

sailorjt · 发表于 2004-5-13 19:40:22

那个断开的距离太短了，我要的断开距离大一些，最好是调的，有这样的软件吗？（就象天正电气里的断直导线那种）

FENGWUZYB · 发表于 2004-5-17 18:06:16

我也想要啊！

海豚 · 发表于 2004-5-18 13:11:18

我也想要，那位大侠出手。

f5612140 · 发表于 2004-5-18 13:27:48

<table border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="700" id="AutoNumber1" height="498">
<tr>
<td width="100%" height="489">
<iframe name="I1" width="100%" height="100%" src="http://www.xdcad.net/forum/showthread.php?s=&threadid=109057">
浏览器不支持嵌入式框架或配置为不显示嵌入式框架
</iframe>
</td>
</tr>
</table>

复制代码

dwgplt · 发表于 2004-5-18 18:33:12

(defun c:dk( / bbb p1 p2 p3 anl p4 p5)

  (defun *ERROR* (msg)
   (princ"\n")(princ msg)
   (setvar "osmode" bbb)
   (setq *ERROR* olderr)
   (princ))
  (setq bbb (getvar "osmode")
      olderr *ERROR*)
  (setvar "osmode" 32)
  (setq p1 (getpoint "\n 拾取一个交点:"))
  (princ"\n 请输入断开点到交点的距离<")
  (princ a)
  (princ">:")
  (setq p2 (getdist))
  (if(not p2)
  (setq p2 a))
  (setvar "osmode" 512)
  (setq a p2
      p3 (getpoint"\n 拾取要断开的线:")
      anl (angle p1 p3)
      p4 (polar p1 anl p2)
      p5 (polar p1 (+ 3.14 anl) p2))
  (command "break" p4 p5)
  (setvar "osmode" bbb)
  (princ"**OK!**")
  (princ))

hhjj9898 · 发表于 2004-5-19 08:26:47

其实你可以在交点处，画一个圆，圆得直径就是你想断开的距离，通过TRIM，再把圆去除

ydf7332462 · 发表于 2004-5-22 00:50:02

能否批量断交点
可依條件:圖層.線型.顏色或标高

iam0411 · 发表于 2004-5-26 21:34:34

CAD超级伴侣叫做sacada,
3楼sailorjt 说断线太短了，是因为你的比例没设置，它的菜单有设比例的命令控制线的长度，缺省是1:1线，so ，看起来短。

还是不错的。。。

账号		自动登录	找回密码
密码			立即注册

[求助]：请帮助编线在交叉处自动断开一定距离的程序

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

相关帖子