local Players=game:GetService("Players")
local ReplicatedStorage=game:GetService("ReplicatedStorage")
local TweenService=game:GetService("TweenService")
local UserInputService=game:GetService("UserInputService")
local StatsService=game:GetService("Stats")
local RunService=game:GetService("RunService")
local SoundService=game:GetService("SoundService")

local Player=Players.LocalPlayer
local PG=Player:WaitForChild("PlayerGui")

local PROFILE_URL="https://www.roblox.com/es/users/9059869146/profile"

local AutoSlap=false
local AutoExecute=true
local Animations=true
local Theme="Dark"

local function tw(o,t,p)
	return TweenService:Create(
		o,
		TweenInfo.new(t,Enum.EasingStyle.Quad,Enum.EasingDirection.Out),
		p
	)
end

local function cr(o,r)
	local c=Instance.new("UICorner")
	c.CornerRadius=UDim.new(0,r)
	c.Parent=o
end

local function st(o,c,w)
	local s=Instance.new("UIStroke")
	s.Color=c
	s.Thickness=w
	s.Parent=o
	return s
end

local OldGUI=PG:FindFirstChild("OP_ADIVINE_HUB")
if OldGUI then
	OldGUI:Destroy()
end

local GUI=Instance.new("ScreenGui")
GUI.Name="OP_ADIVINE_HUB"
GUI.ResetOnSpawn=false
GUI.IgnoreGuiInset=true
GUI.DisplayOrder=999
GUI.Parent=PG

--------------------------------------------------
-- INTRO
--------------------------------------------------

local Intro=Instance.new("Frame")
Intro.Size=UDim2.fromScale(1,1)
Intro.BackgroundColor3=Color3.new(0,0,0)
Intro.BorderSizePixel=0
Intro.Parent=GUI

for i=1,70 do
	local p=Instance.new("Frame")
	local s=math.random(2,4)

	p.Size=UDim2.fromOffset(s,s)
	p.Position=UDim2.new(math.random(),0,-.05,0)
	p.BackgroundColor3=Color3.new(1,1,1)
	p.BackgroundTransparency=.35+math.random()*.4
	p.BorderSizePixel=0
	p.Parent=Intro

	cr(p,s)

	task.spawn(function()
		while p.Parent do
			local x=math.random(1,99)/100
			p.Position=UDim2.new(x,0,-.05,0)

			local d=math.random(35,65)/10

			tw(p,d,{
				Position=UDim2.new(x,0,1.05,0)
			}):Play()

			task.wait(d)
		end
	end)
end

local IntroTitle=Instance.new("TextLabel")
IntroTitle.Size=UDim2.new(1,0,0,65)
IntroTitle.Position=UDim2.new(0,0,.43,0)
IntroTitle.BackgroundTransparency=1
IntroTitle.Text="OP ADIVINE HUB"
IntroTitle.Font=Enum.Font.GothamBold
IntroTitle.TextSize=40
IntroTitle.TextColor3=Color3.new(1,1,1)
IntroTitle.TextTransparency=1
IntroTitle.Parent=Intro

local IntroBy=Instance.new("TextLabel")
IntroBy.Size=UDim2.new(1,0,0,30)
IntroBy.Position=UDim2.new(0,0,.51,0)
IntroBy.BackgroundTransparency=1
IntroBy.Text="by dremmser"
IntroBy.Font=Enum.Font.Garamond
IntroBy.TextSize=18
IntroBy.TextColor3=Color3.fromRGB(160,190,230)
IntroBy.TextTransparency=1
IntroBy.Parent=Intro

tw(IntroTitle,2,{TextTransparency=0}):Play()
tw(IntroBy,2,{TextTransparency=0}):Play()

task.wait(4)

tw(IntroTitle,2,{TextTransparency=1}):Play()
tw(IntroBy,2,{TextTransparency=1}):Play()

task.wait(2)

Intro:Destroy()

--------------------------------------------------
-- MAIN
--------------------------------------------------

local Main=Instance.new("Frame")
Main.Name="Main"
Main.Size=UDim2.fromOffset(390,350)
Main.Position=UDim2.new(.5,-195,.5,-175)
Main.BackgroundColor3=Color3.fromRGB(4,6,10)
Main.BackgroundTransparency=.12
Main.BorderSizePixel=0
Main.Active=true
Main.Parent=GUI

cr(Main,15)

local MainStroke=st(Main,Color3.fromRGB(0,125,255),2)

--------------------------------------------------
-- PARTICLES
--------------------------------------------------

local Particles=Instance.new("Frame")
Particles.Size=UDim2.fromScale(1,1)
Particles.BackgroundTransparency=1
Particles.ClipsDescendants=true
Particles.ZIndex=1
Particles.Parent=Main

cr(Particles,15)

