05 de Abril

MACRO - AutoCAD | NotePad++

• Criar uma folha A3 em milímetros (1 metro = 1000 milímetros): b 0.297, a 0.420;

É possível utilizar o software com uma macro pra fazer as dimensões da folha automaticamente:

Notepad++

•  (defun hoja (x y) 
•  (command "rectangle" (list 0 0) (list x y)) );
•  Gravar o ficheiro com o nome: “hoja.lsp”;

AutoCAD

• “LAYOUT” - Page Setup Manager – enter – modify - name: DWG TO pdf.pc3 - paper size: ISO full blees A3 (420.00 x 297.00 MM) - plot scale: custom 1000 mm/ 1 unit – enter;
• “APPLOAD” – enter - transferir o ficheiro lps - enter - (hoja 0.420 0.297);

Notepad++

• Abrir o ficheiro criado anteriormente: hoja.lps;
• (command "rectangle" (list 0.005 0.005) (list (-x 0.005 ) (- y 0.005)));
• Guardar o documento;

AutoCAD

• “APPLOAD” – enter - transferir o ficheiro lps - enter - Layout3 (hoja 0.420 0.297) (hoja 0.594 0.420) (setq a (sqrt (/ 1 (sqrt 2)))) (setq b (* a (sqrt 2)));

Notepad++

• Abrir um novo ficheiro;
• Criar uma macro para desenhar folhas da serie A (A0; A1; A2; A3; A4) - macro que desenha folhas serie A - pela indicação da área da folha - as folhas desenhadas são ao baixo e arrumadas em caixa: 

(defun c:hojas () 

(setq spontos (getvar "osmode")) 

(setvar "osmode" 0) 

(setq nome (getstring "Qual o nome da folha?")) 

(escolha) 

(calculo area) 

(desenhar a b) 

(setvar "osmode" spontos) ) 

(defun calculo (area) (setq b (sqrt (/ area (sqrt 2))))

(setq a (* b (sqrt 2))) ) 

(defun desenhar (a b) 

(command "rectangle" (list 0 0) (list a b)) 

(command "rectangle" (list 0.005 0.005) (list (- a 0.005) (- b 0.005))) );

• Guardar o ficheiro: hojas.lps;

AutoCAD

• “Model” – “APPLOAD” – enter - transferir o ficheiro lps - enter - HOJAS – enter;
• “ZOOM”;
• “EXTEND” – enter;

Notepad++

• Fazer os comandos para criar automaticamente o tamanho das folhas:

(defun escolha () 

(cond ((= nome "a0")(setq area 1)) 

((= nome "a1")(setq area (/ 1 2.0))) 

((= nome "a2")(setq area (/ 1 4.0))) 

((= nome "a3")(setq area (/ 1 8.0))) 

((= nome "a4")(setq area (/ 1 16.0)));

AutoCAD

• “APPLOAD” – enter - transferir o ficheiro lps - enter – HOJAS – enter - A1 - enter – HOJAS – enter - A2 – enter – HOJAS – enter - A3 - enter – HOJAS – enter - A4 – enter;

Foi-nos mostrado um ficheiro lsp que insere as formas, abrindo-o no AutoCAD através do comando “INTERSECT”, onde vamos associar uma forma com o espaço à volta, resultando no trabalho final da cadeira. Em função de uma seleção a partir daquela macro, gerar uma área que possa ser habitável e percorrida como os modelos que foram apresentados.