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)

24.11.09

Tabuleiro de Xadrez



Novos comandos utilizados:

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

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"))
)

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

5.11.09

Continuação do estudo do AutoCad:

Exercício 2 de AutoCad

Planta escolhida: