function MM_swapImgRestore() { //v3.0
  var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}

function MM_preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
    var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}

function MM_findObj(n, d) { //v4.01
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && d.getElementById) x=d.getElementById(n); return x;
}

function MM_swapImage() { //v3.0
  var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}

/*ACENTOS, eÑes y demás
á = \341 	Á = \301	à = \340	À = \300
é = \351	É = \311	è = \350	È = \310
í = \355	Í = \315	ì = \354	Ì = \314
ó = \363	Ó = \323	ò = \362	Ò = \322
ú = \372	Ú = \332	ù = \371	Ù = \331
ü = \374	Ü = \334	

ñ = \361	Ñ = \321
º = \260	ª = \252
*/
function reemplaza(cad){
	var aux = cad;
//	aux = cad.replace('á','\341');
//	aux += cad.replace('ó','\363');
	return aux;
}

function abreCorreo(usuario, dominio, asunto, cuerpo){
	var m = 'm';
	var a = 'a';
	var i = 'i';
	var l = 'l';
	var t = 't';
	var o = 'o';
	var dp = ':';
	var ar = '@';
	var amper = '?';
	var asrv = ar + dominio
	var elMensaje = m + a + i + l + t + o + dp + usuario + asrv;
	if (asunto != ''){
		elMensaje += '?Subject='+reemplaza(asunto);
		amper = '&';
	}
	if (cuerpo != '')
		elMensaje += amper + 'Body='+reemplaza(cuerpo);
	document.location.href=elMensaje;
}

function abreEnlace(w, p){
	var laURL = "http://";
	if (w=="1" || w=="2"){
		laURL += "www.";
	}
	laURL += p;
	if (w=="1"){
		laURL += "/";
	}
	window.open(laURL);
}

function escribeEstado(w, p){
	var laURL = "http://";
	if (w==1){
		laURL += "www.";
	}
	laURL += (p+"/");
	return laURL;
}

function CYPE_img(src,alt,url,segs){
	this.src = src;
	this.alt = alt;
	this.url = url;
	this.segs = segs;
}

function encode_utf8(s){
	return unescape(encodeURIComponent(s));
}

function decode_utf8(s){
	return decodeURIComponent(escape(s));
}

var banners = new Array;
var maxBanners = 1;

function cargaHome(){
	////////////////////////////////////////
	// Para añadir un nuevo Banner:
	// - Poner en la home el nuevo banner
	// - Añadirlo el último aquí
	// - Aumentar la variable maxBanners.
	////////////////////////////////////////

	imgAux0 = new Image();
	imgAux0.src = 'imagen/banners/banner_home_2011.gif';
	imgAux0.alt = 'Nueva versi\363n 2011 de los programas de CYPE Ingenieros';
	banners[0] = new CYPE_img(imgAux0.src,imgAux0.alt,'http://2011.novedades.cype.es/',2);

	imgAux1 = new Image();
	imgAux1.src = 'imagen/banners/banner_home_1_2011.jpg';
	imgAux1.alt = 'Nueva versi\363n 2011 de los programas de CYPE Ingenieros';
	banners[1] = new CYPE_img(imgAux1.src,imgAux1.alt,'http://2011.novedades.cype.es/',15);

/*

	imgAux2 = new Image();
	imgAux2.src = 'imagen/banners/banner_residuos.jpg';
	imgAux2.alt = 'Estudio de gesti\363n de residuos';
	banners[2] = new CYPE_img(imgAux2.src,imgAux2.alt,'http://pedidos.cype.es/formulario_pedido_programas.asp?f=A&p=GDR',10);

	imgAux3 = new Image();
	imgAux3.src = 'imagen/banners/banner_ruido_ehe08_suelo_radiante.gif';
	imgAux3.alt = 'Nueva normativa EHE-08. Suelo radiante y refrescante. Protecci\363n frente al ruido';
	banners[3] = new CYPE_img(imgAux3.src,imgAux3.alt,'http://descargas.cype.es/#mas_importantes20091e',8);

	imgAux4 = new Image();
	imgAux4.src = 'imagen/banners/banner_memorias_cte.jpg';
	imgAux4.alt = 'Memorias CTE. Nuevo programa con la versión 2009.1.h';
	banners[4] = new CYPE_img(imgAux4.src,imgAux4.alt,'http://memorias-cte.cype.es/',8);
*/

	setTimeout('cambiaBanner(0)', banners[0].segs*1000);
}

