Explode LISP??

Does any one have a lisp routine or can write a lisp routine that can
explode a block to the current layer, linetype, and color? I spent a brief
amount of time trying to find somthing like this.

Example: If I have a block that is originally drawn on layer 0, color =
byblock, and linetype = byblock. If I need to explode the block the block
returns the lines back to what they were drawn at. I need to explode the
block to the current layer, color and linetype.

Reason: Have a client that does not want any attributes on the drawing for
whatever reason they might have. I have many blocks that contain attributes.

Thanks for any help in advance!

 

To go a different route
Tony Hotchkiss of Cadalyst wrote
a lisp that will purge selected attributes.
I believe you can get it from cadalyst.

 

If you have Express Tools use the Burst command.

 

Or just make all the attributes invisible and forget about them.

 

I have express tools for 2004, I do not see "Burst"

 

nevermind, found it ....it isn't called burst in the pulldown.

 

:

Jeff,

Today is your lucky day.

Tailor this as needed and declare key in your utility
(we use "EX" as the routine name, but this program was
designed to explode blocks that were brought in via
the Screen Menu (yes, there are some symbols we use
that needs exploding...).

No error message here since there is no user interaction
within the program itself.


(defun EX_L ( / a b ) ;Menu Function to explode blocks.
(setq b (cdr (assoc 8 (entget (setq a (entlast))))))
(setvar "cmdecho" 0)
(command ".explode" a)
(command ".chprop" "p" "" "la" b "")
(setvar "cmdecho" 1)(setq a nil b nil)(princ)
);endEX_L


Continue the chprop command to do the color and linetype.
Tailor entlast to entget...

GOOD LUCK !


Scot-65

 

I think it's already been pointed out to him that this is a built-in
capability in Acad and doesn't require customization.

It used to, but like so many formerly popular home-brew routines, the
functionality eventually got added to the core product, I believe several
releases ago. At each new release I've been able to discard several old
favorite lisps that were no longer needed.

Granted, he might want to put together a function to supply the default
responses to the XPLODE command prompts, to save some keypresses. But
basically XPLODE followed by several returns will do exactly what the old
EXPLODE/CHPROP sequence did, and there are also other options available.

 

:

Tom,

Try using your paintbrush on text objects, but do not let the text rotate...

Scot-65

 

You point being ...?