Шифрование по функции расшифровки

[SocMaster]

Здравствуйте. Есть функция которая расшифровывает строки

function(e) {
            for (var t = "12", n = "", r = 0; r < e.length; r++) {
                var i = function() {
                        var e = function() {
                                var e = "ng",
                                    t = "Stri",
                                    n = [t, e].reduce(function(e, t) {
                                        return e += t
                                    }, "");
                                return n
                            },
                            t = e();
                        return t
                    },
                    o = function() {
                        var e = function() {
                                var e = function() {
                                        var e = function() {
                                                var e = "rCo",
                                                    t = "fr",
                                                    n = "Cha",
                                                    r = "om",
                                                    i = "de",
                                                    o = [t, r, n, e, i].join("");
                                                return o
                                            },
                                            t = e();
                                        return t
                                    },
                                    t = e();
                                return t
                            },
                            t = e();
                        return t
                    },
                    a = function() {
                        var e = "r",
                            t = "cha",
                            n = [t, e].join("");
                        return n
                    },
                    s = i(),
                    u = o(),
                    l = u.slice(8, 12),
                    c = window[s],
                    d = t,
                    f = e[a() + l + "At"](r);
                n += c[u]((~d | ~f) & (d | f))
            }
            return n
        }

не могу понять как она работает, надо сделать обратную функцию этой
т.е эта расшифровывает. а надо которая будет зашифровывать в этот формат

 

[grave_bird]

На твоё удивление, она работает в обе стороны — Для просмотра ссылки Войди или Зарегистрируйся
Можно сократить примерно до этого — Для просмотра ссылки Войди или Зарегистрируйся