for i=1,45 do
	local p=Instance.new("Frame")
	local s=math.random(1,3)

	p.Size=UDim2.fromOffset(s,s)
	p.Position=UDim2.new(math.random(),0,-.05,0)
	p.BackgroundColor3=Color3.new(1,1,1)
	p.BackgroundTransparency=.4+math.random()*.35
	p.BorderSizePixel=0
	p.ZIndex=1
	p.Parent=Particles

	cr(p,s)

	task.spawn(function()
		while p.Parent do
			local x=math.random(2,98)/100
			p.Position=UDim2.new(x,0,-.05,0)

			local d=math.random(25,55)/10

			tw(p,d,{
				Position=UDim2.new(x,0,1.05,0)
			}):Play()

			task.wait(d)
		end
	end)
end

--------------------------------------------------
-- TOP
--------------------------------------------------

local Top=Instance.new("Frame")
Top.Name="Top"
Top.Size=UDim2.new(1,0,0,52)
Top.BackgroundTransparency=1
Top.Active=true
Top.ZIndex=10
Top.Parent=Main

local Title=Instance.new("TextLabel")
Title.Size=UDim2.new(1,-80,0,29)
Title.Position=UDim2.fromOffset(14,5)
Title.BackgroundTransparency=1
Title.Text="OP ADIVINE HUB"
Title.Font=Enum.Font.GothamBold
Title.TextSize=20
Title.TextColor3=Color3.new(1,1,1)
Title.TextXAlignment=Enum.TextXAlignment.Left
Title.ZIndex=11
Title.Parent=Top

local By=Instance.new("TextLabel")
By.Size=UDim2.new(1,-80,0,18)
By.Position=UDim2.fromOffset(15,28)
By.BackgroundTransparency=1
By.Text="by dremmser"
By.Font=Enum.Font.Garamond
By.TextSize=13
By.TextColor3=Color3.fromRGB(130,175,230)
By.TextXAlignment=Enum.TextXAlignment.Left
By.ZIndex=11
By.Parent=Top

local Min=Instance.new("TextButton")
Min.Size=UDim2.fromOffset(38,32)
Min.Position=UDim2.new(1,-46,0,9)
Min.BackgroundColor3=Color3.fromRGB(10,16,27)
Min.Text="-"
Min.Font=Enum.Font.GothamBold
Min.TextSize=22
Min.TextColor3=Color3.new(1,1,1)
Min.ZIndex=20
Min.Parent=Top

cr(Min,8)
st(Min,Color3.fromRGB(0,125,255),1)

--------------------------------------------------
-- TABS
--------------------------------------------------

local GameTab=Instance.new("TextButton")
GameTab.Size=UDim2.fromOffset(175,35)
GameTab.Position=UDim2.fromOffset(12,57)
GameTab.BackgroundColor3=Color3.fromRGB(0,85,170)
GameTab.Text="GAME"
GameTab.Font=Enum.Font.GothamBold
GameTab.TextSize=13
GameTab.TextColor3=Color3.new(1,1,1)
GameTab.ZIndex=10
GameTab.Parent=Main
cr(GameTab,8)

local ConfigTab=Instance.new("TextButton")
ConfigTab.Size=UDim2.fromOffset(175,35)
ConfigTab.Position=UDim2.fromOffset(203,57)
ConfigTab.BackgroundColor3=Color3.fromRGB(12,17,25)
ConfigTab.Text="CONFIGURATION"
ConfigTab.Font=Enum.Font.GothamBold
ConfigTab.TextSize=12
ConfigTab.TextColor3=Color3.fromRGB(145,155,170)
ConfigTab.ZIndex=10
ConfigTab.Parent=Main
cr(ConfigTab,8)

--------------------------------------------------
-- GAME PAGE
--------------------------------------------------

local GamePage=Instance.new("Frame")
GamePage.Size=UDim2.new(1,-24,0,245)
GamePage.Position=UDim2.fromOffset(12,100)
GamePage.BackgroundTransparency=1
GamePage.ZIndex=4
GamePage.Parent=Main

local Welcome=Instance.new("Frame")
Welcome.Size=UDim2.new(1,0,0,55)
Welcome.Position=UDim2.fromOffset(0,0)
Welcome.BackgroundColor3=Color3.fromRGB(10,17,28)
Welcome.BackgroundTransparency=.2
Welcome.ZIndex=4
Welcome.Parent=GamePage

cr(Welcome,10)
st(Welcome,Color3.fromRGB(0,95,220),1)

local Avatar=Instance.new("ImageLabel")
Avatar.Size=UDim2.fromOffset(43,43)
Avatar.Position=UDim2.fromOffset(7,6)
Avatar.BackgroundColor3=Color3.fromRGB(15,20,30)
Avatar.ZIndex=5
Avatar.Parent=Welcome

cr(Avatar,22)
st(Avatar,Color3.fromRGB(0,150,255),2)

