honey made it

local player = game.Players.LocalPlayer
local mouse = player:GetMouse()
local uis = game:GetService("UserInputService")
local tweenService = game:GetService("TweenService")
local runService = game:GetService("RunService")
local workspace = game:GetService("Workspace")

local screenGui = Instance.new("ScreenGui")
screenGui.Parent = player:WaitForChild("PlayerGui")
screenGui.ResetOnSpawn = false

local frame = Instance.new("Frame")
frame.Size = UDim2.new(0, 300, 0, 150)
frame.Position = UDim2.new(0.3, 0, 0.3, 0)
frame.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
frame.BackgroundTransparency = 0.4
frame.Parent = screenGui
frame.Active = true
frame.Draggable = true

local frameCorner = Instance.new("UICorner")
frameCorner.CornerRadius = UDim.new(0, 10)
frameCorner.Parent = frame

local frameStroke = Instance.new("UIStroke")
frameStroke.Color = Color3.fromRGB(255, 255, 0)
frameStroke.Thickness = 2
frameStroke.Parent = frame

local button = Instance.new("TextButton")
button.Size = UDim2.new(0, 200, 0, 50)
button.Position = UDim2.new(0.5, -100, 0.3, 0)
button.BackgroundColor3 = Color3.fromRGB(0, 200, 0)
button.TextColor3 = Color3.fromRGB(255, 255, 255)
button.Text = "Auto Coin Farm : Off"
button.TextSize = 15
button.Parent = frame

local buttonCorner = Instance.new("UICorner")
buttonCorner.CornerRadius = UDim.new(0, 8)
buttonCorner.Parent = button

local autoCoin = false

local function teleportToCoin()
	if autoCoin and player.Character and player.Character:FindFirstChild("HumanoidRootPart") then
		for _, obj in pairs(workspace:GetDescendants()) do
			if obj:IsA("MeshPart") and obj.Name == "Coin" then
				player.Character.HumanoidRootPart.CFrame = obj.CFrame + Vector3.new(0, 5, 0)
				task.wait(0.1)
			end
		end
	end
end

button.MouseButton1Click:Connect(function()
	autoCoin = not autoCoin
	button.Text = "Auto Coin Farm : " .. (autoCoin and "On" or "Off")

	if autoCoin then
		task.spawn(function()
			while autoCoin do
				teleportToCoin()
				task.wait(0.5)
			end
		end)
	end
end)

local label = Instance.new("TextLabel")
label.Size = UDim2.new(1, 0, 0, 30)
label.Position = UDim2.new(0, 0, 0.8, 0)
label.BackgroundTransparency = 1
label.Text = "Made by : Nahwinreals"
label.Font = Enum.Font.SourceSansBold
label.TextSize = 18
label.Parent = frame

runService.RenderStepped:Connect(function()
	local hsv = tick() % 5 / 5
	label.TextColor3 = Color3.fromHSV(hsv, 1, 1)
end)