	
/**************************************************************
Calendario con efemérides y eventos. Script por Tunait! (21/4/2007)
Script de libre uso con la condición de que permanezcan intactas estas líneas, osea, los créditos.
Distribución no autorizada en sitios de script sin previa autorización
Ver condiciones de uso en http://javascript.tunait.com/
tunait@yahoo.com 
****************************************************************/
/** Configuración general **/
var idContenedor = "miCalendario" //id del contenedor donde se insertará el calendario
var calendarioCursor = 'pointer'
var calendarioPaddingCelda = 3; //Corrige la posición del cuadro que marca el día seleccionado en caso de haberse aplicado un padding a las celdas
var tagTitulos = 'h2' //Tag a usar en los títulos de eventos y efemérides
var textoVerTodos = 'Listar todo el mes'
/** fin configuración general **/


function evento(fecha, titulo, texto, enlace){
	this.fecha = fecha;
	this.titulo = titulo;
	this.texto = texto;
	this.enlace = false;
	if(enlace) this.enlace = enlace
}

/** agregamos los listados de efemérides y eventos por meses:
var nombreDelMes = new Array();
nombreDelMes.push(new evento('fecha en formato aaaammdd o mmdd', 'Título', 'Texto','Link [opcional]'));
**/


var enero = new Array();
enero.push(new evento('20090130', 'Día Mundial de la No Violencia', '',''))

var marzo = new Array();
marzo.push(new evento('20100308', 'Día de las Naciones Unidas para los Derechos de la Mujer y la Paz Internacional', '',''))
marzo.push(new evento('20100308', 'Día Internacional de la Mujer', '',''))
marzo.push(new evento('20100321', 'Día Internacional de la Eliminación de la Discriminación Racial', '',''))
marzo.push(new evento('20100322', 'Día Mundial del Agua', '',''))
marzo.push(new evento('20090308', 'Día de las Naciones Unidas para los Derechos de la Mujer y la Paz Internacional', '',''))
marzo.push(new evento('20090308', 'Día Internacional de la Mujer', '',''))
marzo.push(new evento('20090321', 'Día Internacional de la Eliminación de la Discriminación Racial', '',''))
marzo.push(new evento('20090322', 'Día Mundial del Agua', '',''))
marzo.push(new evento('20080308', 'Día de las Naciones Unidas para los Derechos de la Mujer y la Paz Internacional', '',''))
marzo.push(new evento('20080308', 'Día Internacional de la Mujer', '',''))
marzo.push(new evento('20080321', 'Día Internacional de la Eliminación de la Discriminación Racial', '',''))
marzo.push(new evento('20080322', 'Día Mundial del Agua', '',''))





var abril = new Array();
abril.push(new evento('20100407', 'Día Mundial de la Salud', '',''))
abril.push(new evento('20100428', 'Día Mundial de la Seguridad y la Salud en el Trabajo', '',''))
abril.push(new evento('20090407', 'Día Mundial de la Salud', '',''))
abril.push(new evento('20080407', 'Día Mundial de la Salud', '',''))
abril.push(new evento('20090414', 'Talleres en Palma de Mallorca', '',''))
abril.push(new evento('20090420', 'Talleres en Oviedo', '',''))
abril.push(new evento('20090421', 'Talleres en Oviedo', '',''))
abril.push(new evento('20090422', 'Talleres en Toledo', '',''))
abril.push(new evento('20090424', 'Talleres en Guadalajara y Castellón', '',''))
abril.push(new evento('20090427', 'Talleres en Ourense', '',''))
abril.push(new evento('20090428', 'Talleres en Ourense', '',''))
abril.push(new evento('20090428', 'Día Mundial de la Seguridad y la Salud en el Trabajo', '',''))
abril.push(new evento('20080428', 'Día Mundial de la Seguridad y la Salud en el Trabajo', '',''))

