exportDir = getSavePath caption:"Export Directory" /** select export dir prompt **/
allObjects = $objects as array /** all scene objects in array **/
nonHiddenObjects = for o in allObjects where not o.isHidden collect o /** pick out only unhidden objects **/
for n in nonHiddenObjects do /** loop through every unhidden object **/
(
    select n /** select object **/
	max select invert
	max delete
    local path = exportDir + "\\" + n.name + ".ASE" /** build filepath based on object name **/
    exportFile path #noPrompt /** export **/
	max undo
	clearUndoBuffer() /** clear the undo buffer so it doesn't slow down **/
)