为什么鼠标右键不起作用？

wish2008

；；这是一段插入阀门的时候，调整阀杆方向的函数

；；以前在鼠标右键AutoCAD R14中用，没有问题。现在AUTOCAD2006中，鼠标右键不起作用了，只能按ESC退出，而且中断了后面的程序运行。

(DEFUN ROTA-FM-1 ()
  (PRINC "\n选择阀杆朝向: <左键调试/右键结束>...")
  (SETQ KEY "")
  (WHILE (/= KEY "右键")
    (SEL-KEY)
    (IF (= KEY "左键") (COMMAND "OSNAP" "NONE" "ROTATE" "L" "" PT0 "180"))
      )
  (COMMAND "REDRAW")
)
 

；；请高手帮忙调整一下。