var mayo = new Array();
mayo.push(new evento('20100515', 'Día Mundial de la Salud', '',''))
mayo.push(new evento('20100522', 'Día Internacional de la Diversidad Biológica', '',''))
mayo.push(new evento('20100531', 'Día Mundial sin Tabaco', '',''))
mayo.push(new evento('20090505', 'Talleres en Huesca', '',''))
mayo.push(new evento('20090515', 'Día Mundial de la Salud', '',''))
mayo.push(new evento('20090517', 'Día Internacional de las Familias', '',''))
mayo.push(new evento('20090522', 'Día Internacional de la Diversidad Biológica', '',''))
mayo.push(new evento('20080515', 'Día Mundial de la Salud', '',''))
mayo.push(new evento('20080517', 'Día Internacional de las Familias', '',''))
mayo.push(new evento('20080522', 'Día Internacional de la Diversidad Biológica', '',''))
mayo.push(new evento('20080526', 'Talleres en Tenerife', '',''))
mayo.push(new evento('20080527', 'Talleres en Tenerife', '',''))
mayo.push(new evento('20090527', 'Talleres en Talavera de la Reina', '',''))
mayo.push(new evento('20080528', 'Talleres en Ourense', '',''))
mayo.push(new evento('20080529', 'Talleres en Granada', '',''))
mayo.push(new evento('20080530', 'Talleres en Granada', '',''))
mayo.push(new evento('20090531', 'Día Mundial sin Tabaco', '',''))


var junio = new Array();
junio.push(new evento('20100601', 'Día Internacional de los Niños Inocentes Víctimas de Agresión', '',''))
junio.push(new evento('20100605', 'Día Mundial del Medio Ambiente', '',''))
junio.push(new evento('20100614', 'Día Mundial del Donante de Sangre', '',''))
junio.push(new evento('20100615', 'Día Mundial de toma de Conciencia del Abuso y Maltrato en la Vejez', '',''))
junio.push(new evento('20100617', 'Día Mundial de la Lucha contra la Desertificación y la Sequía', '',''))
junio.push(new evento('20100620', 'Día Mundial del Refugiado', '',''))
junio.push(new evento('20100626', 'Día Internacional de la Lucha contra el Uso Indebido y el Tráfico Ilícito de Drogas', '',''))
junio.push(new evento('20100626', 'Día Internacional de Apoyo a las Víctimas de la Tortura', '',''))
junio.push(new evento('20090601', 'Día Internacional de los Niños Inocentes Víctimas de Agresión', '',''))
junio.push(new evento('20090605', 'Día Mundial del Medio Ambiente', '',''))
junio.push(new evento('20090614', 'Día Mundial del Donante de Sangre', '',''))
junio.push(new evento('20090615', 'Día Mundial de toma de Conciencia del Abuso y Maltrato en la Vejez', '',''))
junio.push(new evento('20090617', 'Día Mundial de la Lucha contra la Desertificación y la Sequía', '',''))
junio.push(new evento('20090620', 'Día Mundial del Refugiado', '',''))
junio.push(new evento('20090626', 'Día Internacional de la Lucha contra el Uso Indebido y el Tráfico Ilícito de Drogas', '',''))
junio.push(new evento('20090626', 'Día Internacional de Apoyo a las Víctimas de la Tortura', '',''))
junio.push(new evento('20080601', 'Día Internacional de los Niños Inocentes Víctimas de Agresión', '',''))
junio.push(new evento('20080605', 'Día Mundial del Medio Ambiente', '',''))
junio.push(new evento('20080614', 'Día Mundial del Donante de Sangre', '',''))
junio.push(new evento('20080615', 'Día Mundial de toma de Conciencia del Abuso y Maltrato en la Vejez', '',''))
junio.push(new evento('20080617', 'Día Mundial de la Lucha contra la Desertificación y la Sequía', '',''))
junio.push(new evento('20080620', 'Día Mundial del Refugiado', '',''))
junio.push(new evento('20080626', 'Día Internacional de la Lucha contra el Uso Indebido y el Tráfico Ilícito de Drogas', '',''))
junio.push(new evento('20080626', 'Día Internacional de Apoyo a las Víctimas de la Tortura', '',''))
junio.push(new evento('20080605', 'Talleres en Alicante', '',''))
junio.push(new evento('20080606', 'Talleres en Alicante', '',''))
junio.push(new evento('20080618', 'Talleres en Madrid', '',''))
junio.push(new evento('20080619', 'Talleres en Madrid', '',''))
junio.push(new evento('20080610', 'Talleres en Málaga', '',''))
junio.push(new evento('20080611', 'Talleres en Málaga', '',''))
junio.push(new evento('20080624', 'Talleres en Castelldefels', '',''))
junio.push(new evento('20080625', 'Talleres en Castelldefels', '',''))
junio.push(new evento('20090604', 'Talleres en Huelva', '',''))
junio.push(new evento('20090605', 'Talleres en Huelva', '',''))
junio.push(new evento('20090602', 'Talleres en Cadiz', '',''))


