Avançar para o conteúdo principal

Lisp - Autocad

Eis um LISP simples, no qual se podem observar alguns conceitos básicos de programação, neste caso específica para Autocad.
Guardar o código como Exemplo.lsp (ficheiro de texto simples, com extensão lsp). Depois arrastar para cima de uma janela com um desenho de Autocad. Na linha de comandos escrever "Exemplo". A saída deverá ser um texto com as coordenadas do ponto escolhido.


Here is a simple LISP, in which you can observe some basic programming concepts, in this case specific to Autocad.
Save the code as Exemplo.lsp (plain text file, with lsp extension). Then drag it up to a window with an Autocad drawing. At the command prompt type "Exemplo." The output should be a text with the coordinates of the chosen point.


;Programa de exemplo

(defun c:Exemplo ()
  (princ "_____ Clique um ponto _____")
  (setq ponto1 (getpoint "\n Clique no desenho ?: "))
  (setq pt1x (car ponto1))
  (setq pt1y (cadr ponto1))
  (setq pt1z (caddr ponto1))
  (princ " Coordenadas xx -> ")
  (princ (rtos pt1x 2 2))
  (princ)
  (princ " yy -> ")
  (princ (rtos pt1y 2 2))
  (princ)
)

Etiquetas:

Comentários

Enviar um comentário

Obrigado pelo seu contacto.

Mensagens populares deste blogue

C# - Viadutos Excel - ISPOL

C# - Viadutos Excel - ISPOL Ler dados do Excel e passar a informação para o ISPOL é um ganho de produtividade e organização. Desta vez, apresento uma utilidade que lê um ficheiro Excel, e transforma os dados para o menu de estruturas do ISPOL. Partindo de um Excel organizado, por pks eixos e espessuras da estrutura etc... como o seguinte: Elaborei um programita em CSharp: Este programa funciona em modo "DOS" não tem uma interface gráfica de janelas: O programa cria os ficheiros necessários, o Excel pode estar organizado por eixos, e o programa guarda um ficheiro para cada eixo: O resultado depois de abrir o ficheiro em ISPOL é o seguinte: Com as alterações ao projecto pode-se manter um ficheiro de apresentação e controlo em Excel.
Enviar um comentário
Ler mais

ISPOL - Representação de Gabaris

ISPOL - Representação de Gabaris No ISPOL podemos representar ao longo do traçado um contorno e até realizar variações. A representação de um contorno ou gabari pode ser realizada no ISPOL de um modo simples, usando por exemplo um Símbolo (bloco) da biblioteca, ou um ou vários criados à medida para atender aos casos necessários. Na imagem abaixo um exemplo da biblioteca do ISPOL, representado no perfil transversal. Estas secções são constituídas por símbolos/blocos: Podem-se desenhar ao longo do eixo proporcionando a vista típica destas situações, uma espécie de sólido que enche o traçado. Além desta representação "simples" o ISPOL permite realizar transições entre símbolos diferentes, por exemplo para representar os diferentes gabaris em recta e curva. Ou outras situações que se achem necessárias. Permite ainda condicionar a representação destes símbolos por valores de raio. Isto é para um determinado raio. Pode ser usado para indicar de forma automática ao programa que em r...
Enviar um comentário
Ler mais

Python - Automatização em ISPOL

Python - Automatização em ISPOL Com o uso de PyAutoGui podemos automatizar tarefas repetitivas no ISPOL ISTRAM. No trabalho actual, é necessário converter mais de 300 ficheiros. Já houve um trabalho prévio de ler e transformar dados de directrizes em Excel para ficheiros compatíveis com a conversão presente. Este trabalho prévio foi também feito com programação. Tendo os muitos ficheiros com formato TXT que o ISPOL pode ler e converter para CEJ, é necessário ir ao menu de Conversores do ISTRAM e digitar os dados para ler a localização dos ficheiros, número de eixo etc... um trabalho repetitivo. Sendo repetitivo uma hipótese que deve surgir é se existe forma de automatizar / programar. O ISTRAM ISPOL não permite o uso de plugins (como o CAD), por tanto a via seria pela automatização dos movimentos. O pacote PyAutoGUI para Python permite esta simulação de movimentos. https://pyautogui.readthedocs.io/en/latest/ Basicamente "guiamos" o cursor para onde deve clicar e o que introdu...
Enviar um comentário
Ler mais