When running here :(COMMAND "CIRCLE" "3P" "TAN" PAUSE "TAN" PAUSE "TAN" PAUSE), the pause have stops for user.
but why haven't a stop in the pause here to following in running:
...
(defun w (/ ss1 ang pt)
(setq ang (nth 2 (assoc rr LS1)))
(command "rotate" (ssget) "" pause ang));pause
....