var julio = new Array();
julio.push(new evento('20100711', 'Día Mundial de la Población', '',''))
julio.push(new evento('20090711', 'Día Mundial de la Población', '',''))
julio.push(new evento('20080711', 'Día Mundial de la Población', '',''))



var agosto = new Array();
agosto.push(new evento('20100809', 'Día Mundial de las Poblaciones Indígenas', '',''))
agosto.push(new evento('20100812', 'Día Internacional de la Juventud', '',''))
agosto.push(new evento('20100823', 'Día Internacional para el Recuerdo del Comercio de Esclavos y su Abolición', '',''))
agosto.push(new evento('20100831', 'Día Internacional de la Solidaridad', '',''))
agosto.push(new evento('20090809', 'Día Mundial de las Poblaciones Indígenas', '',''))
agosto.push(new evento('20090812', 'Día Internacional de la Juventud', '',''))
agosto.push(new evento('20090823', 'Día Internacional para el Recuerdo del Comercio de Esclavos y su Abolición', '',''))
agosto.push(new evento('20090831', 'Día Internacional de la Solidaridad', '',''))
agosto.push(new evento('20080809', 'Día Mundial de las Poblaciones Indígenas', '',''))
agosto.push(new evento('20080812', 'Día Internacional de la Juventud', '',''))
agosto.push(new evento('20080823', 'Día Internacional para el Recuerdo del Comercio de Esclavos y su Abolición', '',''))
agosto.push(new evento('20080831', 'Día Internacional de la Solidaridad', '',''))



var septiembre = new Array();
septiembre.push(new evento('20100921', 'Día Internacional por la Paz. Jornadas en Murcia', '','jornadas_murcia2010.html'))
septiembre.push(new evento('20100915', 'Jornadas en Ciudad Real', '','jornadas_creal2010.html'))
septiembre.push(new evento('20100906', 'Jornadas en Cáceres', '','jornadas_caceres2010.html'))
septiembre.push(new evento('20100908', 'Día Internacional de la Alfabetización', '',''))
septiembre.push(new evento('20100923', 'Día Internacional en contra de la Explotación y Tráfico de Mujeres', '',''))
septiembre.push(new evento('20090908', 'Día Internacional de la Alfabetización', '',''))
septiembre.push(new evento('20090921', 'Día Internacional por la Paz', '',''))
septiembre.push(new evento('20090923', 'Día Internacional en contra de la Explotación y Tráfico de Mujeres', '',''))
septiembre.push(new evento('20080908', 'Día Internacional de la Alfabetización', '',''))
septiembre.push(new evento('20080921', 'Día Internacional por la Paz', '',''))
septiembre.push(new evento('20080923', 'Día Internacional en contra de la Explotación y Tráfico de Mujeres', '',''))



