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

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

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

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

有点难

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

(setvar "PEDITACCEPT" 1)

(setq a (getdist "\n输入断点间距："))

(command "pedit" "m" (ssget) "" "j" a "")

不知道是不是我理解错你的意思了，试试吧

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

樓主要問的是共線的問題

程序不難

給個方向P(x1,y1)XQ(x2,y2)=0,x1y2-x2y1=0

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

呵呵，不错，是这样的，是共线问题。

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

向量积，高中没有好好学，好多东西都忘记了

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