function scoreRiskFemale() {
//	if input doesn't validate, alert the user; otherwise, run the assessment scoring code															   
	oForm=document.forms.frmRisk;																	
	nTally=0;					
	valNumeric(oForm.txtAge.value, "Age");											 
	valNumberRange(oForm.txtAge.value, 20, 79, "Varsta");
	valNumeric(oForm.txtChol.value, "Colesterol total");
	valNumeric(oForm.txtHDL.value, "HDL colesterol");
	valNumeric(oForm.txtSBP.value, "Tensiune arterialã sistolica");
	if (szMsg=='') {	//	no errors, do the compute															  
		//	score for this person's current answers
		nTally+=scoreRiskAgeFemale(oForm.txtAge.value);													
		nTally+=scoreRiskHDL(oForm.txtHDL.value);													   
		nTally+=scoreRiskSBPFemale(oForm.txtSBP.value, oForm.chkBPMeds.checked);		
		nTally+=scoreRiskSmokingFemale(oForm.txtAge.value, oForm.chkSmoker.checked);
		nTally+=scoreRiskCholesterolFemale(oForm.txtAge.value, oForm.txtChol.value);		
		oForm.txtRisk.value=scoreRiskPointTotalFemale(nTally);	
		//	now score the ideal for this person's age and gender
		nTally=0;						   
		nTally+=scoreRiskAgeFemale(oForm.txtAge.value);		
		nTally+=scoreRiskHDL(60);		// 60 is the breakpoint for ideal HDL; 60 and above are the best													
		//	 no need to score for Systolic Blood Pressure, risk is always 0, never goes below 0		  		
		//	 no need to score for non-smoking, risk is always 0 across all ages, never goes below 0
		//	 no need to score for cholesterol, risk is always 0 across all ages, never goes below 0		
		oForm.txtIdealRisk.value=scoreRiskPointTotalMale(nTally);
	}
	else {				//	display error alert with details
		var szErrNumber = '';
		if (nErrCount>1) {
			szErrNumber=' nu au primit ';
		}
		else {
		szErrNumber=' nu a primit ';
		}
		alert('________________________________________________________\n\n' +
      	'Urmatoarea intrebare/urmatoarele intrebari' + szErrNumber + 'un raspuns corespunzator:\n\n' + szMsg +
      	'\n________________________________________________________\n\n' +
      	'Va rog corectati si apasati din nou pe butonul de calcul al riscului.');
		nErrCount=0;
		szMsg='';
	}
	return;
}   

function scoreRiskAgeFemale(nAge) {									
	var nRisk=0;
	if((nAge>=20) && (nAge<=34)) {nRisk=-7;}
	if((nAge>=35) && (nAge<=39)) {nRisk=-3;}
	if((nAge>=40) && (nAge<=44)) {nRisk=0;}
	if((nAge>=45) && (nAge<=49)) {nRisk=3;}
	if((nAge>=50) && (nAge<=54)) {nRisk=6;}
	if((nAge>=55) && (nAge<=59)) {nRisk=8;}
	if((nAge>=60) && (nAge<=64)) {nRisk=10;}
	if((nAge>=65) && (nAge<=69)) {nRisk=12;}
	if((nAge>=70) && (nAge<=74)) {nRisk=14;}
	if((nAge>=75) && (nAge<=79)) {nRisk=16;}
	return nRisk;
}		   
			  
function scoreRiskSBPFemale(nSBP, bTreated) {
 	var nRisk=0;
	var nOffset=0;
	if (bTreated) {nOffset=2;}
	if (nSBP<120) {nRisk=0;}
	if ((nSBP>=120)&&(nSBP<=129)) {nRisk=1+nOffset;}				
	if ((nSBP>=130)&&(nSBP<=139)) {nRisk=2+nOffset;}
	if ((nSBP>=140)&&(nSBP<=159)) {nRisk=3+nOffset;}
	if (nSBP>=160) {nRisk=4+nOffset;}
	
	return nRisk;
}	  

