var ie = (document.all)? true:false;
var ns = (document.layers)? true:false;
var available_width;
var menues;
var count=0;
var show=0;
menues = new Array();
// put menu elements into an array
function putin(name) {
	menues[count] = name;
	count++;
}
// toggle visiblity of menus
function change(elem) {
	if (ie) {
		for (i=0;i<count;i++) {
			if (menues[i]==elem) {
				if (document.all[elem].style.visibility == "visible")
					document.all[elem].style.visibility = "hidden";
				else
					document.all[elem].style.visibility = "visible";
			}
			else
				document.all[menues[i]].style.visibility = "hidden";
		}
	}
	else if (ns) {
		for (i=0;i<count;i++) {
			if (menues[i]==elem) {
				if (document.layers[elem].visibility == "show")
					document.layers[elem].visibility = "hide";
				else
					document.layers[elem].visibility = "show";
			}
			else
				document.layers[menues[i]].visibility = "hide";
		}
	}

}
// show a menu

function disp(elem) {
      show=1;
      for(i=0;i<count;i++){
        if(ie){document.all[menues[i]].style.visibility = "hidden";}else
        {if(ns){document.layers[menues[i]].visibility = "hide";}}
      }
      if(ie){document.all[elem].style.visibility = "visible";}else
      {if(ns){document.layers[elem].visibility = "show";}}
    }
// hide a menu after a quarter second

function hide(){
    show=0;
    setTimeout("hideall();",500);
}

// hide all menues

function hideall(){
      if(show==0){
      for(i=0;i<count;i++){
        if(ie){document.all[menues[i]].style.visibility = "hidden";}else
        {if(ns){document.layers[menues[i]].visibility = "hide";}}
      }
    }
 }

//if mouse renters layer by leaving a link prohibit hiding

function mouseInLayer(e){show=1;}

//--------------------------------------------------------

//Default browsercheck, added to all scripts!

//--------------------------------------------------------

function checkBrowser(){
	this.ver=navigator.appVersion
	this.dom=document.getElementById?1:0
	this.ie5=(this.ver.indexOf("MSIE 5")>-1 && this.dom)?1:0;
	this.ie4=(document.all && !this.dom)?1:0;
	this.ns5=(this.dom && parseInt(this.ver) >= 5) ?1:0;
	this.ns4=(document.layers && !this.dom)?1:0;
	this.bw=(this.ie5 || this.ie4 || this.ns4 || this.ns5)
	return this
}
bw=new checkBrowser()

/*********************************************************************************

These are the variables you have to set:

*********************************************************************************/
//The speed of the timeout between each scroll.

timSpeed=50

//The height of the container (change this when it scrolls to much or to little)

contHeight=100

/*********************************************************************************

This is the object constructor function, which applies

methods and properties to the Cross-browser layer object

*********************************************************************************/

function makeScrollObj(obj,nest){
	nest=(!nest) ? '':'document.'+nest+'.'
	this.el=bw.dom?document.getElementById(obj):bw.ie4?document.all[obj]:bw.ns4?eval(nest+'document.'+obj):0;
  	this.css=bw.dom?document.getElementById(obj).style:bw.ie4?document.all[obj].style:bw.ns4?eval(nest+'document.'+obj):0;
	this.height=bw.ns4?this.css.document.height:this.el.offsetHeight
	this.top=b_gettop
	return this
}

//Getting the top for the top method

function b_gettop(){
	var gleft=(bw.ns4 || bw.ns5) ? eval(this.css.top):eval(this.css.pixelTop);
        return gleft;
}

//Variables

var scrollTim;
var active=0;
/*********************************************************************************

The scroll function. Checks what way to scroll and checks if the

layer is not already on top or bottom.

*********************************************************************************/

function scroll(speed){
	clearTimeout(scrollTim)
	way=speed>0?1:0
	if((!way && oScroll[active].top()>-oScroll[active].height+contHeight) || (oScroll[active].top()<0 && way)){
		oScroll[active].css.top=oScroll[active].top()+speed
		scrollTim=setTimeout("scroll("+speed+")",timSpeed)
	}
}

//Clears the timeout so the scroll stops, this is called onmouseout.

function noScroll(){
	clearTimeout(scrollTim)
}

/*********************************************************************************

Changes the active layer. Hides the one that's visible and

shows the "new" one. Also set's the new layers top to

0 so it starts at top.

*********************************************************************************/

function changeActive(num){
	oScroll[active].css.visibility='hidden'
	active=num
	oScroll[active].css.top=0
	oScroll[active].css.visibility='visible'
}

/*********************************************************************************

Initilizes the page, makes a oScroll Array and calls the object constructor.

Here you can add as many scrollObjects as you want

*********************************************************************************/

function scrollInit(){
	oScroll=new Array()
	oScroll[0]=new	makeScrollObj('divScroll1','div1Cont')
	oScroll[1]=new	makeScrollObj('divScroll2','div1Cont')
	oScroll[0].css.visibility='visible'
	oScroll[1].css.visibility='hidden'
	oControl1=new makeScrollObj('div1Control')
	oControl1.css.visibility='visible'
}

//initialize eventhandler for ns & ie
function init() {
	for(i=0;i<count;i++)
		if (ns){
			document.layers[menues[i]].onmouseover = mouseInLayer;
		    document.layers[menues[i]].onmouseout = hide;
      		document.layers[menues[i]].captureEvents(Event.MOUSEOVER);
		}else if (ie){
			document.all[menues[i]].onmouseover = mouseInLayer;
      		document.all[menues[i]].onmouseout = hide;
		}
		scrollInit();
}

//initialize array

putin('m0');
putin('m1');
putin('m2');
putin('m3');
putin('m4');
putin('m5');


// To manipulate the bgcolor, click action of a table cell.
function MCOver(src,clr) { // move over cell => change (bgcolor of cell & cursor style)
	src.bgColor = clr ;
   src.style.cursor = 'hand' ;
}

function MCOut(src,clr) { // move away from cell => restore (bgcolor of cell & cursor style)
	src.bgColor = clr ;
	src.style.cursor = 'default' ;
}

function MCClick(src) { // click on cell == click on link in the cell
if(event.srcElement.tagName=='TD') { // refuse misuse of this function
	src.children.tags('A')[0].click();
  }
}

function MM_preloadImages() { //v3.0
  var d=document; 
	if(d.images){ 
		if(!d.MM_p) d.MM_p=new Array();
		    var i,j=d.MM_p.length,a=MM_preloadImages.arguments; 
			for(i=0; i<a.length; i++)
		    if (a[i].indexOf("#")!=0){ 
			d.MM_p[j]=new Image; 
			d.MM_p[j++].src=a[i];
}
}
}

function MM_swapImgRestore() { //v3.0
  var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}

function MM_findObj(n, d) { //v3.0
  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); return x;
}

function MM_swapImage() { //v3.0
  var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}

function MM_showHideLayers() { //v3.0
  var i,p,v,obj,args=MM_showHideLayers.arguments;
  for (i=0; i<(args.length-2); i+=3) 
	if ((obj=MM_findObj(args[i]))!=null) 
		{ v=args[i+2];
	    if (obj.style) { obj=obj.style; 
		v=(v=='show')?'visible':(v='hide')?'hidden':v; }
    	obj.visibility=v; }
}