/********************************************************************************
Copyright (C) 1999 Thomas Brattli
This script is made by and copyrighted to Thomas Brattli at www.bratta.com
Visit for more great scripts. This may be used freely as long as this msg is intact!
I will also appriciate any links you could give me.
********************************************************************************/

//Default browsercheck, added to all scripts!
function checkBrowser(){

	this.ver=navigator.appVersion
	this.dom=document.getElementById?1:0
	this.ie5=(this.ver.indexOf("MSIE 5")>-1 && this.dom)?1:0;
	this.ie4=(document.all && !this.dom)?1:0;
	this.ns5=(this.dom && parseInt(this.ver) >= 5) ?1:0;
	this.ns4=(document.layers && !this.dom)?1:0;
	this.bw=(this.ie5 || this.ie4 || this.ns4 || this.ns5)
	return this
}

bw=new checkBrowser()

/*****************
You set the width and height of the divs inside the style tag, you only have to
change the divCont, Remeber to set the clip the same as the width and height.
You can remove the divUp and divDown layers if you want. 
This script should also work if you make the divCont position:relative.
Then you should be able to place this inside a table or something. Just remember
that Netscape crash very easily with relative positioned divs and tables.
Updated with a fix for error if moving over layer before pageload.

****************/

//Sets Gap pixels when text scroll out
var gap=100

//If you want it to move faster you can set this lower:
var speed=40

//Set this to false if you just want it to go one time
var loop=true

//Sets variables to keep track of what's happening
var timer, last_dir


//Object constructor
function makeObj(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.scrollHeight=bw.ns4?this.css.document.height:this.el.offsetHeight
	this.clipHeight=bw.ns4?this.css.clip.height:this.el.offsetHeight
	this.up=goUp;this.down=goDown;
	this.moveIt=moveIt; this.x; this.y;
    this.obj = obj + "Object"
    eval(this.obj + "=this")
    return this
}

function moveIt(x,y){
	this.x=x;this.y=y
	this.css.left=this.x
	this.css.top=this.y
}


//Makes the object go up
function goDown(){
//alert(this.y + " > -" + this.scrollHeight);
	//if(this.y>-126){
	if(this.y>-this.scrollHeight){
		this.moveIt(0,this.y-1)
		timer = setTimeout(this.obj+".down()",speed)
	} else if(loop) {
		this.moveIt(0,gap)
		eval(this.obj+".down()")
	}
}

//Makes the object go down

function goUp(){
	if(this.y<oCont.clipHeight){
		this.moveIt(0,this.y+1)
		timer = setTimeout(this.obj+".up()",speed)
	} else if(loop) {
		this.moveIt(0,gap)
		eval(this.obj+".down()")
	}
}

//Calls the scrolling functions. Also checks whether the page is loaded or not.
// 0=Scroll last dirction
// >1=Scroll down
// <1=Scroll up

function scroll(dir){
	if(loaded){
		if(timer) clearTimeout(timer);
		if(dir>0) {
		 	last_dir=dir
			oScroll.down()
		} else if(dir<0) {
			last_dir=dir
			oScroll.up()
		} else {
			scroll(last_dir)
		}
	}
}


//Stops the scrolling (called on mouseout)
function noScroll(){
	if(timer) clearTimeout(timer)
}

//Makes the object
var loaded;
function scrollInit(){
	oCont=new makeObj('divCont')
	oScroll=new makeObj('divText','divCont')
	oScroll.moveIt(0,gap)

	oCont.css.visibility='visible'
	if ((navigator.platform=='MacPPC') && (navigator.appVersion.indexOf("MSIE 5")>-1 && document.getElementById != 0)) {
	 oCont.css.top=20;
	}
	loaded=true;
	scroll(1);
}

function scrollInit_district(){
	oCont=new makeObj('divCont_district')
	oScroll=new makeObj('divText_district','divCont_district')
	oScroll.moveIt(0,gap)

	oCont.css.visibility='visible'
	if ((navigator.platform=='MacPPC') && (navigator.appVersion.indexOf("MSIE 5")>-1 && document.getElementById != 0)) {
	 oCont.css.top=20;
	}
	loaded=true;
	scroll(1);
}