var rauf_over = null;
var runter_over = null;

// Decide browser version
var ns4 = (document.layers)? true:false
var ie4 = (document.all)? true:false

// Microsoft Stupidity Check(tm).
if (ie4) {
    if (navigator.userAgent.indexOf('MSIE 5') > 0) {
        var ie5 = true;
    } else {
        var ie5 = false;
    }
} else {
    var ie5 = false;
}


var a = -200, b = -200, hoehe = -200, breite = -200;

if (ie4) {
    window.setInterval('rr_bewegen_ie()', 20);
}
else {
    window.setInterval('rr_bewegen_ns()', 20);
}


function CheckNum(str)
{
    var checkOK = "0123456789-,.";
    var checkStr = str;
    var allValid = true;
    var decPoints = 0;
    var allNum = "";
    for (i = 0; i < checkStr.length; i++)
    {
        ch = checkStr.charAt(i);
        for (j = 0; j < checkOK.length; j++)
            if (ch == checkOK.charAt(j))
                break;
        if (j == checkOK.length)
        {
            allValid = false;
            break;
        }
        if (ch == ",")
        {
            allNum += ".";
            decPoints++;
        }
        else if (ch != ".")
            allNum += ch;
    }
    if (!allValid)
        return (false);

    if (decPoints > 1)
        return (false);

    return (true);
}

function GetNum(str)
{
    if (str.length == 0) return (0);

    var checkOK = "0123456789-,.";
    var checkStr = str;
    var allValid = true;
    var decPoints = 0;
    var allNum = "";
    for (i = 0; i < checkStr.length; i++)
    {
        ch = checkStr.charAt(i);
        for (j = 0; j < checkOK.length; j++)
            if (ch == checkOK.charAt(j))
                break;
        if (j == checkOK.length)
        {
            allValid = false;
            break;
        }
        if (ch == ",")
        {
            allNum += ".";
            decPoints++;
        }
        else if (ch != ".")
            allNum += ch;
    }
    if (!allValid)
        return (0);

    if (decPoints > 1)
        return (0);

    var chkVal = allNum;

    return (parseFloat(allNum));
}

function convert(num) {
    var neustr = "";
    var str = String(num);
    //95
    if ((k = str.indexOf(".")) > -1)
        if (k > 3)
            neustr = str.substr(0, k - 3) + "." + str.substr(k - 3, 3) + "," + str.substr(k + 1, ((str.length - k) >= 3) ? 2 : 1)
        else
            neustr = str.substr(0, k) + "," + str.substr(k + 1, ((str.length - k) >= 3) ? 2 : 1)
    else
        if ((k = str.length) > 3)
            neustr = str.substr(0, k - 3) + "." + str.substr(k - 3, k - 1)
        else
            neustr = str;

    return (neustr)
}

function ersetze(str, muster, txt) {
    var neustr = null;
    if ((k = str.indexOf(muster)) > -1)
        if (str.length - k - muster.length > 0)
            neustr = str.substr(0, k) + txt + str.substr(k + muster.length, str.length - k - muster.length);
        else
            neustr = str.substr(0, k) + txt;
    else
        neustr = str;
    return (neustr);
}

function loeschen(form)
{

    schliessen();

    form.Ein1.value = "";
    form.Ein2.value = "";
    form.Ein3.value = "";
    form.Ein4.value = "";
    form.Ein5.value = "";
    form.Ein6.value = "";
    form.Ein7.value = "";
    form.Ein8.value = "";
    form.Aus1.value = "";
    form.Aus2.value = "";
    form.Aus3.value = "";
    form.Aus4.value = "";
    form.Aus5.value = "";
    form.Aus6.value = "";
    form.Aus7.value = "";
    form.Aus8.value = "";
    form.Aus9.value = "";
    form.Aus10.value = "";
    form.Aus11.value = "";
    form.Aus12.value = "";
    form.Aus13.value = "";
    form.Aus14.value = "";
    form.Aus15.value = "";
    form.Aus16.value = "";
    form.Aus17.value = "";
    form.Aus18.value = "";
    form.Aus19.value = "";
    form.Aus20.value = "";

    form.Kinder.value = "";
    form.Erw.value = "";
}


