// Enviroment

eDO=50;
eDC=300;

// Constants

cT=true;
cF=false;
cN=null;
cU=undefined;
cH='hidden';
cV='visible';
cPT='-999px';

// Shortcuts

sD=document;
sW=window;
sN=navigator;
sL=location;
function sNA(){return new Array();}
function sDW(v){sD.write(v);}
function sGE(id){if(sD.getElementById) return sD.getElementById(id); else if(sD.all) return sD.all[id];}
function sTO(func,ms){return setTimeout(func,ms);}
function sCTO(to){clearTimeout(to); return cN;}
function sLC(v){if(v) return v.toLowerCase(); else return '';}
function sPI(v){if(v) return parseInt(v);}

// Globals

aM=sNA();
aI=sNA();
aE=sNA();
aMS=sNA();
aMO=sNA();
aMA=sNA();
aMMP=sNA(); aMIP=sNA();

gMM=cF; gMI=cF;
gMO=cF;
gZI=500;
gIMGD=cT;

gCO='';
gPX=0;
gPY=0;

tM=0;
tI=0;

// Browsers

bIE=(sD.all&&sW.createPopup)?cT:cF;
bOP=(sW.opera)?cT:cF;

// Menu Arrays

function wmM(id,div,tbl,style)
{
  aM[id]=sNA();
  aI[id]=sNA();
  aE[id]=sNA();
  aM[id][0]=div;
  aM[id][1]=tbl;
  aM[id][2]=style;
  aM[id][9]=cT;

  aMS[id]=sNA();
  aMS1=sLC(aM[id][2]).split(/\s*;\s*/);
  for(msi in aMS1)
  {
    aMS2=aMS1[msi].split(/\s*:\s*/);
    aMS[id][aMS2[0]]=aMS2[1];
  }
}

function wmI(id,im,a,open,td,tbl)
{
  aI[id][im]=sNA();
  aE[id][im]=sNA();
  aI[id][im][0]=a;
  aI[id][im][1]=open;

  if(td.constructor!=Array)
  {
    aI[id][im][2]=td;
  }
  else
  {
    if(td[0]!=cU) aI[id][im][2]=td[0];
    if(td[1]!=cU) aI[id][im][12]=td[1];
  }

  if(tbl.constructor!=Array)
  {
    aI[id][im][3]=tbl;
  }
  else
  {
    if(tbl[0]!=cU) aI[id][im][3]=tbl[0];
    if(tbl[1]!=cU) aI[id][im][13]=tbl[1];
  }
}

function wmE(id,im,el,co,td)
{
  aE[id][im][el]=sNA();

  if(co.constructor!=Array)
  {
    aE[id][im][el][0]=co;
  }
  else
  {
    if(co[0]!=cU) aE[id][im][el][0]=co[0];
    if(co[1]!=cU) aE[id][im][el][10]=co[1];
  }

  if(td.constructor!=Array)
  {
    aE[id][im][el][1]=td;
  }
  else
  {
    if(td[0]!=cU) aE[id][im][el][1]=td[0];
    if(td[1]!=cU) aE[id][im][el][11]=td[1];
  }
}

// Menu Fixes

function mIF(id)
{
  rM=sGE('m_'+id); rF=sGE('f_'+id);
  if(bIE && rM.style.position=='absolute' && rM.style.visibility==cV)
  {
    rF.style.zindex=rM.style.zindex-1;
    rF.style.width=rM.offsetWidth;
    rF.style.height=rM.offsetHeight;
    rF.style.top=rM.style.top;
    rF.style.left=rM.style.left;
  }
}

function isRef(eco)
{
  return ((bIE || bOP) && eco.indexOf('img')!=-1);
}

function msFix(id,atr,ind)
{
  rval=';';
  mstyle=aM[id][2];
  if((!atr || sLC(atr).indexOf(ind)==-1) && sLC(mstyle).indexOf(ind)!=-1) rval+=ind+':'+aMS[id][ind]+';';
  return rval;
}

