//        Copyright by
//        Johann Schumacher
//        Technische Folien
//        alle Rechte vorbehalten
function ziffern_parser(ziffer)
{
        if (isNaN(ziffer) == true)
        {
                if (ziffer == "undefined" || ziffer == "0" || ziffer == NaN || ziffer.length == 0)
                {
                        ziffer = 0;
                }
                else
                {
                        ziffer = parseFloat(ziffer.replace(/,/, "."));
                }
        }
        else
        {
                ziffer = parseFloat(ziffer);
        }
        return ziffer;
}

function material(feld, wert)
{
        var feld_array = feld.split("|");
        return feld_array[wert];
}

function qm_berechnen()
{
        var tlaenge = ziffern_parser(document.qm_berechnung.teichlaenge.value);
        var tbreite = ziffern_parser(document.qm_berechnung.teichbreite.value);
        var ttiefe = ziffern_parser(document.qm_berechnung.teichtiefe.value);
        if (tlaenge > 0 && tbreite > 0 && ttiefe > 0)
        {
                document.qm_berechnung.teichlaenge.value = tlaenge;
                document.qm_berechnung.teichbreite.value = tbreite;
                document.qm_berechnung.teichtiefe.value = ttiefe;
                tlaenge = tlaenge + 2*ttiefe + 0.6;
                tlaenge = tlaenge.toFixed(1);
                tbreite = tbreite + 2*ttiefe +0.6;
                tbreite= tbreite.toFixed(1);
        }
        preis_berechnen(tlaenge,tbreite);
        return (false);
}

function preis_berechnen(tlaenge,tbreite)
{
        tlaenge = ziffern_parser(tlaenge);
        tbreite = ziffern_parser(tbreite);
        if (tlaenge > 0 && tbreite > 0)
        {
                if (tlaenge % 2 != 0)
                {
                        if (tbreite % 2 != 0)
                        {
                                if (Math.ceil(tlaenge/2)*2 * tbreite > tlaenge * Math.ceil(tbreite/2)*2)
                                {
                                       msg = "Breite: " + tbreite.toString() + "m wurde zu ";
                                        tbreite = Math.ceil(tbreite/2)*2;
                                        msg += tbreite.toString() + "m";
                                }
                                else
                                {
                                        msg = "Laenge: " + tlaenge.toString() + "m wurde zu ";
                                        tlaenge = Math.ceil(tlaenge/2)*2;
                                        msg += tlaenge.toString() + "m";
                                }
//                                alert("Mindestenst 1 Strecke muss durch 2 teilbar sein\r\nIhre Angaben wurden folgendermassen korrigiert\r\n" + msg);
                        }
                }
                document.preis_berechnung.folienlaenge.value = tlaenge;
                document.preis_berechnung.folienbreite.value = tbreite;
                var qm2 = tlaenge * tbreite;
                document.preis_berechnung.folienqm.value = qm2.toFixed(2);
                document.preis_berechnung.schutzvliesqm.value = Math.ceil(document.preis_berechnung.folienqm.value*1.1/2)*2;
                document.preis_berechnung.folie_artnr.value = material(document.qm_berechnung.wahl_teichfolie.options[document.qm_berechnung.wahl_teichfolie.selectedIndex].value, 0);
                document.preis_berechnung.folie_preis.value = material(document.qm_berechnung.wahl_teichfolie.options[document.qm_berechnung.wahl_teichfolie.selectedIndex].value, 1);
                document.preis_berechnung.schutzvlies_artnr.value = material(document.qm_berechnung.wahl_schutzvlies.options[document.qm_berechnung.wahl_schutzvlies.selectedIndex].value, 0);
                document.preis_berechnung.schutzvlies_preis.value = material(document.qm_berechnung.wahl_schutzvlies.options[document.qm_berechnung.wahl_schutzvlies.selectedIndex].value, 1);
                var preis_folie = document.preis_berechnung.folie_preis.value * document.preis_berechnung.folienqm.value;
                var preis_schutzvlies = document.preis_berechnung.schutzvlies_preis.value * document.preis_berechnung.schutzvliesqm.value;
                var preis_gesamt = (document.preis_berechnung.folie_preis.value * document.preis_berechnung.folienqm.value) + (document.preis_berechnung.schutzvlies_preis.value * document.preis_berechnung.schutzvliesqm.value);
                document.preis_berechnung.preis_folien.value = preis_folie.toFixed(2);
                document.preis_berechnung.preis_schutzvlies.value = preis_schutzvlies.toFixed(2);
                document.preis_berechnung.preis_summe.value = preis_gesamt.toFixed(2);
                if (preis_folie > 0)
                {
                        document.forms[1].elements[0].value = 1;
                }
                else
                {
                        document.forms[1].elements[0].value = 0;
                }
                if (preis_schutzvlies > 0)
                {
                        document.forms[1].elements[1].value = 1;
                }
                else
                {
                        document.forms[1].elements[1].value = 0;
                }
                document.forms[1].elements[2].value = document.preis_berechnung.folie_artnr.value;
                document.forms[1].elements[3].value = document.preis_berechnung.schutzvlies_artnr.value;
                document.forms[1].elements[4].value = tlaenge;
                document.forms[1].elements[5].value = document.preis_berechnung.schutzvliesqm.value/2;
                document.forms[1].elements[6].value = tbreite;
        }
        return (false);
}

