// Accessible Scroller by Mike Foskett (http://www.websemantics.co.uk/). Retain this message and you may use the code freely.

var speed=70        // speed of scroller
var step=2          // smoothness of movement
var top="#box"      // name of anchor used as page top when clicking start / stop / show
var Start= "Start"  // Text for start link
var Stop = "Stop"   // Text for stop link
var Show = "Show"   // Text for show link

var x, scroll, divW, sText=""

function onclickIE(idAttr,handler,call){
  if ((document.all)&&(document.getElementById)){idAttr[handler]=new Function(call)}
}

function addLink(id,call,txt){
  var e=document.createElement('A')
  e.setAttribute('href',top)
  e.setAttribute('onclick',call)
  var linktext=document.createTextNode(txt)
  e.appendChild(linktext)
  document.getElementById(id).appendChild(e)
}

function stopScroller(){clearTimeout(scroll)}

function startScroller(){
  document.getElementById('tag').style.display='block'
  document.getElementById('tag').style.whiteSpace='nowrap'
  x-=step
  divW=document.getElementById('tag').offsetWidth
  if (x<(divW)*-1){
	 x=0
	 speed = 1000;
  } else {
	speed =  70;
  }
 
  document.getElementById('tag').style.left=x+'px'
  scroll=setTimeout('startScroller()',speed)
}

function initScroller(){
  if (document.getElementById && document.createElement && document.body.appendChild) {
    divW=0
    x=divW
	if(document.getElementById('tag')){
		document.getElementById('tag').style.position='relative'
		var ss=document.getElementById('tag').childNodes
		for (i=0;i<ss.length;i++) {sText+=ss[i].nodeValue}
		scroll=setTimeout('startScroller()',1000)
	}
    
  }
}

function addLoadEvent(func) {
  if (!document.getElementById | !document.getElementsByTagName) return
  var oldonload = window.onload
  if (typeof window.onload != 'function') {
    window.onload = func;
  } else {
    window.onload = function() {
      oldonload()
      func()
    }
  }
}

addLoadEvent(initScroller)