Macro

Criação de Padrão de Vidro

Sabendo que tenho 5'', divide o valor ao meio 2,5.
Dividindo os 2.5 ao meio, tendo assim 1.25
Sabendo que metade de 1/4 é igual 0.25
Sabendo que quero criar 5 linhas que correspondem a quarto metades da medida.
Ao meter o meu offset 1.25 para obter o 1.75 fui fazendo experiencias de ir acrescentado sempre 0.25 + 0.25 até a medida bater mais ou menos com a do meu desenho e ter uma simetria.
experimentando 1.50 e o traço não ficar simétrico.

http://home.fa.ulisboa.pt/~20130346/pdv.lsp

(defun c:pdv ()
(setq p1 (getpoint " Marcar p1 no canto inferior direito do rectangulo:  "))
(setq p2 (getpoint " Marcar p2 no canto inferior esquerdo do rectangulo:  "))
(setq p3 (getpoint " Marcar p3 no canto superior direito do rectangulo:  "))
(command "line" p1 p3 "")
(command "offset" (/ (distance p1 p2) 5) p1 p3 "")
(command "offset" (/ (distance p1 p2) 2.5) p1 p3 "")
(command "offset" (/ (distance p1 p2) 1.75) p1 p3 "")
(command "offset" (/ (distance p1 p2) 1.25) p1 p3 "")
)

Pormenor final "Covered Ways and Canopies, page 105"

Realizado em autocad: 

Pormenor Final

Pormenor Final
http://home.fa.ulisboa.pt/~20130346/pretoebranco.pdf

Autocad - Norte

Informar que ha liguagens de comunicaçao
- definir uma definiçao e uma ideia


Abrir notepad++
criar uma nova macro, abrindo assim uma nova função

Abrir Autocad
- Pline marcar um ponto; height; 200; 0; enter (enter)

- Continuar a macro
o comand (distance p1 p2) dá nos a distancia dos dois pontos e ele dá me a distancia que consegue encontrar daqueles pontos, mas eu quero que a distancia seja um decimo

- Appload norte - load
-marcar um ponto ao calhas, marcar outro ponto ao calhas, enter (enter)


- pesquisar calculating points (polar)
-abrir notepad++ - acrescentar na macro mais codigos (print 6)

abrir autocap
- appload norte.lsp
- marcar um ponto ao calhas, marcar outro ponto ao calhas enter (enter)

abrir notepad++
- print 8

autocad
- abrir appload norte etc...


abrir notepad++
- print 10

abrir autocad - print 11

cubo hiperbolico

Casa-de-Banho

17 de Novembro

2 exercicio:
- procurar canetas rotring pens l makeup na net

- vamos usar linhas de corte para as paredes
0.35
- as linhas do vao da porta 0.25
- linhas do pavimento 0,1
e a que seciona o vao 0.35
- as peças com linha de 0,10

identificaçao das linhas com cores
0.1 - castanho
0.13 - mangenta
0.25 - branco
0.35 - amarelo

Autocad:
. criar novas layers:
- linhas auxiliares
- paredes
- peças
- vaos

Notepad ++
- criar o comand ze

Autocad appload, abrir ficheiro, load (close)

xline verticla 0,0
xline horizontal 0,0

zoom extend

no ponto da origem , circle, 1
zoom extend

apagar circle

offset 3 , linha horizontal 3 unidades para cima
offset 2 , linhs vertical 2 unidades para a direita

- ligar layer amarela
- comand: boundary clicar num ponto dentro do rectangulo (enter)
obtemos um rectangulo

offset 0.15 selecionar um ponto dentro do rectangulo e obtmos a nossa espessura

ligar linhas auxiliares
off set o.25 da vert da linha direita para a esquerda
offset 0.75 da linha de 0.25

de novo
offset a partir da linha do eixo a nossa mediana meter 0.50 para a direita e esquerda

NOTEPAD ++
abrir o ficheiro porta, alterar dados

AUTOCAD
ligar layer vaos
appload porta ponto na linha auxiliar a direita e depois na outra linha a direita (enter) - porta feita


TRIM - cortar linhas das espessuras dos vaos

congelar linhs auxiliares

nas espessuras amarelas unir o resto das linhas LINE
 e apagar tudo o que é auxiliar

ligar layer branca e unir os vaos

insert - sanita com a layer peças ligada


insert - banheira ligar o on screen

insert - lavatoro (enter)
mid e por (enter)


hatch pavimentos
linha com 0.1
angle 45º

Exercício desenhar uma casa-de-banho

Plataforma moodle puxar os quatro documentos:
- sanita
- banheira
- lavatório
- porta

Abrir banheira - tirar a distância de um ponto ao outro - 0.98
Abrir lavatório - move (enter) (enter) (enter) Displacement 0.0 - 0.40
                         - dist midpoint midpoint (entr)

Criação de Layers