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















//*line 1 
	if (window.document.soil_card.sur_texture[2].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 += 5;
	 
	}	else	{	score += 0; 
				 
	}
//* line 4
if (window.document.soil_card.slope[1].checked == true)
{	score += 4;
	}	else	{	score += 0;  
	}
//* line 5
if (window.document.soil_card.erosion[2].checked == true)
{	score += 4;
	}	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[1].checked == true)
{	score += 3;
	 
	}	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.majore.checked == true)
{	major += 1;
	 
	}	else	{	major += 0; 
				 
	}
if (window.document.soil_card.majorf.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.majord.checked == true) && 
	
	(major == 0))
{	score += 8;
	 
	}	else	{	score += 0; 
				 
	}



//* line 9
if (window.document.soil_card.land[5].checked == true)
{	score += 8;
	 
	}	else	{	score += 0;
	}

//* line 10


if ((window.document.soil_card.vegetativea.checked == true) ||
	(window.document.soil_card.vegetativeb.checked == true) ||
	(window.document.soil_card.vegetativec.checked == true) ||
	(window.document.soil_card.vegetatived.checked == true))
{	vegetable += 1;
	}	else	{	vegetable += 0;
	}

if (window.document.soil_card.vegetativee.checked == true)
{	vegetable += 1;
	}	else	{	vegetable += 0;
	}
if (window.document.soil_card.vegetativef.checked == true)
{	vegetable += 1;
	}	else	{	vegetable += 0;
	}
if ((window.document.soil_card.vegetativeg.checked == true) &&
	(vegetable < 4))
{	rightscore += 5;
	vegetable += 1;
	}	else	{	rightscore += 0;
	}
if ((window.document.soil_card.vegetativeh.checked == true) &&
	(vegetable < 4))
{	rightscore += 4;
	vegetable += 1;
	}	else	{	rightscore += 0;
	}
if ((window.document.soil_card.vegetativei.checked == true) &&
	(vegetable < 4))
{	rightscore += 4;
	vegetable += 1;
	}	else	{	rightscore += 0;
	}
if ((window.document.soil_card.vegetativej.checked == true) &&
	(vegetable < 4))
{	rightscore += 4;
	vegetable += 1;
	}	else	{	rightscore += 0;
	}

//* line 11

if (window.document.soil_card.mechanicala.checked == true)
{	mechanic += 1;
	}	else	{	mechanic += 0;
	}
if (window.document.soil_card.mechanicalb.checked == true)
{	mechanic += 1;
	}	else	{	mechanic += 0;
	}
if (window.document.soil_card.mechanicalc.checked == true)
{	mechanic += 1;
	}	else	{	mechanic += 0;
	}
if (window.document.soil_card.mechanicald.checked == true)
{	mechanic += 1;
	}	else	{	mechanic += 0;
	}
if (window.document.soil_card.mechanicale.checked == true)
{	mechanic += 1;
	}	else	{	mechanic += 0;
	}
if (window.document.soil_card.mechanicalf.checked == true)
{	mechanic += 1;
	 
	}	else	{	mechanic += 0;
				 
	}
if ((window.document.soil_card.mechanicalg.checked == true) &&
	(mechanic == 0))
{	 rightscore += 5;
	 
	}	else	{	rightscore += 0;
				 
	}



//* line 12
if (window.document.soil_card.fertilizera.checked == true)
{	fertile += 1;
	}	else	{	fertile += 0;
	}
if (window.document.soil_card.fertilizerb.checked == true)
{	rightscore += 4;
	}	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 += 4;
	}	else	{	rightscore += 0;
	}



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