var octubre = new Array();
octubre.push(new evento('20101001', 'Día Internacional de las Personas Mayores', '',''))
octubre.push(new evento('20101002', 'Día internacional de la No Violencia', '',''))
octubre.push(new evento('20101007', 'Día Mundial contra la Pena de Muerte', '',''))
octubre.push(new evento('20101010', 'Día Mundial de la Salud Mental', '',''))
octubre.push(new evento('20101016', 'Día Mundial de la Alimentación', '',''))
octubre.push(new evento('20101017', 'Día Internacional para la Erradicación de la Pobreza', '',''))
octubre.push(new evento('20101024', 'Día de las Naciones Unidas', '',''))
octubre.push(new evento('20101024', 'Día Mundial de Información sobre el Desarrollo', '',''))
octubre.push(new evento('20101024', 'Semana del Desarme', '',''))
octubre.push(new evento('20101025', 'Semana del Desarme', '',''))
octubre.push(new evento('20101026', 'Semana del Desarme', '',''))
octubre.push(new evento('20101027', 'Semana del Desarme', '',''))
octubre.push(new evento('20101028', 'Semana del Desarme', '',''))
octubre.push(new evento('20101029', 'Semana del Desarme', '',''))
octubre.push(new evento('20101030', 'Semana del Desarme', '',''))
octubre.push(new evento('20091001', 'Día Internacional de las Personas Mayores', '',''))
octubre.push(new evento('20091002', 'Día internacional de la No Violencia', '',''))
octubre.push(new evento('20091007', 'Día Mundial contra la Pena de Muerte', '',''))
octubre.push(new evento('20091010', 'Día Mundial de la Salud Mental', '',''))
octubre.push(new evento('20091016', 'Día Mundial de la Alimentación', '',''))
octubre.push(new evento('20091017', 'Día Internacional para la Erradicación de la Pobreza', '',''))
octubre.push(new evento('20091024', 'Día de las Naciones Unidas', '',''))
octubre.push(new evento('20091024', 'Día Mundial de Información sobre el Desarrollo', '',''))
octubre.push(new evento('20091024', 'Semana del Desarme', '',''))
octubre.push(new evento('20091025', 'Semana del Desarme', '',''))
octubre.push(new evento('20091026', 'Semana del Desarme', '',''))
octubre.push(new evento('20091027', 'Semana del Desarme', '',''))
octubre.push(new evento('20091028', 'Semana del Desarme', '',''))
octubre.push(new evento('20091029', 'Semana del Desarme', '',''))
octubre.push(new evento('20091030', 'Semana del Desarme', '',''))
octubre.push(new evento('20081001', 'Día Internacional de las Personas Mayores', '',''))
octubre.push(new evento('20081002', 'Día internacional de la No Violencia', '',''))
octubre.push(new evento('20081007', 'Día Mundial contra la Pena de Muerte', '',''))
octubre.push(new evento('20081010', 'Día Mundial de la Salud Mental', '',''))
octubre.push(new evento('20081016', 'Día Mundial de la Alimentación', '',''))
octubre.push(new evento('20081017', 'Día Internacional para la Erradicación de la Pobreza', '',''))
octubre.push(new evento('20081024', 'Día de las Naciones Unidas', '',''))
octubre.push(new evento('20081024', 'Día Mundial de Información sobre el Desarrollo', '',''))
octubre.push(new evento('20081024', 'Semana del Desarme', '',''))
octubre.push(new evento('20081025', 'Semana del Desarme', '',''))
octubre.push(new evento('20081026', 'Semana del Desarme', '',''))
octubre.push(new evento('20081027', 'Semana del Desarme', '',''))
octubre.push(new evento('20081028', 'Semana del Desarme', '',''))
octubre.push(new evento('20081029', 'Semana del Desarme', '',''))
octubre.push(new evento('20081030', 'Semana del Desarme', '',''))
octubre.push(new evento('20091030', 'Jornadas en Cádiz', '','jornadas_cadiz.html'))

