"))) returns objects with color not BYLAYER. ""))) returns objects with linetypes other than BYLAYER. "NOT>"))) returns objects with LTSCALE not equal to 1.0."/>

Lisp needed

Hi everyone
Does anyone know of a lisp (lisps) that can: - select objects that don't have color and/or linetype "by layer"
- select objects that don't have linetype scale "1.0"
Need it for IntelliCad so Acad's filter and qselect are not an option.
Thanks in advance!
Add pictures here
<% if( /^image/.test(type) ){ %>
<% } %>
<%-name%>
Add image file
Upload
(ssget "x" '((-4 . "<NOT")(62 . 256)(-4 . "NOT>"))) returns objects with color not BYLAYER.
(ssget "x" '((-4 . "<NOT")(6 . "BYLAYER")(-4 . "NOT>"))) returns objects with linetypes other than BYLAYER.
(ssget "x" '((-4 . "<NOT")(48 . 1.0)(-4 . "NOT>"))) returns objects with LTSCALE not equal to 1.0.
You can do all at once with
(setq ss (ssget "x" '((-4 . "<OR") ((-4 . "<NOT")(62 . 256)(-4 . "NOT>")) ((-4 . "<NOT")(6 . "BYLAYER")(-4 . "NOT>")) ((-4 . "<NOT")(48 . 1.0)(-4 . "NOT>")) (-4 . "OR>")) ) ) ___

Add pictures here
<% if( /^image/.test(type) ){ %>
<% } %>
<%-name%>
Add image file
Upload
Oops ... that should be (setq ss (ssget "x" '((-4 . "<OR") (-4 . "<NOT")(62 . 256)(-4 . "NOT>") (-4 . "<NOT")(6 . "BYLAYER")(-4 . "NOT>") (-4 . "<NOT")(48 . 1.0)(-4 . "NOT>") (-4 . "OR>")) ) )
Sorry. ___

Add pictures here
<% if( /^image/.test(type) ){ %>
<% } %>
<%-name%>
Add image file
Upload
wrote:

Thanks Paul, works great!
Add pictures here
<% if( /^image/.test(type) ){ %>
<% } %>
<%-name%>
Add image file
Upload

Polytechforum.com is a website by engineers for engineers. It is not affiliated with any of manufacturers or vendors discussed here. All logos and trade names are the property of their respective owners.