Mline lisp

[SstennizZ]

I made the following lisp, but for some reason the layer doesn't change to the specified layer, but stays in the current.

What am I overlooking?

 

(defun c:5 (/)
 
 (setq clyr (getvar "clayer"))              ;store current layer

(setvar "cmdecho" 0)
(command "_.layer" "set" "Looproute" nil)
(setvar "cecolor" "bylayer")
 
 (command "mline" "J" "Z" "S" "500")

(setvar "clayer" clyr)

  (princ)
)

[neekcotrack]

I would try to make the layer instead of setting because if its not there it will error out. It will be easier in the long run.

[lpseifert]

Try putting this after

(command "mline" "J" "Z" "S" "500").... not tested

(while (= 1 (getvar "cmdactive"))
 (command pause)
);while

[SstennizZ]

I would try to make the layer instead of setting because if its not there it will error out. It will be easier in the long run.

 

Thats not quite the issue since we always work from the same template. And I'll try that lpseifert.

[SstennizZ]

Briliant! That works just fine!