function mspFix(id,atr,indp)
{
  rval=';';
  mstyle=aM[id][2];
  if(sLC(mstyle).indexOf(indp)!=-1)
  {
    for(ms in aMS[id])
    {
      if(ms.indexOf(indp)!=-1)
      {
        msa=ms.substring(indp.length);
        if(!atr || sLC(atr).indexOf(msa)==-1) rval+=msa+':'+aMS[id][ms]+';';
      }
    }
  }
  return rval;
}

function mdivFix(id,mdiv)
{
  rval=mdiv;
  rval+=mspFix(id,mdiv,'mdiv-');
  rval+=msFix(id,mdiv,'position');
  if(aMS[wmm]['alwaysvisible'] && (aMS[wmm]['alwaysvisible']=='1' || sLC(aMS[wmm]['alwaysvisible'])=='true')) rval+='visibility:visible;';
  if(sLC(rval).indexOf('visibility')==-1) rval+='visibility:hidden;';
  if(sLC(rval).indexOf('position')==-1) rval+='position:absolute;';
  if(sLC(rval).indexOf('hidden')!=-1) rval+='top:-999px;left:-999px;';
  if(sLC(rval).indexOf('z-index')==-1) rval+='z-index:'+gZI+';'; gZI+=10;
  return rval;
}

function mtblFix(id,mtbl)
{
  rval=mtbl;
  rval+=mspFix(id,mtbl,'mtbl-');
  return rval;
}

function iaFix(id,ia)
{
  rval=ia;
  if(sLC(rval).indexOf('href')==-1) rval='href="'+rval+'"';
  if(sLC(rval).indexOf('text-decoration')==-1) rval+=' style="text-decoration:none"';
  return rval;
}

function itdFix(id,itd)
{
  rval=itd;
  rval+=mspFix(id,itd,'itd-');
  rval+=msFix(id,itd,'width');
  return rval;
}

function itblFix(id,itbl)
{
  rval=itbl;
  rval+=mspFix(id,itbl,'itbl-');
  rval+=msFix(id,itbl,'cursor');
  return rval;
}

function etdFix(id,etd)
{
  rval=etd;
  rval+=msFix(id,etd,'font-family');
  rval+=msFix(id,etd,'font-size');
  rval+=msFix(id,etd,'font-weight');
  rval+=mspFix(id,etd,'etd-');
  return rval;
}

function ecoFix(id,eco)
{
  rval=eco;
  if(sLC(rval).indexOf('src=')!=-1)
  {
    if(sLC(rval).indexOf('<')==-1 && sLC(rval).indexOf('>')==-1)
    {
      rval='<img '+rval+' border=0>';
    }
  }
  return rval;
}

