cchessbd 发表于 2023-3-15 20:48:21

本帖最后由 cchessbd 于 2023-3-15 20:51 编辑

ssyfeng 发表于 2023-3-15 16:08
你可以把文字包围盒函数换成图元的包围盒函数
我又读了几遍您的代码,终于获得了4个角点。经过综合比较,还是在您的程序基础上再来修改算了,不然工程量太大。
我打算4个角点和中心点,与块心距离来综合比较。这样在钻孔和文字比较密集时,假设有7-800个孔和文字的话,应该能对90-98左右。
等我写出来,再多次测试一下正确率。程序调试就是比较麻烦啊。毕竟是业余的。

(setq
                        ptb0 (list (car (nth 0 box)) (cadr (nth 0 box)) 0)
                        ptb1 (list (car (nth 1 box)) (cadr (nth 1 box)) 1)
                        ptb2 (list (car (nth 2 box)) (cadr (nth 2 box)) 2)
                        ptb3 (list (car (nth 3 box)) (cadr (nth 3 box)) 3)
)
页: 1 [2]
查看完整版本: 求一段代码,获取某点周围的图元名!