pcall(function()
	Avatar.Image=Players:GetUserThumbnailAsync(
		Player.UserId,
		Enum.ThumbnailType.HeadShot,
		Enum.ThumbnailSize.Size100x100
	)
end)

local WelcomeText=Instance.new("TextLabel")
WelcomeText.Size=UDim2.new(1,-65,1,-10)
WelcomeText.Position=UDim2.fromOffset(60,5)
WelcomeText.BackgroundTransparency=1
WelcomeText.Text="Bienvenido, "..Player.DisplayName
WelcomeText.Font=Enum.Font.GothamMedium
WelcomeText.TextSize=15
WelcomeText.TextColor3=Color3.new(1,1,1)
WelcomeText.TextXAlignment=Enum.TextXAlignment.Left
WelcomeText.ZIndex=5
WelcomeText.Parent=Welcome

local Guess=Instance.new("TextButton")
Guess.Size=UDim2.new(1,0,0,42)
Guess.Position=UDim2.fromOffset(0,62)
Guess.BackgroundColor3=Color3.fromRGB(8,25,45)
Guess.Text="Adivinar Slapper"
Guess.Font=Enum.Font.GothamBold
Guess.TextSize=15
Guess.TextColor3=Color3.new(1,1,1)
Guess.ZIndex=5
Guess.Parent=GamePage

cr(Guess,10)
st(Guess,Color3.fromRGB(0,130,255),1.5)

local Auto=Instance.new("TextButton")
Auto.Size=UDim2.new(1,0,0,42)
Auto.Position=UDim2.fromOffset(0,111)
Auto.BackgroundColor3=Color3.fromRGB(12,16,23)
Auto.Text="Auto Slap     OFF"
Auto.Font=Enum.Font.GothamBold
Auto.TextSize=14
Auto.TextColor3=Color3.fromRGB(225,230,240)
Auto.ZIndex=5
Auto.Parent=GamePage

cr(Auto,10)

local AutoStroke=st(Auto,Color3.fromRGB(65,75,95),1.5)

local Info=Instance.new("TextLabel")
Info.Size=UDim2.new(1,0,0,55)
Info.Position=UDim2.fromOffset(0,164)
Info.BackgroundTransparency=1
Info.Text="FPS: -- | RAM: -- MB | Ping: -- ms\nX: --  Y: --  Z: --"
Info.Font=Enum.Font.Code
Info.TextSize=10
Info.TextColor3=Color3.fromRGB(140,155,175)
Info.TextXAlignment=Enum.TextXAlignment.Left
Info.TextYAlignment=Enum.TextYAlignment.Top
Info.ZIndex=5
Info.Parent=GamePage

--------------------------------------------------
-- CONFIG PAGE
--------------------------------------------------

local ConfigPage=Instance.new("Frame")
ConfigPage.Size=UDim2.new(1,-24,0,245)
ConfigPage.Position=UDim2.fromOffset(12,100)
ConfigPage.BackgroundTransparency=1
ConfigPage.Visible=false
ConfigPage.ZIndex=4
ConfigPage.Parent=Main

local Follow=Instance.new("TextLabel")
Follow.Size=UDim2.new(1,0,0,23)
Follow.Position=UDim2.fromOffset(0,0)
Follow.BackgroundTransparency=1
Follow.Text="Sígueme para más scripts"
Follow.Font=Enum.Font.GothamBold
Follow.TextSize=14
Follow.TextColor3=Color3.new(1,1,1)
Follow.ZIndex=5
Follow.Parent=ConfigPage

local Copy=Instance.new("TextButton")
Copy.Size=UDim2.new(1,0,0,34)
Copy.Position=UDim2.fromOffset(0,27)
Copy.BackgroundColor3=Color3.fromRGB(12,20,32)
Copy.Text="COPY"
Copy.Font=Enum.Font.GothamBold
Copy.TextSize=12
Copy.TextColor3=Color3.new(1,1,1)
Copy.ZIndex=5
Copy.Parent=ConfigPage
cr(Copy,8)
st(Copy,Color3.fromRGB(0,100,210),1)

--------------------------------------------------
-- THEME
--------------------------------------------------

local ThemeLabel=Instance.new("TextLabel")
ThemeLabel.Size=UDim2.new(1,-120,0,28)
ThemeLabel.Position=UDim2.fromOffset(0,68)
ThemeLabel.BackgroundTransparency=1
ThemeLabel.Text="Tema"
ThemeLabel.Font=Enum.Font.GothamBold
ThemeLabel.TextSize=14
ThemeLabel.TextColor3=Color3.new(1,1,1)
ThemeLabel.TextXAlignment=Enum.TextXAlignment.Left
ThemeLabel.ZIndex=5
ThemeLabel.Parent=ConfigPage

