local Players = game:GetService("Players")
local RunService = game:GetService("RunService")
local UserInputService = game:GetService("UserInputService")

local player = Players.LocalPlayer

-- ================= GUI =================

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

local main = Instance.new("Frame")
main.Size = UDim2.new(0,260,0,200)
main.Position = UDim2.new(0.5,-130,0.5,-100)
main.BackgroundColor3 = Color3.fromRGB(0,0,0)
main.Parent = gui

Instance.new("UICorner", main).CornerRadius = UDim.new(0,25)
Instance.new("UIStroke", main).Thickness = 2

local topBar = Instance.new("Frame")
topBar.Size = UDim2.new(1,0,0,40)
topBar.BackgroundColor3 = Color3.fromRGB(20,20,20)
topBar.Parent = main
Instance.new("UICorner", topBar).CornerRadius = UDim.new(0,25)

local credit = Instance.new("TextLabel")
credit.Size = UDim2.new(1,0,0,30)
credit.Position = UDim2.new(0,0,1,-30)
credit.BackgroundTransparency = 1
credit.Text = "YouTuber: LoginEditXZ"
credit.TextScaled = true
credit.TextColor3 = Color3.new(1,1,1)
credit.Parent = main

-- ================= BOTÕES =================

local saveButton = Instance.new("TextButton")
saveButton.Size = UDim2.new(0,200,0,50)
saveButton.Position = UDim2.new(0.5,-100,0.4,-25)
saveButton.Text = "Salvar Posição"
saveButton.TextColor3 = Color3.new(1,1,1)
saveButton.Parent = main
Instance.new("UICorner", saveButton).CornerRadius = UDim.new(0,30)
local saveStroke = Instance.new("UIStroke", saveButton)
saveStroke.Thickness = 3

local tpButton = Instance.new("TextButton")
tpButton.Size = UDim2.new(0,200,0,50)
tpButton.Position = UDim2.new(0.5,-100,0.7,-25)
tpButton.Text = "Teleportar"
tpButton.TextColor3 = Color3.new(1,1,1)
tpButton.Parent = main
Instance.new("UICorner", tpButton).CornerRadius = UDim.new(0,30)
local tpStroke = Instance.new("UIStroke", tpButton)
tpStroke.Thickness = 3

-- ================= ARRASTAR =================

local dragging = false
local dragStart
local startPos

topBar.InputBegan:Connect(function(input)
	if input.UserInputType == Enum.UserInputType.MouseButton1
	or input.UserInputType == Enum.UserInputType.Touch then
		dragging = true
		dragStart = input.Position
		startPos = main.Position
	end
end)

topBar.InputEnded:Connect(function(input)
	if input.UserInputType == Enum.UserInputType.MouseButton1
	or input.UserInputType == Enum.UserInputType.Touch then
		dragging = false
	end
end)

UserInputService.InputChanged:Connect(function(input)
	if dragging then
		local delta = input.Position - dragStart
		main.Position = UDim2.new(
			startPos.X.Scale,
			startPos.X.Offset + delta.X,
			startPos.Y.Scale,
			startPos.Y.Offset + delta.Y
		)
	end
end)

-- ================= ARCO-ÍRIS =================

local hue = 0
RunService.RenderStepped:Connect(function()
	hue += 0.003
	if hue > 1 then hue = 0 end
	
	local color = Color3.fromHSV(hue,1,1)
	saveButton.BackgroundColor3 = color
	saveStroke.Color = color
	
	tpButton.BackgroundColor3 = color
	tpStroke.Color = color
end)

-- ================= SISTEMA =================

local savedPosition = nil

saveButton.MouseButton1Click:Connect(function()
	local character = player.Character
	if character and character:FindFirstChild("HumanoidRootPart") then
		savedPosition = character.HumanoidRootPart.Position
		saveButton.Text = "Posição Salva!"
	end
end)

tpButton.MouseButton1Click:Connect(function()
	local character = player.Character
	if character and character:FindFirstChild("HumanoidRootPart") and savedPosition then
		character.HumanoidRootPart.CFrame = CFrame.new(savedPosition + Vector3.new(0,3,0))
	end
end)