function wmDraw()
{
  for(wmm in aM)
  {
    if(aM[wmm][9])
    {
      aM[wmm][9]=cF;
      wmod=cT; wmoc=1; wmo='v'; if(aMS[wmm]['orientation'] && sLC(aMS[wmm]['orientation']).indexOf('h')!=-1) wmo='h';
      mdiv=aM[wmm][0]; mdiv=mdivFix(wmm,mdiv);
      mtbl=aM[wmm][1]; mtbl=mtblFix(wmm,mtbl);
      mpr=cF; if(sLC(mdiv).indexOf('relative')!=-1) mpr=cT;
      wm='';
      if(mpr) wm+='<table border=0 cellpadding=0 cellspacing=0><tr><td>';
      wm+='<div id="m_'+wmm+'" style="'+mdiv+'" onMouseOver="mOver()" onMouseOut="mOut()"><table border=0 cellpadding=0 cellspacing=0 style="'+mtbl+'">';
      wmic=0;
      for(wmi in aI[wmm])
      {
        aI[wmm][wmi][9]=wmic; wmic++;
        ia=aI[wmm][wmi][0]; iaref=''; iaend=''; if(ia!=''){ia=iaFix(wmm,ia); iaref='<a '+ia+'>'; iaend='</a>';}
        itd=aI[wmm][wmi][2]; itd=itdFix(wmm,itd);
        itbl=aI[wmm][wmi][3]; itbl=itblFix(wmm,itbl); if(sLC(itbl).indexOf('cursor')==-1 && iaref!='') itbl+='cursor:pointer;';
        if(wmod) wm+='<tr>';
        wmoc++; if(wmo=='h' && wmoc<aI[wmm].length) wmod=cF; else wmod=cT;
        onc=''; if(aMS[wmm]['openonclick'] && (sLC(aMS[wmm]['openonclick'])=='1' || sLC(aMS[wmm]['openonclick'])=='true')) onc='onClick=iClick()';
        wm+='<td id="itd_'+wmm+'_'+wmi+'" style="'+itd+'" onMouseOver="iOver(\''+wmm+'\',\''+wmi+'\')" '+onc+'>';
        if(!bIE) wm+=iaref;
        wm+='<table id="itbl_'+wmm+'_'+wmi+'" border=0 cellpadding=0 cellspacing=0 width=100% style="'+itbl+'">';
        if(bIE) wm+=iaref;
        wm+='<tr>';
        for(wme in aE[wmm][wmi])
        {
          eco=aE[wmm][wmi][wme][0]; eco=ecoFix(wmm,eco); if(isRef(eco)) eco=iaref+eco+'</a>';
          etd=aE[wmm][wmi][wme][1]; etd=etdFix(wmm,etd);
          wm+='<td id="e_'+wmm+'_'+wmi+'_'+wme+'" style="'+etd+'" nowrap>'+eco+'</td>';
        }
        wm+='</tr>';
        if(bIE) wm+=iaend;
        wm+='</table>';
        if(!bIE) wm+=iaend;
        wm+='</td>';
        if(wmod) wm+='</tr>';
      }
      wm+='</table></div>';
      if(mpr) wm+='</td></tr></table>';
      sDW(wm);

      if(bIE)
      {
        sDW('<iframe id="f_'+wmm+'" frameborder=0 scrolling=no style="position: absolute; display: inline; top: -999px; left: -999px; filter: Alpha(Opacity=0);"></iframe>');
        mIF(wmm);
      }

      rM=sGE('m_'+wmm);
      if(!mpr && rM.style.visibility==cH)
      {
        rM.style.top=cPT; rM.style.left=cPT;
      }
    }
  }
}

function iChange(wmm,wmi,state)
{
  rItd=sGE('itd_'+wmm+'_'+wmi);

  itd=aI[wmm][wmi][2];
  switch(state)
  {
    case 1:
      if(aI[wmm][wmi][12]!=cU) itd=aI[wmm][wmi][12];
      break;
  }

  if(aI[wmm][wmi][12]!=cU)
  {
    itd=itdFix(wmm,itd);
    if(bOP){rItd.style=itd;}else{rItd.style.cssText=itd;}
  }

  rItbl=sGE('itbl_'+wmm+'_'+wmi);

  itbl=aI[wmm][wmi][3];
  switch(state)
  {
    case 1:
      if(aI[wmm][wmi][13]!=cU) itbl=aI[wmm][wmi][13];
      break;
  }

  if(aI[wmm][wmi][13]!=cU)
  {
    if(sLC(itbl).indexOf('cursor')==-1 && aI[wmm][wmi][0]!='') itbl+='cursor:pointer;';
    itbl=itblFix(wmm,itbl);
    if(bOP){rItbl.style=itbl;}else{rItbl.style.cssText=itbl;}
  }

  for(wme in aE[wmm][wmi])
  {
    rE=sGE('e_'+wmm+'_'+wmi+'_'+wme);

    eco=aE[wmm][wmi][wme][0];
    etd=aE[wmm][wmi][wme][1];
    switch(state)
    {
      case 1:
        if(aE[wmm][wmi][wme][10]!=cU) eco=aE[wmm][wmi][wme][10];
        if(aE[wmm][wmi][wme][11]!=cU) etd=aE[wmm][wmi][wme][11];
        break;
    }

    if(aE[wmm][wmi][wme][10]!=cU)
    {
      eco=ecoFix(wmm,eco);
      if(isRef(eco))
      {
        ia=aI[wmm][wmi][0];
        if(ia!=''){ia=iaFix(wmm,ia); eco='<a '+ia+'>'+eco+'</a>';}
      }
      rE.innerHTML=eco;
    }

    if(aE[wmm][wmi][wme][11]!=cU)
    { 
      etd=etdFix(wmm,etd);
      if(bOP){rE.style=etd;}else{rE.style.cssText=etd;}
    }
  }

  if(bIE) mIF(wmm);
}