local ThemeButton=Instance.new("TextButton")
ThemeButton.Size=UDim2.fromOffset(100,30)
ThemeButton.Position=UDim2.new(1,-100,0,67)
ThemeButton.BackgroundColor3=Color3.fromRGB(15,22,32)
ThemeButton.Text="Oscuro  ▼"
ThemeButton.Font=Enum.Font.Gotham
ThemeButton.TextSize=11
ThemeButton.TextColor3=Color3.new(1,1,1)
ThemeButton.ZIndex=5
ThemeButton.Parent=ConfigPage
cr(ThemeButton,7)

local ThemeOptions=Instance.new("Frame")
ThemeOptions.Size=UDim2.fromOffset(125,72)
ThemeOptions.Position=UDim2.new(1,-125,0,99)
ThemeOptions.BackgroundColor3=Color3.fromRGB(8,12,18)
ThemeOptions.Visible=false
ThemeOptions.ZIndex=30
ThemeOptions.Parent=ConfigPage
cr(ThemeOptions,8)
st(ThemeOptions,Color3.fromRGB(0,125,255),1)

local Light=Instance.new("TextButton")
Light.Size=UDim2.new(1,-8,0,28)
Light.Position=UDim2.fromOffset(4,4)
Light.BackgroundColor3=Color3.fromRGB(35,40,48)
Light.Text="Claro"
Light.Font=Enum.Font.Gotham
Light.TextSize=11
Light.TextColor3=Color3.fromRGB(190,195,205)
Light.ZIndex=31
Light.Parent=ThemeOptions
cr(Light,6)

local Dark=Instance.new("TextButton")
Dark.Size=UDim2.new(1,-8,0,28)
Dark.Position=UDim2.fromOffset(4,39)
Dark.BackgroundColor3=Color3.fromRGB(75,80,90)
Dark.Text="Oscuro"
Dark.Font=Enum.Font.Gotham
Dark.TextSize=11
Dark.TextColor3=Color3.new(1,1,1)
Dark.ZIndex=31
Dark.Parent=ThemeOptions
cr(Dark,6)

local function ApplyTheme()
	if Theme=="Light" then
		Main.BackgroundColor3=Color3.fromRGB(225,228,235)
		ThemeButton.Text="Claro  ▼"
		Light.BackgroundColor3=Color3.fromRGB(85,90,100)
		Dark.BackgroundColor3=Color3.fromRGB(35,40,48)
		Title.TextColor3=Color3.fromRGB(20,22,28)
		By.TextColor3=Color3.fromRGB(60,100,155)
		Follow.TextColor3=Color3.fromRGB(20,22,28)
		ThemeLabel.TextColor3=Color3.fromRGB(20,22,28)
	else
		Main.BackgroundColor3=Color3.fromRGB(4,6,10)
		ThemeButton.Text="Oscuro  ▼"
		Light.BackgroundColor3=Color3.fromRGB(35,40,48)
		Dark.BackgroundColor3=Color3.fromRGB(85,90,100)
		Title.TextColor3=Color3.new(1,1,1)
		By.TextColor3=Color3.fromRGB(130,175,230)
		Follow.TextColor3=Color3.new(1,1,1)
		ThemeLabel.TextColor3=Color3.new(1,1,1)
	end
end

ThemeButton.MouseButton1Click:Connect(function()
	ThemeOptions.Visible=not ThemeOptions.Visible
end)

Light.MouseButton1Click:Connect(function()
	Theme="Light"
	ApplyTheme()
	ThemeOptions.Visible=false
end)

Dark.MouseButton1Click:Connect(function()
	Theme="Dark"
	ApplyTheme()
	ThemeOptions.Visible=false
end)

--------------------------------------------------
-- ANIMACIONES
--------------------------------------------------

local AnimLabel=Instance.new("TextLabel")
AnimLabel.Size=UDim2.new(1,-100,0,28)
AnimLabel.Position=UDim2.fromOffset(0,107)
AnimLabel.BackgroundTransparency=1
AnimLabel.Text="Animaciones"
AnimLabel.Font=Enum.Font.GothamBold
AnimLabel.TextSize=14
AnimLabel.TextColor3=Color3.new(1,1,1)
AnimLabel.TextXAlignment=Enum.TextXAlignment.Left
AnimLabel.ZIndex=5
AnimLabel.Parent=ConfigPage

local AnimToggle=Instance.new("TextButton")
AnimToggle.Size=UDim2.fromOffset(65,28)
AnimToggle.Position=UDim2.new(1,-65,0,107)
AnimToggle.BackgroundColor3=Color3.fromRGB(0,110,210)
AnimToggle.Text="ON"
AnimToggle.Font=Enum.Font.GothamBold
AnimToggle.TextSize=11
AnimToggle.TextColor3=Color3.new(1,1,1)
AnimToggle.ZIndex=5
AnimToggle.Parent=ConfigPage
cr(AnimToggle,14)

