Is there a lisp that will do the opposite of flatten?

[Rui]

I would like to know if there's any lisp that will read the numbers that define the z coordinate and them "lift the point up" to that coordinate.
Thank you.

 

[tigrek]

ELEVATION as opposite of FLATTEN

Since FLATTEN is doing the following:

1- Replace Z-Coord of the entitites with Zero

2- For special Case of LWPoly, where there is no Z-COORD, make the elevation Zero,

Its opposite is

To open the properties Tab and then
pick objects

and type 0 for elevation in the properties Tab.

So, it is there in the standard menu, change properties.
Picking many objects is allowed, so, changing the elevations does not have to be one by one.
I would say this is as automated as automation goes.
No need for macros here.

PS
LWPOLY has no place for z-coord anyway. But can have arcs and various line widths. Command CONVERTPOLY allows to change one or many LWPOLY into 2D poly which accomodate z-coord for each vertex but redundantly because all vertices get the same elevation, when any one is changed. So, z-coord here is just the elevation.

3DPoly has z-coord but cannot have various line widths and no arcs. Just straight lines.