if (document.images) {
	var iarr=new Array();
	var iaba=new Array();
	var totimg= misimagenes.length;
	for (i=1; i< totimg; i++) {
		iarr[i]=new Image();
		iaba[i]=new Image();
		iarr[i].src=imgpath+misimagenes[i];
		iaba[i].src=imgpath+misimageneso[i];
	}
}

function vidirlima(u1,u2,u3,d1,d2,d3) {
 var x=new Array('"','@',"'");
 var z= u2 + u3 + u1 + x[1] + d3 + d1 + d2;
 document.write(z);
}

function mkdirlima(u1,u2,u3,d1,d2,d3,msgst) {
 var x=new Array('"','@',"'");
 var d= u2 + u3 + u1 + x[1] + d3 + d1 + d2;
 var z="<a href=";
 z+=x[0] + "mailto:" + d + x[0];
 z+=" onmouseout=" + x[0] + "Stnor();return true" + x[0];
 z+=" onmouseover=" + x[0] + "Stpon(" + x[2] + msgst + x[2] + "); return true" + x[0];
 z+=">" + d + "</a>";
 document.write(z);
}

function o_bot(num) {
if (document.images) {
 if (num) document.images['b'+num].src=iarr[num].src;
 }
}

function a_bot(num) {
if (document.images) {
 if (num) document.images['b'+num].src=iaba[num].src;
 }
}

function msover(num) {
 a_bot(num);
 Stpon(blurb[num]);
}

function msout(num) {
 o_bot(num);
 Stnor();
}

function Stnor() {
 Stpon(stdefault);
}

function Stpon(Stmsg) {
 window.status=Stmsg;
}

function trimDoublepace(e) {
	var xx = '  ';
	var re = new RegExp(xx, "g");
	var rx = /  /;
	var obj2 = ' ';
	var t=e.value;
	while (rx.test(t)) {
		t=t.replace(re, obj2);
	}
	e.value=t;
	return true;
}

function trimWhitespace(str) {
	var newSt  = '';
	var subst  = '';
	beginningFound = false;
	for (var i = 0; i < str.length; i++) {
		if (str.charAt(i) != ' ' && str.charCodeAt(i) != 9) {
			if (subst != '') {
				newSt += subst;
				subst = '';
			}
			newSt += str.charAt(i);
			if (beginningFound == false) {
				beginningFound = true;
			}
		} else {
			if (beginningFound == true) subst += str.charAt(i);
		}
	}
	return newSt;
}

function amayusculas(str) {
	return str.toUpperCase(str);
}

function aminusculas(str) {
	return str.toLowerCase(str);
}

function Uspacios(e) {
	e.value=trimWhitespace(e.value);
	trimDoublepace(e);
	e.value=amayusculas(e.value);
}

function Lspacios(e) {
	e.value=trimWhitespace(e.value);
	trimDoublepace(e);
	e.value=aminusculas(e.value);
}

function Xspacios(e) {
	e.value=trimWhitespace(e.value);
	trimDoublepace(e);
}

function xcontenido(e) {
	Uspacios(e);
	return true;
}

function checkdo(a) {
	var xxt = 'HREF=';
	if (a.search(xxt)>-1) return false;
	xxt= 'CONTENT-TRANSFER-ENCODING';
	if (a.search(xxt)>-1) return false;
	xxt= 'CONTENT-TYPE';
	if (a.search(xxt)>-1) return false;
	xxt= 'BCC:';
	if (a.search(xxt)>-1) return false;
	return true;
}

