AutoCad - Una rutinalisp

Hola como estan queria saber si alguien sabe de una rutina lisp que pase de algo elevado a planta, les explico, quisiera pasar una cara 3d que esta ya rotada y elevada, pero que me la pase a 0,0,0, pero que no sea proyectada sino la ponga en su verdadero tamaño.

descargue uno que se llama flatten pero este lo hace como si fuera proyectado mas no lo coloca en su verdadero tamaño me toca acerlo alineado con 3 puntos pero cuando son muchas caras creadas en una cuadricula se hace fastidioso. gracias.