function cambiaBanner(i){
	document.getElementById('bannerPral').src = banners[i].src;
	document.getElementById('bannerPral').alt = banners[i].alt;
	document.getElementById('urlBanner').href = banners[i].url;
	i++;
	if (i > maxBanners) i = 0;
	setTimeout('cambiaBanner('+ i + ')', banners[i].segs*1000);
}

function quitaBold(cad){
	cad = cad.replace(/<br \/>/gi, " ");
	var patron = /(<b>)([^<]+)(<\/b>)/gi;
	nuevaCad = cad.replace(patron, "$2");
	return nuevaCad;
}

//v1.1
//Copyright 2006 Adobe Systems, Inc. All rights reserved.
function AC_AX_RunContent(){
  var ret = AC_AX_GetArgs(arguments);
  AC_Generateobj(ret.objAttrs, ret.params, ret.embedAttrs);
}

function AC_AX_GetArgs(args){
  var ret = new Object();
  ret.embedAttrs = new Object();
  ret.params = new Object();
  ret.objAttrs = new Object();
  for (var i=0; i < args.length; i=i+2){
    var currArg = args[i].toLowerCase();    

    switch (currArg){	
      case "pluginspage":
      case "type":
      case "src":
        ret.embedAttrs[args[i]] = args[i+1];
        break;
      case "data":
      case "codebase":
      case "classid":
      case "id":
      case "onafterupdate":
      case "onbeforeupdate":
      case "onblur":
      case "oncellchange":
      case "onclick":
      case "ondblClick":
      case "ondrag":
      case "ondragend":
      case "ondragenter":
      case "ondragleave":
      case "ondragover":
      case "ondrop":
      case "onfinish":
      case "onfocus":
      case "onhelp":
      case "onmousedown":
      case "onmouseup":
      case "onmouseover":
      case "onmousemove":
      case "onmouseout":
      case "onkeypress":
      case "onkeydown":
      case "onkeyup":
      case "onload":
      case "onlosecapture":
      case "onpropertychange":
      case "onreadystatechange":
      case "onrowsdelete":
      case "onrowenter":
      case "onrowexit":
      case "onrowsinserted":
      case "onstart":
      case "onscroll":
      case "onbeforeeditfocus":
      case "onactivate":
      case "onbeforedeactivate":
      case "ondeactivate":
        ret.objAttrs[args[i]] = args[i+1];
        break;
      case "width":
      case "height":
      case "align":
      case "vspace": 
      case "hspace":
      case "class":
      case "title":
      case "accesskey":
      case "name":
      case "tabindex":
        ret.embedAttrs[args[i]] = ret.objAttrs[args[i]] = args[i+1];
        break;
      default:
        ret.embedAttrs[args[i]] = ret.params[args[i]] = args[i+1];
    }
  }
  return ret;
}

//v1.0
//Copyright 2006 Adobe Systems, Inc. All rights reserved.
function AC_AddExtension(src, ext)
{
  if (src.indexOf('?') != -1)
    return src.replace(/\?/, ext+'?'); 
  else
    return src + ext;
}

function AC_Generateobj(objAttrs, params, embedAttrs) 
{ 
  var str = '<object ';
  for (var i in objAttrs)
    str += i + '="' + objAttrs[i] + '" ';
  str += '>';
  for (var i in params)
    str += '<param name="' + i + '" value="' + params[i] + '" /> ';
  str += '<embed ';
  for (var i in embedAttrs)
    str += i + '="' + embedAttrs[i] + '" ';
  str += ' ></embed></object>';

  document.write(str);
}

