(defun wait (secs / target)
(setq target (+ (/ secs 24.0 60.0 60.0) (getvar "date")))
(while (< (getvar "date") target))
(wait 10) pauses for 10 secs
.... 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.
Log into access your profile, ask and answer questions, share ideas and more. Haven't signed up yet? Register