【K:RtnBox4SSGroup】矩形分堆/方框分堆

272035535

楼主有群吗，拉进群，272035535

272035535

能考虑样条曲线吗，测试的有样条曲线的话，40秒了

伊江痕

学到啦，有机会试试

aws

楼主，我最近也在看大海的那个分堆函数，梳理一下思路，到了主要耗时点那里，卡住了，根本看不懂，那里感觉很复杂，
        (setq on-off t group nil)
        (while on-off
                (setq recc(car lst))
                (setq boxlst nil)
                (while(setq frec(car lst))
                        (setq lst(cdr lst))
                        (if(setq intrec(recxj recc(setq frec(car lst))))
                                (setq recc intrec);---比较第一个box和第二个box是否有相交矩形
                                (if(setq tmplst(vl-some '(lambda(a / b)(if(setq b(recxj recc a))(list b a)))boxlst))
                                        (progn
                                                (if (not (eq (car tmplst) (last tmplst)))
                                                        (setq boxlst (subst (car tmplst) (last tmplst) boxlst))
                                                )
                                                (setq recc frec)
                                        )
                                        (setq boxlst (cons recc boxlst)
                                                recc frec
                                        )
                                )
                        )
                )
                (if(eq(length boxlst)(length group))
                        (setq on-off nil)
                        (setq group boxlst lst boxlst)
                )
        )
这里能不能换一种写法？完全看不懂逻辑

magicheno

感谢大佬分享

kucha007

aws 发表于 2024-4-16 17:52
楼主，我最近也在看大海的那个分堆函数，梳理一下思路，到了主要耗时点那里，卡住了，根本看不懂，那里感觉 ...

看不懂就直接用，想那么多有的没的干啥

aws

kucha007 发表于 2024-4-17 08:48
看不懂就直接用，想那么多有的没的干啥

17万图元，480组，仅耗时10秒，是真的吗，我实际测试，花费了460秒呀。。。

kucha007

aws 发表于 2024-4-17 11:40
17万图元，480组，仅耗时10秒，是真的吗，我实际测试，花费了460秒呀。。。

不清楚唉，反正我是够用的，平时分堆的对象也不多

haoxuan

kucha007 发表于 2023-3-25 16:31
举个例子：
想要扎堆缩放对象可以这样操作:
ps：为了避免前面缩放的对象和后面的对象打架，这里是先收集 ...

很给力，改出了批量建块和批量标注最大外形长宽尺寸

Qwer1243

感谢楼主的分享，学习一下