
/*  ------------------------------------------------------------
 *   Programm zum Berechnen des Gewichtes von Lamas     	
 *   (anhand von Brustumfang und Horizontalumfang)      	
 *  ------------------------------------------------------------
 *   Formel entwickelt von Prof. C. Kiesling	        	
 *   Programmierung von K. Kiesling				
 *								
 *   (C) Copyright 2000 by C.Kiesling and K.Kiesling    	
 * 								
 *  ------------------------------------------------------------
 *  Das Kopieren oder veraendern diese Programmes ist    	
 *  ausdruecklich verboten ! 					
 *  Die Benutzung dieses Programmes ist ausschliesslich fuer 	
 *  PRIVATE ZWECKE gestattet. 					
 *  Die Weitergabe an Dritte oder Benuetzung des Programmes fuer
 *  kommerzielle Zwecke ist NICHT gestattet, und darf nur mit   
 *  Genehmigung durch die Urheber geschehen !   		
 *  ------------------------------------------------------------*/



   var can_i_go_on = true;
   var Ub_transformed;  // if there was a comma in Ub or in Uh, 
   var Uh_transformed;  // now it has been transformed into a dot
  
   var w_comb;          // result of the combined formular of weight

   var Ub_max = 150;    // max and min that are allowed as Ub and UH
   var Ub_min = 50;     //
   var Uh_max = 320;    //
   var Uh_min = 110;   //

   var devmax = 0.25;   // maximum relative deviation limit between Result_Ub and Result_Uh



   function ReplaceComma(Ub, Uh) 
   {
	if(isNaN(Ub) == true) {
   		var Ub_withdot = parseFloat(Ub.replace(/,/,"."));
		if (isNaN(Ub_withdot) == true) {
		    alert("Sie haben beim Brust-Umfang keine gueltige Zahl eingegeben ! Bitte ueberpruefen Sie ihre Eingaben.");
		    document.GewichtForm.UbEingabe.value = "";
		    document.GewichtForm.UbEingabe.focus();
		    return can_i_go_on = false;
		}
		else Ub_transformed = Ub_withdot;	
	}
	else Ub_transformed = Ub;
 
	if(isNaN(Uh) == true) {
		var Uh_withdot = parseFloat(Uh.replace(/,/,"."));
		if (isNaN(Uh_withdot) == true) {
		    alert("Sie haben beim Brust-Umfang keine gueltige Zahl eingegeben ! Bitte ueberpruefen Sie ihre Eingaben.");
  		    document.GewichtForm.UhEingabe.value = "";
		    document.GewichtForm.UhEingabe.focus();
		    return can_i_go_on = false;
		}
		else Uh_transformed = Uh_withdot;
	}
	else Uh_transformed = Uh;
   };


   function CheckConsistency(Ub_transformed, Uh_transformed) 
   {
	w_comb = 2.8 + (41.5 * Math.pow(Ub_transformed / 100,3)) + (3.72 * Math.pow(Uh_transformed / 100,3));

	var Result_Ub = 4.3 + (76.3 * Math.pow(Ub_transformed / 100,3));
	var Result_Uh = 3.4 + (7.8 * Math.pow(Uh_transformed / 100,3));

	if (Math.abs(Result_Ub - Result_Uh) / w_comb > devmax) {
	    alert("ACHTUNG: Ergebnis inkonsistent! Bitte überprüfen Sie Ihre Messungen") // Gewicht-UB: " + Result_Ub + " und Gewicht-UH: " + Result_Uh + " und Gesamtgewicht: " + w_comb + "!!!");
	   return can_i_go_on = false;
	};
	
	w_comb = Math.round(w_comb);
	// alert(w_comb);
   };


   function CheckInput(Ub, Uh)
   {	
	if(Ub == "") {
		alert("Sie haben vergessen, einen Brust-Umfang einzugegeben !");
		document.GewichtForm.UbEingabe.focus();
		return can_i_go_on = false;
	};
   	if(Uh == "") {
		alert("Sie haben vergessen, einen Horizontal-Umfang einzugegeben !");
		document.GewichtForm.UhEingabe.focus();
		return can_i_go_on = false;
	};

	ReplaceComma(Ub, Uh);

	if(Ub_transformed < Ub_min) {
		alert("Sind Sie sicher, dass Ihr Lama einen Brust-Umfang von nur " + Ub_transformed + " cm hat ?!\n" +
		      "________________________________________________________\n\n" +
		      "   Bitte kontrolieren Sie Ihre Eingaben und versuchen es erneut !");
		document.GewichtForm.UbEingabe.value = "";
		document.GewichtForm.UbEingabe.focus();
		return can_i_go_on = false;
	};
	if(Ub_transformed > Ub_max) {
		alert("Sind Sie sicher, dass Ihr Lama einen Brust-Umfang von wirklich " + Ub_transformed + " cm hat ?!\n" +
		      "___________________________________________________________\n\n" +
		      "   Bitte kontrolieren Sie Ihre Eingaben und versuchen es erneut !");
		document.GewichtForm.UbEingabe.value = "";
		document.GewichtForm.UbEingabe.focus();
		return can_i_go_on = false;
	};
	if(Uh_transformed < Uh_min) {
		alert("Sind Sie sicher, dass Ihr Lama einen Horizontal-Umfang von nur " + Uh_transformed + " cm hat ?!\n" +
		      "___________________________________________________________\n\n" +
		      "   Bitte kontrolieren Sie Ihre Eingaben und versuchen es erneut !");
		document.GewichtForm.UhEingabe.value = "";
		document.GewichtForm.UhEingabe.focus();
		return can_i_go_on = false;
	};
	if(Uh_transformed > Uh_max) {
		alert("Sind Sie sicher, dass Ihr Lama einen Horizontal-Umfang von wirklich " + Uh_transformed + " cm hat ?!\n" +
		      "___________________________________________________________\n\n" +
		      "   Bitte kontrolieren Sie Ihre Eingaben und versuchen es erneut !");
		document.GewichtForm.UhEingabe.value = "";
		document.GewichtForm.UhEingabe.focus();
		return can_i_go_on = false;
	};

	
	CheckConsistency(Ub_transformed, Uh_transformed);
   };


   function WriteOutput(Ub, Uh)
   {
	can_i_go_on = true;
        Ub_transformed = ""; 
        Uh_transformed = "";
        w_comb = "";

	document.GewichtForm.Ergebnisfeld.value = "";

	CheckInput(Ub, Uh);

	if(can_i_go_on == true)
	{
	    document.GewichtForm.Ergebnisfeld.value = w_comb;
	}
   };


//******END_OF_FILE********