AnimToggle.MouseButton1Click:Connect(function()
	Animations=not Animations

	if Animations then
		AnimToggle.Text="ON"
		AnimToggle.BackgroundColor3=Color3.fromRGB(0,110,210)
	else
		AnimToggle.Text="OFF"
		AnimToggle.BackgroundColor3=Color3.fromRGB(60,65,75)
	end
end)

--------------------------------------------------
-- AUTOEJECUTAR
--------------------------------------------------

local ExecuteLabel=Instance.new("TextLabel")
ExecuteLabel.Size=UDim2.new(1,-100,0,28)
ExecuteLabel.Position=UDim2.fromOffset(0,143)
ExecuteLabel.BackgroundTransparency=1
ExecuteLabel.Text="Autoejecutar"
ExecuteLabel.Font=Enum.Font.GothamBold
ExecuteLabel.TextSize=14
ExecuteLabel.TextColor3=Color3.new(1,1,1)
ExecuteLabel.TextXAlignment=Enum.TextXAlignment.Left
ExecuteLabel.ZIndex=5
ExecuteLabel.Parent=ConfigPage

local ExecuteToggle=Instance.new("TextButton")
ExecuteToggle.Size=UDim2.fromOffset(65,28)
ExecuteToggle.Position=UDim2.new(1,-65,0,143)
ExecuteToggle.BackgroundColor3=Color3.fromRGB(0,110,210)
ExecuteToggle.Text="ON"
ExecuteToggle.Font=Enum.Font.GothamBold
ExecuteToggle.TextSize=11
ExecuteToggle.TextColor3=Color3.new(1,1,1)
ExecuteToggle.ZIndex=5
ExecuteToggle.Parent=ConfigPage
cr(ExecuteToggle,14)

ExecuteToggle.MouseButton1Click:Connect(function()
	AutoExecute=not AutoExecute

	if AutoExecute then
		ExecuteToggle.Text="ON"
		ExecuteToggle.BackgroundColor3=Color3.fromRGB(0,110,210)
	else
		ExecuteToggle.Text="OFF"
		ExecuteToggle.BackgroundColor3=Color3.fromRGB(60,65,75)
	end
end)

--------------------------------------------------
-- RESET
--------------------------------------------------

local Reset=Instance.new("TextButton")
Reset.Size=UDim2.new(.48,0,0,35)
Reset.Position=UDim2.fromOffset(0,179)
Reset.BackgroundColor3=Color3.fromRGB(35,40,50)
Reset.Text="Resetear Script"
Reset.Font=Enum.Font.GothamBold
Reset.TextSize=11
Reset.TextColor3=Color3.new(1,1,1)
Reset.ZIndex=5
Reset.Parent=ConfigPage
cr(Reset,8)

local ResetInfo=Instance.new("TextLabel")
ResetInfo.Size=UDim2.new(.48,0,0,35)
ResetInfo.Position=UDim2.new(.52,0,0,179)
ResetInfo.BackgroundTransparency=1
ResetInfo.Text="Usar en caso de que\nse bugee el script"
ResetInfo.Font=Enum.Font.Gotham
ResetInfo.TextSize=9
ResetInfo.TextColor3=Color3.fromRGB(130,140,155)
ResetInfo.ZIndex=5
ResetInfo.Parent=ConfigPage

--------------------------------------------------
-- EXIT
--------------------------------------------------

local Exit=Instance.new("TextButton")
Exit.Size=UDim2.new(1,0,0,28)
Exit.Position=UDim2.fromOffset(0,218)
Exit.BackgroundColor3=Color3.fromRGB(75,25,30)
Exit.Text="EXIT"
Exit.Font=Enum.Font.GothamBold
Exit.TextSize=11
Exit.TextColor3=Color3.new(1,1,1)
Exit.ZIndex=5
Exit.Parent=ConfigPage
cr(Exit,8)

--------------------------------------------------
-- CONFIRMACION EXIT
--------------------------------------------------

local Confirm=Instance.new("Frame")
Confirm.Size=UDim2.fromOffset(270,145)
Confirm.Position=UDim2.new(.5,-135,.5,-72)
Confirm.BackgroundColor3=Color3.fromRGB(5,8,14)
Confirm.Visible=false
Confirm.ZIndex=100
Confirm.Parent=GUI

cr(Confirm,14)
st(Confirm,Color3.fromRGB(0,125,255),2)

local ConfirmText=Instance.new("TextLabel")
ConfirmText.Size=UDim2.new(1,-20,0,55)
ConfirmText.Position=UDim2.fromOffset(10,12)
ConfirmText.BackgroundTransparency=1
ConfirmText.Text="¿Quieres salir del menú?"
ConfirmText.Font=Enum.Font.GothamBold
ConfirmText.TextSize=15
ConfirmText.TextColor3=Color3.new(1,1,1)
ConfirmText.ZIndex=101
ConfirmText.Parent=Confirm

