add gs
This commit is contained in:
@@ -0,0 +1,151 @@
|
||||
local kUInt32Max = 4294967295
|
||||
local kInt32Max = 2147483647
|
||||
local alphabet = "\nbcdghjklmnpqrtvwyz23456789BCDGHJKLMNPQRTVWYZ"
|
||||
|
||||
|
||||
|
||||
local options = {
|
||||
polynomials = {0xEDB88320, 0x82F63B78, 0xEB31D82E, 0x992C1A4C},
|
||||
gui = {"TextButton", "TextBox", "TextLabel"},
|
||||
--gui = {"Frame"},
|
||||
ha = {"Enum.HorizontalAlignment.Right", "Enum.HorizontalAlignment.Left", "Enum.HorizontalAlignment.Center"},
|
||||
va = {"Enum.VerticalAlignment.Top", "Enum.VerticalAlignment.Bottom", "Enum.VerticalAlignment.Center"},
|
||||
fillDirection = {"Enum.FillDirection.Horizontal", "Enum.FillDirection.Vertical"},
|
||||
borderMode = {"Enum.BorderMode.Outline", "Enum.BorderMode.Middle", "Enum.BorderMode.Inset" },
|
||||
boolean = {"true","false"}
|
||||
}
|
||||
|
||||
local function makeRandomChallenge(seed)
|
||||
local rng = Random.new(seed)
|
||||
local code = {"-- hi"}
|
||||
local function replace(ctx) return function(s, o)
|
||||
if s == "rand" then return string.sub(rng:NextNumber(),1,5) end
|
||||
if s == "text" then
|
||||
local str = ""
|
||||
for i=1,rng:NextInteger(1,10) do
|
||||
local idx = rng:NextInteger(0,#alphabet)
|
||||
str = str .. alphabet:sub(idx,idx):gsub("\n","\\n")
|
||||
end
|
||||
return str
|
||||
end
|
||||
if tonumber(s) then return ctx[tonumber(s)] end
|
||||
local list = options[s]
|
||||
return list[rng:NextInteger(1, #list)]
|
||||
end end
|
||||
local function append(s,...) code[#code+1] = s:gsub("%$%{([a-z0-9][a-zA-Z]*)%}", replace({...})) end
|
||||
append("local xv, yv = ...")
|
||||
|
||||
append([==[
|
||||
local result = {};
|
||||
local r = Random.new(xv+yv)
|
||||
local function rand() return r:NextInteger(0,0x400)/0x400 end
|
||||
|
||||
local b = Instance.new("Frame")
|
||||
b.Name = "Base"
|
||||
local elements = {b}
|
||||
|
||||
local function crc32(s,crc)
|
||||
crc = crc and bit32.bnot(crc) or 0xFFFFFFFF
|
||||
for i=1,#s do
|
||||
local l = bit32.rshift(crc,8)
|
||||
crc = bit32.bxor(bit32.band(crc, 0xFF), s:byte(i))
|
||||
crc = (bit32.band(crc,1) == 1) and bit32.bxor(bit32.rshift(crc,1), ${polynomials}) or bit32.rshift(crc,1)
|
||||
crc = (bit32.band(crc,1) == 1) and bit32.bxor(bit32.rshift(crc,1), ${polynomials}) or bit32.rshift(crc,1)
|
||||
crc = (bit32.band(crc,1) == 1) and bit32.bxor(bit32.rshift(crc,1), ${polynomials}) or bit32.rshift(crc,1)
|
||||
crc = (bit32.band(crc,1) == 1) and bit32.bxor(bit32.rshift(crc,1), ${polynomials}) or bit32.rshift(crc,1)
|
||||
crc = (bit32.band(crc,1) == 1) and bit32.bxor(bit32.rshift(crc,1), ${polynomials}) or bit32.rshift(crc,1)
|
||||
crc = (bit32.band(crc,1) == 1) and bit32.bxor(bit32.rshift(crc,1), ${polynomials}) or bit32.rshift(crc,1)
|
||||
crc = (bit32.band(crc,1) == 1) and bit32.bxor(bit32.rshift(crc,1), ${polynomials}) or bit32.rshift(crc,1)
|
||||
crc = (bit32.band(crc,1) == 1) and bit32.bxor(bit32.rshift(crc,1), ${polynomials}) or bit32.rshift(crc,1)
|
||||
crc = bit32.bxor(l, crc)
|
||||
end
|
||||
return bit32.bnot(crc)
|
||||
end
|
||||
local result = 0
|
||||
local function a(...)
|
||||
local str = string.format(...)
|
||||
result = crc32(str, result)
|
||||
--print(str)
|
||||
end
|
||||
|
||||
local e = nil
|
||||
]==])
|
||||
|
||||
for i=1,rng:NextInteger(10,15) do
|
||||
append([==[
|
||||
e = Instance.new("${gui}")
|
||||
e.BorderSizePixel = r:NextInteger(1,10)
|
||||
e.AnchorPoint = Vector2.new(4*rand()*${rand}, rand())
|
||||
e.Rotation = r:NextInteger(0,360)
|
||||
e.Position = UDim2.new(2*rand(), r:NextInteger(1,100), 2*rand(), r:NextInteger(1,100))
|
||||
e.Size = UDim2.new(2*rand(), r:NextInteger(1,100), 2*rand(), r:NextInteger(1,100))
|
||||
e.BackgroundColor3 = Color3.new(rand(), rand(), rand())
|
||||
--e.BorderMode = ${borderMode}
|
||||
e.Parent = elements[#elements]
|
||||
e.Name = "${text}"
|
||||
elements[#elements+1] = e
|
||||
]==])
|
||||
|
||||
if rng:NextInteger(0,2) == 0 then
|
||||
append([==[
|
||||
e = Instance.new("UIScale")
|
||||
e.Scale = 4 * ${rand} * rand()
|
||||
e.Name = "Modifier-${text}"
|
||||
e.Parent = elements[#elements]
|
||||
]==])
|
||||
end
|
||||
|
||||
if rng:NextInteger(0,2) == 0 then
|
||||
append([==[
|
||||
e = Instance.new("UIPadding")
|
||||
e.PaddingTop = UDim.new(4*rand()*${rand}, r:NextInteger(1,100)*${rand})
|
||||
e.PaddingLeft = UDim.new(4*rand()*${rand}, r:NextInteger(1,100)*${rand})
|
||||
e.PaddingBottom = UDim.new(4*rand()*${rand}, r:NextInteger(1,100)*${rand})
|
||||
e.PaddingRight = UDim.new(4*rand()*${rand}, r:NextInteger(1,100)*${rand})
|
||||
e.Name = "Modifier-${text}"
|
||||
e.Parent = elements[#elements]
|
||||
]==])
|
||||
end
|
||||
|
||||
if rng:NextInteger(0,2) == 0 then
|
||||
append([==[
|
||||
e = Instance.new("UIListLayout")
|
||||
e.Name = "Modifier-${text}"
|
||||
e.HorizontalAlignment = ${ha}
|
||||
e.VerticalAlignment = ${va}
|
||||
e.FillDirection = ${fillDirection}
|
||||
e.Parent = elements[#elements]
|
||||
]==])
|
||||
end
|
||||
end
|
||||
|
||||
append("a(game.JobId)")
|
||||
|
||||
append([==[
|
||||
for k,v in ipairs(elements) do
|
||||
a("%d) %d,%d %dx%d %d %s", k,
|
||||
v.AbsolutePosition.X, v.AbsolutePosition.Y,
|
||||
v.AbsoluteSize.X, v.AbsoluteSize.Y,
|
||||
v.Rotation, BrickColor.new(v.BackgroundColor3).Name
|
||||
)
|
||||
end
|
||||
|
||||
--b.Parent = script.Parent
|
||||
|
||||
]==])
|
||||
append("return result")
|
||||
|
||||
return table.concat(code,"\n")
|
||||
end
|
||||
|
||||
local seed = ...
|
||||
if seed == nil then
|
||||
seed = Random.new():NextInteger(0, kUInt32Max)
|
||||
end
|
||||
|
||||
local code = makeRandomChallenge(seed)
|
||||
local rs = game:GetService("RunService")
|
||||
if rs:IsServer() and not rs:IsClient() then
|
||||
game:GetService("NetworkServer"):RegisterDynLuaChallenge(code, seed)
|
||||
end
|
||||
return code
|
||||
Reference in New Issue
Block a user