function CambiarMes (Siguiente)
{
	if (Siguiente) AgendaMes++; 
	else AgendaMes--;
	
	if (AgendaMes > 12)
	{	AgendaMes = 1;
		AgendaAnyo++;
	} else if (AgendaMes < 1)
	{	AgendaMes = 12;
		AgendaAnyo--;
	}
	AgendaDia = 0;
	ActoFil   = 0;
	ActoCol   = 0;
	CargarCalendario ();
}


function CargarCalendario ()
{
	var Ajax = new TAjax ();

	Ajax.onCargar =  onCargarCalendario;	
	Ajax.Vars ('Anyo', AgendaAnyo);
	Ajax.Vars ('Mes',  AgendaMes);
	Ajax.Cargar ('/fuentes/agendadias.php');
}


function CeldaConActo (Fila, Columna, Dia)
{
	var Etiqueta = document.getElementById (('F' + Fila) + Columna);
	
	if (Etiqueta)
	{	Etiqueta.innerHTML = '<a href="javascript:VerActos (' + Dia + ',' + Fila + ',' + Columna + ');">' + Dia + '</a>';
		Etiqueta.className = 'AgendaCeldaConActo';
	}
}


function CeldaSinActo (Fila, Columna, Dia)
{
	var Etiqueta = document.getElementById (('F' + Fila) + Columna);
	
	if (Etiqueta)
	{	Etiqueta.innerHTML = Dia;
		Etiqueta.className = 'AgendaCeldaSinActo';
	}
}


function CeldaVacia (Fila, Columna)
{	
	var Etiqueta = document.getElementById (('F' + Fila) + Columna);
	
	if (Etiqueta)
	{	Etiqueta.innerHTML = '&nbsp;';
		Etiqueta.className = 'AgendaCeldaVacia';
	}
}


function CargarPagina ()
{
	var Pars = '?Opc=' + Opc;
	
	window.location = '/index.php' + Pars;
}


function EnviarFormulario (Formulario)
{
	var Ajax = new TAjax ();

	if (ValidarFormulario (Formulario))
	{	Ajax.onCargar = onEnviarFormulario;
		Ajax.AddFormulario (Formulario);
		Ajax.Cargar ('/fuentes/enviarformulario.php');
	}
}


function FlashCatalogo ()
{
	document.write ('<object classid="clsid:d27cdb6e-ae6d-11cf-96b8-444553540000"');
	document.write ('codebase="http://fpdownload.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=8,0,0,0"');
	document.write ('width="790" height="350" id="catalogo" align="middle">');
	document.write ('<param name="allowScriptAccess" value="sameDomain" />');
	document.write ('<param name="movie" value="swf/catalogo.swf" /><param name="quality" value="high" />');
	document.write ('<param name="wmode" value="transparent" /><param name="bgcolor" value="#ffffff" />');
	document.write ('<embed src="swf/catalogo.swf" quality="high" wmode="transparent" bgcolor="#ffffff" width="790" height="350"');	
	document.write ('name="catalogo" align="middle" allowScriptAccess="sameDomain" type="application/x-shockwave-flash"');	
	document.write ('pluginspage="http://www.macromedia.com/go/getflashplayer" />');
	document.write ('</object>');
}


function FlashHome ()
{
	document.write ('<object classid="clsid:d27cdb6e-ae6d-11cf-96b8-444553540000"');
	document.write ('codebase="http://fpdownload.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=8,0,0,0"');
	document.write ('width="790" height="340" id="home" align="middle">');
	document.write ('<param name="allowScriptAccess" value="sameDomain" /><param name="movie" value="swf/home.swf" />');
	document.write ('<param name="quality" value="high" /><param name="bgcolor" value="#ffffff" />');
	document.write ('<embed src="swf/home.swf" quality="high" bgcolor="#ffffff" width="790" height="340" name="home"');
	document.write ('align="middle" allowScriptAccess="sameDomain" type="application/x-shockwave-flash" pluginspage="http://www.macromedia.com/go/getflashplayer" />');
	document.write ('</object>');		
}


function FlashIntro ()
{
	document.write ('<object classid="clsid:d27cdb6e-ae6d-11cf-96b8-444553540000"');
	document.write ('codebase="http://fpdownload.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=8,0,0,0"');
	document.write (' width="790" height="600" id="intro" align="middle"><param name="allowScriptAccess" value="sameDomain" />');
	document.write ('<param name="movie" value="swf/intro.swf" /><param name="quality" value="high" /><param name="bgcolor" value="#ffffff" />');
	document.write ('<embed src="swf/intro.swf" quality="high" bgcolor="#ffffff" width="790" height="600" name="intro"');
	document.write ('align="middle" allowScriptAccess="sameDomain" type="application/x-shockwave-flash" pluginspage="http://www.macromedia.com/go/getflashplayer" />');
	document.write ('</object>');	
}


function FlashProducto1 ()
{
	document.write ('<object classid="clsid:d27cdb6e-ae6d-11cf-96b8-444553540000" ');
	document.write ('codebase="http://fpdownload.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=8,0,0,0"');
	document.write ('width="163" height="235" id="producto1" align="middle">');
	document.write ('<param name="allowScriptAccess" value="sameDomain" /><param name="movie" value="swf/producto1.swf" />');
	document.write ('<param name="quality" value="high" /><param name="bgcolor" value="#ffffff" />');
	document.write ('<embed src="swf/producto1.swf" quality="high" bgcolor="#ffffff" width="163" height="235" name="producto1" align="middle"');
	document.write ('allowScriptAccess="sameDomain" type="application/x-shockwave-flash" pluginspage="http://www.macromedia.com/go/getflashplayer" />');	
	document.write ('</object>');	
}


