function carac(cadena)
		{
			var i=0
			var caracter
			while (i<cadena.length)
			{
				caracter=cadena.substr(i,1)
					
					if ((caracter >= "a" && caracter <= "z") || (caracter >= "A" && caracter <= "Z") || (caracter >= "0" && caracter <= "9") || (caracter == "@") || (caracter == "%") || (caracter == "á") || (caracter == "é") || (caracter == "í") || (caracter == "ó") || (caracter == "ú") || (caracter == "Á") || (caracter == "Ó") || (caracter == "Ú") || (caracter == "É") || (caracter == "Í") || (caracter == "ñ") || (caracter == "Ñ") || (caracter == "!") || (caracter == "¡") || (caracter == "?") || (caracter == "¿") || (caracter == ",") || (caracter == ".") || (caracter == ";") || (caracter == ":") || (caracter == "") || (caracter == "º") || (caracter == "ª") || (caracter == "/") || (caracter == "(") || (caracter == ")") || (caracter == "&") || (caracter == "-") || (caracter == "=") || (caracter == "_"))
						
						{
							i++;
						}
					
					else
						
						{
							return "mal";
						}
			}
			
			return "bien";
		}