local Players = game:GetService("Players")
local Lighting = game:GetService("Lighting")
local player = Players.LocalPlayer
local playerGui = player:WaitForChild("PlayerGui")

-- Clear old GUI if exists
local oldGui = playerGui:FindFirstChild("popularfy")
if oldGui then oldGui:Destroy() end

-- Create ScreenGui
local gui = Instance.new("ScreenGui")
gui.Name = "popularfy"
gui.ResetOnSpawn = false
gui.Parent = playerGui

-- Main Frame
local frame = Instance.new("Frame")
frame.Size = UDim2.new(0, 320, 0, 220)
frame.Position = UDim2.new(0.5, -160, 0.5, -110)
frame.BackgroundColor3 = Color3.fromRGB(0, 0, 0)  -- Black
frame.BorderColor3 = Color3.fromRGB(255, 0, 0)    -- Red border
frame.BorderSizePixel = 3
frame.AnchorPoint = Vector2.new(0.5, 0.5)
frame.Parent = gui

-- Title Label
local title = Instance.new("TextLabel")
title.Size = UDim2.new(1, 0, 0, 40)
title.BackgroundTransparency = 1
title.Text = "popularfy"
title.TextColor3 = Color3.fromRGB(255, 255, 255) -- White text
title.Font = Enum.Font.GothamBold
title.TextSize = 28
title.Parent = frame

-- Activate Button
local activateBtn = Instance.new("TextButton")
activateBtn.Size = UDim2.new(0, 280, 0, 60)
activateBtn.Position = UDim2.new(0.5, -140, 0, 50)
activateBtn.BackgroundColor3 = Color3.fromRGB(0, 0, 0)  -- Black
activateBtn.BorderColor3 = Color3.fromRGB(255, 0, 0)    -- Red border
activateBtn.BorderSizePixel = 2
activateBtn.Font = Enum.Font.GothamBold
activateBtn.TextSize = 22
activateBtn.TextColor3 = Color3.fromRGB(255, 255, 255) -- White text
activateBtn.Text = "Activate popularfy"
activateBtn.Parent = frame

-- Exit Game Button
local exitBtn = Instance.new("TextButton")
exitBtn.Size = UDim2.new(0, 280, 0, 40)
exitBtn.Position = UDim2.new(0.5, -140, 0, 130)
exitBtn.BackgroundColor3 = Color3.fromRGB(0, 0, 0) -- Black
exitBtn.BorderColor3 = Color3.fromRGB(255, 0, 0)   -- Red border
exitBtn.BorderSizePixel = 2
exitBtn.Font = Enum.Font.GothamBold
exitBtn.TextSize = 18
exitBtn.TextColor3 = Color3.fromRGB(255, 255, 255) -- White text
exitBtn.Text = "Exit Game"
exitBtn.Parent = frame

-- Fake Server Hint Label at top
local serverHint = Instance.new("TextLabel")
serverHint.Size = UDim2.new(1, 0, 0, 40)
serverHint.Position = UDim2.new(0, 0, 0, 0)
serverHint.BackgroundColor3 = Color3.new(0, 0, 0)
serverHint.BackgroundTransparency = 0.8
serverHint.TextColor3 = Color3.new(1, 1, 1)
serverHint.Font = Enum.Font.GothamBold
serverHint.TextSize = 22
serverHint.Text = "Join team popularkidd today!!"
serverHint.Parent = gui

-- Animate server hint scrolling horizontally in a loop
coroutine.wrap(function()
    while true do
        for x = -serverHint.TextBounds.X, gui.AbsoluteSize.X + serverHint.TextBounds.X, 4 do
            serverHint.Position = UDim2.new(0, gui.AbsoluteSize.X - x, 0, 0)
            task.wait(0.02)
        end
    end
end)()

local decalId = "121309010086801"
local musicId = "9515602872944"

-- Apply decal to all faces of a BasePart
local function applyDecalToPart(part)
    for _, child in ipairs(part:GetChildren()) do
        if child:IsA("Decal") or child:IsA("Texture") then
            child:Destroy()
        end
    end
    for _, face in ipairs(Enum.NormalId:GetEnumItems()) do
        local decal = Instance.new("Decal")
        decal.Face = face
        decal.Texture = "rbxassetid://" .. decalId
        decal.Parent = part
    end
end