function scoreRiskSmokingFemale(nAge, bSmoker) {
	var nRisk=0;
	if ((nAge>=20)&&(nAge<=39)&&(bSmoker)) {nRisk+=9;}
	if ((nAge>=40)&&(nAge<=49)&&(bSmoker)) {nRisk+=7;}
	if ((nAge>=50)&&(nAge<=59)&&(bSmoker)) {nRisk+=4;}
	if ((nAge>=60)&&(nAge<=69)&&(bSmoker)) {nRisk+=2;}
	if ((nAge>=70)&&(nAge<=79)&&(bSmoker)) {nRisk+=1;}
 	return nRisk;
}					 

function scoreRiskCholesterolFemale(nAge, nChol) {
	var nRisk=0;
	if (nChol<160) {
		if ((nAge>=20)&&(nAge<=39)) {nRisk+=0;}
		if ((nAge>=40)&&(nAge<=49)) {nRisk+=0;}
		if ((nAge>=50)&&(nAge<=59)) {nRisk+=0;}
		if ((nAge>=60)&&(nAge<=69)) {nRisk+=0;}
		if ((nAge>=70)&&(nAge<=79)) {nRisk+=0;}
	}
	if ((nChol>=160)&&(nChol<=199)) {
		if ((nAge>=20)&&(nAge<=39)) {nRisk+=4;}
		if ((nAge>=40)&&(nAge<=49)) {nRisk+=3;}
		if ((nAge>=50)&&(nAge<=59)) {nRisk+=2;}
		if ((nAge>=60)&&(nAge<=69)) {nRisk+=1;}
		if ((nAge>=70)&&(nAge<=79)) {nRisk+=1;}
	}
	if ((nChol>=200)&&(nChol<=239)) {
		if ((nAge>=20)&&(nAge<=39)) {nRisk+=8;}
		if ((nAge>=40)&&(nAge<=49)) {nRisk+=6;}
		if ((nAge>=50)&&(nAge<=59)) {nRisk+=4;}
		if ((nAge>=60)&&(nAge<=69)) {nRisk+=2;}
		if ((nAge>=70)&&(nAge<=79)) {nRisk+=1;}
	}
	if ((nChol>=240)&&(nChol<=279)) {
		if ((nAge>=20)&&(nAge<=39)) {nRisk+=11;}
		if ((nAge>=40)&&(nAge<=49)) {nRisk+=8;}
		if ((nAge>=50)&&(nAge<=59)) {nRisk+=5;}
		if ((nAge>=60)&&(nAge<=69)) {nRisk+=3;}
		if ((nAge>=70)&&(nAge<=79)) {nRisk+=2;}
	}
	if (nChol>=280) {
		if ((nAge>=20)&&(nAge<=39)) {nRisk+=13;}
		if ((nAge>=40)&&(nAge<=49)) {nRisk+=10;}
		if ((nAge>=50)&&(nAge<=59)) {nRisk+=7;}
		if ((nAge>=60)&&(nAge<=69)) {nRisk+=4;}
		if ((nAge>=70)&&(nAge<=79)) {nRisk+=2;}
	}
	return nRisk;
}

function scoreRiskPointTotalFemale(nTotalPoints) {
	var sRisk=0;		
	if (nTotalPoints<9) {
		sRisk='<1';
	}		
	else if (nTotalPoints>=25) {
		sRisk='>=30';
	}		
	else {	
		switch(parseInt(nTotalPoints)) {
			case 9: case 10: case 11: case 12: sRisk='1'; break;						  
			case 13: case 14: sRisk='2'; break;
			case 15: sRisk='3'; break;
			case 16: sRisk='4'; break;
			case 17:	sRisk='5'; break;
			case 18: sRisk='6'; break;
			case 19: sRisk='8'; break;
			case 20: sRisk='11'; break;
			case 21: sRisk='14'; break;
			case 22: sRisk='17'; break;
			case 23: sRisk='22'; break;
			case 24: sRisk='27'; break;
		}	   
	}
	return sRisk+'';
}