function iState(id,iid)
{
  if(!id && !iid){mUnmarkParents(id,iid);}

  if(id!=gMM || iid!=gMM)
  {
    if(gMM && gMI)
    {
      if(aI[gMM][gMI][1]!=id || aI[gMM][gMI][1]=='')
      {
        iChange(gMM,gMI,0);
      }
      mHideBranch(id,iid);
    }

    if(id && iid)
    {
      iChange(id,iid,1);
      gMM=id; gMI=iid;
      if(aI[id][iid][1]!='')
      {
        mHideAlive();
        aMMP.push(id); aMIP.push(iid);
        gMO=aI[id][iid][1]; aMO.push(gMO);
        if(!aMS[id]['openonclick'] || (sLC(aMS[id]['openonclick'])!='1' && sLC(aMS[id]['openonclick'])!='true')) mShow(gMO);
      }
    }
  }
}

function iClick()
{
  mShow(gMO);
}

function iOver(id,iid)
{
  sCTO(tM);
  if(id!=gMM || iid!=gMI)
  {
    tI=sTO('iState(\''+id+'\',\''+iid+'\');',eDO);
  }
}

function mOver()
{
  sCTO(tM);
}

function mOut()
{
  sCTO(tI);
  tM=sTO('iState(cF,cF); gMM=cF; gMI=cF;',eDC);
}