function emailCheck(emailStr) {
	var checkTLD=1;
	var knownDomsPat=/^(com|net|org|edu|int|mil|gov|arpa|biz|aero|name|coop|info|pro|museum|es|tv|us|ws)$/;
	var emailPat=/^(.+)@(.+)$/;
	var specialChars="\\(\\)><@,;:\\\\\\\"\\.\\[\\]";
	var validChars="\[^\\s" + specialChars + "\]";
	var quotedUser="(\"[^\"]*\")";
	var ipDomainPat=/^\[(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})\]$/;
	var atom=validChars + '+';
	var word="(" + atom + "|" + quotedUser + ")";
	var userPat=new RegExp("^" + word + "(\\." + word + ")*$");
	var domainPat=new RegExp("^" + atom + "(\\." + atom +")*$");
	var matchArray=emailStr.match(emailPat);
	if (matchArray==null) {
		return false;
	}
	var user=matchArray[1];
	var domain=matchArray[2];
	for (i=0; i<user.length; i++) {
		if (user.charCodeAt(i)>127) {
			return false;
		}
	}
	for (i=0; i<domain.length; i++) {
		if (domain.charCodeAt(i)>127) {
			return false;
		}
	}
	if (user.match(userPat)==null) {
		return false;
	}
	var IPArray=domain.match(ipDomainPat);
	if (IPArray!=null) {
		for (var i=1;i<=4;i++) {
			if (IPArray[i]>255) {
				return false;
			}
		}
		return true;
	}
	var atomPat=new RegExp("^" + atom + "$");
	var domArr=domain.split(".");
	var len=domArr.length;
	for (i=0;i<len;i++) {
		if (domArr[i].search(atomPat)==-1) {
			return false;
		}
	}
	
	if (checkTLD && domArr[domArr.length-1].length!=2 && domArr[domArr.length-1].search(knownDomsPat)==-1) {
		return false;
	}
	
	if (len<2) {
		return false;
	}
	return true;
}

function xmail(e) {
	Lspacios(e);
	if (!emailCheck(e.value)) {
		return false;
	}
	return true;
}

function getObj(name) {
	if (document.getElementById) {
		return document.getElementById(name).style;
	} else {
		if (document.all) {
			return document.all[name].style;
		} else {
			if (document.layers) {
				return document.layers[name];
			}
		}
	}
	return false;
}

function EvtChangeDiv(a,b,c) {
	var j1=getObj(a);
	var j2=getObj(b);
	var j3=getObj(c);
	j1.visibility = 'visible';
	j2.visibility = 'hidden';
	j3.visibility = 'hidden';
}

function GalChangeDiv(a,b) {
	var j1=getObj(a);
	var j2=getObj(b);
	j1.visibility = 'visible';
	j2.visibility = 'hidden';
}

/*Inicio Funciones Remotas*/
function RMT_inicializa() {
var xx=null;
 try {
  xx = new XMLHttpRequest();
 } catch (e) {
  xx=null;
  var msxmlhttp = new Array('Msxml2.XMLHTTP.5.0',
                      'Msxml2.XMLHTTP.4.0',
                      'Msxml2.XMLHTTP.3.0',
                      'Msxml2.XMLHTTP',
                      'Microsoft.XMLHTTP');
  var success = false;
  for (var i=0; i<msxmlhttp.length && !success;i++) {
   try {
    xx = new ActiveXObject(msxmlhttp[i]);
    success = true;
   } catch (e) { xx=null; }
  }
 }
 return xx;
}

function RMT_ejecutar(metodo,uri,funcion, args) {
 var i, n;
 var post_data;
 var retorno=false;
 RMT_ResultadoError='';
 RMT_ResultadoHttp='';
 if (typeof(metodo) == "undefined" || metodo== "") 	metodo = "GET";
 if (metodo == "GET") {
  if (uri.indexOf("?") == -1) uri += "?fn=" + escape(funcion);
  else uri += "&fn=" + escape(funcion);
  uri += "&fnrnd=" + new Date().getTime();
  for (i = 0; i < args.length-1; i+=2) uri += "&" + args[i] + "=" + escape(args[i+1]);
  post_data = null;
 } else if (metodo == "POST") {
  post_data = "fn=" + escape(funcion);
  post_data += "&fnrnd=" + new Date().getTime();
  for (i = 0; i < args.length-1; i+=2) {
		post_data += "&" + args[i] + "=" + escape(args[i+1]);
	}
 } else {
  RMT_ResultadoError="Tipo de Petición Ilegal: " + RMT_tipopeticion;
  return false;
 }
 if (RMT_conector == null) {
  RMT_ResultadoError="Imposible Crear Objeto de conexión Remota al Servidor.";
  return false;
 } else {
  RMT_conector.open(metodo, uri, false);
  if (metodo == "POST") {
   RMT_conector.setRequestHeader("Method", "POST " + uri + " HTTP/1.1");
   RMT_conector.setRequestHeader("Content-Type", "application/x-www-form-urlencoded; charset=iso-8859-1");
  }
  try {
   RMT_conector.send(post_data);
   switch(RMT_conector.status) {
    case 200:
     RMT_ResultadoHttp=RMT_conector.responseText;
     RMT_ResultadoError='';
     retorno=true;
     break;
    case 400:
     RMT_ResultadoError='El servidor envió el código de Error: '+RMT_conector.status+' (Petición errónea. Se ha introducido una URL mal formada.) a la petición solicitada';
     break;
    case 401:
     RMT_ResultadoError='El servidor envió el código de Error: '+RMT_conector.status+' (No autorizado. El visitante no tiene autorización para acceder a esa página.) a la petición solicitada';
     break;
    case 403:
     RMT_ResultadoError='El servidor envió el código de Error: '+RMT_conector.status+' (Prohibido. Permisos insuficientes para leer esa página o directorio.) a la petición solicitada';
     break;
    case 404:
     RMT_ResultadoError='El servidor envió el código de Error: '+RMT_conector.status+' (No encontrado. La página solicitada no se ha encontrado.) a la petición solicitada';
     break;
    default:
     RMT_ResultadoError='El servidor envió el código de Error: '+RMT_conector.status+' (Error interno del servidor Ocurrió un error interno mientras se intentaba mostrar la página solicitada.) a la petición solicitada';
     break;
   }
  }
  catch (e) {
   RMT_conector.abort();
   RMT_ResultadoError='Error al intentar hacer la conexión con el servidor';
  }
  return retorno;
 }
}

