function emailCheck (Cadena) {

Punto = Cadena.substring(Cadena.lastIndexOf('.') + 1, Cadena.length)
Dominio = Cadena.substring(Cadena.lastIndexOf('@') + 1, Cadena.lastIndexOf('.'))
Usuario = Cadena.substring(0, Cadena.lastIndexOf('@'))
Reserv = "@/º\"'+*{}\<>?¿[]áéíóú#·¡!^*;,:"

valido = true

// verifica qie el Usuario no tenga un caracter especial
	for (var Cont=0; Cont<Usuario.length; Cont++) {
		X = Usuario.substring(Cont,Cont+1)
		if (Reserv.indexOf(X)!=-1)
                	valido = false
	}

// verifica qie el Punto no tenga un caracter especial
	for (var Cont=0; Cont<Punto.length; Cont++) {
		X=Punto.substring(Cont,Cont+1)
		if (Reserv.indexOf(X)!=-1)
			valido = false
	}

// verifica qie el Dominio no tenga un caracter especial
	for (var Cont=0; Cont<Dominio.length; Cont++) {
		X=Dominio.substring(Cont,Cont+1)
		if (Reserv.indexOf(X)!=-1)
			valido = false
		}

// Verifica la sintaxis básica.....
	if (Punto.length<2 || Dominio <1 || Cadena.lastIndexOf('.')<0 || Cadena.lastIndexOf('@')<0 || Usuario<1) {
		valido = false
	}

// Añadido por El Código para que emita un alert de aviso indicando si email válido o no

	if (valido) {
		return true
	} else {
		alert('Email no válido.')
		return false
	}
}
