<!--
//created by Joseph Roland
//www.cytographica.com

function WriteYearOptions(YearsAhead)
{
	line = "";

	for (i=0; i<YearsAhead; i++)
	{
		line += "<OPTION>";
		line += NowYear + i;
	}

	return line;
}

function recepie(form)
{
var slip = form.slip.value;
var conc1 = form.conc1.value;
var conc2 = form.conc2.value;
var dna1 = (100/conc1)*(slip);
var dna2 = (100/conc2)*(slip);
var dna = (dna1) + (dna2);
var en = 1.6*slip;
var ec = (60*slip)-(dna);
var ef = 5*slip;
var media = (100*slip)-(ec + en + ef + dna);
var total = media + ec + en + ef + dna;
if (form.conc1.value > 0)
{
	if (form.conc2.value > 0)
	{
		if (form.slip.value > 0)
			{
			form.dna1.value=Math.round(10*dna1)/10;
			form.dna2.value=Math.round(10*dna2)/10;
			form.en.value=Math.round(10*en)/10;
			form.ec.value=Math.round(10*ec)/10;
			form.ef.value=Math.round(10*ef)/10;
			form.media.value=Math.round(10*media)/10;
			form.total.value=Math.round(10*total)/10;
			}
		else
			{
			form.dna1.value=" ";
			form.dna2.value=" ";
			form.en.value=" ";
			form.ec.value=" ";
			form.ef.value=" ";
			form.media.value=" ";
			form.total.value=" ";
			}
	}
	else
	{
		form.dna1.value=" ";
		form.dna2.value=" ";
		form.en.value=" ";
		form.ec.value=" ";
		form.ef.value=" ";
		form.media.value=" ";
		form.total.value=" ";
	}
}
else
{
	form.dna1.value=" ";
	form.dna2.value=" ";
	form.en.value=" ";
	form.ec.value=" ";
	form.ef.value=" ";
	form.media.value=" ";
	form.total.value=" ";
}
}
// JavaScript Document
