var isDOM=document.getElementById?1:0,isIE=document.all?1:0,isNS4=navigator.appName=='Netscape'&&!isDOM?1:0,isOp=self.opera?1:0,isDyn=isDOM||isIE||isNS4;

function getRef(i,p){
  p=!p?document:p.navigator?p.document:p;
  return isIE?p.all[i]:isDOM?(p.getElementById?p:p.ownerDocument).getElementById(i):isNS4?p.layers[i]:null;
}

function getSty(i,p){
  var r=getRef(i,p);
  return r?isNS4?r:r.style:null;
}

if(!self.LayerObj){
  var LayerObj=new Function('i','p','this.ref=getRef(i,p);this.sty=getSty(i,p);return this');
}

function getLyr(i,p){
  return new LayerObj(i,p);
}

function LyrFn(n,f){
  LayerObj.prototype[n]=new Function('var a=arguments,p=a[0],px=isNS4||isOp?0:"px";with(this){'+f+'}');
}

LyrFn('x','if(!isNaN(p))sty.left=p+px;else return parseInt(sty.left)');
LyrFn('y','if(!isNaN(p))sty.top=p+px;else return parseInt(sty.top)');
  
var aeOL=[];

function addEvent(o,n,f,l){
  var a='addEventListener',h='on'+n,b='',s='';
  
  if(o[a]&&!l){
    return o[a](n,f,false);
  }
  
  o._c|=0;
  
  if(o[h]){
    b='_f'+o._c++;
    o[b]=o[h];
  }
  
  s='_f'+o._c++;
  o[s]=f;
  o[h]=function(e){
    e=e||window.event;
    var r=true;
    
    if(b){
      r=o[b](e)!=false&&r;
    }
    
    r=o[s](e)!=false&&r;
    return r;
  }
  
  aeOL[aeOL.length]={o:o,h:h}
}

addEvent(window,'unload',function(){for(var i=0;i<aeOL.length;i++)with(aeOL[i]){o[h]=null;for(var c=0;o['_f'+c];c++)o['_f'+c]=null}});

function plasmaMenu(myName,nested,cssProp,cssVis,cssHid){
  this.myName=myName;
  this.nested=nested;
  this.cssProp=cssProp;
  this.cssVis=cssVis;
  this.cssHid=cssHid;
  this.cssLitClass='';
  this.menus={root:new plasmaMenuNode('root',true,this)};
  this.menuToShow=[];
  this.mtsTimer=null;
  this.showDelay=0;
  this.switchDelay=125;
  this.hideDelay=500;
  this.showOnClick=0;
  this.animations=[];
  this.animSpeed=100;
  
  if(isIE&&!isOp){
    addEvent(window,'unload',new Function(myName+'=null'));
  }
}

plasmaMenu.prototype.show=function(mN){
  with(this){
    menuToShow.length=arguments.length;
    
    for(var i=0;i<arguments.length;i++){
      menuToShow[i]=arguments[i];
    }
    
    clearTimeout(mtsTimer);
    
    if(!nested){
      mtsTimer=setTimeout(myName+'.menus.root.over()',10);
    }
  }
}

plasmaMenu.prototype.hide=function(mN){
  with(this){
    clearTimeout(mtsTimer);
    
    if(menus[mN]){
      menus[mN].out();
    }
  }
}

function plasmaMenuNode(id,isRoot,obj){
  this.id=id;
  this.isRoot=isRoot;
  this.obj=obj;
  this.lyr=this.child=this.par=this.timer=this.visible=null;
  this.args=[];
  
  var node=this;
  
  this.over=function(evt){
    with(node){
      with(obj){
        if(isNS4&&evt&&lyr.ref){
          lyr.ref.routeEvent(evt);
        }
        clearTimeout(timer);
        clearTimeout(mtsTimer);
        
        if(!isRoot&&!visible){
          node.show();
        }
        
        if(menuToShow.length){
          var a=menuToShow,m=a[0];
          
          if(!menus[m]||!menus[m].lyr.ref)
            menus[m]=new plasmaMenuNode(m,false,obj);
          
          var c=menus[m];
          
          if(c==node){
            menuToShow.length=0;
            return;
          }
          
          clearTimeout(c.timer);
          
          if(c!=child&&c.lyr.ref){
            c.args.length=a.length;
            for(var i=0;i<a.length;i++){
              c.args[i]=a[i];
            }
            var delay=child?switchDelay:showDelay;
            c.timer=setTimeout('with('+myName+'){menus["'+c.id+'"].par=menus["'+node.id+'"];menus["'+c.id+'"].show()}',delay?delay:1)
          }
          
          menuToShow.length=0
        }
        
        if(!nested&&par){
          par.over()
        }
      }
    }
  }
    
  this.out=function(evt){
    with(node){
      with(obj){
        if(isNS4&&evt&&lyr&&lyr.ref)
          lyr.ref.routeEvent(evt);
        
        clearTimeout(timer);
        
        if(!isRoot){
          timer=setTimeout(myName+'.menus["'+id+'"].hide()',hideDelay);
          
          if(!nested&&par)
            par.out()
        }
      }
    }
  }
  
  if(this.id!='root'){
    with(this){
      with(lyr=getLyr(id)){
        if(ref){
          if(isNS4){
            ref.captureEvents(Event.MOUSEOVER|Event.MOUSEOUT);
          }
          
          addEvent(ref,'mouseover',this.over);
          addEvent(ref,'mouseout',this.out);
          
          if(obj.nested){
            addEvent(ref,'focus',this.over);
            addEvent(ref,'click',this.over);
            addEvent(ref,'blur',this.out);
          }
        }
      }
    }
  }
}

