<!--

function abrirVentana(direccion,destino,opcs) {
  window.open(direccion,destino,opcs);
}

function redimPagina() {
  window.resizeTo(document.Foto.width+10,document.Foto.height+30);
  window.moveTo((screen.width-(document.Foto.width+10))/2,(screen.height-(document.Foto.height+30))/2)
  return true;
}

function cambiaEstilo(src,color,bgcolor,borde,deco)
{
  src.style.cursor='pointer';
  src.style.color=color;
  src.style.backgroundColor=bgcolor;
  src.style.borderColor=borde;
  src.style.textDecoration=deco;
}

function cambiaTamanio(src,t,l)
{
  src.style.fontSize=t;
  src.style.lineHeight=l;
}

function fecha(fecha,lang)
{
  var f,fstr;
  if (fecha=="") { 
    f= new Date();
  } 
  else {
    fstr=fecha.substring(3,5)+"/"+fecha.substring(0,2)+"/"+fecha.substring(6,10);
    f= new Date(fstr);
  }
  if (document.all) {
    anio=f.getYear()
  }
  else {
    anio=f.getYear()+1900;
  }    
  if (lang=="es") {
    var diasemana=new Array("Domingo","Lunes","Martes","Miércoles","Jueves","Viernes","Sábado");
    var mes=new Array("Enero","Febrero","Marzo","Abril","Mayo","Junio","Julio","Agosto","Septiembre","Octubre","Noviembre","Diciembre");
    document.write(diasemana[f.getDay()]+", "+f.getDate()+" de "+mes[f.getMonth()]+" de "+anio);
  }
  else {
   if (lang=="pt") {
     var diasemana=new Array("Domingo","Segunda-feira","Terça-feira","Quarta-feira","Quinta-feira","Sexta-feira","Sábado");
     var mes=new Array("Janeiro","Fevereiro","Março","Abril","Pode","Junho","Julho","Agosto","Setembro","Outubro","Novembro","Dezembro");
     document.write(diasemana[f.getDay()]+", "+f.getDate()+" de "+mes[f.getMonth()]+" de "+anio);
   }
   else {
     var diasemana=new Array("Sunday","Monday","Tuesday","Wednesday","Thursday","Friday","Saturday");
     var mes=new Array("January","February","March","April","May","June","July","August","September","October","November","December");
     document.write(diasemana[f.getDay()]+", "+mes[f.getMonth()]+" "+f.getDate()+", "+anio);
   }
  }  
}

function buscar(lang)
{
  if (document.all.buscador.value=="") {
    document.all.buscador.focus();
  } 
  else {
    if (document.all.donde.i.checked) {
      document.location.href="buscador.asp?p="+document.all.buscador.value+"&lang="+lang;
    } 
    else {
      if (lang=="es") {
        window.open("http://es.search.yahoo.com/search?p="+document.all.buscador.value,"_blank","");
      }
      else {
        window.open("http://search.yahoo.com/search?p="+document.all.buscador.value,"_blank","");
      }
    }
  }
}

function ct(lang)
{
  if (document.all) {
    tecla=event.keyCode;
  }
  else {
    tecla=e.keyCode;
  }
  if (tecla==13) buscar(lang);
}

function validarContact(lang) {
  var error="";
  if ((document.Contact.DeMail.value=="") || (document.Contact.De.value=="") || (document.Contact.Asunto.value=="") || (document.Contact.Mensaje.value=="")) {
   if (lang=="es") error+='Por favor, introduzca todos los datos solicitados.\n';
   else if (lang=="pt") error+='Por favor, introduza todos os dados solicitados.\n';
   else if (lang=="en") error+='Please, fill all solicited data.\n';
   if (document.Contact.De.value=="") document.Contact.De.focus();
   else if (document.Contact.DeMail.value=="") document.Contact.DeMail.focus();
   else if (document.Contact.Asunto.value=="") document.Contact.Asunto.focus();
   else if (document.Contact.Mensaje.value=="") document.Contact.Mensaje.focus();
  }
  else {
   if (!(validaremail(document.Contact.DeMail.value))) {
     if (lang=="es") error+='dirección de e-mail inválida.\n';
     else if (lang=="pt") error+='direção de e-mail inválida\n';
     else if (lang=="en") error+='invalid e-mail address.\n';
     document.Contact.DeMail.focus();
   }
  }
  if (error!="") alert('Error:\n'+error);
  document.MM_returnValue = (error=="");
}

function validarEnviar(lang) {
  var error="";
  if ((document.Enviar.DeMail.value=="") || (document.Enviar.De.value=="") || (document.Enviar.ParaMail.value=="")) {
   if (lang=="es") error+='Por favor, introduzca todos los datos marcados con (*).\n';
   else if (lang=="pt") error+='Por favor, introduza todos os dados marcados com (*).\n';
   else if (lang=="en") error+='Please, fill all data marked with (*).\n';
   if (document.Enviar.De.value=="") document.Enviar.De.focus();
   else if (document.Enviar.DeMail.value=="") document.Enviar.DeMail.focus();
   else if (document.Enviar.ParaMail.value=="") document.Enviar.ParaMail.focus();
  }
  else {
   if (!(validaremail(document.Enviar.DeMail.value))) {
     if (lang=="es") error+='dirección de e-mail inválida.\n';
     else if (lang=="pt") error+='direção de e-mail inválida\n';
     else if (lang=="en") error+='invalid e-mail address.\n';
     document.Enviar.DeMail.focus();
   } 
   else {
    if (!(validaremail(document.Enviar.ParaMail.value))) {
      if (lang=="es") error+='dirección de e-mail inválida.\n';
      else if (lang=="pt") error+='direção de e-mail inválida\n';
      else if (lang=="en") error+='invalid e-mail address.\n';
      document.Enviar.ParaMail.focus();
    }
   }
  }
  if (error!="") alert('Error:\n'+error);
  document.MM_returnValue = (error=="");
}

function validaremail(cadena)
{
  var largo=cadena.length;
  
  if (largo==0) return false;

  var estado=0;
  var caracter="";
  
  for (i=0;i<largo;i++) {
    caracter=cadena.charAt(i);
    if (((caracter>="a") && (caracter<="z")) || ((caracter>="A") && (caracter<="Z")) || ((caracter>="0") && (caracter<="9")))
      caracter="A";
    if ((caracter=="-") || (caracter=="_")) caracter="-";
    switch (caracter) {
      case "A":
        switch (estado) {
          case 0:
            estado=1;
            break;
          case 1:
            estado=1;
            break;
          case 2:
            estado=3;
            break;
          case 3:
            estado=3; 
            break;
          case 4:
            estado=5; 
            break;
          case 5:
            estado=6; 
            break;
          case 6:
            estado=7; 
            break;
          case 7:
            return false; 
            break;
        }
        break;
      case "-":
        switch (estado) {  
          case 1:
            estado=1;
            break;
          case 3:
            estado=3;
            break;
          default:
            return false;
        }
        break;
      case ".":
        switch (estado) {
          case 1:
            estado=0;
            break;
          case 3:
            estado=4;
            break;
          default:
            return false;
        }
        break;
      case "@":
        switch (estado) {
          case 1:
            estado=2;
            break;
          default:
            return false;
        }
        break;
      default:
        return false;
    }
  }
  if ((estado==6) || (estado==7)) return true;
  else return false;
}

//-->