DRILLING SIMULATOR GUI AUTOFARM

-- tutorial how to use this gui https://www.youtube.com/watch?v=j6dMosPDq54

local me = game.Players.LocalPlayer
local ok = false

-- Objects

local ScreenGui = Instance.new("ScreenGui")
local Frame = Instance.new("Frame")
local TextButton = Instance.new("TextButton")
local TextLabel = Instance.new("TextLabel")
local TextLabel_2 = Instance.new("TextLabel")
-- Properties

ScreenGui.Parent = game:GetService("CoreGui")

Frame.Parent = ScreenGui
Frame.BackgroundColor3 = Color3.new(0.301961, 0.733333, 0.996078)
Frame.BorderColor3 = Color3.new(0, 0, 0)
Frame.Position = UDim2.new(0.0127118528, 0, 0.775043964, 0)
Frame.Selectable = true
Frame.Size = UDim2.new(0, 189, 0, 109)
Frame.Active = true
Frame.Draggable = true

TextButton.Parent = Frame
TextButton.BackgroundColor3 = Color3.new(0.262745, 0.780392, 1)
TextButton.Position = UDim2.new(0.117364712, 0, 0.506880462, 0)
TextButton.Size = UDim2.new(0, 143, 0, 40)
TextButton.Font = Enum.Font.Highway
TextButton.Text = "SEMI-FARM is OFF"
TextButton.TextColor3 = Color3.new(0.796079, 0.235294, 0.356863)
TextButton.TextSize = 15

TextLabel.Parent = Frame
TextLabel.BackgroundColor3 = Color3.new(0.286275, 0.690196, 1)
TextLabel.BorderSizePixel = 0
TextLabel.Position = UDim2.new(-0.00161084533, 0, -0.00398874283, 0)
TextLabel.Size = UDim2.new(0, 189, 0, 40)
TextLabel.Font = Enum.Font.Highway
TextLabel.Text = "SEMI-Autofarm by PainfulExplits"
TextLabel.TextColor3 = Color3.new(0.796079, 0.235294, 0.356863)
TextLabel.TextSize = 15

TextButton.MouseButton1Down:connect(function()
	if ok then
		TextButton.Text = "SEMI-FARM is OFF"
		TextButton.TextColor3 = Color3.new(0.796079, 0.235294, 0.356863)
	else
		TextButton.Text = "SEMI-FARM is ON"
		TextButton.TextColor3 = Color3.new(0.0980392, 0.411765, 0.796079)
                TextButton.Font = Enum.Font.SourceSansBold
	end
	ok = not ok
end)
local farm = coroutine.wrap(function()
    while wait() do
        if ok then
            for _,v in pairs(workspace.playerPlots[me.Name]:GetChildren()) do
                if string.find(v.Name, "") then
                    me.lootSearchEvent:FireServer("minePlot", v)
                    me.lootSearchEvent:FireServer("collectPlot", v:WaitForChild(me.equippedDrill.Value))
                    game:GetService("ReplicatedStorage").rEvents.sellEvent:FireServer("sellWholeBackpack")
                end
            end
        end
    end
end)
farm()