【标注】快速拉线标注--带捕捉
本帖最后由 1028695446 于 2019-11-2 00:07 编辑;;交流学习用,,,,,当然,主要是混经验，为了获取更高的权限;;已根据edata前辈的建议改进
;;之前给选集添加了选择过滤参数，现在把它注解掉了，可以支持对块操作了，只是尽可能的方便不懂lsp的人员
;;快速拉线标注--带捕捉;;;
;;修改自 雨的节奏 http://bbs.mjtd.com/thread-180247-1-1.html
;;; grread捕捉子函数
;;; name为移动的图元名，pt为光标点
;;; 返回值：如果有捕捉点则返回捕捉点，无则返回光标点
;;;http://bbs.mjtd.com/forum.php?mo ... hlight=%B2%B6%D7%BD
;;默认关闭动态捕捉,按F3切换动态捕捉开关;;里面都有注解,,主要展示动态捕捉的用法,可根据自己的需求修改完善
**** Hidden Message *****
加油，我的积分可以分点给你 本帖最后由 a405692168 于 2023-12-21 16:11 编辑
【标注】快速拉线标注--带捕捉
大佬，有空可以帮忙把这个插件增加点功能吗？
一、标注文字自动避让（原竖向标注会避让，是文字以尺寸线翻转，能不能翻转后文字还是同向。横向标注不会避让）
二、增加设置命令（bzsz），跳出菜单可设置：1、捕捉忽略图案填充对象，忽略尺寸边界线，忽略文字。2、忽略6个图层（文本图层--可自定义图层名，标注图层--可自定义图层名，填充图层--可自定义图层名，五金图层--可自定义图层名，辅助线1图层--可自定义图层名，辅助线2图层--可自定义图层名）。------如果2里面忽略图层和1重复，可以把那三个文本、标注、填充去掉，增加1个备用图层变成忽略4个图层。
1028695446 发表于 2019-10-30 22:26
谢谢您的建议!!!
倾斜线标注两端不标注可以试试延长一点，
(setq pt2 (getpoint pt1 "\n指定标注方向"))
(if (and pt1 pt2)(progn (setq pt1(polar pt1 (angle pt2 pt1) minsize))
(setq pt2(polar pt2 (angle pt1 pt2) minsize))))
另外我的印象中ssget f 好像是按距离返回交点的，不用排序吧。。 谢谢! 1028695446 分享学习!!!!!!!! 如果是对齐标注的形式，则不是很实用 一切进步都值得肯定！ 怎么隐藏了呀啊啊啊啊 看看隐藏了撒 看看看看看看看 谢谢分享！！！！ 看看看看看看看