Aula - 27/10/12

De inicio começamos por falar do trabalho prático e da envolvência do livro Architects' working details / D. A. C. A. Boyne, Lance Wright, com o próprio trabalho que consiste realizar em Autocad a pormenorização de uma peça escolhida.

Depois recapitulamos o último exercicio da aula passada mas desta vez utilizamos o comando "Move" de maneira a centralizar os poligonos.

De seguida fizemos 6 layers cada uma correspondente com um poligono especifico e preenchemos os poligonos cada um com a sua própria cor.

-Quadrado: layer "quadrado_M" comando "Solid"

-Pentágono: layer "pentagono_M" comando "Solid"

-Rectangulo: layer "rectangulo_M" comando "Solid"

-Rectangulo aureo: layer "rectangulo aureo_M" comando "Solid"

-Circulo: layer "circulo_M" comando "Solid"

-Triangulo: layer "triangulo_M" comando "Solid"

Tivemos uma pequena aprendizagem da escala apartir do comando "Scale" onde foi utilizado o centro de todas as figuras e foi-lhe atribuido o valor de 10.
De seguida organizamos atraves do "PaperSpace" a nossa folha de trabalho:
-Configuração da folha, ISO A3 ao baixo, escala 1:1.
-Construimos 2 layers, "Folha" e "Janela"
-Atraves do comando "Mview" vai nos abrir uma janela de observaçao "Modelspace"
-Depois apreendemos que o "VP Freeze" serve para congelar aquele poligono que nao pretendemos visualizar
-Finalmente comando "Zoom" e posteriormente ver a nossa unidade de trabalho e neste caso o milimetro que nesta escala de 1:100 corresponde a 1000/100xp

Na 2º parte da aula começamos outro exercicio que se prendeu com a construção de uma parábola
- comando "XLine" com uma recta em que precisamos de dois pontos para indicar uma direcção ou
um alinhamento, uma direcção e um ponto. Para 2 "XLines" ortogonais uma vertical e outra horizontal
que representam a directriz e o eixo da parábola respectivamente depois desenhou-se um circulo para
confirmar as intersecçoes.

-Pretendeu-se fazer rectas paralelas á directriz e circulos com diferentes raios com o mesmo centro e para isso foi utilizado o comando "Offset" que permite fazer rectas  e circulos com a mesma distancia entre si.

Aula - 20/10/12

De inicio fizemos uma pequena revisão daquilo que tinha sido feito na aula passada e criamos de novo um tabuleiro de xadrês de duas formas:

1-Execução de todos os comandos que envolvem a construção do tabuleiro apartir da repetição de quadrados 

(defun c:lay () (command "layer" "n" "brancas" "n" "pretas" "c" "1"
"pretas" "s" "brancas" ""))
(defun c:casa () (command "solid" "0,0" "1,0" "0,1" "1,1" ""))
(defun c:ze () (command "zoom" "e" ))
(defun c:col () (command "array" "l" "" "r" "1" "4" "2"))

(defun c:cpy () (command "copy" "all" "" "0,0" "1,1"))

(defun c:lin () (command "array" "all" "" "r" "4" "1" "2"))

(defun c:ref () (command "mirror" "all" "" "4,0" "4,8" "n"))
(defun c:mud () (command "chprop" "p" "" "la" "pretas" "" ))
)



· A segunda consiste na realização do tabuleiro de Xadrês, utilizando uma unica função Autolisp:

(defun c:tab ()
(command "layer" "n" "brancas" "n" "pretas" "c" "1" "pretas" "s" "brancas" ""))
(command "solid" "0,0" "1,0" "0,1" "1,1" "")
(command "array" "l" "" "r" "l" "4" "2" )
(command "copy" "all" "" "0,0" "1,1" )
(command "array" "all" "" "r" "4" "1" "2" )
(command "mirror" "all" "" "4,0" "4,8" )
(command "chprop" "p" "" "la" "pretas" "" )
(command "zoom" "e" )
)

• Depois para dar continuidade a uma aula de revisão trabalhamos com poligonos que em outras aulas já os tinhamos construido e associação das suas layers alterando o nome e a cor para cada poligono