function Berechnen(form)
{
    var Ein1;
    var Ein2;
    var Ein3;
    var Ein4;
    var Ein5;
    var Ein6;
    var Ein7;
    var Ein8;
    var Aus1;
    var Aus2;
    var Aus3;
    var Aus4;
    var Aus5;
    var Aus6;
    var Aus7;
    var Aus8;
    var Aus9;
    var Aus10;
    var Aus11;
    var Aus12;
    var Aus13;
    var Aus14;
    var Aus15;
    var Aus16;
    var Aus17;
    var Aus18;
    var Aus19;
    var Aus20;
    var Erw;
    var Kinder;
    var GesEin;
    var GesAus;
    var auto;
    var versicherungen;
    var ali;
    var raten;
    var sparen;
    var alos = false;

    form.Ein1.value = convert(GetNum(form.Ein1.value));
    form.Ein2.value = convert(GetNum(form.Ein2.value));
    form.Ein3.value = convert(GetNum(form.Ein3.value));
    form.Ein4.value = convert(GetNum(form.Ein4.value));
    form.Ein5.value = convert(GetNum(form.Ein5.value));
    form.Ein6.value = convert(GetNum(form.Ein6.value));
    form.Ein7.value = convert(GetNum(form.Ein7.value));
    form.Ein8.value = convert(GetNum(form.Ein8.value));
    form.Aus1.value = convert(GetNum(form.Aus1.value));
    form.Aus2.value = convert(GetNum(form.Aus2.value));
    form.Aus3.value = convert(GetNum(form.Aus3.value));
    form.Aus4.value = convert(GetNum(form.Aus4.value));
    form.Aus5.value = convert(GetNum(form.Aus5.value));
    form.Aus6.value = convert(GetNum(form.Aus6.value));
    form.Aus7.value = convert(GetNum(form.Aus7.value));
    form.Aus8.value = convert(GetNum(form.Aus8.value));
    form.Aus9.value = convert(GetNum(form.Aus9.value));
    form.Aus10.value = convert(GetNum(form.Aus10.value));
    form.Aus11.value = convert(GetNum(form.Aus11.value));
    form.Aus12.value = convert(GetNum(form.Aus12.value));
    form.Aus13.value = convert(GetNum(form.Aus13.value));
    form.Aus14.value = convert(GetNum(form.Aus14.value));
    form.Aus15.value = convert(GetNum(form.Aus15.value));
    form.Aus16.value = convert(GetNum(form.Aus16.value));
    form.Aus17.value = convert(GetNum(form.Aus17.value));
    form.Aus18.value = convert(GetNum(form.Aus18.value));
    form.Aus19.value = convert(GetNum(form.Aus19.value));
    form.Aus20.value = convert(GetNum(form.Aus20.value));
    form.Kinder.value = convert(Math.round(GetNum(form.Kinder.value)));
    form.Erw.value = convert(Math.round(GetNum(form.Erw.value)));


    Ein1 = GetNum(form.Ein1.value);
    Ein2 = GetNum(form.Ein2.value);
    Ein3 = GetNum(form.Ein3.value);
    Ein4 = GetNum(form.Ein4.value);
    Ein5 = GetNum(form.Ein5.value);
    Ein6 = GetNum(form.Ein6.value);
    Ein7 = GetNum(form.Ein7.value);
    Ein8 = GetNum(form.Ein8.value);
    Aus1 = GetNum(form.Aus1.value);
    Aus2 = GetNum(form.Aus2.value);
    Aus3 = GetNum(form.Aus3.value);
    Aus4 = GetNum(form.Aus4.value);
    Aus5 = GetNum(form.Aus5.value);
    Aus6 = GetNum(form.Aus6.value);
    Aus7 = GetNum(form.Aus7.value);
    Aus8 = GetNum(form.Aus8.value);
    Aus9 = GetNum(form.Aus9.value);
    Aus10 = GetNum(form.Aus10.value);
    Aus11 = GetNum(form.Aus11.value);
    Aus12 = GetNum(form.Aus12.value);
    Aus13 = GetNum(form.Aus13.value);
    Aus14 = GetNum(form.Aus14.value);
    Aus15 = GetNum(form.Aus15.value);
    Aus16 = GetNum(form.Aus16.value);
    Aus17 = GetNum(form.Aus17.value);
    Aus18 = GetNum(form.Aus18.value);
    Aus19 = GetNum(form.Aus19.value);
    Aus20 = GetNum(form.Aus20.value);
    Kinder = GetNum(form.Kinder.value);
    Erw = GetNum(form.Erw.value);
    ali = Aus7;
    auto = Aus9 + Aus10 + Aus11;
    versicherungen = Aus12 + Aus13 + Aus14 + Aus15 + Aus16;
    sparen = Aus19;
    raten = Aus20;

    if (Erw == 0 && Kinder == 0) {
        alert("\nBitte Anzahl der Personen angeben, die von den Einnahmen leben.");
        form.Erw.focus();
        return;
    }

    if (form.R1[2].checked || form.R1[3].checked || form.R2[2].checked || form.R2[3].checked) alos = true;

    GesEin = Ein1 + Ein2 + Ein3 + Ein4 + Ein5 + Ein6 + Ein7 + Ein8;
    GesAus = Aus1 + Aus2 + Aus3 + Aus4 + Aus5 + Aus6 + Aus7 + Aus8 + Aus9 + Aus10 + Aus11 + Aus12 + Aus13 + Aus14 + Aus15 + Aus16 + Aus17 + Aus18 + Aus19 + Aus20;
    form.GesEin.value = convert(GesEin);
    form.GesAus.value = convert(GesAus);


    if (GesEin > GesAus + Erw * 8000 + Kinder * 3000) {
        msg = "<table border=1 cellpadding=0 cellspacing=0 width=" + (screen.width * 6) / 8 + ">";
        msg = msg + "<tr><td width=100%><div align='center'><center><table border=0 cellpadding=10 ";
        msg = msg + "cellspacing=0 width=100% bgcolor=#EEEEEE>";
        msg = msg + "<tr><td width=17%><img src='thumbs3.gif' ";
        msg = msg + "width=54 height=93 alt='thumbs3.gif (5627 Byte)'></td>";
        msg = msg + "<td width=66%><p align=center><b>Analyse</b></p>"
        msg = msg + "<p align=left>Ihren Einnahmen von §EIN§ &euro: stehen Ausgaben von §AUS§ &euro; gegen&uuml;ber.</p>";
        msg = msg + "<p align=left>Es bleiben demnach §LEBEN§ &euro; zur Bestreitung der Kosten f&uuml;r Essen, Kleidung, Freizeit etc. zur Verf&uuml;gung.</p>";
        msg = msg + "<p align=left>Wenn Sie damit nicht auskommen, sollten Sie Ihren Lebensstil &Uuml;berdenken.</p>";
        msg = msg + "<p align=left>&Uuml;brigens: Die Zeiten k&ouml;nnen auch schlechter werden!</p>";
        msg = msg + "<form method=POST name='aform'>";
        msg = msg + "<div align=center><center><p><input type=button value='Fenster schlie&szlig;en' name='B1' ONCLICK='schliessen()'></p>";
        msg = msg + "</center></div></form></td><td width=17%><p align='right'><img src='thumbs3.gif' width=54 height=93 ";
        msg = msg + "alt='thumbs3.gif (5627 Byte)'></td></tr></table></center></div></td></tr></table>";

        msg = ersetze(msg, "§EIN§", convert(GesEin));
        msg = ersetze(msg, "§AUS§", convert(GesAus));
        msg = ersetze(msg, "§LEBEN§", convert(GesEin - GesAus));
        show_msgbox(msg);
        return;
    }

    if (GesEin > GesAus + Erw * 370 + Kinder * 150) {
        msg = "<table border=1 cellpadding=0 cellspacing=0 width=" + (screen.width * 6) / 8 + ">";
        msg = msg + "<tr><td width=100%><div align='center'><center><table border=0 cellpadding=10 ";
        msg = msg + "cellspacing=0 width=100% bgcolor=#EEEEEE>";
        msg = msg + "<tr><td width=17%><img src='thumbs3.gif' ";
        msg = msg + "width=54 height=93 alt='thumbs3.gif (5627 Byte)'></td>";
        msg = msg + "<td width=66%><p align=center><b>Analyse</b></p>"
        msg = msg + "<p align=left>Ihren Einnahmen von §EIN§ &euro; stehen Ausgaben von §AUS§ &euro; gegen&uuml;ber.</p>";
        msg = msg + "<p align=left>Es bleiben demnach §LEBEN§ &euro; zur Bestreitung der Kosten f&uuml;r Essen, Kleidung, Freizeit etc. zur Verf&uuml;gung.</p>";
        msg = msg + "<p align=left>Sollten Sie damit nicht aus kommen, empfiehlt sich, einige Wochen hindurch mit einem Wochenplan die t&auml;glichen Ausgaben zu protokollieren und Ihren Umgang mit Geld zu &Uumlberpr&uuml;fen.</p>";
        msg = msg + "<p align=left>&Uuml;brigens: Die Zeiten k&ouml;nnen auch schlechter werden!</p>";
        msg = msg + "<form method=POST name='aform'>";
        msg = msg + "<div align=center><center><p><input type=button value='Fenster schlie&szlig;en' name='B1' ONCLICK='schliessen()'></p>";
        msg = msg + "</center></div></form></td><td width=17%><p align='right'><img src='thumbs3.gif' width=54 height=93 ";
        msg = msg + "alt='thumbs3.gif (5627 Byte)'></td></tr></table></center></div></td></tr></table>";

        msg = ersetze(msg, "§EIN§", convert(GesEin));
        msg = ersetze(msg, "§AUS§", convert(GesAus));
        msg = ersetze(msg, "§LEBEN§", convert(GesEin - GesAus));
        show_msgbox(msg);
        return;
    }

    if (GesEin > GesAus + Erw * 290 + Kinder * 150) {
        msg = "<table border=1 cellpadding=10 cellspacing=0 width=" + (screen.width * 6) / 8 + " bgcolor=#EEEEEE>";
        msg = msg + "<tr>";
        msg = msg + "<td width=100%><p align=center><b>Analyse</b></p>"
        msg = msg + "<p align=left>Ihren Einnahmen von §EIN§ &euro; stehen Ausgaben von §AUS§ &euro; gegen&uuml;ber.</p>";
        msg = msg + "<p align=left>Das Haushaltsbudget l&auml;&szlig;t Ihnen einen nur sehr begrenzte Freiraum. Nach Abzug der Fixausgaben verbleiben Ihnen nur §LEBEN§ &euro; zur Bestreitung der Kosten f&uuml;r Essen, Kleidung, Freizeit etc..</p>";
        msg = msg + "<p align=left>Hier ein paar Anregungen:<\p>";
        msg = msg + "<ul><li><p align=left>&Uuml;berpr&uuml;fen Sie, ob Sie auch wirklich alle Anspr&uuml;che auf Beihilfen ausgesch&ouml;pft haben.<\p></ul></li>";
        // arbeitslos
        if (alos)
            msg = msg + "<ul><li><p align=left>Versuchen Sie das Arbeitslosengeld oder die Notstandshilfe mit einer geringf&uuml;gigen Besch&auml;ftigung aufzbessern. Die Geringf&uuml;gigkeitsgrenze liegt bei 301,54 &euro; (ab 1.1.2002) und kann ohne Einbu&szlig;en beim Arbeitslosengeld oder der Notstandshilfe voll ausgesch&ouml;pft werden.</p></ul></li>";
        // ali
        if (ali > 0 && alos)
            msg = msg + "<ul><li><p align=left>Wenn Sie Alimente zahlen m&uuml;ssen und aktuell arbeitslos sind, k&ouml;nnen Sie einen Antrag auf Herabsetzung der Alimente w&auml;hrend der Arbeitslosigkeit stellen.</p></ul></li>";
        // versicherungen
        if (versicherungen > 10) {
            msg = msg + "<ul><li><p align=left>Sie geben monatlich §VERS§ &euro; f&uuml;r Versicherungen aus. &Uuml;berpr&uuml;fen Sie bitte, ob Sie diese Versicherung(en) wirklich brauchen.</p></ul></li>";
            msg = ersetze(msg, "§VERS§", convert(versicherungen));
        }
        // auto
        if (auto > 10) {
            msg = msg + "<ul><li><p align=left>Sie geben monatlich §AUTO§ &euro; f&uuml;r Ihr Fahrzeug aus. &Uuml;berdenken Sie bitte, ob Sie wirklich ein eigenes Fahrzeug brauchen. Sie k&ouml;nnten viel Geld sparen.</p></ul></li>";
            msg = ersetze(msg, "AUTO§", convert(auto));
        }
        // sparen und raten
        if (sparen > 10 && raten > 10) {
            msg = msg + "<ul><li><p align=left>Wenn es finanziell so eng ist und auch Raten bezahlt werden m&uuml;ssen, ist zu &uuml;berlegen, ob es sinnvoll ist, monatlich §SPAREN§ &euro; anzusparen.</p></ul></li>";
            msg = ersetze(msg, "§SPAREN§", convert(sparen));
        }
        msg = msg + "<ul><li><p align=left>Denken Sie an die gro&szlig;e Gefahr, der Sie ausgesetzt sind, wenn Sie mit der Miete oder Strom/Gas in R&uuml;ckstand kommen. Dies sind sehr gef&auml;hrliche Schulden.</p></ul></li>";
        msg = msg + "<ul><li><p align=left>Versuchen Sie Ihre Einnhamen zu erh&ouml;hen und Ihre Ausgaben zu senken!</p></ul></li>";
        msg = msg + "<form method=POST name='aform'>";
        msg = msg + "<div align=center><center><p><input type=button value='Fenster schlie&szlig;en' name='B1' ONCLICK='schliessen()'></p>";
        msg = msg + "</center></div></form></td></tr></table>";

        msg = ersetze(msg, "§EIN§", convert(GesEin));
        msg = ersetze(msg, "§AUS§", convert(GesAus));
        msg = ersetze(msg, "§LEBEN§", convert(GesEin - GesAus));
        show_msgbox(msg);
        rauf_runter();
        return;
    }

    if (GesEin > GesAus) {
        msg = "<table border=1 cellpadding=10 cellspacing=0 width=" + (screen.width * 6) / 8 + " bgcolor=#EEEEEE>";
        msg = msg + "<tr>";
        msg = msg + "<td width=100%><p align=center><b>Analyse</b></p>"
        msg = msg + "<p align=left>Ihren Einnahmen von §EIN§ &euro; stehen Ausgaben von §AUS§ &euro; gegen&uuml;ber.</p>";
        msg = msg + "<p align=left>Es bleiben Ihnen somit nach Abzug der Fixausgaben nur §LEBEN§ &euro; zur Bestreitung der Kosten f&uuml;r Essen, Kleidung, Freizeit etc..</p>";
        msg = msg + "<p align=left>Damit ist Ihr Lebensunterhalt stark gef&auml;hrdet. Sie sollten sich &uuml;berlegen, wie Sie Ihre Einnahmen erh&ouml;hen und/oder Ihre Ausgaben senken k&ouml;nnen</p>";
        msg = msg + "<p align=left>Hier ein paar Anregungen:</p>";
        msg = msg + "<ul><li><p align=left>&Uuml;berpr&uuml;fen Sie, ob Sie auch wirklich alle Anspr&uuml;che auf Beihilfen ausgesch&ouml;pft haben.</p></ul></li>";
        msg = msg + "<ul><li><p align=left>Gibt es Ausgaben, die nicht unbedingt notwendig sind?</p></ul></li>";
        // arbeitslos
        if (alos)
            msg = msg + "<ul><li><p align=left>Versuchen Sie das Arbeitslosengeld oder die Notstandshilfe mit einer geringf&uuml;gigen Besch&auml;ftigung aufzbessern. Die Geringf&uuml;gigkeitsgrenze liegt bei 301,54 &euro; (ab 1.1.2002) und kann ohne Einbu&szlig;en beim Arbeitslosengeld oder der Notstandshilfe voll ausgesch&ouml;pft werden.</p></ul></li>";
        // ali
        if (ali > 0)
            msg = msg + "<ul><li><p align=left>Wenn Sie Alimente zahlen m&uuml;ssen und sich Ihr Einkommen verschlechtert hat, k&ouml;nnen Sie einen Antrag auf Herabsetzung der Alimente stellen.</p></ul></li>";
        // versicherungen
        if (versicherungen > 10) {
            msg = msg + "<ul><li><p align=left>Sie geben monatlich §VERS§ &euro; f&uuml;r Versicherungen aus. &Uuml;berpr&uuml;fen Sie bitte, ob Sie diese Versicherung(en) wirklich brauchen.</p></ul></li>";
            msg = ersetze(msg, "§VERS§", convert(versicherungen));
        }
        // auto
        if (auto > 10 && raten > 10) {
            msg = msg + "<ul><li><p align=left>Sie geben monatlich §AUTO§ &euro; f&uuml;r Ihr Fahrzeug aus. &Uuml;berdenken Sie bitte, ob Sie wirklich ein eigenes Fahrzeug brauchen, zumal auch Kreditraten zu bezahlen sind.</p></ul></li>";
            msg = ersetze(msg, "§AUTO§", convert(auto));
        }
        else if (auto > 10) {
            msg = msg + "<ul><li><p align=left>Sie geben monatlich §AUTO§ &euro; f&uuml;r Ihr Fahrzeug aus. &Uuml;berdenken Sie bitte, ob Sie wirklich ein eigenes Fahrzeug brauchen. Sie k&ouml;nnten viel Geld sparen.</p></ul></li>";
            msg = ersetze(msg, "§AUTO§", convert(auto));
        }
        // sparen und raten
        if (sparen > 10 && raten > 10) {
            msg = msg + "<ul><li><p align=left>Wenn es finanziell so eng ist und auch Raten bezahlt werden m&uuml;ssen, ist zu &uuml;berlegen, ob es sinnvoll ist, monatlich §SPAREN§ &euro; anzusparen.</p></ul></li>";
            msg = ersetze(msg, "§SPAREN§", convert(sparen));
        }
        else if (sparen > 10) {
            msg = msg + "<ul><li><p align=left>Wenn es finanziell so eng ist, m&uuml;ssen Sie &uuml;berlegen, ob es sinnvoll ist, monatlich §SPAREN§ &euro; anzusparen.</p></ul></li>";
            msg = ersetze(msg, "§SPAREN§", convert(sparen));
        }
        if (raten > 0) {
            if (GesEin > GesAus + Erw * 220 + Kinder * 110 - raten - sparen - versicherungen - auto) {
                msg = msg + "<ul><li><p align=left>In dieser finanziellen Situation k&ouml;nnen Sie nicht mehr monatlich §RATEN§ &euro; an Kreditraten zahlen. Informieren Sie Ihre Gl&auml;ubiger &uuml;ber Ihre Lage und reduzieren Sie die Raten auf ein leistbares Niveau.</p></ul></li>";
                msg = ersetze(msg, "§RATEN§", convert(raten));
            }
            else {
                msg = msg + "<ul><li><p align=left>In dieser finanziellen Situation k&ouml;nnen Sie keine Raten mehr zahlen. Informieren Sie Ihre Gl&auml;ubiger &uuml;ber Ihre Lage und stellen Sie die Ratenzahlung ein.</p></ul></li>";
            }
        }

        msg = msg + "<ul><li><p align=left>Denken Sie an die gro&szlig;e Gefahr, der Sie ausgesetzt sind, wenn Sie mit der Miete oder Strom/Gas in R&uuml;ckstand kommen. Dies sind sehr gef&auml;hrliche Schulden.</p></ul></li>";
        msg = msg + "<ul><li><p align=left>Versuchen Sie Ihre Einnhamen zu erh&ouml;hen und Ihre Ausgaben zu senken!</p></ul></li>";
        msg = msg + "<form method=POST name='aform'>";
        msg = msg + "<div align=center><center><p><input type=button value='Fenster schlie&szlig;en' name='B1' ONCLICK='schliessen()'></p>";
        msg = msg + "</center></div></form></td></tr></table>";

        msg = ersetze(msg, "§EIN§", convert(GesEin));
        msg = ersetze(msg, "§AUS§", convert(GesAus));
        msg = ersetze(msg, "§LEBEN§", convert(GesEin - GesAus));
        show_msgbox(msg);
        rauf_runter();
        return;
    }

    // GesEin < GesAus
    msg = "<table border=1 cellpadding=10 cellspacing=0 width=" + (screen.width * 6) / 8 + " bgcolor=#EEEEEE>";
    msg = msg + "<tr>";
    msg = msg + "<td width=100%><p align=center><b>Analyse</b></p>"
    msg = msg + "<p align=left>Ihren Einnahmen von §EIN§ &euro; stehen Ausgaben von §AUS§ &euro; gegen&uuml;ber.</p>";
    msg = msg + "<p align=left>Sie geben mehr Geld aus, als Sie einnehmen!</p>";
    msg = msg + "<p align=left>Ihre Einnahmen m&uuml;ssen dringend erh&ouml;ht und Ihre Ausgaben gesenkt werden.</p>";
    msg = msg + "<p align=left>Hier ein paar Anregungen:</p>";
    msg = msg + "<ul><li><p align=left>&Uuml;berpr&uuml;fen Sie, ob Sie auch wirklich alle Anspr&uuml;che auf Beihilfen ausgesch&ouml;pft haben.</p></li></ul>";
    msg = msg + "<ul><li><p align=left>Gibt es Ausgaben, die nicht unbedingt notwendig sind?</p></li></ul>";
    // arbeitslos
    if (alos)
        msg = msg + "<ul><li><p align=left>Versuchen Sie das Arbeitslosengeld oder die Notstandshilfe mit einer geringf&uuml;gigen Besch&auml;ftigung aufzbessern. Die Geringf&uuml;gigkeitsgrenze liegt bei 301,54 &euro; (ab 1.1.2002) und kann ohne Einbu&szlig;en beim Arbeitslosengeld oder der Notstandshilfe voll ausgesch&ouml;pft werden.</p></li></ul>";
    // ali
    if (ali > 0)
        msg = msg + "<ul><li><p align=left>Wenn Sie Alimente zahlen m&uuml;ssen und sich Ihr Einkommen verschlechtert hat, k&ouml;nnen Sie einen Antrag auf Herabsetzung der Alimente stellen.</p></li></ul>";
    // versicherungen
    if (versicherungen > 10) {
        msg = msg + "<ul><li><p align=left>Sie geben monatlich §VERS§ &euro; f&uuml;r Versicherungen aus. &Uuml;berpr&uuml;fen Sie bitte, ob Sie diese Versicherung(en) wirklich brauchen.</p></li></ul>";
        msg = ersetze(msg, "§VERS§", convert(versicherungen));
    }
    // auto
    if (auto > 10 && raten > 10) {
        msg = msg + "<ul><li><p align=left>Sie geben monatlich §AUTO§ &euro; f&uuml;r Ihr Fahrzeug aus. &Uuml;berdenken Sie bitte, ob Sie wirklich ein eigenes Fahrzeug brauchen, zumal auch Kreditraten zu bezahlen sind.</p></ul></li>";
        msg = ersetze(msg, "§AUTO§", convert(auto));
    }
    else if (auto > 10) {
        msg = msg + "<ul><li><p align=left>Sie geben monatlich §AUTO§ &euro; f&uuml;r Ihr Fahrzeug aus. &Uuml;berdenken Sie bitte, ob Sie wirklich ein eigenes Fahrzeug brauchen. Sie k&ouml;nnten viel Geld sparen.</p></ul></li>";
        msg = ersetze(msg, "§AUTO§", convert(auto));
    }
    // sparen und raten
    if (sparen > 10) {
        msg = msg + "<ul><li><p align=left>Wenn es finanziell so eng ist, m&uuml;ssen Sie &uuml;berlegen, ob es sinnvoll ist, monatlich §SPAREN§ &euro; anzusparen.</p></li></ul>";
        msg = ersetze(msg, "§SPAREN§", convert(sparen));
    }
    if (raten > 0) {
        if (GesEin > GesAus + Erw * 220 + Kinder * 110 - raten - sparen - versicherungen - auto) {
            msg = msg + "<ul><li><p align=left>In dieser finanziellen Situation k&ouml;nnen Sie nicht mehr monatlich §RATEN§ &euro; an Kreditraten zahlen. Informieren Sie Ihre Gl&auml;ubiger &uuml;ber Ihre Lage und reduzieren Sie die Raten auf ein leistbares Niveau.</p></ul></li>";
            msg = ersetze(msg, "§RATEN§", convert(raten));
        }
        else {
            msg = msg + "<ul><li><p align=left>In dieser finanziellen Situation k&ouml;nnen Sie keine Raten mehr zahlen. Informieren Sie Ihre Gl&ouml;ubiger &uuml;ber Ihre Lage und stellen Sie die Ratenzahlung ein.</p></ul></li>";
        }
    }
    msg = msg + "<ul><li><p align=left>Denken Sie an die gro&szlig;e Gefahr, der Sie ausgesetzt sind, wenn Sie mit der Miete oder Strom/Gas in R&uuml;ckstand kommen. Dies sind sehr gef&auml;hrliche Schulden.</p></li></ul>";
    msg = msg + "<ul><li><p align=left>Versuchen Sie Ihre Einnhamen zu erh&ouml;hen und Ihre Ausgaben zu senken!</p></li></ul>";
    msg = msg + "<form method=POST name='aform'>";
    msg = msg + "<div align=center><center><p><input type=button value='Fenster schlie&szlig;en' name='B1' ONCLICK='schliessen()'></p>";
    msg = msg + "</center></div></form></td></tr></table>";

    msg = ersetze(msg, "§EIN§", convert(GesEin));
    msg = ersetze(msg, "§AUS§", convert(GesAus));
    msg = ersetze(msg, "§LEBEN§", convert(GesEin - GesAus));
    show_msgbox(msg);
    rauf_runter();
    return;
}

