terça-feira, 8 de junho de 2010

Filme- Casa Beard


O filme da modelação tridimensional da Casa Beard de Richard Neutra em SketchUp, com música de Glenn Miller "In the mood" - Aqui.

quinta-feira, 15 de abril de 2010

14.3.10






Trabalho de modulação tridimensional.


Casa Beard, em SketchUp.

Richard Neutra

1934-1935

111 m21,194.794 ft² 132.755 yd² 1.11e-4 km² 0.0111 ha 4.285734e-5 miles²

1981 Meadowbrook Road, Altadena, Los Angeles, California, United States

34.18287548891803° N, 118.10976773500443° WLatitude: 34°10′58.352″NLongitude: 118°6′35.164″W




quinta-feira, 7 de janeiro de 2010

7.1.10

Entrega do Exercício de AutoCad:

Planta em Dwg - aqui.

Planta em Bmp - aqui.

Planta em Dwf 1/100 - aqui.

Planta em Dwf 1/200 - aqui.

quinta-feira, 10 de dezembro de 2009

10.12.09



Comandos:

-Dim:
-hor
-ver
-ali
-con
-bas

-Dtext

-Format:
- Dimension style
- Text Style

-Ltscale

quinta-feira, 3 de dezembro de 2009

3.12.09

Desenho arquitectónico

Comandos:

-box
-3dorbit




Comandos:

-subtract




Comandos:

-section - xy
-viewports 3d
-plan
-hatch-solid




Comando:

-dim

quinta-feira, 26 de novembro de 2009

26.11.09

Parábola







Parabolóide









Novos comandos usados:

-spline
-point
-extend
-revsurf
-3dorbit -flat shade - continuos view
-sketch (pequena explicação para curvas de nível)

terça-feira, 24 de novembro de 2009

24.11.09

Tabuleiro de Xadrez



Novos comandos utilizados:

-ucsicon
-trim
-fence
-copy
-region
-boundary

quinta-feira, 19 de novembro de 2009

19.11.09

Comandos em script

(defun quadrado ()
(command "line" "0,0" 1,0" "1,1" "0,1" "c")
)

(defun qgeral ()
(setq p1 (get point "\n qual o ponto de inserção? "))
(setq lado (getreal "\n qual a medida do lado? "))
(setq p2 (list (+ (car p1) lado) (car (cdr p1))))
(setq p3 (list (+ (car p1) lado) (+ (car (cdr p1)) lado)))
(setq p4 (list (car p1) (+ (car (cdr p1)) lado)))
(command "line" p1 p2 p3 p4 "c")
)

(defun dtr (a) (* pi (/ a 180.0)))

(defun porta ()
(setq p1 (getpoit "\n qual o ponto de inserção? "))
(setq largura (getreal "\n qual a largura da porta? "))
(setq orientacao (getint "\n qual a direcção da porta? (0,90,180,270) " ))
(setq abertura (getstring "\n abre à direita ou à esquerda? (e, d) "))
(command "line" p1 (setq p2 (polar p1 (dtr orientacao) largura)) "")
(if ( = abertura "d")
(command "arc" "ce" p1 p2 "a" "90")
(command "arc" "ce" p1 p2 "a" "-90"))
)

19.11.09

Comandos em script

(defun quadrado ()
(command "line" "0,0" 1,0" "1,1" "0,1" "c")
)

(defun qgeral ()
(setq p1 (get point "\n qual o ponto de inserção? "))
(setq lado (getreal "\n qual a medida do lado? "))
(setq p2 (list (+ (car p1) lado) (car (cdr p1))))
(setq p3 (list (+ (car p1) lado) (+ (car (cdr p1)) lado)))
(setq p4 (list (car p1) (+ (car (cdr p1)) lado)))
(command "line" p1 p2 p3 p4 "c")
)

(defun dtr (a) (* pi (/ a 180.0)))

(defun porta ()
(setq p1 (getpoit "\n qual o ponto de inserção? "))
(setq largura (getreal "\n qual a largura da porta? "))
(setq orientacao (getint "\n qual a direcção da porta? (0,90,180,270) " ))
(setq abertura (getstring "\n abre à direita ou à esquerda? (e, d) "))
(command "line" p1 (setq p2 (polar p1 (dtr orientacao) largura)) "")
(if ( = abertura "d")
(command "arc" "ce" p1 p2 "a" "90")
(command "arc" "ce" p1 p2 "a" "-90"))
)

sábado, 14 de novembro de 2009

14.11.09


Desenhar uma porta com 75cm a abrir para a esquerda com a charneira na coordenada 0,0


Desenhar um quadrado na layer "quadrado" na cor 1 (vermelho) e nas coordenadas 0,0 0,1 1,1 1,0


Definir página A2 horizontal