function MM_findObj(n, d) { //v4.01
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && d.getElementById) x=d.getElementById(n); return x;
}

function setMenu(){ //v2.0 by PVII
 //set the image over and down name convention
 document.TabOver="_over";
 document.TabDown="_down";
 var dt=false;if(document.getElementsByTagName){dt=true;}if(document.TabBar){return;}
 var i,k=-1,g,x,gg,tl,ts,ti,tm,tt,tsn,tu,el,args=setMenu.arguments;
 TabProp=new Array();for(i=0;i<args.length;i++){TabProp[i]=args[i];}
 TabIM=new Array();TabSB=new Array();if(dt){tm=document.getElementsByTagName("IMG");
 }else{tm=document.images;}tm=document.images;tt=new Array();tt=tt.concat(tm);
 if(document.layers){for(i=0;i<document.layers.length;i++){ti=document.layers[i].document.images;
 if(ti){tt=tt.concat(ti);}for(x=0;x<document.layers[i].document.layers.length;x++){
 ti=document.layers[i].document.layers[x].document.images;if(ti){tt=tt.concat(ti);}}}tm=tt;}
 for(i=0;i<tm.length;i++){tl=tm[i].name; if(dt&&!tl){tl=tm[i].id;}
 if(tl&&tl.indexOf("TBim")==0){ts=tl.replace("TBim","");
 tsn="TBsub"+ts;k++;TabIM[k]=tl;if((g=MM_findObj(tsn))!=null){TabSB[k]=tsn;
 gg=(document.layers)?g:g.style;gg.visibility="hidden";}else{TabSB[k]='N';}}}
 document.TBswapd=new Array();document.TBswapo=new Array();for(i=0;i<TabIM.length;i++){
 g=MM_findObj(TabIM[i]);gg=g.src;g.TBim=g.src;tu=gg.lastIndexOf(".");
 g.TBimo=gg.substring(0,tu)+document.TabOver+gg.substring(tu,gg.length);
 g.TBimd=gg.substring(0,tu)+document.TabDown+gg.substring(tu,gg.length);
 if(TabProp[2]>1){document.TBswapo[i]=new Image();document.TBswapo[i].src=g.TBimo;}
 if(TabProp[2]>0){if(TabProp[2]==3){g.TBimd=g.TBimo;}document.TBswapd[i]=new Image();
 document.TBswapd[i].src=g.TBimd;}}if((g=MM_findObj('TabH'))!=null){gg=(document.layers)?g:g.style;
 gg.visibility="hidden";}if(dt&&TabProp[3]!='none'&&!window.opera){
 g=document.getElementsByTagName("A");for(i=0;i<g.length;i++){if(g[i].hasChildNodes()){el=g[i].firstChild;
 while (el){if(el.nodeType==3){gg=el.nodeValue;if(P7TabProp[3]==gg.replace("\n","")){
 g[i].className=TabProp[4];break;}}el=el.firstChild;}}}}document.TabBar=true;
}

function trigMenu(bu){ //v2.0 by PVII
 if(!document.TabBar){return;}var i,g,d,dB=-1,tF=false,sF=false;
 for(i=0;i<TabSB.length;i++){sF=false;if((g=MM_findObj(TabSB[i]))!=null){g=MM_findObj(TabSB[i]);
 gg=(document.layers)?g:g.style;sF=true;}d=MM_findObj(TabIM[i]);if(TabIM[i]==TabProp[0]){
 dB=i;}if(TabIM[i]==bu){tF=true;if(sF){gg.visibility="visible";}if(TabProp[2]>0){
 if(i==dB){d.src=d.TBimd;}else if (TabProp[2]>1){d.src=d.TBimo;}}if((g=MM_findObj('TabH'))!=null){
 gg=(document.layers)?g:g.style;gg.visibility="visible";}}else{if(sF){gg.visibility="hidden";}
 if(TabProp[2]>0){d.src=d.TBim;}}}if(!tF){if(dB>-1){d=MM_findObj(TabIM[dB]);
 if((g=MM_findObj(TabSB[dB]))!=null&&TabProp[1]==0){gg=(document.layers)?g:g.style;
 gg.visibility="visible";}if(TabProp[2]>0){d.src=d.TBimd;}}
 if((g=MM_findObj('TabH'))!=null){gg=(document.layers)?g:g.style;gg.visibility="hidden";}}
}

