Jump to content

rosebud5

Member
  • Posts

    38
  • Joined

  • Last visited

Everything posted by rosebud5

  1. Hello and happy holidays, does any one know of a way to keep the drop down menu for line weights open all the time. I know it seems like a small thing but it is one extra step that adds up over time. I have tried with some success to create a vector script for different line weights which worked but was not that stable and I would sometimes change other line weights as well. Or maybe a custom menu item that you could add for .18 and another for .25 etc. thanks,
  2. Thanks for the reply, I guess that I am looking for something like the smart paint tool that is in illustrator
  3. Hi Raymond, thanks so much for the speedy reply, I am attaching the file example. A lot of times I will import a dwg from kholer or some other site and need to fill it and have to spend a lot of time finding the tiny spaces between lines. Some of the shapes I can fill with the paint bucket but others won't fill and I waste a lot of time trying to close everything. I am including a sample file where the two side shapes are not filling. Maybe I should have said close all lines into a poly. Thanks, close lines sample.vwx
  4. Hi there, I am wishing that there was a script to take 2d polygons that are open and make them closed within a certain tolerance. I import DWG's a lot and I always have to spend a good deal of time finding tiny little breaks and inconsistencies in order to fill the objects. Is there any kind of script that would do an auto join if the polyine is a short distance away? Thanks,
  5. outstanding, in the script, I had to use 'SetFillBack' rather than 'SetFBack', why is that
  6. Thanks, so... If I want to get rid of the line weight and just have a transparent fill of black, can I get rid of the top part of the script? " { (c) twk based off of original code by Petri Sakkinen 2008 } CONST newWeight = 10; PROCEDURE ChangeIt (h : HANDLE); VAR oldLW : INTEGER; BEGIN oldLW := GetLW(h); IF (oldLW = 2) OR (oldLW = 5) OR (oldLW = 7) OR (oldLW = 10) OR (oldLW = 14) OR (oldLW = 20) THEN SetLW(h, newWeight); SetPenFore(h, 0,0,0); SetFPat(H1,0) [zero]; SetFillBack(h,0,0,0); END; BEGIN FOREACHOBJECT(ChangeIt, ((SEL=TRUE))); END; RUN(LineWeightChange);
  7. Thank you both! what about it I want to do a transparent fill?
  8. Hi, Pat helped me with this script and it is working great! What about if I wanted to add a fill to the script with a specific color, for example rectangle with same red fill and black outline. < PROCEDURE LineWeightChange; { (c) twk based off of original code by Petri Sakkinen 2008 } CONST newWeight = 5; PROCEDURE ChangeIt (h : HANDLE); VAR oldLW : INTEGER; BEGIN oldLW := GetLW(h); IF (oldLW = 2) OR (oldLW = 5) OR (oldLW = 7) OR (oldLW = 10) OR (oldLW = 14) OR (oldLW = 20) THEN Begin SetLW(h, newWeight); SetPenFore(h, 65535,0,0); End; END; BEGIN FOREACHOBJECT(ChangeIt, ((SEL=TRUE))); END; RUN(LineWeightChange);
  9. Hi Pat, script is working great! What about if I wanted to add a fill to the script with a specific color, for example rectangle with same red fill and black outline. < PROCEDURE LineWeightChange; { (c) twk based off of original code by Petri Sakkinen 2008 } CONST newWeight = 5; PROCEDURE ChangeIt (h : HANDLE); VAR oldLW : INTEGER; BEGIN oldLW := GetLW(h); IF (oldLW = 2) OR (oldLW = 5) OR (oldLW = 7) OR (oldLW = 10) OR (oldLW = 14) OR (oldLW = 20) THEN Begin SetLW(h, newWeight); SetPenFore(h, 65535,0,0); End; END; BEGIN FOREACHOBJECT(ChangeIt, ((SEL=TRUE))); END; RUN(LineWeightChange);
  10. Hi Pat, I am guessing that it should not matter, but the script works going from another color back to black when I use it as you did above, but I cant go the other way. I am trying to go from black to red or some other color. if you run the script on a black rectangle/line, will it change to the specified color (red, 221,0,0)
  11. I tried with a new document and different color and still the line weight changes but the color does not. Thanks,
  12. Hi Pat, thanks for walking me through this, totally lost when it comes to coding. I tried the script and line weight changes but color does not? Thanks,
  13. Hi Pat, thanks for the quick reply, I did the following PROCEDURE LineWeightChange; { (c) twk based off of original code by Petri Sakkinen 2008 } CONST newWeight = 5; PROCEDURE ChangeIt (h : HANDLE); VAR oldLW : INTEGER; BEGIN oldLW := GetLW(h); IF (oldLW = 2) OR (oldLW = 5) OR (oldLW = 7) OR (oldLW = 10) OR (oldLW = 14) OR (oldLW = 20) THEN SetLW(h, newWeight); SetPenFore(Handle, 221,0,0); END; BEGIN FOREACHOBJECT(ChangeIt, ((SEL=TRUE))); END; RUN(LineWeightChange); Getting an error, any thoughts just trying to change for selected object(s)
  14. what would be a simple script for changing the line weight and color of a line at the same time, for example, change to .25 line weight and red from an existing .05 and black line. Thanks Hi Pat, just posted that, also I am using 2018 version. thanks for the help
  15. Thanks!! that works great!, happy holidays to you
  16. Hello, I am wondering if there is a way to change the font style of the saved view menu, i.e. bold and change the color of one of my saved view names. I would certain saved views that are voided or changed to be a different color and text style. Thanks
  17. Hello, forum gave me a great script that will change any lines that I have to a specific line weight. the Script is below. How would I change the script to make a dotted line rather than a solid line? Thanks, PROCEDURE LineWeightChange; { (c) twk based off of original code by Petri Sakkinen 2008 } CONST newWeight = 20; PROCEDURE ChangeIt (h : HANDLE); VAR oldLW : INTEGER; BEGIN oldLW := GetLW(h); IF (oldLW = 2) OR (oldLW = 5) OR (oldLW = 10) OR (oldLW = 20) THEN SetLW(h, newWeight); END; BEGIN FOREACHOBJECT(ChangeIt, ((SEL=TRUE))); END; RUN(LineWeightChange);
  18. Sorry, I forgot to read the first part, all good, no need to reply. Thanks!
  19. Hi again, I am trying to used the script that you helped me out with but I am not very good with scripting. I have imported the script into my existing doc and created a new vector script. I select an existing door and run the script and nothing happens. I create a new door and run the script and nothing happens. I know that there is a critical part to this that I am missing. Please advise if possible. Thanks!
  20. Awesome! greatly appreciated
  21. Hello, I am trying to add a specific amount onto a polygon. For example, I have a rectangle and instead of giving the overall length, I want to add 1" to one side of the rectangle. Any thoughts? Say that rectanlge is 4 x 2 and I want to have a command that adds to the existing dimension rather than retyping the whole dimension Thanks,
  22. Thanks for that, super helpful as usual!!
  23. Hello, I am wondering if there is way to change the default door trim sizes that always seem to be set to 4" and 6". Most of the time with interior doors, I want a door that has 3.5" trim, 3/4" thick on both sides. Time consuming to change each new door Thanks
×
×
  • Create New...