local player = game.Players.LocalPlayer
local PlayerGui = player:WaitForChild("PlayerGui")
local RunService = game:GetService("RunService")
local UserInputService = game:GetService("UserInputService")

-- GUI principal
local ScreenGui = Instance.new("ScreenGui", PlayerGui)
ScreenGui.Name = "PainelUnificado"

local MainFrame = Instance.new("Frame", ScreenGui)
MainFrame.Size = UDim2.new(0, 320, 0, 450)
MainFrame.Position = UDim2.new(0.05,0,0.25,0)
MainFrame.BackgroundColor3 = Color3.fromRGB(30,30,30)
MainFrame.Active = true
MainFrame.Draggable = true

local Header = Instance.new("Frame", MainFrame)
Header.Size = UDim2.new(1,0,0,30)
Header.BackgroundColor3 = Color3.fromRGB(50,50,50)

local Title = Instance.new("TextLabel", Header)
Title.Size = UDim2.new(1,-30,1,0)
Title.Position = UDim2.new(0,5,0,0)
Title.BackgroundTransparency = 1
Title.Text = "PAINEL M4g0Rebob1n3d"
Title.TextColor3 = Color3.fromRGB(255,255,255)
Title.TextXAlignment = Enum.TextXAlignment.Left

local MinButton = Instance.new("TextButton", Header)
MinButton.Size = UDim2.new(0,30,1,0)
MinButton.Position = UDim2.new(1,-30,0,0)
MinButton.Text = "-"
MinButton.BackgroundColor3 = Color3.fromRGB(60,60,60)
MinButton.TextColor3 = Color3.fromRGB(255,255,255)

local Content = Instance.new("ScrollingFrame", MainFrame)
Content.Size = UDim2.new(1,0,1,-30)
Content.Position = UDim2.new(0,0,0,30)
Content.BackgroundTransparency = 1
Content.CanvasSize = UDim2.new(0,0,0,1000)

local ListLayout = Instance.new("UIListLayout", Content)
ListLayout.Padding = UDim.new(0,8)
ListLayout.SortOrder = Enum.SortOrder.LayoutOrder

local function criarBotao(nome, callback)
	local b = Instance.new("TextButton")
	b.Parent = Content
	b.Size = UDim2.new(1,-10,0,40)
	b.BackgroundColor3 = Color3.fromRGB(70,70,70)
	b.TextColor3 = Color3.fromRGB(255,255,255)
	b.Text = nome
	if callback then
		b.MouseButton1Click:Connect(function()
			callback(b)
		end)
	end
	return b
end

local function getChar()
	local char = player.Character or player.CharacterAdded:Wait()
	local hum = char:FindFirstChildOfClass("Humanoid") or char:WaitForChild("Humanoid")
	local root = char:FindFirstChild("HumanoidRootPart") or char:WaitForChild("HumanoidRootPart")
	return char, hum, root
end

----------------------------------------------------
-- LOCAL SCRIPT: ATTACK FLY (corrigido: nunca entra no chão)
----------------------------------------------------
local attackFlyAtivo = false
local attackFlyConn
local ghostHitbox

-- valores ajustáveis
local altura = 9       -- controla o quanto ele sobe/desce em cada batida
local velocidade = 2    -- controla a rapidez (quanto maior, mais rápido)
local intervalo = 0.2   -- tempo em segundos entre cada troca de direção

