alanjt Posted July 7, 2010 Share Posted July 7, 2010 Per a thread someone posted about having issues with Select Similar. Nothing special. I was killing time last night (finished my book and wasn't sure what to read next) and I thought I'd scratch this out for the less fortunate... (defun c:SelectSimilar (/ ss lst) ;; Select Similar for those that don't have it ;; Alan J. Thompson, 07.06.10 (vl-load-com) (if (setq ss (ssget)) ((lambda (i / e ent) (while (setq e (ssname ss (setq i (1+ i)))) (setq ent (entget e)) (setq lst (cons (append '((-4 . "<AND")) (vl-remove nil (mapcar (function (lambda (n / p) (if (setq p (assoc n ent)) (if (eq "*" (substr (cdr p) 1 1)) (cons n (strcat "`" (cdr p))) p ) ) ) ) '(0 2 ) ) '((-4 . "AND>")) ) lst ) ) ) (sssetfirst nil (setq ss (ssget "_X" (append '((-4 . "<OR")) (apply (function append) lst) '((-4 . "OR>")) ) ) ) ) ) -1 ) ) (princ) ) Quote Link to comment Share on other sites More sharing options...
CivilPrice Posted August 4, 2010 Share Posted August 4, 2010 Your the man! way to be on top of it...AutoDesk should give you a job! Quote Link to comment Share on other sites More sharing options...
alanjt Posted August 4, 2010 Author Share Posted August 4, 2010 Your the man! way to be on top of it...AutoDesk should give you a job!Enjoy. Glad it will help someone. Quote Link to comment Share on other sites More sharing options...
Tharwat Posted August 4, 2010 Share Posted August 4, 2010 Nice Work, And now it is avaliable in Autocad 2011 Regards, Quote Link to comment Share on other sites More sharing options...
Lt Dan's legs Posted August 4, 2010 Share Posted August 4, 2010 Nice one! Thanks for thinking of us Quote Link to comment Share on other sites More sharing options...
alanjt Posted August 4, 2010 Author Share Posted August 4, 2010 Nice Work, And now it is avaliable in Autocad 2011 Regards, Thanks. It's pretty much always been available in the vertical options, and I think you can get it for 2010 in you are on subscription. Nice one! Thanks for thinking of usThanks and you're welcome. As I said, I was killing time. I'll never use it (Civil 3D has it built in), but I wanted to help those running older versions of CAD. Quote Link to comment Share on other sites More sharing options...
designerstuart Posted September 28, 2010 Share Posted September 28, 2010 perfect thanks! Quote Link to comment Share on other sites More sharing options...
Glen1980 Posted December 16, 2010 Share Posted December 16, 2010 I take it there is no way of doing anything similar for us paupers who only have LT is there? At the moment I have to use the Qselect option which is time consuming when you have 100+ blocks and colleagues who use weird block names Quote Link to comment Share on other sites More sharing options...
alanjt Posted December 16, 2010 Author Share Posted December 16, 2010 I take it there is no way of doing anything similar for us paupers who only have LT is there? At the moment I have to use the Qselect option which is time consuming when you have 100+ blocks and colleagues who use weird block names Not without some kind of LT addon. Quote Link to comment Share on other sites More sharing options...
jablanco Posted August 12, 2013 Share Posted August 12, 2013 How can I load this sintaxis?????? Quote Link to comment Share on other sites More sharing options...
alanjt Posted August 13, 2013 Author Share Posted August 13, 2013 How can I load this sintaxis?????? http://www.cadtutor.net/forum/showthread.php?1390-How-to-use-the-LISP-routines-in-this-archive Quote Link to comment Share on other sites More sharing options...
jablanco Posted August 13, 2013 Share Posted August 13, 2013 Thank you for you time!! Is very easy...thanks again..... Quote Link to comment Share on other sites More sharing options...
alanjt Posted August 13, 2013 Author Share Posted August 13, 2013 You're very welcome. Quote Link to comment Share on other sites More sharing options...
WonkaPet Posted February 13, 2019 Share Posted February 13, 2019 Hi there, Sorry for necro bumping this thread but does anyone have a version of this in C# or VB.Net? Thanks, 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.