如何选择一个au

jeremyearle5 · 发表于 2022-7-6 08:34:05

我想通过在以下代码中按enter键来实现插入选项：

(defun c:mak521 () 
(if (/= (tblsearch "block" "521") 
nil)
   (progn
     
(beep)
     (initget 1 "Yes No 
INsert")
     (prompt "\n521 has already been 
created.")
     (setq x (getkword 
"\nInsert 521 at 0,0 or redefine it? [Yes/No] <INsert>: 
"))
     
(cond
       ((= x "Yes") 
(mak521))
       ((= x "No") 
(exit))
       ((= x "INsert") (ins521))