hdlyt11 发表于 2010-8-18 10:00:00

[求助]求通过框选连接线的lisp程序

探索者或者网上发布的程序都是单选,选择一条再选另一条,实现连接一条断开的直线,不知道高手们能不能写一个可以框选一批断开的直线实现连接的程序,最好断点间的距离可以设置。

lenlenq 发表于 2010-8-18 18:54:00

有点难

youxian815 发表于 2010-8-19 10:30:00

<p><font face="Verdana">(setvar "PEDITACCEPT" 1)</font></p>
<p>(setq a (getdist "\n输入断点间距:"))</p>
<p>(command "pedit" "m" (ssget) "" "j" a "")</p>
<p>不知道是不是我理解错你的意思了,试试吧</p>

lsjj 发表于 2010-8-19 12:06:00

<p>樓主要問的是共線的問題</p>
<p>程序不難</p>
<p>給個方向P(x1,y1)XQ(x2,y2)=0,x1y2-x2y1=0</p>

hdlyt11 发表于 2010-8-19 12:20:00

<p>呵呵,不错,是这样的,是共线问题。</p>

yxl88168 发表于 2011-3-28 22:43:28

又学到一点,谢谢

wxn80 发表于 2019-1-11 16:29:40

楼主现在找到连接多条线段的方法了吗?

xyp1964 发表于 2019-1-11 22:17:39

;; tt(共线合并)

xujinhua 发表于 2020-6-17 17:16:34

youxian815 发表于 2010-8-19 10:30
(setvar "PEDITACCEPT" 1)
(setq a (getdist "\n输入断点间距:"))
(command "pedit" "m" (ssget) "" "j" ...

谢谢,就是这样

小老虎丿 发表于 2020-6-27 16:44:30

lsjj 发表于 2010-8-19 12:06
樓主要問的是共線的問題
程序不難
給個方向P(x1,y1)XQ(x2,y2)=0,x1y2-x2y1=0

向量积,高中没有好好学,好多东西都忘记了
页: [1]
查看完整版本: [求助]求通过框选连接线的lisp程序