/***********************************
*   http://javascripts.vbarsan.com/
*   This notice may not be removed 
***********************************/
//-- begin: Scroller's Algorithm -->
//-------------------------------------------------------------------------
function mouseOver(t) 
{
SO=document.getElementById("slider_"+t)
SO.sspeed = 0
}
//-------------------------------------------------------------------------
function mouseOut(t) 
{
SO=document.getElementById("slider_"+t)
SO.sspeed = SO.restart
}
//-------------------------------------------------------------------
function scroll(id,speed)
{
//-- Initialise  Scroller's Parameters and message -->
var O = document.getElementById(id)
if (O.style.height+"" == "" || O.style.height+"" == "undefined")
{
alert("vertScroll - 'height' is not defined as inline style parameter in '"+id+"' - set to 200px")
O.style.height = "200px"
}
var sliderId = "slider_"+id //Unique id for slider
//-----------------------------------------------------
var d=""
//------------------------------   Outer container --------------------
d += '<div id=Container_'+id
d += '>' //End of outer header
//---------------------------  Inner container --------------------------------------
d += '<div style="position:relative;overflow:hidden;width:'+O.style.width+';height:'+O.style.height+';clip:rect(0 '+O.style.width+' '+O.style.height+' 0)'
d += ';" '
d += 'onMouseover="mouseOver(\''+id+'\')" onMouseout="mouseOut(\''+id+'\')"'
d += '>'
//----------------------------- Slider --------------------
d += '<div id='+sliderId+' style="text-align:'+O.style.textAlign+';position:relative;width:'+O.style.width+';font-size:'+O.style.fontSize
d += ';color:'+O.style.color
d += '" '
d += '>' // End of slider 
d += '<\/div><\/div><\/div>'
document.write(d)
//Set control to slider
document.getElementById(sliderId)["sspeed"]  = speed
document.getElementById(sliderId)["restart"] = speed
document.getElementById(sliderId)["oldFontSize"] = O.style.fontSize
//Set presetation to container
var containerObj = document.getElementById("Container_"+id)
var x=containerObj.style.display 
containerObj.style.cssText = O.style.cssText //Transfer all parameters
containerObj.className = O.className
containerObj.style.display  = x

//------------------------------ Inner functions  ----------------------------------
var sliderObj= 0
var sizeup   = 0
	//------------------------------------------------------------------------------
	function start()
    {
    sliderObj=document.getElementById(sliderId)
    sliderObj.style.top=O.style.height;
	sliderObj.innerHTML=O.innerHTML;
	sizeup = parseInt(O.style.height);
	schedule();
    }
	//-------------------------------------------------------------------------------
	function schedule()
	{
	 if(parseInt(sliderObj.style.top)>=-sizeup)
	  {
	  sliderObj.style.top=parseInt(sliderObj.style.top)-sliderObj.sspeed;
	  setTimeout(schedule,50);
	  }else{
	  sliderObj.style.top=O.style.height;schedule();
	  }
	}
    //-------------- End inner functions --------------------------------------------
start()
} //----------------------- End Scroll Function -----------------------------------------------------------
//-- End Scroll Algorithm ------------------------------------>