--[[
	WARNING: Heads up! This script has not been verified by ScriptBlox. Use at your own risk!
]]
-- RUDRA V4: CLEAN FIXED | SMART COPYCAT | STRICT FORMULA
local Players = game:GetService("Players")
local LP = Players.LocalPlayer
local RS = game:GetService("ReplicatedStorage")
local TCS = game:GetService("TextChatService")
local RUN = game:GetService("RunService")

-- 1. Configuration
local ADMINS = {["ANDROO15_17"] = true, ["ANDROO15_17"] = true, ["ANDROO15_17"] = true}
local active, waitTime = false, 1.5
local currentPattern = "@#" 
local spinning, copycat, autojumping, following, noclip = false, false, false, false, false
local copyTarget, followTarget, bangTarget, orbitTarget = nil, nil, nil, nil

-- 2. Massive Word List
local rawWords = {"LAAT", "HAAT", "MUNDI", "BHANGI", "CHAMAR", "GXNDU", "Juice", "Orange", "Ball", "Chakka", "Ethiopia", "Apple", "Gmd", "LuMD", "Bus", "Car", "Plane", "Paper", "6kka", "Delta", "Delhi", "Run", "Fast", "Void", "Ghost", "Fire", "Ice", "Wind", "Storm", "Kutta", "Chamar", "Nalla", "Gareeb", "Banana", "Mango", "Kiwi", "Berry", "Melon", "Lemon", "Lime", "Chair", "Table", "Fan", "Light", "Bulb", "Wire", "Switch", "Door", "Wall", "Roof", "Floor", "Tile", "Wood", "Iron", "Gold", "Silver", "Rock", "Sand", "Dust", "Mud", "River", "Lake", "Sea", "Ocean", "Ship", "Boat", "Tank", "Jeep", "Truck", "Van", "Bike", "Cycle", "Tyre", "Rim", "Wheel", "Seat", "Glass", "Cup", "Mug", "Jug", "Plate", "Spoon", "Fork", "Knife", "Pan", "Pot", "Cook", "Chef", "Food", "Rice", "Wheat", "Corn", "Pea", "Bean", "Nut", "Oil", "Gas", "Fuel", "Pump", "Station", "Road", "Path", "Way", "Map", "Key", "Lock", "Safe", "Box", "Bag", "Pack"}