function rauf_runter() {
    if (ie4) {
        hoehe = screen.availHeight;
        breite = screen.availWidth;

        hoehe = document.body.scrollHeight;

        a = hoehe + 20;
        b = -150;
        PRauf.style.left = -200;
        PRunter.style.left = -200;
        PRauf.style.visibility = "visible";
        PRunter.style.visibility = "visible";
    }
    else {
        hoehe = screen.height;
        breite = screen.width;

        hoehe = self.innerHeight + self.pageYOffset;
        a = hoehe + 20;
        b = -150;
        window.document.PRauf.left = -200;
        window.document.PRunter.left = -200;
        window.document.PRauf.visibility = "show";
        window.document.PRunter.visibility = "show";
    }
}

function rr_bewegen_ie() {
    if (a >= -150) {
        a -= 10;
        PRauf.style.left = -10;
        PRauf.style.top = a;
        b += 10;
        PRunter.style.left = breite - 2 * window.document.runter.width;
        PRunter.style.top = b;
    }
    else {
        a = hoehe + 20;
        b = -150;
    }
}

function rr_bewegen_ns() {
    if (a >= -150) {
        a -= 10;
        window.document.PRauf.left = 0;
        window.document.PRauf.top = a;
        b += 10;
        window.document.PRunter.left = breite - 160;
        window.document.PRunter.top = b;
    }
    else {
        a = hoehe + 20;
        b = -150;
    }
}

