
    // WebTicker by Mioplanet
    // www.mioplanet.com

    TICKER_CONTENT = document.getElementById("TICKER").innerHTML;
    var tickerArray = ["My First Ticker!","My Second Ticker!"];
    var tickerCounter = 0;
    var updatePE = null;
    var movePE = null;
    TICKER_RIGHTTOLEFT = false;
    TICKER_SPEED = 2;
    TICKER_STYLE = "font-size:14px; color:black;font-family:Times New Roman;font-weight:bold;";
    TICKER_PAUSED = false;
    TICKER_URL="/gml/files/ticker/KER000.xml";


    Array.prototype.compare = function(testArr) {
        if (this.length != testArr.length) return false;
        for (var i = 0; i < testArr.length; i++) {
            if (this[i].compare) { 
                if (!this[i].compare(testArr[i])) return false;
            }
            if (this[i] !== testArr[i]) return false;
        }
        return true;
    }

    updateTicker("init");
        
    function ticker_start() {
	var tickerSupported = false;
	TICKER_WIDTH = document.getElementById("TICKER").style.width;
	var img = "<img src=images/blank.gif width=100% height=0></img>";

	// Firefox
	if (navigator.userAgent.indexOf("Firefox")!=-1 || navigator.userAgent.indexOf("Safari")!=-1) {
		document.getElementById("TICKER").innerHTML = "<TABLE  cellspacing='0' cellpadding='0' width='100%' border='0'><TR><TD nowrap='nowrap'>"+img+"<span style='"+TICKER_STYLE+"' ID='TICKER_BODY'>&nbsp;</span>"+img+"</TD></TR></TABLE>";
		tickerSupported = true;
                TICKER_SPEED = 7;
	}
	// IE
	if (navigator.userAgent.indexOf("MSIE")!=-1 && navigator.userAgent.indexOf("Opera")==-1) {
		document.getElementById("TICKER").innerHTML = "<DIV nowrap='nowrap' style='width:100%;'>"+img+"<SPAN style='"+TICKER_STYLE+"' ID='TICKER_BODY' width='100%'></SPAN>"+img+"</DIV>";
		tickerSupported = true;
	}
	if(!tickerSupported) document.getElementById("TICKER").outerHTML = ""; else {
		document.getElementById("TICKER").scrollLeft = TICKER_RIGHTTOLEFT ? document.getElementById("TICKER").scrollWidth - document.getElementById("TICKER").offsetWidth : 0;
		document.getElementById("TICKER_BODY").innerHTML = TICKER_CONTENT;
		document.getElementById("TICKER").style.display="block";
		startMovePe();
                updatePE = new PeriodicalExecuter(function(pe) {
                    updateTicker();
                }, 60);
        }
    }

    function TICKER_tick() {
        if ( !TICKER_PAUSED ) {
            if ( $("TICKER_BODY").style.backgroundColor != '#e3e3e3') {
                movePE.stop();
                $("TICKER_BODY").style.backgroundColor = '#e3e3e3';
                $("TICKER_BODY").style.color = 'black';
                window.setTimeout(startMovePe,100);
            }
            document.getElementById("TICKER").scrollLeft += TICKER_SPEED * (TICKER_RIGHTTOLEFT ? -1 : 1);
        } else {
            $("TICKER_BODY").style.background = 'white';
            $("TICKER_BODY").style.color = 'blue';
        }
           
//            if ( TICKER_RIGHTTOLEFT && document.getElementById("TICKER").scrollLeft <= 0 ) {
//                document.getElementById("TICKER").scrollLeft = document.getElementById("TICKER").scrollWidth - document.getElementById("TICKER").offsetWidth;
//                }
        if ( !TICKER_RIGHTTOLEFT && (document.getElementById("TICKER").scrollLeft) >= document.getElementById("TICKER").scrollWidth - document.getElementById("TICKER").offsetWidth ) {
            document.getElementById("TICKER").scrollLeft = 0;
            document.getElementById("TICKER_BODY").innerHTML = getNextMessage();
        }
    }

    function getNextMessage(){
        tickerCounter++;
        if ( tickerCounter == tickerArray.length ) {
            tickerCounter = 0;
        }
        return tickerArray[tickerCounter]==null?"":tickerArray[tickerCounter];
    }

    function updateTicker(init) {
        var options = {
            asynchronous: false,
            method: "get",
            onSuccess: function(response) {
                var xmlDoc = response.responseXML;
                var newXMLArray = new Array();
                $A(xmlDoc.getElementsByTagName("text")).each(function(tag){
                    if ( tag.firstChild.nodeValue != null )
                        newXMLArray.push(tag.firstChild.nodeValue);
                });
                if ( !tickerArray.compare(newXMLArray) ) {
                    tickerArray = newXMLArray.clone();
                } 
                if ( init != null ) {
                    TICKER_CONTENT = tickerArray[0]==null?"":tickerArray[0];
                    ticker_start();
                }
            },
            onFailure: function(response) {
                //alert("Ticker cannot be accessed");
                $("TICKER").style.display = "none";
                updatePE.stop();
            }
        };
        
        new Ajax.Request(TICKER_URL,options);
    }
    
    function startMovePe() {
        movePE = new PeriodicalExecuter(function(pe) {
                    TICKER_tick();
        }, 0.03);
    } 