var noviembre = new Array();
noviembre.push(new evento('20101112', 'Día Mundial de la Infancia', '',''))
noviembre.push(new evento('20101116', 'Día Internacional para la Tolerancia', '',''))
noviembre.push(new evento('20101120', 'Día Mundial de la Infancia', '',''))
noviembre.push(new evento('20101125', 'Día Internacional para la Eliminación de la Violencia contra la Mujer', '',''))
noviembre.push(new evento('20091112', 'Día Mundial de la Infancia', '',''))
noviembre.push(new evento('20091116', 'Día Internacional para la Tolerancia', '',''))
noviembre.push(new evento('20091120', 'Día Mundial de la Infancia', '',''))
noviembre.push(new evento('20091125', 'Día Internacional para la Eliminación de la Violencia contra la Mujer', '',''))
noviembre.push(new evento('20081112', 'Día Mundial de la Infancia', '',''))
noviembre.push(new evento('20081116', 'Día Internacional para la Tolerancia', '',''))
noviembre.push(new evento('20081120', 'Día Mundial de la Infancia', '',''))
noviembre.push(new evento('20081125', 'Día Internacional para la Eliminación de la Violencia contra la Mujer', '',''))
noviembre.push(new evento('20081128', 'Jornadas en Barcelona', '','jornadas_barcelona.html'))
noviembre.push(new evento('20091113', 'Jornadas en Huesca', '','jornadas_huesca.html'))
noviembre.push(new evento('20091120', 'Jornadas en Oviedo', '','jornadas_oviedo.html'))
noviembre.push(new evento('20091127', 'Jornadas en Palma de Mallorca', '','jornadas_palma_mallorca.html'))
noviembre.push(new evento('20091130', 'Jornadas en Toledo', '','jornadas_toledo.html'))

