无聊，给大家分享2个源码，快速串多义线和判断多义线是否闭合

psufngah · 发表于 2011-9-22 12:20:12

如题，GF和GL如果不闭合的多义线，指出断口在那里。

q668526 · 发表于 2019-8-15 15:25:34

快速串多义线和判断多义线是否闭合这个的LSP能不能改为
(grvecs '( 1 (5 -5)(-5 5) 这个应该怎么修改可以说说吗？换掉哪段代码

xzklk · 发表于 2020-4-14 13:16:12

谢谢楼主，收藏个

LLXXZZ · 发表于 2011-9-22 12:34:20

(defun c:we (/ b) (setvar "peditaccept" 1)
(setq b (ssget '((-4 . "<OR")(0 . "LINE")(0 . "LWPOLYLINE")(0 . "ARC")(-4 . "OR>"))))
(command "pedit" "m" b "" "j" "0" "" )(prin1))

合并多段线。

lifenwei · 发表于 2011-9-22 13:02:45

GOOD

完整武器 · 发表于 2011-9-22 22:04:23

收藏好了谢谢

shang_123 · 发表于 2011-10-7 19:07:54

好东东拿走了！！

lizhiqiang9801 · 发表于 2011-11-8 14:11:34

谢谢楼主

328302216 · 发表于 2011-11-12 15:55:01

东西带走了，同时希望LZ下次无聊的时候继续发帖！

328302216 · 发表于 2011-11-12 16:17:35

楼主我顺便问个问题，要是判断直线的话能不能实现！楼主有空的话帮忙编一个判断直线的程序来用用啊！比如如图所示的把白色的都标记出来可以吗？

vlisp2012 · 发表于 2011-11-13 16:06:47

学习了，多谢！

香田里浪人 · 发表于 2013-1-29 09:54:26

不错，谢谢楼主。

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