<!-- //

function mr(DATA,DP) 
{var tmp="1";
	for (i=0;i<DP;i++)
	{tmp=tmp+0;}

if(isNaN(DATA)==false) {return Math.round((DATA)*eval(tmp))/eval(tmp);}
}

function Calc(feed)
{var eC1;
 var dcpC1;
 var tC1;
 var fm1=document.fm.fm1.selectedIndex;
 var fm2=document.fm.fm2.selectedIndex;
 var fm3=document.fm.fm3.selectedIndex;
 var p1=document.fm.spot1.value;
 var p2=document.fm.spot2.value;
 var p3=document.fm.spot3.value;
 var d1=document.fm.dm1.value;
 var d2=document.fm.dm2.value;
 var d3=document.fm.dm3.value;
 var pr1=document.fm.dcp1.value;
 var pr2=document.fm.dcp2.value;
 var pr3=document.fm.dcp3.value;
 var me1=document.fm.mjMe1.value;
 var me2=document.fm.mjMe2.value;
 var me3=document.fm.mjMe3.value;

switch(feed)
{case 1:
if(fm1==0 || p1=="" ||  d1=="" || pr1=="" || me1=="") {alert('Please enter values for:\nFeed type '+feed+'\nPrice  '+feed+'\nDry matter '+feed+'\nProtein & energy '+feed+'.');} else {
 eC1=mr((((p1 * 100)/(1000*(d1/ 100) * me1))),3); 
 dcpC1=mr(((p1 * 100) / (1000 * (d1/ 100) * (pr1/ 100) * 1000)),3);
 tC1=mr((eval(eC1)+eval(dcpC1)),3);
 document.fm.eC1.value=eC1;document.fm.dcpC1.value=dcpC1;document.fm.tC1.value=tC1;}
  break    
case 2:
if(fm2==0 || p2=="" ||  d2=="" || pr2=="" || me2=="") {alert('Please enter values for:\nFeed type '+feed+'\nPrice  '+feed+'\nDry matter '+feed+'\nProtein & energy '+feed+'.');} else {
 eC2=mr((((p2 * 100)/(1000*(d2/ 100) * me2))),3); 
 dcpC2=mr(((p2 * 100) / (1000 * (d2/ 100) * (pr2/ 100) * 1000)),3);
 tC2=mr((eval(eC2)+eval(dcpC2)),3);
 document.fm.eC2.value=eC2;document.fm.dcpC2.value=dcpC2;document.fm.tC2.value=tC2;}
  break
case 3:
if(fm3==0 || p3=="" ||  d3=="" || pr3=="" || me3=="") {alert('Please enter values for:\nFeed type '+feed+'\nPrice  '+feed+'\nDry matter '+feed+'\nProtein & energy '+feed+'.');} else {
 eC3=mr((((p3 * 100)/(1000*(d3/ 100) * me3))),3); 
 dcpC3=mr(((p3 * 100) / (1000 * (d3/ 100) * (pr3/100) * 1000)),3);
 tC3=mr((eval(eC3)+eval(dcpC3)),3);
document.fm.eC3.value=eC3;document.fm.dcpC3.value=dcpC3;document.fm.tC3.value=tC3;}
  break
default:
alert('Alert! Error, call 0870 909 0902');}

}

function fd(fdid)
{var f=document.fm.fm1.selectedIndex;
 var g=document.fm.fm2.selectedIndex;
 var h=document.fm.fm3.selectedIndex;
  var e;
  var p;
  var en=new Array(0,12.4,12.6,15.5,15.5,12.9,11.8,11.8,12.3,13.4,13.7,12.4,12.4,10.3,10.5)
  var pr=new Array(0,30.1,6.3,23,23,23,17.8,34.3,44,48.6,53.4,10.5,10.5,31.5,17)
  var dm=new Array(0,24,90,92,92,89,90,89,90,90,90,88,88,100,88)

switch(fdid)
{
case 1:
document.fm.dcp1.value=pr[f];document.fm.mjMe1.value=en[f];document.fm.dm1.value=dm[f];
  break    
case 2:
document.fm.dcp2.value=pr[g];document.fm.mjMe2.value=en[g];document.fm.dm2.value=dm[g];
  break
case 3:
document.fm.dcp3.value=pr[h];document.fm.mjMe3.value=en[h];document.fm.dm3.value=dm[h];
  break
default:
alert('eggs');
}

}

//-->
