-- VIHAAN SPAMMER (Instant Large Rainbow UI + Custom Spammer Button)
local ScreenGui = Instance.new("ScreenGui")
local IntroFrame = Instance.new("Frame")
local IntroText = Instance.new("TextLabel") 
local DevilImg = Instance.new("ImageLabel") 
local MainFrame = Instance.new("ImageLabel") 
local MainStroke = Instance.new("UIStroke") 
local Title = Instance.new("TextLabel")
local Credits = Instance.new("TextLabel") 
local ChatInput = Instance.new("TextBox")
local DelayInput = Instance.new("TextBox")
local DelayLabel = Instance.new("TextLabel")
local StartBtn = Instance.new("TextButton")
local StartBtnStroke = Instance.new("UIStroke") 
local StartBtnCorner = Instance.new("UICorner")
local CloseBtn = Instance.new("TextButton")
local MainCorner = Instance.new("UICorner")

-- New Label Component below the Start Button
local UserStatusLabel = Instance.new("TextLabel")

-- Header Minimize Button (Next to X)
local HeaderMinBtn = Instance.new("TextButton")

-- Thin Rectangular Minimized Bar Components
local MinimizedBar = Instance.new("TextButton")
local BarCorner = Instance.new("UICorner")
local BarStroke = Instance.new("UIStroke")

-- Warning Dialog Window Components
local WarningFrame = Instance.new("Frame")
local WarningCorner = Instance.new("UICorner")
local WarningStroke = Instance.new("UIStroke")
local WarningText = Instance.new("TextLabel")
local ConfirmCloseBtn = Instance.new("TextButton")
local ConfirmCloseCorner = Instance.new("UICorner")
local CancelOpenBtn = Instance.new("TextButton")
local CancelOpenCorner = Instance.new("UICorner")

-- Setup Root UI Container
ScreenGui.Parent = game.CoreGui
ScreenGui.Name = "VihaanSpammerHub"
ScreenGui.ResetOnSpawn = false

-----------------------------------------
-- INSTANT PUBLIC CHAT ANNOUNCEMENT
-----------------------------------------
task.spawn(function()
    local joinMessage = "VIHAAN SPAMMER LOADED🔪"
    local chatService = game:GetService("TextChatService")
    if chatService.ChatVersion == Enum.ChatVersion.TextChatService then
        chatService.TextChannels.RBXGeneral:SendAsync(joinMessage)
    else
        game:GetService("ReplicatedStorage").DefaultChatSystemChatEvents.SayMessageRequest:FireServer(joinMessage, "All")
    end
end)

-----------------------------------------
-- PART 1: MAIN CONTROLLER PANEL (BLACK + GLITCH TV + RAINBOW BORDER)
-----------------------------------------
MainFrame.Name = "MainFrame"
MainFrame.Parent = ScreenGui
MainFrame.Position = UDim2.new(0.5, -275, 0.5, -200) 
MainFrame.Size = UDim2.new(0, 550, 0, 400) 
MainFrame.Active = true
MainFrame.Draggable = true
MainFrame.Visible = true 
MainFrame.BackgroundColor3 = Color3.fromRGB(15, 15, 15) 

-- Glitch / Cracked TV Overlay Configuration
MainFrame.Image = "rbxassetid://10849912140" 
MainFrame.ScaleType = Enum.ScaleType.Crop 
MainFrame.ImageTransparency = 0.55 

MainCorner.Parent = MainFrame
MainCorner.CornerRadius = UDim.new(0, 14)

-- Border Settings (For Rainbow effect)
MainStroke.Parent = MainFrame
MainStroke.Thickness = 4
MainStroke.ApplyStrokeMode = Enum.ApplyStrokeMode.Border

-- MAIN TITLE: Configured with Bloody Font & Crimson Red Color
Title.Name = "Title"
Title.Parent = MainFrame
Title.BackgroundTransparency = 1
Title.Size = UDim2.new(1, -100, 0, 45) 
Title.Position = UDim2.new(0, 10, 0, 10)
Title.Font = Enum.Font.Creepster
if Title.Font == nil then Title.Font = Enum.Font.SourceSansBold end 
Title.Text = "⚡ VIHAAN SPAMMER ⚡"
Title.TextColor3 = Color3.fromRGB(200, 0, 0) 
Title.TextSize = 34
Title.TextXAlignment = Enum.TextXAlignment.Left

