// Event Calendar
// copyright Stephen Chapman, 10th June 2006, 22nd January 2010

var tb = 't'; // top or bottom (t or b)
var headbg = '#cccccc';  // table heading background colour
var todaybg = '#99cccc'; // current selected date background colour
var textclr = '#000000'; // text colour
var linkclr = '#ff9999'; // link text colour
var noMessage =  'No hay eventos el d&iacute;a de hoy'; // Mensaje a mostrar cuando no hay eventos

var dA = new Array(); var x = 0;
// first 8 characters in ccyymmdd format for single date events
// Utilizar 8 caractares OOaammdd para fechas únicas
// first 8 characters in 0000mmdd format for every year events
// Utilizar formato 0000mmdd para eventos que se repiten cada año.
// Enero=01, febrero=02, Marzo=03, Abril=04, Mayo=05, Junio=06, Julio=07, Agosto=08, Septiembre=09
// Octubre=10, Noviembre=11, Diciembre=12
dA[x++] = "00000101 A&ntilde;o nuevo";
dA[x++] = "00000118 D&iacute;a Nacional de los Guardaparques";
dA[x++] = "00000202 D&iacute;a Mundial de los Humedales";
dA[x++] = "00000214 D&iacute;a de la Energ&iacute;a";
dA[x++] = "00000305 D&iacute;a Mundial de la Eficiencia Energ&eacute;tica";
dA[x++] = "00000321 D&iacute;a de la Primavera y D&iacute;a Forestal Mundial";
dA[x++] = "00000322 D&iacute;a Mundial del Agua";
dA[x++] = "00000323 D&iacute;a Meteorol&oacute;gico Mundial";
dA[x++] = "00000322 D&iacute;a Nacional del Agua";
dA[x++] = "00000407 D&iacute;a Mundial de la Salud";
dA[x++] = "00000422 D&iacute;a Mundial de la Tierra";
dA[x++] = "00000424 D&iacute;a Mundial del animal de laboratorio";
dA[x++] = "00000429 D&iacute;a Mundial del Animal";
dA[x++] = "00000503 D&iacute;a Mundial del Sol";
dA[x++] = "00000504 D&iacute;a Internacional del Combatiente de Incendios Forestales";
dA[x++] = "00000509 D&iacute;a Internacional de las aves";
dA[x++] = "00000522 D&iacute;a Mundial de la Diversidad Biol&oacute;gica";
dA[x++] = "00000522 D&iacute;a Mundial sin tabaco";
dA[x++] = "00000605 D&iacute;a Mundial del Medio Ambiente";
dA[x++] = "00000607 D&iacute;a Mundial de la Conservaci&oacute;n del Suelo/ D&iacute;a Mundial del Aire Puro";
dA[x++] = "00000608 D&iacute;a Mundial de los Oceanos";
dA[x++] = "00000617 D&iacute;a de la lucha contra la desertificaci&oacute;n y la sequ&iacute;a";
dA[x++] = "00000622 D&iacute;a del Verano / D&iacute;a Mundial del Suelo y tierra f&eacute;rtil";
dA[x++] = "00000626 D&iacute;a Internacional de los Bosques Tropicales";
dA[x++] = "00000628 D&iacute;a del Mundial del &Aacute;rbol";
dA[x++] = "00000702 D&iacute;a de la Agricultura Nacional";
dA[x++] = "00000707 D&iacute;a de la Conservación del Suelo";
dA[x++] = "00000711 D&iacute;a Mundial de la Poblaci&oacute;n";
dA[x++] = "00000808 D&iacute;a Interamericano de la Calidad del Aire";
dA[x++] = "00000830 D&iacute;a Nacional del Tiburon Ballena";
dA[x++] = "00000915 Inicio de la lucha de independencia de M&eacute;xico";
dA[x++] = "00000916 D&iacute;a Internacional de la Protecci&oacute;n de la Capa de Ozono";
dA[x++] = "00000920 D&iacute;a Internacional de la Limpieza de Playas";
dA[x++] = "00000921 D&iacute;a del Oto&ntilde;o";
dA[x++] = "00000927 D&iacute;a Nacional de la Conciencia Ambiental";
dA[x++] = "00000929 D&iacute;a Mundial de los Mares";
dA[x++] = "00001001 D&iacute;a del Mar y de la Riqueza Pesquera";
dA[x++] = "00001002 D&iacute;a Interamericano del Agua";
dA[x++] = "00001004 D&iacute;a Mundial del H&aacute;bitat";
dA[x++] = "00001005 D&iacute;a Mundial de las Aves";
dA[x++] = "00001006 D&iacute;a Mundial de los Animales";
dA[x++] = "00001009 D&iacute;a del Guardaparque Nacional";
dA[x++] = "00001018 D&iacute;a de la Protecci&oacute;n a la Naturaleza";
dA[x++] = "00001025 D&iacute;a de la Acci&oacute;n Clim&aacute;tica";
dA[x++] = "00001028 Las Naciones Unidas Aprueban la Carta Mundial de la Naturaleza en 1982";
dA[x++] = "00001106 D&iacute;a de los Parques Nacionales y D&iacute;a Internacional para la Prevenci&oacute;n y Explotaci&oacute;n del Medio Ambiente durante Guerras y Conflictos Armados";
dA[x++] = "00001115 D&iacute;a Mundial del Reciclaje";
dA[x++] = "00001122 D&iacute;a de la Flor Nacional";
dA[x++] = "00001128 D&iacute;a de Acci&oacute;n Global contra la Basura y la incineraci&oacute;n";
dA[x++] = "00101129 Inauguración de la COP16 M&eacute;xico";
dA[x++] = "00101201 COP16 M&eacute;xico";
dA[x++] = "00101202 COP16 M&eacute;xico";
dA[x++] = "00101203 D&iacute;a Mundial del No Uso de Plaguicidas / COP16 M&eacute;xico";
dA[x++] = "00101204 COP16 M&eacute;xico";
dA[x++] = "00101205 COP16 M&eacute;xico";
dA[x++] = "00101206 COP16 M&eacute;xico";
dA[x++] = "00101207 COP16 M&eacute;xico";
dA[x++] = "00101208 COP16 M&eacute;xico";
dA[x++] = "00101209 COP16 M&eacute;xico";
dA[x++] = "00101210 COP16 M&eacute;xico";
dA[x++] = "00101215 Creaci&oacute;n del Programa de Naciones Unidas por el Medio Ambiente (PNUMA)";
dA[x++] = "00101222 D&iacute;a del Invierno";
dA[x++] = "00101229 D&iacute;a Internacional de la Diversidad Biol&oacute;gica";
// dA[x++] = "20060610 New Event Calendar Started today";

