Pastebon

-- Made by Ninja Hacks and Sir meme
local ScreenGui = Instance.new("ScreenGui")
local Main = Instance.new("Frame")
local Frame = Instance.new("Frame")
local TextLabel = Instance.new("TextLabel")
local MoneyFarm = Instance.new("TextButton")
local TextLabel_2 = Instance.new("TextLabel")
local _1 = Instance.new("TextButton")
local _2 = Instance.new("TextButton")
local _3 = Instance.new("TextButton")
local _4 = Instance.new("TextButton")
local _5 = Instance.new("TextButton")
local _6 = Instance.new("TextButton")
local _7 = Instance.new("TextButton")
local _8 = Instance.new("TextButton")
local _9 = Instance.new("TextButton")
local _10 = Instance.new("TextButton")
local _11 = Instance.new("TextButton")
local _12 = Instance.new("TextButton")
--Properties:
ScreenGui.Parent = game.CoreGui

Main.Name             = "Main"
Main.Parent           = ScreenGui
Main.BackgroundColor3 = Color3.new(0.333333, 1, 1)
Main.BorderSizePixel  = 0
Main.Position         = UDim2.new(0.0271790083, 0, 0.405138344, 0)
Main.Size             = UDim2.new(0, 206, 0, 269)
Main.Active           = true
Main.Draggable        = true

Frame.Parent = Main
Frame.BackgroundColor3 = Color3.new(0.286275, 0.866667, 0.866667)
Frame.BorderSizePixel = 0
Frame.Size = UDim2.new(0, 206, 0, 20)

TextLabel.Parent = Frame
TextLabel.BackgroundColor3 = Color3.new(1, 1, 1)
TextLabel.BackgroundTransparency = 1
TextLabel.BorderSizePixel = 0
TextLabel.Position = UDim2.new(0.228155345, 0, 0, 0)
TextLabel.Size = UDim2.new(0, 119, 0, 20)
TextLabel.Font = Enum.Font.SourceSansSemibold
TextLabel.Text = "Sir Msme"
TextLabel.TextColor3 = Color3.new(1, 1, 1)
TextLabel.TextSize = 14

MoneyFarm.Name = "MoneyFarm"
MoneyFarm.Parent = Main
MoneyFarm.BackgroundColor3 = Color3.new(0, 0.666667, 1)
MoneyFarm.BorderSizePixel = 0
MoneyFarm.Position = UDim2.new(0.0145631069, 0, 0.104089223, 0)
MoneyFarm.Size = UDim2.new(0, 129, 0, 33)
MoneyFarm.Font = Enum.Font.SourceSans
MoneyFarm.Text = "Money Farm"
MoneyFarm.TextColor3 = Color3.new(1, 1, 1)
MoneyFarm.TextScaled = true
MoneyFarm.TextSize = 14
MoneyFarm.TextWrapped = true

TextLabel_2.Parent = Main
TextLabel_2.BackgroundColor3 = Color3.new(1, 1, 1)
TextLabel_2.BackgroundTransparency = 1
TextLabel_2.BorderSizePixel = 0
TextLabel_2.Position = UDim2.new(0, 0, 0.356877327, 0)
TextLabel_2.Size = UDim2.new(0, 206, 0, 50)
TextLabel_2.Font = Enum.Font.SourceSans
TextLabel_2.Text = "Buy menu"
TextLabel_2.TextColor3 = Color3.new(1, 1, 1)
TextLabel_2.TextScaled = true
TextLabel_2.TextSize = 14
TextLabel_2.TextWrapped = true

_1.Name = "1"
_1.Parent = Main
_1.BackgroundColor3 = Color3.new(0.333333, 1, 1)
_1.BorderColor3 = Color3.new(0.333333, 0.666667, 1)
_1.Position = UDim2.new(0.0631067976, 0, 0.542750955, 0)
_1.Size = UDim2.new(0, 23, 0, 23)
_1.Font = Enum.Font.SourceSans
_1.Text = "1"
_1.TextColor3 = Color3.new(1, 1, 1)
_1.TextSize = 14

_2.Name = "2"
_2.Parent = Main
_2.BackgroundColor3 = Color3.new(0.333333, 1, 1)
_2.BorderColor3 = Color3.new(0.333333, 0.666667, 1)
_2.Position = UDim2.new(0.22815533, 0, 0.542750955, 0)
_2.Size = UDim2.new(0, 23, 0, 23)
_2.Font = Enum.Font.SourceSans
_2.Text = "2"
_2.TextColor3 = Color3.new(1, 1, 1)
_2.TextSize = 14

_3.Name = "3"
_3.Parent = Main
_3.BackgroundColor3 = Color3.new(0.333333, 1, 1)
_3.BorderColor3 = Color3.new(0.333333, 0.666667, 1)
_3.Position = UDim2.new(0.388349473, 0, 0.542750955, 0)
_3.Size = UDim2.new(0, 23, 0, 23)
_3.Font = Enum.Font.SourceSans
_3.Text = "3"
_3.TextColor3 = Color3.new(1, 1, 1)
_3.TextSize = 14

