report all lines at altitude 0

[Pinko66]

hello to all, I am a new member of the forum, and I have some difficulty with the cad after so many years of inactivity....:biggrin:
I remember that it esisted a lisp that allowed to bring back all lines,pololinee, blocks at zero altitude on the x,y plane.
Can someone tell me his name and where can I find him?

Thank you very much.. .

 

[Tristan]

Have you tried flatten?

 

[tir]

Applications

 

[x11start]

I did this command that might be your case. you just have to load it with
(load "schiacci") and launch it with snaps (from the command line)

 

[MBT]

you can simply create a button that follows these commands:

_all; ;

to me it works.. .

 

[tir]

to me it works.. .

add a new macro (icon) to your toolbar - in fact two single-line macros (tool buttons) - one for selected objects and the second for all objects:
[FlattenSel]^c^c_ucs;;_select \_move _p;;0,0,1e99;;_move _p;;0,0,-1e99;;
[FlattenAll]^c^c_ucs;;_move _all;;0,0,1e99;;_move _all;;0,0,-1e99;;
_chprop;_all;;_thickness;0;;

(keep the macro text on a single line; the displayed format is to be used for old mnu/mns files - if you add the macro through the new cui dialog, use just its code starting with ^c)

do not use it on 3d solids as it may distort them
Source