var tb = 'b'; // top or bottom (t or b)
var headbg = '#993333';  // table heading background colour
var todaybg = '#000000'; // fondo del dia actual
var textclr = '#cccccc'; // text colour
var linkclr = '#993333'; // link text colour
var noMessage =  '';// message to display when no entry in array
var dA = new Array(); var x = 0;
// first 8 characters in ccyymmdd format for single date events
// first 8 characters in 0000mmdd format for every year events
dA[x++] = "20070707 THE MISER - 07th July - France";
dA[x++] = "20070708 THE MISER - 08th July - France";
dA[x++] = "20070709 THE MISER - 09th July - France";
dA[x++] = "20070710 THE MISER - 10th July - France";
dA[x++] = "20070711 THE MISER - 11th July - France";
dA[x++] = "20070712 THE MISER - 12th July - France";
dA[x++] = "20070713 THE MISER - 13th July - France";
dA[x++] = "20070714 THE MISER - 14th July - France";
dA[x++] = "20070715 THE MISER - 15th July - France";
dA[x++] = "20070716 THE MISER - 16th July - France";
dA[x++] = "20070717 THE MISER - 17th July - France";
dA[x++] = "20070718 THE MISER - 18th July - France";
dA[x++] = "20070719 THE MISER - 19th July - France";
dA[x++] = "20071012 THE MISER - 12th October - France";
dA[x++] = "20071016 THE MISER - 16th October - France";
dA[x++] = "20071017 THE MISER - 17th October - France";
dA[x++] = "20071020 THE MISER - 20th October – Presentación de la versión inglesa. Norwich, England ";
dA[x++] = "20071024 THE MISER - 24th October - Valls, Tarragona. GUANT Festival ";
dA[x++] = "20071026 THE MISER - 26th October - France";
dA[x++] = "20071109 THE MISER - 09th November - Montpellier, France";
dA[x++] = "20071110 THE MISER - 10th November - Montpellier, France";
dA[x++] = "20071123 THE MISER - 23th November - Mollerussa, Barcelona. HUMORIS CAUSA Festival ";
dA[x++] = "20071125 THE MISER - 25th November - France";
dA[x++] = "20071129 THE MISER - 29th November - France";
dA[x++] = "20071130 THE MISER - 30th November - France";
dA[x++] = "20071205 THE MISER - 05th Decembre – Alicante, Spain";
dA[x++] = "20080123 THE MISER - 23th January - Brest, France";
dA[x++] = "20080124 THE MISER - 24th January - Brest, France ";
dA[x++] = "20080125 THE MISER - 25th January - Brest, France ";
dA[x++] = "20080126 THE MISER - 26th January - Brest, France ";
dA[x++] = "20080129 THE MISER - 29th January - Longe, France";
dA[x++] = "20080202 THE MISER - 02th February - Donostia, Euskal Herria";
dA[x++] = "20080208 THE MISER - 08th February - Bessiere, France";
dA[x++] = "20080209 THE MISER - 09th February - Meze, France";
dA[x++] = "20080214 THE MISER - 14th February - Bobigny, France";
dA[x++] = "20080215 THE MISER - 15th February - Bobigny, France";
dA[x++] = "20080218 THE MISER - 18th February - France";
dA[x++] = "20080219 THE MISER - 19th February - France";
dA[x++] = "20080220 THE MISER - 20th February - France";
dA[x++] = "20080221 THE MISER - 21th February - France";
dA[x++] = "20080222 THE MISER - 22th February - France";
dA[x++] = "20080223 THE MISER - 23th February - France";
dA[x++] = "20080321 THE MISER - 21th March - Nantes, France";
dA[x++] = "20080402 THE MISER - 02th April - La Mure, France";
dA[x++] = "20080403 THE MISER - 03th April - La Mure, France";
dA[x++] = "20080404 THE MISER - 04th April - Saint Egreve, France";
dA[x++] = "20080417 THE MISER - 17th April - L'Hospitale de Llobregat, Catalunya.";
dA[x++] = "20080418 THE MISER - 18th April - Torelló, Catalunya.";
dA[x++] = "20080422 THE MISER - 22th April - Igualada, Catalunya.";
dA[x++] = "20080424 THE MISER - 24th April - Manresa, Catalunya.";
dA[x++] = "20080429 THE MISER - 29th April - Issoudun, France";
dA[x++] = "20080505 THE MISER - 05th May - Mataró, Catalunya.";
dA[x++] = "20080506 THE MISER - 06th May - Mataró, Catalunya.";
dA[x++] = "20080507 THE MISER - 07th May – Vilasar de Dalt, Catalunya.";
dA[x++] = "20080508 THE MISER - 08th May – Alcazar de San Juan, Spain";
dA[x++] = "20080514 THE MISER - 14th May - Ecully, France";
dA[x++] = "20080515 THE MISER - 15th May - Thiers, France";
dA[x++] = "20080516 THE MISER - 16th May - Thiers, France";
dA[x++] = "20080711 THE MISER - 11th July- France";
dA[x++] = "20080712 THE MISER - 12th July- France";
dA[x++] = "20080713 THE MISER - 13th July- France";
dA[x++] = "20080714 THE MISER - 14th July- France";
dA[x++] = "20080715 THE MISER - 15th July- France";
dA[x++] = "20080716 THE MISER - 16th July- France";
dA[x++] = "20080717 THE MISER - 17th July- France";
dA[x++] = "20080718 THE MISER - 18th July- France";
dA[x++] = "20080719 THE MISER - 19th July- France";
dA[x++] = "20080720 THE MISER - 20th July- France";
dA[x++] = "20080721 THE MISER - 21th July- France";
dA[x++] = "20080722 THE MISER - 22th July- France";
dA[x++] = "20080723 THE MISER - 23th July- France";
dA[x++] = "20080726 THE MISER - 26th July – Soria, Spain";
dA[x++] = "20080916 THE MISER - 13th September - Ljubljana, Eslovenia";
dA[x++] = "20081031 THE MISER - 31th October - Arrigorriaga, Euskal Herria";
dA[x++] = "20081101 THE MISER - 01th November - Gernika, Euskal Herria";
dA[x++] = "20081108 THE MISER - 08th November – Murcia, Spain. Titirimurcia Festival";
dA[x++] = "20081116 THE MISER - 16th November - Palamós, Catalunya.";
dA[x++] = "20081209 THE MISER - 09th December – Paris, France";
dA[x++] = "20081210 THE MISER - 10th December - Paris, France";
dA[x++] = "20081211 THE MISER - 11th December - Paris, France";
dA[x++] = "20081212 THE MISER - 12th December - Paris, France";
dA[x++] = "20081213 THE MISER - 13th December - Paris, France";
dA[x++] = "20081214 THE MISER - 14th December - Paris, France";
dA[x++] = "20090117 THE MISER - 17th January - France";
dA[x++] = "20090121 THE MISER - 21th January - France";
dA[x++] = "20090122 THE MISER - 22th January - France";
dA[x++] = "20090123 THE MISER - 23th January - France";
dA[x++] = "20090207 THE MISER - 07th February - Edinburgh, Scotland";
dA[x++] = "20090211 THE MISER - 11th February - Glasgow, Scotland";
dA[x++] = "20090212 THE MISER - 12th February - Aberdeen, Scotland";
dA[x++] = "20090213 THE MISER - 13th February - Lochgilly, Scotland";
dA[x++] = "20090425 THE MISER - 25th April - Casa Museo F. García-Lorca. Valderrubio, Granada";
dA[x++] = "20090509 THE MISER - 09th May - Lisbone, Portugal";
dA[x++] = "20090510 THE MISER - 10th May - Lisbone, Portugal";
dA[x++] = "20090515 THE MISER - 15th May – Sevilla";
dA[x++] = "20090516 THE MISER - 16th May - Sevilla";
dA[x++] = "20090517 THE MISER - 17th May - Alcalá La Real";
dA[x++] = "20090523 THE MISER - 23th May - Caldes de Montbui, Catalunya";
dA[x++] = "20090528 THE MISER - 28th May - France";
dA[x++] = "20090529 THE MISER - 29th May - France";
dA[x++] = "20090709 THE MISER - 09th July - Zamora, Spain";
dA[x++] = "20090710 THE MISER - 10th July - Salamanca, Spain";
dA[x++] = "20090711 THE MISER - 11th July - Vitoria-Gasteiz";
dA[x++] = "20090903 THE MISER - 03th Septiembre - Switzerland";
dA[x++] = "20090904 THE MISER - 04th Septiembre - Switzerland";
dA[x++] = "20090917 THE MISER - 17th Septiembre - France";
dA[x++] = "20090918 THE MISER - 18th Septiembre - France";
dA[x++] = "20090925 THE MISER - 25th Septiembre - Bordeaux, France";
dA[x++] = "20091001 FABLES - 01th October - New premiere spectacle. Czech Republic";
dA[x++] = "20091012 THE MISER - 12th October- Nairobi, Kenya - Africa";
dA[x++] = "20091015 THE MISER - 15th October - Paris, France";
dA[x++] = "20091016 THE MISER - 16th October - Paris, France";
dA[x++] = "20091106 THE MISER - 06th November - Fontainebleau, France";
dA[x++] = "20091113 THE MISER - 13th November - Paris, France";
dA[x++] = "20091114 THE MISER - 14th November - Paris, France";
dA[x++] = "20091121 THE MISER - 21th November - Sant Pere de Ribes, Catalunya";
dA[x++] = "20091123 THE MISER - 23th November - France";
dA[x++] = "20091124 THE MISER - 24th November - France";
dA[x++] = "20091126 THE MISER - 26th November - France";
dA[x++] = "20091127 THE MISER - 27th November - France";
dA[x++] = "20100119 THE MISER - 19th January - France";
dA[x++] = "20100120 THE MISER - 20th January - France";
dA[x++] = "20100121 THE MISER - 21th January - France";
dA[x++] = "20100122 THE MISER - 22th January - France";
dA[x++] = "20100126 THE MISER - 26th January - France";
dA[x++] = "20100128 THE MISER - 28th January - France";
dA[x++] = "20100129 THE MISER - 29th January - France";
dA[x++] = "20100201 THE MISER - 01th February- France";
dA[x++] = "20100203 THE MISER - 03th February- France";
dA[x++] = "20100204 THE MISER - 04th February- France";
dA[x++] = "20100205 THE MISER - 05th February- France";
dA[x++] = "20100209 THE MISER - 09th February- France";
dA[x++] = "20100211 THE MISER - 11th February- France";
dA[x++] = "20100212 THE MISER - 12th February- France";
dA[x++] = "20100213 THE MISER - 13th February- France";
dA[x++] = "20100312 THE MISER - 12th March - France";
dA[x++] = "20100314 THE MISER - 14th March - France";
dA[x++] = "20100315 THE MISER - 15th March - France";
dA[x++] = "20100316 THE MISER - 16th March - France";
dA[x++] = "20100317 THE MISER - 17th March - France";
dA[x++] = "20100318 THE MISER - 18th March - France";
dA[x++] = "20100319 THE MISER - 19th March - France";
dA[x++] = "20100321 THE MISER - 21th March - France";
dA[x++] = "20100325 THE MISER - 25th March - France";
dA[x++] = "20100326 THE MISER - 26th March - France";
dA[x++] = "20100327 THE MISER - 27th March - France";
dA[x++] = "20100406 THE MISER – 06th April - France";
dA[x++] = "20100408 THE MISER – 08th April - France";
dA[x++] = "20100409 THE MISER – 09th April - France";
dA[x++] = "20100415 THE MISER – 15th April - Manaos, Brasil";
dA[x++] = "20100416 THE MISER – 16th April - Manaos, Brasil";
dA[x++] = "20100417 THE MISER – 17th April - Manaos, Brasil";
dA[x++] = "20100418 THE MISER – 18th April - Manaos, Brasil";
dA[x++] = "20100504 THE MISER – 04th May - Istanbul, Turquie";
dA[x++] = "20100505 THE MISER – 05th May - Istanbul, Turquie";
dA[x++] = "20100506 THE MISER – 06th May - Istanbul, Turquie";
dA[x++] = "20100507 THE MISER – 07th May - Istanbul, Turquie";
dA[x++] = "20100508 THE MISER – 08th May - Istanbul, Turquie";
dA[x++] = "20100515 FABLES – 15th May - Tarbes, France. New premiere spectacle ";
dA[x++] = "20100912 THE MISER - 12th September - Amsterdam, Holland ";
dA[x++] = "20100918 THE MISER - 18th September - Bulgarie";
dA[x++] = "20100919 THE MISER - 19th September - Bulgarie";
dA[x++] = "20100923 THE MISER - 23th September - Putney, Vermont (USA)";
dA[x++] = "20100924 THE MISER - 24th September - Putney, Vermont (USA)";
dA[x++] = "20100925 THE MISER - 25th September - Putney, Vermont (USA)";
dA[x++] = "20100928 THE MISER - 28th September - Nevers, France";
dA[x++] = "20101008 THE MISER - 08th October - Merville, France";
dA[x++] = "20101012 THE MISER - 12th October - Quimper, France";
dA[x++] = "20101013 THE MISER - 13th October - Quimper, France";
dA[x++] = "20101014 THE MISER - 14th October - Quimper, France";
dA[x++] = "20101015 THE MISER - 15th October - Quimper, France";
dA[x++] = "20101016 THE MISER - 16th October - Collegien, France";
dA[x++] = "20101022 THE MISER - 22th October - Belfort, France";
dA[x++] = "20101024 THE MISER - 24th October - Torcy, France";
dA[x++] = "20101116 THE MISER - 16th November - St. Avé, France";
dA[x++] = "20101118 THE MISER - 18th November - Ancenis, France";
dA[x++] = "20101125 THE MISER - 25th November - France";
dA[x++] = "20101126 THE MISER - 26th November - France";
dA[x++] = "20110123 THE MISER - 23th January - Vitry Le François, France";
dA[x++] = "20110124 THE MISER - 24th January - Vitry Le François, France";
dA[x++] = "20110125 THE MISER - 25th January - Vitry Le François, France";
dA[x++] = "20110129 THE MISER - 29th January - Fontenay Aux, France";
dA[x++] = "20110204 THE MISER - 04th February - Montargis Cedex, France";
dA[x++] = "20110205 THE MISER - 05th February - Montargis Cedex, France";
dA[x++] = "20110211 THE MISER - 11th February - Fumel Cedex, France";
dA[x++] = "20110416 THE MISER - 16th April - L'horme, France";
dA[x++] = "20110417 THE MISER - 17th April - Binic, France";

// 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 = ['January','February','March','April','May','June','July','August','September','October','November','December'];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 = ['Sun','Mon','Tue','Wed','Thu','Fri','Sat']; 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;height:150px;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:300px"><\/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;}
