stlo Posted June 21, 2016 Share Posted June 21, 2016 Hi everyone! I would like to know if there is already a program about creating new lines (less lines) over existing lines within maximum a 1/16" difference between the original lines and the new lines! Here's a drawing that explain everything! Thanks for your help! LESS LINES REQUEST.dwg Quote Link to comment Share on other sites More sharing options...
ReMark Posted June 21, 2016 Share Posted June 21, 2016 What is the significance of the 1/16" difference? Quote Link to comment Share on other sites More sharing options...
stlo Posted June 21, 2016 Author Share Posted June 21, 2016 1/16 of a inch (0.0625 inch) This is our tolerance! Our pieces have to be precise but we would like to have less lines so our waterjet machine would be more efficient (faster) so only a 1/16" difference is still good! Quote Link to comment Share on other sites More sharing options...
ReMark Posted June 21, 2016 Share Posted June 21, 2016 Well your thread title refers to "wall lines" so I thought you might be in the architectural field. Quote Link to comment Share on other sites More sharing options...
stlo Posted June 21, 2016 Author Share Posted June 21, 2016 It's countertop industy! Is it possible that a lisp would do that? Quote Link to comment Share on other sites More sharing options...
ReMark Posted June 21, 2016 Share Posted June 21, 2016 It's countertop industy! Is it possible that a lisp would do that? You're asking for two things. 1) Reduce the number of lines and 2) Offset these lines 1/16th of an inch inward. What determines how 19 lines gets reduced down to 6 in your example? When you offset the lines there may have to be some cleanup where they overlap right? Quote Link to comment Share on other sites More sharing options...
stlo Posted June 21, 2016 Author Share Posted June 21, 2016 Right now, what I do is, I draw my new serie of lines starting from the left of the first wall (over the original wall) and I try to draw the longest line possible staying in my tolerance so nothing determines how much lines you will have at the end but I try to have as less as possible! I don't use the offset command, It's more like drawing over by finding high spot and low spot and see if the tolerance is good and draw the next line to finally create a new wall with less lines! Here's another drawing example of what I think could be possible but you have to keep in mind that I don't know a lot about program limitation and stuff but I like to think that everything is possible! How do I send a new drawing for explainations? I don't see join a file in the quick reply zone? Thanks Quote Link to comment Share on other sites More sharing options...
stlo Posted June 21, 2016 Author Share Posted June 21, 2016 Here it is! LESS LINES REQUEST-2.dwg Quote Link to comment Share on other sites More sharing options...
stlo Posted June 22, 2016 Author Share Posted June 22, 2016 Possible?? Quote Link to comment Share on other sites More sharing options...
SLW210 Posted June 23, 2016 Share Posted June 23, 2016 I still don't see what determines the high and low spots on the wall. Is there some information missing? Quote Link to comment Share on other sites More sharing options...
BIGAL Posted June 24, 2016 Share Posted June 24, 2016 I think I know what you want something I have done which I call peg and shift lets you pick a control pline and then select other points square off. You would take this square off and check for that tolerance 1/16 else bend the line. Can you post a real dwg. Peg-shift.lsp Quote Link to comment Share on other sites More sharing options...
stlo Posted August 16, 2022 Author Share Posted August 16, 2022 (edited) Hi Bigal! I know it's been a while about this one but how do I launch you lisp file? I'm trying but it's not working? Thanks Edited August 16, 2022 by stlo Mistype Quote Link to comment Share on other sites More sharing options...
stlo Posted August 18, 2022 Author Share Posted August 18, 2022 (edited) Hi everyone! Is somebody know how to launch Bigal's pegshift lisp? I've tried to add the (defun c:) at many places but it's not working! Thanks! Edited August 18, 2022 by stlo Quote Link to comment Share on other sites More sharing options...
Steven P Posted August 18, 2022 Share Posted August 18, 2022 2 ways if you have a LISP lke this, you can put a c : in front of the LISP name (here make it c:PEGSH) or in CAD type in (pegsh) with the command between brackets, There are a coupe of things not quite right with this code, you should be able to work that out and when BIGAl is looking next, this gave me an error with the getcoords function - haven't had a chance to look at a fix yet though, , maybe you have an updated version? 1 Quote Link to comment Share on other sites More sharing options...
mhupp Posted August 18, 2022 Share Posted August 18, 2022 (edited) Like Steven said code isn't complete. something happen to the file. The website has been update quite a few times since 2016. Maybe @BIGAL has the original file. you can replace the two cord sub functions with this line (setq obj2 (vlax-ename->vla-object (setq ent (car (entsel "pick offset line"))))) ;add 2nd setq to store the ename to be used in co-ords .... (setq co-ords (mapcar 'cdr (vl-remove-if-not '(lambda (x) (= (car x) 10)) (entget ent)))) Edited August 18, 2022 by mhupp 1 Quote Link to comment Share on other sites More sharing options...
stlo Posted August 18, 2022 Author Share Posted August 18, 2022 Thanks Steven P and mhupp! It still not working for me! I'll continue to try! Have a good day! Quote Link to comment Share on other sites More sharing options...
Steven P Posted August 18, 2022 Share Posted August 18, 2022 Let's work out what is happening for you then.. what does CAD tell you when you load and try to run this, are there any error messages given? (In AutoCAD these wil often be in the command line), let us have a clue... 2 Quote Link to comment Share on other sites More sharing options...
mhupp Posted August 18, 2022 Share Posted August 18, 2022 (edited) 2 hours ago, Steven P said: Let's work out what is happening... My forth grade math teacher always said that. Brings me a smile. Edited August 19, 2022 by mhupp 1 1 Quote Link to comment Share on other sites More sharing options...
BIGAL Posted August 23, 2022 Share Posted August 23, 2022 Been on holidays so will try to find again and make it work. Stlo can you post a sample dwg ? Quote Link to comment Share on other sites More sharing options...
stlo Posted August 24, 2022 Author Share Posted August 24, 2022 Hi guys! Bigal, I hope you had great holidays!! Here is a dwg, I've changed the title of it because since I've changed the many lines into a polyline it's more of a cnc machine time consuming thing! I also realize that my first request was non-sense! Thanks for looking at this! Have a good day! LESSTIMEFORCNC.dwg 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.