问题：设置多个var

tzframpton · 发表于 2022-7-6 12:06:50

在我的VisualLISP书的第二章中，有一个简单的问题。。。。这是设置变量的正确示例吗？？
如果这是正确的，那么这不是一种更有效的方法吗

(setq nbr1 5)
(setq nbr2 12)
(setq str1 "text")

lpseifert · 发表于 2022-7-6 12:14:53

是的，这是一个正确的方法
2.同样正确。。。更高效？更多键入
我喜欢类似的东西

copy


(setq nbrl 5
     nbr2 12
     str1 "text"
);setq

比第一个示例更容易阅读（无论如何对我来说）

不止一种剥猫皮的方法

tzframpton · 发表于 2022-7-6 12:15:45

感谢您的批准。我明白你关于语法格式的观点。我使用了编辑器工具中的工具>格式代码，它精确地设置了代码，当然没有注释。再次感谢。。。。接下来还有更多的问题，希望我不会用一堆初级问题来轰炸论坛太多。

lpseifert · 发表于 2022-7-6 12:20:35

实际上，如果你愿意，它会添加评论
工具>环境选项>Visual Lisp格式选项
在这种情况下，它将为；_setq结束。。。也可以编辑

rkmcswain · 发表于 2022-7-6 12:24:32

把他们带上来。。。

Lee Mac · 发表于 2022-7-6 12:30:12

一定要问问题Styk-关于时间，我们有人问关于学习LISP而不是要求一个。。。

至于你的问题。。。

拉里说的差不多，两个都是对的。

“setq”函数接受任意数量的参数对：

来自Visual LISP帮助文件。

在我看来，我更喜欢在一个setq中将类似的变量分配分组在一起，并且可能使用另一个语句来进行非相关的变量分配。

至于速度：

copy


(defun All_in_one (/ a b c d e f g h i j)
 (setq a 1 b 2 c 3 d 4 e 5 f 6 g 7 h 8 i 9 j 10))
(defun Separate (/ a b c d e f g h i j)
 (setq a 1)
 (setq b 2)
 (setq c 3)
 (setq d 4)
 (setq e 5)
 (setq f 6)
 (setq g 7)
 (setq h 
 (setq i 9)
 (setq j 10))
(defun c:test nil
 (Benchmark
   '(
     (All_in_one)
     (Separate)
     )
   )
 (princ))