Pan and zoom in Undo command

Is there a straightforward way (Autolisp routine?) to set Undo to ignore pan and zoom commands when counting Undo actions, so that undoing 5 times, for example, regressed to before the last 5 editing and drawing commands?

 

That could be very useful sometimes, though personally I'd prefer to make a
separate edit-&-draw-undo routine, rather than change the operation of Undo
itself. I assume there might be times I'd want to back through some pans
and zooms where Zoom P wouldn't do what I need (e.g. through more than the
number of previous views it saves), without going back as far as the last
editing or drawing command.

If anyone figures out a way to do it, let's also include other things that
only affect the on-screen display, but not the content or things like Layer
settings, such as Regen, Regenall, Redraw, Redrawall, maybe even Dview,
Vpoint. And also things that have an effect on outside files that can't be
reversed from inside a drawing anyway, like Save, Qsave, Saveas, Wblock,
Mslide, Export, Open, New. And other things that are pointless to "undo,"
like Area, Dist, Id, List, Cal, maybe Spell and Find and even Plot, if they
didn't result in any changes.

Kent Cooper, AIA

pan and zoom commands when counting Undo actions, so that undoing 5 times,
for example, regressed to before the last 5 editing and drawing commands?