function calcola(vsesso,vpeso,vsel1,vqta1,vtime1,vsel2,vqta2,vtime2,vsel3,vqta3,vtime3,vsel4,vqta4,vtime4,vsel5,vqta5,vtime5)
 {
	if (parseInt(vpeso) < 1) {alert("Peso immesso non valido");return;}
	
	if (vpeso=="") {alert("Non è stato indicato alcun peso!"); return;}
	
	if (parseFloat(vsel1 + vsel2 + vsel3 + vsel4 + vsel5)==9999999999) {alert("Non è stata scelta alcuna bevanda!"); return;}
	if (parseFloat(vqta1 + vqta2 + vqta3 + vqta4 + vqta5)==9999999999) {alert("Non è stato indicata alcuna quantità!"); return;}	

	var vmess1	=	"Comportamento normale";
	var vmess2	=	"Aumento della confidenzialità, diminuzione delle inibizioni. " +
								"Diminuzione dell'attenzione, del giudizio e del controllo. " +
								"Difficoltà sensoriali e motorie. Perdita dell'efficienza dei " +
								"movimenti fini.";
	var vmess3	=	"Instabilità emozionale; perdita del giudizio critico. Alterazione " +
								"della percezione, memoria e comprensione. Diminuzione della " +
								"risposta sensoriale e motoria; aumento del tempo di reazione, " +
								"riduzione dell'acuità visiva; perdita della visione periferica; " +
								"non coordinazione senso-motoria; deficit dell'equilibrio. Sonnolenza.";
	var vmess4	=	"Disorientamento, confusione mentale; vertigini. Reazioni emotive " +
								"eccessive. Disturbi della visione e della percezione del colore, " +
								"della forma, dei movimenti e delle dimensioni. Aumento della soglia " +
								"del dolore e dell'incoordinazione muscolare, andatura barcollante; " +
								"linguaggio difficoltoso. Apatia, letargia.";
	var vmess5	=	"Inerzia generale; deficit o perdita delle funzioni motorie. Marcata " +
								"diminuzione della risposta agli stimoli. Incoordinazione muscolare " +
								"marcata; incapacità a stare in piedi o a camminare. Vomito, incontinenza," +
								"coscienza alterata; sonno o sguardo fisso nel vuoto ";
	var vmess6	=	"Incoscienza completa. Perdita dei riflessi. Abbassamento della temperatura " +
								"corporea. Incontinenza, disturbi della circolazione e della respirazione, " +
								"possibile morte. ";
	var vmess7	=	"Possibile morte per arresto circolatorio.";
	
	var vtasso = 0;

	if (!(vsel1==99)) {vtasso = (vtasso + ((vsel1 * vqta1 * 1.055) / (vpeso * vsesso) - vtime1));}	
	if (!(vsel2==99)) {vtasso = (vtasso + ((vsel2 * vqta2 * 1.055) / (vpeso * vsesso) - vtime2));}
	if (!(vsel3==99)) {vtasso = (vtasso + ((vsel3 * vqta3 * 1.055) / (vpeso * vsesso) - vtime3));}
	if (!(vsel4==99)) {vtasso = (vtasso + ((vsel4 * vqta4 * 1.055) / (vpeso * vsesso) - vtime4));}
	if (!(vsel5==99)) {vtasso = (vtasso + ((vsel5 * vqta5 * 1.055) / (vpeso * vsesso) - vtime5));}
	
	if (vtasso < 0) {vtasso = 0};
	
	var intero = 0;
	var vtassofixed = 0;
	var messguida = "";
	var ore = 0;
	var minuti = 0;
	
	if (vtasso < 0.50) {messguida = "subito";}
	if (vtasso >= 0.50) {
	  ore = parseInt((((vtasso - 0.50) / 0.0025) + 60) / 60);
	  minuti = parseInt((((((vtasso - 0.50) / 0.0025) + 60) / 60) - ore) * 60);
	  messguida = "tra " + ore + "h:" + minuti + "m";}
	  
	intero = parseInt(vtasso * 1000);
	vtassofixed = (parseFloat(intero) / 1000);
	
	if (vtasso < 0.50) {document.etilometro.tasso.value = (vtassofixed); document.etilometro.guida.value = messguida; document.etilometro.tasso.style.backgroundColor = '#B4E6B4';}
	if (vtasso >= 0.50) {document.etilometro.tasso.value = (vtassofixed); document.etilometro.guida.value = messguida; document.etilometro.tasso.style.backgroundColor = '#EEB4B4';}
	
	if (vtasso > 5.00) {document.etilometro.mess.value = vmess7; alert("Attenzione: hai superato il limite ammesso dalla legge (0.50) per poter guidare in Italia"); return;}
	if (vtasso > 4.00) {document.etilometro.mess.value = vmess6; alert("Attenzione: hai superato il limite ammesso dalla legge (0.50) per poter guidare in Italia"); return;}
	if (vtasso > 3.00) {document.etilometro.mess.value = vmess5; alert("Attenzione: hai superato il limite ammesso dalla legge (0.50) per poter guidare in Italia"); return;}
	if (vtasso > 2.50) {document.etilometro.mess.value = vmess4; alert("Attenzione: hai superato il limite ammesso dalla legge (0.50) per poter guidare in Italia"); return;}
	if (vtasso > 1.20) {document.etilometro.mess.value = vmess3; alert("Attenzione: hai superato il limite ammesso dalla legge (0.50) per poter guidare in Italia"); return;}
	if (vtasso > 0.80) {document.etilometro.mess.value = vmess2; alert("Attenzione: hai superato il limite ammesso dalla legge (0.50) per poter guidare in Italia"); return;}
	if (vtasso > 0.50) {document.etilometro.mess.value = vmess2; alert("Attenzione: hai superato il limite ammesso dalla legge (0.50) per poter guidare in Italia"); return;}
	if (vtasso >= 0.00) {document.etilometro.mess.value = vmess1; return;}
  }

function nscheck(ValImm)
	{
	if (isNaN(ValImm))
	 	alert("Attenzione: il valore "+ValImm+" non è numerico! ");
	}

function nsquanto(T_bev,Q_bev)
	{
	alert("b1 = " + T_bev + " e q1 = " + Q_bev);
	if (T_bev==null)
		{
		if (Q_bev>0) {alert("Non hai scelto bevande!");}
		}
	}