function stego()
{
	input = (document.Pazuzu.Input.value).toLowerCase();
	posizione = document.Pazuzu.Posiz.value;
	val = document.Pazuzu.Val.value;
	vac = document.Pazuzu.Vac.value;
	alfa = eval(document.Pazuzu.Alfa.value);
	modulo = eval(val) + eval(vac);
	for (i=0;i<3;i++)
		if (document.Pazuzu.Alfabeto[i].checked == "1")
			ValoreAlfabeto = document.Pazuzu.Alfabeto[i].value;
	switch(ValoreAlfabeto)
	{
		case "tri":
			alfabeto = ['a','b','c','d','e','f','g','h','i','k','l','m','n','o','p','q','r','s','t','v','x','z'];
			break;
		case "ing":
			alfabeto = ['a','b','c','d','e','f','g','h','i','j','k','l','m','n','o','p','q','r','s','t','u','v','w','x','y','z'];
			break;
		case "ita":
			alfabeto = ['a','b','c','d','e','f','g','h','i','l','m','n','o','p','q','r','s','t','u','v','z'];
			break;
	}
	if (document.Pazuzu.Inizio[0].checked=="1")
		mod = 0;
	else
		mod = eval(modulo-vac);
	
	// !!!!!!!!!!!!!!!!!!!!!!!! ANCORA DA UTILIZZARE !!!!!!!!!!!!!!!!!!!!!!!!
	if (document.Pazuzu.Verso[0].checked=="1")
		verso = 0;
	else
		verso = 1;
	// !!!!!!!!!!!!!!!!!!!!!!!! ANCORA DA UTILIZZARE !!!!!!!!!!!!!!!!!!!!!!!!
	
	separatori = [0,0,0,0,0,0,0,0];
	if (document.Pazuzu.Spazio.checked)
		separatori[0] = 32;
	if (document.Pazuzu.Punto.checked)
		separatori[1] = 46;
	if (document.Pazuzu.Virgola.checked)
		separatori[2] = 44;
	if (document.Pazuzu.DuePunti.checked)
		separatori[3] = 58;
	if (document.Pazuzu.PuntoEVirgola.checked)
		separatori[4] = 59;
	if (document.Pazuzu.PuntoEsclamativo.checked)
		separatori[5] = 33;
	if (document.Pazuzu.PuntoInterrogativo.checked)
		separatori[6] = 63;
	if (document.Pazuzu.ACapo.checked)
		separatori[7] = 10;
	temp = "";
	output = "";
	pos = 1; // posizione all'interno della parola
	for (i=0;i<input.length;i++)
	{
		tc = input.charCodeAt(i);
		for (w=0;w<separatori.length;w++)
			if (tc==separatori[w])
			{
				pos = 0;
				break;
			}
		if (pos==posizione)
		{
			if (((mod+modulo)%modulo) < (modulo-vac))
				temp += input.charAt(i);
			mod++;
		}
		pos++;
	}
	// controllo un eventuale spostamento nell'alfabeto
	if (alfa!=0)
	{
		for (i=0;i<temp.length;i++)
		{
			letteraValida = 0;
			for (j=0;j<alfabeto.length;j++)
			{
				if (temp.charAt(i)==alfabeto[j])
				{
					output += alfabeto[(j+alfa+alfabeto.length)%alfabeto.length];
					letteraValida = 1;
					break;
				}
			}
			if (letteraValida == 0)
				output += "*";
			
			// i controlli qui sotto mi sono serviti per il secondo libro della Steganografia
			/*
			if (temp.charAt(i)=='j')
				output += alfabeto[(8-alfa+alfabeto.length)%alfabeto.length];
			if (temp.charAt(i)=='u')
				output += alfabeto[(19-alfa+alfabeto.length)%alfabeto.length];
			if (temp.charAt(i)=='æ')
				output += alfabeto[(4-alfa+alfabeto.length)%alfabeto.length];
			if (temp.charAt(i)=='&')
				output += alfabeto[(4-alfa+alfabeto.length)%alfabeto.length];
			*/
		}	
	}
	else
		output = temp;
	document.Pazuzu.To.value = alfabeto[alfa%alfabeto.length].toUpperCase();
	document.Pazuzu.Output.value = output;
}