estou disponibilizando uma rotina que eu fiz para exportar entidades do autocad para arquivos KML, que podem ser vistos no google earth versão de testes, hein!! para usar:descompacte para a pasta do cad ( ou uma que esteja na “support file serach patch” ) na linha de comando digite :EXPGE o resto está no help […]
Vou postar uma rotina que fiz uns tempos atrás, não tem lá muita utilidade, mas serve para demonstrar como usar o SLIDER de um DCL e como usar alguns métodos de activex… ver… Salve o código abaixo em “ltsc.lsp”: (defun c:ltsc (/ ss ent dcl actsld actref ref lst n) ;carrega as vls…. : (vl-load-com)
Bom, pra apagar já postei, agora pra INCLUIR vértices, a idéia é: clica o segmento e escolhe a posição do novo vértice… mais… (defun c:avert (/ tmp ent pts pts2 pt dist lst pr tp b sw ew n) (tbn:error-init ‘((“cmdecho” 0) t)) (while (progn (if (> (length lst) 0) (initget “U” 0)) (setq tmp
