Páginas

AutoCad - Rotinas Autolisp - Lee Mac

 


Lee Mac é um mestre de programação em AutoLisp, membro da comunidade Autodesk Expert Elite e participa em diversos fóruns da especialidade, como o Cadtutor, AUGI, The Swamp, etc, onde tem ajudado muitos utilizadores que procuram rotinas para agilizar tarefas, muitas delas específicas.

Para além do mais tem um sítio próprio onde disponibiliza tutoriais e muitas rotinas e funções que podem ser incorporadas em novas ferramentas

Uma referência a ter sempre à mão para todos quantos trabalham com AutoCad e procuram aplicações AutoLisp.

[Lee Mac Programming]

AutoCad - AutoLisp - Rotina para seleccionar entidades por cor

Para quem trabalha com AutoCad sabe que é importante filtrar entidades, nomeadamente pela propriedade cor. A rotina SBC, cujo código abaixo publicamos, é excelente e prática para esse efeito. Uma vez chamado o comando SBC basta picar uma entidade com a cor pretendida e todas as demais com essa propriedade passam para a selecção podendo depois ser editadas como mudar de cor, layer, apagar, copiar, mover, etc. É muito mais prática que a ferramenta nativa do AutoCad o Quick Select.

- Como carregar e usar a rotina: Veja aqui.

;;start code;;
;;seleccionar entidades por cor;;
;; by Lee Mac - Cadtutor;;
(defun c:SBC ( / c d e l )
    (if (setq e (car (entsel)))
        (progn
            (setq c
                (cond
                    (   (cdr (assoc 62 (entget e)))   )
                    (   (abs (cdr (assoc 62 (tblsearch "LAYER" (cdr (assoc 8 (entget e)))))))   )
                )
            )                    
            (while (setq d (tblnext "LAYER" (null d)))
                (if (= c (abs (cdr (assoc 62 d))))
                    (setq l (cons "," (cons (cdr (assoc 2 d)) l)))
                )
            )
            (sssetfirst nil
                (ssget "_X"
                    (if l
                        (list
                            (cons -4 "                                (cons 62 c)
                                (cons -4 "                                    (cons 62 256)
                                    (cons 8 (apply 'strcat (cdr l)))
                                (cons -4 "AND>")
                            (cons -4 "OR>")
                        )
                        (list (cons 62 c))
                    )
                )
            )
        )
    )
    (princ)
)
(prompt "\nDigite: SBC")

;;end code;;

Flexible Renamer

image

Excelente esta ferramenta, Flexible Renamer, mostrando-se muito versátil na tarefa de renomear ficheiros e pastas, com muitas opções e configurações.

Rápido e intuitivo.

[Download]

Remover o Deal Finder com o AdwCleaner

 

 

Veja como remover a praga do Deal Finder (introduz anúncios suplementares e indesejáveis em muitas das páginas visitadas, com especial apetência por fóruns).

image

- Download da aplicação AdwCleaner

- Como utilizar o AdwCleaner

Impressora 3D capaz de imprimir casas

 

Casas construídas em velocidade recorde e com a vantagem de exigir menos custos com mão-de-obra. São essas as grandes vantagens da Contour Crafting, uma impressora 3D gigante que pode produzir uma casa, feita por encomenda, em apenas… 20 horas.

[fonte e resto do artigo: link]

image

image

Outros artigos:

tecnologia, informática, internet, programas, aplicativos, software, open source, programas livres, freeware, linux, windows, firefox, internet explorer, artigos, análises, notícias, autocad, cad, rotinas, rotinas lisp, lisp, autolisp, intellicad, vídeo, youtube, áudio, mp3, jpg, bmp, gif, pmg, gimp, inkscape, xn view, photofiltre, google, gmail, converter, conversores, editores, host, downloads, p2p, gexo, porntube, redtube, xnxx, mediacoder, 7zip, nvu, blender, programação, programar, php, perl, asp, html, xml, office, mysql, easyphp, gnu, gpl, c, c++, css, web design, tutorial, tutoriais, manual, how to, truques e dicas, truques, scribus, notepad++, pidgin, messenger, mac, mozilla, mplayer, wma, vorbis