plasmaMenuNode.prototype.show=function(){
  with(this)
    with(obj){
      if(!lyr||!lyr.ref)
        return;
      
      if(par){
        if(par.child&&par.child!=this)
          par.child.hide();
        
        par.child=this;
      }
      
      var offR=args[1],offX=args[2],offY=args[3],lX=0,lY=0,doX=''+offX!='undefined',doY=''+offY!='undefined';
      
      if(self.page&&offR&&(doX||doY)){
        with(page.elmPos(offR,par.lyr?par.lyr.ref:0))
          lX=x,lY=y;
        
        if(doX)
          lyr.x(lX+eval(offX));
        
        if(doY)
          lyr.y(lY+eval(offY))
      }
      
      if(offR)
        lightParent(offR,1);
      
      visible=1;
      
      if(obj.onshow)
        obj.onshow(id);
        setVis(1)}};plasmaMenuNode.prototype.hide=function(){with(this)with(obj){if(!lyr||!lyr.ref)return;if(isNS4&&self.isMouseIn&&isMouseIn(lyr.ref))return show();if(args[1])lightParent(args[1],0);if(child)child.hide();if(par&&par.child==this)par.child=null;if(lyr){visible=0;if(obj.onhide)obj.onhide(id);setVis(0)}}};plasmaMenuNode.prototype.lightParent=function(elm,lit){with(this)with(obj){if(!cssLitClass||isNS4)return;if(lit)elm.className+=(elm.className?' ':'')+cssLitClass;else elm.className=elm.className.replace(new RegExp('(\\s*'+cssLitClass+')+$'),'')}};plasmaMenuNode.prototype.setVis=function(sh){with(this)with(obj){lyr.timer|=0;lyr.counter|=0;with(lyr){clearTimeout(timer);if(sh&&!counter)sty[cssProp]=cssVis;if(isDOM&&animSpeed<100)for(var a=0;a<animations.length;a++)animations[a](ref,counter);counter+=animSpeed*(sh?1:-1);if(counter>100){counter=100}else if(counter<=0){counter=0;sty[cssProp]=cssHid}else if(isDOM)timer=setTimeout(myName+'.menus["'+id+'"].setVis('+sh+')',50)}}};plasmaMenu.prototype.activateMenu=function(id,subInd){with(this){if(!isDOM||!document.documentElement)return;var a,ul,li,parUL,mRoot=getRef(id),nodes,count=1;if(isIE){var aNodes=mRoot.getElementsByTagName('a');for(var i=0;i<aNodes.length;i++){addEvent(aNodes[i],'focus',new Function('e','var node=this.parentNode;while(node){if(node.onfocus)setTimeout(node.onfocus,1,e);node=node.parentNode}'));addEvent(aNodes[i],'blur',new Function('e','var node=this.parentNode;while(node){if(node.onblur)node.onblur(e);node=node.parentNode}'))}}var lists=mRoot.getElementsByTagName('ul');for(var i=0;i<lists.length;i++){li=ul=lists[i];while(li){if(li.nodeName.toLowerCase()=='li')break;li=li.parentNode}if(!li)continue;parUL=li;while(parUL){if(parUL.nodeName.toLowerCase()=='ul')break;parUL=parUL.parentNode}a=null;for(var j=0;j<li.childNodes.length;j++)if(li.childNodes[j].nodeName.toLowerCase()=='a')a=li.childNodes[j];if(!a)continue;var menuID=myName+'-id-'+count++;if(ul.id)menuID=ul.id;else ul.setAttribute('id',menuID);var sOC=(showOnClick==1&&li.parentNode==mRoot)||(showOnClick==2);var eShow=new Function('with('+myName+'){var m=menus["'+menuID+'"],pM=menus["'+parUL.id+'"];'+(sOC?'if((pM&&pM.child)||(m&&m.visible))':'')+' show("'+menuID+'",this)}');var eHide=new Function(myName+'.hide("'+menuID+'")');addEvent(a,'mouseover',eShow);addEvent(a,'focus',eShow);addEvent(a,'mouseout',eHide);addEvent(a,'blur',eHide);if(sOC)addEvent(a,'click',new Function('e',myName+'.show("'+menuID+'",this);if(e.cancelable&&e.preventDefault)e.preventDefault();e.returnValue=false;return false'));if(subInd)a.insertBefore(subInd.cloneNode(true),a.firstChild)}menus[id]=new plasmaMenuNode(id,true,this)}};if(!self.page)var page={win:self,minW:0,minH:0,MS:isIE&&!isOp};page.elmPos=function(e,p){var x=0,y=0,w=p?p:this.win;e=e?(e.substr?(isNS4?w.document.anchors[e]:getRef(e,w)):e):p;if(isNS4){if(e&&(e!=p)){x=e.x;y=e.y};if(p){x+=p.pageX;y+=p.pageY}}if(e&&this.MS&&navigator.platform.indexOf('Mac')>-1&&e.tagName=='A'){e.onfocus=new Function('with(event){self.tmpX=clientX-offsetX;self.tmpY=clientY-offsetY}');e.focus();x=tmpX;y=tmpY;e.blur()}else while(e){x+=e.offsetLeft;y+=e.offsetTop;e=e.offsetParent}return{x:x,y:y}};if(isNS4){var fsmMouseX,fsmMouseY,fsmOR=self.onresize,nsWinW=innerWidth,nsWinH=innerHeight;document.fsmMM=document.onmousemove;self.onresize=function(){if(fsmOR)fsmOR();if(nsWinW!=innerWidth||nsWinH!=innerHeight)location.reload()};document.captureEvents(Event.MOUSEMOVE);document.onmousemove=function(e){fsmMouseX=e.pageX;fsmMouseY=e.pageY;return document.fsmMM?document.fsmMM(e):document.routeEvent(e)};function isMouseIn(sty){with(sty)return((fsmMouseX>left)&&(fsmMouseX<left+clip.width)&&(fsmMouseY>top)&&(fsmMouseY<top+clip.height))}}

