<!--
// Testo scorrevole verticale
// *********************************************************** /
// *********************************************************** /
// This script and many more are available free online at -->
// The JavaScript Source!! http://javascript.internet.com -->

//slider's width
var swidth=404
if (document.layers)	swidth=120

//slider's height
var sheight=70

//slider's speed
var sspeed=2

var t=100;

pStyle = ""
pTop = ".top"

if (singletext.length > 1)	cSc=1
else	cSc=0


function start(){
	if (document.layers){
		scrollObj = "document.scrollArea.document.scrollBox"
		eval(scrollObj + pStyle + ".visibility='show'")
	}else{
		scrollObj = "document.getElementById('scrollBox')"
		pStyle = ".style"
		if (document.all){	scrollBox; pTop=".pixelTop";}
	}
	
	eval(scrollObj + pStyle + ".top=" + sheight)
	scrollFunction(scrollObj)
	}
	
	pref="img/";
	browver= parseInt(navigator.appVersion);
	browtype = navigator.appName;
	browsertype = "old";
	if (browtype == "Netscape" && !(browver < 3)) {
	browsertype = "new";
	}
	if (browtype == "Microsoft Internet Explorer" && !(browver < 4)) {
	browsertype = "new";
	}
	if (browsertype == "new") {
	thetimer = setTimeout("changeimage2()", 1);
	banneradcode = 0;
	
	}
	
	
	
	/*
		function changeimage(){
		
		if (browsertype == "new") {
			changeimage2();
		}
		else if (browsertype == "old") {
		}
		}
	*/	
	function changeimage2(){
			n=7;
			a=0;
			k=0;
			j=0;
			pref="img/";
			if (browsertype == "new") {
			
				a=Math.round((Math.random(n)*100)%n);
				k=Math.round((Math.random(n)*100)%n);
				j=Math.round((Math.random(n)*100)%n);

				banneradcode = a;
				banneradcode2 = k;
				banneradcode3 = j;
				imagesource = pref+"banner_" + a + ".gif";
				imagesource2 = pref+"banner_" + k + ".gif";
				imagesource3 = pref+"banner_" + j + ".gif";
				if (a<n && k<n && j<n){
					if (imagesource!=imagesource2 && imagesource!=imagesource3 && imagesource2!=imagesource3){
						var imgobj1 = document.images["bannerad"]
						var imgobj2 = document.images["bannerad2"]
						var imgobj3 = document.images["bannerad3"]
						/*
						alert(document)
						alert(imgobj1)
						alert(imgobj2)
						alert(imgobj3)*/
						
						if((!imgobj1) || (!imgobj2) || (!imgobj3)){
							/*window.status = "NON ESISTE"*/
							setTimeout("changeimage2()",100)
							return;
						}
						
						
						if(imgobj1)	imgobj1.src = imagesource;
						if(imgobj2)	imgobj2.src = imagesource2;
						if(imgobj3)	imgobj3.src = imagesource3;
						thetimer = setTimeout("changeimage2()",5000);
					}else{
						changeimage2();
					}
				}else{
					changeimage2();
				}
			}
			else if (browsertype == "old") {
			
			}
	}
		
		function changepage() {
			var locat = new Array("http://www.edisonenergia.it","http://www.aem.it/home/cms/aem/index.html","http://www.enipower.it","http://www.ridef.polimi.it","http://www.staffettaonline.com/sq","http://www.espansione-energia.it","http://www.alpenergie.it");
			window.open (locat[banneradcode]);
		}
		function changepage2() {
			var locat2 = new Array("http://www.edisonenergia.it","http://www.aem.it/home/cms/aem/index.html","http://www.enipower.it","http://www.ridef.polimi.it","http://www.staffettaonline.com/sq","http://www.espansione-energia.it","http://www.alpenergie.it");
			window.open (locat2[banneradcode2]);
		}
		function changepage3() {
			var locat3 = new Array("http://www.edisonenergia.it","http://www.aem.it/home/cms/aem/index.html","http://www.enipower.it","http://www.ridef.polimi.it","http://www.staffettaonline.com/sq","http://www.espansione-energia.it","http://www.alpenergie.it");
			window.open (locat3[banneradcode3]);
		}

function scrollFunction(scrollObj){
	pos = parseInt(eval(scrollObj + pStyle + pTop))
	t=100;
	if (pos>0 && pos<=sspeed){
		t=3000;
		eval(scrollObj + pStyle + pTop + "=0")
		setTimeout("scrollFunction(scrollObj)",t)
		return false;
	}
	
	if (pos >= sheight*-1){
		eval(scrollObj + pStyle + pTop + "=" + (pos-sspeed))
		setTimeout("scrollFunction(scrollObj)",t)
	}else{
		eval(scrollObj + pStyle + pTop + "=" + sheight)
		scrollObj = eval(scrollObj)
		if (document.layers){
			scrollObj.document.write(singletext[cSc])
			scrollObj.document.close()
		}else{
			scrollObj.innerHTML = singletext[cSc]
		}
		
		if (cSc < singletext.length-1)	cSc++
		else cSc=0
		setTimeout("scrollFunction(scrollObj)",t)
	}

}
// *********************************************************** /
// *********************************************************** /
//-->