local Players = game:GetService("Players")
local player = Players.LocalPlayer
local UIS = game:GetService("UserInputService")
local TweenService = game:GetService("TweenService")
local RunService = game:GetService("RunService")

local KEY = "MANGOSTEEN84_"

-- GUI
local gui = Instance.new("ScreenGui")
gui.ResetOnSpawn = false
gui.Parent = player.PlayerGui

-- MAIN FRAME
local frame = Instance.new("Frame")
frame.Size = UDim2.new(0,300,0,170)
frame.Position = UDim2.new(0.5,-150,0.5,-85)
frame.BackgroundColor3 = Color3.fromRGB(30,30,30)
frame.Parent = gui

-- DRAG
local dragging = false
local dragStart
local startPos

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

UIS.InputChanged:Connect(function(input)
	if dragging and input.UserInputType == Enum.UserInputType.MouseMovement then
		local delta = input.Position - dragStart
		frame.Position = UDim2.new(
			startPos.X.Scale,
			startPos.X.Offset + delta.X,
			startPos.Y.Scale,
			startPos.Y.Offset + delta.Y
		)
	end
end)

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

-- CLOSE BUTTON
local close = Instance.new("TextButton")
close.Size = UDim2.new(0,25,0,25)
close.Position = UDim2.new(1,-30,0,5)
close.Text = "X"
close.Parent = frame

-- MINIMIZE BUTTON
local mini = Instance.new("TextButton")
mini.Size = UDim2.new(0,25,0,25)
mini.Position = UDim2.new(1,-60,0,5)
mini.Text = "-"
mini.Parent = frame

-- KEY BOX
local keyBox = Instance.new("TextBox")
keyBox.Size = UDim2.new(0.9,0,0,35)
keyBox.Position = UDim2.new(0.05,0,0.2,0)
keyBox.PlaceholderText = "Enter Password"
keyBox.Parent = frame

-- SUBMIT
local submit = Instance.new("TextButton")
submit.Size = UDim2.new(0.9,0,0,30)
submit.Position = UDim2.new(0.05,0,0.5,0)
submit.Text = "SUBMIT"
submit.Parent = frame

-- GET KEY
local getKey = Instance.new("TextButton")
getKey.Size = UDim2.new(0.9,0,0,30)
getKey.Position = UDim2.new(0.05,0,0.72,0)
getKey.Text = "GET KEY"
getKey.Parent = frame

getKey.MouseButton1Click:Connect(function()
	if setclipboard then
		setclipboard("https://www.editpad.org/?edit-id=D22aVNCvt8d491bed5")
	end
	getKey.Text = "COPIED!"
	task.wait(2)
	getKey.Text = "GET KEY"
end)

-- RAINBOW CIRCLE BUTTON
local bubble = Instance.new("TextButton")
bubble.Size = UDim2.new(0,50,0,50)
bubble.Position = UDim2.new(0,10,0.4,0)
bubble.Text = ""
bubble.Visible = false
bubble.Parent = gui

local corner = Instance.new("UICorner")
corner.CornerRadius = UDim.new(1,0)
corner.Parent = bubble

-- BUBBLE DRAG
bubble.InputBegan:Connect(function(input)
	if input.UserInputType == Enum.UserInputType.MouseButton1 then
		dragging = true
		dragStart = input.Position
		startPos = bubble.Position
	end
end)

-- RAINBOW LOOP
RunService.RenderStepped:Connect(function()
	bubble.BackgroundColor3 = Color3.fromHSV(tick()%5/5,1,1)
end)

-- HIDE GUI
local function hideGUI()

	for _,v in pairs(frame:GetDescendants()) do
		if v:IsA("TextButton") or v:IsA("TextBox") or v:IsA("TextLabel") then
			TweenService:Create(v,TweenInfo.new(0.5),{TextTransparency=1}):Play()
		end
	end

	TweenService:Create(frame,TweenInfo.new(0.5),{BackgroundTransparency=1}):Play()

	task.wait(.5)

	frame.Visible = false
	bubble.Visible = true

end

-- SHOW GUI
local function showGUI()

	frame.Visible = true

	for _,v in pairs(frame:GetDescendants()) do
		if v:IsA("TextButton") or v:IsA("TextBox") or v:IsA("TextLabel") then
			v.TextTransparency = 1
			TweenService:Create(v,TweenInfo.new(0.5),{TextTransparency=0}):Play()
		end
	end

	frame.BackgroundTransparency = 1
	TweenService:Create(frame,TweenInfo.new(0.5),{BackgroundTransparency=0}):Play()

	bubble.Visible = false

end

mini.MouseButton1Click:Connect(hideGUI)
bubble.MouseButton1Click:Connect(showGUI)

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

-- HEADSIT MENU
local function createMenu()

	frame:ClearAllChildren()

	local title = Instance.new("TextLabel")
	title.Size = UDim2.new(1,0,0,40)
	title.Text = "headsit menu upgraded"
	title.BackgroundTransparency = 1
	title.TextScaled = true
	title.Parent = frame

	local userBox = Instance.new("TextBox")
	userBox.Size = UDim2.new(0.9,0,0,35)
	userBox.Position = UDim2.new(0.05,0,0.35,0)
	userBox.PlaceholderText = "Display / Username"
	userBox.Parent = frame

	local sit = Instance.new("TextButton")
	sit.Size = UDim2.new(0.9,0,0,30)
	sit.Position = UDim2.new(0.05,0,0.6,0)
	sit.Text = "SIT"
	sit.Parent = frame

	local stop = Instance.new("TextButton")
	stop.Size = UDim2.new(0.9,0,0,30)
	stop.Position = UDim2.new(0.05,0,0.8,0)
	stop.Text = "STOP"
	stop.Parent = frame

	local sitLoop

	RunService.RenderStepped:Connect(function()
		sit.BackgroundColor3 = Color3.fromHSV(tick()%5/5,1,1)
	end)

	sit.MouseButton1Click:Connect(function()

		local name = userBox.Text:lower()

		for _,plr in pairs(Players:GetPlayers()) do
			if plr.Name:lower():find(name) or plr.DisplayName:lower():find(name) then

				sitLoop = RunService.RenderStepped:Connect(function()

					local char = player.Character
					local target = plr.Character

					if char and target then
						local root = char:FindFirstChild("HumanoidRootPart")
						local targetRoot = target:FindFirstChild("HumanoidRootPart")

						if root and targetRoot then
							root.CFrame = targetRoot.CFrame * CFrame.new(0,2,0)
						end
					end

				end)

			end
		end

	end)

	stop.MouseButton1Click:Connect(function()
		if sitLoop then
			sitLoop:Disconnect()
		end
	end)

end

-- SUBMIT
submit.MouseButton1Click:Connect(function()

	if keyBox.Text == KEY then

		TweenService:Create(frame,TweenInfo.new(1),{BackgroundTransparency=1}):Play()

		task.wait(5)

		createMenu()

	else
		keyBox.Text = ""
		keyBox.PlaceholderText = "Wrong Key"
	end

end)