function AC_FL_RunContent(){
  var ret = 
    AC_GetArgs
    (  arguments, ".swf", "movie", "clsid:d27cdb6e-ae6d-11cf-96b8-444553540000"
     , "application/x-shockwave-flash"
    );
  AC_Generateobj(ret.objAttrs, ret.params, ret.embedAttrs);
}

function AC_SW_RunContent(){
  var ret = 
    AC_GetArgs
    (  arguments, ".dcr", "src", "clsid:166B1BCA-3F9C-11CF-8075-444553540000"
     , null
    );
  AC_Generateobj(ret.objAttrs, ret.params, ret.embedAttrs);
}

function AC_GetArgs(args, ext, srcParamName, classid, mimeType){
  var ret = new Object();
  ret.embedAttrs = new Object();
  ret.params = new Object();
  ret.objAttrs = new Object();
  for (var i=0; i < args.length; i=i+2){
    var currArg = args[i].toLowerCase();    

    switch (currArg){	
      case "classid":
        break;
      case "pluginspage":
        ret.embedAttrs[args[i]] = args[i+1];
        break;
      case "src":
      case "movie":	
        args[i+1] = AC_AddExtension(args[i+1], ext);
        ret.embedAttrs["src"] = args[i+1];
        ret.params[srcParamName] = args[i+1];
        break;
      case "onafterupdate":
      case "onbeforeupdate":
      case "onblur":
      case "oncellchange":
      case "onclick":
      case "ondblClick":
      case "ondrag":
      case "ondragend":
      case "ondragenter":
      case "ondragleave":
      case "ondragover":
      case "ondrop":
      case "onfinish":
      case "onfocus":
      case "onhelp":
      case "onmousedown":
      case "onmouseup":
      case "onmouseover":
      case "onmousemove":
      case "onmouseout":
      case "onkeypress":
      case "onkeydown":
      case "onkeyup":
      case "onload":
      case "onlosecapture":
      case "onpropertychange":
      case "onreadystatechange":
      case "onrowsdelete":
      case "onrowenter":
      case "onrowexit":
      case "onrowsinserted":
      case "onstart":
      case "onscroll":
      case "onbeforeeditfocus":
      case "onactivate":
      case "onbeforedeactivate":
      case "ondeactivate":
      case "type":
      case "codebase":
        ret.objAttrs[args[i]] = args[i+1];
        break;
      case "width":
      case "height":
      case "align":
      case "vspace": 
      case "hspace":
      case "class":
      case "title":
      case "accesskey":
      case "name":
      case "id":
      case "tabindex":
        ret.embedAttrs[args[i]] = ret.objAttrs[args[i]] = args[i+1];
        break;
      default:
        ret.embedAttrs[args[i]] = ret.params[args[i]] = args[i+1];
    }
  }
  ret.objAttrs["classid"] = classid;
  if (mimeType) ret.embedAttrs["type"] = mimeType;
  return ret;
}

function AbreVentana(pagina, nombre, ancho, alto, scroll,resiz) {
   var winl = (screen.width - ancho) / 2;
   var wint = (screen.height - alto) / 2;
   winprops = 'height='+alto+',width='+ancho+',top='+wint+',left='+winl+',scrollbars='+scroll+',resizable='+resiz
   win = window.open(pagina, '', winprops)
   if (parseInt(navigator.appVersion) >= 4) { win.focus(); }
}

var ordencampo
function ordena_por(campo,orden) { 
	if (orden == 'DESC') orden = 'ASC'
	else orden = 'DESC';
	if (document.location.href.indexOf("formacion")>0)
		document.location.href='?ordenapor='+campo+'&orden='+orden+'#calendario';
	else
		document.location.href='?ordenapor='+campo+'&orden='+orden;
}
function entraReg(reg){
  reg.style.cursor='hand';
  reg.style.backgroundColor='lavenderblush';
}
function salReg(reg,col){
  reg.style.cursor='default';
  reg.style.backgroundColor=col;
}
function agenda(id){
	AbreVentana('http://encuentros.cype.es/agenda.asp?id='+id,'agenda','800','600','yes','yes');
}