criarBotao("Attack Fly (ON/OFF)", function(btn)
	attackFlyAtivo = not attackFlyAtivo
	local char, hum, root = getChar()
	if not hum or not root then return end

	if attackFlyAtivo then
		btn.Text = "Attack Fly: LIGADO"

		-- cria hitbox invisível
		ghostHitbox = Instance.new("Part")
		ghostHitbox.Size = Vector3.new(140, 140, 420)
		ghostHitbox.Transparency = 1
		ghostHitbox.CanCollide = false
		ghostHitbox.Anchored = false
		ghostHitbox.Massless = true
		ghostHitbox.Name = "AttackFlyHitbox"
		ghostHitbox.Parent = workspace

		local weld = Instance.new("WeldConstraint")
		weld.Part0 = root
		weld.Part1 = ghostHitbox
		weld.Parent = ghostHitbox

		-- sobe e desce com trava de chão
		local direcao = 1
		local baseY = root.Position.Y
		local ultimoTroca = tick()

		attackFlyConn = game:GetService("RunService").Heartbeat:Connect(function(dt)
			if not root or not root.Parent then return end
			if not ghostHitbox or not ghostHitbox.Parent then return end

			-- só troca direção a cada intervalo
			if tick() - ultimoTroca > intervalo then
				direcao = -direcao
				ultimoTroca = tick()
			end

			local pos = root.Position
			local novoY = pos.Y + (direcao * altura * velocidade)

			-- impede de entrar no chão
			if novoY < baseY then
				novoY = baseY
				direcao = 1
			end

			local destino = Vector3.new(pos.X, novoY, pos.Z)
			root.CFrame = CFrame.new(destino, root.CFrame.LookVector + destino)
		end)

		-- dano garantido
		ghostHitbox.Touched:Connect(function(otherPart)
			local enemyHum = otherPart.Parent:FindFirstChildOfClass("Humanoid")
			if enemyHum and enemyHum ~= hum then
				enemyHum:TakeDamage(10)
			end
		end)

	else
		btn.Text = "Attack Fly: DESLIGADO"
		if attackFlyConn then
			attackFlyConn:Disconnect()
			attackFlyConn = nil
		end
		if ghostHitbox then
			ghostHitbox:Destroy()
			ghostHitbox = nil
		end
	end
end)
----------------------------------------------------
-- BOTÃO FLY (toggle PC + Mobile com < ^ v >)
----------------------------------------------------
local flyAtivo = false
local flyConn

criarBotao("Fly (ON/OFF)", function(btn)
	flyAtivo = not flyAtivo
	local char, hum, root = getChar()
	if not hum or not root then return end

	if flyAtivo then
		btn.Text = "Fly: LIGADO"
		hum.PlatformStand = true

		flyConn = RunService.Heartbeat:Connect(function()
			local dir = Vector3.new()

			-- PC (teclado)
			if not UserInputService.TouchEnabled then
				if UserInputService:IsKeyDown(Enum.KeyCode.W) then dir += root.CFrame.LookVector end
				if UserInputService:IsKeyDown(Enum.KeyCode.S) then dir -= root.CFrame.LookVector end
				if UserInputService:IsKeyDown(Enum.KeyCode.A) then dir -= root.CFrame.RightVector end
				if UserInputService:IsKeyDown(Enum.KeyCode.D) then dir += root.CFrame.RightVector end
				if UserInputService:IsKeyDown(Enum.KeyCode.Space) then dir += Vector3.new(0,1,0) end
				if UserInputService:IsKeyDown(Enum.KeyCode.LeftShift) then dir += Vector3.new(0,-1,0) end
			end

			root.Velocity = dir * 50
		end)

		-- MOBILE: só aparece se TouchEnabled
		if UserInputService.TouchEnabled then
			local mobileFrame = Instance.new("Frame", ScreenGui)
			mobileFrame.Name = "MobileFlyControls"
			mobileFrame.Size = UDim2.new(0,240,0,80)
			mobileFrame.Position = UDim2.new(1,-250,1,-100)
			mobileFrame.BackgroundTransparency = 1

			local function criarControle(texto, pos, moveDir)
				local b = Instance.new("TextButton", mobileFrame)
				b.Size = UDim2.new(0,60,0,60)
				b.Position = pos
				b.Text = texto
				b.BackgroundColor3 = Color3.fromRGB(80,80,80)
				b.TextColor3 = Color3.fromRGB(255,255,255)
				b.MouseButton1Down:Connect(function()
					root.Velocity = moveDir * 50
				end)
			end

			-- Botões < ^ v >
			criarControle("<", UDim2.new(0,0,0,0), -root.CFrame.RightVector) -- esquerda
			criarControle("^", UDim2.new(0.33,0,0,0), Vector3.new(0,1,0))     -- subir
			criarControle("v", UDim2.new(0.66,0,0,0), -root.CFrame.LookVector) -- trás
			criarControle(">", UDim2.new(1,0,0,0), root.CFrame.RightVector)   -- direita
		end

	else
		btn.Text = "Fly: DESLIGADO"
		hum.PlatformStand = false
		root.Velocity = Vector3.new(0,0,0)
		if flyConn then flyConn:Disconnect() flyConn = nil end
		local mobileFrame = ScreenGui:FindFirstChild("MobileFlyControls")
		if mobileFrame then mobileFrame:Destroy() end
	end
end)



