lua base6xxx

base6xxx.lua

local function baseEnc(n, b)
	n = math.floor(n)
	if not b or b == 10 then return tostring(n) end

	local digits = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789"
	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
print(baseEnc(100000000, 62))