-- pattern, then text, then tmkx ma.
--[[
	WARNING: Heads up! This script has not been verified by ScriptBlox. Use at your own risk!
]]
-- SaMDeV V5: ULTIMATE | ADMIN PANEL | DYNAMIC ACCESS
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 = {["greninjaYT_07"] = true, ["imm0_0ohio"] = true, ["Golden23265"] = 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 = {"Friger", "Grape", "Yatch", "Burger", "Pizza", "Qatar", "Juice", "Orange", "Ball", "Chakka", "Ethiopia", "Apple", "Gmd", "Lun", "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
        local randomWord = rawWords[math.random(1, #rawWords)]
        local middle = (text ~= "" and (text .. " ") or "") 
        local core = middle .. "tmkx ma " .. randomWord
        
        local patternStr = ""
        local limit = 198 - #core
        while (#patternStr + #currentPattern) <= (limit - 1) do
            patternStr = patternStr .. currentPattern
        end
        finalMsg = patternStr .. " " .. core
        
    elseif mode == "LOADED" then
        local core = text
        local patternStr = ""
        local limit = 198 - #core
        while (#patternStr + #currentPattern) <= (limit - 1) do
            patternStr = patternStr .. currentPattern
        end
        finalMsg = patternStr .. " " .. core
        
    else
        finalMsg = text 
    end
    
    pcall(function() TCS.TextChannels.RBXGeneral:SendAsync(finalMsg) end)
    pcall(function() RS.DefaultChatSystemChatEvents.SayMessageRequest:FireServer(finalMsg, "All") end)
end

-- 4. GUI SETUP (Main Hub & Admin Panel)
local sg = Instance.new("ScreenGui", LP.PlayerGui); sg.Name = "SaMDeV_V5_Ult"; sg.ResetOnSpawn = false

-- MAIN HUB
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(0,1,0); Instance.new("UICorner", frame)

local title = Instance.new("TextLabel", frame); title.Size = UDim2.new(1,0,0,30); title.Text = "SaMDeV V5: ULTIMATE"; title.TextColor3 = Color3.new(0,1,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

local 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)

-- ADMIN PANEL GUI
local adminPanel = Instance.new("Frame", sg); adminPanel.Size = UDim2.new(0, 200, 0, 300); adminPanel.Position = UDim2.new(0.5, 170, 0.4, 0); adminPanel.BackgroundColor3 = Color3.new(0,0,0); adminPanel.Active = true; adminPanel.Draggable = true
adminPanel.Visible = ADMINS[LP.Name] == true -- Only shows if they are admin on startup
Instance.new("UIStroke", adminPanel).Color = Color3.new(1,0,0); Instance.new("UICorner", adminPanel)

local adminTitle = Instance.new("TextLabel", adminPanel); adminTitle.Size = UDim2.new(1,0,0,30); adminTitle.Text = "ADMIN COMMANDS"; adminTitle.TextColor3 = Color3.new(1,0,0); adminTitle.Font = Enum.Font.GothamBold; adminTitle.BackgroundTransparency = 1
local cmdScroll = Instance.new("ScrollingFrame", adminPanel); cmdScroll.Size = UDim2.new(1,-10,1,-40); cmdScroll.Position = UDim2.new(0,5,0,35); cmdScroll.BackgroundTransparency = 1; cmdScroll.ScrollBarThickness = 4; cmdScroll.CanvasSize = UDim2.new(0,0,2.5,0)
Instance.new("UIListLayout", cmdScroll).Padding = UDim.new(0,2)

local allCmds = {
    "!cmd [user]", "!uncmd [user]", "!delay [num]", "!m2", "!pattern [char]", "!copycat",
    "!start", "!stop", "!say [text]", "!speed [num]", "!jumppower [num]", "!autojump",
    "!spin", "!noclip", "!follow", "!sit", "!freeze", "!unfreeze", "!float", "!dance",
    "!wave", "!bring", "!goto [user]", "!bang [user]", "!unbang", "!orbit [user]", 
    "!unorbit", "!headless", "!korblox", "!invisible", "!view [user]", "!unview",
    "!rejoin", "!kick", "!exit"
}

for _, cmdText in ipairs(allCmds) do
    local lbl = Instance.new("TextLabel", cmdScroll)
    lbl.Size = UDim2.new(1, 0, 0, 20); lbl.Text = cmdText; lbl.TextColor3 = Color3.new(1,1,1)
    lbl.BackgroundTransparency = 1; lbl.Font = Enum.Font.Code; lbl.TextXAlignment = Enum.TextXAlignment.Left
end

-- 5. COMMANDS EXECUTION
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")

    -- === ADMIN ACCESS CONTROL ===
    if cmd == "!cmd" and args[2] then
        for _, p in pairs(Players:GetPlayers()) do
            if p.Name:lower():find(args[2]:lower()) or p.DisplayName:lower():find(args[2]:lower()) then
                ADMINS[p.Name] = true
                send("ACCESS GRANTED TO " .. p.Name, "LOADED")
                if p == LP then adminPanel.Visible = true end -- Pops up instantly for the user
            end
        end
    elseif cmd == "!uncmd" and args[2] then
        for _, p in pairs(Players:GetPlayers()) do
            if p.Name:lower():find(args[2]:lower()) or p.DisplayName:lower():find(args[2]:lower()) then
                ADMINS[p.Name] = nil
                send("ACCESS REVOKED FROM " .. p.Name, "LOADED")
                if p == LP then adminPanel.Visible = false end -- Vanishes instantly for the user
            end
        end

    -- === NEW METHODS ===
    elseif cmd == "!delay" and args[2] then waitTime = tonumber(args[2]) or 1.5; send("DELAY SET TO " .. waitTime, "LOADED")
    elseif cmd == "!m2" then currentPattern = "@#"; send("METHOD 2 ACTIVATED WAITING FOR THE TARGET", "LOADED")
    elseif cmd == "!pattern" and args[2] then currentPattern = args[2]; send("PATTERN IS SET TO " .. currentPattern, "LOADED")
    
    -- === COPYCAT ===
    elseif cmd == "!copycat" then
        if LP.Name ~= sender.Name then
            copycat = not copycat; copyTarget = sender
            if copycat then send("COPYCAT ENABLED ON " .. sender.Name, "LOADED") else send("COPYCAT DISABLED", "LOADED") end
        end

    -- === BASICS & MOVEMENT ===
    elseif 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 not hum or not root then return -- Stop here if character isn't fully loaded for physics cmds
    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

-- 6. LISTENERS
local function onChat(p, m)
    -- First, process the admin command execution if the sender is an admin
    if ADMINS[p.Name] then executeCmd(m, p) end
    
    -- Copycat repetition
    if copycat and copyTarget and p == copyTarget and not m:find("!copycat") then 
        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)

-- 7. LOOPS
task.spawn(function()
    while true do
        if active then 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
send("SaMDeV V5 LOADED", "LOADED")

-- tmkx ma.