• Transportamos o circulo para dentro do quadrado utilizando o comando "Move"

Aula - 13/10/12

1ª Parte - Visionamento de um vídeo de Greg Lynn com o titulo  TED Speaker Profile

Depois a aula teve como base a criação de rectângulos

• Criação de um rectângulo em LandScape

(defun c:r2 ()

 (setq pt1 (getpoint "\n Qual o ponto de inserção?  "))

 (setq lado (getreal "\n Qual a dimensão do lado menor do rectângulo?  "))

 (setq pt2 (list (+ (car pt1) (* lado (sqrt 2))) (cadr pt1)))

 (setq pt3 (list (car pt2) (+ lado (cadr pt2))))

 (setq pt4 (list (car pt1) (cadr pt3)))

 (command "pline" pt1 pt2 pt3 pt4 "c")

 )

• Criação de um rectângulo em LandScape, bloquear o comando OSNAP e no final repor os valores de OSNAP;

Em que na:
Linha 5 - (setvar"osmode" 0) - Desliga o OSNAP
Linha 12 - (setvar"osmode" os) - Liga o OSNAP
 

• Aprendemos o "DIST", um comando que nos permite medir distâncias entre pontos, pode ser utilizado entre dois pontos ou entre vários pontos 

2ª Parte - Construção de Macros

• Criação de um rectângulo de Proporção Áurea;

;esta macro resolve apresentacoes de rectangulos de proporção aurea
(defun c:rau ()
 (setq os (getvar"osmode"))
 (setvar"osmode" 0)
 (setq pt1 (getpoint "\n Qual o ponto de inserção?  "))
 (setq lado (getreal "\n Qual a dimensão do lado menor do rectângulo?  "))
 (setq pt2 (list
   (+ (car pt1) (/ lado 2) (sqrt (+ (expt lado 2) (expt (/ lado 2) 2))))
   (cadr pt1)))
 (setq pt3 (list (car pt2) (+ lado (cadr pt2))))
 (setq pt4 (list (car pt1) (cadr pt3)))
 (command "pline" pt1 pt2 pt3 pt4 "c")
 (setvar"osmode" os)
 )

• Layer´s (Camadas), uma ferramenta bastante util pois permite trabalhar na base de trabalho de forma independente entre cada desenho criado   

Command: la LAYER
Criação de 6 novos Layer´s, com as seguintes descrições e respectivas atribuições de cores para facilitar a sua distinção

• Carregar as Macros correspondentes, qua,cir,pol,tri, ret,rau.lsp

• Command: (qua 1)

Qual é o ponto de inserção?0,0

• Command: (cir 1)

Qual o centro do circulo 0,0

circle Specify center point for circle or [3P/2P/Ttr (tan tan radius)]:

Specify radius of circle or [Diameter] <1.0000>: 1

Command: (pol 1)

Qual é o primeiro ponto do lado? 0,0

Qual é o segundo ponto do lado? 1,0

polygon Enter number of sides <5>: 1

Requires an integer between 3 and 1024.

; error: Function cancelled

Enter number of sides <5>:Specify center of polygon or [Edge]:

Enter an option [Inscribed in circle/Circumscribed about circle] <I>:

Specify radius of circle:

• Command: (tri 1)

 Qual o ponto de inserção? 1,1

  line Specify first point:

  Specify next point or [Undo]:

  Specify next point or [Undo]: @1<120

  Specify next point or [Close/Undo]: c

• Command: (recr2 2)

qual é o ponto de inserção do rectangulo? 0,0

pline

Specify start point:

Current line-width is 0.0000

Specify next point or [Arc/Halfwidth/Length/Undo/Width]:

Specify next point or [Arc/Close/Halfwidth/Length/Undo/Width]:

Specify next point or [Arc/Close/Halfwidth/Length/Undo/Width]:

Specify next point or [Arc/Close/Halfwidth/Length/Undo/Width]: c

•  Depois basta corresponder cada desenho ao layer pretendido que foi antes criado, para isso temos de ir ao objecto e activa-lo e seguidamente ir á ferramenta Drop Down e fazer a correspondência com o elemento pretendido, repetindo até ao ultimo.

