mbrandt5 Posted July 28, 2015 Share Posted July 28, 2015 Does anyone know of a lisp in which I can make multiple selection sets line up with a line? For example you could select a number of groups and assign corresponding points with the groups the select a vertical line along the y axis have all selection sets and there selected points snap to that line. Example start and end result included ObjectLineUp.pdf Quote Link to comment Share on other sites More sharing options...
pBe Posted July 28, 2015 Share Posted July 28, 2015 We kinda have an idea how do that mbrandt5. Hows about posting a drawing sample for us to look at. the pdf doesnt really explain a what a "group" is. Quote Link to comment Share on other sites More sharing options...
tombu Posted July 29, 2015 Share Posted July 29, 2015 We kinda have an idea how do that mbrandt5. Hows about posting a drawing sample for us to look at. the pdf doesnt really explain a what a "group" is. A little more info: http://forums.augi.com/showthread.php?162393-Multiple-Selection-Sets-To-One-Line-Lisp Quote Link to comment Share on other sites More sharing options...
mbrandt5 Posted July 29, 2015 Author Share Posted July 29, 2015 Here is a dwg. of the pdf. with a little more info as well SSLineups.dwg Quote Link to comment Share on other sites More sharing options...
mbrandt5 Posted August 6, 2015 Author Share Posted August 6, 2015 Anyone know of a lisp that does such a thing or willing to help me out with writing it? Quote Link to comment Share on other sites More sharing options...
Tharwat Posted August 6, 2015 Share Posted August 6, 2015 This ? (defun c:Test (/ s e p ss bs) (if (and (setq s (car (entsel "\nSelect Vertical Line :"))) (eq (cdr (assoc 0 (setq e (entget s)))) "LINE") (equal (car (setq p (cdr (assoc 10 e)))) (car (cdr (assoc 11 e))) 1e-4 ) ) (progn (princ "\nSelect objects to move ") (while (and (setq ss (ssget "_:L")) (setq bs (getpoint "\nSpecify base point for objects :")) ) (command "_.move" ss "" "_none" bs "_none" (list (car p) (cadr bs) 0.) ) ) ) ) (princ) ) Quote Link to comment Share on other sites More sharing options...
Commandobill Posted August 7, 2015 Share Posted August 7, 2015 Anyone know of a lisp that does such a thing or willing to help me out with writing it? What Tharwat posted seems to work really well for what you are asking. Quote Link to comment Share on other sites More sharing options...
mbrandt5 Posted August 7, 2015 Author Share Posted August 7, 2015 Thank you I greatly appreciate it Quote Link to comment Share on other sites More sharing options...
Tharwat Posted August 7, 2015 Share Posted August 7, 2015 Thank you I greatly appreciate it You're most welcome. 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.