var CantAux = 0;
var ahora = new Date();
var diaActual = ahora.getDate();
var mesActual = ahora.getMonth()+1; // mas 1 porque empieza en 0
var anyoActual = ahora.getFullYear();
var ie4      = (typeof(document.all) != 'undefined' && parseInt(navigator.appVersion) >= 4) ? 1 : 0;
var knownDomsPat=/^(com|net|org|edu|int|mil|gov|arpa|biz|aero|name|coop|info|pro|museum|co|uk|es)$/;


function FSfncValidateEmailAddress (FormField,CheckTLD) {
	// CheckTLD es opcionalis optional, acepta los valores true, false, y null.
	emailStr = FormField.value.toLowerCase()
	if (CheckTLD==null) {CheckTLD=true}
	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) {
//		alert(FormField.title + " parece ser incorrecta (Compruebe arroba (@) y puntos (.))"); 
		FormField.focus(); 
		return false
	}
	var user=matchArray[1];
	var domain=matchArray[2];
	for (i=0; i<user.length; i++) {
		if (user.charCodeAt(i)>127) {
//			alert(FormField.title + ": nombre de usuario contiene caracteres inválidos");
			FormField.focus(); 
			return false
		}
	}
	for (i=0; i<domain.length; i++) {
		if (domain.charCodeAt(i)>127) {
			//alert(FormField.title + ": nombre de dominio contiene caracteres inválidos");
			FormField.focus(); return false
		}
	}
	if (user.match(userPat)==null) {
		//alert(FormField.title + ": nombre de usuario no es válido."); 
		FormField.focus();
		return false
		}
	var IPArray=domain.match(ipDomainPat);
	if (IPArray!=null) {
		for (var i=1;i<=4;i++) {
			if (IPArray[i]>255) {
				//alert(FormField.title + ": dirección IP no es válida");
				FormField.focus();
				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) {
			//alert(FormField.title + ": nombre de dominio no es válido."); 
			FormField.focus(); 
			return false
		}
	}
	if ((CheckTLD) && (domArr[domArr.length-1].length!=2) && (domArr[domArr.length-1].search(knownDomsPat)==-1)) {
		//alert(FormField.title + ": debe terminar en dominio bien conocido o país de dos letras.");
		FormField.focus();
		return false
	}
	if (len<2) {
		//alert(FormField.title + ": le falta un nombre de anfitrión");
		FormField.focus(); 
		return false
	}
	return true;
}

function checkRegistro(formulario) {
	var error, str_error;
	error=0;
	str_error = "";
	if ( formulario.pais.value.length < 3 ){
		error=1;
		str_error = "Debe ingresar su pais\r\n"+str_error;
		formulario.pais.focus();
	}

	if ( formulario.ciudad.value.length < 3 ){
		error=1;
		str_error = "Debe ingresar su ciudad\r\n"+str_error;
		formulario.ciudad.focus();
	}
	if ( formulario.temas.value.length < 1 ){
		error=1;
		str_error = "Debe ingresar temas de interes\r\n"+str_error;
		formulario.temas.focus();
	}

	if ( formulario.clave.value != formulario.clave1.value ){
		error=1;
		str_error = "La clave y la confirmacion deben ser iguales\r\n"+str_error;
		formulario.clave.focus();
	}
	if ( formulario.clave.value.length < 5 ){
		error=1;
		str_error = "La clave debe superar los 5 caracteres\r\n"+str_error;
		formulario.clave.focus();
	}
	if (!FSfncValidateEmailAddress(formulario.email)) {
		error=1;
		str_error = "Dirección de e-mail inválida\r\n"+str_error;
		formulario.email.focus();
	}
	if ( formulario.nombre.value.length < 3 ){ 
		error=1;
		str_error = "Su nombre debe contener como mínimo 3 caracteres\r\n"+str_error;
		formulario.nombre.focus();
	}
	if ( formulario.apellido.value.length < 3 ){ 
		error=1;
		str_error = "Su apellido debe contener como mínimo 3 caracteres\r\n"+str_error;
		formulario.apellido.focus();
	}
	if (error==1){
		alert (str_error);
		return;
	}else{
		formulario.submit();
	}
}