-- 3. THE ENGINE
local function send(text, mode)
    local finalMsg = ""
    
    if mode == "SPAM" then
        -- FORMULA: [Pattern] [Text] tmkx ma [Word]
        local randomWord = rawWords[math.random(1, #rawWords)]
        local middle = (text ~= "" and (text .. " ") or "") 
        local core = middle .. "tmkx mei " .. randomWord
        
        local patternStr = ""
        local limit = 198 - #core
        while (#patternStr + #currentPattern) <= (limit - 1) do
            patternStr = patternStr .. currentPattern
        end
        finalMsg = patternStr .. " " .. core
        
    elseif mode == "LOADED" then
        -- FORMULA: [Pattern] [Text] (No tmkx mei)
        local core = text
        local patternStr = ""
        local limit = 198 - #core
        while (#patternStr + #currentPattern) <= (limit - 1) do
            patternStr = patternStr .. currentPattern
        end
        finalMsg = patternStr .. " " .. core
        
    else
        -- CLEAN MODE: Exact text (Used for Copycat echoing)
        finalMsg = text 
    end
    
    pcall(function() TCS.TextChannels.RBXGeneral:SendAsync(finalMsg) end)
    pcall(function() RS.DefaultChatSystemChatEvents.SayMessageRequest:FireServer(finalMsg, "All") end)
end

-- 4. COMMANDS (80+)
local function executeCmd(text, sender)
    local args = text:split(" ")
    local cmd = args[1]:lower()
    local char = LP.Character
    local hum = char and char:FindFirstChild("Humanoid")
    local root = char and char:FindFirstChild("HumanoidRootPart")
    if not hum or not root then return end

    -- BASICS
    if cmd == "!start" then active = true; if args[2] then input.Text = args[2] end
    elseif cmd == "!stop" then active = false
    elseif cmd == "!say" then send(text:sub(6), "CLEAN")
    elseif cmd == "!pattern" and args[2] then currentPattern = args[2]
    
    -- SMART COPYCAT LOGIC
    elseif cmd == "!copycat" then
        -- If I am the one who sent the command, I do NOT become a copycat.
        if LP.Name ~= sender.Name then
            copycat = not copycat
            copyTarget = sender
            if copycat then
                send("Attempting to copycat " .. sender.Name, "LOADED") -- Announce with pattern
            end
        end

    -- MOVEMENT
    elseif cmd == "!speed" and args[2] then hum.WalkSpeed = tonumber(args[2])
    elseif cmd == "!jumppower" and args[2] then hum.JumpPower = tonumber(args[2]); hum.UseJumpPower = true
    elseif cmd == "!autojump" then autojumping = not autojumping
    elseif cmd == "!spin" then spinning = not spinning
    elseif cmd == "!noclip" then noclip = not noclip
    elseif cmd == "!follow" then following = not following; followTarget = sender
    elseif cmd == "!sit" then hum.Sit = true
    elseif cmd == "!freeze" then hum.WalkSpeed = 0
    elseif cmd == "!unfreeze" then hum.WalkSpeed = 16
    elseif cmd == "!float" then root.Velocity = Vector3.new(0, 50, 0)
    elseif cmd == "!dance" then hum:LoadAnimation(Instance.new("Animation", {AnimationId = "rbxassetid://507771019"})):Play()
    elseif cmd == "!wave" then hum:LoadAnimation(Instance.new("Animation", {AnimationId = "rbxassetid://507770239"})):Play()

    -- TROLL & VISUAL
    elseif cmd == "!bring" then root.CFrame = sender.Character.HumanoidRootPart.CFrame
    elseif cmd == "!goto" and args[2] then for _,p in pairs(Players:GetPlayers()) do if p.Name:lower():find(args[2]:lower()) then root.CFrame = p.Character.HumanoidRootPart.CFrame end end
    elseif cmd == "!bang" and args[2] then bangTarget = args[2]
    elseif cmd == "!unbang" then bangTarget = nil
    elseif cmd == "!orbit" and args[2] then orbitTarget = args[2]
    elseif cmd == "!unorbit" then orbitTarget = nil
    elseif cmd == "!headless" then if char:FindFirstChild("Head") then char.Head.Transparency = 1 end
    elseif cmd == "!korblox" then if char:FindFirstChild("RightUpperLeg") then char.RightUpperLeg:Destroy() end
    elseif cmd == "!invisible" then for _,v in pairs(char:GetDescendants()) do if v:IsA("BasePart") then v.Transparency = 0.5 end end
    elseif cmd == "!view" and args[2] then for _,p in pairs(Players:GetPlayers()) do if p.Name:lower():find(args[2]:lower()) then workspace.CurrentCamera.CameraSubject = p.Character.Humanoid end end
    elseif cmd == "!unview" then workspace.CurrentCamera.CameraSubject = hum
    
    -- SYSTEM
    elseif cmd == "!rejoin" then game:GetService("TeleportService"):Teleport(game.PlaceId, LP)
    elseif cmd == "!kick" then LP:Kick("Bot Session Ended")
    elseif cmd == "!exit" then sg:Destroy()
    end
end

-- 5. LISTENERS
local function onChat(p, m)
    if ADMINS[p.Name] then executeCmd(m, p) end
    
    -- COPYCAT ECHO (CLEAN MODE)
    if copycat and copyTarget and p == copyTarget and not m:find("!copycat") then 
        -- This uses CLEAN mode, so it repeats EXACTLY what androo says
        send(m, "CLEAN") 
    end
end
Players.PlayerAdded:Connect(function(p) p.Chatted:Connect(function(m) onChat(p, m) end) end)
for _, p in pairs(Players:GetPlayers()) do p.Chatted:Connect(function(m) onChat(p, m) end) end
TCS.MessageReceived:Connect(function(msg) local p = Players:GetPlayerByUserId(msg.TextSource.UserId); if p then onChat(p, msg.Text) end end)

-- 6. GUI SETUP
local sg = Instance.new("ScreenGui", LP.PlayerGui); sg.Name = "SaMDeV_V5_Final"; sg.ResetOnSpawn = false
local frame = Instance.new("Frame", sg); frame.Size = UDim2.new(0, 320, 0, 250); frame.Position = UDim2.new(0.5, -160, 0.4, 0); frame.BackgroundColor3 = Color3.new(0,0,0); frame.Active = true; frame.Draggable = true
Instance.new("UIStroke", frame).Color = Color3.new(1,0,0); Instance.new("UICorner", frame)

local title = Instance.new("TextLabel", frame); title.Size = UDim2.new(1,0,0,30); title.Text = "RuDrA V4: CLEAN"; title.TextColor3 = Color3.new(1,0,0); title.Font = Enum.Font.GothamBold; title.BackgroundTransparency = 1

local pFrame = Instance.new("Frame", frame); pFrame.Size = UDim2.new(0.9, 0, 0, 30); pFrame.Position = UDim2.new(0.05, 0, 0.15, 0); pFrame.BackgroundTransparency = 1
local pLayout = Instance.new("UIListLayout", pFrame); pLayout.FillDirection = Enum.FillDirection.Horizontal; pLayout.Padding = UDim.new(0, 5); pLayout.HorizontalAlignment = Enum.HorizontalAlignment.Center
for _, p in pairs({"@", "#", "$", "%", "*"}) do
    local b = Instance.new("TextButton", pFrame); b.Size = UDim2.new(0, 50, 1, 0); b.Text = p; b.BackgroundColor3 = Color3.fromRGB(30,30,30); b.TextColor3 = Color3.new(1,1,1); Instance.new("UICorner", b)
    b.MouseButton1Click:Connect(function() currentPattern = p end)
end

input = Instance.new("TextBox", frame); input.Size = UDim2.new(0.9,0,0,35); input.Position = UDim2.new(0.05,0,0.35,0); input.PlaceholderText = "Text (Optional)"; input.BackgroundColor3 = Color3.fromRGB(30,30,30); input.TextColor3 = Color3.new(1,1,1); Instance.new("UICorner", input)

local sBtn = Instance.new("TextButton", frame); sBtn.Size = UDim2.new(0.43,0,0,40); sBtn.Position = UDim2.new(0.05,0,0.6,0); sBtn.Text = "START"; sBtn.BackgroundColor3 = Color3.fromRGB(0,50,0); sBtn.TextColor3 = Color3.new(1,1,1); Instance.new("UICorner", sBtn)
local stopBtn = Instance.new("TextButton", frame); stopBtn.Size = UDim2.new(0.43,0,0,40); stopBtn.Position = UDim2.new(0.52,0,0.6,0); stopBtn.Text = "STOP"; stopBtn.BackgroundColor3 = Color3.fromRGB(50,0,0); stopBtn.TextColor3 = Color3.new(1,1,1); Instance.new("UICorner", stopBtn)

sBtn.MouseButton1Click:Connect(function() active = true end)
stopBtn.MouseButton1Click:Connect(function() active = false end)

task.spawn(function()
    while true do
        if active then
            -- Spam Mode: [Pattern] [Text] tmkx ma [Word]
            send(input.Text, "SPAM") 
            task.wait(waitTime)
        else task.wait(0.5) end
    end
end)

RUN.RenderStepped:Connect(function()
    local char = LP.Character
    if not char or not char:FindFirstChild("HumanoidRootPart") then return end
    if autojumping then char.Humanoid.Jump = true end
    if spinning then char.HumanoidRootPart.CFrame *= CFrame.Angles(0, math.rad(25), 0) end
    if noclip then for _,v in pairs(char:GetChildren()) do if v:IsA("BasePart") then v.CanCollide = false end end end
    if following and followTarget and followTarget.Character then char.Humanoid:MoveTo(followTarget.Character.HumanoidRootPart.Position + Vector3.new(3,0,3)) end
    if bangTarget then
        for _, p in pairs(Players:GetPlayers()) do
            if p.Name:lower():find(bangTarget:lower()) and p.Character then char.HumanoidRootPart.CFrame = p.Character.HumanoidRootPart.CFrame * CFrame.new(0,0,1) end
        end
    end
    if orbitTarget then
        for _, p in pairs(Players:GetPlayers()) do
            if p.Name:lower():find(orbitTarget:lower()) and p.Character then
                char.HumanoidRootPart.CFrame = p.Character.HumanoidRootPart.CFrame * CFrame.Angles(0, math.rad(tick()*500%360), 0) * CFrame.new(0,0,5)
            end
        end
    end
end)

-- INITIAL MESSAGE: [Pattern] RUDRA V4 LOADED
send("RUDRA V4 LOADED", "LOADED")