1 Attachment(s)
RE: Como medir várias polylines em simultâneo?
Caro Paulo Castro,
Envio em anexo o ficheiro AutoLISP modificado.
A "chave" estava nas linhas
...
(setq TXTOTAL (strcat "A=" (rtos ARSTOTAL 2 LUPRC) "m2"))
...
(setq TXSTOTAL (strcat "A=" (rtos ARSTOTAL 2 LUPRC) "m2"))
...
Espero que esteja bem, apenas fiz alguns ensaios.
Até breve.
RE: Como medir várias polylines em simultâneo?
Olá Paulo,
É provável que tenha visto uma instrução do tipo
(command "_.text" "j" "mr" 0.0 1 00.00 " Isto é um teste")
O texto a escrever está de facto entre aspas, mas neste caso o conteúdo foi definido previamente. Na aplicação Soma_Areas o conteúdo depende de vários cálculos, por isso foi necessário usar uma variável para o texto a inserir. Como na maioria dos casos não podemos usar funções autolisp dentro de uma linha command, usei a instrução
(setq TXTOTAL (strcat "A=" (rtos ARSTOTAL 2 LUPRC) "m2"))
em que strcat é a função que vai fazer a concatenação da string "A="
com a conversão do valor da área em string (rtos ARSTOTAL 2 LUPRC)
e com a string "m2"
Até breve
RE: Como medir várias polylines em simultâneo?
Caro Paulo,
Tal como o Amigo, mais colegas alertaram-me, e eu aceito como crítica sem qualquer problema, para o facto de as minhas aplicações serem pouco comentadas. Como padeço do mesmo mal, (falta de tempo :lol: ), quando crio uma aplicação dou prioridade a outros factores, relegando para o fim ou mesmo ignorando a facilidade de interpretação ou o sentido pedagógico do código. Não programando profissionalmente, o que me leva a criar uma aplicação é regra geral a necessidade de agilizar tarefas que por processos normais eu levaria muito tempo a executá-las. Acredito que uma boa parte dos colegas passa pelas mesmas dificuldades, por isso sempre posso, partilho com todo o gosto os meus ficheiros, fazendo uma ou outra adaptação, mas sempre consciente das minhas limitações como programador amador. Porém, tenho noção que ao partilhar essas aplicações, a minha responsabilidade aumenta consideravelmente, por isso registo a sua chamada de atenção. Fica a promessa para um código mais refinando numa próxima aplicação direccionada algum colega.
Abri outro tópico sobre livros que abordem o AutoLISP e outras línguas de programação, penso que também será do seu interesse.
Até breve.
1 Attachment(s)
RE: Como medir várias polylines em simultâneo?
Deixa eu participar tambem deste questionamentos.
Trabalho com projeto topograficos de pavimentação e drenagem urbana e uma coisa q me dava bastante trabalho era quantificar o comprimento de tubos desenhados no CAD e meio-fios.
Fiz a uns dias atraz uma pesquisa pelo site http://www.cadblocos.arq.br e acabei encontrando uma rotina muito boma Totlen de um americao, eu acho q seja, ela soma os comprimentos de elementos selecionados, linhas, polylinhas e arcos e dando um total.
Re: Como medir várias polylines em simultâneo?
Quote:
Originally Posted by
jorge.anjos
Olá,
Segue em anexo uma aplicação em AutoLISP que soma o comprimento de entidades que possuam essa propriedade e apresenta a opção de colocar o valor em texto.
Espero que ajude.
Até breve
Caro jorge,
Qual é o comando para executar esta aplicação?
Cpts,
FRamos
Re: Como medir várias polylines em simultâneo?
Quote:
Originally Posted by
fernando.ramos
Caro jorge,
Qual é o comando para executar esta aplicação?
Cpts,
FRamos
Olá,
O comando para executar a aplicação é SOMAPER.
Espero que ajude.
Re: Como medir várias polylines em simultâneo?
Jhooneyg, qual o comando para somar?
Re: Como medir várias polylines em simultâneo?
Bom dia a todos,
Eu trabalho em milímetros, gostaria de saber como posso fazer para representar o somatório das áreas em "A=10.00m2 "e não "A=10000000.0000m2"?