function popWin(url)    {
//alert ("dd");	
window.open(url,'popupWindow','toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=yes,resizable=no,copyhistory=no,width=500,height=500,screenX=50,screenY=50,top=50,left=50');
}

function popDatosImagenes(creditos)    {
//alert ("dd");	
window.open(creditos,'popupWindow','toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=yes,resizable=no,copyhistory=no,width=517,height=500,screenX=50,screenY=50,top=50,left=50');
}

function popDatos(url,the_form,name_ch)    {
// falta tomar datos del form	
	j=0;
	with (document.forms[the_form]){
          for (var i=0; i < elements.length; i++){
               if (elements[i].type == 'checkbox' && elements[i].name == name_ch){
				   if (elements[i].checked == true){
					   url = url + "&id"+j+"="+elements[i].value ;
					   j=j+1;
				   }
			   }
           }
     }
	 url = url + "&cant="+j;
	window.open(url,'popupWindow','toolbar=no,scrollbars=yes,location=no,directories=no,status=no,menubar=no,resizable=no,copyhistory=no,width=500,height=400,screenX=150,screenY=150,top=150,left=150');
}


function doComm(invar){
	window.location = invar;
}

function cerrarIr(dir,url){
	window.opener.location = dir + url;
	window.close();
}
function irA(url){
	window.location = url;
}

function irA_Datos (url,the_form,name_ch){
	j=0;
	with (document.forms[the_form]){
          for (var i=0; i < elements.length; i++){
               if (elements[i].type == 'checkbox' && elements[i].name == name_ch){
				   if (elements[i].checked == true){
					   url = url + "&id"+j+"="+elements[i].value ;
					   j=j+1;
				   }
			   }
           }
     }
	 url = url + "&cant="+j;
	 window.location = url;
}

function maximaLongitud(texto,maxlong) { 
  var tecla, in_value, out_value; 

  if (texto.value.length > maxlong) { 
    in_value = texto.value; 
    out_value = in_value.substring(0,maxlong); 
    texto.value = out_value; 
    return false; 
  } 
  return true; 
}


function checkMisDatos(formulario) {
	var error, str_error;
	error=0;
	str_error = "";
	if ( formulario.pais.value.length < 3 ){
		error=1;
		str_error = "Debe ingresar su pais\r\n"+str_error;
		formulario.pais.focus();
	}

	if ( formulario.ciudad.value.length < 3 ){
		error=1;
		str_error = "Debe ingresar su ciudad\r\n"+str_error;
		formulario.ciudad.focus();
	}
	if ( formulario.temas.value.length < 8 ){
		error=1;
		str_error = "Debe ingresar temas de interes\r\n"+str_error;
		formulario.temas.focus();
	}

	if ( formulario.clave.value != formulario.clave1.value ){
		error=1;
		str_error = "La clave y la confirmacion deben ser iguales\r\n"+str_error;
		formulario.clave.focus();
	}
	if ( formulario.clave.value.length < 5 && formulario.clave.value.length > 0){
		error=1;
		str_error = "La clave debe superar los 5 caracteres\r\n"+str_error;
		formulario.clave.focus();
	}

	if (!FSfncValidateEmailAddress(formulario.email)) {
		error=1;
		str_error = "Dirección de e-mail inválida\r\n"+str_error;
		formulario.email.focus();
	}
	if ( formulario.nombre.value.length < 3 ){ 
		error=1;
		str_error = "Su nombre debe contener como mínimo 3 caracteres\r\n"+str_error;
		formulario.nombre.focus();
	}
	if ( formulario.apellido.value.length < 3 ){ 
		error=1;
		str_error = "Su apellido debe contener como mínimo 3 caracteres\r\n"+str_error;
		formulario.apellido.focus();
	}
	if (error==1){
		alert (str_error);
		return;
	}else{
		formulario.submit();
	}
}
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_reloadPage(init) {  //reloads the window if Nav4 resized
  if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
    document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
  else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);

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_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_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];}
}