/* Dies ist ein Javascript zur Berechnung der Schwerkraft auf anderen Himmelskörpern */
/* Da er in mehreren Seiten Verwendung findet habe ich ihn in eine eigenständige js-Datei gestellt */
/* Copyright by Ben Schwarz 2001 */

if (navigator.appVersion.substring(0,1) >= "4")
{
/* Ortsfaktoren */
sonne = 273;
merkur = 2.78;
venus = 8.87;
erde = 9.81;
mond = 1.6;
mars = 3.72;
jupiter = 22.88;
saturn = 9.05;
uranus = 7.77;
neptun = 11.0;
pluto = 0.4;

function Ausgabe (gewicht, auswahl)
{

switch (auswahl)
{
case "1":
koerper = "der Sonne ";
newton = (gewicht * 1) * sonne;
break;
case "2":
koerper = "dem Merkur ";
newton = (gewicht * 1) * merkur;
break;
case "3":
koerper = "der Venus ";
newton = (gewicht * 1) * venus;
break;
case "4":
koerper = "der Erde ";
newton = (gewicht * 1) * erde;
break;
case "5":
koerper = "dem Mond ";
newton = (gewicht * 1) * mond;
break;
case "6":
koerper = "dem Mars ";
newton = (gewicht * 1) * mars;
break;
case "7":
koerper = "dem Jupiter ";
newton = (gewicht * 1) * jupiter;
break;
case "8":
koerper = "dem Saturn ";
newton = (gewicht * 1) * saturn;
break;
case "9":
koerper = "dem Uranus ";
newton = (gewicht * 1) * uranus;
break;
case "10":
koerper = "dem Neptun ";
newton = (gewicht * 1) * neptun;
break;
case "11":
koerper = "dem Pluto ";
newton = (gewicht * 1) * pluto;
break;
}

/* Umrechnung von Newton in Kilogramm */
kilogramm = newton / 9.81;

kilo = Math.round(kilogramm);
newton = Math.round(newton);
/* Folgende Gramm-Ermittlung hat aufgrund der gültigen Ziffern keinen Sinn */
/* gramm = Math.round((kilogramm - kilo) * 1000 Dieser Faktor bestimmt die Kommastellen (momentan 3)); */

if (kilo >= 0)
{

/*
if (gramm == 1000)
{
gramm = 0;
kilo = kilo + 1;
}
*/

alert("Sie würden auf " + koerper + kilo + " Kilogramm (" + newton + " Newton) wiegen!");
}

else
{
alert("Bitte geben Sie einen gültigen Wert für Ihr Gewicht ein! Sollten Sie eine Kommazahl eingeben haben, müssen Sie das Komma durch einen Punkt ersetzen");
}

}
}
else
{
alert("Für die Ausführung dieses JavaScripts benötigen Sie eine Browser-Version der Generation 4 oder neuer. Wenn Sie es dennoch ausführen möchten, empfehle ich den Download des Netscape Navigators 4.x (http://www.netscape.de) oder des Internet Explorers 5.x (http://www.microsoft.de)");
}
