Colunas (Autolisp)

Primeiro fez se a experiência de desenhar a coluna pretendida no AutoCAD, procedendo ao desenho de 3 círculos que serviriam de referência para introdução do comando loft.

 

De seguida prosseguiu-se à escrita do código de programação para automatizar esta construção.

Parabolóides

Hiperbólico

1º Passo
Desenhar 2 circunferências:

CIRCLE > 0,0 > 1
CIRCLE > 0,0 > 3

Inserir LINE > NEAR > ponto da circunferência exterior > TAN > circunferência interior

Comando EXTEND para prolongar a linha até à circunferência exterior

2º Passo
Inserir -VPOINT > 1,-1,1

3º Passo

LINE > ponto da circunferência exterior > .XY > 10 

4º Passo

Copiar o circulo maior e a geratriz.

Comando ARRAYCLASSIC e selecionar as seguintes opções:

5º Passo

Nos objetos copiados:

LINE > centro da circunferência > @0,0,10

6º Passo

SURFTAB1 > 180

REVSURF > geratriz > eixo > 0 > 360

VIEW > CENCEPTUAL

7º Passo

Mudar o novo objeto para amarelo.

Mudar a cor da layer 0 para vermelho.

Por fim copiar a malha de uma parabolóide para cima da outra.

Resultado Final

Parabolóide

1º Passo

BOX > 0,0 > @5,3,2

-VPOINT > 1,-1,1

2º Passo
Fazer EXPLODE duas vezes para ficar só com linhas.
Com o comando LINE desenhar 4 diagonais no espaço como na figura seguinte.

3º Passo
Copiar o conjunto 2x para o lado.
Criar novas layers: "edgesurf", "rulesurf" e "rigorosa".

4º Passo
Na primeira caixa aplicar o comando EDGESURF > selecionar as linhas por ordem.
Na segunda caixa aplicar o comando RULESURF > selecionar as linhas por ordem.
Na terceira caixa:
DIVIDE > selecionar as diagonais > 6
PDMODE > 35
PDDTYPE (para escolher a representação do ponto).

5º Passo
Com o comando LINE conectar todos os pontos de forma a criar uma malha.
ERASE > 'FILTER > selecionar as opções da imagem seguinte

6º Passo
UCS > 3P > diagonal do rectângulo
SPLINE > pontos da malha que criamos

Resultado Final

Entrega do quadro de Kazimir Malevich

 Entrega do trabalho do quadro.

5ª Semana

- Construção de parabolóides.
- Colunas em AutoLisp

Entrega da Parabolóide Hiperbólica,  Parabolóide, Coluna.dwg, Coluna.lsp, Coluna2.lsp

Tempieto

1º Passo
Configurar as vistas (VPORTS).

2º Passo
Fazer 2 lajes.
BOX > 0,0,0 > 5,3,0.17

XL > H
XL > V
OFFSET > 1.5 > direita
OFFSET > 0.5 > cima

BOX > interseção > @2,2,0.17

3º Passo
Apagar linhas auxiliares.
VIEW > XRAY
OFFSET > 0.15
CYL > interseção > 0.15  > 3
LINE > @0,0,0.15
SPHERE > centro > 0.15

Comando ARRAYCLASSIC e selecionar as seguintes opções:

4º Passo
BOX > .XY > (+ 0.17 0.17 0.3 3) > @2,2,2

UCS > 3P

CIRCLE > 2
SLICE > cubo > 3P (2 vértices da base e a interseção dos 2 círculos)
Continuar com o comando SLICE até obter o seguinte aspeto:

5º Passo
Criar nova layer "cortina".
Utilizar o comando LINE  para unir os centros de 2 esferas, de seguida criar circunferências nessas mesmas esferas com 0.15 de raio, por fim fazer TRIM. Manter apenas metade da linha.
Copiar a mesma linha para baixo e inserir ROTATE > -90.
RULESURF > pontos extremos

6º Passo
MIRROR
VIEW > REALISTIC

7º Passo
Comando MIRROR outra vez para ficar com 4 cortinas.
Criar novamente uma linha na direçao do centro de 2 esferas.
ARC > ponto inicial > E > .XY > A > 180
SURFTAB1> 12
RULESURF > pontos extremos
MIRROR

8º Passo
LINE > @0.15 > 45
LINE > @0.15 > 315
UCS > Y > 25
OFFSET > 0.25
ARC

ARRYCLASSIC

EDGESURF
Mudar a cor para amarelo.

9º Passo
Mudar ponto de vista:
DVIEW > PO > .XY > 3

Resultado final

Seccionamento de um dado

1º Passo
A partir do ficheiro do dado feito na última aula, criar novas LAYERS: "Piso 2.5", "Piso 5", "Corte L" e "Corte T".

2º Passo
Com a layer "Piso 2.5" ligada:
SECTION > selecionar dado > XY > 0,0,2.5
VIEW > XRAY

3º Passo
Mudar para layer "Piso 5".
SECTION > selecionar dado > XY > 0,0,5

4º Passo
Mudar para layer "Corte L".
SECTION > selecionar dado > XZ > selecionar o ponto médio da aresta

5º Passo
Mudar para layer "Corte T".
SECTION > selecionar dado > YZ > 2.5,0,0

6º Passo
Configurar a página para A3 ao baixo (PAGESETUP).
Criar nova layer "Janelas" e impedir a sua impressão.
GRID > OFF
Representar secções, desligando as layers necessárias em cada MVIEW.

4ª Semana

- Seccionamento de um dado.
- Construção de uma composição de sólidos "Tempieto"

Entrega do Dado,  Tempieto.