_4.Name = "4"
_4.Parent = Main
_4.BackgroundColor3 = Color3.new(0.333333, 1, 1)
_4.BorderColor3 = Color3.new(0.333333, 0.666667, 1)
_4.Position = UDim2.new(0.529126167, 0, 0.542750955, 0)
_4.Size = UDim2.new(0, 23, 0, 23)
_4.Font = Enum.Font.SourceSans
_4.Text = "4"
_4.TextColor3 = Color3.new(1, 1, 1)
_4.TextSize = 14

_5.Name = "5"
_5.Parent = Main
_5.BackgroundColor3 = Color3.new(0.333333, 1, 1)
_5.BorderColor3 = Color3.new(0.333333, 0.666667, 1)
_5.Position = UDim2.new(0.694174707, 0, 0.542750955, 0)
_5.Size = UDim2.new(0, 23, 0, 23)
_5.Font = Enum.Font.SourceSans
_5.Text = "5"
_5.TextColor3 = Color3.new(1, 1, 1)
_5.TextSize = 14

_6.Name = "6"
_6.Parent = Main
_6.BackgroundColor3 = Color3.new(0.333333, 1, 1)
_6.BorderColor3 = Color3.new(0.333333, 0.666667, 1)
_6.Position = UDim2.new(0.859223247, 0, 0.542750955, 0)
_6.Size = UDim2.new(0, 23, 0, 23)
_6.Font = Enum.Font.SourceSans
_6.Text = "6"
_6.TextColor3 = Color3.new(1, 1, 1)
_6.TextSize = 14

_7.Name = "7"
_7.Parent = Main
_7.BackgroundColor3 = Color3.new(0.333333, 1, 1)
_7.BorderColor3 = Color3.new(0.333333, 0.666667, 1)
_7.Position = UDim2.new(0.0631067157, 0, 0.67286247, 0)
_7.Size = UDim2.new(0, 23, 0, 23)
_7.Font = Enum.Font.SourceSans
_7.Text = "7"
_7.TextColor3 = Color3.new(1, 1, 1)
_7.TextSize = 14

_8.Name = "8"
_8.Parent = Main
_8.BackgroundColor3 = Color3.new(0.333333, 1, 1)
_8.BorderColor3 = Color3.new(0.333333, 0.666667, 1)
_8.Position = UDim2.new(0.228155255, 0, 0.67286247, 0)
_8.Size = UDim2.new(0, 23, 0, 23)
_8.Font = Enum.Font.SourceSans
_8.Text = "8"
_8.TextColor3 = Color3.new(1, 1, 1)
_8.TextSize = 14

_9.Name = "9"
_9.Parent = Main
_9.BackgroundColor3 = Color3.new(0.333333, 1, 1)
_9.BorderColor3 = Color3.new(0.333333, 0.666667, 1)
_9.Position = UDim2.new(0.388349414, 0, 0.67286247, 0)
_9.Size = UDim2.new(0, 23, 0, 23)
_9.Font = Enum.Font.SourceSans
_9.Text = "9"
_9.TextColor3 = Color3.new(1, 1, 1)
_9.TextSize = 14

_10.Name = "10"
_10.Parent = Main
_10.BackgroundColor3 = Color3.new(0.333333, 1, 1)
_10.BorderColor3 = Color3.new(0.333333, 0.666667, 1)
_10.Position = UDim2.new(0.529126227, 0, 0.67286247, 0)
_10.Size = UDim2.new(0, 23, 0, 23)
_10.Font = Enum.Font.SourceSans
_10.Text = "10"
_10.TextColor3 = Color3.new(1, 1, 1)
_10.TextSize = 14

_11.Name = "11"
_11.Parent = Main
_11.BackgroundColor3 = Color3.new(0.333333, 1, 1)
_11.BorderColor3 = Color3.new(0.333333, 0.666667, 1)
_11.Position = UDim2.new(0.694174767, 0, 0.67286247, 0)
_11.Size = UDim2.new(0, 23, 0, 23)
_11.Font = Enum.Font.SourceSans
_11.Text = "11"
_11.TextColor3 = Color3.new(1, 1, 1)
_11.TextSize = 14

_12.Name = "12"
_12.Parent = Main
_12.BackgroundColor3 = Color3.new(0.333333, 1, 1)
_12.BorderColor3 = Color3.new(0.333333, 0.666667, 1)
_12.Position = UDim2.new(0.859223306, 0, 0.67286247, 0)
_12.Size = UDim2.new(0, 23, 0, 23)
_12.Font = Enum.Font.SourceSans
_12.Text = "12"
_12.TextColor3 = Color3.new(1, 1, 1)
_12.TextSize = 14
-- Scripts:



