^ REMOVEM - remove menu from screen
  Call this shell if you previously call MENU.SH with a number greater
  than 9 when you wish to remove this menu.
  If you REMOVEM with a * for a parameter, REMOVEM will remove all
  menus in descending order (e.g. 3 before 2 before 1 ).
  REMOVEM deletes the screen saving files after it uses them.
^
if '%1' == '*'
  local REML REMN
  shx -dfnp1 %{SH1FILES}SH1TMPS.* > sh1tmp
  REML=`shx -cl sh1tmp`
  while %REML > 0
    REMN=`shx -xt sh1tmp %REML`
    REMN=`shx -sr %REMN SH1TMPS.`
    removem %REMN
    compute REML=%REML-1
  endwhile
  del %{SH1FILES}sh1tmps.*
  del sh1tmp
else
  shx -scrl %{SH1FILES}sh1tmps.%1
  if %1 < 10
    del %{SH1FILES}sh1tmps.%1
  endif
endif
