function valida(form) {
  if (existe_algo(form.email.value))
    {
     if (!isEmail(form.email.value))
       {
        alert('O endereço de e-mail não é válido!');
        return false;
       }
    }
  if (!existe_algo(form.link.value))
    {
     alert('O endereço da página é obrigatório!');
     return false;
    }
  if (!existe_algo(form.txt_imagem.value))
    {
     alert('Digite os caracteres da figura!');
     return false;
    }
/*  else
    {
     alert('Sua denúncia foi enviada com sucesso!');
     return true;
    }*/

     return true;
}

function existe_algo(entrada)
{ //tira espaços em branco

  var saida = '';

  for (var i = 0; i < entrada.length; i++)
  {
     if (entrada.charAt(i) != ' ')
     {
       saida = saida + entrada.charAt(i);
     }
  }
  
  if (saida.length == 0)
       return false;
  else
       return true;
}

function isEmail(str) {
  // are regular expressions supported?
  var supported = 0;
  if (window.RegExp) {
    var tempStr = "a";
    var tempReg = new RegExp(tempStr);
    if (tempReg.test(tempStr)) supported = 1;
  }
  if (!supported) 
    return (str.indexOf(".") > 2) && (str.indexOf("@") > 0);
  var r1 = new RegExp("(@.*@)|(\\.\\.)|(@\\.)|(^\\.)");
  var r2 = new RegExp("^.+\\@(\\[?)[a-zA-Z0-9\\-\\.]+\\.([a-zA-Z]{2,3}|[0-9]{1,3})(\\]?)$");
  return (!r1.test(str) && r2.test(str));
}