Topic: need help with a macro

[ELOQUINTET]

can anybody help me with a macro. i want to create a macro that will get the current color. then set the color to yellow. then draw a breakline then reset the color to the previous value. i'm stuck on retreiving the current and restoring part.

(getvar cecolor)-color;yellow;breakline

[David Hall]

(SETQ CC (GETVAR "CECOLOR")) -color;yellow;breakline;\\\(setvar "cecolor" cc);

[PDJ]

Code: [Select]

(setq cl  (getvar "clayer")        ;current layer
            cc  (getvar "cecolor")       ;current color
            tln (cdr (assoc 8 el))       ;text layer name
            tc  (cdr (assoc 62 el))      ;text color
      )

Put your breakline command in here....

Code: [Select]

(if (/= cl tln)(command "LAYER" "S" cl ""))
           (if (/= cc tc)(command "COLOR" cc))
       ;else
(setq cl nil cc nil)
(setq tc nil tln nil)

and that's the rest of it.. Nice and clean exit as well..

[ELOQUINTET]

CmdrDuh yours didn't switch the color back to the previous. i'll try your method pdj when i get a minute. thanks this will help in other situations too.

[David Hall]

maybe it needs a ; after the last ).  It worked on my machine if I type it in. (2006 and cui, I didn't actually make the button)

[David Hall]

thats what it needed.  I added the ; and it worked

[ELOQUINTET]

ah i see the problem i usually except the default so in my case it would look like this \\; not this \\\ thanks man

[David Hall]

No problem.  Not knowing, I put that extra slash in so you could choose