local Yes=Instance.new("TextButton")
Yes.Size=UDim2.fromOffset(105,35)
Yes.Position=UDim2.fromOffset(20,90)
Yes.BackgroundColor3=Color3.fromRGB(125,35,40)
Yes.Text="SALIR"
Yes.Font=Enum.Font.GothamBold
Yes.TextSize=11
Yes.TextColor3=Color3.new(1,1,1)
Yes.ZIndex=101
Yes.Parent=Confirm
cr(Yes,8)

local No=Instance.new("TextButton")
No.Size=UDim2.fromOffset(105,35)
No.Position=UDim2.fromOffset(145,90)
No.BackgroundColor3=Color3.fromRGB(30,40,55)
No.Text="CANCELAR"
No.Font=Enum.Font.GothamBold
No.TextSize=11
No.TextColor3=Color3.new(1,1,1)
No.ZIndex=101
No.Parent=Confirm
cr(No,8)

Exit.MouseButton1Click:Connect(function()
	Confirm.Visible=true
end)

No.MouseButton1Click:Connect(function()
	Confirm.Visible=false
end)

Yes.MouseButton1Click:Connect(function()
	AutoSlap=false
	GUI:Destroy()
end)

--------------------------------------------------
-- COPY
--------------------------------------------------

Copy.MouseButton1Click:Connect(function()
	local ok=pcall(function()
		if setclipboard then
			setclipboard(PROFILE_URL)
		else
			error("clipboard unavailable")
		end
	end)

	if ok then
		Copy.Text="COPIED ✓"
	else
		Copy.Text="COPY NOT AVAILABLE"
	end

	task.delay(2,function()
		if Copy.Parent then
			Copy.Text="COPY"
		end
	end)
end)

--------------------------------------------------
-- TABS
--------------------------------------------------

GameTab.MouseButton1Click:Connect(function()
	GamePage.Visible=true
	ConfigPage.Visible=false

	GameTab.BackgroundColor3=Color3.fromRGB(0,85,170)
	GameTab.TextColor3=Color3.new(1,1,1)

	ConfigTab.BackgroundColor3=Color3.fromRGB(12,17,25)
	ConfigTab.TextColor3=Color3.fromRGB(145,155,170)
end)

ConfigTab.MouseButton1Click:Connect(function()
	GamePage.Visible=false
	ConfigPage.Visible=true

	ConfigTab.BackgroundColor3=Color3.fromRGB(0,85,170)
	ConfigTab.TextColor3=Color3.new(1,1,1)

	GameTab.BackgroundColor3=Color3.fromRGB(12,17,25)
	GameTab.TextColor3=Color3.fromRGB(145,155,170)
end)

--------------------------------------------------
-- SLAPPER
--------------------------------------------------

local LastAttacker=nil
local LastHealth=nil

local function findAttacker()
	local char=Player.Character
	if not char then return nil end

	local root=char:FindFirstChild("HumanoidRootPart")
	if not root then return nil end

	local closest=nil
	local dist=18

	for _,p in ipairs(Players:GetPlayers()) do
		if p~=Player and p.Character then
			local r=p.Character:FindFirstChild("HumanoidRootPart")

			if r then
				local d=(r.Position-root.Position).Magnitude

				if d<dist then
					dist=d
					closest=p
				end
			end
		end
	end

	return closest
end

local function connectCharacter(char)
	local hum=char:WaitForChild("Humanoid")
	LastHealth=hum.Health

	hum.HealthChanged:Connect(function(h)
		if h<LastHealth then
			local attacker=findAttacker()

			if attacker then
				LastAttacker=attacker
			end
		end

		LastHealth=h
	end)
end

if Player.Character then
	connectCharacter(Player.Character)
end

Player.CharacterAdded:Connect(function(char)
	LastAttacker=nil
	connectCharacter(char)
end)

--------------------------------------------------
-- RESULT
--------------------------------------------------

local Result=Instance.new("Frame")
Result.Size=UDim2.fromOffset(270,230)
Result.Position=UDim2.new(.5,-135,.5,-115)
Result.BackgroundColor3=Color3.fromRGB(4,7,13)
Result.Visible=false
Result.ZIndex=50
Result.Parent=GUI

cr(Result,15)
st(Result,Color3.fromRGB(0,150,255),3)

local ResultAvatar=Instance.new("ImageLabel")
ResultAvatar.Size=UDim2.fromOffset(115,115)
ResultAvatar.Position=UDim2.new(.5,-57,0,15)
ResultAvatar.BackgroundColor3=Color3.fromRGB(10,20,35)
ResultAvatar.ZIndex=51
ResultAvatar.Parent=Result

cr(ResultAvatar,58)
st(ResultAvatar,Color3.fromRGB(0,160,255),4)

