How to change a hatch pattern to another within blocks at once?

[Anonymous]

Hi,

I am looking for a lisp that change a hatch pattern (pattern type & scale) to another within selected objects (inside the block and outside the block).

 Example:- In my architectural drawing having multiple blocks (column-1, column-2, Lift-1 & Lift-2 etc). In these blocks having SOLID hatch and the whole drawing is in one block named PLAN. I need to change these SOLID hatch to AR-CONC. If i am changing this manually (open each block and edit hatch) will take time.

So I am looking for a lisp that will change the hatch pattern and hatch scale within selected objects.

Help will be appreciated.

Thanks,

Arun.

[john.uhden]

Have many Happy New Years to come (see attached).

[Anonymous]

Thanks for the help Mr.John F. Uhden.

This code is working fine. It is modifying all the blocks in model space.

Actually i am not familiar with lisp programming. Is it possible to add an option for select objects? 

[john.uhden]

I see you read at least the beginning of my code.  That makes me happy.

As to selecting objects, yes, we can add that capability, but do you intend to select just block insertions, or select hatch objects too?  The reason I ask is for filtering purposes, mainly so that the user can feel more confident in his/her selection process.  It would also reduce processing time but not to any extent that anyone could notice.  An eye blink would take longer.  Anyway, it would be more efficient to fill the "old" list with just those patterns present in the selection set or the drawing.

Is it too much trouble typing in the pattern names?  Meaning would a dialog interface for selection be a huge improvement?  Also, the current code looks for only the acad.pat file but you may have a number of other .pat files that came with other verticals or custom software you may have installed.  I'm pretty sure I could figure out how to find them all, but I am not sure about loading them (from other files), though it's probably easy.

Plus language issues may be problematic.  What's the French word for "swamp?"

Aargh!  I'm sounding like Kent!

[Anonymous]

I want to select block insertions and hatch objects too. Why because sometimes i need to change the hatch for only some area or specific blocks.

Typing pattern name is not a trouble. Usually i am using autocad default pattern so i think an option for selection will solve the issue.

Sorry for my poor English.