/* Initialwerte der Eigenschaften */
	var slidespeed=0												

/* Größe des containers */
	var containerWidth="304px" 
	var containerHeight="380px"

/* Größe des sliders - kein Initialwert nötig, wird errechnet */
	var sliderWidth=''
	var sliderHeight=''											

/* Objekte */
	var slider
	var arrowUp
	var arrowDown
	var arrowSpacer
		
/* Hilfsvariable für start/stop */
	var tmpspeed=slidespeed

	var sliderContent=''
	var iedom=document.all||document.getElementById

/* unsichtbaren slider zeichnen, um sliderHeight und sliderWidth zu ermitteln*/
	tmpContent=document.getElementById? document.getElementById("tmp").innerHTML : tmp.innerHTML
    document.write('<span id="dummySlider" style="visibility:hidden;position:absolute;top:-1000px;left:-9000px">'+tmpContent+'</span>')
	sliderContent = tmpContent
				
	function findObjects(){
	  slider=document.getElementById? document.getElementById("slider") : document.all.slider
	  arrowUp=document.getElementById? document.getElementById("arrowUp") : document.all.arrowUp
	  arrowDown=document.getElementById? document.getElementById("arrowDown") : document.all.arrowDown
	  arrowSpacer=document.getElementById? document.getElementById("arrowSpacer") : document.all.arrowSpacer
	  
	  sliderWidth=document.getElementById? document.getElementById("dummySlider").offsetWidth : dummySlider.offsetWidth
	  sliderHeight=document.getElementById? document.getElementById("dummySlider").offsetHeight : dummySlider.offsetHeight

	  if (sliderHeight > parseInt(containerHeight)) {
		  arrowDown.style.visibility='visible'
		  arrowSpacer.style.visibility='visible'
	  } 
	
	  lefttime=setInterval("slidevertical()",30)
	}
	
	window.onload=findObjects
	
	function slidevertical(){
	  var direction = 0
	
	  if (parseInt(slidespeed) > 0) {
		direction = 1
	  } else if (parseInt(slidespeed) < 0) {
		direction = 2
	  }
	
	  // direction = 1 -> slider bewegt sich nach unten (container scrollt nach oben)
	  if (direction == 1) {
		if (parseInt(slider.style.top) < 0){
			arrowDown.style.visibility='visible'
			if (parseInt(slider.style.top)<(sliderHeight)){
			  slider.style.top=parseInt(slider.style.top)+slidespeed+"px"
			}
		} else {
			arrowUp.style.visibility='hidden'
		}
	
		// direction = 2 -> slider bewegt sich nach oben (container scrollt nach unten)
	  } else if (direction == 2) {
		if (parseInt(containerHeight) - parseInt(slider.style.top) < parseInt(sliderHeight)) {
			arrowUp.style.visibility='visible'
			if (parseInt(slider.style.top)>(sliderHeight*(-1))){
			  slider.style.top=parseInt(slider.style.top)+slidespeed+"px"
			}
		} else {
			arrowDown.style.visibility='hidden'
		}
	
	  }
	}
															
	function increaseSpeed(){
	  if (slidespeed < 4) {
		slidespeed = slidespeed + 3
	  }
	}
	
	function decreaseSpeed(){
	  if (slidespeed > -4) {
		slidespeed = slidespeed - 3
	  }
	}
	
	function stop(){
	  tmpspeed = slidespeed
	  slidespeed = 0
	}
	
	function start(){
	  slidespeed = tmpspeed 
	}
	
	  with (document){
		write('<table border="0" cellspacing="0" cellpadding="0"><td>')
		write('<div style="position:relative;width:'+containerWidth+';height:'+containerHeight+';overflow:hidden">')
		write('<div id="slider" style="position:absolute;left:0px;top:0px">' + sliderContent + '</div>')
		write('</div>')
		write('</td></table>')
	  }
