d = document;

///// Funciones de cambio de tamaño de letra

var LetraTamanoNormal = 2;
var LetraTamanoMin    = 1;
var LetraTamanoMax    = 4;
var LetraTamano = LetraTamanoNormal;

function LetraMas(){
	if (LetraTamano < LetraTamanoMax) {
		LetraTamano += 1;
		d.getElementById('cuerpo_contenido').className = 'letra_tamano'+LetraTamano;
	}
}

function LetraMenos() {
	if (LetraTamano > LetraTamanoMin) {
		LetraTamano -= 1;
		d.getElementById('cuerpo_contenido').className = 'letra_tamano'+LetraTamano;
	}
}

///// Funciones de favoritos y página de inicio

function addFavoritos(){
	var tit = "SEME - Sociedad Española de Medicina Estética";
	var url = "http://www.seme.org";
	if (d.all)	window.external.AddFavorite(url,tit); // IE
	else alert("Solamente funciona con Internet Explorer!");
}

///// Formulario Buscador

function chkFormBuscador(){
	var criterio = d.formBuscador.formBuscador_criterio.value;
	criterio = criterio.replace(/^\s*|\s*$/g,'');
	criterio = criterio.replace(/\s{2,}/g,' ');
	criterio = escape(criterio).replace(/%20/g,'+');
	if (d.getElementById("a").checked){
		d.location.href = '/area_seme/actualidad_buscar.php?criterio='+criterio;
		return false;
	}
	else if (d.getElementById("c").checked){
		d.location.href = '/area_soc/circulares_buscar.php?criterio='+criterio;
		return false;
	}
}

///// Antispam de correo electrónico

function verEmail(dominio,extension,cuenta){
	d.write('<a href="mailto:'+cuenta+'&#64;'+dominio+'.'+extension+'">'+cuenta+'&#64;'+dominio+'.'+extension+'</a>');
}