Flatten.lsp

This routine attempts to flatten all entites to the XY plane of the WCS

It will ignore extrusion vectors, and its name should probably be changed to squash or squish because there seems to already be a FLATTEN command as of release 2007 (or earilier).

View Flatten.lsp

You can copy the contents and save them to a file with an lsp extension. Then you can subsequently load it using APPLOAD.