integer gOn;
integer chatListen;

integer mumble(string mes)
{
    integer i;
    string sub = "";
    string rep = "";

    for (i = 0; i < llStringLength(mes); i++)
    {
        sub = llGetSubString(mes, 0, i);
        rep = "";

        if (sub == "a" || sub == "b" || sub == "j" || sub == "s" || sub == "v" || sub == "z")
            rep = "r";
        else
        if (sub == "A" || sub == "B" || sub == "J" || sub == "S" || sub == "V" || sub == "Z")
            rep = "R";
        else
        if (sub == "d" || sub == "k" || sub == "l" || sub == "w")
            rep = "f";
        else
        if (sub == "D" || sub == "K" || sub == "L" || sub == "W")
            rep = "F";
        else
        if (sub == "g" || sub == "x")
            rep = "n";
        else
        if (sub == "G" || sub == "x")
            rep = "N";
        else
        if (sub == "h" || sub == "i" || sub == "m" || sub == "u")
            rep = "d";
        else
        if (sub == "H" || sub == "I" || sub == "M" || sub == "U")
            rep = "D";
        else
        if (sub == "q")
            rep = "m";
        else
        if (sub == "Q")
            rep = "M";
        if (rep != "")
        {
        mes = llDeleteSubString(mes, i, i);
        mes = llInsertString(mes, i, rep);
        }
    }

    string ObjectName = llGetObjectName();
    llSetObjectName(llGetDisplayName(llGetOwner()));
    llSay(0, "/me mumbles \""+mes+"\"");
    llSetObjectName(ObjectName);
    return TRUE;
}

default
{
    touch_start(integer total_number)
    {
        if(gOn)
        {
            llListenRemove(chatListen);
            llOwnerSay("Gabler ist aus");
            llOwnerSay("@redirchat:10=rem");
        }
        else
        {
            chatListen = llListen(10, "", "", "");
            llOwnerSay("Gabler ist an");
            llOwnerSay("@redirchat:10=add");
        }
        gOn = !gOn;
    }

    listen(integer channel, string name, key id, string msg)
    {
        mumble(msg);
    }
}