Nesta aula continuámos a explorar as potencialidades do AutoLisp, mas sem ser funções matemáticas. Primeiramente, realizámos um Tabuleiro de Xadrez com as ferramentas e comandos do AutoCad, e depois escrevemos todas as instruções no TextWrangler (ou Notepad ++) de forma a conseguirmos fazer um tabuleiro igual ao primeiro. Este ficheiro, foi depois escrito em funções para ficar uma extensão LSP e poder funcionar com o comando Appload do AutoCad.
TABULEIRO AUTOCAD
1. Criar duas LAYERS e mudar as respectivas cores: Vermelhas (cor 1) e Amarelas (cor 2)
2. Activar a Layer "Vermelhas"
3. BOX - 0,0 - 10,10,1
4. VPOINT - 1,-1, 1.5
5. ARRAY - 1; 4; 1; 20; 0
6. COPY - all - enter - 0,0 - 10,10
7. COPY - all - enter - 0,0 - 0,20 - 0,40 - 0,60
8. COPY - all - enter - 0,0 - 0,0
9. MIRRO - p - 40,0 - 40,800
10. CHPROP - p - la - Amarelas
TEXTWRANGLER (ou Notepad ++ em Windows)
Depois do exercício anterior, fizemos o mesmo tabuleiro mas a partir de instruções escritas no TextWrangler.
Ficheiro TextWrangler:
(command "layer")
new
vermelhas
color
1
vermelhas
new
amarelas
color
2
amarelas
set
vermelhas
vpoint
1,-1,1.5
box
0,0
10,10,1
zoom
e
copy
l
0,0
20,0
40,0
60,0
copy
all
0,0
10,10
copy
all
0,0
0,20
0,40
0,60
zoom
e
copy
all
0,0
0,0
mirror
p
40,0
40,800
y
chprop
p
la
amarelas
- Se tudo estiver correcto, o resultado que aparecerá no AutoCad será igual ao primeiro Tabuleiro realizado. Para tal basta copiarmos o que está escrito em cima e colar na barra de comando do Autocad e fazer enter.
LISP
Posteriormente a estes exercícios, realizámos um ficheiro LSP, com as funções para realizar o Tabuleiro no AutoCad. Este exercício não foi concluído na aula.
Sem comentários:
Enviar um comentário