function raster_kalkulieren(qm)
{
        qm = ziffern_parser(qm);
        if (qm > 0)
        {
//                document.raster_berechnung.folienqm.value = qm.toFixed(1);
                document.raster_berechnung.folienqm.value = Math.ceil(document.raster_berechnung.folienqm.value);
                document.raster_berechnung.folie_artnr.value = material(document.raster_berechnung.wahl_teichfolie.options[document.raster_berechnung.wahl_teichfolie.selectedIndex].value, 0);
                document.raster_berechnung.folie_preis.value = material(document.raster_berechnung.wahl_teichfolie.options[document.raster_berechnung.wahl_teichfolie.selectedIndex].value, 1);
                document.raster_berechnung.schutzvlies_artnr.value = material(document.raster_berechnung.wahl_schutzvlies.options[document.raster_berechnung.wahl_schutzvlies.selectedIndex].value, 0);
                document.raster_berechnung.schutzvlies_preis.value = material(document.raster_berechnung.wahl_schutzvlies.options[document.raster_berechnung.wahl_schutzvlies.selectedIndex].value, 1);
                var preis_folie = document.raster_berechnung.folie_preis.value * document.raster_berechnung.folienqm.value;
                var preis_schutzvlies = document.raster_berechnung.schutzvlies_preis.value * Math.ceil(document.raster_berechnung.folienqm.value * 1.1/2)*2;
                var preis_gesamt = preis_folie + preis_schutzvlies;
                document.raster_berechnung.preis_folien.value = preis_folie.toFixed(2);
                document.raster_berechnung.preis_schutzvlies.value = preis_schutzvlies.toFixed(2);
                document.raster_berechnung.preis_summe.value = preis_gesamt.toFixed(2);
                if (preis_folie > 0)
                {
                        document.forms[2].elements[0].value = qm.toFixed(1);
                }
                else
                {
                        document.forms[2].elements[0].value = 0;
                }
                if (preis_schutzvlies > 0)
                {
                        document.forms[2].elements[1].value = 1;
                }
                else
                {
                        document.forms[2].elements[1].value = 0;
                }
                document.forms[2].elements[2].value = document.raster_berechnung.folie_artnr.value;
                document.forms[2].elements[3].value = document.raster_berechnung.schutzvlies_artnr.value;
                document.forms[2].elements[5].value = Math.ceil(document.raster_berechnung.folienqm.value * 1.1/2);
        }
        return (false);
}