
Key Required

local Players = game:GetService("Players")
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local player = Players.LocalPlayer
local playerStatsFolder = nil
local settingsFolder = nil
task.spawn(function()
local stats = ReplicatedStorage:WaitForChild("Stats", 10)
if not stats then return end
playerStatsFolder = stats:WaitForChild(player.Name, 10)
if not playerStatsFolder then return end
settingsFolder = playerStatsFolder:WaitForChild("Settings", 10)
end)
local ScreenGui = Instance.new("ScreenGui")
ScreenGui.Name = "POC_SettingsUI"
ScreenGui.ResetOnSpawn = false
ScreenGui.Parent = player:WaitForChild("PlayerGui")
local Frame = Instance.new("Frame")
Frame.Size = UDim2.new(0, 220, 0, 420)
Frame.Position = UDim2.new(0.5, -110, 0.4, 0)
Frame.BackgroundColor3 = Color3.fromRGB(30, 30, 30)
Frame.Active = true
Frame.Draggable = true
Frame.Parent = ScreenGui
local UIStroke = Instance.new("UIStroke", Frame)
UIStroke.Thickness = 2
UIStroke.Color = Color3.fromRGB(80, 80, 255)
local Title = Instance.new("TextLabel")
Title.Size = UDim2.new(1, -35, 0, 30)
Title.Position = UDim2.fromOffset(5,0)
Title.BackgroundTransparency = 1
Title.Text = "made by rdreadpirate - free"
Title.TextColor3 = Color3.fromRGB(200, 200, 255)
Title.Font = Enum.Font.GothamBold
Title.TextSize = 14
Title.TextXAlignment = Enum.TextXAlignment.Left
Title.Parent = Frame
local Close = Instance.new("TextButton")
Close.Size = UDim2.new(0, 30, 0, 30)
Close.Position = UDim2.new(1, -30, 0, 0)
Close.BackgroundColor3 = Color3.fromRGB(60, 60, 60)
Close.Text = "X"
Close.TextColor3 = Color3.fromRGB(255, 150, 150)
Close.Font = Enum.Font.GothamBold
Close.TextSize = 18
Close.Parent = Frame
Close.MouseButton1Click:Connect(function()
Frame.Visible = false
end)
local function MakeToggle(name, yPos)
local button = Instance.new("TextButton")
button.Size = UDim2.new(1, -20, 0, 40)
button.Position = UDim2.new(0, 10, 0, yPos)
button.BackgroundColor3 = Color3.fromRGB(45, 45, 45)
button.Font = Enum.Font.Gotham
button.TextSize = 16
button.TextColor3 = Color3.fromRGB(255, 255, 255)
button.Text = name .. ": (loading)"
button.Parent = Frame
button.MouseButton1Click:Connect(function()
if not settingsFolder then return end
local setting = settingsFolder:FindFirstChild(name)
if setting and setting:IsA("BoolValue") then
setting.Value = not setting.Value
button.Text = name .. ": " .. tostring(setting.Value)
end
end)
task.spawn(function()
repeat task.wait() until settingsFolder
local setting = settingsFolder:WaitForChild(name, 3)
if setting then
button.Text = name .. ": " .. tostring(setting.Value)
else
button.Text = name .. ": (missing)"
end
end)
end
local function MakeSetButton(name, yPos, targetValue)
local button = Instance.new("TextButton")
button.Size = UDim2.new(1, -20, 0, 40)
button.Position = UDim2.new(0, 10, 0, yPos)
button.BackgroundColor3 = Color3.fromRGB(55, 55, 55)
button.Font = Enum.Font.Gotham
button.TextSize = 16
button.TextColor3 = Color3.fromRGB(255, 255, 255)
button.Text = name .. ": Set"
button.Parent = Frame
button.MouseButton1Click:Connect(function()
local eggStats = ReplicatedStorage.Stats:FindFirstChild(player.Name)
if eggStats then
eggStats = eggStats:FindFirstChild("EggStats")
if eggStats then
local stat = eggStats:FindFirstChild("HatchSpeed")
if stat and stat:IsA("NumberValue") then
stat.Value = targetValue
button.Text = name .. ": " .. tostring(stat.Value)
end
end
end
end)
end
local function MakeDirectToggle(name, valueObj, yPos)
local button = Instance.new("TextButton")
button.Size = UDim2.new(1, -20, 0, 40)
button.Position = UDim2.new(0, 10, 0, yPos)
button.BackgroundColor3 = Color3.fromRGB(45, 45, 45)
button.Font = Enum.Font.Gotham
button.TextSize = 16
button.TextColor3 = Color3.fromRGB(255, 255, 255)
button.Text = name .. ": (loading)"
button.Parent = Frame
button.MouseButton1Click:Connect(function()
if valueObj and valueObj:IsA("BoolValue") then
valueObj.Value = not valueObj.Value
button.Text = name .. ": " .. tostring(valueObj.Value)
end
end)
task.spawn(function()
task.wait(0.5)
if valueObj then
button.Text = name .. ": " .. tostring(valueObj.Value)
end
end)
end
local autoRewardEnabled = false
local function MakeAutoRewardToggle(yPos)
local button = Instance.new("TextButton")
button.Size = UDim2.new(1, -20, 0, 40)
button.Position = UDim2.new(0, 10, 0, yPos)
button.BackgroundColor3 = Color3.fromRGB(45, 45, 45)
button.Font = Enum.Font.Gotham
button.TextSize = 16
button.TextColor3 = Color3.fromRGB(255, 255, 255)
button.Text = "AutoRewardEgg: OFF"
button.Parent = Frame
button.MouseButton1Click:Connect(function()
autoRewardEnabled = not autoRewardEnabled
button.Text = "AutoRewardEgg: " .. (autoRewardEnabled and "ON" or "OFF")
end)
task.spawn(function()
while true do
task.wait(0.25)
if autoRewardEnabled then
local menus = player.PlayerGui:FindFirstChild("Menus")
if not menus then continue end
local rewardUI = menus:FindFirstChild("Reward")
if not rewardUI then continue end
local main = rewardUI.Frame.Main
local available = main.Claim.Main:FindFirstChild("Available")
if available and available.Visible == true then
pcall(function()
main.Claim:Activate()
end)
end
end
end
end)
end
local function MakeMiningSpeedSlider(yPos)
local label = Instance.new("TextLabel")
label.Size = UDim2.new(1, -20, 0, 20)
label.Position = UDim2.new(0, 10, 0, yPos)
label.BackgroundTransparency = 1
label.Font = Enum.Font.Gotham
label.TextSize = 14
label.TextColor3 = Color3.fromRGB(255,255,255)
label.Text = "MiningSpeedBoost: 1"
label.Parent = Frame
local slider = Instance.new("TextButton")
slider.Size = UDim2.new(1, -20, 0, 30)
slider.Position = UDim2.new(0, 10, 0, yPos + 20)
slider.BackgroundColor3 = Color3.fromRGB(70, 70, 70)
slider.Font = Enum.Font.Gotham
slider.Text = "Drag to Set"
slider.TextColor3 = Color3.fromRGB(255,255,255)
slider.TextSize = 14
slider.Parent = Frame
local dragging = false
slider.MouseButton1Down:Connect(function() dragging = true end)
game:GetService("UserInputService").InputEnded:Connect(function() dragging = false end)
game:GetService("RunService").RenderStepped:Connect(function()
if dragging then
local mouse = player:GetMouse()
local relativeX = mouse.X - slider.AbsolutePosition.X
local percent = math.clamp(relativeX / slider.AbsoluteSize.X, 0, 1)
local value = math.floor(percent * 9) + 1
label.Text = "MiningSpeedBoost: " .. value
local boost = ReplicatedStorage.Stats:FindFirstChild(player.Name)
if boost then
boost = boost:FindFirstChild("MiningSpeedBoost")
if boost and boost:IsA("NumberValue") then
boost.Value = value
end
end
end
end)
end
MakeToggle("AutoRebirth", 40)
MakeToggle("AutoTrain", 90)
MakeSetButton("Egg Hatch Speed", 140, 7)
MakeDirectToggle("Premium", ReplicatedStorage.Stats:WaitForChild(player.Name):WaitForChild("Analytics"):WaitForChild("IsPremium"), 190)
MakeDirectToggle("In Group", ReplicatedStorage.Stats:WaitForChild(player.Name):WaitForChild("Analytics"):WaitForChild("IsInGroup"), 240)
MakeAutoRewardToggle(290)
MakeMiningSpeedSlider(340)No comments yet for this script.