Sin Tax - (ssget) issue

[ILoveMadoka]

I'm wanting to select all objects where the linetype is not Continuous, Center or Dashed.

I want to pass on objects without a linetype assignment.

This is what I have but my syntax in messed up

 

(defun c:FLT () 
  (setq LT1 (ssget "_X" '((6 . "<NOT") ("DASHED" "CENTER" "CONTINUOUS")  ))
   all (ssname LT1 0)
  )
  (princ)
)

 

Am I even close??

Edited April 3, 2023 by ILoveMadoka

[Steven P]

This is a great reference:

http://lee-mac.com/ssget.html

 

Looking through that and the 'not' example

 

(ssget '((0 . "LINE") (-4 . "<NOT") (62 . 256) (-4 . "NOT>")))

 

and I think you'll need an OR in the NOT to create the list of exclusions:

 

(setq ss (ssget "_X" '((0 . "LINE") (-4 . "<NOT") (-4 . "<OR")(6 . "DASHED")(6 . "CENTER")(6 . "CONTINUOUS")(-4 . "OR>") (-4 . "NOT>"))))

 

 

 

 

EDIT

Should be:

(setq ss (ssget "_X" '((-4 . "<NOT") (-4 . "<OR")(6 . "DASHED")(6 . "CENTER")(6 . "CONTINUOUS")(-4 . "OR>") (-4 . "NOT>"))))

 

(see below)

Edited April 3, 2023 by Steven P

[Tharwat]

(setq s (ssget '((0 . "LINE") (-4 . "<NOT") (6 . "DASHED,CENTER,CONTINUOUS") (-4 . "NOT>"))))

 

[ronjonp]

And this:

(setq ss (ssget "_X" '((0 . "LINE") (6 . "~DASHED") (6 . "~CENTER") (6 . "~CONTINUOUS"))))

 

[ILoveMadoka]

What if it's not a line?
are you forced to do something like this?

 

(0 . "LINE,ARC,CIRCLE,LWPOLYLINE,SPLINE")

 

Does that cover ALL object types?

 

these two lines both worked for LINES:

 

(setq ss01 (ssget "_X" '((0 . "LINE") (-4 . "<NOT") (-4 . "<OR")(6 . "DASHED")(6 . "CENTER")(6 . "CONTINUOUS")(-4 . "OR>") (-4 . "NOT>"))))

(setq ss03 (ssget "_X" '((0 . "LINE") (6 . "~DASHED") (6 . "~CENTER") (6 . "~CONTINUOUS"))))

 

the other did not (for me)

[ILoveMadoka]

So this is where I am and it is still only working for lines and polylines

(not splines, lwpolylines, arcs or circles)

 

(defun c:FLT () 
(setq ssx (ssget "_X" '((0 . "LINE,ARC,CIRCLE,LWPOLYLINE,SPLINE") (6 . "~DASHED") (6 . "~CENTER") (6 . "~CONTINUOUS"))))
  (princ)
)

 

[ronjonp]

Perhaps remove the entity filter ( 0 ).

(setq ss (ssget "_X" '((6 . "~DASHED") (6 . "~CENTER") (6 . "~CONTINUOUS"))))

 

[ILoveMadoka]

This works with one issue for me.

It's selecting text/mtext (linetype display in properties is BYLAYER)

 

(defun c:FLT () 
(setq dx2 (ssget "_X" '((6 . "~DASHED") (6 . "~CENTER") (6 . "~CONTINUOUS"))))
  (princ)
)

 

If I can remove the text from the ss I'm golden.

 

Sorry to be difficult (thank you all for the input!!)

[ronjonp]

Perhaps?

(ssget "_X" '((6 . "~DASHED") (6 . "~CENTER") (6 . "~CONTINUOUS")(6 . "~BYLAYER")))

 

[ILoveMadoka]

For closure..

 

(defun c:FLT3 () 
(setq dx2 (ssget "_X" '((0 . "ARC,SPLINE,CIRCLE,HATCH,LINE,LWPOLYLINE,POINT,POLYLINE,SOLID,ELLIPSE,TRACE") 
          (-4 . "<NOT") (-4 . "<OR")(6 . "DASHED")(6 . "CENTER")(6 . "CONTINUOUS")(-4 . "OR>") (-4 . "NOT>"))))
  (princ)
)

 

 

Again, thank you all!

 

 

ps: ronjonp - that worked too!

Edited April 3, 2023 by ILoveMadoka

[ronjonp]

2 minutes ago, ILoveMadoka said:

For closure..

 

(defun c:FLT3 () 
(setq dx2 (ssget "_X" '((0 . "ARC,SPLINE,CIRCLE,HATCH,LINE,LWPOLYLINE,POINT,POLYLINE,SOLID,ELLIPSE,TRACE") 
          (-4 . "<NOT") (-4 . "<OR")(6 . "DASHED")(6 . "CENTER")(6 . "CONTINUOUS")(-4 . "OR>") (-4 . "NOT>"))))
  (princ)
)

 

 

Again, thank you all!

That won't filter out Linetype BYLAYER items. You might as well use @Tharwat example.. and include "BYLAYER" in the list.

Edited April 3, 2023 by ronjonp

[Steven P]

I think I should go back up and take out 'line' from my answer above - causing some confusion for me just copy and pasting without thinking

[Steven P]

30 minutes ago, ILoveMadoka said:

This works with one issue for me.

It's selecting text/mtext (linetype display in properties is BYLAYER)

 

(defun c:FLT () 
(setq dx2 (ssget "_X" '((6 . "~DASHED") (6 . "~CENTER") (6 . "~CONTINUOUS"))))
  (princ)
)

 

If I can remove the text from the ss I'm golden.

 

Sorry to be difficult (thank you all for the input!!)

 

 

This one, put (0 . "*text") in your list of 'NOT's, * being a wildcard (so gets text, mtext and rtext)

 

(defun c:FLT () 
(setq dx2 (ssget "_X" '((0. "~*TEXT") (6 . "~DASHED") (6 . "~CENTER") (6 . "~CONTINUOUS"))))
  (princ)
)

 

Edited April 3, 2023 by Steven P

[ILoveMadoka]

Wanted to be sure to say THANK YOU for all the help!!