local ResultName=Instance.new("TextLabel")
ResultName.Size=UDim2.new(1,-20,0,45)
ResultName.Position=UDim2.fromOffset(10,142)
ResultName.BackgroundTransparency=1
ResultName.Font=Enum.Font.GothamBold
ResultName.TextSize=18
ResultName.TextColor3=Color3.new(1,1,1)
ResultName.TextScaled=true
ResultName.ZIndex=51
ResultName.Parent=Result

local Close=Instance.new("TextButton")
Close.Size=UDim2.fromOffset(35,35)
Close.Position=UDim2.new(1,-42,0,6)
Close.BackgroundTransparency=1
Close.Text="×"
Close.Font=Enum.Font.GothamBold
Close.TextSize=25
Close.TextColor3=Color3.new(1,1,1)
Close.ZIndex=52
Close.Parent=Result

Close.MouseButton1Click:Connect(function()
	Result.Visible=false
end)

Guess.MouseButton1Click:Connect(function()
	local p=LastAttacker or findAttacker()

	if not p then
		return
	end

	pcall(function()
		ResultAvatar.Image=Players:GetUserThumbnailAsync(
			p.UserId,
			Enum.ThumbnailType.HeadShot,
			Enum.ThumbnailSize.Size420x420
		)
	end)

	ResultName.Text=p.DisplayName.."  @"..p.Name
	Result.Visible=true

	task.delay(7,function()
		if Result.Parent then
			Result.Visible=false
		end
	end)
end)

--------------------------------------------------
-- AUTO SLAP
--------------------------------------------------

local events=ReplicatedStorage:WaitForChild("events")
local SlapQueue=events:WaitForChild("SlapQueue")
local SendSlap=events:WaitForChild("SendSlap")

local SlapPower=.99927914142609
local QueueWaiting=false
local LastSlapTime=0
local SlapCooldown=.20

local function requestOneSlap()
	if not AutoSlap or QueueWaiting then
		return
	end

	QueueWaiting=true

	pcall(function()
		SlapQueue:FireServer()
	end)
end

local function sendOneSlap()
	if not AutoSlap or not QueueWaiting then
		return
	end

	QueueWaiting=false

	local now=os.clock()

	if now-LastSlapTime<SlapCooldown then
		return
	end

	LastSlapTime=now

	pcall(function()
		SendSlap:FireServer(SlapPower)
	end)
end

SlapQueue.OnClientEvent:Connect(function()
	sendOneSlap()
end)

Auto.MouseButton1Click:Connect(function()
	AutoSlap=not AutoSlap

	if AutoSlap then
		Auto.Text="Auto Slap     ON"
		Auto.BackgroundColor3=Color3.fromRGB(5,45,25)
		AutoStroke.Color=Color3.fromRGB(30,220,100)
		requestOneSlap()
	else
		Auto.Text="Auto Slap     OFF"
		Auto.BackgroundColor3=Color3.fromRGB(12,16,23)
		AutoStroke.Color=Color3.fromRGB(65,75,95)
		QueueWaiting=false
	end
end)

--------------------------------------------------
-- DRAG
--------------------------------------------------

local dragging=false
local dragStart
local startPos

Top.InputBegan:Connect(function(input)
	if input.UserInputType==Enum.UserInputType.Touch
	or input.UserInputType==Enum.UserInputType.MouseButton1 then

		dragging=true
		dragStart=input.Position
		startPos=Main.Position
	end
end)

UserInputService.InputChanged:Connect(function(input)
	if not dragging then return end

	if input.UserInputType==Enum.UserInputType.Touch
	or input.UserInputType==Enum.UserInputType.MouseMovement 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)

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

--------------------------------------------------
-- MINIMIZAR
--------------------------------------------------

local minimized=false
local normalSize=UDim2.fromOffset(390,350)

local function setBody(v)
	GameTab.Visible=v
	ConfigTab.Visible=v

	if not v then
		GamePage.Visible=false
		ConfigPage.Visible=false
	else
		if ConfigPage.Visible then
			ConfigPage.Visible=true
		else
			GamePage.Visible=true
		end
	end
end

Min.MouseButton1Click:Connect(function()
	minimized=not minimized

	if minimized then
		Min.Text="□"
		setBody(false)

		if Animations then
			tw(Main,.25,{Size=UDim2.fromOffset(300,52)}):Play()
		else
			Main.Size=UDim2.fromOffset(300,52)
		end
	else
		Min.Text="-"

		if Animations then
			tw(Main,.25,{Size=normalSize}):Play()
		else
			Main.Size=normalSize
		end

		setBody(true)
	end
end)

--------------------------------------------------
-- FPS RAM PING COORDENADAS
--------------------------------------------------

local frames=0
local fps=0
local lastTime=os.clock()
local statTimer=0

