About Select All Lisp...

[veteranus]

Hi guys,

 

I need a lisp that something like quickselect command. I want to select my precious area and want to select same layers on that "selected area" only. Is that this can be done?

 

I am grateful for all the help.

 

Regards.

[satishrajdev]

What does your previous area means???

[Lee Mac]

Have you tried the SELECTSIMILAR command?

[veteranus]

Have you tried the SELECTSIMILAR command?

 

hi, of course I tried. But I want something more specific.

 

 

this is the simplest example. Red lines are LAYER1, yellow lines are LAYER2.

 

I want to select area like this and want to select just all of LAYER1 lines in my "selected area". I hope you understand lee...

 

thanks for answer.

 

regards.

[Lee Mac]

(defun c:ls ( / e )
   (if (setq e (car (entsel "\nSelect object on target layer: ")))
       (sssetfirst nil (ssget (list (assoc 8 (entget e)))))
   )
   (princ)
)

[veteranus]

(defun c:ls ( / e )
   (if (setq e (car (entsel "\nSelect object on target layer: ")))
       (sssetfirst nil (ssget (list (assoc 8 (entget e)))))
   )
   (princ)
)

 

oh thats it. it works just ı want thanks for your code lee mac.