Continue Command Brain Cramp...

Discussion in 'AutoCAD' started by pkirill, Jul 18, 2003.

  1. pkirill

    pkirill Guest

    I've got this old Dim routine that puts dims on the dim layer. I've dusted
    it off, and I see that I had used the PAUSE PAUSE thing to determine user
    input. I'd like to just let the routine go and whenever the user is done is
    resets the original layer. I don't want the routine to repeat, just to let
    the user finish - but I can't seem to remember the method. Any help??

    ;;DIML=DIMLINEAR
    (DEFUN C:DIML()
    ;simple error handler
    (defun *error* (msg)
    (princ "\n--->Back and forth, back and forth (sigh...) ")
    (setvar "clayer" l)
    (princ msg)
    (princ) )

    (SETQ L (GETVAR "CLAYER"))
    (setvar "clayer" "05-DIMS")
    (COMMAND "DIMLINEAR" PAUSE PAUSE PAUSE) ;; <=THIS IS THE
    PART I'D LIKE TO CHANGE
    (setvar "clayer" l)
    (princ))
     
    pkirill, Jul 18, 2003
    #1
  2. pkirill

    Mark Guest

    try this
    (command "DIMLENEAR")(while (/= (getvar "CMDACTIVE") 0)(command PAUSE") )
     
    Mark, Jul 18, 2003
    #2
Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments (here). After that, you can post your question and our members will help you out.
Similar Threads

  1. Script Brain Lock....

  2. Continue a pline

  3. Foggy Brain 0 .pat files

  4. I spent my brain

  5. OK to continue

  6. Error in Cadence -- Insufficient memory to continue!!!! How toresolve?

  7. How do you code a Continue button on a Userform?

Loading...