----------------------------------------------------
-- BOTÃO NO-CLIP (toggle)
----------------------------------------------------
local noclipAtivo = false
local noclipConn

criarBotao("No-Clip (ON/OFF)", function(btn)
	noclipAtivo = not noclipAtivo
	local char = getChar()
	if not char then return end

	if noclipAtivo then
		btn.Text = "No-Clip: LIGADO"
		noclipConn = RunService.Stepped:Connect(function()
			for _, part in ipairs(char:GetDescendants()) do
				if part:IsA("BasePart") then
					part.CanCollide = false
				end
			end
		end)
	else
		btn.Text = "No-Clip: DESLIGADO"
		if noclipConn then noclipConn:Disconnect() noclipConn = nil end
		for _, part in ipairs(char:GetDescendants()) do
			if part:IsA("BasePart") then
				part.CanCollide = true
			end
		end
	end
end)

----------------------------------------------------
-- BOTÃO VIDA INFINITA (toggle)
----------------------------------------------------
local vidaInfinita = false
local vidaConn

criarBotao("Vida Infinita (ON/OFF)", function(btn)
	vidaInfinita = not vidaInfinita
	local _, hum = getChar()
	if not hum then return end

	if vidaInfinita then
		btn.Text = "Vida Infinita: LIGADA"
		hum.MaxHealth = math.huge
		hum.Health = hum.MaxHealth
		vidaConn = RunService.Heartbeat:Connect(function()
			if hum and hum.Parent then
				hum.MaxHealth = math.huge
				hum.Health = hum.MaxHealth
			end
		end)
	else
		btn.Text = "Vida Infinita: DESLIGADA"
		if vidaConn then vidaConn:Disconnect() vidaConn = nil end
		hum.MaxHealth = 100
		hum.Health = hum.MaxHealth
	end
end)
----------------------------------------------------
-- FUNÇÃO DE VOO ATÉ DESTINO (estilo fly)
----------------------------------------------------
local TweenService = game:GetService("TweenService")

local function voarAte(destino)
	local char = game.Players.LocalPlayer.Character
	if not char then return end
	local root = char:FindFirstChild("HumanoidRootPart")
	if not root then return end

	-- cria tween para mover suavemente até destino
	local info = TweenInfo.new(
		2, -- duração do voo (ajuste conforme quiser)
		Enum.EasingStyle.Linear,
		Enum.EasingDirection.Out
	)
	local goal = {CFrame = CFrame.new(destino + Vector3.new(0,5,0))}
	local tween = TweenService:Create(root, info, goal)
	tween:Play()
end
----------------------------------------------------
-- CAMAS DINÂMICAS = TELEPORT BED
----------------------------------------------------
local sep = Instance.new("TextLabel", Content)
sep.Size = UDim2.new(1,0,0,30)
sep.Text = "--- TELEPORT BED ---"
sep.BackgroundTransparency = 1
sep.TextColor3 = Color3.fromRGB(255,255,255)

for _, obj in ipairs(workspace:GetDescendants()) do
	local nome = obj.Name:lower()
	if obj:IsA("BasePart") and (nome == "bed" or nome:sub(1,3) == "bed") then
		criarBotao("Ir para " .. obj.Name, function()
			voarAte(obj.Position)
		end)
	end
end

----------------------------------------------------
-- Minimizar (deixa só a aba "PAINEL MAG0REBOBIN3D")
----------------------------------------------------
local minimizado = false

MinButton.MouseButton1Click:Connect(function()
	minimizado = not minimizado
	if minimizado then
		-- esconde o conteúdo e reduz o frame
		Content.Visible = false
		MainFrame.Size = UDim2.new(0, 200, 0, 30) -- só a aba
		Title.Text = "PAINEL ma4g0r3bb1n3d"
	else
		-- mostra o conteúdo e restaura tamanho
		Content.Visible = true
		MainFrame.Size = UDim2.new(0, 320, 0, 450)
		Title.Text = "PAINEL m4g0r3bb1n3dM1n1m1z3"
	end
end)