var listMenu = new plasmaMenu('listMenu', true, 'visibility', 'visible', 'hidden');

listMenu.showDelay = 10;
listMenu.switchDelay = 25;
listMenu.hideDelay = 50;
listMenu.cssLitClass = 'highlighted';
listMenu.showOnClick = 0;

function animClipDown(ref, counter)
{
 var cP = Math.pow(Math.sin(Math.PI*counter/200),0.75);
 ref.style.clip = (counter==100 ?
  ((window.opera || navigator.userAgent.indexOf('KHTML') > -1) ? '':
   'rect(auto, auto, auto, auto)') :
    'rect(0, ' + ref.offsetWidth + 'px, '+(ref.offsetHeight*cP)+'px, 0)');
};

function animFade(ref, counter)
{
 var f = ref.filters, done = (counter==100);
 if (f)
 {
  if (!done && ref.style.filter.indexOf("alpha") == -1)
   ref.style.filter += ' alpha(opacity=' + counter + ')';
  else if (f.length && f.alpha) with (f.alpha)
  {
   if (done) enabled = false;
   else { opacity = counter; enabled=true }
  }
 }
 else ref.style.opacity = ref.style.MozOpacity = counter/100.1;
};

listMenu.animations[listMenu.animations.length] = animFade;
listMenu.animations[listMenu.animations.length] = animClipDown;
listMenu.animSpeed = 20;

var arrow = null;
if (document.createElement && document.documentElement)
{
 arrow = document.createElement('span');
 arrow.appendChild(document.createTextNode('>'));
 // Feel free to replace the above two lines with these for a small arrow image...
 //arrow = document.createElement('img');
 //arrow.src = 'arrow.gif';
 //arrow.style.borderWidth = '0';

 arrow.className = 'subind';
}

addEvent(window, 'load', new Function('listMenu.activateMenu("plasmaMenuRoot", arrow)'));