var diciembre = new Array();
diciembre.push(new evento('20101201', 'Día Mundial de la Lucha contra el SIDA', '',''))
diciembre.push(new evento('20101202', 'Día Internacional de la Abolición de la Exclavitud', '',''))
diciembre.push(new evento('20101203', 'Día Internacional de las Personas con Discapacidad', '',''))
diciembre.push(new evento('20101205', 'Día Internacional de los Voluntarios para el Desarrollo Económico y Social', '',''))
diciembre.push(new evento('20101210', 'Día de los Derechos Humanos', '',''))
diciembre.push(new evento('20101218', 'Día Internacional del Emigrante', '',''))
diciembre.push(new evento('20091201', 'Día Mundial de la Lucha contra el SIDA', '',''))
diciembre.push(new evento('20091202', 'Día Internacional de la Abolición de la Exclavitud', '',''))
diciembre.push(new evento('20091203', 'Día Internacional de las Personas con Discapacidad', '',''))
diciembre.push(new evento('20091205', 'Día Internacional de los Voluntarios para el Desarrollo Económico y Social', '',''))
diciembre.push(new evento('20091210', 'Día de los Derechos Humanos', '',''))
diciembre.push(new evento('20091218', 'Día Internacional del Emigrante', '',''))
diciembre.push(new evento('20081201', 'Día Mundial de la Lucha contra el SIDA', '',''))
diciembre.push(new evento('20081202', 'Día Internacional de la Abolición de la Exclavitud', '',''))
diciembre.push(new evento('20081203', 'Día Internacional de las Personas con Discapacidad', '',''))
diciembre.push(new evento('20081205', 'Día Internacional de los Voluntarios para el Desarrollo Económico y Social', '',''))
diciembre.push(new evento('20081210', 'Día de los Derechos Humanos', '',''))
diciembre.push(new evento('20081218', 'Día Internacional del Emigrante', '',''))
diciembre.push(new evento('20081215', 'Jornadas en Madrid', '','jornadas_madrid.html'))
diciembre.push(new evento('20091216', 'Jornadas en Castellón', '','jornadas_castellon.html'))	
diciembre.push(new evento('20091218', 'Jornadas en Orense', '','jornadas_orense.html'))

	
/**************************************************************
Calendario con efemérides y eventos. Script por Tunait! (21/4/2007)
Script de libre uso con la condición de que permanezcan intactas estas líneas, osea, los créditos.
Distribución no autorizada en sitios de script sin previa autorización
Ver condiciones de uso en http://javascript.tunait.com/
tunait@yahoo.com 
****************************************************************/
/*No tocar nada de aquí. La configuración en el archivo calendarioefemerides_config.js */
var hoy = new Date()
var mes = hoy.getMonth()
var dia = 1
var anio = hoy.getFullYear()
var diasSemana = new Array ('L','M','M','J','V','S','D')
var meses = new Array('Enero','Febrero','Marzo','Abril','Mayo','Junio','Julio','Agosto','Septiembre','Octubre','Noviembre','Diciembre')
var tunIex=navigator.appName=="Microsoft Internet Explorer"?true:false;
if(tunIex && navigator.userAgent.indexOf('Opera')>=0){tunIex = false}
tunOp = navigator.userAgent.indexOf('Opera')>=0 ? true: false;
var tunSel = false
var gHoy = 0;
var anCelda, alCelda, carga =false;
function tunCalendario(){
	if(!carga) escribeControles();
	dia2 = dia
	tab = document.createElement('table')
	tab.id = 'calendario'
	document.getElementById(idContenedor).appendChild(tab)
	tcabeza = document.createElement('thead')
	tab.appendChild(tcabeza)
	fCalendario = document.createElement('div')
	fCalendario.style.position= 'relative';
	fCalendario.className = "cuadroTexto"
	fCalendario.id = 'tunCuadroTexto'
	document.getElementById(idContenedor).appendChild(fCalendario)
	fi2 = document.createElement('tr')
	fi2b = document.createElement('th')
	fi2b.colSpan = 7
	fi2.id = 'mesCalendario'
	fi2b.appendChild(document.createTextNode(meses[mes] + "  -  " + anio))
	fi2.appendChild(fi2b)
	tcabeza.appendChild(fi2)
	fi = document.createElement('tr')
	tcabeza.appendChild(fi)
	for(m=0;m<7;m++){
		ce = document.createElement('th')
		ce.appendChild(document.createTextNode(diasSemana[m]))
		fi.appendChild(ce)
		}
		var escribe = false
		var escribe2 = true
	fecha = new Date(anio,mes,dia)
	var d = fecha.getDay()-1 
	if(d<0){d = 6}
	tcuerpo = document.createElement('tbody')
	tab.appendChild(tcuerpo)
	while(escribe2){
	fi = document.createElement('tr')
	co = 0
		for(t=0;t<7;t++){
			ce = document.createElement('td')
			if(escribe && escribe2){
				fecha2 = new Date(anio,mes,dia)
			
				/*****EVENTOS****/
				var _anio = fecha2.getFullYear().toString()
				var _mes = fecha2.getMonth() + 1
				_mes = _mes < 10 ? '0' + _mes : _mes.toString()
				var _dia = fecha2.getDate()
				_dia = _dia < 10 ? '0' + _dia : _dia.toString()
				buscaEv = buscaEvento(_anio + _mes + _dia, _mes + _dia)
				if(buscaEv){
					_titl = '';
					for( var x in buscaEv){
						_titl += buscaEv[x].titulo
						_titl += x < (buscaEv.length - 1) ? '; ' : '';
					}
				}
				ce.title = buscaEv ? _titl : formatoFecha(_anio + _mes + _dia)
				ce.className = buscaEv ? 'hayEvento' : ''
				/****FIN EVENTOS****/
			
				if(fecha2.getMonth() != mes){escribe2 = false;}
				else{
					ce.appendChild(document.createTextNode(dia));
					dia++;
					co++;
					ce.style.cursor = calendarioCursor
					ce.onclick = marcaCalendario
				}
			}
			if(d == t && !escribe){
				ce.appendChild(document.createTextNode(dia))
				/*****EVENTOS****/
				var _anio = anio
				var _mes = mes + 1
				_mes = _mes < 10 ? '0' + _mes : _mes.toString()
				var _dia = dia
				_dia = _dia < 10 ? '0' + _dia : _dia.toString()
				buscaEv = buscaEvento(_anio + _mes + _dia, _mes + _dia)
				if(buscaEv){
					_titl = '';
					for( var x in buscaEv){
						_titl += buscaEv[x].titulo
						_titl += x < (buscaEv.length - 1) ? '; ' : '';
					}
				}
				ce.title = buscaEv ? _titl :  formatoFecha(_anio + _mes + _dia)
				ce.className = buscaEv ? 'hayEvento' : ''
				/****FIN EVENTOS****/
				dia++;co++
				escribe = true
				ce.style.cursor = calendarioCursor
				ce.onclick = marcaCalendario
			}
			else{
				ce.appendChild(document.createTextNode(" "))
			}
			fi.appendChild(ce)
			if(hoy.getDate()+1 == dia && mes == hoy.getMonth() && anio == hoy.getFullYear() && !gHoy){
				ce.className = "Hoy"
				gHoy = 1;
				if(buscaEv){ escribeEvento(buscaEv)}
				else{ escribeFecha(_anio + _mes + _dia); enlaceListarMes()}

			}
		}
			
		if(co>0){tcuerpo.appendChild(fi)}
		
		}
	dia = dia2
}
function marcaCalendario(){
	/*eventos*/
	var _anio = anio.toString();
	var _mes = mes + 1
	_mes = _mes < 10 ? '0' + _mes  : _mes.toString()
	var _dia = this.firstChild.nodeType == 1 ? this.firstChild.nextSibling.nodeValue : this.firstChild.nodeValue;
	_dia = _dia < 10 ? '0' + _dia  : _dia.toString()
	hayEvento = buscaEvento(_anio + _mes + _dia, _mes + _dia)
	/*fin eventos */
	if(hayEvento){ escribeEvento(hayEvento)}
	else {escribeFecha(_anio + _mes + _dia); enlaceListarMes()}
	ceSe = document.createElement('div')
	ceSe.id = "tunSeleccionado"
	with(ceSe.style){
		borderWidth = "1px"
		borderStyle = "solid"
		borderColor = "#ff0000"
		width = this.scrollWidth  + "px"
		height = this.scrollHeight + "px"
		position = "absolute"
		zIndex = "1000"
		}
	if(tunSel){
		tunSel.removeChild(tunSel.firstChild)
	}
	tunSel = this
	this.insertBefore(ceSe,this.firstChild)
	with(ceSe.style){
		width = this.scrollWidth  + "px"
		marginLeft = "-" + (calendarioPaddingCelda + 1) + "px"
		marginTop = "-" + (calendarioPaddingCelda + 1) + "px"
	}
}

