function compruebanumero(valor){
	x=valor/2
	if ((!x)&&(x!="0")) 
		{
		return ""
		}else{
		return Math.floor(valor)	}
}
function calcular(ano){
	ano = compruebanumero(ano) 
	if (ano == "")		{
			alert("Debes introducir un número")
		}else{
			if (ano <326 | ano>2599)
			{	alert("El cálculo es sólo para años entre 326 y 2599");
			}else{
			if (ano>=326 && ano<=1582){m=15;n=6}
			if (ano>=1583 && ano<=1699){m=22;n=2}
			if (ano>=1700 && ano<=1799){m=23;n=3}
			if (ano>=1800 && ano<=1899){m=23;n=4}
			if (ano>=1900 && ano<=2099){m=24;n=5}
			if (ano>=2100 && ano<=2199){m=24;n=6}
			if (ano>=2200 && ano<=2299){m=25;n=0}
			if (ano>=2300 && ano<=2399){m=26;n=1}
			if (ano>=2400 && ano<=2499){m=25;n=1}
			if (ano>=2500 && ano<=2599){m=26;n=2}			
			a=ano%19; b=ano%4; c=ano%7;
			d=((19*a)+m)%30; e=((2*b)+(4*c)+(6*d)+n)%7
			f=d+e
			if (f<=9)	{
				dia=d+e+22;mes="Marzo";mespascua=mes
				//if (d==29 & e==6){dia=dia-7}     //Dicen que existen dos excepciones, pero yo las he desactivado por si acaso
				//if (d==28 & a>10){dia=dia-7}     //Dicen que existen dos excepciones, pero yo las he desactivado por si acaso
			}else{
				dia=d+e-9;mes="Abril";mespascua=mes
				//if (d==29 & e==6){dia=dia-7}     //Dicen que existen dos excepciones, pero yo las he desactivado por si acaso
				//if (d==28 & a>10){dia=dia-7}     //Dicen que existen dos excepciones, pero yo las he desactivado por si acaso
			}
				muestra(dia, mes, ano);
}}}
function muestra(dia, mes, ano)
{
if (dia<8){mes="Marzo y Abril"}
a='<div align="center"><table border="5" cellspacing="1" bgcolor="#ffffcc" style="margin-top:70px">'
a+='<tr><td colspan="7" bgcolor="#500050" align="center" style="color:#FFFF00; font-weight:bold; font-size:16px;">' + mes + ' de ' + ano + '</td></tr><tr>'
a+='<td class="semana">Lunes</td><td class="semana">Martes</td><td class="semana">Miércoles</td><td class="semana">Jueves</td>'
a+='<td class="semana">Viernes</td><td class="semana">Sábado</td><td class="semana">Domingo</td></tr><tr>'

x=Math.floor(dia/7); y=x*7; x=dia-y; y=7-x;
casilla=new Array(42);
conta=1;
ramos='<br /><span style="color:#500050">Domingo de<br>Ramos'; lunes='<br /><span style="color:#500050">Lunes<br />Santo';
martes='<br /><span style="color:#500050">Martes<br>Santo'; miercoles='<br /><span style="color:#500050">Miércoles<br>Santo';
jueves='<br /><span style="color:#500050">Jueves<br>Santo'; viernes='<br /><span style="color:#500050">Viernes<br>Santo';
sabado='<br /><span style="color:#500050">Sábado<br>Santo'; resurreccion='<br /><span style="color:#500050">Domingo de<br>Resurrección';
for (conta;conta<43;conta++) {casilla[conta]="&nbsp;"}
if (y==7){y=0};conta=y+1
if (mes=="Marzo"){diasmes=31}else{diasmes=30}
for (conta;conta<diasmes+1+y;conta++) {casilla[conta]=conta-y}
if (dia<8){
	s=1;
	for (s;s<7;s++){
		a+='<td height="50" class="dia" valign="top">'+(24-7+dia+s)+'</td>'}
		a+='<td height="50" class="santa" valign="top">'+(24-7+dia+7)+ramos+'</td>'
	a+='</tr><tr>'
	s=1;m=7-dia
	for (s;s<m+1;s++){
		casilla[s]=(31-m+s);
		if (s==1){casilla[1]=casilla[1]+lunes+'</td>'}
		if (s==2){casilla[2]=casilla[2]+martes+'</td>'}
		if (s==3){casilla[3]=casilla[3]+miercoles+'</td>'}
		if (s==4){casilla[4]=casilla[4]+jueves+'</td>'}
		if (s==5){casilla[5]=casilla[5]+viernes+'</td>'}
		if (s==6){casilla[6]=casilla[6]+sabado+'</td>'}
	}	
}
cuenta=1;cantidad=43
if (casilla[36]=="&nbsp;"&&casilla[37]=="&nbsp;"&&casilla[38]=="&nbsp;"&&casilla[39]=="&nbsp;"&&casilla[40]=="&nbsp;"&&casilla[41]=="&nbsp;"&&casilla[42]=="&nbsp;")
	{cantidad=36}
for (cuenta;cuenta<cantidad;cuenta++){
	if (casilla[cuenta]==dia){a+='<td height="50" class="santa" valign="top">'+casilla[cuenta]+resurreccion+'</td>'}
	else{ if (casilla[cuenta]==dia-1){a+='<td height="50" class="santa" valign="top">'+casilla[cuenta]+sabado+'</td>'}
	else{ if (casilla[cuenta]==dia-2){a+='<td height="50" class="santa" valign="top">'+casilla[cuenta]+viernes+'</td>'}
	else{ if (casilla[cuenta]==dia-3){a+='<td height="50" class="santa" valign="top">'+casilla[cuenta]+jueves+'</td>'}
	else{ if (casilla[cuenta]==dia-4){a+='<td height="50" class="santa" valign="top">'+casilla[cuenta]+miercoles+'</td>'}
	else{ if (casilla[cuenta]==dia-5){a+='<td height="50" class="santa" valign="top">'+casilla[cuenta]+martes+'</td>'}
	else{ if (casilla[cuenta]==dia-6){a+='<td height="50" class="santa" valign="top">'+casilla[cuenta]+lunes+'</td>'}
	else{ if (casilla[cuenta]==dia-7){a+='<td height="50" class="santa" valign="top">'+casilla[cuenta]+ramos+'</td>'}
	else{ if (casilla[cuenta].length>6){a+='<td height="50" class="santa" valign="top">'+casilla[cuenta]}
	else{a+='<td height="50" class="dia" valign="top">'+casilla[cuenta]+'</td>'}}}}}}}}}
	if (cuenta==7|cuenta==14|cuenta==21|cuenta==28|cuenta==35){a=a+'</tr><tr>'}
}
a+='</tr></table></div>'//</body></html>'
//document.close();
//document.write(a);
//document.write('<p align="center"><font color="#FFFF00" face="Verdana">')
a+='<p align="center"><font color="#0000ff" face="Verdana">'
if (mespascua=="Marzo"){mes="03"}
if (mespascua=="Abril"){mes="04"}
if (dia<10){dia='0'+dia}
fechacompleta = dia+'/'+mes+'/'+ano
incremento = -46  //Miércoles de Ceniza
diaobtenido = recalcF1(fechacompleta, incremento)
a+=diaobtenido+' : Miércoles de Ceniza';
incremento = 42  //Domingo de Ascensión
diaobtenido = recalcF1(fechacompleta, incremento)
a+='<br>'+diaobtenido+' : Domingo de Ascensión';
incremento = 49  //Domingo de Pascua de Pentecostés
diaobtenido = recalcF1(fechacompleta, incremento)
a+='<br>'+diaobtenido+' : Domingo de Pascua de Pentecostés';
incremento = 63  //Corpus Christi
diaobtenido = recalcF1(fechacompleta, incremento)
a+='<br>'+diaobtenido+' : Domingo Corpus Christi';
incremento = 77  //Sagrado Corazón de Jesús
diaobtenido = recalcF1(fechacompleta, incremento)
a+='<br>'+diaobtenido+' : Domingo Sagrado Corazón de Jesús';
//document.close();
document.getElementById("contenido").innerHTML=a;
}