<!--
function abrirVentana(direccion,destino,opcs) { //v2.0
  window.open(direccion,destino,opcs);
}

function cambiaColor(src,color,bgcolor,borde)
{
  src.style.cursor="hand";
  src.style.color=color;
  src.style.backgroundColor=bgcolor;
  src.style.borderColor=borde;
}

function fecha()
{
  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");
  var hoy= new Date();
  document.write(diasemana[hoy.getDay()]+", "+hoy.getDate()+" de "+mes[hoy.getMonth()]+" de "+hoy.getYear());
}

function RestauraMenu() { //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 CargaImagenes() { //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=CargaImagenes.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.0
  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 && document.getElementById) x=document.getElementById(n); return x;
}

function CambiaMenu() { //v3.0
  var i,j=0,x,a=CambiaMenu.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];}
}

function validarbs()
{
  var error="";
  if ((document.buzon.demail.value=="") || (document.buzon.de.value=="") || (document.buzon.asunto.value=="") || (document.buzon.mensaje.value=="")) {
   error+='Por favor, introduzca todos los datos que se solicitan.\n';
   if (document.buzon.de.value=="") document.buzon.de.focus();
   else if (document.buzon.demail.value=="") document.buzon.demail.focus();
   else if (document.buzon.asunto.value=="") document.buzon.asunto.focus();
   else if (document.buzon.mensaje.value=="") document.buzon.mensaje.focus();
  }
  else {
   if (!(validaremail(document.buzon.demail.value))) {
     error+='e-mail introducido no válido.\n';
     document.buzon.demail.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;
}

//-->