Bind Xref, Explode, Purge All, Zoom Extents, Save

[Anonymous]

I would like to run a routine that would Bind Insert Xrefs, Explode, Purge All, Zoom Extents and Save the file. I am not very lisp/.net savvy, so I was hoping someone out there could provide me with a routine that does just that.

Thanks in advance!

[jeff]

If you know nothing about programming

1. Just enter the commands at commandline and use a "-" before commands that display a dialog box.

2. Press F2 and copy history

3. Copy and paste in NotePad

4. CleanUp

5. Save as a .scr file

You can drag and drop the file on a open drawing, call it from a tool palette, etc.....

Example of Bind and Purge

Copied from Command Line

Command: -XREF
Enter an option [?/Bind/Detach/Path/Unload/Reload/Overlay/Attach] <Attach>: b
Enter xref name(s) to bind: *
No matching xref names found.
Command: -PURGE
Enter type of unused objects to purge 
[Blocks/Dimstyles/Groups/LAyers/LTypes/MAterials/MUltileaderstyles/Plotstyles/SH
apes/textSTyles/Mlinestyles/Tablestyles/Visualstyles/Regapps/Zero-length 
geometry/Empty text objects/All]: a
Enter name(s) to purge <*>:
Verify each name to be purged? [Yes/No] <Y>: n
Deleting block "*U18".
Deleting block "*U20".
Deleting block "*U23".
...
...
...
3 multileader styles deleted.
No unreferenced groups found.

 After removing all comand prompts and leaving just commands & keywords

-XREF
b
*
-PURGE
a
*
n

[3wood]

You can try EXPLODEALL.vlx to bind xref and explode them while keep the original color and trim off objects outside the xref clipping boundary.

3wood

CAD KITS