暂停以供用户输入

JPlanera · 发表于 2022-7-6 07:48:24

我试图在多个图形的脚本中使用以下例程。我之所以使用脚本，是因为我有一个包含200个文件名的excel文件，需要从不同的位置打开。在excell中编制这些文件很容易，我不知道如何在LISP中使其变得如此简单。。。我需要程序暂停“查看”命令。在脚本中使用时，它不起作用。我为cmdactive变量尝试了不同的位代码，但无法使其工作。。。有什么想法吗？？？

copy

(DEFUN C:PV1 ()
 (command "-view" "W" "1")
  (while
   (= (getvar 'cmdactive) 1)
    (command pause)
 )
(command "-plot" "y" "model" "RICOH C5000 ENG" "Letter (8.5" X 11")" "i" "P" "n" "V" "1" "f" "c" "y" "monochrome.ctb" "y" "a" "n" "y" "y")
)