var winent = null
function ToMenu(msd,color,hzmh,mask)
{
 if ( typeof hzmh == 'undefined' ) { hzmh="" }
 if ( typeof mask == 'undefined' ) { mask="http://www.2order.org" }
 if ( typeof color == 'undefined' ) color=""

 var wd=screen.availWidth;
 var pr800=0
 var hg=screen.availHeight;

 //if (wd>1024) {wd=wd*0.9}
 if (winent ===undefined) {winent=null}
 if (winent ===null)
 {
  winent=OpenWin(msd,wd,hg,color,hzmh,mask)
  //alert("winent="+winent)
  return;
 }

 if (winent.closed)
 {
  winent=OpenWin(msd,wd,hg,color,hzmh,mask)
  //alert("winent="+winent)
  return;
 }
 alert("already opened")
}

function OpenWin(msd,wd,hg,color,hzmh,mask)
{
  if ( typeof hzmh == 'undefined' ) { hzmh="" }
  var pr800=0
  if (wd<801) {pr800=1;}
  if (typeof color == 'undefined') color="";
  var msl=''
  //alert("msd="+msd)
  var rzd=":"
  var pos=msd.indexOf(rzd)
  if (pos>-1)
  { msl=msd.substr(pos+1); msd=msd.substr(0,pos) }

  if (+msd >5000 && +msd <6000 ) color='BALI'

  //alert("msl="+msl+" msd="+msd)
  msd=msd+""
  var to=""
   if (mask.substr(mask.length-1) ==='/') { mask=mask.substr(0,mask.length-1) }
   to=to+mask+"/mumps-examples/jsp/"
   to=to+"w3menu.jsp?MSD="+msd+"&COLOR="+color+"&NEWPAGE=1&FULLWIN=1&PR800="+pr800+"&HZMH="+hzmh
   if (msl.length>0)
    { to=to+"&MSL="+msl }
   //alert("to="+to)
   //return window.open(to,"","toolbar=no,location=0,scrollbars=1,directories=0,width="+wd+",height="+hg);

   return window.open(to,"","toolbar=no,statusbar=0,resizable=yes,location=0,scrollbars=1,directories=0,left=0,top=0,width="+wd+",height="+hg);
}