Semana 14

Semana  14

27ª Aula (15/12/2015) 

28ª Aula (17/12/2015)

Semana 13

Semana  13

25ª Aula (08/12/2015) 

•  feriado

26ª Aula (10/12/2015)

Semana 12

Semana  12

23ª Aula (01/12/2015) 

•  faltei a aula

24ª Aula (03/12/2015)

• fazer um corte de um tubo AutoCAD

circle enter

0,0

0.5

cline enter

vertical

horizontal

offset enter

0.25

spline

novo offset com 0.125

• Criação de uma macro para fazer o tubo.

Notepad++ / textwrangle

(defun c:tubo () 

(setq p1 (getpoint "Qual o primeiro ponto?\n"))

(setq p2 (getpoint "Qual o segundo ponto?\n"))

(setq p4 (polar p1 (angle p1 p2) (* (distance p1 p2) 0.5)))

(setq p3 (polar p1 (- (angle p1 p2 ) (/ pi 4)) 

                   (* (* (distance p1 p2) 0.25)(sqrt  2))))

(setq p5 (polar p4 (+ (angle p1 p2 ) (/ pi 4)) 

                   (* (* (distance p1 p2) 0.25)(sqrt  2))))

(setq p6 (polar p4 (- (angle p1 p2 ) (/ pi 4)) 

                   (* (* (distance p1 p2) 0.25)(sqrt  2))))

(command "pline" p1 p3 p4 p5 p2 p6 p4 "")

(command "pedit" "last" "fit" "")

)

Semana 11

Semana  11

21ª Aula (24/11/2015) 

Introdução de padrões em AutoCAD

Fazer rectângulo branco, criar laser de trabalho amarela e fazer uma malha dentro do rectângulo. 

22ª Aula (26/11/2015)

•  faltei a aula

Semana 10

Semana  10

19ª Aula (17/11/2015) 

Continuar a fazer o escalamento do pormenor.

20ª Aula (19/11/2015)

• Faltei a aula 

Semana 9

Semana  9

17ª Aula (10/11/2015) 

•  faltei a aula

18ª Aula (12/11/2015)

fazer um exercício com uma parábola 

macro para fazer zoom, em notepad ++, ou textwrangler (no caso de Mac)

(defun c:ze ()

(command "zoom" "e"))

passar Linhas auxiliares no nosso pormenor, criar layer trabalho.

Xline: linhas horizontais e linhas verticais

Semana 8

Semana  8

15ª Aula (03/11/2015) 

Por os promenores a diferentes escalas 1:00 1:50,

Fazer o exercico do toyo ito completo.

Fazer circulo com espessura interior, e aplicar a alteração do snorte.lsp

Procurar um simbolo norte na net.

16ª Aula (05/11/2015)

Model Space Escala: 1/1 

Mudar a escala, comando Scale

Escala Real: metros

Utilização de diferentes escalas para vários pontos do pormenor.

semana 7

Semana 7

13ª Aula (27/10/2015) 

Tilemode 0

Layout 1

Seleccionar a folha de fora e erase

Zoom 1/100xp

Draworder

Zoom 1/50xp

Pspace

14ª Aula (29/10/2015)

Notepade ++

0,0

0,1

Pline

0,-1

W

0.2

0.2

0,1

Comando:

pline

 UCS repete o circulo

Linguagem LISP/AutoLISP (processa listas), importante para as macros.

• Notepad ++ 
• Guardar como: snorte (tipo:LISP)

(defun c:snorte ()

(setq p1 (getpoint "qual é o primeiro ponto?"))

(setq p2 (getpoint "qual é o segundo ponto?"))

(command "circle" p1 p2)

(command "pline" p1 "w" (* (distance p1 p2) 2) 0 p2 "")

)