Sam Spammer

-- SAM HUB V4 (INTERNAL LOAD)
local script_data = [[
local ScreenGui = Instance.new("ScreenGui")
local Main = Instance.new("Frame")
local UIStroke = Instance.new("UIStroke")
local Title = Instance.new("TextLabel")
local Input = Instance.new("TextBox")
local Toggle = Instance.new("TextButton")
local Minimize = Instance.new("TextButton")
local ScrollingLabel = Instance.new("TextLabel")

local function SetRainbowName()
    task.spawn(function()
        while task.wait(0.4) do
            local hue = tick() % 5 / 5
            local color = Color3.fromHSV(hue, 1, 1)
            local args = {[1] = "UpdatePlayerRPName", [2] = "S@M 0N T⁰P", [3] = color}
            local remote = game:GetService("ReplicatedStorage"):FindFirstChild("RemoteEvents")
            if remote and remote:FindFirstChild("PlayerRPName") then
                remote.PlayerRPName:FireServer(unpack(args))
            end
        end
    end)
end

game:GetService("RunService").Stepped:Connect(function()
    local char = game.Players.LocalPlayer.Character
    if char and char:FindFirstChild("Humanoid") then char.Humanoid.Sit = false end
end)

ScreenGui.Name = "SamUltimateV4"
ScreenGui.Parent = game:GetService("CoreGui")
ScreenGui.ResetOnSpawn = false
Main.Parent = ScreenGui
Main.BackgroundColor3 = Color3.fromRGB(10, 10, 10)
Main.Position = UDim2.new(0.5, -100, 0.4, -90)
Main.Size = UDim2.new(0, 200, 0, 200)
Main.Active = true
Main.Draggable = true
UIStroke.Parent = Main
UIStroke.Thickness = 3
UIStroke.ApplyStrokeMode = Enum.ApplyStrokeMode.Border
Title.Size = UDim2.new(1, 0, 0, 40)
Title.Text = "S@M HUB V4"
Title.TextColor3 = Color3.new(1, 1, 1)
Title.BackgroundTransparency = 1
Title.Font = Enum.Font.GothamBold
Title.TextSize = 18
Title.Parent = Main

ScrollingLabel.Size = UDim2.new(1, 0, 0, 20)
ScrollingLabel.Position = UDim2.new(0, 0, 0.2, 0)
ScrollingLabel.BackgroundTransparency = 1
ScrollingLabel.Text = "--- S@M ON TOP --- BROOKHAVEN DESTROYER --- "
ScrollingLabel.TextColor3 = Color3.new(1, 1, 1)
ScrollingLabel.Font = Enum.Font.Code
ScrollingLabel.TextSize = 12
ScrollingLabel.Parent = Main

task.spawn(function()
    local t = ScrollingLabel.Text
    while true do
        ScrollingLabel.Text = t
        t = string.sub(t, 2) .. string.sub(t, 1, 1)
        task.wait(0.2)
    end
end)

Minimize.Name = "Minimize"
Minimize.Parent = Main
Minimize.BackgroundColor3 = Color3.fromRGB(30, 30, 30)
Minimize.Position = UDim2.new(0.82, 0, 0.05, 0)
Minimize.Size = UDim2.new(0, 25, 0, 25)
Minimize.Text = "-"
Minimize.TextColor3 = Color3.new(1, 1, 1)
Minimize.Font = Enum.Font.GothamBold

Input.Size = UDim2.new(0.9, 0, 0, 35)
Input.Position = UDim2.new(0.05, 0, 0.35, 0)
Input.PlaceholderText = "Target Name..."
Input.BackgroundColor3 = Color3.fromRGB(25, 25, 25)
Input.TextColor3 = Color3.new(1, 1, 1)
Input.Parent = Main

Toggle.Size = UDim2.new(0.9, 0, 0, 45)
Toggle.Position = UDim2.new(0.05, 0, 0.7, 0)
Toggle.Text = "START EVERYTHING"
Toggle.BackgroundColor3 = Color3.fromRGB(40, 40, 40)
Toggle.TextColor3 = Color3.new(1, 1, 1)
Toggle.Font = Enum.Font.GothamBold
Toggle.Parent = Main

local longLine = "__________________________________________________________________________________________________________________________________________________________________________________"
local phrases = {longLine.." TMKX me sofa", longLine.." TMKX me cooler", longLine.." TMKX me rickshaw", longLine.." TMKX me dukan", longLine.." TMKX me samosa"}

local active = false
Toggle.MouseButton1Click:Connect(function()
    if not active then
        active = true
        SetRainbowName()
        Toggle.Text = "ACTIVE"
        Toggle.TextColor3 = Color3.new(0, 1, 0)
        task.spawn(function()
            while active do
                if Input.Text ~= "" then
                    local target = Input.Text
                    local finalMsg = target .. " " .. phrases[math.random(1, #phrases)]
                    local tcs = game:GetService("TextChatService")
                    if tcs.ChatVersion == Enum.ChatVersion.TextChatService then
                        tcs.TextChannels.RBXGeneral:SendAsync(finalMsg)
                    else
                        game:GetService("ReplicatedStorage").DefaultChatSystemChatEvents.SayMessageRequest:FireServer(finalMsg, "All")
                    end
                end
                task.wait(2.5) -- Thoda delay badhaya hai safety ke liye
            end
        end)
    end
end)

local isMinimized = false
Minimize.MouseButton1Click:Connect(function()
    isMinimized = not isMinimized
    if isMinimized then
        Main:TweenSize(UDim2.new(0, 200, 0, 40), "Out", "Quad", 0.3, true)
        Input.Visible, Toggle.Visible, ScrollingLabel.Visible = false, false, false
        Minimize.Text = "+"
    else
        Main:TweenSize(UDim2.new(0, 200, 0, 200), "Out", "Quad", 0.3, true)
        Input.Visible, Toggle.Visible, ScrollingLabel.Visible = true, true, true
        Minimize.Text = "-"
    end
end)

task.spawn(function()
    while task.wait(0.01) do
        local color = Color3.fromHSV(tick() % 3 / 3, 1, 1)
        UIStroke.Color, Title.TextColor3, ScrollingLabel.TextColor3 = color, color, color
    end
end)
]]

-- Is line se script execute hogi
assert(loadstring(script_data))()