local Players=game:GetService("Players")
local ReplicatedStorage=game:GetService("ReplicatedStorage")
local TweenService=game:GetService("TweenService")
local UserInputService=game:GetService("UserInputService")

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

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

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 intro=Instance.new("Frame")
intro.Size=UDim2.fromScale(1,1)
intro.BackgroundColor3=Color3.new(0,0,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()

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)

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

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.AutoButtonColor=true
Min.Active=true
Min.ZIndex=20
Min.Parent=Top

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

local Welcome=Instance.new("Frame")
Welcome.Size=UDim2.new(1,-24,0,60)
Welcome.Position=UDim2.fromOffset(12,57)
Welcome.BackgroundColor3=Color3.fromRGB(10,17,28)
Welcome.BackgroundTransparency=.2
Welcome.ZIndex=3
Welcome.Parent=Main

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

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

cr(Avatar,23)
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,-72,1,-10)
WelcomeText.Position=UDim2.fromOffset(68,5)
WelcomeText.BackgroundTransparency=1
WelcomeText.Text="Bienvenido, "..Player.DisplayName
WelcomeText.Font=Enum.Font.GothamMedium
WelcomeText.TextSize=16
WelcomeText.TextColor3=Color3.new(1,1,1)
WelcomeText.TextXAlignment=Enum.TextXAlignment.Left
WelcomeText.ZIndex=4
WelcomeText.Parent=Welcome

local Guess=Instance.new("TextButton")
Guess.Size=UDim2.new(1,-24,0,45)
Guess.Position=UDim2.fromOffset(12,125)
Guess.BackgroundColor3=Color3.fromRGB(8,25,45)
Guess.Text="Adivinar el Slapper"
Guess.Font=Enum.Font.GothamBold
Guess.TextSize=16
Guess.TextColor3=Color3.new(1,1,1)
Guess.Active=true
Guess.ZIndex=4
Guess.Parent=Main

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

local Auto=Instance.new("TextButton")
Auto.Size=UDim2.new(1,-24,0,45)
Auto.Position=UDim2.fromOffset(12,177)
Auto.BackgroundColor3=Color3.fromRGB(12,16,23)
Auto.Text="Auto Slap     OFF"
Auto.Font=Enum.Font.GothamBold
Auto.TextSize=15
Auto.TextColor3=Color3.fromRGB(225,230,240)
Auto.Active=true
Auto.ZIndex=4
Auto.Parent=Main

cr(Auto,10)

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

local Recommendation=Instance.new("TextLabel")
Recommendation.Size=UDim2.new(1,-30,0,28)
Recommendation.Position=UDim2.fromOffset(15,222)
Recommendation.BackgroundTransparency=1
Recommendation.Text="Se recomienda sólo usar cuando vayas a bofetear"
Recommendation.Font=Enum.Font.Gotham
Recommendation.TextSize=12
Recommendation.TextColor3=Color3.fromRGB(125,140,160)
Recommendation.TextWrapped=true
Recommendation.TextXAlignment=Enum.TextXAlignment.Center
Recommendation.ZIndex=4
Recommendation.Parent=Main

local Status=Instance.new("TextLabel")
Status.Size=UDim2.new(1,-24,0,32)
Status.Position=UDim2.fromOffset(12,255)
Status.BackgroundTransparency=1
Status.Text="Esperando un golpe..."
Status.Font=Enum.Font.Gotham
Status.TextSize=14
Status.TextColor3=Color3.fromRGB(155,170,190)
Status.ZIndex=4
Status.Parent=Main

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.Active=true
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=19
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)

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
				Status.Text="Último atacante: "..attacker.DisplayName
			else
				Status.Text="Daño detectado"
			end
		end

		LastHealth=h
	end)
end

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

Player.CharacterAdded:Connect(function(char)
	LastAttacker=nil
	Status.Text="Esperando un golpe..."
	connectCharacter(char)
end)

Guess.MouseButton1Click:Connect(function()
	if not LastAttacker or not LastAttacker.Parent then
		Status.Text="No se pudo identificar al Slapper"
		return
	end

	local p=LastAttacker

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

	ResultName.Text=p.DisplayName.."  @"..p.Name
	ResultAvatar.ImageTransparency=0
	ResultName.TextTransparency=0
	Result.Visible=true

	task.delay(7,function()
		if Result.Visible then
			tw(ResultAvatar,1,{ImageTransparency=1}):Play()
			tw(ResultName,1,{TextTransparency=1}):Play()
		end
	end)
end)

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

local AutoSlap=false
local SlapPower=0.99927914142609
local QueueWaiting=false
local LastSlapTime=0
local SlapCooldown=0.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)

	Status.Text="👋 Auto Slap ejecutado"
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)
		Status.Text="Auto Slap activado"

		requestOneSlap()
	else
		Auto.Text="Auto Slap     OFF"
		Auto.BackgroundColor3=Color3.fromRGB(12,16,23)
		AutoStroke.Color=Color3.fromRGB(65,75,95)
		Status.Text="Auto Slap desactivado"

		QueueWaiting=false
	end
end)

local dragging=false
local dragStart=nil
local startPos=nil

local function startDrag(input)
	if input.UserInputType~=Enum.UserInputType.Touch
		and input.UserInputType~=Enum.UserInputType.MouseButton1 then
		return
	end

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

local function stopDrag(input)
	if input.UserInputType==Enum.UserInputType.Touch
		or input.UserInputType==Enum.UserInputType.MouseButton1 then
		dragging=false
	end
end

Top.InputBegan:Connect(startDrag)
Top.InputEnded:Connect(stopDrag)

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

	if input.UserInputType~=Enum.UserInputType.Touch
		and input.UserInputType~=Enum.UserInputType.MouseMovement then
		return
	end

	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)

UserInputService.InputEnded:Connect(stopDrag)

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

local function setVisible(value)
	Welcome.Visible=value
	Guess.Visible=value
	Auto.Visible=value
	Recommendation.Visible=value
	Status.Visible=value
	By.Visible=value
end

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

	if minimized then
		Min.Text="□"
		Main.Size=UDim2.fromOffset(300,52)

		setVisible(false)

		Title.Position=UDim2.fromOffset(12,9)
		Title.Size=UDim2.new(1,-60,0,29)
	else
		Min.Text="-"
		Main.Size=normalSize

		setVisible(true)

		Title.Position=UDim2.fromOffset(14,5)
		Title.Size=UDim2.new(1,-80,0,29)
	end
end)

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

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