关于列表（AutoLISP）

创建列表

该函数提供了一种对相关项进行分组的简单方法。这些项目不需要具有相似的数据类型，甚至可以是其他列表。以下代码将三个项目分组为一个列表：list

(setq lst1 (list 1.0 "One" 1))
(1.0 "One" 1)

也可以使用（或'）函数创建列表。quote

(setq lst1 '(1.0 "One" 1))
(1.0 "One" 1)

添加或更改列表中的项目

该函数允许您将新项目添加到列表的末尾，该函数允许您将新项目添加到列表的开头。该函数可用于将新项替换为旧项的每次出现。这些函数不会修改原始列表;它们返回修改后的列表。如果需要修改原始列表，请将旧列表显式替换为新列表。appendconssubst

该函数接受任意数量的列表并将它们作为一个列表一起运行。因此，此函数的所有参数都必须是列表。下面的代码将另一个“One”添加到存储的列表中。appendlst1

(setq lst2 (append lst1 '("One")))
(1.0 "One" 1 "One")

该函数将单个元素与列表组合在一起。您可以使用函数将另一个字符串“One”添加到列表的开头。conslst2cons

(setq lst3 (cons "One" lst2 ))
("One" 1.0 "One" 1 "One")

您可以使用函数将列表中出现的所有项目替换为新项目。下面的代码将所有字符串“One”替换为字符串“one”。subst

(setq lst4 (subst "one" "One" lst3))
("one" 1.0 "one" 1 "one")

从列表中检索项目

您可以使用函数从列表中检索特定项目。此函数接受两个参数。第一个参数是一个整数，它指定要返回的项。列表以 0 索引开头。0 指定列表中的第一项，1 指定第二项，依此类推。第二个参数是列表本身。下面的代码返回第二项。nthlst1

(nth 1 lst1)
"One"

该函数返回列表的第一项。例如：car

(car lst1)
1.0

该函数将列表中的所有项目作为新列表返回，但第一项除外。例如：cdr

(cdr lst1)
("One" 1)

AutoLISP 还提供了许多附加函数，这些函数是 andfunctions 的变体。例如，该函数返回列表的第二个元素，该函数返回列表的第三项。该函数就像在列表上使用函数，然后在结果列表中使用函数。carcdrcadrcaddrcadrcdrcar

(cadr lst1)
"One"

(car (cdr lst1))
"One"