/*
		This script was found at
		http://www.todayload.com/effect/text/text-linkscroll.htm and modified
		for readability and to avoid naming clashes.
	*/
	function scrolltop() {
oScroll.moveIt(0,0);
	}

	function dp_dynscr_its() { 
		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;
		//2010-05-11 -- Update for IE8 & IE7 w Object Detection
		//this.ie7 = (this.ver.indexOf("MSIE 7") > -1 && this.dom && !this.opera5) ? 1 : 0;
		var ie = /*@cc_on!@*/false;
		this.ie7 = (ie && document.compatMode && window.XMLHttpRequest && !window.getComputedStyle) ? true:false;
		this.ie8 = (this.ie7 && document.querySelectorAll) ? 1 : 0;
		//EOF Update
		this.ie4 = (document.all && !this.dom && !this.opera5) ? 1 : 0;
		this.ie = this.ie4 || this.ie5 || this.ie6 || this.ie7 || this.ie8;
		this.mac = this.agent.indexOf("Mac") > -1;
		this.ns6 = (this.dom && parseInt(this.ver) >= 5) ? 1 : 0;
		// TODO: (this.layers && !this.dom ....
		this.ns4 = (!this.dom) ? 1 : 0;
		this.dpIts = (this.ie || this.ns4 || this.ns6 || this.opera5);
		return this
	}
	
	var dpDynScrIts = new dp_dynscr_its();

	var dpDynScrSpeed = 50;

	var dpDynScrLoop, dpDynScrTimer;

	function dp_dynscr_makeObj(obj, nest) {
		nest = (!nest) ? "" : 'document.'+nest+'.';
		this.el				= dpDynScrIts.dom ? document.getElementById(obj) : dpDynScrIts.ie4 ? document.all[obj] : dpDynScrIts.ns4 ? eval(nest+'document.'+obj) : 0;
		this.css			= dpDynScrIts.dom ? document.getElementById(obj).style : dpDynScrIts.ie4 ? document.all[obj].style : dpDynScrIts.ns4 ? eval(nest+'document.'+obj) : 0;
		this.scrollHeight	= dpDynScrIts.ns4 ? this.css.document.height : this.el.offsetHeight
		this.clipHeight		= dpDynScrIts.ns4 ? this.css.clip.height : this.el.offsetHeight
		this.up = dp_dynscr_goUp;
		this.down = dp_dynscr_goDown;
		this.moveIt = dp_dynscr_moveIt;
		this.x = 0;
		this.y = 0;
		this.obj = obj + "Object";
		eval(this.obj + "=this");
		return this
	}

	var dpDynScrPx = dpDynScrIts.ns4 || window.opera ? "" : "px";

	function dp_dynscr_moveIt(x, y) {
		this.x = x;
		this.y = y;
		this.css.left = this.x + dpDynScrPx;
		this.css.top = this.y + dpDynScrPx;
	}

	function dp_dynscr_goDown(move) {
		if (this.y > -this.scrollHeight + oCont.clipHeight) {
			this.moveIt(0, this.y-move);
			if (dpDynScrLoop) {
				setTimeout(this.obj + ".down(" + move + ")", dpDynScrSpeed);
			}
		}
	}

	function dp_dynscr_goUp(move) {
		if (this.y < 0) {
			this.moveIt(0, this.y-move);
			if (dpDynScrLoop) {
				setTimeout(this.obj + ".up(" + move + ")", dpDynScrSpeed);
			}
		}
	}
	var dpDynScrscrolltextLoaded = false;
	var oCont;
	var oScroll;
	function dp_dynscr_scrolltextInit() {
		oCont = new dp_dynscr_makeObj('scrollerContent');
		oScroll = new dp_dynscr_makeObj('scrollerText','scrollerContent');
		oScroll.moveIt(0,0);
		oCont.css.visibility = "visible";
		dpDynScrscrolltextLoaded = true;
	}
	
	function dp_dynscr_scroll(speed) {
		dp_dynscr_noScroll();
		if (dpDynScrscrolltextLoaded) {
			dpDynScrLoop = true;
			if (speed > 0) {
				oScroll.down(speed);
			} else {
				oScroll.up(speed);
			}
		}
	}

	function dp_dynscr_noScroll() {
		dpDynScrLoop = false;
		if (dpDynScrTimer) {
			clearTimeout(dpDynScrTimer);
		}
	}
	

	if (dpDynScrIts.dpIts) {
		window.onload = dp_dynscr_scrolltextInit;
	}