Aula 17_13/11/13

Esta aula foi direccionada para as Macros, como aula de apoio à criação daquela que temos de criar;

Iniciámos a aula a ir à página do Professor, de onde fizemos o download dos seguintes ficheiros:

• "cv.lsp" 
• "setas.lsp"

De seguida fomos à página de um aluno de anos anteriores e fizemos o download da Macro do mesmo:

No AutoCAD vamos abrir um novo ficheiro e vamos com o comando "Appload" fazer o uppload dos ficheiros .lsp que acabámos de guardar (cv.lsp;setas.lsp;iso.lsp)

Para uma explicação do comando interno "cv" fizemos uma conversão desta expressão:

2' - 9½''

E para isso introduzimos na linha de comandos:

(CV 2 9.5)

Cujo resultado foi: 0.8475

Chamamos o comando "Units" e alteramos a opção "Precision";

Para explicar o que significa a expressão "defun" - expressão que introduzimos na 1ª linha, no Notepad++, quando queremos criar uma Macro - o professor indicou o site da Autodesk.

Macro das Setas:

Pl (Pline)

Enter

Seleccionar um ponto à escolha

W

Enter

0

Seleccionamos um ponto

20

Enter

Pl (Pline)

Enter

Seleccionar dois pontos à escolha

A (Arc)

Enter

Seleccionar outro ponto

W

Enter

100

Enter

Seleccionar dois pontos à escolha

Esc

Após esta pequena experiência, vamos apagar tudo e começar outro exercício;

Rec (Rectang)

Enter

0,0

Enter

2,1

Enter

Z (Zoom)

Enter

E (Extents)

Enter

Com o comando "PEdit", vamos alterar a forma do nosso Rectângulo;

Pedit

Enter

Seleccionamos o Rectângulo

F (Fit)

Enter

*Para anular a opção anterior;

D (Decurve)
Enter

Seguidamente:

S (Spline)
Enter
Enter

Cujo resultado é:

Desfazer tudo e regressar à forma inicial do Rectângulo;

Uma vez que já fizemos o uppload do ficheiro "setas.lsp", vamos chamar o comando:

Setas

Enter

Indicar um ponto (vértice do rectângulo) 1

Indicar um segundo ponto onde termina a seta 2

Indicar um terceiro ponto onde a linha da seta vai curvar 3

Indicar um quarto ponto onde a seta termina 4

Enter

Fazer o mesmo mas no sentido oposto utilizando o vértice superior direito;

Para criarmos uma função que nos vai permitir calcular o resultado de qualquer número multiplicado por 9, vamos abrir o Notepad++ e vamos começar por introduzir:

1. ;função que multiplica qualquer número por 9
2. (defun cena (multiplosde9)
3. (* 9 multiplosde9)
4. )

E guardamos com "Mul9" na extensão .lsp :

No AutoCAD, com o comando "Appload" fazemos o upload, do ficheiro que criámos "Mul9":

Na linha de comandos inserimos:

(cena 41)

Enter

Cujo resultado será 369

 Regressando ao Notepad++ alteramos o ficheiro "Mul9" para estas directrizes:

1. ;função que multiplica qualquer número por 9
2. (defun cena (n1 n2)
3. (* n1 n2)
4. )

Fazemos novamente o upload do ficheiro "Mul9.lsp" para o AutoCAD e introduzimos na linha de comandos:

(cena 9 2)

Enter

Cujo resultado será 18:

Voltamos a introduzir o mesmo comando alterando os números:

(cena 2 54)

Enter

Resultado: 108

ou

(cena 9 16)

Enter

Resultado: 144

Entre outras possibilidades.

Chamamos agora o comando "iso" (Macro desenvolvida pelo aluno Tomás Sequeira):

Iso

Enter 

Seleccionamos o ponto 1

Seleccionamos o ponto 2

Seleccionamos o ponto 3

Eliminamos o excesso que ficou fora do Rectângulo

Seleccionamos o objecto

Erase

Enter

Criamos outro Rectângulo mais pequeno;

Rec (Rectang)

Seleccionamos um ponto à escolha (início da diagonal)

Seleccionamos outro ponto (fim da diagonal do rectângulo)

Enter

Introduzimos na linha de comandos:

Iso

Enter 

Seleccionamos o ponto 1

Seleccionamos o ponto 2

Seleccionamos o ponto 3

Vamos eliminar com o comando "Erase" o objecto construído a mais.

Vamos agora eliminar o que ficou fora do rectângulo com o comando "Trim";

Tr (Trim)

Enter

Seleccionar o rectângulo

Enter

Seleccionar o que ficou de fora

Enter

Agora para aumentarmos a espessura do padrão inserido no rectângulo, inserimos na linha de comandos:

Pl (Pline)

Enter

Seleccionar um ponto dentro do rectângulo

W

Enter

0.2

Enter

Enter

Iso

Enter

Seleccionamos o ponto 1

Seleccionamos o ponto 2

Seleccionamos o ponto 3

Concluído este exercício, vamos novamente abrir um ficheiro no Notepad ++ , com o propósito de criarmos uma Macro que nos ajude a calcular o valor de razão entre escalas;

Vamos começar por guardar desde já o ficheiro como "Rescalas.lsp";

E vamos inserir:

1. ;razão das escalas
2. (defun res (papel realidade)
3. (/papel realidade)
4. )

Vamos então fazer o upload do ficheiro para o AutoCAD, com o comando "Appload";

E inserimos na linha de comandos:

(res 1.0 100)

Enter

(res 0.006 0.305)

Enter

(res 1.0 50)

Enter

(res 0.25 0.025)

Enter

Cujos resultados foram: