Autofarm obby pro script

--// SERVICIOS
local Players = game:GetService("Players")
local RunService = game:GetService("RunService")
local Stats = game:GetService("Stats")
local lp = Players.LocalPlayer
local cam = workspace.CurrentCamera

--// GUI
local gui = Instance.new("ScreenGui", gethui())
gui.ResetOnSpawn = false

--// FRAME PRINCIPAL
local main = Instance.new("Frame", gui)
main.Size = UDim2.new(0,420,0,520)
main.Position = UDim2.new(0.05,0,0.1,0)
main.BackgroundColor3 = Color3.fromRGB(15,15,15)
main.BorderSizePixel = 0
main.Active = true
main.Draggable = true

local stroke = Instance.new("UIStroke", main)
stroke.Color = Color3.new(1,1,1)
stroke.Thickness = 3
stroke.ApplyStrokeMode = Enum.ApplyStrokeMode.Border

--// PERFIL
local thumb = Players:GetUserThumbnailAsync(
	lp.UserId,
	Enum.ThumbnailType.HeadShot,
	Enum.ThumbnailSize.Size180x180
)

local avatar = Instance.new("ImageLabel", main)
avatar.Image = thumb
avatar.Size = UDim2.new(0,70,0,70)
avatar.Position = UDim2.new(0,15,0,15)
avatar.BackgroundTransparency = 1
avatar.BorderSizePixel = 0

local avatarStroke = Instance.new("UIStroke", avatar)
avatarStroke.Color = Color3.fromRGB(0,170,255)
avatarStroke.Thickness = 4
avatarStroke.ApplyStrokeMode = Enum.ApplyStrokeMode.Border

--// TEXTO
local welcome = Instance.new("TextLabel", main)
welcome.Position = UDim2.new(0,100,0,30)
welcome.Size = UDim2.new(1,-110,0,30)
welcome.BackgroundTransparency = 1
welcome.Text = "Bienvenid@ "..lp.Name
welcome.TextColor3 = Color3.new(1,1,1)
welcome.Font = Enum.Font.GothamBold
welcome.TextSize = 18
welcome.TextXAlignment = Enum.TextXAlignment.Left

--// BOTONES SUPERIORES
local function topButton(txt,pos)
	local b = Instance.new("TextButton", main)
	b.Size = UDim2.new(0,90,0,30)
	b.Position = pos
	b.Text = txt
	b.Font = Enum.Font.GothamBold
	b.TextSize = 12
	b.TextColor3 = Color3.new(1,1,1)
	b.BackgroundColor3 = Color3.fromRGB(50,50,50)
	b.BorderSizePixel = 0
	return b
end

local minimize = topButton("MIN", UDim2.new(1,-200,0,5))
local close = topButton("X", UDim2.new(1,-100,0,5))

--// SCROLL
local scroll = Instance.new("ScrollingFrame", main)
scroll.Position = UDim2.new(0,15,0,110)
scroll.Size = UDim2.new(1,-30,1,-190)
scroll.CanvasSize = UDim2.new(0,0,0,0)
scroll.ScrollBarImageTransparency = 0.2
scroll.BackgroundTransparency = 1

local layout = Instance.new("UIListLayout", scroll)
layout.Padding = UDim.new(0,10)

layout:GetPropertyChangedSignal("AbsoluteContentSize"):Connect(function()
	scroll.CanvasSize = UDim2.new(0,0,0,layout.AbsoluteContentSize.Y + 10)
end)

local function makeButton(txt)
	local b = Instance.new("TextButton", scroll)
	b.Size = UDim2.new(1,0,0,45)
	b.Text = txt
	b.BackgroundColor3 = Color3.fromRGB(60,60,60)
	b.TextColor3 = Color3.new(1,1,1)
	b.Font = Enum.Font.Gotham
	b.TextSize = 14
	b.BorderSizePixel = 0
	return b
end

--// VARIABLES
local savedPos
local teleporting = false
local tpDelay = 3
local espEnabled = false
local drawings = {}

--// FUNCIONES
local function clearESP()
	for _,v in pairs(drawings) do
		for _,d in pairs(v) do
			d:Remove()
		end
	end
	drawings = {}
