Hoje um amigo meu me pediu algo que transformasse MINSERT BLOCK em bloco normal, pois ele não conseguia explodir o MINSERT, bom, uns tempos atras tinha uma discussão no forum autolisp sobre proteção de arquivos dwg e uma das opções de proteção que deram lá essa de transformar o desenho em MINSERT… mas logo vimos que era uma proteção ruim, pois algumas poucas linhas de código bastavam para quebrar a proteção…
(defun c:mins2ins (/ ent elist)
(vl-load-com)
(if (setq ent (car (entsel
“nSelecione o bloco a desbloquear…”)))
(progn
(setq elist (entget ent))
(foreach x ‘(44 45 70 71)
(setq elist
(vl-remove (assoc x elist) elist)))
(entmake elist)
(entdel ent)))
(princ))
E estranho, volta e meia me aparecem desenhos com blocos MINSERT… até entendo sua utilidade, mas criar um MINSERT de apenas uma linha por uma coluna??? faça-me o favor, por que isso??
Caro colega,
Preciso entregar um orçamento urgente, mas recebi o desenho em minsert block, já tentei de todas as maneiras converter o desenho, sem obter sucesso, peço sua ajuda.
Obrigado, Thiago.