Lisp Percentagem

Eis um Lisp para determinar a % entre dois pontos picados em CAD:

;Determina percentagem entre 2 pts picados
(defun c:P2 ()
(setq p1 (getpoint "\nPT1 Ponto Inicial"))
(setq p2 (getpoint "\nPT2 Ponto Final"))

(setq x1 (car p1))
(setq y1 (cadr p1))

(setq x2 (car p2))
(setq y2 (cadr p2))

(setq disth (- x2 x1))
(setq distv (- y2 y1))

(setq Perf (/ (* 100 distv) disth))

(print Perf)
(princ)
)

Comentários

Mensagens populares deste blogue

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...

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...

Ler mais

Python - Pequena compilação de ferramentas para engenharia civil

Python - Pequena compilação de ferramentas para engenharia civil Desta vez algo relacionado com Python, linguagem que não uso de momento, aplicada à àrea da Engenharia Civil. A linguagem de programação Python, é tida como relativamente fácil de aprender, e por ter várias bibliotecas para manipular grandes quantidades de informação, cálculos e outras ferramentas, muitas. Aqui ficam exemplos e um incentivo a incorporar a programação no fluxo de trabalho. Cálculo de forças, estruturas. No site Medium o utilizador AP exemplifica um cálculo, usando a biblioteca sympy. https://medium.com/@arihantparsoya/solving-truss-problem-using-sympy-matrix-stiffness-approach-de02bd111517 Scripts para Autocad No site supplychaindataanalytics como em muitos outros, mostra um exemplo de aplicação do Pyautocad. https://www.supplychaindataanalytics.com/python-for-autocad-pyautocad-module/ Grandes quantidades de informação No site geeksforgeeks como em muitos outros, exemplifica-se o uso do...

Ler mais

Engenharia BIM Programação Topografia

Pesquisar neste blogue