_1.MouseButton1Click:Connect(function()
   local memek = "Tier 1"

local itemname= "Egg"

local kontol = "Buy"

local event = game:GetService("Workspace").__REMOTES["Shop"]

event:InvokeServer(kontol, itemname, memek)
end)

_2.MouseButton1Click:Connect(function()
  local memek = "Tier 2"

local itemname= "Egg"

local kontol = "Buy"

local event = game:GetService("Workspace").__REMOTES["Shop"]

event:InvokeServer(kontol, itemname, memek)
end)

_3.MouseButton1Click:Connect(function()
   local memek = "Tier 3"

local itemname= "Egg"

local kontol = "Buy"

local event = game:GetService("Workspace").__REMOTES["Shop"]

event:InvokeServer(kontol, itemname, memek)
end)

_4.MouseButton1Click:Connect(function()
    local memek = "Tier 4"

local itemname= "Egg"

local kontol = "Buy"

local event = game:GetService("Workspace").__REMOTES["Shop"]

event:InvokeServer(kontol, itemname, memek)
end)

_5.MouseButton1Click:Connect(function()
local memek = "Tier 5"

local itemname= "Egg"

local kontol = "Buy"

local event = game:GetService("Workspace").__REMOTES["Shop"]

event:InvokeServer(kontol, itemname, memek)
end)

_6.MouseButton1Click:Connect(function()
local memek = "Tier 6"

local itemname= "Egg"

local kontol = "Buy"

local event = game:GetService("Workspace").__REMOTES["Shop"]

event:InvokeServer(kontol, itemname, memek)
end)


_7.MouseButton1Click:Connect(function()
local memek = "Tier 7"

local itemname= "Egg"

local kontol = "Buy"

local event = game:GetService("Workspace").__REMOTES["Shop"]

event:InvokeServer(kontol, itemname, memek)
end)

_8.MouseButton1Click:Connect(function()
local memek = "Tier 8"

local itemname= "Egg"

local kontol = "Buy"

local event = game:GetService("Workspace").__REMOTES["Shop"]

event:InvokeServer(kontol, itemname, memek)
end)

_9.MouseButton1Click:Connect(function()
  local memek = "Tier 9"

local itemname= "Egg"

local kontol = "Buy"

local event = game:GetService("Workspace").__REMOTES["Shop"]

event:InvokeServer(kontol, itemname, memek)
end)

_10.MouseButton1Click:Connect(function()
local memek = "Tier 10"

local itemname= "Egg"

local kontol = "Buy"

local event = game:GetService("Workspace").__REMOTES["Shop"]

event:InvokeServer(kontol, itemname, memek)
end)

_11.MouseButton1Click:Connect(function()
local memek = "Tier 11"

local itemname= "Egg"

local kontol = "Buy"

local event = game:GetService("Workspace").__REMOTES["Shop"]

event:InvokeServer(kontol, itemname, memek)
end)

_12.MouseButton1Click:Connect(function()
local memek = "Tier 12"

local itemname= "Egg"

local kontol = "Buy"

local event = game:GetService("Workspace").__REMOTES["Shop"]

event:InvokeServer(kontol, itemname, memek)

MoneyFarm.MouseButton1Click:Connect(function()
    local barriers = "Barrier5" or "Barrier4" or "Barrier3" or "Barrier2" or "Barrier1" -- list Barrie1, Barrier2, Barrier3, Barrier4, Barrier5

local event = game:GetService("Workspace").__THINGS["Barriers"]

event:remove()

local amount = 1000 -- experiment with this value, 1000 is maximum and for pets with high levels
local coins = game.Workspace:WaitForChild("__REMOTES"):WaitForChild("Coins")
local save = game.Workspace:WaitForChild("__REMOTES"):WaitForChild("Get Other Stats"):InvokeServer()
local plr = game:GetService("Players").LocalPlayer
local petids = {}
local pets = game:GetService("Workspace")["__REMOTES"].Pets
local a = #save[plr.Name]["Save"]["Pets"]
local done = "lol meme"
function random(t)
    local keys = {}
    for key, value in pairs(t) do
        keys[#keys+1] = key
    end
    index = keys[math.random(1, #keys)]
    return t[index]
end
for i=1,a do
    if(save[plr.Name]["Save"]["Pets"][a].e == true) then
        table.insert(petids, save[plr.Name]["Save"]["Pets"][a].id)
    end
    a = a - 1
end
function co(b)
    local done = b
    print("Mining coin: " .. b.Name)
    while(b:FindFirstChild"Health" ~= nil and b:FindFirstChild"Health".Value > 0) do
        warn(b.Name .. "- Health: " .. b.Health.Value)
        wait(0.2)
        coins:FireServer("Mine",b.Name, amount, random(petids))
    end
end
for _,b in next, workspace.__THINGS.Coins:GetChildren() do
    if(done ~= b) then
        coroutine.wrap(function()co(b)end)()
    end
end
end)
end)