function Rechnen() {
	// Eingabewerte Umsatz und Stromverbrauch
	var umsatz;
	var stromverbrauch;
    // Ergebnisse  Stromsparpotential, Kostensparpotnetial, Co2 Sparpotential
	var strompot_s_a;
	var strompot_s_b;  
	var strompot_s;  
    	var kosten_m;
	var strompreis;
	var emissionen_m; 
	var emissionen_s; 
    // Zwischenvariablen	
    var punkt_statt_komma;  	  
	var anteil_druckluft 
    var stromverbrauch_pro_umsatz	   

	//Werte belegen
	if (document.einspar.umsatz_e.value == "") {
    	umsatz=0;
	} else {
		punkt_statt_komma=InZahl(document.einspar.umsatz_e.value);
		umsatz = parseFloat(punkt_statt_komma);
		umsatz = umsatz*1000*1000;
	}
	if (document.einspar.stromv_g_e.value == "") {
		stromverbrauch=0;
    } else {
		punkt_statt_komma=InZahl(document.einspar.stromv_g_e.value);
	   	stromverbrauch = parseFloat(punkt_statt_komma);
	}

	// ***********************************************************************
	// TESTAUSGABEN
	// ***********************************************************************
	//alert("Stromverbrauch [kWh]: " + stromverbrauch + "\n"Umsatz [Mio. Euro]: " + umsatz);

	//Liste auslesen	  
    //var branche  = document.einspar.liste.options[branche].value;
    var branche  = document.einspar.liste.options[document.einspar.liste.selectedIndex].value;
    var anteil_druckluft;
    var stromverbrauch_pro_umsatz;
    	if (branche == 15){ anteil_druckluft = 0.090; stromverbrauch_pro_umsatz =0.11;}
	if (branche == 16){ anteil_druckluft = 0.115; stromverbrauch_pro_umsatz =0.015;}
	if (branche == 17){ anteil_druckluft = 0.200; stromverbrauch_pro_umsatz =0.215;}
	if (branche == 18){ anteil_druckluft = 0.110; stromverbrauch_pro_umsatz =0.022;}
  	if (branche == 19){ anteil_druckluft = 0.035; stromverbrauch_pro_umsatz =0.047;}
    	if (branche == 20){ anteil_druckluft = 0.105; stromverbrauch_pro_umsatz =0.215;}
	if (branche == 21){ anteil_druckluft = 0.080; stromverbrauch_pro_umsatz =0.560;}
	if (branche == 22){ anteil_druckluft = 0.175; stromverbrauch_pro_umsatz =0.070;}
	if (branche == 23){ anteil_druckluft = 0.048; stromverbrauch_pro_umsatz =0.088;}
	if (branche == 24){ anteil_druckluft = 0.018; stromverbrauch_pro_umsatz =0.368;}
	if (branche == 25){ anteil_druckluft = 0.150; stromverbrauch_pro_umsatz =0.215;}
	if (branche == 26){ anteil_druckluft = 0.170; stromverbrauch_pro_umsatz =0.368;}
	if (branche == 27){ anteil_druckluft = 0.025; stromverbrauch_pro_umsatz =0.703;}
	if (branche == 28){ anteil_druckluft = 0.045; stromverbrauch_pro_umsatz =0.112;}
	if (branche == 29){ anteil_druckluft = 0.150; stromverbrauch_pro_umsatz =0.057;}
	if (branche == 30){ anteil_druckluft = 0.150; stromverbrauch_pro_umsatz =0.019;}
	if (branche == 31){ anteil_druckluft = 0.150; stromverbrauch_pro_umsatz =0.053;}
	if (branche == 32){ anteil_druckluft = 0.070; stromverbrauch_pro_umsatz =0.057;}
	if (branche == 33){ anteil_druckluft = 0.100; stromverbrauch_pro_umsatz =0.046;}
	if (branche == 34){ anteil_druckluft = 0.120; stromverbrauch_pro_umsatz =0.062;}
	if (branche == 35){ anteil_druckluft = 0.120; stromverbrauch_pro_umsatz =0.063;}
	if (branche == 36){ anteil_druckluft = 0.105; stromverbrauch_pro_umsatz =0.071;}
	if (branche == 37){ anteil_druckluft = 0.140; stromverbrauch_pro_umsatz =0.124;}

	// ***********************************************************************
	// TESTAUSGABEN
	// ***********************************************************************
	//alert("stromverbrauch_pro_umsatz [Euro/kWh]: " + stromverbrauch_pro_umsatz + "\nanteil_druckluft [kWh_Dl/kWh:_ges] " + anteil_druckluft);
	
	//Stromverbrauch für  Druckluft in kWh
	//   kWh*Bruchteil
	var stromv_dl_a  = stromverbrauch * anteil_druckluft;
	//         Euro * kWh / Euro  * Bruchteil
	var stromv_dl_b  = umsatz * stromverbrauch_pro_umsatz * anteil_druckluft;
	//Stromeinsparpotential 33% des Stromverbrauchs für die Drucklufterzeugung nach EU Studie
	var strompot_s_a = stromv_dl_a  * 0.33;
	var strompot_s_b = stromv_dl_b * 0.33;			
   
                //alert("strompot verbrauch [kWh_einspar]: " + strompot_s_a + "\nstrompot umsatz [kWh_einspar]: " + strompot_s_b);
	

	//Stromverbrauch-Einsparpotential Mittelwert berechnet, falls beide Werte da
	if (strompot_s_a != 0 && strompot_s_b != 0){
		strompot_s  = (strompot_s_a + strompot_s_b) / 2;
	} else {
		if (strompot_s_a == 0) {
			strompot_s  = strompot_s_b;
		} else {
		     strompot_s = strompot_s_a;
		}
	}
		
	// ***********************************************************************
	// TESTAUSGABEN
	// ***********************************************************************
	//alert("strompot_s_a: " + strompot_s_a + "\nstrompot_s_b: " + strompot_s_b + "\nstrompot_s: " + strompot_s);


	//CO2 Minderung Emissionsfaktor Stromerzeugung =0.56kgCO2/kWh el; 
	var emissionen_a = strompot_s_a * 0.514;
	var emissionen_b = strompot_s_b * 0.514;		
	
	//Emission-Einsparpotential Mittelwert berechnet, falls beide Werte da
	if ((emissionen_a != 0) && (emissionen_b!= 0)){
		emissionen_m  = (emissionen_a + emissionen_b) / 2;
	} else {
		if (emissionen_a == 0) {
			emissionen_m  = emissionen_b;
		} else {
			emissionen_m  = emissionen_a;
		}
	}
    	
	// ***********************************************************************
	// TESTAUSGABEN
	// ***********************************************************************
	//alert("emissionen_a: " + emissionen_a + "\nemissionen_m: " + emissionen_m + "\nemissionen_s: " + emissionen_s);

	//Kosteneinsparung  berechen
	//Verbrauch dl < 100000 Strompreis 0,12 €/kWh; <200000 Strompreis 0,10 €/kWh; > 200000 strompreis 0,08 €/kWh
                //
	/*if (strompot_s <10000) {strompreis  = 0.12;
		}else{
		if (strompot_s<50000){strompreis = 0.10;
		}else
		strompreis = 0.08;
	}*/
	strompreis = 0.10;
         	 // Druckluftkosten 75 % Energie 25 % sonstiges
	var kosten_m   = (strompreis/0.75)* strompot_s;
	//Prüfung ob Einsparpotential aus Umsatz größer als Gesamtstromverbrauch
	if((strompot_s > stromverbrauch) && (stromverbrauch!=0)) {
		alert("Ihr berechnetes Stromsparpotential (in kWh) ist grösser\nals Ihr gesamter Stromverbrauch.\nBitte überprüfen Sie Ihre Eingabedaten")
	}

	if(kosten_m < 500) {
		alert("Bitte überprüfen Sie noch einmal ob Sie wirklich den Stromverbrauch des gesamten Betriebes eingegeben haben !\nDie Eingabe des Stromverbrauchs der Druckluftanlage liefert falsche Werte.\n\nIhr Kosteneinsparpotential ist bei korrekten Eingabewerten zu niedrig um einen externen Berater einzuschalten.\nSchauen Sie doch mal was Sie selbst tun können.\n\nInfos unter dem Menüpunkt Fakten Druckluft")
	}
	
	// ***********************************************************************
	// TESTAUSGABEN
	// ***********************************************************************
	//alert("kosten_m: " + kosten_m + "\nemissionen_m: " + emissionen_m + "\nstrompot_s: " + strompot_s);

	document.einspar.kosten.value = runden(parseFloat(kosten_m));
	document.einspar.emissionen.value = runden(parseFloat(emissionen_m));
	document.einspar.strompot.value = runden(parseFloat(strompot_s));
} 

function keypress() {
  if ((window.event) && (window.event.keyCode == 13)){
    Rechnen();}
  else{
    return true;}
}


function InZahl (Wert)
  {
  var PosPunkt = Wert.indexOf(".",0);
  var PosKomma = Wert.indexOf(",",0);
  if (PosKomma < 0) PosKomma = Wert.length;

  while ((0 <= PosPunkt) && (PosPunkt < PosKomma))
    {
    Wert = Wert.substring(0, PosPunkt) + Wert.substring(PosPunkt + 1, Wert.length);
    PosPunkt = Wert.indexOf(".",0);
    PosKomma--;
    }

  PosKomma = Wert.indexOf(",",0);
  if (PosKomma >= 0)
    {
    Wert = Wert.substring(0, PosKomma) + "." + Wert.substring(PosKomma + 1, Wert.length);
    }

  return parseFloat(Wert);
  }


function runden(x) {
	var k = (Math.round(x * 100) / 100).toString();
	k += (k.indexOf('.') == -1)? '.00' : '00';
	var p = k.indexOf('.'), m = k.indexOf('-.');
	var f = (p == 0 || m == 0)? '0,' : ',';
	return k.substring(0, p) /* + f + k.substring(p+1, p+3) */;
}