function Main (Opcion)
{
	Opc = Opcion;
	
	CargarPagina ();
}


function onCargarCalendario (Peticion)
{
	var Dias     = Array ();
	var Fecha    = new Date ();
	var DiaSem   = new Date (AgendaAnyo, AgendaMes - 1, 1).getDay ();
	var ultDia   = new Date (AgendaAnyo, AgendaMes, 0).getDate ();
	var Etiqueta = null;
	var Fila     = 1;
	var Dia      = 32;
	var d        = 0;
	var i        = 1;
	var m        = 1;
	var Hoy      = 0;
	var DiaActo  = 0;
	var FilaActo = 0;
	var ColActo  = 0;

	if (Peticion.asText ()) Dias = Peticion.asText ().split ("\n");
	if (Fecha.getFullYear () == AgendaAnyo && Fecha.getMonth () == AgendaMes - 1) Hoy = Fecha.getDate ();
	if (DiaSem == 0) DiaSem = 7;
	InHTML ('Mes', MesALetra (AgendaMes) + '&nbsp;' + AgendaAnyo);
	while (i < DiaSem) CeldaVacia (Fila, i++);
	if (d < Dias.length)
	{	Dia = Dias [d++];
		if (! DiaActo && (Dia >= Hoy || d == Dias.length))
		{	DiaActo  = Dia;
			FilaActo = 1;
			ColActo  = i;
		}
	}
	for (Fila = 1; Fila <= 6; Fila ++)
	{	while (i <= 7)
		{	if (m <= ultDia)
			{	if (m == Dia)
				{ CeldaConActo (Fila, i++, m++);
					if (d < Dias.length)
					{	Dia = Dias [d++];
						if (! DiaActo && (Dia >= Hoy || d == Dias.length)) DiaActo  = Dia;
					}	else Dia = 32;
					if (DiaActo && DiaActo == m - 1)
					{	FilaActo = Fila;
						ColActo  = i - 1;
					}
					if (Par3 && Par3 == m - 1)
					{	FilaActo = Fila;
						ColActo  = i - 1;
					}
				} else CeldaSinActo (Fila, i++, m++);
			}
			else CeldaVacia (Fila, i++);
		}
		i = 1;
	}

	if (Par3 > 0)
	{	VerActos (Par3, FilaActo, ColActo);
		Par3 = 0;
	}	else VerActos (DiaActo, FilaActo, ColActo);
}


function onEnviarFormulario (Peticion)
{
	Display ('idFormulario', 'none');
	Display ('idEnvioOK', 'block');
}


function onLoadMain ()
{
	var Opcion = Math.floor (Opc / 10) * 10;
	
	Clase ('Men-' + Opcion, 'Seleccionado');
}


function onVerActos (Peticion)
{
	InHTML ('InfoActos', Peticion.AsText ());
}


function VerActos (Dia, Fila, Columna)
{
	var Ajax     = new TAjax ();
	var Etiqueta = null;
	
	if (ActoFil && ActoCol) Clase (('F' + ActoFil) + ActoCol, 'AgendaCeldaConActo');
	
	ActoFil = Fila;
	ActoCol = Columna;
	Clase (('F' + ActoFil) + ActoCol, 'AgendaCeldaActiva');

	if (Dia > 0)
	{	if (AgendaDia != Dia)
		{	AgendaDia = Dia;
			Ajax.onCargar = onVerActos;	
			Ajax.Vars ('Anyo', AgendaAnyo);
			Ajax.Vars ('Mes',  AgendaMes);
			Ajax.Vars ('Dia',  AgendaDia);
			Ajax.Cargar ('/fuentes/informacionactos.php');
		}
	} else InHTML ('InfoActos', '');
}


function VerCalendario ()
{
	var Ventana = new TVentana ();

	Ventana.Ancho       = 520;
	Ventana.Alto        = 520;
	Ventana.Nombre      = 'Contacto';
	Ventana.URL         = '/fuentes/escuela.php';
	Ventana.Open (true);
}


function VerContacto ()
{
	var Ventana = new TVentana ();

	Ventana.Ancho       = 520;
	Ventana.Alto        = 520;
	Ventana.Nombre      = 'Contacto';
	Ventana.URL         = '/plantillas/contacto.html';
	Ventana.Open (true);
}


///////////////////////////////////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////////////////////////////////////


function IdentificarUsuario (Formulario)
{
	var Ajax = new TAjax ();
	
	if (Formulario.Usuario.value.Trim () && Formulario.Clave.value.Trim ())
	{	Ajax.onCargar = onIdentificarUsuario;
		Ajax.Vars ('Usuario', Formulario.Usuario.value.Trim ());
		Ajax.Vars ('Clave',   Formulario.Clave.value.Trim ());
		Ajax.Cargar ('/fuentes/identificarusuario.php');
	}
}

function onIdentificarUsuario (Peticion)
{
	var Result = Peticion.asText ();
	
	if (Result == 'CADUCADO') alert ("Su acceso a caducado.\nPor favor pongasé en contacto con nosotros.");
	else if (Result == 'NOUSUARIO') alert ('Código de usuario o contraseña incorrecto.');
	else if (Result = 'OK') window.location = '/fuentes/escuela.php';
}