*********************************************************************** SUBROUTINE WALLKEY *********************************************************************** return end