function NavWrite(oObj,sText) {
      oObj.open();
      oObj.write(sText);
      oObj.close();
      
   }
   
   function init() {
     if(navigator.appName == "Microsoft Internet Explorer") {
       oData = window.parent.document.forms("oData");
       bIE = true;
       bNS4 = false;
     } else {
       if (navigator.appVersion.substring(0,1) == "4") {
          oData = window.document.forms[0];
          bNS4 = true;
       } else {   
          oData  = window.parent.document.getElementById("oData");
          bNS4 = false;
       }    
       bIE = false;
     }  
     
     oData.cbRaceBlack.checked = false;
     oData.cbRaceWhite.checked = false;
     oData.cbDiabHistYes.checked = false;
     oData.cbDiabHistNo.checked = false;
//     oData.sldAge.value = 0;
//     oData.sldHDL.value = 0;
//     oData.sldSBP.value = 0;
//     oData.sldGlucose.value = 0;
//     oData.sldWaist.value = 0;
//     oData.sldHeightFt.value = 0;
//     oData.sldHeightIn.value = 0;
//     oData.sldTriglyc.value = 0;
   }

   function roundOff(value, precision) {
      value = "" + value //convert value to string
      var whole = "" + Math.round(value * Math.pow(10, precision));
      result = whole / Math.pow(10,precision);
      return result;
   }

   function Calculate() {
     
      var sRace = "";
      var sGender = "";
      var iCnt = 0;
      var iCurSmoker = 0;
      var iMeds = 0;
      var iDiabetes = 0;
      var iRace = 0;
      var iHeight = 0;
      var iAge = 0;
      var iGlucose = 0;
      var iTriglyc = 0;
      var iRace = 0;
      var iHDL = 0;
      var iSBP = 0;
      var iHyptMd01 = 0;
      var iDiabtHist = 0;
      
      var dProbability = 0;
      
      if(!oData.cbRaceBlack.checked && !oData.cbRaceWhite.checked) { 
        if (DisplayError("Race must be checked.")) {
            return true;
         }   
      }
      
      if(!oData.cbDiabHistYes.checked && !oData.cbDiabHistNo.checked) { 
        if (DisplayError("Parental Diabetes history must be checked.")) {
           return true;
        }   
      }
      
      
      if(oData.sldAge.value == 0) { 
        if (DisplayError("Age value must be greater than 0")) {
           return true;
        }   
      }
      
      if(oData.sldHDL.value == 0) { 
        if (DisplayError("HDL value must be greater than 0")) {
           return true;
        }   
      }
      
      if(oData.sldSBP.value == 0) { 
        if (DisplayError("Systolic Blood Pressure value nmust be greater than 0")) {
           return true;
        }   
      }
     
      if(oData.sldGlucose.value == 0) { 
        if (DisplayError("Fasting Glucose value must be greater than 0")) {
           return true;
        }   
      }
  
     if(oData.sldTriglyc.value == 0) { 
             if (DisplayError("Triglycerides value must be grteater than 0")) {
                
                 return true;
              }   
           }
           
      if(oData.sldWaist.value == 0) { 
             if (DisplayError("Waist value must be greater than 0")) {
                return true;
              }   
           }
           
      if(oData.sldHeightFt.value == 0) { 
             if (DisplayError("Height Feet value must be greater than 0")) {
                 return true;
              }   
           }
     
    
     
      if(oData.cbRaceBlack.checked) { 
         iRace = 1; 
      } else {
         if(oData.cbRaceWhite.checked) { 
            iRace = 0;
         }
      }
      
      if(oData.cbDiabHistYes.checked) { 
         iDiabHist = 1;
      } else {
         if (oData.cbDiabHistNo.checked) {
            iDiabHist = 0;
         }   
      }   
      
      iAge = Math.round(oData.sldAge.value,0)
      iGlucose = Math.round(oData.sldGlucose.value,4)
      iSBP = Math.round(oData.sldSBP.value,0)
      iTriglyc = Math.round(oData.sldTriglyc.value,4)
      iWaist = Math.round(oData.sldWaist.value,0)
      iHeight = Math.round(oData.sldHeightIn.value) + (Math.round(oData.sldHeightFt.value,0)*12)
      iHDL = Math.round(oData.sldHDL.value,0)
      
      if (iHeight < 56 || iHeight > 78) {
         alert("Height is out of range, 4 feet 8 inches and 6 feet 6 inches")
         return true;
      }   
      
     // alert(iDiabHist)
     // alert(iRace)
      bReadyToCalculate = 1;

      //alert(-9.9808+0.0173 * iAge)
     // alert(0.4433*iRace) 
     // alert(0.4981*iDiabHist) 
     // alert(0.0880*iGlucose) 
     // alert(0.0111*iSBP) 
     // alert(0.0107*iWaist)
     // alert(0.0128*iHeight)
     //alert(iHeight)
     // alert(0.0122*iHDL) 
     // alert(0.00271*iTriglyc)
      dProbability =(-9.9808 + (0.0173 * iAge) + (0.4433*iRace) + (0.4981*iDiabHist) + (0.0880*iGlucose) + (0.0111*iSBP) + (0.0693*iWaist) - (0.0828*iHeight) - (0.0122*iHDL) + (0.00271*iTriglyc))
      
      dProbability = roundOff(dProbability,5)
      //alert(dProbability)
      dProbability = roundOff(1/(1+Math.exp(-dProbability)),5)
      //alert(dProbability)
      dProbability = roundOff(dProbability * 100,0) 
      
      //alert(dProbability)
      
      if (dProbability<= 0) { 
         dProbability = 0 
      } else {
         if (dProbability > 100) {
             dProbability = 100
         }
      }
    
      if (dProbability > 50) {
         Risk.innerText = new String("Your predicted risk of developing diabetes over 9 years is very high.\nYou may want to discuss with your physician how you can lower this risk.");
      } else {   
      //Risk.innerText = new String("Your risk in % over 9 years is " + dProbability )
        Risk.innerText = new String("You have a " + dProbability +"% risk over 9 years.")
      }  
      Risk.style.visibility = "visible"
      Risk.style.color = "Yellow"
      RiskTbl.style.visibility = "visible"
      bRiskShowing = true;
     //alert("Your risk in % over 9 years is " + dProbability)
     AvgRisk()
   }


function DisplayError(sFld) {
    alert("ERROR! " + sFld)
    return true;
}

function AvgRisk() {
 var x = 0;
 var iAge = 0;

 iAge = Math.round(oData.sldAge.value,0) ;
 //if (bAvgRiskShowing) {
 //   AverageRisk.style.visibility = "hidden"
 //   bAvgRiskShowing = false;
 //   if (!bRiskShowing) {
 //          RiskTbl.style.visibility = "hidden";
 //   }   
    
 //} else {
    if (iAge == 0) {
 
       alert("Age must be entered!");
    
    } else {
       x=-3.4336+(0.0333 * iAge) 
       x=1/(1+Math.exp(-x))
       x= roundOff(x,2)
       x= x*100
       AverageRisk.innerText = new String("For persons your age the average risk of developing diabetes over 9 years is " + x + "%.")
       AverageRisk.style.visibility = "visible"
       AverageRisk.style.color = "Yellow"
       RiskTbl.style.visibility = "visible"
       RiskPer100.innerText = x
       bAvgRiskShowing = true;
    }   
 //}    
    
} 

function ChkGluc() {
   if (Math.round(oData.sldGlucose.value) >= 126) {
      alert("A fasting glucose of 126 mg/dl or greater on more than one test indicates diabetes.\nPlease see your doctor about this.");
   }
}