Credits.Name = "Credits"
Credits.Parent = MainFrame
Credits.BackgroundTransparency = 1
Credits.Size = UDim2.new(1, 0, 0, 25)
Credits.Position = UDim2.new(0, 0, 0, 50) 
Credits.Font = Enum.Font.Code 
Credits.Text = "MADE BY - CTX_VIHAAN"
Credits.TextSize = 16

ChatInput.Name = "ChatInput"
ChatInput.Parent = MainFrame
ChatInput.BackgroundColor3 = Color3.fromRGB(25, 25, 30)
ChatInput.BackgroundTransparency = 0.1
ChatInput.Position = UDim2.new(0.05, 0, 0.26, 0) 
ChatInput.Size = UDim2.new(0.9, 0, 0, 55) 
ChatInput.Font = Enum.Font.SourceSans
ChatInput.PlaceholderText = "Add extra words (Optional)..."
ChatInput.Text = ""
ChatInput.TextColor3 = Color3.fromRGB(255, 255, 255)
ChatInput.TextSize = 20

-- DELAY LABEL: Configured with Bloody Font & Crimson Red Color
DelayLabel.Name = "DelayLabel"
DelayLabel.Parent = MainFrame
DelayLabel.BackgroundTransparency = 1
DelayLabel.Position = UDim2.new(0.05, 0, 0.47, 0)
DelayLabel.Size = UDim2.new(0.5, 0, 0, 40)
DelayLabel.Font = Enum.Font.Creepster
if DelayLabel.Font == nil then DelayLabel.Font = Enum.Font.SourceSansBold end 
DelayLabel.Text = "Spam Delay (Seconds):"
DelayLabel.TextColor3 = Color3.fromRGB(180, 0, 0) 
DelayLabel.TextSize = 24
DelayLabel.TextXAlignment = Enum.TextXAlignment.Left

DelayInput.Name = "DelayInput"
DelayInput.Parent = MainFrame
DelayInput.BackgroundColor3 = Color3.fromRGB(25, 25, 30)
DelayInput.BackgroundTransparency = 0.1
DelayInput.Position = UDim2.new(0.65, 0, 0.47, 0)
DelayInput.Size = UDim2.new(0.3, 0, 0, 40) 
DelayInput.Font = Enum.Font.SourceSans
DelayInput.Text = "1.5"
DelayInput.TextColor3 = Color3.fromRGB(0, 255, 255)
DelayInput.TextSize = 22

local spamming = false
local systemActive = true

-----------------------------------------
-- CUSTOM SPAMMER BUTTON INTERFACE
-----------------------------------------
StartBtn.Name = "StartBtn"
StartBtn.Parent = MainFrame
StartBtn.BackgroundColor3 = Color3.fromRGB(110, 0, 0) 
StartBtn.Position = UDim2.new(0.05, 0, 0.65, 0) -- Shifted up slightly to fit status label below perfectly
StartBtn.Size = UDim2.new(0.9, 0, 0, 55) 
StartBtn.Font = Enum.Font.Creepster 
if StartBtn.Font == nil then StartBtn.Font = Enum.Font.GothamBold end 
StartBtn.Text = "💢 START DEMONIC CHAOS 💢" 
StartBtn.TextColor3 = Color3.fromRGB(0, 0, 0) 
StartBtn.TextSize = 28

StartBtnCorner.Parent = StartBtn
StartBtnCorner.CornerRadius = UDim.new(0, 6) 

StartBtnStroke.Parent = StartBtn
StartBtnStroke.Thickness = 3
StartBtnStroke.Color = Color3.fromRGB(255, 30, 30) 
StartBtnStroke.ApplyStrokeMode = Enum.ApplyStrokeMode.Border

