findss_from_one_echosome```以图元边界偏移搜索【仅适用WCS】
本帖最后由 masterlong 于 2023-2-1 17:23 编辑编程时经常遇到以下需求
先指定一个图元 a
在 a 的某个方位搜索另一个图元 b
再在 b 的附近找 c
编程难度不大就是挺啰嗦
为减少主程序的代码量
特别建立了这个函数
用于【以图元边界偏移搜索】
;999以指定图元为边界偏移后寻找特定图元【仅适用WCS】
;|
one 为指定图元or选择集or图元列表
ida 整数1~4，分别代表onerec的4角点之1。
outpaida代表的点坐标的偏移量（2元实数表）
idb 整数1~4，分别代表onerec的4角点之2
outpbidb代表的点坐标的偏移量（2元实数表）
mode 捕捉模式"W、C"或"WP、CP"或"F"
fi 过滤器
范例：
(findss_from_one ent 1 '(2000 0) 2 '(0 0) "c" '((0 . "TEXT") (8 . "F__辅助线__temp"))) ;;以ent边界为基础，偏移1pt、2pt点后，寻找辅助文字
|;
;999以指定图元为边界偏移后寻找特定图元【仅适用WCS】。与上一个函数的区别是，当未找到对象时，按再偏移量pydis继续寻找，直至达到最大重复次数times
;|
one 为指定图元or选择集or图元列表
ida 整数1~4，分别代表onerec的4角点之1
outpaida代表的点坐标的偏移量（2元实数表）
idb 整数1~4，分别代表onerec的4角点之2
outpbidb代表的点坐标的偏移量（2元实数表）
mode 捕捉模式"W、C"或"WP、CP"或"F"
fi 过滤器
times最大重复次数
pydis重复寻找时的再偏移量（2元实数表）
范例：
(findss_from_one_echosome ent 1 '(2000 0) 2 '(0 0) "c" '((0 . "TEXT") (8 . "F__辅助线__temp")) 3 '(-2000 0)) ;;以ent边界为基础，偏移1pt、2pt点后，寻找辅助文字。允许重复3次再偏移寻找
|;
谢谢楼主分享
谢谢楼主分享 这么好的程序，谢谢分享 这个非常有用。 举个实际的应用例子
页:
[1]