function rr_nd() {
    if (ie4) {
        PRauf.style.visibility = "hidden";
        PRunter.style.visibility = "hidden";
    }
    if (ns4) {
        window.document.PRauf.visibility = "hide";
        window.document.PRunter.visibility = "hide";
    }
    a = -200,b = -200,hoehe = -200,breite = -200;
}


function show_msgbox(txt) {
    if (ns4) {
        var lyr = document.Analyse.document;
        lyr.write(txt);
        lyr.close();
        window.scrollTo(0, 80);
        document.Analyse.left = screen.width / 8;
        document.Analyse.top = self.pageYOffset + 10;
        document.Analyse.visibility = "show";
        document.iF.visibility = "hide";
    }
    else if (ie4) {
        window.scrollTo(0, 80);
        //	window.scrollTo(0,document.body.scrollTop-1);
        document.all["Analyse"].innerHTML = txt;
        Analyse.style.left = screen.width / 8;
        Analyse.style.top = document.body.scrollTop + 10;
        Analyse.style.visibility = "visible";
    }

}

function schliessen() {
    rr_nd();
    if (ns4) {
        document.iF.visibility = "show";
        document.Analyse.visibility = "hide";
    }
    else if (ie4) {
        Analyse.style.visibility = "hidden";
    }
}

function showval() {
    alert(window.document.forms[0].R1.value);
    alert(window.document.forms[0].R2.value);
}
