Como explodir os blocos do SOLIDOS?

SOLIDOS does not allow you to explode the blocks, for safety reasons, as you will lose the device.

However, if you want to explode the block anyway, you first need to enable the EXPLODE command on SOLIDOS blocks.

To do this, save the "lisp" below, load the command APPLOAD and execute.

To use LISP in CAD, after loading, call the command FazerExplodivel and select the blocks

Finally, call the EXPLODE command, select the same blocks.

(defun c:FazerExplodivel (/ ss ent vla BLOCOS)
  (setq    ss (ssget '((0 . "INSERT")))

  )
  (vl-load-com)
  (SETQ    BLOCOS (VLA-GET-Blocks
         (VLA-GET-ACTIVEDOCUMENT (VLAX-GET-ACAD-OBJECT))
           )
  )

  (REPEAT (SSLENGTH SS)
    (SETQ ENT (SSNAME SS 0)
      VLA (VLAX-ENAME->VLA-OBJECT ENT)
    )

    (VLA-PUT-Explodable
      (VLA-ITEM BLOCOS (VLA-GET-EffectiveName VLA))
      :VLAX-TRUE
    )

    (SSDEL ENT SS)
  )
)