bubba74 Posted February 8, 2010 Share Posted February 8, 2010 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. Quote Link to comment Share on other sites More sharing options...
ReMark Posted February 8, 2010 Share Posted February 8, 2010 What is so wrong with the way Wipeout currently works? "...masks underlying objects with the current background color." Quote Link to comment Share on other sites More sharing options...
bubba74 Posted February 8, 2010 Author Share Posted February 8, 2010 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. Quote Link to comment Share on other sites More sharing options...
Pablo Ferral Posted February 8, 2010 Share Posted February 8, 2010 You could Create a tool pallette tool that makes wipeouts and set the properties from there. Quote Link to comment Share on other sites More sharing options...
Lee Mac Posted February 8, 2010 Share Posted February 8, 2010 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) Quote Link to comment Share on other sites More sharing options...
bubba74 Posted February 8, 2010 Author Share Posted February 8, 2010 Wow Lee that's excellent. I was looking some helping info, but I'll take the full solution That works for 99% of our scenarios. Thanks! Quote Link to comment Share on other sites More sharing options...
Lee Mac Posted February 8, 2010 Share Posted February 8, 2010 Wow Lee that's excellent. I was looking some helping info, but I'll take the full solution That works for 99% of our scenarios. Thanks! Happy to help buddy Quote Link to comment Share on other sites More sharing options...
Recommended Posts
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.