function numero_veces(cadena,caracter)
{
	var numVeces=0;

	while (cadena.indexOf(caracter,0)!=-1)
	{
		numVeces++;
		cadena=cadena.substr(cadena.indexOf(caracter,0)+1);
	}
	return numVeces;
}

function reversa(cadena)
{
	var resultado="";

	while (cadena!="")
	{
		resultado=resultado.concat(cadena.substr(cadena.length-1));
		cadena=cadena.substr(0,cadena.length-2);
	}
	return resultado;
}

function es_email(email)
{
	var cadena = email.value;
	var flag=true;

	//si hay espacios en blanco...
	if (cadena.indexOf(" ")!=-1)
		flag=false;
	//debe haber un único "@" en el medio de la cadena, así como no son
	//permitidos: "@.", ".@" o ".."
	//no puede empezar o terminar en "." o "@"
	//por lo menos debe haber un "."
	if ((numero_veces(cadena,"@")!=1) || (cadena.indexOf("@")==0) ||
		(numero_veces(cadena,".")==0) || (cadena.indexOf(".")==0) ||
		(cadena.indexOf("..")!=-1) ||
		(cadena.indexOf("@.")!=-1) || (cadena.indexOf(".@")!=-1) ||
		(reversa(cadena).indexOf(".")==0) ||
		(reversa(cadena).indexOf("@")==0))
		flag=false;
	//por lo menos debe haber un "." después de "@"
	cadena = cadena.substr(cadena.indexOf("@")+1);

	if (cadena.indexOf(".")==-1)
		flag=false;
	return flag;
}

function valida_mail(email)
{
	if (email.value.length!=0)
	{
		if (es_email(email))
			return true;
		else
			return false;
	}
	else
		return false;
}

/*------------------------------------------------------------*/
		/* Begin - Script para conteo de caracteres */

/* This script and many more are available free online at
The JavaScript Source!! http://javascript.internet.com
Created by: Steve | http://jsmadeeasy.com/ */
/*------------------------------------------------------------*/

function getObject(obj) {
  var theObj;
  if(document.all) {
    if(typeof obj=="string") {
      return document.all(obj);
    } else {
      return obj.style;
    }
  }
  if(document.getElementById) {
    if(typeof obj=="string") {
      return document.getElementById(obj);
    } else {
      return obj.style;
    }
  }
  return null;
}

function toCount(entrance,exit,text,characters) {
  var entranceObj=getObject(entrance);
  var exitObj=getObject(exit);
  var length=characters - entranceObj.value.length;
  if(length <= 0) {
    length=0;
    text='<span class="disable"> '+text+' </span>';
    entranceObj.value=entranceObj.value.substr(0,characters);
  }
  exitObj.innerHTML = text.replace("{CHAR}",length);
}

/*------------------------------------------------------------*/
		/* End - Script para conteo de caracteres */
/*------------------------------------------------------------*/