/* Parts of this script cited from dhtmlcentral.org and tek-tips.com */
function lib_bwcheck(){ //Browsercheck (needed)
    this.ver=navigator.appVersion
	this.agent=navigator.userAgent
	this.dom=document.getElementById?1:0
	this.opera5=(navigator.userAgent.indexOf("Opera")>-1 && document.getElementById)?1:0
	this.ie5=(this.ver.indexOf("MSIE 5")>-1 && this.dom && !this.opera5)?1:0; 
    this.ie6=(this.ver.indexOf("MSIE 6")>-1 && this.dom && !this.opera5)?1:0;
    this.ie4=(document.all && !this.dom && !this.opera5)?1:0;
    this.ie=this.ie4||this.ie5||this.ie6
	this.mac=this.agent.indexOf("Mac")>-1
	this.ns6=(this.dom && parseInt(this.ver) >= 5) ?1:0; 
    this.ns4=(document.layers && !this.dom)?1:0;
    this.bw=(this.ie6 || this.ie5 || this.ie4 || this.ns4 || this.ns6 || this.opera5)
	return this
	}
var bw=new lib_bwcheck()


function Fensterhoehe () {
    if (window.innerHeight) {
	return window.innerHeight;
    } else if (document.body && document.body.offsetHeight) {
	return document.body.offsetHeight;
    } else {
	return 0;
    }
}
    if (!(bw.ie4 || bw.ie5 || bw.ie6 || bw.ns4)) {
document.writeln('<div id="Scroller" style="z-index:3;display:none;color:red;font-weight:bold;position:fixed;left:0;top:'+(Fensterhoehe()-20)+'px;"><a href="javascript:scroll(15);" onmouseover="scroll(2);" onmouseout="noScroll();"><img src="images/link_up.gif" border="0" alt=""/></a><a href="javascript:scroll(-15);" onmouseover="scroll(-2);" onmouseout="noScroll();"><img src="images/link_down.gif" border="0" alt=""/></a></div>'); 
function theresize() {
    scroller = document.getElementById("Scroller");
    scroller.style.top =
	Fensterhoehe()-20 + "px";
    if (document.getElementById("leftmatter").offsetHeight >
	Fensterhoehe()) {
	scroller.style.display="block";
    } else {
	scroller.style.display="none";
    }
}
window.onresize = theresize;
theresize();
    }

//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;


    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;
}

// A unit of measure that will be added when setting the position of a layer.
    var px = bw.ns4||window.opera?"":"px";

//Getting the top for the top method
function b_gettop(){
    var gleft=(bw.ns4 || bw.ns6)?parseInt(this.css.top):eval(this.css.pixelTop);
    return gleft;
}
//Variables
var scrollTim = 1;
var active = 0;

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)+px
	    scrollTim = setTimeout("scroll("+speed+")",timSpeed)
	}
}
//Clears the timeout so the scroll stops, this is called onmouseout.
function noScroll(){
    clearTimeout(scrollTim)
	}

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

function scrollInit(){
    oScroll = new Array()
	
	// You can add and remove scrollObjects here.
	oScroll[0] = new makeScrollObj('leftmatter');
	
    oScroll[0].css.left = 0+px
	oScroll[0].css.top = 0+px
	oScroll[0].css.visibility = "visible"
	//	oControl = new makeScrollObj('Scroller')
	//	oControl.css.visibility = "visible"
	}

onload = scrollInit;