<!--

function troba_nom(str)
{
	re=/%20/gi;
	theleft = str.indexOf("n=") + 2;
	theright = str.indexOf("&");
	newstr=str.substring(theleft, theright);
	return(newstr.replace(re," "));
}

function troba_email(str)
{
	theleft = str.indexOf("e=") + 2;
	theright = str.indexOf("&m=");
	
	return(str.substring(theleft, theright));
}

function troba_maxlec(str)
{
	theleft = str.indexOf("m=") + 2;
	theright = str.lastIndexOf("&");
	return(str.substring(theleft, theright));
}

function nomes_variables(str)
{
	theleft = str.indexOf("?") + 3;
	newstr=str.substring(theleft);
	return(newstr);
}

function desencripta(Str_Message)
{
	Len_Str_Message=Str_Message.length;
	Str_Encrypted_Message="";
	for (Position = 0 ; Position<Len_Str_Message ; Position+=3)
	{
		cadena_num = Str_Message.substring(Position, Position+3);
		Ascii_Num_Byte = 999-cadena_num;
	        caracter=String.fromCharCode(Ascii_Num_Byte);
		Str_Encrypted_Message=Str_Encrypted_Message+caracter;
	} 
	return(Str_Encrypted_Message);
}

function encripta(Str_Message)
{
	Len_Str_Message=Str_Message.length;
	Str_Encrypted_Message="";
	for (Position = 0 ; Position<Len_Str_Message ; Position++)
	{
		Byte_To_Be_Encrypted = Str_Message.substring(Position, Position+1); 
		Ascii_Num_Byte = 999-Str_Message.charCodeAt(Position);
		Str_Encrypted_Message=Str_Encrypted_Message+Ascii_Num_Byte;

	} 
	return(Str_Encrypted_Message);
}

function precarga()
{

	for (i=0; i<=max_lec; i++)
	{
		linea="Leçon "+i;
		window.document.MyForm.lessons.options[i] = new Option(linea,i);
	}


	linia_url=window.location.href;

	theright=linia_url.indexOf(".htm");
	if (linia_url.indexOf("leccionFRA")!=(-1))
	{
		theleft=linia_url.indexOf("leccionFRA");
		leccion=parseInt(linia_url.substring(theleft+10,theright));
		window.document.MyForm.keyblayout.options[0].selected = 1;
	}
	else
	{

		if (linia_url.indexOf("leccionBEL")!=(-1))
		{
			theleft=linia_url.indexOf("leccionBEL");
			leccion=parseInt(linia_url.substring(theleft+10,theright));
			window.document.MyForm.keyblayout.options[1].selected = 1;
		}
		else
		{
			if (linia_url.indexOf("leccionCAN")!=(-1))
			{
				theleft=linia_url.indexOf("leccionCAN");
				leccion=parseInt(linia_url.substring(theleft+10,theright));
				window.document.MyForm.keyblayout.options[2].selected = 1;
			}
			else
			{
				theleft=linia_url.indexOf("leccionSUI");
				leccion=parseInt(linia_url.substring(theleft+10,theright));
				window.document.MyForm.keyblayout.options[3].selected = 1;
			}
		}
	}

	window.document.MyForm.lessons.options[leccion].selected = 1;


	if (troba_email(variables_no_encriptades)=="Invitado")
	{
		window.document.MyForm.EditarDatos.disabled=true;
	}


}

function cambioLeccion(leccion, elmail)
{
	variables_a_encriptar='e='+elmail+'&l='+leccion+'&t='+teclado+'&';
	variables_encriptades=encripta(variables_a_encriptar);
	window.location="cambiar_leccion.php?v="+variables_encriptades;	
}

function cambioTeclado(teclado, elmail, leccion)
{
	if ((teclado)==0)
	{
		//Francia
		variables_a_encriptar='e='+elmail+'&t=1&'+'l='+leccion+'&';
	}
	else
	{
		if ((teclado)==1)
		{
			// Belgica
			variables_a_encriptar='e='+elmail+'&t=2&'+'l='+leccion+'&';
		}
		else
		{
			if ((teclado)==2)
			{
				// Canada
				variables_a_encriptar='e='+elmail+'&t=3&'+'l='+leccion+'&';
			}
			else
			{
				// Suiza
				variables_a_encriptar='e='+elmail+'&t=4&'+'l='+leccion+'&';
			}
		}

	}

	variables_encriptades=encripta(variables_a_encriptar);
	window.location="cambiar_teclado.php?v="+variables_encriptades;	

}

var locate = window.location;
var text;
var nom_usuario;
var emailusuario;
var teclado;

document.joe.burns.value = locate;
text=document.joe.burns.value;

variables_encriptades=nomes_variables(text);
variables_no_encriptades=desencripta(variables_encriptades);

nom_usuario=troba_nom(variables_no_encriptades);
emailusuario=troba_email(variables_no_encriptades);

if (emailusuario=="Invitado") nom_usuario="Invité";

max_lec=troba_maxlec(variables_no_encriptades);

if ((text.indexOf('leccionFRA'))!=(-1)) teclado="1";
if ((text.indexOf('leccionBEL'))!=(-1)) teclado="2";
if ((text.indexOf('leccionCAN'))!=(-1)) teclado="3";
if ((text.indexOf('leccionSUI'))!=(-1)) teclado="4";


-->