AutoLISP - Código para Verificação e Criação de Layers

Segue o Código abaixo:

(if (tblsearch "layer" "CONTORNO") (setvar "clayer" "0")
   (command "_layer" "_M" "CONTORNO" "_c" "3" "" "l" "CONTINUOUS" "" ""))

Explicação da Linha de Comando

"_M" = Criar layer
"CONTORNO" = Nome da Layer
"_C" = Cor da Layer
"3" = Código da Cor, neste caso, cor Verde
"" = Enter
"L" = Estilo da Linha
"CONTINUOUS" = Linha Contínua

Posted in: AutoCAD , AutoLisp , Códigos