Construcção de um tabuleiro de xadrez, comandos novos utilizados, SOLID, ARRAY, XPLODE, MIRROR e CHPROP.

• Command: SOLIDSpecify first point: 0,0

Specify second point: 1,0

Specify third point: 0,1

Specify fourth point or <exit>: 1,1

Specify third point:

Command: z
ZOOM
Specify corner of window, enter a scale factor (nX or nXP), or
[All/Center/Dynamic/Extents/Previous/Scale/Window/Object] <real time>: e

• Command: ARRAYSelect objects: Specify opposite corner: 1 found

Select objects:
Enter array type [Rectangular/PAth/POlar] <Rectangular>: r

Type = Rectangular  Associative = Yes

Specify opposite corner for number of items or [Base point/Angle/Count] <Count>:

Enter number of rows or [Expression] <4>: 1

Enter number of columns or [Expression] <4>: 4

Specify opposite corner to space items or [Spacing] <Spacing>:

Specify the distance between columns or [Expression] <1.5>: 2

Press Enter to accept or [ASsociative/Base
point/Rows/Columns/Levels/eXit]<eXit>: x

• Command: XPLODE

Select objects to XPlode.
Select objects: l
1 found

Select objects:

1 objects found.
Enter an option
[All/Color/LAyer/LType/LWeight/Inherit from parent block/Explode] <Explode>:

Object exploded.

• Command: CO

COPY

Select objects: all

4 found

Select objects:

Current settings:  Copy mode = Multiple
Specify base point or [Displacement/mOde] <Displacement>:  >>
Resuming COPY command.

Specify base point or [Displacement/mOde] <Displacement>:  >>
Resuming COPY command.

Specify base point or [Displacement/mOde] <Displacement>:
Specify second point or [Array] <use first point as displacement>:
Specify second point or [Array/Exit/Undo] <Exit>: *Cancel*

• Command: ar

ARRAY

Select objects: all
8 found

Select objects:
Enter array type [Rectangular/PAth/POlar] <Rectangular>:

Type = Rectangular  Associative = Yes

Specify opposite corner for number of items or [Base point/Angle/Count] <Count>:

Enter number of rows or [Expression] <4>:

Enter number of columns or [Expression] <4>: 1

Specify opposite corner to space items or [Spacing] <Spacing>:

Specify the distance between rows or [Expression] <3.0000>: 2

Press Enter to accept or [ASsociative/Base
point/Rows/Columns/Levels/eXit]<eXit>: 

• Command: XPLODE

Select objects to XPlode.
Select objects: l
1 found

Select objects:

1 objects found.
Enter an option
[All/Color/LAyer/LType/LWeight/Inherit from parent block/Explode] <Explode>:

Object exploded.

Command: MI
MIRROR
Select objects: all
32 found

Select objects:
Specify first point of mirror line: Specify second point of mirror line:
Erase source objects? [Yes/No] <N>:

Command: CHPROP

Select objects: p
32 found

Select objects:

Enter property to change
[Color/LAyer/LType/ltScale/LWeight/Thickness/TRansparency/Material/Annotative]:
la

Enter new layer name <0>: pretas

Enter property to change
[Color/LAyer/LType/ltScale/LWeight/Thickness/TRansparency/Material/Annotative]:

Command:

Aula - 06/10/12

- Inicio do que envolve a programação em HTML
Perceber e entender o que é o HTML 
Começar a construção de uma página em HTML

<html>
<head>
<title>Primeira p&aacute;gina web da Stefan Olimpio</title>
</head>
<body>
<br><br><br>
<center><b>Stefan Olimpio</b>
<br>
<center><img src=02-guggenheim-museum-bilbao-spain></center>
<br>
<a href="http://www.fa.utl.pt"> Faculdade de Arquitectura</a>
<br>
Página da <a href="http://home.fa.utl.pt/~lromao/2012_13/turma_an_20122013_pc.html">Turma A</a>
</center>
</body>
</html>

Apartir do "FTP" fazer a página web 
Inicio do programa "Filezilla" para alojar a página no "FTP"

2ª Parte - Inicio da programação em Autolist