Evaluating points versus Enter

[cadconcepts]

Hi All
I have created a routine to create the mleaderstyle that I want. Now I am trying to write a portion that will start the mleader command and allow the user to pick two points to specify the angle of the first segment after which I immediately turns on orthodemode. What I am trying to do now is to evaluate whether a point has been selected or if an Enter or a space has been pressed which would terminate the point selection process and pop up the text window. Any help is greatly appreciated. Thank you.
Manuel

(setq pt1 (getpoint "\nSelect start point: "))
(setver "osmode" 512)
(if (and pt1 (/= pt1 "Exit"))
  (progn       
    (command ".mleader" pt1)
    (while (= 1 (getvar "cmdactive"))
      (command pause)
      (setvar "orthomode" 1)
    )
  )
)

[watsonlisp]

cmdactive is the frashezzel