选择所有Lisp修复

Lkoster08 · 发表于 2022-7-5 16:23:56

大家好！

第一次在这里张贴，我需要帮助。我只是在钻研Lisp程序的问题，我写的这个快速的问题似乎已经被打破了。

;;全选
（定义c:SA（）
（命令“\u.select”“\u all”）
（普林斯）
)

它会按要求选择图形中的所有项目，但之后我无法输入另一个命令（无法移动/复制/删除等）。我错过了什么，如果不是太多，请告诉我为什么它不起作用。

非常感谢。

SLW210 · 发表于 2022-7-5 16:29:15

请阅读代码发布指南，并编辑代码以包含在代码标签中。[NOPARSE]

copy

Your Code Here[/NOPARSE]

=

copy

Your Code Here

Lkoster08 · 发表于 2022-7-5 16:35:06

copy

;;SELECT ALL
(defun c:SA ()
(command "_.select" "_all")
(princ)
)

Lkoster08 · 发表于 2022-7-5 16:40:18

很抱歉，谢谢你的提醒！

BKT · 发表于 2022-7-5 16:43:15

select命令允许您在要求选择时输入字母“p”（无引号），在其他命令（如移动、复制等）中使用“PREVICE”。

在您的示例中，需要添加双引号来结束命令：

或者，如果您想在代码中添加move命令，您可以这样做：

copy

(command "_.select" "_all" "" ".move" "p" "" pause pause)

Lkoster08 · 发表于 2022-7-5 16:46:53

它现在似乎没有选择任何东西，或者它正在选择全部，然后完成命令，因此我无法操纵它们。

copy

;;SELECT ALL
(defun c:SA ()
 (command "_.select" "_all" "")
 (princ)
)

这是在我根据您的输入进行更新之后。

BKT · 发表于 2022-7-5 16:52:03

也许我不清楚-SELECT命令只是创建了一个选择集。完成后，您可以操作它们，但之后需要调用任何您想要的命令。在我上面作为示例发布的第二段代码中，MOVE命令与SELECT相结合，因此可以通过拾取点移动所有实体。

例如，如果您想移动，也可以使用以下简单代码行：

如果您想要操作所选的实体，则需要向代码中添加更多内容。

Lkoster08 · 发表于 2022-7-5 16:58:17

如果我键入普通命令“Select”和“All”，然后按enter确认我的选择，我就可以告诉它我想对我的选择做什么（例如移动/复制/删除等）。看起来我不在select命令中，但它们都已被选中，并准备好在相应的名词-动词命令提示符下执行其他操作。

我怎样才能使我的lisp本质上做到“选择”“全部”“回车”——让所有内容都被选中，然后由我接下来选择执行的任何命令进行修改？