function total (clas)
	{
	tot=0;
	for (h=1; h<clas.length; h=h+2)
		tot=tot+clas[h];
	return (tot);
	}

function position (clas)
	{
	pos=0;
	i=clas.length-1;
	while (i>1&&red<=clas[i-1])
		{
		pos=pos+clas[i];	
		i=i-2;
		}
	if (i<clas.length-1)
		{
		pi=clas[i+1]-red;
		rat=(clas[i+1]-clas[i-1])/clas[i];
		ci=Math.round(pi/rat);
		pos=pos+ci;
		}

	return (pos);
	}

function puntred()
	{
	if (isNum(red)) document.forms[0].red.value=punt(red+"");
	}
function classi()
{
clasnaz=new Array(0,2249072,1000,633098,1500,524556,2000,474559,2500,448631,3000,422237,3500,401981,4000,792702,5000,2539044,6000,2209696,7500,3321261,10000,2457000,12000,4138178,15000,6827266,20000,5689446,26000,1889466,29000,2255152,35000,1002585,40000,1017189,50000,301892,55000,232772,60000,345017,70000,131682,75000,107332,80000,159936,90000,112175,100000,135820,120000,100663,150000,70491,200000,75689);

clasrm=new Array
(0,9894,1000,9717,2000,8919,3000,9745,4000,12575,5000,14024,6000,23501,7500,85635,10000,222059,15000,259180,20000,260674,26000,222420,33500,102233,40000,79688,50000,43853,60000,29680,70000,45082,100000,37541);
 
clasmi=new Array
(0,5373,1000,5979,2000,5271,3000,5448,4000,6460,5000,7081,6000,11754,7500,46442,10000,123031,15000,143173,20000,134140,26000,104407,33500,49046,40000,44908,50000,27169,60000,18584,70000,28992,100000,32356);

clasna=new Array
(0,3843,1000,3743,2000,3180,3000,3744,4000,4451,5000,4709,6000,7404,7500,25136,10000,62289,15000,70333,20000,63937,26000,47709,33500,18922,40000,13597,50000,7174,60000,5441,70000,8689,100000,6093);

claspa=new Array
(0,2255,1000,2332,2000,1967,3000,2420,4000,3070,5000,3199,6000,4964,7500,19220,10000,42572,15000,53977,20000,46043,26000,36166,33500,15141,40000,11259,50000,5933,60000,4346,70000,5527,10000,3563);
		 
red=parse(document.forms[0].red.value);
if (red)
	{
	clasnum=document.forms[0].dove.value;
	switch (clasnum)
		{
		case "0": clasact=clasnaz; break;
		case "1": clasact=clasmi; break;
		case "2": clasact=clasna; break;
		case "3": clasact=claspa; break;
		case "4": clasact=clasrm; break;
		}	
	tot=total(clasact);
	pos=position(clasact);
	
	if (pos==0)
		{
		pre="tra 1 e "; 
		pos=clasact[clasact.length-1];
		}
	else pre="";
	piu=round2((tot-(tot-pos+1))/tot*100);
	meno=round2((tot-pos)/tot*100);

	document.forms[0].tot.value=punt(virg(tot+""));
	document.forms[0].pos.value=pre+punt(virg(pos+""));
	document.forms[0].piu.value=virg(piu)+" %";
	document.forms[0].meno.value=virg(meno)+" %";
	}
}