Timed Pause

[safcadd08]

Hello,

How do I pause for a certain length of time 5 seconds or 10 seconds.

Thanks,

Steve

[Ian_Bryant]

Hi, try

(defun wait (secs / target)
  (setq target (+ (/ secs 24.0 60.0 60.0) (getvar "date")))
  (while (< (getvar "date") target))
  T
)

e.g.

(wait 10) pauses for 10 secs

Ian

[devitg]

As clear as water. Thanks

[Kent1Cooper]

---

@safcadd08 wrote:

....

How do I pause for a certain length of time 5 seconds or 10 seconds.

....

---

(command "_.delay" 5000)

or

(command "_.delay" 10000)

[safcadd08]

Hi Kent, Forgot to tell you the commands have to lisp and not vlisp... Thanks, Steve

[devitg]

On Peters´s behalf

(command "_.delay" 10000)

is just pure and simple LISP ,

not a VLISP´s  BITE

[Kent1Cooper]

---

@safcadd08 wrote:
.... Forgot to tell you the commands have to lisp and not vlisp....

---

As devitg said, they are ordinary AutoLISP.  For an example of how they might be used, paste this into your Command: line:

(command "_.line" (getvar 'viewctr) (polar (getvar 'viewctr) 0 (getvar 'viewsize)) "" "_.delay" 5000 "_.rotate" "_last" "" (getvar 'viewctr) "90")

and hit Enter.  No matter what your drawing units or zoom level, it should draw a Line from mid-screen off to the right, and 5 seconds later, rotate it so it goes upward.