end

local function createESP(plr)
	local line = Drawing.new("Line")
	line.Color = Color3.fromRGB(0,170,255)
	line.Thickness = 2

	local text = Drawing.new("Text")
	text.Size = 14
	text.Center = true
	text.Outline = true
	text.OutlineColor = Color3.new(0,0,0)
	text.Color = Color3.new(1,1,1)

	drawings[plr] = {line,text}
end

--// ESP LOOP
RunService.RenderStepped:Connect(function()
	if not espEnabled then return end

	for _,plr in pairs(Players:GetPlayers()) do
		if plr ~= lp and plr.Character and plr.Character:FindFirstChild("HumanoidRootPart") then
			if not drawings[plr] then createESP(plr) end

			local hrp = plr.Character.HumanoidRootPart
			local pos, onscreen = cam:WorldToViewportPoint(hrp.Position)

			local line = drawings[plr][1]
			local text = drawings[plr][2]

			if onscreen then
				line.Visible = true
				line.From = Vector2.new(cam.ViewportSize.X/2, cam.ViewportSize.Y)
				line.To = Vector2.new(pos.X,pos.Y)

				text.Visible = true
				text.Position = Vector2.new(pos.X,pos.Y - 15)
				text.Text = plr.Name.." ["..math.floor((lp.Character.HumanoidRootPart.Position-hrp.Position).Magnitude).."]"
			else
				line.Visible = false
				text.Visible = false
			end
		end
	end
end)

--// BOTONES
makeButton("ESP ON / OFF").MouseButton1Click:Connect(function()
	espEnabled = not espEnabled
	if not espEnabled then clearESP() end
end)

makeButton("Guardar Teleport").MouseButton1Click:Connect(function()
	if lp.Character then
		savedPos = lp.Character.HumanoidRootPart.CFrame
	end
end)

makeButton("Iniciar Auto Teleport").MouseButton1Click:Connect(function()
	if savedPos then teleporting = true end
end)

makeButton("Detener Teleport").MouseButton1Click:Connect(function()
	teleporting = false
end)

makeButton("+ Tiempo Teleport").MouseButton1Click:Connect(function()
	tpDelay += 1
end)

makeButton("- Tiempo Teleport").MouseButton1Click:Connect(function()
	tpDelay = math.max(0,tpDelay-1)
end)

makeButton("Tiempo Infinito").MouseButton1Click:Connect(function()
	tpDelay = 0
end)

makeButton("Velocidad +10").MouseButton1Click:Connect(function()
	lp.Character.Humanoid.WalkSpeed += 10
end)

makeButton("Velocidad -10").MouseButton1Click:Connect(function()
	lp.Character.Humanoid.WalkSpeed -= 10
end)

makeButton("Salto +10").MouseButton1Click:Connect(function()
	lp.Character.Humanoid.JumpPower += 10
end)

makeButton("Salto -10").MouseButton1Click:Connect(function()
	lp.Character.Humanoid.JumpPower -= 10
end)

--// TELEPORT LOOP
task.spawn(function()
	while true do
		if teleporting and savedPos and lp.Character then
			lp.Character.HumanoidRootPart.CFrame = savedPos
		end
		task.wait(tpDelay == 0 and 0.2 or tpDelay)
	end
end)

--// INFO
local info = Instance.new("TextLabel", main)
info.Position = UDim2.new(0,15,1,-50)
info.Size = UDim2.new(1,-30,0,40)
info.BackgroundTransparency = 1
info.TextColor3 = Color3.new(1,1,1)
info.Font = Enum.Font.Gotham
info.TextSize = 14

RunService.RenderStepped:Connect(function(dt)
	local fps = math.floor(1/dt)
	local ping = math.floor(Stats.Network.ServerStatsItem["Data Ping"]:GetValue())
	info.Text = "FPS: "..fps.." | Ping: "..ping.." ms"
end)

--// MINIMIZAR / CERRAR
local minimized = false
minimize.MouseButton1Click:Connect(function()
	minimized = not minimized
	scroll.Visible = not minimized
end)

close.MouseButton1Click:Connect(function()
	clearESP()
	gui:Destroy()
end)