zilong136 发表于 2024-2-21 11:57:20

qazxswk 发表于 2024-2-20 23:14
(defun c:11()
(setvar "dimassoc" (if (= (getvar "dimassoc") 2) 1 2))
(princ))

是这个意思，但要在命令行里显示开、关提示，要不然切换之后不知道到底是开还是关。

qazxswk 发表于 2024-2-22 19:34:00

(defun c:11()
(setvar "dimassoc" (if (= (getvar "dimassoc") 2) 1 2))
(if (= (getvar "dimassoc") 2)(princ"标注关联已开启。")(princ"标注关联已关闭。"))
(princ))

zilong136 发表于 2024-2-22 20:25:46

qazxswk 发表于 2024-2-22 19:34
(defun c:11()
(setvar "dimassoc" (if (= (getvar "dimassoc") 2) 1 2))
(if (= (getvar "dimassoc") 2) ...

是这个效果，就是你顺序正好反了:lol

qazxswk 发表于 2024-2-23 00:16:10

这个没有顺序可言了。一开始就做判断了，如果当前dimassoc的值为2，运行此命令就会改为1，如果当前dimassoc的值为1，运行此命令就会改为2。自己多操作一下。

(setvar "dimassoc" 1)      ;创建非关联标注对象。
(setvar "dimassoc" 2)      ;创建关联标注对象。

zilong136 发表于 2024-2-24 01:20:09

qazxswk 发表于 2024-2-23 00:16
这个没有顺序可言了。一开始就做判断了，如果当前dimassoc的值为2，运行此命令就会改为1，如果当前dimassoc ...

我知道，我是说你输出提示的命令正好相反。

qazxswk 发表于 2024-2-26 14:22:46

多学习一下LISP，以后你会发现，我为何要这样写的。你也可以自己改改，看是怎样的结果。

yefei812678 发表于 2024-3-22 16:05:11

感谢分享感谢分享感谢分享
页: 1 [2]
查看完整版本: 如何写标注关联开关？