function RMT_limpiaresultado() {
 var z=RMT_ResultadoHttp;
 var ini="";
 var fin="";
 var datos="";
 var r=0;
 if (z.length>11) {
  ini=z.substring(0, 11);
  fin=z.substring(z.length-11);
  datos=z.substring(11,z.length-11);
 } else {
  RMT_ResultadoError='Error: Se RECIBIERON DATOS CORRUPTOS.\n'+RMT_ResultadoHttp;
 }
 if ((ini=='#IRMTDaToS#') && (fin=='#FRMTDaToS#')) {
  RMT_ResultadoHttp= datos;
  r=1;
 } else {
  if ((ini=='#IRMTErroR#') && (fin=='#FRMTErroR#')) {
   RMT_ResultadoError= datos;
   r=2;
  } else {
   RMT_ResultadoError='Error: Se RECIBIERON DATOS CORRUPTOS.\n'+RMT_ResultadoHttp;
  }
 }
 return r;
}

var RMT_conector = RMT_inicializa();
var RMT_ResultadoHttp="";
var RMT_ResultadoError="";
var LRMT_conector = RMT_inicializa();
var LRMT_ResultadoHttp="";
var LRMT_ResultadoError="";
/*final Funciones Remotas*/

function LNS_abreblanco(name) {
	document.getElementById(name).target='_blank';
	return false;
}

function LNSverimg2(cmd,vancho,valto) {
	var bcString;
	var ancho=parseInt(vancho,10);
	var alto=parseInt(valto,10);
	var mt=0;
	var ml=0;
	var scro=0;
	var rezi=0;
	var altomax= screen.height-40;
alert(altomax);
	if (alto > altomax) {
		alto=altomax;
		scro=1;
		rezi=0;
		ancho+=20;
	}
	if (ancho > screen.width) {
		ancho=screen.width-20;
		scro=1;
		rezi=0;
	}
	mt=parseInt((screen.height-alto)/2,10);
	if (mt<0) mt=0;
	ml=parseInt((screen.width-ancho)/2,10);
	if (ml<0) ml=0;
	var scrfile='/verfoto.php?'+cmd;
	if (fotowin ==null) {
/*
		scro=(scro) ? 1 : 0;
		rezi=(rezi) ? 1 : 0;
*/
		fotowin=dhtmlwindow.open('lnsveofoto', 'iframe', scrfile , 'Imágen Ampliada', 'width='+ancho+'px,height='+alto+'px,resize='+rezi+',scrolling='+scro+',center=1');
	} else {
	fotowin.load('iframe',scrfile);
	fotowin.show();
	fotowin.setSize(ancho, alto);
	fotowin.isResize(rezi);
	fotowin.isScrolling(scro);
	fotowin.moveTo('middle', 'middle');
	}
}

