function basen(n,b)
    n = math.floor(n)
    if not b or b == 10 then return tostring(n) end
    local digits = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ"
    local t = {}
    local sign = ""
    if n < 0 then
        sign = ""
    n = -n
    end
    repeat
        local d = (n % b) + 1
        n = math.floor(n / b)
        table.insert(t, 1, digits:sub(d,d))
    until n == 0
    return sign .. table.concat(t,"")
end
local ureb = 0
local reb = 0
local ranknum = 0
local multi = 1
local num = 0
nono = {
    "globglobgabgalab"
}

while true do
    local letters = basen(num, 52)
    num = num + (1*multi + ((reb * math.pow(reb, 5.5) + (ranknum * math.pow(ranknum, 3)))))
    for i, v in pairs(nono) do
        if letters:match(v) then
           letters = string.gsub(letters, v, "[FILTERED]") 
        end
    end
    if #letters > 25 then
       letters = "Total Letters: "..#basen(num, 52)
    end
    if num >= 100 then 
        multi = multi + (math.log10(num) + (ranknum * 3.5))
        num = 0
    end
    local rankname = basen2(ranknum, 20)
    if multi >= math.pow(ranknum+2, 5) then
        ranknum = ranknum + (1 + (reb * math.pow(reb, 2.5)) + (ureb * math.pow(ureb, 25)))
        multi = 0
    end
    if ranknum >= math.pow(reb+2, 2.5) then
        reb = reb + (1 + (ureb * 2))
        ranknum = 0
        multi = 0
    end
    print("----------")
    print("Letters, "..letters)
    print("Multi: "..multi)
    print("Rank: "..ranknum)
    print("Rebirth: "..reb)
    print("U-Rebirth: "..ureb)
end