RunService.RenderStepped:Connect(function(dt)
	frames+=1

	local now=os.clock()

	if now-lastTime>=.5 then
		fps=math.floor(frames/(now-lastTime))
		frames=0
		lastTime=now
	end

	statTimer+=dt

	if statTimer>=.15 then
		statTimer=0

		local ping=math.floor(Player:GetNetworkPing()*1000+.5)
		local ram=math.floor(StatsService:GetTotalMemoryUsageMb())

		local char=Player.Character
		local root=char and char:FindFirstChild("HumanoidRootPart")

		if root then
			local p=root.Position

			Info.Text=string.format(
				"FPS: %d | RAM: %d MB | Ping: %d ms\nX: %.1f  Y: %.1f  Z: %.1f",
				fps,
				ram,
				ping,
				p.X,
				p.Y,
				p.Z
			)
		else
			Info.Text=string.format(
				"FPS: %d | RAM: %d MB | Ping: %d ms\nX: --  Y: --  Z: --",
				fps,
				ram,
				ping
			)
		end
	end
end)

--------------------------------------------------
-- NOTIFICACION 15 MINUTOS
--------------------------------------------------

local Notice=Instance.new("Frame")
Notice.Size=UDim2.fromOffset(330,82)
Notice.Position=UDim2.new(.5,-165,0,-100)
Notice.BackgroundColor3=Color3.fromRGB(5,8,14)
Notice.Visible=false
Notice.ZIndex=200
Notice.Parent=GUI

cr(Notice,12)
st(Notice,Color3.fromRGB(0,125,255),2)

local NoticeText=Instance.new("TextLabel")
NoticeText.Size=UDim2.new(1,-18,1,-10)
NoticeText.Position=UDim2.fromOffset(9,5)
NoticeText.BackgroundTransparency=1
NoticeText.Text="te gusta nuestro menú,\n¡nos alegra cada momento que nos usas ♡♡!"
NoticeText.Font=Enum.Font.GothamBold
NoticeText.TextSize=12
NoticeText.TextWrapped=true
NoticeText.TextColor3=Color3.new(1,1,1)
NoticeText.ZIndex=201
NoticeText.Parent=Notice

local NoticeSound=Instance.new("Sound")
NoticeSound.SoundId="rbxassetid://9118823101"
NoticeSound.Volume=.35
NoticeSound.Parent=SoundService

local function showNotice()
	if not GUI.Parent then return end

	Notice.Visible=true

	if Animations then
		tw(Notice,.35,{
			Position=UDim2.new(.5,-165,0,18)
		}):Play()
	else
		Notice.Position=UDim2.new(.5,-165,0,18)
	end

	pcall(function()
		NoticeSound:Play()
	end)

	task.wait(7)

	if Notice.Parent then
		if Animations then
			local t=tw(Notice,.35,{
				Position=UDim2.new(.5,-165,0,-100)
			})

			t:Play()
			t.Completed:Wait()
		else
			Notice.Position=UDim2.new(.5,-165,0,-100)
		end

		Notice.Visible=false
	end
end

task.spawn(function()
	while GUI.Parent do
		task.wait(900)

		if GUI.Parent then
			task.spawn(showNotice)
		end
	end
end)

--------------------------------------------------
-- RESET SCRIPT
--------------------------------------------------

Reset.MouseButton1Click:Connect(function()
	AutoSlap=false
	QueueWaiting=false
	LastAttacker=nil

	Reset.Text="REINICIANDO..."

	task.wait(.25)

	if GUI then
		GUI:Destroy()
	end

	task.wait(.25)

	-- El LocalScript se vuelve a ejecutar al recrearse desde
	-- StarterPlayerScripts/StarterGui en el siguiente inicio.
end)

--------------------------------------------------
-- FADE IN
--------------------------------------------------

Main.BackgroundTransparency=1
MainStroke.Transparency=1

for _,o in ipairs(Main:GetDescendants()) do
	if o:IsA("TextLabel") or o:IsA("TextButton") then
		o.TextTransparency=1
	elseif o:IsA("ImageLabel") then
		o.ImageTransparency=1
	end
end

if Animations then
	tw(Main,1,{BackgroundTransparency=.12}):Play()
	tw(MainStroke,1,{Transparency=0}):Play()

	for _,o in ipairs(Main:GetDescendants()) do
		if o:IsA("TextLabel") or o:IsA("TextButton") then
			tw(o,1,{TextTransparency=0}):Play()
		elseif o:IsA("ImageLabel") then
			tw(o,1,{ImageTransparency=0}):Play()
		end
	end
else
	Main.BackgroundTransparency=.12
	MainStroke.Transparency=0

	for _,o in ipairs(Main:GetDescendants()) do
		if o:IsA("TextLabel") or o:IsA("TextButton") then
			o.TextTransparency=0
		elseif o:IsA("ImageLabel") then
			o.ImageTransparency=0
		end
	end
end

ApplyTheme()