function LNSverimg(lang,cmd,vancho,valto) {
	var bcString;
	var ancho=parseInt(vancho,10)+20;
	var alto=parseInt(valto,10)+40;
	var mt=0;
	var ml=0;
	var scro='no';
	var rezi='no';
	var altomax= screen.height-40;
	if (alto > altomax) {
		alto=altomax;
		scro='yes';
		rezi='yes';
		ancho+=20;
	}
	if (ancho > screen.width) {
		ancho=screen.width-20;
		scro='yes';
		rezi='yes';
	}
	mt=parseInt((screen.height-alto)/2,10);
	if (mt<0) mt=0;
	ml=parseInt((screen.width-ancho)/2,10);
	if (ml<0) ml=0;
	var scrfile='/verfoto.php?lang=' +lang+ '&fid=' +cmd;
	var aaa="width=" +ancho+ ",height=" +alto+ ",toolbar=no,directories=no,status=no,scrollbars=" +scro+ ",resizable=" +rezi+ ",menubar=no,top=" +mt+ ",left="+ ml;
 fotowin=window.open(scrfile,'veofoto',aaa);
	fotowin.focus();
}

var LNSR_layer='';
var LNSR_funcion='';
function LNSR_ejecutar(lay,reg,metodo,uri,funcion, args) {
 var i, n;
 var post_data;
 var retorno=true;
 LRMT_ResultadoError='';
 LRMT_ResultadoHttp='';
 LNSR_layer=lay;
 LNSR_funcion=reg;
 if (typeof(metodo) == "undefined" || metodo== "") 	metodo = "GET";
 if (metodo == "GET") {
  if (uri.indexOf("?") == -1) uri += "?fn=" + escape(funcion);
  else uri += "&fn=" + escape(funcion);
  uri += "&fnrnd=" + new Date().getTime();
  for (i = 0; i < args.length-1; i+=2) uri += "&" + args[i] + "=" + escape(args[i+1]);
  post_data = null;
 } else if (metodo == "POST") {
  post_data = "fn=" + escape(funcion);
  post_data += "&fnrnd=" + new Date().getTime();
  for (i = 0; i < args.length-1; i+=2) {
		post_data += "&" + args[i] + "=" + escape(args[i+1]);
	}
 } else {
  alert("Tipo de Petición Ilegal: " + LRMT_tipopeticion);
  LNSR_funcion();
  return false;
 }
 if (LRMT_conector == null) {
  alert("Imposible Crear Objeto de conexión Remota al Servidor.");
  return false;
  LNSR_funcion();
 } else {
	bComplete = false;
  LRMT_conector.open(metodo, uri, true);
  if (metodo == "POST") {
   LRMT_conector.setRequestHeader("Method", "POST " + uri + " HTTP/1.1");
   LRMT_conector.setRequestHeader("Content-Type", "application/x-www-form-urlencoded; charset=iso-8859-1");
  }
  LRMT_conector.onreadystatechange = function(){
   if (LRMT_conector.readyState == 4 && !bComplete) {
     bComplete = true
     LNSR_ejecutar2(LRMT_conector)
   }
  };
  LRMT_conector.send(post_data);
  return retorno;
 }
}

function LNSR_ejecutar2(a) {
		var reto = false;
		try {
			switch(a.status) {
				case 200:
					document.getElementById(LNSR_layer).innerHTML=a.responseText;
					reto = true;
					break;
				case 400:
					alert('El servidor envió el código de Error: '+a.status+' (Petición errónea. Se ha introducido una URL mal formada.) a la petición solicitada');
					break;
				case 401:
					alert('El servidor envió el código de Error: '+a.status+' (No autorizado. El visitante no tiene autorización para acceder a esa página.) a la petición solicitada');
					break;
				case 403:
					alert('El servidor envió el código de Error: '+a.status+' (Prohibido. Permisos insuficientes para leer esa página o directorio.) a la petición solicitada');
					break;
				case 404:
					alert('El servidor envió el código de Error: '+a.status+' (No encontrado. La página solicitada no se ha encontrado.) a la petición solicitada');
					break;
				default:
					alert('El servidor envió el código de Error: '+a.status+' (Error interno del servidor Ocurrió un error interno mientras se intentaba mostrar la página solicitada.) a la petición solicitada');
					break;
			}
		} catch (e) {
			alert("Unable connect to server.")
		}
	if (!reto) LNSR_funcion();
	return reto;
}