[求助]：还是捕捉的问题，请教各位了。

czg09180274

在LISP中如何合理的控制捕捉是个有点烦人的问题呢。
我在写程序时，常出现程序一切正常但就是运行时老是位置不对或出来的根本就是一个错的东东，（都是捕捉惹的祸）
在程序中使用下面这个语句：
(defun c:xxx()
   (setq oldosmode (getvar "osmode"))
   (setvar "osmode" 0)
...
...
   (setvar "osmode" oldosmode)
(prin1)
)

程序运行是OK了但是又出来一个新的问题就是：
运行程序，提示要输入点时，用不了捕捉，只能重新打开捕捉设置
感觉有点搬起石头砸自己的脚。
要不就是在调用程序之前先F3，
不知哪位高手有没有好的解决方法没呀，如果有的话还请多多指教

先谢过各位高手了。

ll_j

你可以根据需要在适当的位置设置osmode。一般程序都是在输出（比如使用command函数进行画线、写字等）时才需要关闭捕捉，你可以根据这个特点随时设定。
[php](defun c:xxx()
  (setq oldosmode (getvar "osmode"))
  ...
  (setvar "osmode" 0)
  (command ...
  (setvar "osmode" oldosmode)
  ...
  ...
  (setvar "osmode" 0)
  (command ...
  (setvar "osmode" oldosmode)
  ...
  (princ)
)[/php]

czg09180274

一语惊醒梦中人，
以前都没有想到过这样来做的。
真是太感谢楼上长老了。