Isolate only Lines and Polyline object

[Cadguy86]

Hello Everyone,

I'm looking for a lisp routine that needs to be isolated only Line and Polyline objects, on my complex drawing.

I found a lisp on a page, it's working fine, but i want to isolate only Line and Polyline objects (Not by Layers)

https://www.cadtutor.net/forum/topic/30966-lisp-for-hidingshowing-objects/page/2/#comment-374578

(defun c:II (/ tab all ss i e)
;; temporarily isolate selected objects (regen will bring them back)
;; Alan J. Thompson
(setq tab (if (eq (getvar 'CVPORT) 1)
'(410 . "Model")
(cons 410 (getvar 'CTAB))
)
all (ssget "_A" (list tab))
)
(if (setq ss (ssget (list tab)))
(repeat (setq i (sslength all))
(redraw (setq e (ssname all (setq i (1- i))))
(if (ssmemb e ss)
1
2
)
)
)
)
(princ)
)

Thanks

[ParishSouthBdx]

Maybe im missing something but wouldnt  QUICKSELECT, for me found on the right side of the properties pallet, do the same.   it would do only lines and then only plines.  select the plines, then select all.  thus isolating the plines or lines 

[Kent1Cooper]

If you're willing to use UNISOLATEOBJECTS [or the closing of the drawing] instead of REGEN to bring them back, how about just this? [untested]:

(defun C:ILP () ; = Isolate Lines & Polylines

  (command "_.isolateobjects" (ssget "_X" '((0 . "LINE,*POLYLINE"))) "")

)

[Cadguy86]

Hi Kent,

This routine was worked fine. but the thing is my drawing file size is huge so it will takes time to isolate all lines.

Instead I need to isolate the Line and polylines only from Selected Objects.

Thanks.

[Kent1Cooper · Accepted solution]

---

@Cadguy86 wrote:

.... I need to isolate the Line and polylines only from Selected Objects.

....

---

Remove the "_X".

[Cadguy86]

Hello @Kent1Cooper , 

Thank you so much, It works fine.