板材框架结构

qazxswk

langjs 发表于 2025-11-28 22:14
拿走不谢，现成的捕捉函数整合进去就行

在大文件里，卡出翔来

lingfne

langjs 发表于 2025-11-28 22:14
拿走不谢，现成的捕捉函数整合进去就行

(<= (* 0.25 pi) (angle $pt001 pt) (* 0.75 pi));;返回nil

(if $pt001
      (progn
                                (setvar "lastpoint" $pt001)
                                (if (= (getvar "ORTHOMODE") 1) ; 区分象限
                                        (cond
                                                ((or
                                                         (<= (* 0.25 pi) (angle $pt001 pt) (* 0.75 pi))
                                                         (<= (* 1.25 pi) (angle $pt001 pt) (* 1.75 pi))
                                                 )
                                                        (setq pt (list (car $pt001) (+ (cadr $pt001) (* (distance $pt001 pt) (sin (angle $pt001 pt))))))
                                                )
                                                (t
                                                        (setq pt (list (+ (car $pt001) (* (distance $pt001 pt) (cos (angle $pt001 pt)))) (cadr $pt001)))
                                                )
                                        )
                                )
      )
    )

xyp1964

动态显示要尽可能用grvecs

langjs

qazxswk 发表于 2025-11-28 22:51
在大文件里，卡出翔来

我的grread捕捉函数优化过的，感觉还好，一般够用。

lingfne

langjs 发表于 2025-11-28 22:14
拿走不谢，现成的捕捉函数整合进去就行

明师出手,不同范响!

lingfne

langjs 发表于 2025-11-29 01:45
我的grread捕捉函数优化过的，感觉还好，一般够用。

前辈！如果，再能优化，可输入尺寸定位，应该一个很好的绘图工具！！

zj20190405

lingfne 发表于 2025-11-29 03:44
前辈！如果，再能优化，可输入尺寸定位，应该一个很好的绘图工具！！

grread获取四点生成不更方便吗，2捕捉捕捉或者输入，效率很慢，我也是做全屋定制的

qifeifei

zj20190405 发表于 2025-11-29 08:11
grread获取四点生成不更方便吗，2捕捉捕捉或者输入，效率很慢，我也是做全屋定制的

我也是也 画破柜子的

qazxswk

qifeifei 发表于 2025-11-28 19:11
改造失败了！

你的代码是改造失败的，然后你发不能用的代码出来还要收币。我谁都不服，就服你了。

qifeifei

qazxswk 发表于 2025-11-29 09:45
你的代码是改造失败的，然后你发不能用的代码出来还要收币。我谁都不服，就服你了。

其实我在昨天晚上就改造好了、网站太卡；我就没发
//

我就是喜欢收集金币