function score_card()
	
{	score = 0;
	rightscore = 0;
	major = 0;
	mechanic = 0;
	fertile = 0;
	totalscore = 0;















//*line 1 
	if (window.document.soil_card.sur_texture[1].checked == true)
{	score += 4;
	 
	}	else	{	score += 0; 
				 }
//*line 2
if (window.document.soil_card.sub_texture[3].checked == true)
{	score += 4;
	 
	}	else	{	score += 0; 
				 
	}
//* line 3
if (window.document.soil_card.depth_of_soil[1].checked == true)
{	score += 4;
	 
	}	else	{	score += 0; 
				 
	}
//* line 4
if (window.document.soil_card.slope[2].checked == true)
{	score += 5;
	}	else	{	score += 0;  
	}
//* line 5
if (window.document.soil_card.erosion[0].checked == true)
{	score += 3;
	}	else	{	score += 0; 
	}
//* line 6
if (window.document.soil_card.permeability[2].checked == true)
{	score += 5;
	}	else	{	score += 0; 
	}
//* line 7
if (window.document.soil_card.runoff[0].checked == true)
{	score += 4;
	 
	}	else	{	score += 0; 
				 
	}
//* line 8
if (window.document.soil_card.majora.checked == true)
{	major += 1;
	 
	}	else	{	major += 0; 
				 
	}
if (window.document.soil_card.majorb.checked == true)
{	major += 1;
	 
	}	else	{	major += 0; 
				 
	}
if (window.document.soil_card.majord.checked == true)
{	major += 1;
	 
	}	else	{	major += 0; 
				 
	}
if (window.document.soil_card.majore.checked == true)
{	major += 1;
	 
	}	else	{	major += 0; 
				 
	}

if (window.document.soil_card.majorg.checked == true)
{	major += 1;
	 
	}	else	{	major += 0; 
				 
	}
if (window.document.soil_card.majorh.checked == true)
{	major += 1;
	 
	}	else	{	major += 0; 
				 
	}
if (window.document.soil_card.majori.checked == true)
{	major += 1;
	 
	}	else	{	major += 0; 
				 
	}

if ((window.document.soil_card.majorc.checked == true) &&
	(window.document.soil_card.majorf.checked == true) && 
	(major == 0))
{	score += 8;
	 
	}	else	{	score += 0; 
				 
	}



//* line 9
if (window.document.soil_card.land[2].checked == true)
{	score += 8;
	 
	}	else	{	score += 0;
	}
//* line 10
if (window.document.soil_card.vegetativec.checked == true)
{	rightscore += 5;
	}	else	{	rightscore += 0;
	}
if (window.document.soil_card.vegetativee.checked == true)
{	rightscore += 4;
	}	else	{	rightscore += 0;
	}
if (window.document.soil_card.vegetativef.checked == true)
{	rightscore += 4;
	 
	}	else	{	rightscore += 0;
	}

//* line 11

if (window.document.soil_card.mechanicalb.checked == true)
{	rightscore += 4;
	}	else	{	rightscore += 0;
	}

if (window.document.soil_card.mechanicala.checked == true)
{	rightscore += 0;
	}	else	{	
	
if ((window.document.soil_card.mechanicala.checked == false) &&
	(window.document.soil_card.mechanicalc.checked == true))
{	rightscore += 4;
	}	}







//* line 12
if (window.document.soil_card.fertilizera.checked == true)
{	rightscore += 3;
	}	else	{	rightscore += 0;
	}
if (window.document.soil_card.fertilizerb.checked == true)
{	rightscore += 3;
	}	else	{	rightscore += 0;
	}
if (window.document.soil_card.fertilizerc.checked == true)
{	fertile += 1;
	}	else	{	fertile += 0;
	}

if ((window.document.soil_card.fertilizerd.checked == true)  &&
	(fertile == 0)) 
{	rightscore += 3;
	}	else	{	rightscore += 0;
	}




totalscore = score + rightscore; 
 document.soil_card.score.value = score;
document.soil_card.rightscore.value = rightscore;
document.soil_card.totalscore.value = totalscore;		
}