
n_info = 0;
function is_array(variable) {
   var source = variable.toSource();
   return (source.search(/^\[([^,]*,)+[^,]*\]/) != -1);
}

function init_actu(div_id, actu_larg, actu_long, actu_top) {
	switch (browser)
	{
	   case 'ie4':
	   		div = eval('document.all.' + div_id);
		  break;
	   case 'gecko':
	   	   div = document.getElementById(div_id);
		  break;
	}
	multiplic = 1;
	div.style.top =  actu_top;
	div.style.clip = "rect(1px, "+actu_larg + ", "+ actu_long + ", 0px)";
}
function reinit_actu(div_id, actu_larg, actu_long, actu_top, defil_coef) {
	switch (browser)
	{
	   case 'ie4':
	   		div = eval('document.all.' + div_id );
		  break;
	   case 'gecko':
	   		div = document.getElementById(div_id);
		  break;
	}
	div.innerHTML = '';
	div.style.top =  eval(parseInt(div.style.top) + 120*defil_coef) + "px";
	div.style.clip = "rect(1px, "+actu_larg + ", "+ actu_long + ", 0px)";
}
function actu_d(div_id, actu_larg, actu_long, actu_top, tab, num_info, nbr_info, defil_coef){
	init_actu(div_id, actu_larg, actu_long, actu_top);
	write_news(div_id, actu_larg, actu_long, actu_top, tab, num_info, nbr_info, defil_coef);
	num_info++;
	
	
	var tab2 = new Array();
	tab2 = tab.toSource();
	cmd = 'write_news(\'' + div_id + '\', \'' + actu_larg + '\', \'' + actu_long + '\', \'' + actu_top + '\', ' + tab2 + ', \'' + num_info++ + '\', \'' + nbr_info + '\', \'' + defil_coef +'\')';
    
	interval = setInterval(cmd, 8300 + 300 * defil_coef);
	

}

function write_news(div_id, actu_larg, actu_long, actu_top, tab, num_info, nbr_info, defil_coef)
{ 
	
	
	switch (browser)
			{
			  case 'ie4':
					divname = eval('document.all.' + div_id);
				  break;
			   case 'gecko':
				  divname = document.getElementById(div_id);
				  break;
			}
	n = n_info++ % (nbr_info*2); 
	n= (n - (n %3))/3;
	divname.innerHTML = tab[n];
	coef = 20*defil_coef;
	cmd = 'defil_id(\'' +div_id + '\', ' + coef + ', 400)';
	//alert (defil_coef);
	if (defil_coef != 0)
	{
		setTimeout(cmd, 6000 );
		setTimeout(cmd, 6300 );
		setTimeout(cmd, 6600 );
		setTimeout(cmd, 6900 );
		setTimeout(cmd, 7200 );
		setTimeout(cmd, 7500 );
		}
	//cmd = "for(i=0; i<=6; i++) setInterval('defil_id(\'actu_defil_cont\')', i * 1000);";
	//timer_defil = setTimeout(cmd, 6000);
	cmd = 'reinit_actu(\'' +div_id + '\', \'' + actu_larg + '\', \'' + actu_long + '\', \'' + actu_top + '\', \'' + defil_coef +'\')';
	timer_act = setTimeout(cmd, 8000 + 300 * defil_coef);
}
