
var fuente=5;var fondo="#ffffc0";var fondodiahoy="#c0c000";var fondosabado="#66eeff";var fondodomingo="#bbbb99";var textonormal="black";var fiesta="red";var domingo="#0000ff";var sabado="#009000";var mayoranio=2012;var meses=new Array;var dias=new Array;var festivos=new Array;var santos=new Array;meses[0]="Enero";meses[1]="Febrero";meses[2]="Marzo";meses[3]="Abril";meses[4]="Mayo";meses[5]="Junio";meses[6]="Julio";meses[7]="Agosto";meses[8]="Septiembre";meses[9]="Octubre";meses[10]="Noviembre";meses[11]="Diciembre";dias[1]="Lun";dias[2]="Mar";dias[3]="Mie";dias[4]="Jue";dias[5]="Vie";dias[6]="Sab";dias[7]="Dom";santos[1]="Año Nuevo";santos[2]="Toma de Granada";santos[3]="Epifanía del Señor";santos[4]="Día de Andalucía";santos[5]="Jueves Santo";santos[6]="Viernes Santo";santos[7]="Fiesta del Trabajo";santos[8]="Festividad del Corpus Christi";santos[9]="Asunción de la Virgen";santos[10]="Fiesta Nacional de España";santos[11]="Todos los Santos";santos[12]="Día de la Constitución Española";santos[13]="La Inmaculada Concepción";santos[14]="Natividad del Señor";function cargafestivos(anio){festivos[1]="1/1/"+anio;festivos[2]="2/1/"+anio;festivos[3]="6/1/"+anio;festivos[4]="28/2/"+anio;festivos[5]="1/1/"+anio;festivos[6]="1/1/"+anio;festivos[7]="1/5/"+anio;festivos[8]="1/1/"+anio;festivos[9]="15/8/"+anio;festivos[10]="12/10/"+anio;festivos[11]="1/11/"+anio;festivos[12]="6/12/"+anio;festivos[13]="8/12/"+anio;festivos[14]="25/12/"+anio;if(anio==2004){festivos[5]="8/4/"+anio;festivos[6]="9/4/"+anio;festivos[8]="10/6/"+anio;festivos[9]="16/8/"+anio;}
if(anio==2005){festivos[2]="15/9/"+anio;festivos[5]="24/3/"+anio;festivos[6]="25/3/"+anio;festivos[8]="26/5/"+anio;festivos[7]="2/5/"+anio;festivos[14]="26/12/"+anio;}
if(anio==2006){festivos[1]="15/9/"+anio;festivos[5]="13/4/"+anio;festivos[6]="14/4/"+anio;festivos[8]="15/6/"+anio;}
if(anio==2007){festivos[5]="5/4/"+anio;festivos[6]="6/4/"+anio;festivos[8]="7/6/"+anio;}
if(anio==2008){festivos[3]="7/1/"+anio;festivos[5]="20/3/"+anio;festivos[6]="21/3/"+anio;festivos[8]="22/5/"+anio;festivos[10]="13/10/"+anio;}
if(anio==2009){festivos[8]="11/6/"+anio;festivos[5]="9/4/"+anio;festivos[6]="10/4/"+anio;festivos[12]="7/12/"+anio;festivos[11]="2/11/"+anio;}
if(anio==2010){festivos[8]="3/6/"+anio;festivos[4]="1/3/"+anio;festivos[5]="1/4/"+anio;festivos[6]="2/4/"+anio;festivos[9]="16/8/"+anio;}
if(anio==2011){santos[2]="Virgen de las Angustias";festivos[2]="15/9/"+anio;festivos[8]="23/6/"+anio;festivos[7]="2/5/"+anio;festivos[5]="21/4/"+anio;festivos[6]="22/4/"+anio;festivos[14]="26/12/"+anio;}
if(anio==2012){santos[2]="Virgen de las Angustias";festivos[2]="15/9/"+anio;festivos[1]="2/1/"+anio;festivos[5]="5/4/"+anio;festivos[6]="6/4/"+anio;festivos[8]="7/6/"+anio;}}
function numerodedias(mth,yr){if(mth==3||mth==5||mth==8||mth==10)return 30;else if((mth==1)&&bisiesto(yr))return 29;else if(mth==1)return 28;else return 31;}
function bisiesto(yr){if(((yr%4==0)&&yr%100!=0)||yr%400==0)return true;else return false;}
function vercolor(hoy,dia,mes,semana,anio){var sal=""
var colfondo=fondo;var coltexto=textonormal;var esfiesta=false;var diaese=dia+"/"+mes+"/"+anio;if(semana==7){coltexto=domingo;colfondo=fondodomingo;}
if(semana==6){coltexto=sabado;colfondo=fondosabado;}
if(hoy==dia){colfondo=fondodiahoy;}
sal=sal+"<TD ALIGN=CENTER bgcolor="+colfondo+">";var infodia="<FONT SIZE="+fuente+" COLOR="+coltexto+">"+dia+"<font>";for(var x=1;x<15;x++){if(diaese==festivos[x]){coltexto=fiesta;infodia="<a href='#' title='"+santos[x]+"'><FONT SIZE="+fuente+" COLOR="+fiesta+">"+dia+"<font></a>";esfiesta=true;}}
return sal+infodia+"</td>";}
function leyenda(){var sal="";sal=sal+"<center><font color="+fiesta+"> Festivo </font> ";sal=sal+"<font color="+domingo+"> Domingo </font> ";sal=sal+"<font color="+sabado+"> Sábado </font> ";sal=sal+"<font color="+textonormal+"> Laborable </font><br>";sal=sal+"(<a href=\"/calendario.htm\">Calendario 2003-"+mayoranio+"</a>) ";sal=sal+"(<a href=\"/calendario2001-2003.htm\">Calendario 2001-2003</a>) ";sal=sal+"(<a href=\"javascript:history.back()\">Volver</a>) ";sal=sal+"(<a href='http://www.granada.org'>Inicio</a>) ";return sal+"(<a href='/calendario2012.pdf'>Imprimir</a>)</center>";}
function calendario(midia,delmes,anio){var sc=""
var valordia="&nbsp;";var colfondo;mo=delmes-1;primerdia=new Date(anio,mo,1);dy=primerdia.getDay();if(dy==0){dy=7}
ultimodia=numerodedias(mo,anio);sc=sc+"<TABLE BORDER=2 ALIGN=CENTER><TR><TD ALIGN=CENTER COLSPAN=7 BGCOLOR="+fondo+">";sc=sc+"<FONT SIZE="+fuente+" COLOR="+textonormal+">"+meses[mo]+" "+anio+"</FONT></TD></TR>";texto=textonormal;for(i=1;i<8;i++)sc=sc+"<TD ALIGN=CENTER BGCOLOR="+fondo+"><FONT SIZE=3 COLOR="+texto+">"+dias[i]+"</FONT></TD>";sc=sc+"</TR><TR>";ctr=0;for(i=1;i<8;i++){if(i>=dy){ctr++;sc=sc+vercolor(midia,ctr,delmes,i,anio);}else sc=sc+"<td>&nbsp;</td>";}
sc=sc+"</TR><TR>";while(ctr<ultimodia){for(i=1;i<8;i++){ctr++;if(ctr>ultimodia)sc=sc+"<td>&nbsp;</td>"
else sc=sc+vercolor(midia,ctr,delmes,i,anio);}
sc=sc+"</TR><TR>";}
return sc+"</TR></TABLE>";}
function piecalendario(){document.write("<center><table border=0 style='border: solid 1px #000000;'>");for(var j=mayoranio;j>2002;j--){document.write("<tr><td><a href=\"javascript:todos("+j+");\"><b>"+j+"</b></a>&nbsp;<td>");for(var i=1;i<13;i++){document.write("&nbsp;<a href=\"javascript:solomes(0,"+i+","+j+");\">"+meses[i-1]+"</a>&nbsp;");}
document.write("</td></tr>");}
document.write("</table><table cellpadding=10 border=0><form><tr><td valign=top>");document.write("Calendario de:<select name='queanio' class='stxt'>");for(var j=mayoranio;j>2002;j--)document.write("<option value="+j+">"+j+"</option>");document.write("</select>&nbsp;<input type=button value='ver año completo' onclick='todos(queanio.value);' class='sbtn'></td></form>");document.write("<td><input type=button value='Este mes' onclick='estemes();' class='sbtn'></td>");document.write("<td><input type=button value='Volver' onclick='history.back();' class='sbtn'></td>");document.write("<td><input type=button value='Imprimir' onclick='window.open(\"/calendario2012.pdf\")' class='sbtn'></tr></table>");pie();}
function estemes2(){var sal="";fuente=fuente+2;diahoy=new Date();var mianio=diahoy.getYear();if(mianio<1900)mianio=mianio+1900;mimes=diahoy.getMonth()+1;midia=diahoy.getDate();cargafestivos(mianio);sal=calendario(midia,mimes,mianio);fuente=fuente-2;return sal+PrevPost(mimes,mianio);}
function solomes(midia,mimes,mianio){document.getElementById("misdatos").innerHTML=unmes(midia,mimes,mianio)+PrevPost(mimes,mianio);}
function PrevPost(mimes,mianio){var salida='<br><table border=0 style="border: solid 1px #000000;" align=center><tr><td width=35%>'
var mes0=mimes-1;var anio0=mianio;if(mes0<1){anio0=mianio-1;mes0=12;}
salida=salida+"<input type=button value='Mes Anterior ("+mes0+"/"+anio0+")' onclick='solomes(0,"+mes0+","+anio0+");' class='sbtn'>";salida=salida+"</td><td align=center width=30%>"+mimes+"/"+mianio+"</td><td align=right>";anio0=mianio;mes0=mimes+1;if(mes0>12){mes0=1;anio0=mianio+1;}
salida=salida+"<input type=button value='Mes Siguiente ("+mes0+"/"+anio0+")' onclick='solomes(0,"+mes0+","+anio0+");' class='sbtn'>";return salida+"</td></tr></table><br>";}
function unmes(midia,mimes,mianio){var sal="";fuente=fuente+2;diahoy=new Date();cargafestivos(mianio);sal=calendario(midia,mimes,mianio);fuente=fuente-2;return sal}
function unanio(ejercio){cargafestivos(ejercio);var sal="<center><table><tr align=center><td colspan=3>"
sal=sal+"<FONT face=Arial color=#003399 size=4>Calendario para "+ejercio+"</font></td></tr><tr valign=top>";for(var j=1;j<13;j++){sal=sal+"<td>"+calendario(0,j,ejercio)+"</td>";if(j%3==0)sal=sal+"</tr><tr valign=top>";}
return sal+"<td colspan=3>"+leyenda()+"</td></tr></table></center>";}
function todos(ejercio){document.getElementById("misdatos").innerHTML=unanio(ejercio);}
function estemes(){document.getElementById("misdatos").innerHTML=estemes2();}
function printanio(ejercio){fuente=7
cargafestivos(ejercio);var sal="<center><table><tr align=center><td colspan=3>"
sal=sal+"<FONT face=Arial color=#003399 size=4>Calendario para "+ejercio+"</font></td></tr><tr valign=top>";for(var j=1;j<13;j++){sal=sal+"<td>"+calendario(0,j,ejercio)+"</td>";if(j%3==0)sal=sal+"</tr><tr valign=top>";}
return sal+"</td></tr></table></center>";}
