zilong136 发表于 2024-2-11 00:59:07

对象捕捉开关切换？

本帖最后由 zilong136 于 2024-2-17 18:48 编辑


[*];;对象捕捉开关----
[*](defun c:r3 (/ d)
[*]    (prompt "\n r3:选项板开关")
[*](setq d (getvar "OSMODE"))
[*](cond
[*]    ((and (< d 16384) (/= d 0))
[*]      (setq d (+ d 16384))
[*]      (prompt "\n <对象捕捉 关>")
[*]    )
[*]    ((or (= d 0) (>= d 16384))
[*]      (setq d 16383)
[*]      (prompt "\n <对象捕捉 开>")
[*]    )
[*])
[*](setvar "OSMODE" d)
[*])
[*]欢迎大家来检测。

bai2000 发表于 2024-2-11 10:13:35

看不清，换换颜色

飞雪神光 发表于 2024-2-11 17:41:06

这种问题跟踪一下 就知道了 可惜我还没安2024

zilong136 发表于 2024-2-12 16:51:33

bai2000 发表于 2024-2-11 10:13
看不清，换换颜色

已换，你再看看

ljfdjjj 发表于 2024-2-18 11:45:57

这有啥好玩的？判断捕捉开关状态不是挺简单的嘛。你这个打开捕捉，直接全给打开了，有些人画图是用不到所有捕捉设置的，你一下全给开了有点不妥，应该是只打开使用者喜好的那几个设置(defun c:tt()
(setq a (getvar "osmode"))
(if(> a 16384)
   (progn
       (setvar "osmode" (- a 16384))
       (prompt "\n <对象捕捉已打开>")
   )
   (progn
       (setvar "osmode" (+ a 16384))
       (prompt "\n <对象捕捉已关闭>")
   )
)
(princ)
)
页: [1]
查看完整版本: 对象捕捉开关切换？