*********************************************************************** SUBROUTINE EMCKEY *********************************************************************** return end