옵셋리습인데 무한반복은 없애고 한번으로 실행하게끔 만들어 줄수 없나요

아래리습은 옵셋리습인데 무한반복은 없애고 한번으로 실행하게끔 만들어 줄수 없나요
즉 한번클릭하고 객채선택없이 명령창으로 나가게끔 매번 스페이스를 한번더 눌릴려니 번거러워서요
고수님 부탁드립니다

(defun c:T2 ( / OS a b)
(setq os (getvar “clayer”))
(command “-layer” “s” “23” “”)
(command “offset” “L” “c” “” “e”)
 (if (setq a “2”)
  (while (setq b (entsel))
   (command “offset” a b “_non” (mapcar ‘+ (cadr b) ‘(0 0)) “”)
  )
 )
(setvar “clayer” os)
 (princ)
)