AutoLISP: Erase all Wipeouts

Posted on May 28, 2011 by AutoCAD Tips

I sometimes get drawings that have wipeouts in them. And to be honest, I don’t think that the person who made them knew what they were when they made them because the wipeouts are not hiding anything. So I use this little Lisp routine to erase all of the wipeouts before I begin working.

To start:

  • GOWIPE <enter> to start
  • The routine does everything from there…

 

 

 

(defun c:gowipe (/ b)

(setvar "pickstyle" 0)

(setq b (ssget "x" '((0 . "wipeout"))))

(command "._erase" b "")

)
Advertisement

About AutoCAD Tips

This blog serves as a knowledge base for myself (and anyone else) so that I can reference tips & tricks that I have learned and also refer others to it as well. I hope that this blog helps you learn at least one tip to make your drafting/design experience better.
This entry was posted in AutoLISP, Modifying, TIPS, Wipeouts. Bookmark the permalink.

3 Responses to AutoLISP: Erase all Wipeouts

  1. BCinNV says:
    September 19, 2011 at 12:34 AM

    Was the naming of this routine intentional??? lol

    Reply
  2. Amr Abdelwahab says:
    April 16, 2018 at 2:26 AM

    GOOD ! BUT IT NOT WORK IN BLOCKS
    I’v a hundred of several blocks with WIPEOUT need to Erase

    Reply

Leave a Reply

Fill in your details below or click an icon to log in:

Gravatar
WordPress.com Logo

You are commenting using your WordPress.com account. ( Log Out /  Change )

Facebook photo

You are commenting using your Facebook account. ( Log Out /  Change )

Cancel

Connecting to %s