// Agenda
// Eric Quillévéré 2008

// Récupère les infos
/*jsl:import 1-effets.js */
/*jsl:import divers.js */
agenda_init();
var numAgenda=-1;
var tabAgenda=Array();

evenementCree(window, Array('load'), agenda_init);

function agenda_init()
	{
	// Teste si l'objet est dispo
	var img=objet_Renvoie('agendaBretagne');
	if (img)
		{
		AJAX_Appel({'page':'/styles/3myl_promenu/theme/bretagne/php/agenda.php', 
			'paramsEntree':Array('liste'), 
			'opt_fonctionRetour':agenda_AJAX, 'opt_asynchrone':true} );
			}
	}

function agenda_AJAX(reponse)
	{
	// tabAgenda doit contenir  un tableau indicé contenant des tableaux associatifs (image, titre et lien)
	eval(reponse);
	try {eval(reponse);	}
	catch(e) {return;}
	agenda_Affiche();
	}
	
// Affichage de l'agenda
function agenda_Affiche()
	{
	var div=objet_Renvoie('agendaBretagne');

	// Affichage
	if (div && tabAgenda.length>0)
		{
		if (numAgenda==-1) 
			{
			// 1er affichage
			numAgenda=0;
			agenda_AfficheTxt();
			}
		else
			new Effet('agendaBretagne2', 'Progressif', Array(0,10),null, agenda_AfficheTxt);
		}
	}
	
// Affichage immédiat
function agenda_AfficheTxt()
	{
	var img=objet_Renvoie('agendaImg');
	var texte=objet_Renvoie('agendaCoteDroit');
	
	if (img && texte && tabAgenda.length>0)
		{
		if (numAgenda>=tabAgenda.length) numAgenda=0;
		texte.innerHTML="<b>" + tabAgenda[numAgenda]['date'] + '</b> : ' +tabAgenda[numAgenda]['titre'];
		img.style.visibility='hidden';
		
		var lien=tabAgenda[numAgenda]['lien'];
		img.onload=function()
			{
			new Effet('agendaBretagne2', 'Progressif', Array(1,10),null,
				function()
					{setTimeout(agenda_Affiche,5000);});
			img.onclick=function(){ document.location.href=lien;};
			texte.onclick=function(){ document.location.href=lien;};
			img.style.cursor='pointer';
			texte.style.cursor='pointer';
			this.style.visibility='visible';
			};
		img.src=tabAgenda[numAgenda]['image'];
		numAgenda++;
		}
	}