-- NEW STATUS LABEL PLACEMENT: Below the Main Action Button
UserStatusLabel.Name = "UserStatusLabel"
UserStatusLabel.Parent = MainFrame
UserStatusLabel.BackgroundTransparency = 1
UserStatusLabel.Position = UDim2.new(0.05, 0, 0.82, 0)
UserStatusLabel.Size = UDim2.new(0.9, 0, 0, 45)
UserStatusLabel.Font = Enum.Font.Creepster
if UserStatusLabel.Font == nil then UserStatusLabel.Font = Enum.Font.SourceSansBold end
UserStatusLabel.Text = "⚔️VIHAAN SPAM USER⚔️"
UserStatusLabel.TextSize = 30
UserStatusLabel.TextYAlignment = Enum.TextYAlignment.Center

StartBtn.MouseButton1Click:Connect(function()
    spamming = not spamming
    if spamming then
        StartBtn.Text = "💢 STOP DEMONIC CHAOS 💢" 
        StartBtn.BackgroundColor3 = Color3.fromRGB(20, 0, 0) 
        StartBtn.TextColor3 = Color3.fromRGB(255, 0, 0)      
        StartBtnStroke.Color = Color3.fromRGB(255, 255, 255)  
        
        task.spawn(function()
            while spamming do
                local extraText = ChatInput.Text
                local basePattern = "@_@_@_@_@_@_@_@_@_@_@_@_@_@_@_@_@_@_@_@_@_@_@_@_@_@_@_@_@_@_@_@_@_@_@_@_@_@_@_@_@_@_@_@_@_@_@_@_@_@_VIHAAN ON TOP😈"
                
                local finalMessage = basePattern
                if extraText ~= "" then
                    finalMessage = basePattern .. " " .. extraText
                end
                
                local delayTime = tonumber(DelayInput.Text) or 1.5
                if delayTime < 0.1 then delayTime = 0.1 end 
                
                local chatService = game:GetService("TextChatService")
                if chatService.ChatVersion == Enum.ChatVersion.TextChatService then
                    chatService.TextChannels.RBXGeneral:SendAsync(finalMessage)
                else
                    game:GetService("ReplicatedStorage").DefaultChatSystemChatEvents.SayMessageRequest:FireServer(finalMessage, "All")
                end
                
                task.wait(delayTime)
            end
        end)
    else
        StartBtn.Text = "💢 START DEMONIC CHAOS 💢" 
        StartBtn.BackgroundColor3 = Color3.fromRGB(110, 0, 0)
        StartBtn.TextColor3 = Color3.fromRGB(0, 0, 0)
        StartBtnStroke.Color = Color3.fromRGB(255, 30, 30)
    end
end)

-----------------------------------------
-- PART 2: BLACK CINEMATIC INTRO + DEVIL SMILE & BLOODY TEXT
-----------------------------------------
IntroFrame.Name = "IntroFrame"
IntroFrame.Parent = ScreenGui
IntroFrame.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
IntroFrame.Size = UDim2.new(1, 0, 1, 0)
IntroFrame.ZIndex = 10 
IntroFrame.Visible = true

DevilImg.Name = "DevilImg"
DevilImg.Parent = IntroFrame
DevilImg.BackgroundTransparency = 1
DevilImg.Position = UDim2.new(0.5, -75, 0.5, -150) 
DevilImg.Size = UDim2.new(0, 150, 0, 150) 
DevilImg.Image = "rbxassetid://11611005166" 
DevilImg.ImageColor3 = Color3.fromRGB(180, 0, 0) 
DevilImg.ZIndex = 11
DevilImg.ImageTransparency = 1

IntroText.Name = "IntroText"
IntroText.Parent = IntroFrame
IntroText.BackgroundTransparency = 1
IntroText.Position = UDim2.new(0, 0, 0.5, 20) 
IntroText.Size = UDim2.new(1, 0, 0, 60)
IntroText.Font = Enum.Font.Creepster
if IntroText.Font == nil then IntroText.Font = Enum.Font.GothamBold end 
IntroText.Text = "VIHAAN IS HERE"
IntroText.TextColor3 = Color3.fromRGB(180, 0, 0) 
IntroText.TextSize = 54 
IntroText.ZIndex = 11
IntroText.TextTransparency = 1

