Aula 12 - Continuação das setas de orientação

Nesta aula demos continuidade aos exercícios da aula anterior e criámos um outro modelo de orientação. Para tal, continuámos a editar o ficheiro norte inicialmente criado.

(defun c:norte ()
(setq pontos (getvar "osmode"))
(setq p1 (getpoint "\nQual é o centro do símbolo? "))
(setq p2 (getpoint "\nQual é a direcção norte? "))
(setvar "osmode" 0)
(command "circle" p1 p2)
(command "solid" p1 (polar p1 (angle p1 p2) (* (distance p1 p2) 1.2))
(polar p1 (angle p2 p1) (* (distance p1 p2) 0.6))
(polar p1 (- (angle p2 p1) (* pi (/ 1 6.0))) (*(distance p1 p2) 1.2))
"")
(command "pline" p1 (polar p1 (angle p1 p2) (* (distance p1 p2) 1.2))
(polar p1 (+ (angle p2 p1) (* pi (/ 1 6.0))) (*(distance p1 p2) 1.2))
(polar p1 (angle p2 p1) (* (distance p1 p2) 0.6))
"")
(command "line" (polar p1 (angle p1 p2) (* (distance p1 p2) 1.2))
(polar p1 (angle p2 p1) (* (distance p1 p2) 1.2)) "")
(command "copy" "last" "" p1 p1 "")
(command "rotate" "last" "" p1 "90")
(setvar "osmode" pontos)
)

Aula 11 - Direcção Norte

Para esta aula, o trabalho era criar uma orientação Norte para os nossos trabalho com o seguinte aspecto:

Para tal, recorremos ao NotePad++ e introduzimos o seguinte texto, posteriormente guardado em ficheiro LISP;

Posto isto, fazemos Copy + Paste no AutoCAD. Respondemos às perguntas que nos são colocadas - "Qual é o centro do símbolo?" / "Qual é a direcção norte?" e surge então o que criámos no NotePad++. Fomos editando o ficheiro LISP para alterar o aspecto do símbolo, e este foi o processo executado:

Para além deste modelo, experimentámos outros.

Modelo 2

Aula 10 - Pontas soltas

A aula serviu essencialmente para refazer o exercício do cubo hiperbólico e da casa de banho, a fim de afinar alguns pormenores e tirar dúvidas.