Buzzard，我更倾向于在这种情况下使用COND：
- (defun C:IMGFRAME (/ IFRAME)
- (initget 5)
- (setq IFRAME (getint "\nEnter An Integer:"))
- (cond ((= IFRAME 1)
- (command "_.IMAGEFRAME" "ON"))
- ((= IFRAME 0)
- (command "_.IMAGEFRAME" "OFF"))
- (T (princ "\nNo a Valid Integer")))
- (princ))
不意味着听起来很关键-只是有帮助 | 