function borra(){
	document.getElementById(idContenedor).removeChild(document.getElementById('calendario'))
	document.getElementById(idContenedor).removeChild(document.getElementById('tunCuadroTexto'))
}
function establecerFecha(){
	tunFe = new Date()
	document.getElementById('tunMes').options[tunFe.getMonth()].selected = true
	document.getElementById('tunAnio').value = tunFe.getFullYear()
}

function buscaEvento(f, fc){
	try{
		eval(meses[mes].toLowerCase())
	}
	catch(error){
		return false
	}
	var _array = eval(meses[mes].toLowerCase())
	var _eventos = new Array()
	for(var m in _array){
		if(_array[m].fecha == f || _array[m].fecha == fc){
			_eventos.push(_array[m])
		}
	}
	return _eventos.length > 0 ? _eventos : false;
}

function escribeEvento(obj){
	escribeFecha(obj[0].fecha) 
	escribeEvento2(obj, false)
}
function escribeEvento2(obj, fec){
	for(var w in obj){
		var ti = document.createElement(tagTitulos)
		if(fec){
			_fec = formatoFecha(obj[w].fecha)
			_d = _fec.substr(0,2)
			ti.appendChild(document.createTextNode(_d + " - "))
		}
		var o = ti
		if(obj[w].enlace){
			var en = document.createElement('a')
			en.href =obj[w].enlace
			o.appendChild(en)
			o = en
		}

		o.appendChild(document.createTextNode(obj[w].titulo))
		document.getElementById('tunCuadroTexto').appendChild(ti)
		var te = document.createElement('p')
		te.appendChild(document.createTextNode(obj[w].texto))
		document.getElementById('tunCuadroTexto').appendChild(te)
	}
	enlaceListarMes()
}
function enlaceListarMes(){
	try{
		eval(meses[mes].toLowerCase())
	}
	catch(error){
		return false
	}
	var verTodos = document.createElement('strong')
	verTodos.style.cursor = 'pointer'
	verTodos.style.display = 'block'
	/*verTodos.appendChild(document.createTextNode(textoVerTodos))*/
	verTodos.onclick = escribirEventosMes
	document.getElementById('tunCuadroTexto').appendChild(verTodos)
	
}
function escribeFecha(fecha){
	lNodos = document.getElementById('tunCuadroTexto').childNodes.length
	if(lNodos){
		for(var m = 0; m < lNodos; m++){
			document.getElementById('tunCuadroTexto').removeChild(document.getElementById('tunCuadroTexto').childNodes[0])
		}
	}
	var fe = document.createElement('strong')
	fe.appendChild(document.createTextNode(formatoFecha(fecha)))
	document.getElementById('tunCuadroTexto').appendChild(fe)
}
function formatoDiaMes(v){
	v = v < 10 ? '0' + v : v ;
	return v
}
function formatoFecha(fecha){ 
	if(fecha.toString().length == 8){
		var an = fecha.toString().substring(0,4)
		var me = fecha.toString().substring(4,6)
		var di = fecha.toString().substring(6,8)
	}
	else{
		if(fecha.toString().length == 6){
			var an = fecha.toString().substring(0,4)
			var me = fecha.toString().substring(4,6)
			var di = ''
		}
		else{
			var an = ''
			var me = fecha.toString().substring(0,2)
			var di = fecha.toString().substring(2,4)
		}
	}
	me = eval(me)
	me = meses[me-1]
	return di + " " + me + " " + an
}