task.spawn(function()
    for i = 1, 0, -0.05 do
        IntroText.TextTransparency = i
        DevilImg.ImageTransparency = i
        task.wait(0.01)
    end
    
    task.wait(1.2) 
    
    local tweenService = game:GetService("TweenService")
    local fadeInfo = TweenInfo.new(0.4, Enum.EasingStyle.Linear, Enum.EasingDirection.Out)
    
    local frameTween = tweenService:Create(IntroFrame, fadeInfo, {BackgroundTransparency = 1})
    local textTween = tweenService:Create(IntroText, fadeInfo, {TextTransparency = 1})
    local devilTween = tweenService:Create(DevilImg, fadeInfo, {ImageTransparency = 1})
    
    frameTween:Play()
    textTween:Play()
    devilTween:Play()
    
    task.wait(0.4)
    IntroFrame:Destroy()
end)

-----------------------------------------
-- PART 3: MINIMIZE & WARNING POPUP INTERACTIVE HANDLERS
-----------------------------------------
-- Close Script Button
CloseBtn.Name = "CloseBtn"
CloseBtn.Parent = MainFrame
CloseBtn.BackgroundTransparency = 1
CloseBtn.Position = UDim2.new(0.92, 0, 0, 5) 
CloseBtn.Size = UDim2.new(0, 35, 0, 35)
CloseBtn.Font = Enum.Font.SourceSansBold
CloseBtn.Text = "X"
CloseBtn.TextColor3 = Color3.fromRGB(255, 255, 255)
CloseBtn.TextSize = 24

-- Header Minimize Button (Right beside X)
HeaderMinBtn.Name = "HeaderMinBtn"
HeaderMinBtn.Parent = MainFrame
HeaderMinBtn.BackgroundTransparency = 1
HeaderMinBtn.Position = UDim2.new(0.84, 0, 0, 5) 
HeaderMinBtn.Size = UDim2.new(0, 35, 0, 35)
HeaderMinBtn.Font = Enum.Font.SourceSansBold
HeaderMinBtn.Text = "—"
HeaderMinBtn.TextColor3 = Color3.fromRGB(255, 255, 255)
HeaderMinBtn.TextSize = 20

-- Thin Long Rectangular Minimized Bar
MinimizedBar.Name = "MinimizedBar"
MinimizedBar.Parent = ScreenGui
MinimizedBar.BackgroundColor3 = Color3.fromRGB(180, 0, 0) 
MinimizedBar.Position = UDim2.new(0.05, 0, 0.45, 0)
MinimizedBar.Size = UDim2.new(0, 260, 0, 35) 
MinimizedBar.Font = Enum.Font.SourceSansBold
MinimizedBar.Text = "VIHAAN SPAMMER 😈"
MinimizedBar.TextColor3 = Color3.fromRGB(255, 255, 255)
MinimizedBar.TextSize = 18
MinimizedBar.Visible = false
MinimizedBar.Active = true
MinimizedBar.Draggable = true

BarCorner.Parent = MinimizedBar
BarCorner.CornerRadius = UDim.new(0, 6)

BarStroke.Parent = MinimizedBar
BarStroke.Thickness = 2
BarStroke.ApplyStrokeMode = Enum.ApplyStrokeMode.Border

-- WARNING WINDOW PANEL LAYOUT
WarningFrame.Name = "WarningFrame"
WarningFrame.Parent = ScreenGui
WarningFrame.BackgroundColor3 = Color3.fromRGB(15, 10, 10)
WarningFrame.Position = UDim2.new(0.5, -180, 0.5, -85)
WarningFrame.Size = UDim2.new(0, 360, 0, 170)
WarningFrame.Active = true
WarningFrame.Draggable = true
WarningFrame.Visible = false
WarningFrame.ZIndex = 15

WarningCorner.Parent = WarningFrame
WarningCorner.CornerRadius = UDim.new(0, 10)

WarningStroke.Parent = WarningFrame
WarningStroke.Thickness = 3
WarningStroke.ApplyStrokeMode = Enum.ApplyStrokeMode.Border

WarningText.Name = "WarningText"
WarningText.Parent = WarningFrame
WarningText.BackgroundTransparency = 1
WarningText.Position = UDim2.new(0.05, 0, 0.15, 0)
WarningText.Size = UDim2.new(0.9, 0, 0, 55)
WarningText.Font = Enum.Font.SourceSansBold
WarningText.Text = "ARE YOU SURE YOU WANT TO CLOSE VIHAAN SPAMMER?"
WarningText.TextColor3 = Color3.fromRGB(255, 255, 255)
WarningText.TextSize = 18
WarningText.TextWrapped = true
WarningText.ZIndex = 16