-- Adds a variety of 2016-style particles to a part
local function addVintageParticles(part)
    -- Clear old ParticleEmitters
    for _, child in ipairs(part:GetChildren()) do
        if child:IsA("ParticleEmitter") then
            child:Destroy()
        end
    end

    -- ParticleEmitter 1 - classic sparkles-like
    local p1 = Instance.new("ParticleEmitter")
    p1.Texture = "rbxassetid://121309010086801" -- classic sparkle particle
    p1.Rate = 30
    p1.Lifetime = NumberRange.new(1, 2)
    p1.Speed = NumberRange.new(0, 1)
    p1.Size = NumberSequence.new(0.7)
    p1.Rotation = NumberRange.new(0, 360)
    p1.RotSpeed = NumberRange.new(-60, 60)
    p1.LightEmission = 0.8
    p1.Parent = part

    -- ParticleEmitter 2 - smoke puff
    local p2 = Instance.new("ParticleEmitter")
    p2.Texture = "rbxassetid://26356462" -- smoke texture
    p2.Rate = 15
    p2.Lifetime = NumberRange.new(2, 3)
    p2.Speed = NumberRange.new(0.5, 1)
    p2.Size = NumberSequence.new({NumberSequenceKeypoint.new(0,1), NumberSequenceKeypoint.new(1,0)})
    p2.Rotation = NumberRange.new(0, 360)
    p2.RotSpeed = NumberRange.new(-10, 10)
    p2.LightEmission = 0.3
    p2.Transparency = NumberSequence.new(0.5)
    p2.Parent = part

    -- ParticleEmitter 3 - stars
    local p3 = Instance.new("ParticleEmitter")
    p3.Texture = "rbxassetid://121309010086801" -- star sparkle texture
    p3.Rate = 25
    p3.Lifetime = NumberRange.new(0.8, 1.5)
    p3.Speed = NumberRange.new(0, 1.2)
    p3.Size = NumberSequence.new(0.5)
    p3.Rotation = NumberRange.new(0, 360)
    p3.RotSpeed = NumberRange.new(-80, 80)
    p3.LightEmission = 0.7
    p3.Parent = part

    -- ParticleEmitter 4 - glowing orb dots
    local p4 = Instance.new("ParticleEmitter")
    p4.Texture = "rbxassetid://121309010086801" -- glowing orb texture
    p4.Rate = 20
    p4.Lifetime = NumberRange.new(1.2, 2.2)
    p4.Speed = NumberRange.new(0.2, 0.6)
    p4.Size = NumberSequence.new(0.6)
    p4.LightEmission = 0.9
    p4.Transparency = NumberSequence.new(0.2)
    p4.Parent = part
end

-- Change skybox to decalId
local function changeSkybox()
    for _, child in ipairs(Lighting:GetChildren()) do
        if child:IsA("Sky") then
            child:Destroy()
        end
    end
    local sky = Instance.new("Sky")
    sky.SkyboxBk = "rbxassetid://" .. decalId
    sky.SkyboxDn = "rbxassetid://" .. decalId
    sky.SkyboxFt = "rbxassetid://" .. decalId
    sky.SkyboxLf = "rbxassetid://" .. decalId
    sky.SkyboxRt = "rbxassetid://" .. decalId
    sky.SkyboxUp = "rbxassetid://" .. decalId
    sky.Parent = Lighting
end

-- Play looping music pitched to 0.2
local function playMusic()
    local sound = Instance.new("Sound", workspace)
    sound.SoundId = "rbxassetid://" .. musicId
    sound.PlaybackSpeed = 0.2
    sound.Volume = 0.7
    sound.Looped = true
    sound:Play()
    player.CharacterRemoving:Connect(function()
        sound:Destroy()
    end)
end

-- Spam 2017 Admin Notice and Server Hint functions
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local chatEvents = ReplicatedStorage:FindFirstChild("DefaultChatSystemChatEvents")

local function spamAdminNotice()
    if chatEvents then
        local sayMsg = chatEvents:FindFirstChild("SayMessageRequest")
        if sayMsg then
            for i = 1, 10 do
                sayMsg:FireServer("[Admin Notice]: Join team popularkidd today!!", "All")
                task.wait(0.5)
            end
        end
    end
end

local function spamServerHint()
    for i = 1, 10 do
        pcall(function()
            playerGui:SetCore("ChatMakeSystemMessage", {
                Text = "join team popularkidd today!!",
                Color = Color3.fromRGB(255, 50, 150),
                Font = Enum.Font.GothamBold,
                FontSize = Enum.FontSize.Size24,
            })
        end)
        task.wait(1)
    end
end

-- Main activation function
local function activatePopularfy()
    changeSkybox()

    for _, part in ipairs(workspace:GetDescendants()) do
        if part:IsA("BasePart") then
            applyDecalToPart(part)
            addVintageParticles(part)
        end
    end

    for _, plr in ipairs(Players:GetPlayers()) do
        if plr.Character then
            for _, part in ipairs(plr.Character:GetChildren()) do
                if part:IsA("BasePart") then
                    applyDecalToPart(part)
                    addVintageParticles(part)
                end
            end
        end
    end

    playMusic()

    task.spawn(spamAdminNotice)
    task.spawn(spamServerHint)
end

activateBtn.MouseButton1Click:Connect(function()
    activateBtn.Text = "Activating..."
    activateBtn.Active = false
    activatePopularfy()
    activateBtn.Text = "Activated!"
    task.wait(3)
    activateBtn.Text = "Activate popularfy"
    activateBtn.Active = true
end)

exitBtn.MouseButton1Click:Connect(function()
    player:Kick("Team popularkidd join today!!")
end)