terça-feira, 3 de novembro de 2015

Aula 15

03/11/2015

_Continuação do desenvolvimento de macros.

- Primeiro utilizamos uma macro que o professor disponibilizou para acrescentar uma porta na planta na qual temos vindo a trabalhar nas aulas.

- Executando a macro original no AutoCad acontecia um erro por isso alterámos, na linha 3, "osmode" 1 para "osmode" 33. 




- No AutoCad carregamos esta macro alterada. Usamos o comando AppLoad, seleccionamos o ficheiro porta.lsp e carregamos em Load.



- Na layer Elementos Simbólicos e trabalhando no Model Space (comando MSpace), escrevemos o comando Porta e fazemos o indicado. Escolhemos o ponto onde a porta gira, o ponto onde a parte bate e para que lado a porta abre, como está descrito na macro.




------


- Continuámos a trabalhar na macro que iniciámos na aula passada (Snorte2). Como o resultado da macro que fizemos não era o pretendido fizemos algumas alterações para chegarmos a um resultado que nos agradasse.



Ficheiro LSP original (da aula passada) e o correspondente em AutoCad


- A primeira alteração consistiu em transformar as distâncias ( 4)3, 10 ) em percentagens ( 0.75, 0.1 ). Adicionámos o indicador "s" para indicar o segundo ponto, e passámos o "a" para depois da espessura da linha -  "w".



- Repetimos o método de carregar o ficheiro para o AutoCad, e ao executar o comando Snorte2 alterado o resultado final é este:



- Na segunda alteração da macro original mudámos os valores de 0.75 para 0.85, alterando o aspecto da seta.



- O resultado é o seguinte:



- Na última alteração, mudámos os valores de 0.1 para 0.05, diminuindo a espessura da linha interior.



- O resultado final:



- No caso da macro não estar a ser executada correctamente e para verificar onde está o erro que impede o seu bom funcionamento, copiamos a macro linha a linha e vamos colando na barra dos comandos até que o erro apareça. Isto ajuda-nos também a entender melhor o que cada expressão representa. 


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


- Nesta aula começámos ainda uma nova macro (Snorteaula15), para criar um símbolo diferente.

Sem comentários:

Enviar um comentário