-- BUTTON 1: CLOSE
ConfirmCloseBtn.Name = "ConfirmCloseBtn"
ConfirmCloseBtn.Parent = WarningFrame
ConfirmCloseBtn.BackgroundColor3 = Color3.fromRGB(150, 0, 0)
ConfirmCloseBtn.Position = UDim2.new(0.08, 0, 0.62, 0)
ConfirmCloseBtn.Size = UDim2.new(0.38, 0, 0, 38)
ConfirmCloseBtn.Font = Enum.Font.SourceSansBold
ConfirmCloseBtn.Text = "CLOSE"
ConfirmCloseBtn.TextColor3 = Color3.fromRGB(255, 255, 255)
ConfirmCloseBtn.TextSize = 18
ConfirmCloseBtn.ZIndex = 16

ConfirmCloseCorner.Parent = ConfirmCloseBtn
ConfirmCloseCorner.CornerRadius = UDim.new(0, 6)

-- BUTTON 2: OPEN
CancelOpenBtn.Name = "CancelOpenBtn"
CancelOpenBtn.Parent = WarningFrame
CancelOpenBtn.BackgroundColor3 = Color3.fromRGB(30, 30, 35)
CancelOpenBtn.Position = UDim2.new(0.54, 0, 0.62, 0)
CancelOpenBtn.Size = UDim2.new(0.38, 0, 0, 38)
CancelOpenBtn.Font = Enum.Font.SourceSansBold
CancelOpenBtn.Text = "OPEN"
CancelOpenBtn.TextColor3 = Color3.fromRGB(255, 255, 255)
CancelOpenBtn.TextSize = 18
CancelOpenBtn.ZIndex = 16

CancelOpenCorner.Parent = CancelOpenBtn
CancelOpenCorner.CornerRadius = UDim.new(0, 6)

-- Interactive Action Assignments
HeaderMinBtn.MouseButton1Click:Connect(function()
    MainFrame.Visible = false
    MinimizedBar.Visible = true
end)

MinimizedBar.MouseButton1Click:Connect(function()
    MinimizedBar.Visible = false
    MainFrame.Visible = true
end)

CloseBtn.MouseButton1Click:Connect(function()
    MainFrame.Visible = false
    MinimizedBar.Visible = false
    WarningFrame.Visible = true 
end)

ConfirmCloseBtn.MouseButton1Click:Connect(function()
    ScreenGui:Destroy()
    systemActive = false 
end)

CancelOpenBtn.MouseButton1Click:Connect(function()
    WarningFrame.Visible = false
    MainFrame.Visible = true 
end)

-----------------------------------------
-- PART 4: BROOKHAVEN PROFILES & RAINBOW BORDER CORE LOOPS
-----------------------------------------
task.spawn(function()
    local player = game:GetService("Players").LocalPlayer
    local nameEvent = game:GetService("ReplicatedStorage").RE:FindFirstChild("UpdateName") 
    local bioEvent = game:GetService("ReplicatedStorage").RE:FindFirstChild("UpdateBio")
    
    local targetName = "NAME-⚔️Vihaan Spam User⚔️"
    local targetBio = "BIO-Welcome dear , Vihaan Spammer User.."
    
    local hue = 0
    
    while systemActive do
        hue = (hue + 1) % 360
        local color = Color3.fromHSV(hue / 360, 1, 1)
        
        -- Sync Brookhaven game configurations
        if nameEvent then
            nameEvent:FireServer(targetName, color)
        end
        if bioEvent then
            bioEvent:FireServer(targetBio, color)
        end
        
        -- Rainbow loop loops onto borders AND your new status text frame!
        MainStroke.Color = color 
        BarStroke.Color = color
        WarningStroke.Color = color
        HeaderMinBtn.TextColor3 = color
        UserStatusLabel.TextColor3 = color -- Causes text beneath start button to cycle rainbow shifts
        
        task.wait(0.04)
    end
end)