function mPlace(id)
{
  rM=sGE('m_'+id);
  rOM=sGE('m_'+gMM);
  rOI=sGE('itd_'+gMM+'_'+gMI);
  rOIC=aI[gMM][gMI][9];

  if(rOM.style.top){mtop=sPI(rOM.style.top);}
  else if(rOM.offsetTop){mtop=sPI(rOM.offsetTop);}

  if(rOM.style.left){mleft=sPI(rOM.style.left);}
  else if(rOM.offsetLeft){mleft=sPI(rOM.offsetLeft);}

  if(rOM.style.paddingTop) mtop+=sPI(rOM.style.paddingTop);
  if(rOM.style.paddingLeft) mleft+=sPI(rOM.style.paddingLeft);

  orienth=cF; orientv=cF;

  if(aMS[gMM]['orientation'] && sLC(aMS[gMM]['orientation']).indexOf('h')!=-1)
  {
    orienth=cT;
    mtop+=sPI(rOI.offsetHeight);
    for(wmi in aI[gMM])
    {
      if(aI[gMM][wmi][9]>=rOIC) break;
      rOI=sGE('itd_'+gMM+'_'+wmi);
      mleft+=sPI(rOI.offsetWidth);
    }
  }
  else
  {
    orientv=cT;
    mleft+=sPI(rOI.offsetWidth);
    for(wmi in aI[gMM])
    {
      if(aI[gMM][wmi][9]>=rOIC) break;
      rOI=sGE('itd_'+gMM+'_'+wmi);
      mtop+=sPI(rOI.offsetHeight);
    }
  }

  mh=rM.offsetHeight;
  mw=rM.offsetWidth;

  if(sD.body.offsetHeight) sh=sD.body.offsetHeight;
  if(sD.body.clientHeight) sh=sD.body.clientHeight;
  if(sD.body.offsetWidth) sw=sD.body.offsetWidth;
  if(sD.body.clientWidth) sw=sD.body.clientWidth;

  mr=0;
  if(rOM.style.borderRightWidth) mr+=sPI(rOM.style.borderRightWidth);
  if(rOM.style.paddingRight) mr+=sPI(rOM.style.paddingRight);
  ml=0;
  if(rOM.style.borderLeftWidth) mr+=sPI(rOM.style.borderLeftWidth);
  if(rOM.style.paddingLeft) mr+=sPI(rOM.style.paddingLeft);
  mt=0;
  if(rOM.style.borderTopWidth) mt+=sPI(rOM.style.borderTopWidth);
  if(rOM.style.paddingTop) mt+=sPI(rOM.style.paddingTop);
  mb=0;
  if(rOM.style.borderBottomWidth) mb+=sPI(rOM.style.borderBottomWidth);
  if(rOM.style.paddingBottom) mb+=sPI(rOM.style.paddingBottom);

  openup=cF; openleft=cF;

  if(mtop+mh>sh) openup=cT;
  if(mleft+mw>sw) openleft=cT;

  if(aMS[gMM]['opendirection'])
  {
    if(aMS[gMM]['opendirection'].indexOf('up')!=-1) openup=cT;
    if(aMS[gMM]['opendirection'].indexOf('left')!=-1) openleft=cT;
  }

  if(aMS[gMM]['opendirection'])
  {
    if(aMS[gMM]['opendirection'].indexOf('down')!=-1) openup=cF;
    if(aMS[gMM]['opendirection'].indexOf('right')!=-1) openleft=cF;
  }

  if(aMS[id]['pos-top']) mtop+=sPI(aMS[id]['pos-top']);
  if(aMS[id]['pos-left']) mleft+=sPI(aMS[id]['pos-left']);

  moh=sPI(rOI.offsetHeight);
  mow=sPI(rOI.offsetWidth);

  if(openup)
  {
    if(orientv)
    {
      mtop-=mh;
      mtop+=moh;
      mtop-=mt;
    }

    if(orienth)
    {
      mtop-=mh;
      mtop-=moh;
      mtop-=mt;
    }
  }
  else
  {
    mtop+=mb;
  }

  if(openleft)
  {
    if(orientv)
    {
      mleft-=mw;
      mleft-=mow;
      mleft-=ml;
    }

    if(orienth)
    {
      mleft-=mw;
      mleft+=mow;
      mleft-=ml;
    }
  }
  else
  {
    mleft+=mr;
  }

  rM.style.top=mtop;
  rM.style.left=mleft;
}

function mShow(id)
{
  mPlace(id);
  rM=sGE('m_'+id); rM.style.visibility=cV;
  if(bIE) mIF(id);
}

function mHide(id)
{
  if(id && (!aMS[id]['alwaysvisible'] || aMS[id]['alwaysvisible']=='0' || aMS[id]['alwaysvisible']=='false'))
  {
    rM=sGE('m_'+id);
    if(rM.style.visibility==cV)
    {
      rM.style.visibility=cH;
      rM.style.top=cPT; rM.style.left=cPT;
      if(bIE){rF=sGE('f_'+id); rF.style.top=cPT; rF.style.left=cPT;}
    }
  }
}

function mHideAll()
{
  for(wmm in aM)
  {
    mHide(wmm);
  }
  aMO=sNA();
}

function mHideAlive()
{
  for(wmm in aMA)
  {
    mHide(aMA[wmm]);
    mUnmarkParents(aMA[wmm],cF);
  }
  aMA=sNA();
}

function mHideBranch(id,iid)
{
  while(hid=aMO.pop())
  {
    lA=cF; if(aMS[hid]['keepalive'] && (aMS[hid]['keepalive']=='1' || aMS[hid]['keepalive']=='true')) lA=cT;
    if(hid==id && gMM || lA)
    {
      if(lA) aMA.push(hid);
      aMO.push(hid);
      return cN;
    }
    mHide(hid);
    mUnmarkParents(id,iid);
  }
}

function mUnmarkParents(id,iid)
{
  while(lMM=aMMP.pop())
  {
    lMI=aMIP.pop();
    if(lMM==id || aI[lMM][lMI][1]==id)
    {
      if(aI[gMM][gMI][1]!=id) iChange(lMM,lMI,0);
      return cN;
    }
    iChange(lMM,lMI,0);
  }
}