var xmlDoc = new ActiveXObject("Microsoft.XMLDOM"); 


function loadXML(xmlFile){ 
	xmlDoc.async="false"; 
	xmlDoc.onreadystatechange=verify; 
	xmlDoc.load(xmlFile); 
	xmlObj=xmlDoc.documentElement; 
}


function verify(){ 
	// 0 Object is not initialized 
	// 1 Loading object is loading data 
	// 2 Loaded object has loaded data 
	// 3 Data from object can be worked with 
	// 4 Object completely initialized 
	if (xmlDoc.readyState != 4) { 
		return false; 
	} 
}

function getValue(xmlFile,lang){
	loadXML(xmlFile);
	//alert(xmlObj.xml);
	//alert(xmlFile);

	var arrayNews = new Array();
	var j = 0;
	for(i=0; i < xmlObj.childNodes(0).childNodes.length; i++){
		//alert(xmlObj.childNodes(0).childNodes(i).text);
		//alert(xmlObj.childNodes(0).childNodes(i).getAttribute("dateExpire"));
		
		if(verificaPrazo(xmlObj.childNodes(0).childNodes(i).getAttribute("dateExpire"), lang)){
			//alert(xmlObj.childNodes(0).childNodes(i).text);
			//arrayNews[j] = '<nobr align="center" class=tabb><a target="_self" class=tabb href="http://javascripts.vbarsan.com/">Dhtml Vertical Scroller 7.0 + Dhtml Horizontal Scroller 7.0 + Dhtml Typewriter Scroller 5.0</a></nobr>';
			arrayNews[j] = "<nobr align='center' class='tabb'><a class='lCSS' target='_self' href='"+xmlObj.childNodes(1).childNodes(0).text+"'>"+ xmlObj.childNodes(0).childNodes(i).text + "</a></nobr>";
			//alert("s");
			j++;
		}
	}
	
	if(j == 0)
	{
		arrayNews[0] = "";
	}
		
	return arrayNews;
	//alert(xmlObj.childNodes(1).childNodes(0).text);
}



function verificaPrazo(dateStr, lang){
	dataActual = new Date()
	
	if(lang == 'pt'){
		dia = dateStr.substring(0,dateStr.indexOf("-"));
		mes = dateStr.substring((dateStr.indexOf("-")+1),dateStr.lastIndexOf("-"));
		ano = dateStr.substring((dateStr.lastIndexOf("-")+1),dateStr.length);
	}else{
		mes = dateStr.substring(0,dateStr.indexOf("/"));
		dia = dateStr.substring((dateStr.indexOf("/")+1),dateStr.lastIndexOf("/"));
		ano = dateStr.substring((dateStr.lastIndexOf("/")+1),dateStr.length);
	}
	
	dataExpiraF = Date.UTC(ano, mes, dia, 0, 0, 0);
	dataActualF = Date.UTC(dataActual.getFullYear(), dataActual.getMonth()+1, dataActual.getDate(),0,0,0);
	
	if(dataActualF <= dataExpiraF)
		return true;
	return false;	
}




var swidth=360;

//scroller's height
var sheight=20;

//scroller's speed 
var sspeed=4;
var restart=sspeed;
var rspeed=sspeed;

//scroller's pause 
var spause=0;

//scroller's background
var sbcolor="#ffffff";

var singletext;


var ii=0;
function goup(){
	if(sspeed!=rspeed*16){
		sspeed=sspeed*2;restart=sspeed;
	}
}

function godown(){
	if(sspeed>rspeed){
		sspeed=sspeed/2;restart=sspeed;
	}
}

//Obsolete 2008-11-21
function start(xmlFile,lang){


	//singletext=getValue(xmlFile,lang);
	//if(document.getElementById){
	//	ns6div=document.getElementById('iens6div');ns6div.style.left=swidth;ns6div.innerHTML=singletext[0];sizeup=ns6div.offsetWidth;ns6scroll();}
	//else 
	//if(document.layers){
	//	ns4layer=document.ns4div.document.ns4div1;ns4layer.left=swidth;ns4layer.document.write(singletext[0]);ns4layer.document.close();sizeup=ns4layer.document.width;ns4scroll();}
	//else 
	//if(document.all){
	//	iediv=iens6div;iediv.style.pixelLeft=swidth;iediv.innerHTML=singletext[0];sizeup=iediv.offsetWidth;iescroll();
	//}
}
		
function iescroll(){
	if(iediv.style.pixelLeft>0&&iediv.style.pixelLeft<=sspeed){
		iediv.style.pixelLeft=0;setTimeout("iescroll()",spause);
	}else 
	if(iediv.style.pixelLeft>=sizeup*-1){
		iediv.style.pixelLeft-=sspeed;setTimeout("iescroll()",100);
	}
	else{
		if(ii==singletext.length-1)
		ii=0;
		else 
		ii++;iediv.style.pixelLeft=swidth;iediv.innerHTML=singletext[ii];sizeup=iediv.offsetWidth;iescroll();
	}
}
function ns4scroll(){
	if(ns4layer.left>0&&ns4layer.left<=sspeed){ns4layer.left=0;setTimeout("ns4scroll()",spause);}else 
	if(ns4layer.left>=sizeup*-1){ns4layer.left-=sspeed;setTimeout("ns4scroll()",100);}else{if(ii==singletext.length-1)ii=0;else ii++;ns4layer.left=swidth;ns4layer.document.write(singletext[ii]);ns4layer.document.close();sizeup=ns4layer.document.width;ns4scroll();
	}
}

function ns6scroll(){
	if(parseInt(ns6div.style.left)>0&&parseInt(ns6div.style.left)<=sspeed){ns6div.style.left=0;setTimeout("ns6scroll()",spause);}else if(parseInt(ns6div.style.left)>=sizeup*-1){ns6div.style.left=parseInt(ns6div.style.left)-sspeed;setTimeout("ns6scroll()",100);}
	else{if(ii==singletext.length-1)ii=0;else ii++;
	ns6div.style.left=swidth;ns6div.innerHTML=singletext[ii];sizeup=ns6div.offsetWidth;ns6scroll();
	}
}