Please help with this z0

[leonucadom]

hello all:

 

I use this routine to lower all selected objects to z0

The problem is that it also affects 3D solids if I have them.

Is there a way to modify the code excluding 3D solids from the selection?

 

_move;_all;;0,0,0;0,0,1e99;_move;_p;;0,0,0;0,0,-1e99

 

 

I appreciate the comments and hope they can help me.

 

 

[BIGAL]

It could be as simple as changing "all" to "ss", where ss is a selection set.

 

I am no expert on setting the exclude objects in a selection set. try this not really tested.

 

(setq ss (ssget "_X" '((-4 . "<NOT") (0 . "3DSOLID") (-4 . "NOT>"))))
  
or 
  
_move;(setq ss (ssget "_X" '((-4 . "<NOT") (0 . "3DSOLID") (-4 . "NOT>"))));;0,0,0;0,0,1e99;_move;ss;;0,0,0;0,0,-1e99

 

Edited Wednesday at 11:50 PM by BIGAL

[SLW210]

Here is the button macro for selected objects, so something like BIGAL's recommendation should work.

 

^C^C_SELECT;_MOVE;0,0,0;0,0,1e99;_MOVE;P;;0,0,0;0,0,-1e99;

 

[leonucadom]

14 hours ago, BIGAL said:

It could be as simple as changing "all" to "ss", where ss is a selection set.

 

I am no expert on setting the exclude objects in a selection set. try this not really tested.

 

(setq ss (ssget "_X" '((-4 . "<NOT") (0 . "3DSOLID") (-4 . "NOT>"))))
  
or 
  
_move;(setq ss (ssget "_X" '((-4 . "<NOT") (0 . "3DSOLID") (-4 . "NOT>"))));;0,0,0;0,0,1e99;_move;ss;;0,0,0;0,0,-1e99

 

 

I already tried it, but something strange happens: it filters the 3D solids, but it puts the other elements at z=1.0000E+99

[Tsuky]

And with this syntax?

(sssetfirst nil (ssget "_X" '((0 . "*") (-4 . "<NOT") (0 . "3DSOLID") (-4 . "NOT>"))))

 

[marko_ribar]

(ssget "_X" (list (cons 0 "~3DSOLID")))

 

[BIGAL]

Thank you @marko_ribar much simpler. Added look in current Layout or Model. In Civ3D may find surfaces also that are not displayed.

 

(ssget "_X" (list (cons 0 "~3DSOLID")(cons 410 (getvar 'ctab))))

 

Edited 20 hours ago by BIGAL

[Tsuky]

Whether with (ssget "_X" '((0 . "*") (-4 . "<NOT") (0 . "3DSOLID") (-4 . "NOT>"))) or (ssget "_X" (list (cons 0 "~3DSOLID"))), it also dismisses the entities TRACE et SOLID????

 

I was cheated because my selection being numerous, the grips were not actif.et I could not see the highlighting with filled shapes.

Edited 19 hours ago by Tsuky
Unfounded remark

[BIGAL]

Using Bricscad dwg has a solid, finds trace.

 

Or do you mean 

(setq ss (ssget "_X" (list (cons -4  "<NOT") (cons 0 "3DSOLID,TRACE") (cons -4  "NOT>")(cons 410 (getvar 'ctab)))))

 

 

Edited 20 hours ago by BIGAL

[leonucadom]

22 hours ago, Tsuky said:

And with this syntax?

(sssetfirst nil (ssget "_X" '((0 . "*") (-4 . "<NOT") (0 . "3DSOLID") (-4 . "NOT>"))))

 

its great, thanks