-- Obfuscated Checkpoint TP (Slider + Direct) | Credits: veemix373
local a=game:GetService("Players").LocalPlayer
local b=a:WaitForChild("PlayerGui")
local c=Instance.new("ScreenGui",b)c.ResetOnSpawn=false
local d=Instance.new("Frame",c)d.Size=UDim2.fromScale(.22,.26)d.Position=UDim2.fromScale(.39,.35)d.BackgroundColor3=Color3.fromRGB(25,25,25)d.BorderSizePixel=0 d.Active=true
local e=Instance.new("TextLabel",d)e.Size=UDim2.fromScale(1,.2)e.BackgroundColor3=Color3.fromRGB(40,40,40)e.Text="Checkpoint TP"e.TextColor3=Color3.new(1,1,1)e.TextScaled=true e.Font=Enum.Font.Cartoon
local f,g,h=false,nil,nil
e.InputBegan:Connect(function(i)if i.UserInputType==Enum.UserInputType.MouseButton1 then f=true g=i.Position h=d.Position end end)
e.InputEnded:Connect(function(i)if i.UserInputType==Enum.UserInputType.MouseButton1 then f=false end end)
game:GetService("UserInputService").InputChanged:Connect(function(i)if f and i.UserInputType==Enum.UserInputType.MouseMovement then local j=i.Position-g;d.Position=UDim2.new(h.X.Scale,h.X.Offset+j.X,h.Y.Scale,h.Y.Offset+j.Y)end end)
local k=Instance.new("TextLabel",d)k.Size=UDim2.fromScale(1,.15)k.Position=UDim2.fromScale(0,.22)k.BackgroundTransparency=1 k.Text="Stage: 1"k.TextColor3=Color3.new(1,1,1)k.TextScaled=true k.Font=Enum.Font.Cartoon
local l=Instance.new("Frame",d)l.Size=UDim2.fromScale(.85,.1)l.Position=UDim2.fromScale(.075,.42)l.BackgroundColor3=Color3.fromRGB(70,70,70)l.BorderSizePixel=0
local m=Instance.new("Frame",l)m.Size=UDim2.fromScale(.03,1)m.Position=UDim2.new(0,0,0,0)m.BackgroundColor3=Color3.fromRGB(60,120,255)m.BorderSizePixel=0
local n,o=false,1
l.InputBegan:Connect(function(i)if i.UserInputType==Enum.UserInputType.MouseButton1 then n=true end end)
l.InputEnded:Connect(function(i)if i.UserInputType==Enum.UserInputType.MouseButton1 then n=false end end)
game:GetService("UserInputService").InputChanged:Connect(function(i)if n and i.UserInputType==Enum.UserInputType.MouseMovement then local x=game:GetService("UserInputService"):GetMouseLocation().X local y=math.clamp(x-l.AbsolutePosition.X,0,l.AbsoluteSize.X)local z=y/l.AbsoluteSize.X;m.Position=UDim2.new(z,0,0,0)o=math.clamp(math.floor(z*4000),1,4000)k.Text="Stage: "..o end end)
local p=Instance.new("TextButton",d)p.Size=UDim2.fromScale(.85,.2)p.Position=UDim2.fromScale(.075,.6)p.Text="START"p.TextScaled=true p.Font=Enum.Font.Cartoon p.TextColor3=Color3.new(1,1,1)p.BackgroundColor3=Color3.fromRGB(60,120,255)p.BorderSizePixel=0
-- Direct TP GUI
local q=Instance.new("ScreenGui",b)q.ResetOnSpawn=false
local r=Instance.new("Frame",q)r.Size=UDim2.fromScale(.18,.16)r.Position=UDim2.fromScale(.6,.35)r.BackgroundColor3=Color3.fromRGB(25,25,25)r.BorderSizePixel=0 r.Active=true
local s=Instance.new("TextLabel",r)s.Size=UDim2.fromScale(1,.25)s.BackgroundColor3=Color3.fromRGB(40,40,40)s.Text="Direct TP"s.TextColor3=Color3.new(1,1,1)s.TextScaled=true s.Font=Enum.Font.Cartoon
local t,u,v=false,nil,nil
s.InputBegan:Connect(function(i)if i.UserInputType==Enum.UserInputType.MouseButton1 then t=true u=i.Position v=r.Position end end)
s.InputEnded:Connect(function(i)if i.UserInputType==Enum.UserInputType.MouseButton1 then t=false end end)
game:GetService("UserInputService").InputChanged:Connect(function(i)if t and i.UserInputType==Enum.UserInputType.MouseMovement then local j=i.Position-u;r.Position=UDim2.new(v.X.Scale,v.X.Offset+j.X,v.Y.Scale,v.Y.Offset+j.Y)end end)
local w=Instance.new("TextBox",r)w.Size=UDim2.fromScale(.7,.35)w.Position=UDim2.fromScale(.15,.35)w.PlaceholderText="Stage #"w.TextScaled=true w.Font=Enum.Font.Cartoon w.ClearTextOnFocus=false w.TextColor3=Color3.new(1,1,1) w.BackgroundColor3=Color3.fromRGB(60,60,60) w.BorderSizePixel=0
local x=Instance.new("TextButton",r)x.Size=UDim2.fromScale(.8,.3)x.Position=UDim2.fromScale(.1,.7)x.Text="GO"x.TextScaled=true x.Font=Enum.Font.Cartoon x.TextColor3=Color3.new(1,1,1)x.BackgroundColor3=Color3.fromRGB(60,120,255)x.BorderSizePixel=0
-- Teleport logic
local y=false
p.MouseButton1Click:Connect(function()
	if y then return end
	y=true
	p.Text="RUNNING..."
	local z=a.Character or a.CharacterAdded:Wait()
	local hrp=z:WaitForChild("HumanoidRootPart")
	local cps=workspace:WaitForChild("Checkpoints")
	for i=1,o do
		local cp=cps:FindFirstChild(tostring(i))
		if cp and cp:IsA("BasePart") then
			hrp.CFrame=cp.CFrame+Vector3.new(0,3,0)
		end
		task.wait(.03)
	end
	c:Destroy()
end)
x.MouseButton1Click:Connect(function()
	local stage=tonumber(w.Text)
	if not stage then return end
	stage=math.clamp(stage,1,4000)
	local z=a.Character or a.CharacterAdded:Wait()
	local hrp=z:WaitForChild("HumanoidRootPart")
	local cps=workspace:WaitForChild("Checkpoints")
	local cp=cps:FindFirstChild(tostring(stage))
	if cp and cp:IsA("BasePart") then
		hrp.CFrame=cp.CFrame+Vector3.new(0,3,0)
	end
end)