// permission is granted to use this javascript provided that the below code is not altered
var pageLoaded = 0; window.onload = function() {pageLoaded = 1;}
function loaded(i,f) {if (document.getElementById && document.getElementById(i) != null) f(); else if (!pageLoaded) setTimeout('loaded(\''+i+'\','+f+')',100);
}
function monthlength(month,year) {var dd = new Date(year, month, 0);return dd.getDate();}
var moy = ['Enero','Febrero','Marzo','Abril','Mayo','Junio','Julio','Agosto','Septiembre','Octubre','Noviembre','Diciembre'];var today = new Date();var selDate = today.getFullYear()+getmmdd(today.getMonth()+1,today.getDate());
function dispCal(yy,mm) {if (mm < 0 || mm > 12) {alert('month must be between 1 and 12'); return false;} if (yy != 0 && (yy < 1901 || yy > 2100)) {alert('year must be after 1900 and before 2101'); return false;} var dow = ['Dom','Lun','Mar','Mier','Jue','Vier','Sab']; var calendar = new Date();  var today = calendar.getDate(); calendar.setDate(1); if (yy > 1900) calendar.setFullYear(yy); if (mm > 0) calendar.setMonth(mm - 1); var yy = year = calendar.getFullYear(); var month = calendar.getMonth(); calendar.setDate(today); var weekday = calendar.getDay(); var daysInMonth = monthlength(month+1,year); var hilite_start = '<td width="30" style="background:' + todaybg + '" align="center"><b>'; var td_start = '<td width="30" align="center">'; var cal = '<div id="cal"><div style="border:1pt solid #cccccc;width:238px"><table border="0" cellspacing="0" cellpadding="2" align="center"><tr><td colspan="7" style="background:' + headbg + '" align="center"><b>' + moy[month]  + ' ' + year + '<\/b><\/td><\/tr><tr>'; for(dex=0; dex < 7; dex++) {cal += td_start + dow[dex] + '</td>';} cal += '<\/tr><tr>'; var day2 = today; for (dex = today; dex > 6; dex -=7) day2 = dex; weekday -= day2 - 1; while (weekday < 0) weekday += 7; for(dex=0; dex < weekday; dex++) cal += td_start + ' <\/td>'; for(dex=1; dex <= daysInMonth; dex++) {if(weekday == 7) {cal += '</tr><tr>'; weekday = 0;} if(selDate==year+getmmdd(month+1,dex)) cal += hilite_start +'<span '+clickDate(dex,month,year) + '>'+ dex + '<\/span><\/b><\/td>'; else cal += td_start + '<span '+clickDate(dex,month,year) + '>' + dex + '<\/span><\/td>'; weekday += 1;} for(dex=weekday; dex < 7; dex++) cal += td_start + ' <\/td>'; cal += '<\/tr><\/table><\/div>';if (document.getElementById) {var mmb = month;  mm = month + 1; var yya = yyb = yy; if (mmb <1) {mmb += 12; yyb--;} var mma = month + 2; if (mma > 12) {mma -= 12; yya++;} var yb = yy -1; var ya = yy +1; cal += '<table border="0" cellspacing="0" cellpadding="2" width="210"><tr><td><a href="#" onclick="if (cala = dispCal('+yb+','+mm+')) {document.getElementById(\'cal\').innerHTML = cala; return false;}"><<</a></td><td><a href="#" onclick="if (cala = dispCal('+yyb+','+mmb+')) {document.getElementById(\'cal\').innerHTML = cala; return false;}"><</a></td><td align="right"><a href="#" onclick="if (cala = dispCal('+yya+','+mma+')) {document.getElementById(\'cal\').innerHTML = cala; return false;}">></a></td><td align="right"><a href="#" onclick="if (cala = dispCal('+ya+','+mm+')) {document.getElementById(\'cal\').innerHTML = cala; return false;}">>></a></td></tr></table>';} else {cal += '<div> </div>';} cal += '</div>'; return cal;}
function start() {var x = '<div id="calDate" style="border:1pt solid #cccccc;width:238px"><\/div>'; var y = ''; if (tb == 't') y = x + dispCal(0,0); else y = dispCal(0,0) + x; document.getElementById('calendar').innerHTML = y; ev();}
loaded('calendar',start);
function clickDate(day, month, year) {var ct = nextDate(year + getmmdd(month+1,day));if (ct == '') ct = nextDate('0000' + getmmdd(month+1,day));if (ct == '') return 'style="color:'+textclr+'"'; else return 'style="cursor:pointer;color:'+linkclr+'" onclick="selDate = '+year+ getmmdd(month+1,day)+'; isDate(' + day + ',' + month + ',' + year + ');return false;"';}function isDate(dayVal,monthVal,yearVal) {var ct = nextDate(yearVal + getmmdd(monthVal+1,dayVal));if (ct == '') ct = nextDate('0000' + getmmdd(monthVal+1,dayVal));if (ct == '') ct = noMessage;document.getElementById('calDate').innerHTML = selDate + ':<br \/>' +ct; return false;}function nextDate(yymmdd) {var x = dA.length;for (var i = 0; i < x; i++) {if (dA[i].substr(0,8) == yymmdd) return dA[i].substr(8);}return '';}function getmmdd(mm,dd) {return (mm > 9 ? '' + mm : '0' + mm) + (dd > 9 ? dd : '0' + dd);}
function ev() {var ct = nextDate(selDate);var ct = nextDate(selDate);if (ct == '') ct = nextDate('0000' + selDate.substr(4));if (ct == '') ct = noMessage; document.getElementById('calDate').innerHTML = selDate + ':<br \/> ' +ct;}// JavaScript Document
