function MM_findObj(n, d) 
      {
       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&&id.layers.length;i++) 
        x=MM_findObj(n,d.layers[i].document); 
      
       return x;
      }

	
      function MM_showHideLayers() 
      {
       var i,p,v,obj,args=MM_showHideLayers.arguments;

       for (i=0; i<(args.length-2); i+=3) 
       if ((obj=MM_findObj(args[i]))!=null) 
       { 
        v=args[i+2];
        if (obj.style) 
        { 
         obj=obj.style; v=(v=='show')?'visible':(v='hide')?'hidden':v; 
        }
        obj.visibility=v; 
       }
      }


    function MM_openBrWindow(theURL,winName,features)
	{ 
	window.open(theURL,winName,features);
	}


<!-- Begin
function emailCheck (emailStr) 
{
	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]

	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 domainArray=domain.match(domainPat)
	if (domainArray==null) 
	{
		return false
	}

	var atomPat=new RegExp(atom,"g")
	var domArr=domain.match(atomPat)
	var len=domArr.length
	if (domArr[domArr.length-1].length<2 || domArr[domArr.length-1].length>3) 
	{
		return false
	}

	if (len<2) 
	{
		return false
	}

	return true;
}

      function Valida_formulario()
      {
        var i,password,email,p,q,nm,test,num,min,max,errors='',args=Valida_formulario.arguments;

        for (i=0; i<(args.length-2); i+=3)
        {
          test=args[i+2];
          val=MM_findObj(args[i]);

          if (val)
          {
            nm=val.name;
	    email = val.value
	    if(nm=="password")
	    {
		password = val.value
	    }
	    if((nm=="password_confirm")&&(password!=val.value))
	    {
		errors +='- Os domínios senha e confirmar senha não coincide.\n';
            }
            if ((val=val.value)!="")
            {
              if (test.indexOf('isEmail')!=-1)
              {
                if (!emailCheck(email)) errors+='- '+nm+' deve ser uma direcçãde e-mail.\n';
              }
              else if (test!='R')
              {
                num = parseFloat(val);

                if (val!=''+num) errors+='- '+nm+' deve ser um número.\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+' deve ser um número ente '+min+' y '+max+'.\n';
                }
              }
            }
            else if (test.charAt(0) == 'R') errors += '- '+nm+' é requerido.\n';
          }
        }

        if (errors) alert('Produziram-se os seguintes erros:\n'+errors);

      document.MM_returnValue = (errors == '');
      }



      function MM_validateForm() 
      {
        var i,p,q,nm,test,num,min,max,errors='',args=MM_validateForm.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=val.indexOf('@');

                if (p<1 || p==(val.length-1)) errors+='- '+nm+' debe ser una direccion e-mail.\n';
              } 
              else if (test!='R') 
              { 
                num = parseFloat(val);

                if (val!=''+num) errors+='- '+nm+' debe ser un número.\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 ser un número entre '+min+' y '+max+'.\n';
                } 
              } 
            } 
            else if (test.charAt(0) == 'R') errors += '- '+nm+' es requerido.\n'; 
          }
        } 

        if (errors) alert('Se ha(n) producido el/los siguiente(s) error(s):\n'+errors);

      document.MM_returnValue = (errors == '');
      }