function cambiarMes(val){
	var _anio = document.getElementById('tunAnio').value
	var _mes = document.getElementById('tunMes').options[document.getElementById('tunMes').selectedIndex].value
	var _dia = 1;
	eval('_mes' + val + val)
	_mes = _mes < 0 && val == '-' ? 11 : _mes
	_mes = _mes > 11 && val == '+' ? 0 : _mes
	if(eval(_mes) == 0 && val == '+') _anio++
	if(eval(_mes) == 11 && val == '-') _anio--
	document.getElementById('tunMes').options[_mes].selected = true
	document.getElementById('tunAnio').value = _anio
	mes = _mes
	anio = _anio
	borra();
	gHoy = 0;
	tunCalendario()
	escribeFecha(_anio.toString() + formatoDiaMes(_mes + 1)); enlaceListarMes()
}
function escribirEventosMes(){
	escribeFecha(anio.toString() + formatoDiaMes((mes + 1).toString()))
	escribeEvento2(eval(meses[mes].toLowerCase()), true)
}

function escribeControles(){
	var obj = document.getElementById(idContenedor)
	var sp = document.createElement('span')
	sp.className = "cambiaMes" 
	sp.onclick = function() {cambiarMes('-')}
	sp.appendChild(document.createTextNode('<<'))
	obj.appendChild(sp)
	var sel = document.createElement('select')
	sel.className = 'selectores'
	sel.id = 'tunMes'
	sel.onchange = function(){
		mes = this.selectedIndex; borra(); tunCalendario()
	}
	for(var p in meses){
		opt = document.createElement('option')
		opt.value = p
		opt.appendChild(document.createTextNode(meses[p]))
		sel.appendChild(opt)
	}
	obj.appendChild(sel)
	var campo = document.createElement('input')
	campo.type = 'text'
	campo.id = 'tunAnio'
	campo.className = "selectores"
	campo.maxlength = "4" 
	campo.size = 4
	campo.onblur = function(){
		if(!isNaN(this.value)){anio=this.value;borra();tunCalendario()}
	}
	obj.appendChild(campo)
	var sp = document.createElement('span')
	sp.className = "cambiaMes" 
	sp.onclick = function() {cambiarMes('+')}
	sp.appendChild(document.createTextNode('>>'))
	obj.appendChild(sp)
	carga = true
}

