Jump to content

A way to work around without lisp?


bubba74

Recommended Posts

We currently have autocad 2004 and we use the wipeout command often. I would like to modify the existing command so that the wipeouts created automatically are assigned color 220.

 

Is there any way to do this with a macro and such? Right now, I see lisp recreating the prompts for wipeout.arx including the creation of a closed polyline to mimic the command. Is there an easier way to do this? Thanks.

Link to comment
Share on other sites

There is nothing wrong with it. But when I print PDF's, wipouts show up as solid black boxes regardless if TFRAMES in on or off. This has to do with the fact that my color map has screening at 100% for any color and only becomes apparent when creating PDFs. When I turn screening down to 0%, the problem is fixed. We have decided to map a dedicated color (color 220) to 0% screening for wipeouts and text masks.

 

Selecting all wipeouts before printing and changing their color is not acceptable because this type of stuff gets missed when rushing for a deadline and printing, and we also want some wipeouts to show up.

Link to comment
Share on other sites

Can LISP not be used? it makes things a ton easier:

 

(defun c:wipe  (/ *error* oldce)

 (defun *error* (msg)
   (if oldce (setvar "CECOLOR" oldce))
   (or (wcmatch (strcase msg) "*BREAK,*CANCEL*,*EXIT*")
       (princ (strcat "\n** Error: " msg " **")))
   (princ))    

 (setq oldce (getvar "CECOLOR"))
 (setvar "CECOLOR" "220")

 (command "_.wipeout")
 (while (= 1 (logand (getvar "CMDACTIVE") 1))
   (command pause))

 (setvar "CECOLOR" oldce)
 (princ))

Macro for the toolbar:

 

^C^C(c:wipe)

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.

Guest
Unfortunately, your content contains terms that we do not allow. Please edit your content to remove the highlighted words below.
Reply to this topic...

×   Pasted as rich text.   Restore formatting

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
×
  • Create New...