function validaEmail(elEmail){
	/*Con expresiones regulares
	NOTA: No se contemplan extensiones de dominio de más de 4 caracteres (.museum, .store) son mut poco frecuentes
	      No se contemplan las direcciones de correo con formato IP
	1.- \w+							---> que tenga al menos una palabra
	2.- ((-\w+)|(\.\w+)|(\_\w+))*	---> que tenga cero o más palabras precedidas de un (.), un (-) o un (_)
	3.- \@							---> una y sólo una @
	4.- [A-Za-z0-9]					---> sólo caracteres normales y números
	5.- ((.|-)[A-Za-z0-9]+)*		---> solo caracteres normales y números precedidos de un (.) o un (-)
	6.- \.							---> el último punto
	7.- [A-Za-z]{2,4}				---> de 2 a 4 caracteres después del punto. (4 por .info, .name)
	*/
	//	return (elEmail.search( /\w+((-\w+)|(\.\w+)|(\_\w+))*\@[A-Za-z0-9]+((\.|-)[A-Za-z0-9]+)*\.[A-Za-z]{2,4}/ ) != -1);
	// ¿Soporta expresiones regulares?
	var soporta = false;
	if (window.RegExp) {
		var aux = "a";
		var auxReg = new RegExp(aux);
		if (auxReg.test(aux)) soporta = true;
	}
	if (!soporta) return (elEmail.indexOf(".") > 2) && (elEmail.indexOf("@") > 0);
	var exp1 = new RegExp("(@.*@)|(\\.\\.)|(@\\.)|(\\.@)|(^\\.)");
	var exp2 = new RegExp("^.+\\@(\\[?)[a-zA-Z0-9\\-\\.]+\\.([a-zA-Z]{2,4}|[0-9]{1,3})(\\]?)$");
	var espacio = (elEmail.indexOf(" ") > 0);
	return (!exp1.test(elEmail) && exp2.test(elEmail) && !espacio);
}

function validaContacte(){
	var ce = document.getElementById("email").value;
	var p, errors = "";
	if (ce == ""){
		errors += 'Para enviar este mensaje es obligatorio rellenar el campo de correo electr\363nico, los dem\341s son opcionales';
	}else{
		p=validaEmail(ce);
		if (!p) errors += 'Para enviar este mensaje debe escribir correctamente el campo de correo electr\363nico, los dem\341s son opcionales';
	}
 	if (errors){
		alert(errors)
	}else{
  		document.getElementById("fContacto").submit();
  		document.getElementById("fContacto").reset();
	}
}

function validateSugerencias() {
  var i,p,q,nm,test,num,min,max,errors='',args=validateSugerencias.arguments;
  for (i=0; i<(args.length-2); i+=3) { test=args[i+2]; val=MM_findObj(args[i]);
    if (val) { nm=val.name; if ((val=val.value)!="") {
		if (test.indexOf('isEmail')!=-1){
			p=validaEmail(val);
			if (!p) errors+='- '+nm+' debe contener una direcci\363n de correo electr\363nico correcta.\n';
      } else if (test!='R') { num = parseFloat(val);
        if (val!=''+num) errors+='- '+nm+' debe contener un n\372mero.\n';
        if (test.indexOf('inRange') != -1) { p=test.indexOf(':');
          min=test.substring(8,p); max=test.substring(p+1);
          if (num<min || max<num) errors+='- '+nm+' debe contener un n\372mero entre '+min+' y '+max+'.\n';
    } } } else if (test.charAt(0) == 'R') errors += '- '+nm+' es obligatorio.\n';}
  } 
 	if (errors){
		alert('Se han producido los siguientes errores:\n'+errors)
	}else{
  		document.getElementById("fContacto").submit();
  		document.getElementById("fContacto").reset();
	}
}
