Is there a way, short of lisp, to get the copy and offset commands to place newly-created objects on the current layer, instead of the layer of the source object?

There is the Express Tools' "Copy Objects to New Layer" command, but this requires the user to select a layer every time (a minor thing, but annoying over time), and doesn't help with the offsetting.

I suspect it wouldn't be too hard to write lisp routines that override the default implementation of these commands, possibly making them work in either fashion based on the setting of an environment variable, but I was hoping for something simpler.