Você está aqui: AutoLISP ::: Dicas & Truques ::: Selection, Seleção |
Como retornar a quantidade de objetos selecionados na área de desenho do AutoCAD usando as funções ssget e sslength da AutoLISPQuantidade de visualizações: 141 vezes |
Nesta dica mostrarei como podemos usar as funções ssget e sslength da linguagem AutoLISP para pedir para o usuário selecionar um ou mais objetos na área de desenho do AutoCAD e retornar a quantidade de objetos selecionados. Veja que o usuário pode selecionar os objetos clicando um por um ou usando a seleção por retângulo (completo ou parcial). No final da seleção o usuário deverá pressionar a tecla Enter para a execução do código AutoLISP continuar. Veja o código AutoLISP completo para o exemplo: ---------------------------------------------------------------------- Se precisar de ajuda com o código abaixo, pode me chamar no WhatsApp +55 (62) 98553-6711 (Osmar) ---------------------------------------------------------------------- ; função usada para pedir para o usuário selecionar ; um ou mais objetos na área de desenho do AutoCAD e, ; em seguida, mostrar a quantidade de objetos selecionados (defun c:selecionar () ; guardamos os objetos selecionados na variável ; selecionados (setq selecionados (ssget)) ; usamos a função sslength para retornar a quantidade ; de objetos selecionados e guardamos na variável ; quant_selecionados (setq quant_selecionados (sslength selecionados)) ; finalmente mostramos o resultado (princ (strcat "Você selecionou " (rtos quant_selecionados) " objetos.")) (princ) ) Ao executar este exemplo você terá um resultado parecido com: Você selecionou 5 objetos. |
![]() |
AutoLISP ::: Dicas & Truques ::: Linha, Linhas, Comando LINE |
Como desenhar uma linha no AutoCAD usando AutoLISP - Dois pontos geométricos e o comando LINEQuantidade de visualizações: 434 vezes |
Nesta dica mostrarei como desenhar linhas no AutoCAD usando AutoLISP e o comando LINE. Para isso nós vamos definir dois pontos geométricos p e q. Para deixar o código simples eu defini os pontos (coordenadas x, y, z) usando listas. Posteriormente você poderá pedir para o usuário clicar na área de desenho (GA) e obter as coordenadas usando a função getpoint() da AutoLISP. Veja o código AutoLISP completo para o exemplo: ---------------------------------------------------------------------- Se precisar de ajuda com o código abaixo, pode me chamar no WhatsApp +55 (62) 98553-6711 (Osmar) ---------------------------------------------------------------------- ; Este programa é usado para desenhar uma ; linha a partir de dois pontos definidos no ; código. Opcionalmente você poderá pedir ; para o usuário informar as coordenadas dos ; dois pontos usando a função getpoint() (defun desenhar-linha() ; vamos definir as coordenadas do ; primeiro ponto (setq p (list 300 250 0)) ; vamos definir as coordenadas do ; segundo ponto (setq q (list 1900 650 0)) ; Agora chamamos o comando LINE passando os ; dois pontos geométricos (command "LINE" p q "") ) Dica: Para carregar seu código AutoLISP no AutoCAD, digite (LOAD "C:\\codigos_autolisp\\desenho.lsp"), com duas barras invertidas na separação dos diretórios e nome do arquivo, na janela de comandos e depois chame a função desejada digitando (DESENHAR-LINHA), por exemplo. Opcionalmente você pode ir até o menu Manage e escolher a opção Load Application. Em seguida selecione o arquivo desejado e clique o botão Load. |
AutoLISP ::: Dicas & Truques ::: Layer, Layers |
Como retornar o nome da layer atual do AutoCAD usando AutoLISP e a variável de sistema CLAYERQuantidade de visualizações: 151 vezes |
A variável de sistema CLAYER (Current Layer) é usada quando queremos definir ou retornar o nome da layer atual do AutoCAD. E nesta dica mostrarei como podemos acessar e retornar o valor desta variável usando AutoLISP. O primeiro passo é usar a função getvar e passar para ela o valor "CLAYER". De posse desse valor nós usamos setq para guardá-lo em uma variável de nossa preferência. Para finalizar basta chamar a função princ combinada com strcat para mostrar o resultado. Veja o código AutoLISP completo para o exemplo: ---------------------------------------------------------------------- Se precisar de ajuda com o código abaixo, pode me chamar no WhatsApp +55 (62) 98553-6711 (Osmar) ---------------------------------------------------------------------- ; Esta função permite obter e exibir o valor atual ; da variável CLAYER do AutoCAD. Esta variável retorna ; o nome da layer atual (defun c:layer_atual() (setq nome_layer_atual (getvar "CLAYER")) ; mostramos o resultado (princ (strcat "\nNome da layer atual: " nome_layer_atual)) (princ) ) Ao executar este código AutoLISP nós teremos o seguinte resultado: Nome da layer atual: PAREDES |
Veja mais Dicas e truques de AutoLISP |
Dicas e truques de outras linguagens |
jQuery - Como remover uma classe (ou classes) de um elemento HTML usando a função removeClass() do jQuery Android Java - Como usar a classe Toast em suas aplicações Android |
Quem Somos |
![]() Entre em contato comigo para, juntos, vermos em que posso contribuir para resolver ou agilizar o desenvolvimento de seus códigos.
|
![]() Não basta ter um site. É necessário ter um site que é localizado e converte usuários em clientes. Se sua página não faz isso, Fale comigo e vamos fazer uma analise e conseguir resultados mais satisfatórios..
|
Linguagens Mais Populares |
1º lugar: Java |
Códigos Fonte |
![]() Diga adeus às planilhas do Excel e tenha 100% de controle sobre suas contas a pagar e a receber, gestão de receitas e despesas, cadastro de clientes e fornecedores com fotos e histórico de atendimentos. Código fonte completo e funcional, com instruções para instalação e configuração do banco de dados MySQL. Fácil de modificar e adicionar novas funcionalidades. Clique aqui e saiba mais |
![]() Tenha o seu próprio sistema de controle de estoque web. com cadastro de produtos, categorias, fornecedores, entradas e saídas de produtos, com relatórios por data, margem de lucro e muito mais. Código simples e fácil de modificar. Acompanha instruções para instalação e criação do banco de dados MySQL. Clique aqui e saiba mais |