function printit() {
	var NS = (navigator.appName == "Netscape");
	var VERSION = parseInt(navigator.appVersion);
		if (NS) {window.print() ;}
		else {
			var webBrowser = '<OBJECT ID="WebBrowser1" WIDTH=0 HEIGHT=0 CLASSID="CLSID:8856F961-340A-11D0-A96B-00C04FD705A2"></OBJECT>';
			document.body.insertAdjacentHTML('beforeEnd', webBrowser);
			WebBrowser1.ExecWB(6,1); //Use a 1 vs, a 2 for a prompting dialog box
			WebBrowser1.outerHTML= "";
		}
	}

function calculate()
{
	var Breed = document.Breedform.Breed.value;
	var Weight = document.Breedform.Fleece_lbs.value;
	var Grade = document.Fiber_Grade.Grade.value;
  	var WashPick = document.WashPick_form.Wash_Pick.checked;
  	var CleanRun = document.Setup_form.Clean_Run.checked;
	var Dehair = document.Dehair_form.Dehairing.checked;
	var Card = document.Card_form.Card.value;
	var Spin = document.Spin_form.Spin.value;
	var Ply = document.Spin_form.Ply.value;
	var Finish = document.Spin_form.Finish.value;
	var Felt = document.Felt_form.Felt.value;
	var Blend = document.Blend_form.Blend.value;

/* to put time and date info into printed form */
	var d = new Date();
	var t_mon = d.getMonth();      // Returns the month as a digit
	var t_date = d.getDate();      // Returns the day of the month
	var t_year = d.getFullYear();  // Returns 4 digit year
	var t_hour = d.getHours();     // Returns hours
	var t_min = d.getMinutes();    // Returns minutes
	var t_sec = d.getSeconds();    // Returns seocnds
	
	{Datetext = (t_mon + 1) + "/" + t_date + "/" + t_year;}
	{Timetext = t_hour + ":" + t_min + ":" + t_sec;}

/* to put readable info in submitted form */
	if (Grade == 1) {GradeText = "Grade A";
		GradeCharge = 1;}
	else if (Grade == 2) {GradeText = "Grade B";
		GradeCharge = 1; document.Dehair_form.Dehairing.checked = true;}
	else {GradeText = "Grade C";
		GradeCharge = 2; document.Dehair_form.Dehairing.checked = true;}

	if (Ply == 1) {Plytext = "none";
		adder = 0;}
	else if (Ply == 2) {Plytext = "2 Ply";
		adder = 0;}
	else if (Ply == 3) {Plytext = "3 Ply";
		adder = 1;}
	else 			   {Plytext = "4 Ply";
		adder = 2;}

	if (Finish == 1) {Finishtext = "none";}
	else if (Finish == 2) {Finishtext = "cone";}
	else if (Finish == 3) {Finishtext = "fulled skein";}
	else                  {Finishtext = "ball";}

	
	if (Blend == 1) {BlendCharge = 0.00;
		Blendtext = "none";}
	else if (Blend == 2) {BlendCharge = 1.50 * Weight;
		Blendtext = "Picker Blending";}
	else if (Blend == 3) {BlendCharge = 2.00 * Weight;
		Blendtext = "Carder Blending";}
	else if (Blend == 4) {BlendCharge = 2.25 * Weight;
		Blendtext = "Drawframe Blending";}
	else {BlendCharge = 2.50 * Weight;
		Blendtext = "Plyer Blending";}
		
	if (Card == 2) 		{CardCharge = 7.00 * Weight;	// Batting
		document.Spin_form.Spin.value = 1;
		document.Spin_form.Ply.value = 1;
		document.Spin_form.Finish.value = 1;
		CardText = "Batting";}
	else if (Card == 3) {CardCharge = 7.00 * Weight;	// Roving on to yarn
		CardText = "Roving to yarn";}
	else if (Card == 4) {CardCharge = 7.50 * Weight;	// 8 oz. bumps
		document.Spin_form.Spin.value = 1;
		document.Spin_form.Ply.value = 1;
		document.Spin_form.Finish.value = 1;
		CardText = "8 oz. bumps";}
	else if (Card == 5) {CardCharge = 7.00 * Weight;	// loose into bags
		document.Spin_form.Spin.value = 1;
		document.Spin_form.Ply.value = 1;
		document.Spin_form.Finish.value =1;
		CardText = "roving loose into bags";}
	else if (Card == 6) {CardCharge = 0.00 * Weight;	// loose into bags
		document.Spin_form.Spin.value = 1;
		document.Spin_form.Ply.value = 1;
		document.Spin_form.Finish.value = 1;
		CardText = "clouds loose into bags";}
	else if (Card == 7) {CardCharge = 8.50 * Weight;	// Rug Yarn
		document.Spin_form.Spin.value = 1;
		document.Spin_form.Ply.value = 1;
		document.Spin_form.Finish.value = 1;
		CardText = "Rug Yarn";}
	else {CardCharge = 0.00; CardText = "(none)";
		document.Spin_form.Spin.value = 1;
		document.Spin_form.Ply.value = 1;
		document.Spin_form.Finish.value = 1;}

	if (CleanRun) {SetupCharge = 25.00;
		CleanRuntext = "Yes";}
	else {SetupCharge = 0.00;
		CleanRuntext = "No";}		

	if (Dehair) {DehairCharge = 5.00 * Weight * GradeCharge;}
	else {DehairCharge = 0.00;}

	if (Card == 3) {DraftText = "Yes";}
	else {DraftText = "No";}
	
	if (WashPick) {WashPickText = "Yes";}
	else {WashPickText = "No";}
	
	if (Dehair) {DehairText = "Yes";}
	else {DehairText = "No";}

/* Forces a three pound minimum */	
	if (Weight < 3.00) {Weight = 3.00;
		document.Breedform.Fleece_lbs.value = Weight;}
	else {}

/* (If they get it spun, they must get it carded) */
	if (Spin == 1) {}
	else {document.Card_form.Card.value = 3; Card = 3;
	document.Felt_form.Felt.value = 1; Felt = 1;}

/* Icelandic */
	if (Breed == 1)
	{Breedtext = "Icelandic"; Yield = .6;
		if (WashPick) {WashPickCharge = 6.00 * Weight;}
		else {WashPickCharge = 0.00;}
	if (Spin == 1) {Spintext = "none";
		document.Spin_form.Finish.value = 1;
		document.Spin_form.Ply.value = 1;
		adder = 0;
		Yarn_Weight = 0;
		SpinCharge = 0.00;}
	else if (Spin == 2) {Spintext = "Lopi";
		document.Card_form.Card.value = 3;
		document.Spin_form.Ply.value = 1;
		adder = 0;
		Yarn_Weight = 300;
		SpinCharge = (7.00 + adder) * Weight;}
	else if (Spin == 3) {Spintext = "Lopi Lite";
		document.Card_form.Card.value = 3;
		document.Spin_form.Ply.value = 1;
		adder = 0;
		SpinCharge = (9.00 + adder) * Weight;
		Yarn_Weight = 400;}
	else if (Spin == 4) {Spintext = "Bulky";
		document.Card_form.Card.value = 3;
		if (document.Spin_form.Ply.value == 1)
			{document.Spin_form.Ply.value = 2;
			adder = 0;}
		SpinCharge = (12.50 + adder) * Weight;
		Yarn_Weight = 800;}
	else if (Spin == 5) {Spintext = "Sport";
		document.Card_form.Card.value = 3;
		if (document.Spin_form.Ply.value == 1)
			{document.Spin_form.Ply.value = 2;
			adder = 0;}
		SpinCharge = (13.75 + adder) * Weight;
		Yarn_Weight = 1200;}
	else if (Spin == 6) {Spintext = "Fingering";
		document.Card_form.Card.value = 3;
		if (document.Spin_form.Ply.value == 1)
			{document.Spin_form.Ply.value = 2;
			adder = 0;}
		if (document.Spin_form.Ply.value == 4)
			{document.Spin_form.Ply.value = 3;
			adder = 1;}
		SpinCharge = (16.25 + adder) * Weight;
		Yarn_Weight = 1600;}
	else {Spintext = "Lace";
		document.Card_form.Card.value = 3;
		document.Spin_form.Ply.value = 2;
		adder = 0;
		SpinCharge = (20.00 + adder) * Weight;
		Yarn_Weight = 2400;}
	}

/* Llama */
	else if (Breed == 2)
	{Breedtext = "Llama"; Yield = .8;
		if (WashPick) {WashPickCharge = 11.00 * Weight;}
		else {WashPickCharge = 0.00;}
	if (Spin == 1) {Spintext = "none";
		document.Spin_form.Finish.value = 1;
		document.Spin_form.Ply.value = 1;
		adder = 0;
		Yarn_Weight = 0;
		SpinCharge = 0.00;}
	else if (Spin == 2) {Spintext = "Lopi";
		document.Card_form.Card.value = 3;
		document.Spin_form.Ply.value = 1;
		adder = 0;
		Yarn_Weight = 300;
		SpinCharge = (7.25 + adder) * Weight;}
	else if (Spin == 3) {Spintext = "Lopi Lite";
		document.Card_form.Card.value = 3;
		document.Spin_form.Ply.value = 1;
		adder = 0;
		SpinCharge = (9.50 + adder) * Weight;
		Yarn_Weight = 400;}
	else if (Spin == 4) {Spintext = "Bulky";
		document.Card_form.Card.value = 3;
		if (document.Spin_form.Ply.value == 1)
			{document.Spin_form.Ply.value = 2;
			adder = 0;}
		SpinCharge = (12.75 + adder) * Weight;
		Yarn_Weight = 800;}
	else if (Spin == 5) {Spintext = "Sport";
		document.Card_form.Card.value = 3;
		if (document.Spin_form.Ply.value == 1)
			{document.Spin_form.Ply.value = 2;
			adder = 0;}
		SpinCharge = (14.50 + adder) * Weight;
		Yarn_Weight = 1200;}
	else if (Spin == 6) {Spintext = "Fingering";
		document.Card_form.Card.value = 3;
		if (document.Spin_form.Ply.value == 1)
			{document.Spin_form.Ply.value = 2;
			adder = 0;}
		if (document.Spin_form.Ply.value == 4)
			{document.Spin_form.Ply.value = 3;
			adder = 1;}
		SpinCharge = (17.25 + adder) * Weight;
		Yarn_Weight = 1600;}
	else {Spintext = "Lace";
		document.Card_form.Card.value = 3;
		document.Spin_form.Ply.value = 2;
		adder = 0;
		SpinCharge = (21.50 + adder) * Weight;
		Yarn_Weight = 2400;}
	}

/* Huacaya Alpaca */
	else if (Breed == 3)
	{Breedtext = "Huacaya Alpaca"; Yield = .8;
		if (WashPick) {WashPickCharge = 11.00 * Weight;}
		else {WashPickCharge = 0.00;}
	if (Spin == 1) {Spintext = "none";
		document.Spin_form.Finish.value = 1;
		document.Spin_form.Ply.value = 1;
		adder = 0;
		Yarn_Weight = 0;
		SpinCharge = 0.00;}
	else if (Spin == 2) {Spintext = "Lopi";
		document.Card_form.Card.value = 3;
		document.Spin_form.Ply.value = 1;
		adder = 0;
		Yarn_Weight = 300;
		SpinCharge = (7.25 + adder) * Weight;}
	else if (Spin == 3) {Spintext = "Lopi Lite";
		document.Card_form.Card.value = 3;
		document.Spin_form.Ply.value = 1;
		adder = 0;
		SpinCharge = (9.50 + adder) * Weight;
		Yarn_Weight = 400;}
	else if (Spin == 4) {Spintext = "Bulky";
		document.Card_form.Card.value = 3;
		if (document.Spin_form.Ply.value == 1)
			{document.Spin_form.Ply.value = 2;
			adder = 0;}
		SpinCharge = (12.75 + adder) * Weight;
		Yarn_Weight = 800;}
	else if (Spin == 5) {Spintext = "Sport";
		document.Card_form.Card.value = 3;
		if (document.Spin_form.Ply.value == 1)
			{document.Spin_form.Ply.value = 2;
			adder = 0;}
		SpinCharge = (14.50 + adder) * Weight;
		Yarn_Weight = 1200;}
	else if (Spin == 6) {Spintext = "Fingering";
		document.Card_form.Card.value = 3;
		if (document.Spin_form.Ply.value == 1)
			{document.Spin_form.Ply.value = 2;
			adder = 0;}
		if (document.Spin_form.Ply.value == 4)
			{document.Spin_form.Ply.value = 3;
			adder = 1;}
		SpinCharge = (17.25 + adder) * Weight;
		Yarn_Weight = 1600;}
	else {Spintext = "Lace";
		document.Card_form.Card.value = 3;
		document.Spin_form.Ply.value = 2;
		adder = 0;
		SpinCharge = (21.50 + adder) * Weight;
		Yarn_Weight = 2400;}
	}

/* Suri Alpaca */
	else if (Breed == 4)
	{Breedtext = "Suri Alpaca"; Yield = .8;
		if (WashPick) {WashPickCharge = 11.00 * Weight;}
		else {WashPickCharge = 0.00;}
	if (Spin == 1) {Spintext = "none";
		document.Spin_form.Finish.value = 1;
		document.Spin_form.Ply.value = 1;
		adder = 0;
		Yarn_Weight = 0;
		SpinCharge = 0.00;}
	else if (Spin == 2) {Spintext = "Lopi";
		document.Card_form.Card.value = 3;
		document.Spin_form.Ply.value = 1;
		adder = 0;
		Yarn_Weight = 300;
		SpinCharge = (7.25 + adder) * Weight;}
	else if (Spin == 3) {Spintext = "Lopi Lite";
		document.Card_form.Card.value = 3;
		document.Spin_form.Ply.value = 1;
		adder = 0;
		SpinCharge = (9.50 + adder) * Weight;
		Yarn_Weight = 400;}
	else if (Spin == 4) {Spintext = "Bulky";
		document.Card_form.Card.value = 3;
		if (document.Spin_form.Ply.value == 1)
			{document.Spin_form.Ply.value = 2;
			adder = 0;}
		SpinCharge = (12.75 + adder) * Weight;
		Yarn_Weight = 800;}
	else if (Spin == 5) {Spintext = "Sport";
		document.Card_form.Card.value = 3;
		if (document.Spin_form.Ply.value == 1)
			{document.Spin_form.Ply.value = 2;
			adder = 0;}
		SpinCharge = (14.50 + adder) * Weight;
		Yarn_Weight = 1200;}
	else if (Spin == 6) {Spintext = "Fingering";
		document.Card_form.Card.value = 3;
		if (document.Spin_form.Ply.value == 1)
			{document.Spin_form.Ply.value = 2;
			adder = 0;}
		if (document.Spin_form.Ply.value == 4)
			{document.Spin_form.Ply.value = 3;
			adder = 1;}
		SpinCharge = (17.25 + adder) * Weight;
		Yarn_Weight = 1600;}
	else {Spintext = "Lace";
		document.Card_form.Card.value = 3;
		document.Spin_form.Ply.value = 2;
		adder = 0;
		SpinCharge = (21.50 + adder) * Weight;
		Yarn_Weight = 2400;}
	}

/* Corriedale */
	else if (Breed == 5)
	{Breedtext = "Corriedale"; Yield = .8;
		if (WashPick) {WashPickCharge = 8.00 * Weight;}
		else {WashPickCharge = 0.00;}
	if (Spin == 1) {Spintext = "none";
		document.Spin_form.Finish.value = 1;
		document.Spin_form.Ply.value = 1;
		adder = 0;
		Yarn_Weight = 0;
		SpinCharge = 0.00;}
	else if (Spin == 2) {Spintext = "Lopi";
		document.Card_form.Card.value = 3;
		document.Spin_form.Ply.value = 1;
		adder = 0;
		Yarn_Weight = 300;
		SpinCharge = (6.00 + adder) * Weight;}
	else if (Spin == 3) {Spintext = "Lopi Lite";
		document.Card_form.Card.value = 3;
		document.Spin_form.Ply.value = 1;
		adder = 0;
		SpinCharge = (8.00 + adder) * Weight;
		Yarn_Weight = 400;}
	else if (Spin == 4) {Spintext = "Bulky";
		document.Card_form.Card.value = 3;
		if (document.Spin_form.Ply.value == 1)
			{document.Spin_form.Ply.value = 2;
			adder = 0;}
		SpinCharge = (11.00 + adder) * Weight;
		Yarn_Weight = 800;}
	else if (Spin == 5) {Spintext = "Sport";
		document.Card_form.Card.value = 3;
		if (document.Spin_form.Ply.value == 1)
			{document.Spin_form.Ply.value = 2;
			adder = 0;}
		SpinCharge = (14.50 + adder) * Weight;
		Yarn_Weight = 1200;}
	else if (Spin == 6) {Spintext = "Fingering";
		document.Card_form.Card.value = 3;
		if (document.Spin_form.Ply.value == 1)
			{document.Spin_form.Ply.value = 2;
			adder = 0;}
		if (document.Spin_form.Ply.value == 4)
			{document.Spin_form.Ply.value = 3;
			adder = 1;}
		SpinCharge = (18.00 + adder) * Weight;
		Yarn_Weight = 1600;}
	else {Spintext = "Lace";
		document.Card_form.Card.value = 3;
		document.Spin_form.Ply.value = 2;
		adder = 0;
		SpinCharge = (22.00 + adder) * Weight;
		Yarn_Weight = 2400;}
	}

/* Jacob */
	else if (Breed == 6)
	{Breedtext = "Jacob"; Yield = .8;
		if (WashPick) {WashPickCharge = 8.00 * Weight;}
		else {WashPickCharge = 0.00;}
	if (Spin == 1) {Spintext = "none";
		document.Spin_form.Finish.value = 1;
		document.Spin_form.Ply.value = 1;
		adder = 0;
		Yarn_Weight = 0;
		SpinCharge = 0.00;}
	else if (Spin == 2) {Spintext = "Lopi";
		document.Card_form.Card.value = 3;
		document.Spin_form.Ply.value = 1;
		adder = 0;
		Yarn_Weight = 300;
		SpinCharge = (6.00 + adder) * Weight;}
	else if (Spin == 3) {Spintext = "Lopi Lite";
		document.Card_form.Card.value = 3;
		document.Spin_form.Ply.value = 1;
		adder = 0;
		SpinCharge = (8.00 + adder) * Weight;
		Yarn_Weight = 400;}
	else if (Spin == 4) {Spintext = "Bulky";
		document.Card_form.Card.value = 3;
		if (document.Spin_form.Ply.value == 1)
			{document.Spin_form.Ply.value = 2;
			adder = 0;}
		SpinCharge = (11.00 + adder) * Weight;
		Yarn_Weight = 800;}
	else if (Spin == 5) {Spintext = "Sport";
		document.Card_form.Card.value = 3;
		if (document.Spin_form.Ply.value == 1)
			{document.Spin_form.Ply.value = 2;
			adder = 0;}
		SpinCharge = (14.50 + adder) * Weight;
		Yarn_Weight = 1200;}
	else if (Spin == 6) {Spintext = "Fingering";
		document.Card_form.Card.value = 3;
		if (document.Spin_form.Ply.value == 1)
			{document.Spin_form.Ply.value = 2;
			adder = 0;}
		if (document.Spin_form.Ply.value == 4)
			{document.Spin_form.Ply.value = 3;
			adder = 1;}
		SpinCharge = (18.00 + adder) * Weight;
		Yarn_Weight = 1600;}
	else {Spintext = "Lace";
		document.Card_form.Card.value = 3;
		document.Spin_form.Ply.value = 2;
		adder = 0;
		SpinCharge = (22.00 + adder) * Weight;
		Yarn_Weight = 2400;}
	}

/* Rambouillet */
	else if (Breed == 7)
	{Breedtext = "Rambouillet"; Yield = .8;
		if (WashPick) {WashPickCharge = 8.00 * Weight;}
		else {WashPickCharge = 0.00;}
	if (Spin == 1) {Spintext = "none";
		document.Spin_form.Finish.value = 1;
		document.Spin_form.Ply.value = 1;
		adder = 0;
		Yarn_Weight = 0;
		SpinCharge = 0.00;}
	else if (Spin == 2) {Spintext = "Lopi";
		document.Card_form.Card.value = 3;
		document.Spin_form.Ply.value = 1;
		adder = 0;
		Yarn_Weight = 300;
		SpinCharge = (6.00 + adder) * Weight;}
	else if (Spin == 3) {Spintext = "Lopi Lite";
		document.Card_form.Card.value = 3;
		document.Spin_form.Ply.value = 1;
		adder = 0;
		SpinCharge = (8.00 + adder) * Weight;
		Yarn_Weight = 400;}
	else if (Spin == 4) {Spintext = "Bulky";
		document.Card_form.Card.value = 3;
		if (document.Spin_form.Ply.value == 1)
			{document.Spin_form.Ply.value = 2;
			adder = 0;}
		SpinCharge = (11.00 + adder) * Weight;
		Yarn_Weight = 800;}
	else if (Spin == 5) {Spintext = "Sport";
		document.Card_form.Card.value = 3;
		if (document.Spin_form.Ply.value == 1)
			{document.Spin_form.Ply.value = 2;
			adder = 0;}
		SpinCharge = (14.50 + adder) * Weight;
		Yarn_Weight = 1200;}
	else if (Spin == 6) {Spintext = "Fingering";
		document.Card_form.Card.value = 3;
		if (document.Spin_form.Ply.value == 1)
			{document.Spin_form.Ply.value = 2;
			adder = 0;}
		if (document.Spin_form.Ply.value == 4)
			{document.Spin_form.Ply.value = 3;
			adder = 1;}
		SpinCharge = (18.00 + adder) * Weight;
		Yarn_Weight = 1600;}
	else {Spintext = "Lace";
		document.Card_form.Card.value = 3;
		document.Spin_form.Ply.value = 2;
		adder = 0;
		SpinCharge = (22.00 + adder) * Weight;
		Yarn_Weight = 2400;}
	}

/* Shetland */
	else if (Breed == 8)
	{Breedtext = "Shetland"; Yield = .8;
		if (WashPick) {WashPickCharge = 8.00 * Weight;}
		else {WashPickCharge = 0.00;}
	if (Spin == 1) {Spintext = "none";
		document.Spin_form.Finish.value = 1;
		document.Spin_form.Ply.value = 1;
		adder = 0;
		Yarn_Weight = 0;
		SpinCharge = 0.00;}
	else if (Spin == 2) {Spintext = "Lopi";
		document.Card_form.Card.value = 3;
		document.Spin_form.Ply.value = 1;
		adder = 0;
		Yarn_Weight = 300;
		SpinCharge = (6.00 + adder) * Weight;}
	else if (Spin == 3) {Spintext = "Lopi Lite";
		document.Card_form.Card.value = 3;
		document.Spin_form.Ply.value = 1;
		adder = 0;
		SpinCharge = (8.00 + adder) * Weight;
		Yarn_Weight = 400;}
	else if (Spin == 4) {Spintext = "Bulky";
		document.Card_form.Card.value = 3;
		if (document.Spin_form.Ply.value == 1)
			{document.Spin_form.Ply.value = 2;
			adder = 0;}
		SpinCharge = (11.00 + adder) * Weight;
		Yarn_Weight = 800;}
	else if (Spin == 5) {Spintext = "Sport";
		document.Card_form.Card.value = 3;
		if (document.Spin_form.Ply.value == 1)
			{document.Spin_form.Ply.value = 2;
			adder = 0;}
		SpinCharge = (14.50 + adder) * Weight;
		Yarn_Weight = 1200;}
	else if (Spin == 6) {Spintext = "Fingering";
		document.Card_form.Card.value = 3;
		if (document.Spin_form.Ply.value == 1)
			{document.Spin_form.Ply.value = 2;
			adder = 0;}
		if (document.Spin_form.Ply.value == 4)
			{document.Spin_form.Ply.value = 3;
			adder = 1;}
		SpinCharge = (18.00 + adder) * Weight;
		Yarn_Weight = 1600;}
	else {Spintext = "Lace";
		document.Card_form.Card.value = 3;
		document.Spin_form.Ply.value = 2;
		adder = 0;
		SpinCharge = (22.00 + adder) * Weight;
		Yarn_Weight = 2400;}
	}

/* Romney */
	else if (Breed == 9)
	{Breedtext = "Romney"; Yield = .8;
		if (WashPick) {WashPickCharge = 8.00 * Weight;}
		else {WashPickCharge = 0.00;}
	if (Spin == 1) {Spintext = "none";
		document.Spin_form.Finish.value = 1;
		document.Spin_form.Ply.value = 1;
		adder = 0;
		Yarn_Weight = 0;
		SpinCharge = 0.00;}
	else if (Spin == 2) {Spintext = "Lopi";
		document.Card_form.Card.value = 3;
		document.Spin_form.Ply.value = 1;
		adder = 0;
		Yarn_Weight = 300;
		SpinCharge = (6.00 + adder) * Weight;}
	else if (Spin == 3) {Spintext = "Lopi Lite";
		document.Card_form.Card.value = 3;
		document.Spin_form.Ply.value = 1;
		adder = 0;
		SpinCharge = (8.00 + adder) * Weight;
		Yarn_Weight = 400;}
	else if (Spin == 4) {Spintext = "Bulky";
		document.Card_form.Card.value = 3;
		if (document.Spin_form.Ply.value == 1)
			{document.Spin_form.Ply.value = 2;
			adder = 0;}
		SpinCharge = (11.00 + adder) * Weight;
		Yarn_Weight = 800;}
	else if (Spin == 5) {Spintext = "Sport";
		document.Card_form.Card.value = 3;
		if (document.Spin_form.Ply.value == 1)
			{document.Spin_form.Ply.value = 2;
			adder = 0;}
		SpinCharge = (14.50 + adder) * Weight;
		Yarn_Weight = 1200;}
	else if (Spin == 6) {Spintext = "Fingering";
		document.Card_form.Card.value = 3;
		if (document.Spin_form.Ply.value == 1)
			{document.Spin_form.Ply.value = 2;
			adder = 0;}
		if (document.Spin_form.Ply.value == 4)
			{document.Spin_form.Ply.value = 3;
			adder = 1;}
		SpinCharge = (18.00 + adder) * Weight;
		Yarn_Weight = 1600;}
	else {Spintext = "Lace";
		document.Card_form.Card.value = 3;
		document.Spin_form.Ply.value = 2;
		adder = 0;
		SpinCharge = (22.00 + adder) * Weight;
		Yarn_Weight = 2400;}
	}

/* Mohair */
	else if (Breed == 10)
	{Breedtext = "Mohair"; Yield = .7;
		if (WashPick) {WashPickCharge = 16.00 * Weight;}
		else {WashPickCharge = 0.00;}
	if (Spin == 1) {Spintext = "none";
		document.Spin_form.Finish.value = 1;
		document.Spin_form.Ply.value = 1;
		adder = 0;
		Yarn_Weight = 0;
		SpinCharge = 0.00;}
	else if (Spin == 2) {Spintext = "Lopi";
		document.Card_form.Card.value = 3;
		document.Spin_form.Ply.value = 1;
		adder = 0;
		Yarn_Weight = 300;
		SpinCharge = (6.00 + adder) * Weight;}
	else if (Spin == 3) {Spintext = "Lopi Lite";
		document.Card_form.Card.value = 3;
		document.Spin_form.Ply.value = 1;
		adder = 0;
		SpinCharge = (8.00 + adder) * Weight;
		Yarn_Weight = 400;}
	else if (Spin == 4) {Spintext = "Bulky";
		document.Card_form.Card.value = 3;
		if (document.Spin_form.Ply.value == 1)
			{document.Spin_form.Ply.value = 2;
			adder = 0;}
		SpinCharge = (11.00 + adder) * Weight;
		Yarn_Weight = 800;}
	else if (Spin == 5) {Spintext = "Sport";
		document.Card_form.Card.value = 3;
		if (document.Spin_form.Ply.value == 1)
			{document.Spin_form.Ply.value = 2;
			adder = 0;}
		SpinCharge = (14.50 + adder) * Weight;
		Yarn_Weight = 1200;}
	else if (Spin == 6) {Spintext = "Fingering";
		document.Card_form.Card.value = 3;
		if (document.Spin_form.Ply.value == 1)
			{document.Spin_form.Ply.value = 2;
			adder = 0;}
		if (document.Spin_form.Ply.value == 4)
			{document.Spin_form.Ply.value = 3;
			adder = 1;}
		SpinCharge = (18.00 + adder) * Weight;
		Yarn_Weight = 1600;}
	else {Spintext = "Lace";
		document.Card_form.Card.value = 3;
		document.Spin_form.Ply.value = 2;
		adder = 0;
		SpinCharge = (22.00 + adder) * Weight;
		Yarn_Weight = 2400;}
	}

/* Leicester */
	else
	{Breedtext = "Leicester"; Yield = .7;
		if (WashPick) {WashPickCharge = 16.00 * Weight;}
		else {WashPickCharge = 0.00;}
	if (Spin == 1) {Spintext = "none";
		document.Spin_form.Finish.value = 1;
		document.Spin_form.Ply.value = 1;
		adder = 0;
		Yarn_Weight = 0;
		SpinCharge = 0.00;}
	else if (Spin == 2) {Spintext = "Lopi";
		document.Card_form.Card.value = 3;
		document.Spin_form.Ply.value = 1;
		adder = 0;
		Yarn_Weight = 300;
		SpinCharge = (6.00 + adder) * Weight;}
	else if (Spin == 3) {Spintext = "Lopi Lite";
		document.Card_form.Card.value = 3;
		document.Spin_form.Ply.value = 1;
		adder = 0;
		SpinCharge = (8.00 + adder) * Weight;
		Yarn_Weight = 400;}
	else if (Spin == 4) {Spintext = "Bulky";
		document.Card_form.Card.value = 3;
		if (document.Spin_form.Ply.value == 1)
			{document.Spin_form.Ply.value = 2;
			adder = 0;}
		SpinCharge = (11.00 + adder) * Weight;
		Yarn_Weight = 800;}
	else if (Spin == 5) {Spintext = "Sport";
		document.Card_form.Card.value = 3;
		if (document.Spin_form.Ply.value == 1)
			{document.Spin_form.Ply.value = 2;
			adder = 0;}
		SpinCharge = (14.50 + adder) * Weight;
		Yarn_Weight = 1200;}
	else if (Spin == 6) {Spintext = "Fingering";
		document.Card_form.Card.value = 3;
		if (document.Spin_form.Ply.value == 1)
			{document.Spin_form.Ply.value = 2;
			adder = 0;}
		if (document.Spin_form.Ply.value == 4)
			{document.Spin_form.Ply.value = 3;
			adder = 1;}
		SpinCharge = (18.00 + adder) * Weight;
		Yarn_Weight = 1600;}
	else {Spintext = "Lace";
		document.Card_form.Card.value = 3;
		document.Spin_form.Ply.value = 2;
		adder = 0;
		SpinCharge = (22.00 + adder) * Weight;
		Yarn_Weight = 2400;}
	}

/* Figure the number of felt sheets and calculate price */

	FeltSheetPrice = 0;

	if (Felt == 1) {FeltCharge = 0;										// No Felting
		FeltText = "none";}
	else if (Felt == 2) {FeltSheetPrice = 12.50;						// 1 lb. 3x4 sheets
		FeltText = "1 lb. 3x4 sheets";
		FeltCharge = Math.round(Weight * Yield) * FeltSheetPrice;
		CardCharge = 6.00 * Weight; Card = 2; CardText = "Batting";
		document.Card_form.Card.value = 2;
		Spin == 1; Spintext = "none"; DraftText = "No";
		document.Spin_form.Spin.value = 1;
		Ply = 1; Plytext = "none";
		document.Spin_form.Ply.value = 1;}
	else if (Felt == 3) {FeltSheetPrice = 14.00;						// 1 lb. 4x4 sheets
		FeltText = "1 lb. 4x4 sheets";
		FeltCharge = Math.round(Weight * Yield) * FeltSheetPrice;
		CardCharge = 6.00 * Weight; Card = 2; CardText = "Batting";
		document.Card_form.Card.value = 2;
		Spin == 1; Spintext = "none"; DraftText = "No";
		document.Spin_form.Spin.value = 1;
		Ply = 1; Plytext = "none";
		document.Spin_form.Ply.value = 1;}
	else if (Felt == 4) {FeltSheetPrice = 15.00;						// 2 lb. 3x4 sheets
		FeltText = "2 lb. 3x4 sheets";
		FeltCharge = Math.round(Weight * Yield / 2) * FeltSheetPrice;
		CardCharge = 6.00 * Weight; Card = 2; CardText = "Batting";
		document.Card_form.Card.value = 2;
		Spin == 1; Spintext = "none"; DraftText = "No";
		document.Spin_form.Spin.value = 1;
		Ply = 1; Plytext = "none";
		document.Spin_form.Ply.value = 1;}
	else {FeltSheetPrice = 17.00;										// 2 lb. 4x4 sheets
		FeltText = "2 lb. 4x4 sheets";
		FeltCharge = Math.round(Weight * Yield / 2) * FeltSheetPrice;
		CardCharge = 6.00 * Weight; Card = 2; CardText = "Batting";
		document.Card_form.Card.value = 2;
		Spin == 1; Spintext = "none"; DraftText = "No";
		document.Spin_form.Spin.value = 1;
		Ply = 1; Plytext = "none";
		document.Spin_form.Ply.value = 1;}


	document.Setup_form.Setup_Charge.value = SetupCharge.toFixed(2);
	document.WashPick_form.Wash_Pick_Charge.value = WashPickCharge.toFixed(2);
	document.Dehair_form.Dehairing_Charge.value = DehairCharge.toFixed(2);
	document.Card_form.Carding_Charge.value = CardCharge.toFixed(2);
	document.Spin_form.Spin_Charge.value = SpinCharge.toFixed(2);
	document.Spin_form.Spin.value = Spin;
	document.Spin_form.Yarn_Weight.value = Yarn_Weight;
	document.Felt_form.Felt_Charge.value = FeltCharge.toFixed(2);
	document.Felt_form.Felt.value = Felt;
	document.Felt_form.SheetPrice.value = FeltSheetPrice.toFixed(2);
	document.Blend_form.Blend_Charge.value = BlendCharge.toFixed(2);
	TotalCharge = SetupCharge + WashPickCharge + DehairCharge + CardCharge + SpinCharge + FeltCharge + BlendCharge;
	document.Total_form.Total_Charge.value = TotalCharge.toFixed(2);
	PoundCharge = document.Total_form.Total_Charge.value / Weight;
	document.Total_form.Pound_Charge.value = PoundCharge.toFixed(2);

	document.FrontPage_Form12.Breed.value = Breedtext;
	document.FrontPage_Form12.Weight.value = Weight;
	document.FrontPage_Form12.Grade.value = GradeText;
	document.FrontPage_Form12.WashPick.value = WashPickText;
	document.FrontPage_Form12.CleanRun.value = CleanRuntext;
	document.FrontPage_Form12.Dehair.value = DehairText;
	document.FrontPage_Form12.Card.value = CardText;
	document.FrontPage_Form12.Spin.value = Spintext;
	document.FrontPage_Form12.Ply.value = Plytext;
	document.FrontPage_Form12.Finish.value = Finishtext;
	document.FrontPage_Form12.Felt.value = FeltText;
	document.FrontPage_Form12.Blend.value = Blendtext;
	document.FrontPage_Form12.Draft.value = DraftText;
	document.FrontPage_Form12.Total_Charge.value = TotalCharge.toFixed(2);

	document.Print_Form.Breed.value = Breedtext;
	document.Print_Form.Weight.value = Weight;
	document.Print_Form.Grade.value = GradeText;
	document.Print_Form.WashPick.value = WashPickText;
	document.Print_Form.CleanRun.value = CleanRuntext;
	document.Print_Form.Dehair.value = DehairText;
	document.Print_Form.Card.value = CardText;
	document.Print_Form.Spin.value = Spintext;
	document.Print_Form.Ply.value = Plytext;
	document.Print_Form.Finish.value = Finishtext;
	document.Print_Form.Felt.value = FeltText;
	document.Print_Form.Blend.value = Blendtext;
	document.Print_Form.Draft.value = DraftText;
	document.Print_Form.Total_Charge.value = TotalCharge.toFixed(2);
	document.Print_Form.Date.value = Datetext;
	document.Print_Form.Time.value = Timetext;

	document.Print_Form.Name.value = document.FrontPage_Form12.Name.value;
	document.Print_Form.Phone.value = document.FrontPage_Form12.Phone.value;
	document.Print_Form.Address.value = document.FrontPage_Form12.Address.value;
	document.Print_Form.Animal_Name.value = document.FrontPage_Form12.Animal_Name.value;
	document.Print_Form.Animal_Color.value = document.FrontPage_Form12.Animal_Color.value;
	document.Print_Form.City.value = document.FrontPage_Form12.City.value;
	document.Print_Form.State.value = document.FrontPage_Form12.State.value;
	document.Print_Form.Zipcode.value = document.FrontPage_Form12.Zipcode.value;
	document.Print_Form.Email.value = document.FrontPage_Form12.Email.value;
	document.Print_Form.Comments.value = document.FrontPage_Form12.Comments.value;
	}