Enum’s Admin V4

-- Enum’s Admin V4
-- By: TheOfficialSeb

game:FindFirstChildOfClass("Players").Name = "Players"
wait(0.3)

Chat = {}
Messages = 0
function NewMessage(msg)
    wait(0.5)
    plr = game.Workspace:WaitForChild(owner.Name)
    plrH = plr:WaitForChild('HumanoidRootPart2')

    Messages = Messages+1

    for i,v in pairs(plrH:GetChildren()) do
        if v.ClassName == "Folder" then
            local a = 1
        else
            v:Remove()
        end
    end

    --New Folder
    local NewFolder = Instance.new("Folder")
    NewFolder.Parent = plrH
    local Num = Messages
    NewFolder.Name = "Item" .. Num
    --New Model
    local NewModel = Instance.new("Model")
    NewModel.Parent = NewFolder
    NewModel.Name = msg
    --New PosValue
    local NewPosValue = Instance.new("Vector3Value")
    NewPosValue.Parent = NewModel
    NewPosValue.Name = "PosValue"
    --New Humanoid
    local NewHumanoid = Instance.new("Humanoid")
    NewHumanoid.Parent = NewModel
    --New Part
    local NewPart = Instance.new("Part")
    NewPart.Parent = NewModel
    NewPart.Material = "ForceField"
    NewPart.Position = plrH.Position
    NewPart.BrickColor = BrickColor.new("Bright blue")
    NewPart.Anchored = false
    NewPart.CanCollide = false
    NewPart.Size = Vector3.new(2, 2, 2)
    NewPart.Name = "Head"
    --BodyPos

    local LocPos = Vector3.new(1, 1, 1)
    local Part = NewPart
    local Body = Instance.new("BodyPosition")
    Body.Parent = Part
    Body. MaxForce = Vector3.new(math.huge,math.huge,math.huge)

    local Body2 = Instance.new("BodyAngularVelocity")
    Body2.Parent = Part
    Body2.AngularVelocity = Vector3.new(1, 1, 1)

    Amount = Messages
    DA = 360 / Amount
    local pFolder = Instance.new("Folder",game.Lighting)
    for i=1,Amount do
        local p = Instance.new('Part', pFolder)
        p.Size = Vector3.new(1, 1, 1)
        p.Anchored = true
        p.CFrame = CFrame.new(0, 0, 0) * CFrame.Angles(0, math.rad(DA * i), 0) * CFrame.new(Amount + 0.5,0,0)
    end

    local m = plrH:GetChildren()
    local m2 = pFolder:GetChildren()
    for ic=1,#m do
        m[ic]:FindFirstChildOfClass("Model").PosValue.Value = m2[ic].Position
        m[ic]:FindFirstChildOfClass("Model").Head:FindFirstChildOfClass("BodyPosition").Position = plrH.Position + m2[ic].Position
        m2[ic]:Remove()
    end
end

function NewChatMessage(msg)
    wait(0.5)
    plr = game.Workspace:WaitForChild(owner.Name)
    plrH = plr:WaitForChild('HumanoidRootPart2')

    Messages = Messages+1

    for i,v in pairs(plrH:GetChildren()) do
        if v.ClassName == "Folder" then
            local a = 1
        else
            v:Remove()
        end
    end

    --New Folder
    local NewFolder = Instance.new("Folder")
    NewFolder.Parent = plrH
    local Num = Messages
    NewFolder.Name = "Item" .. Num
    --New Model
    local NewModel = Instance.new("Model")
    NewModel.Parent = NewFolder
    NewModel.Name = msg
    --New PosValue
    local NewPosValue = Instance.new("Vector3Value")
    NewPosValue.Parent = NewModel
    NewPosValue.Name = "PosValue"
    --New Humanoid
    local NewHumanoid = Instance.new("Humanoid")
    NewHumanoid.Parent = NewModel
    --New Part
    local NewPart = Instance.new("Part")
    NewPart.Parent = NewModel
    NewPart.Material = "ForceField"
    NewPart.Position = plrH.Position
    NewPart.BrickColor = BrickColor.new("Dark green")
    NewPart.Anchored = false
    NewPart.CanCollide = false
    NewPart.Size = Vector3.new(2, 2, 2)
    NewPart.Name = "Head"
    --BodyPos

    local LocPos = Vector3.new(1, 1, 1)
    local Part = NewPart
    local Body = Instance.new("BodyPosition")
    Body.Parent = Part
    Body. MaxForce = Vector3.new(math.huge,math.huge,math.huge)

    local Body2 = Instance.new("BodyAngularVelocity")
    Body2.Parent = Part
    Body2.AngularVelocity = Vector3.new(1, 1, 1)

    Amount = Messages
    DA = 360 / Amount
    local pFolder = Instance.new("Folder",game.Lighting)
    for i=1,Amount do
        local p = Instance.new('Part', pFolder)
        p.Size = Vector3.new(1, 1, 1)
        p.Anchored = true
        p.CFrame = CFrame.new(0, 0, 0) * CFrame.Angles(0, math.rad(DA * i), 0) * CFrame.new(Amount + 0.5,0,0)
    end

    local m = plrH:GetChildren()
    local m2 = pFolder:GetChildren()
    for ic=1,#m do
        m[ic]:FindFirstChildOfClass("Model").PosValue.Value = m2[ic].Position
        m[ic]:FindFirstChildOfClass("Model").Head:FindFirstChildOfClass("BodyPosition").Position = plrH.Position + m2[ic].Position
        m2[ic]:Remove()
    end
end

function NewErrorMessage(msg)
    wait(0.5)
    plr = game.Workspace:WaitForChild(owner.Name)
    plrH = plr:WaitForChild('HumanoidRootPart2')

    Messages = Messages+1

    for i,v in pairs(plrH:GetChildren()) do
        if v.ClassName == "Folder" then
            local a = 1
        else
            v:Remove()
        end
    end

    --New Folder
    local NewFolder = Instance.new("Folder")
    NewFolder.Parent = plrH
    local Num = Messages
    NewFolder.Name = "Item" .. Num
    --New Model
    local NewModel = Instance.new("Model")
    NewModel.Parent = NewFolder
    NewModel.Name = msg
    --New PosValue
    local NewPosValue = Instance.new("Vector3Value")
    NewPosValue.Parent = NewModel
    NewPosValue.Name = "PosValue"
    --New Humanoid
    local NewHumanoid = Instance.new("Humanoid")
    NewHumanoid.Parent = NewModel
    --New Part
    local NewPart = Instance.new("Part")
    NewPart.Parent = NewModel
    NewPart.Material = "ForceField"
    NewPart.Position = plrH.Position
    NewPart.BrickColor = BrickColor.new("Bright red")
    NewPart.Anchored = false
    NewPart.CanCollide = false
    NewPart.Size = Vector3.new(2, 2, 2)
    NewPart.Name = "Head"
    --BodyPos

    local LocPos = Vector3.new(1, 1, 1)
    local Part = NewPart
    local Body = Instance.new("BodyPosition")
    Body.Parent = Part
    Body. MaxForce = Vector3.new(math.huge,math.huge,math.huge)

    local Body2 = Instance.new("BodyAngularVelocity")
    Body2.Parent = Part
    Body2.AngularVelocity = Vector3.new(1, 1, 1)

    Amount = Messages
    DA = 360 / Amount
    local pFolder = Instance.new("Folder",game.Lighting)
    for i=1,Amount do
        local p = Instance.new('Part', pFolder)
        p.Size = Vector3.new(1, 1, 1)
        p.Anchored = true
        p.CFrame = CFrame.new(0, 0, 0) * CFrame.Angles(0, math.rad(DA * i), 0) * CFrame.new(Amount + 0.5,0,0)
    end

    local m = plrH:GetChildren()
    local m2 = pFolder:GetChildren()
    for ic=1,#m do
        m[ic]:FindFirstChildOfClass("Model").PosValue.Value = m2[ic].Position
        m[ic]:FindFirstChildOfClass("Model").Head:FindFirstChildOfClass("BodyPosition").Position = plrH.Position + m2[ic].Position
        m2[ic]:Remove()
    end
end

auto_move = coroutine.create(function()
    db050 = true
    owner.CharacterRemoved:connect(function(char)
        db050 = false
    end)
    local plrH = plr:WaitForChild('HumanoidRootPart2')
    while db050 do
        for i,v in pairs(plrH:GetChildren()) do
            v.Head:FindFirstChildOfClass("BodyPosition").Position = plrH.Position + m[ic]:FindFirstChildOfClass("Model").PosValue.Value
        end
        wait(0.1)
    end
end)

owner.Chatted:connect(function(message)
    local messageLow = string.lower(message)
    if messageLow:sub(1, 5) == "!age " then
        local TargetPlayer = FindPlayer(message:sub(6))
        if game.Players:FindFirstChild(TargetPlayer) then
            NewMessage("Age: " .. game.Players:FindFirstChild(TargetPlayer).AccountAge)
        else
            NewErrorMessage("Error: Player Not Found!")
        end
    elseif messageLow:sub(1, 4) == "!re " then
        local TargetPlayer = FindPlayer(message:sub(5))
         if game.Players:FindFirstChild(TargetPlayer) then
            if game.Players:FindFirstChild(TargetPlayer).Character:FindFirstChild("HumanoidRootPart") then
                local Pos = game.Players:FindFirstChild(TargetPlayer).Character.HumanoidRootPart.CFrame
                game.Players:FindFirstChild(TargetPlayer):LoadCharacter()
                game.Players:FindFirstChild(TargetPlayer).Character.HumanoidRootPart.CFrame = Pos
                NewMessage("Respawned " .. TargetPlayer)
            else
                game.Players:FindFirstChild(TargetPlayer):LoadCharacter()
                NewMessage("Respawned " .. TargetPlayer)
            end
        else
            NewErrorMessage("Error: Player Not Found!")
        end
    elseif messageLow:sub(1, 4) == "!to " then
        local TargetPlayer = FindPlayer(messageLow:sub(5))
        if game.Players:FindFirstChild(TargetPlayer) then
            local TPH = game.Players:FindFirstChild(TargetPlayer)
            owner.Character:WaitForChild('HumanoidRootPart').CFrame = TPH.Character:WaitForChild('HumanoidRootPart').CFrame
            NewMessage("Teleported to " .. TargetPlayer)
        else
            NewErrorMessage("Error: Player Not Found!")
        end
    elseif messageLow:sub(1, 6) == "!here " then
        local TargetPlayer = FindPlayer(messageLow:sub(7))
        if game.Players:FindFirstChild(TargetPlayer) then
            local TPH = game.Players:FindFirstChild(TargetPlayer)
            TPH.Character:WaitForChild('HumanoidRootPart').CFrame = owner.Character:WaitForChild('HumanoidRootPart').CFrame
            NewMessage("Teleported " .. TargetPlayer .. " here")
        else
            NewErrorMessage("Error: Player Not Found!")
        end
    elseif messageLow:sub(1, 6) == "!grav " then
        if #messageLow >= 7 then
            game.Workspace.Gravity = tonumber(messageLow:sub(7))
            NewMessage("Gravity Set to " .. tonumber(messageLow:sub(7)))
        else
            NewErrorMessage("Error: Gravity can't be nil!")
        end
    elseif messageLow:sub(1, 8) == "!fixgrav" then
        game.Workspace.Gravity = 196.19999694824
        NewMessage("Gravity Fixed")
    elseif messageLow:sub(1, 8) == "!remove " then
        local TargetPlayer = FindPlayer(message:sub(9))
        if game.Players:FindFirstChild(TargetPlayer) then
            game.Players:FindFirstChild(TargetPlayer).Character.Parent = nil
        else
            NewErrorMessage("Error: Player Not Found!")
        end
        NewMessage("Removed " .. TargetPlayer .. "'s Character")
    elseif messageLow:sub(1, 6) == "!kill " then
        local TargetPlayer = FindPlayer(message:sub(7))
        if game.Players:FindFirstChild(TargetPlayer) then
            local TPH = game.Players:FindFirstChild(TargetPlayer)
            if TPH.Character then
                if game.Players:FindFirstChild(TargetPlayer).Character:FindFirstChildOfClass("Humanoid") then
                    game.Players:FindFirstChild(TargetPlayer).Character:FindFirstChildOfClass("Humanoid").Health = 0
                    NewMessage("Killed " .. TargetPlayer)
                else
                    NewErrorMessage("Error: Humanoid Not Found!")
                end
            else
                NewErrorMessage("Error: Character Not Found!")
            end
        else
            NewErrorMessage("Error: Player Not Found!")
        end
    elseif messageLow:sub(1, 5) == "!sit " then
        local TargetPlayer = FindPlayer(message:sub(7))
        if game.Players:FindFirstChild(TargetPlayer) then
            local TPH = game.Players:FindFirstChild(TargetPlayer)
            if TPH.Character then
                if game.Players:FindFirstChild(TargetPlayer).Character:FindFirstChildOfClass("Humanoid") then
                    game.Players:FindFirstChild(TargetPlayer).Character:FindFirstChildOfClass("Humanoid").Jump = true
                    NewMessage("Seated " .. TargetPlayer)
                else
                    NewErrorMessage("Error: Humanoid Not Found!")
                end
            else
                NewErrorMessage("Error: Character Not Found!")
            end
        else
            NewErrorMessage("Error: Player Not Found!")
        end
    elseif messageLow:sub(1, 6) == "!jump " then
        local TargetPlayer = FindPlayer(message:sub(7))
        if game.Players:FindFirstChild(TargetPlayer) then
            local TPH = game.Players:FindFirstChild(TargetPlayer)
            if TPH.Character then
                if game.Players:FindFirstChild(TargetPlayer).Character:FindFirstChildOfClass("Humanoid") then
                    game.Players:FindFirstChild(TargetPlayer).Character:FindFirstChildOfClass("Humanoid").Jump = true
                    NewMessage("Made " .. TargetPlayer .. " Jump")
                else
                    NewErrorMessage("Error: Humanoid Not Found!")
                end
            else
                NewErrorMessage("Error: Character Not Found!")
            end
        else
            NewErrorMessage("Error: Player Not Found!")
        end
    elseif messageLow:sub(1, 4) == "!ff " then
        local TargetPlayer = FindPlayer(message:sub(5))
        if game.Players:FindFirstChild(TargetPlayer) then
            if game.Players:FindFirstChild(TargetPlayer).Character then
                Instance.new("ForceField", game.Players:FindFirstChild(TargetPlayer).Character)
                NewMessage("Gave  " .. TargetPlayer .. " ForceField")
            else
                NewErrorMessage("Error: Character Not Found!")
            end
        else
            NewErrorMessage("Error: Player Not Found!")
        end
    elseif messageLow:sub(1, 6) == "!unff " then
        local TargetPlayer = FindPlayer(message:sub(7))
        if game.Players:FindFirstChild(TargetPlayer) then
            if game.Players:FindFirstChild(TargetPlayer).Character then
                for i,obj in pairs(game.Players:FindFirstChild(TargetPlayer).Character:GetChildren()) do
                    if obj.ClassName == "ForceField" then
                        obj:Remove()
                    end
                end
                NewMessage("Removed  " .. TargetPlayer .. "'s ForceFields")
            else
                NewErrorMessage("Error: Character Not Found!")
            end
        else
            NewErrorMessage("Error: Player Not Found!")
        end
    elseif messageLow:sub(1, 4) == "!ex " then
        local TargetPlayer = FindPlayer(message:sub(5))
        if game.Players:FindFirstChild(TargetPlayer) then
            local TPH = game.Players:FindFirstChild(TargetPlayer)
            if TPH.Character then
                if TPH.Character:FindFirstChild("HumanoidRootPart") then
                    local TPH = game.Players:FindFirstChild(TargetPlayer)
                    local Explosion = Instance.new("Explosion", TPH.Character)
                    Explosion.BlastRadius = 3
                    Explosion.Position = TPH.Character.HumanoidRootPart.Position
                    NewMessage("Exploded " .. TargetPlayer)
                else
                    NewErrorMessage("Error: HumanoidRootPart Not Found!")
                end
            else
                NewErrorMessage("Error: Character Not Found!")
            end
        else
            NewErrorMessage("Error: Player Not Found!")
        end
    elseif messageLow:sub(1, 6) == "!stun " then
        local TargetPlayer = FindPlayer(message:sub(7))
        if game.Players:FindFirstChild(TargetPlayer) then
            if game.Players:FindFirstChild(TargetPlayer).Character then
                if game.Players:FindFirstChild(TargetPlayer).Character:FindFirstChildOfClass("Humanoid") then
                    game.Players:FindFirstChild(TargetPlayer).Character:FindFirstChildOfClass("Humanoid").PlatformStand = true
                    NewMessage("Studed " .. TargetPlayer)
                else
                    NewErrorMessage("Error: Humanoid Not Found!")
                end
            else
                NewErrorMessage("Error: Character Not Found!")
            end
        else
            NewErrorMessage("Error: Player Not Found!")
        end
    elseif messageLow:sub(1, 8) == "!unstun " then
        local TargetPlayer = FindPlayer(message:sub(9))
        if game.Players:FindFirstChild(TargetPlayer) then
            if game.Players:FindFirstChild(TargetPlayer).Character then
                if game.Players:FindFirstChild(TargetPlayer).Character:FindFirstChildOfClass("Humanoid") then
                    game.Players:FindFirstChild(TargetPlayer).Character:FindFirstChildOfClass("Humanoid").PlatformStand = false
                    NewMessage("Unstuded " .. TargetPlayer)
                else
                    NewErrorMessage("Error: Humanoid Not Found!")
                end
            else
                NewErrorMessage("Error: Character Not Found!")
            end
        else
            NewErrorMessage("Error: Player Not Found!")
        end
    elseif messageLow:sub(1, 7) == "!fling " then
        local TargetPlayer = FindPlayer(message:sub(8))
        if game.Players:FindFirstChild(TargetPlayer) then
            if game.Players:FindFirstChild(TargetPlayer).Character then
                if game.Players:FindFirstChild(TargetPlayer).Character:FindFirstChild("HumanoidRootPart") then
                    local TPH = game.Players:FindFirstChild(TargetPlayer).Character.HumanoidRootPart
                    local Body = Instance.new("BodyPosition")
                    Body.Parent = TPH
                    Body.Position = Vector3.new(999 * 999,999 * 999,999 * 999)
                    Body.MaxForce = Vector3.new(math.huge,math.huge,math.huge)
                    NewMessage("Flinged " .. TargetPlayer)
                else
                    NewErrorMessage("Error: HumanoidRootPart Not Found!")
                end
            else
                NewErrorMessage("Error: Character Not Found!")
            end
        else
            NewErrorMessage("Error: Player Not Found!")
        end
    elseif messageLow:sub(1, 3) == "!m " then
        Message(message:sub(4))
        NewMessage("Made Message")
    elseif messageLow:sub(1, 5) == "!list" then
        for i, player in pairs(game.Players:GetChildren()) do
            NewMessage(player.Name)
        end
        NewMessage("Listed Players")
    elseif messageLow:sub(1, 8) == "!chatlog" then
        for i, m in pairs(Chat) do
            NewMessage(m)
        end
        NewMessage("Listed chatlog")
    end
end)

function FindPlayer(FindUser)
    local findUser = string.lower(FindUser)
    local inputsize = string.len(findUser)
    for i, v in pairs(game.Players:GetChildren()) do
        local NameLow = string.lower(v.Name)
        if NameLow:sub(1, inputsize) == findUser:sub(1, inputsize) then
            return v.Name
        end
    end
    return "nil"
end

game.Players.ChildAdded:Connect(function(newPlayer)
    NewMessage("Connected: " .. newPlayer.Name)
    newPlayer.Chatted:Connect(function(msg)
        local msg = game:GetService("Chat"):FilterStringAsync(msg,newPlayer,newPlayer)
        table.insert(Chat,newPlayer.Name .. ": " .. msg)
        NewChatMessage(newPlayer.Name .. ": " .. msg)
    end)
end)

for i,Player in pairs(game.Players:GetPlayers()) do
    Player.Chatted:Connect(function(msg)
        local msg = game:GetService("Chat"):FilterStringAsync(msg,Player,Player)
        table.insert(Chat,Player.Name .. ": " .. msg)
        NewChatMessage(Player.Name .. ": " .. msg)
    end)
end

game.Players.ChildRemoved:Connect(function(removedPlayer)
    NewMessage("Disconnected: " .. removedPlayer.Name)
end)

function Message(message)
    for i, player in pairs(game.Players:GetChildren()) do
        -- Instances:
        local Gui = Instance.new("ScreenGui")
        local Text = Instance.new("TextLabel")
        --Properties:
        Gui.Name = "Message"
        Gui.Parent = player:WaitForChild("PlayerGui")
        Gui.ZIndexBehavior = Enum.ZIndexBehavior.Sibling

        Text.Name = "Text"
        Text.Text = message
        Text.Parent = Gui
        Text.BackgroundColor3 = Color3.new(0.384314, 0.384314, 0.384314)
        Text.BackgroundTransparency = 0.55000001192093
        Text.BorderSizePixel = 0
        Text.Size = UDim2.new(1, 0, 1, 0)
        Text.Font = Enum.Font.SciFi
        Text.TextColor3 = Color3.new(0, 0, 0)
        Text.TextSize = 50
        game.Debris:AddItem(Gui,5)
    end
end

owner.CharacterAdded:connect(function(char)
    local plrH = char:WaitForChild('HumanoidRootPart')
    local plrH2 = plrH:Clone()
    plrH2.Parent = char
    plrH2.Name = "HumanoidRootPart2"
    local Weld = Instance.new("Weld",char)
    Weld.Part0 = plrH
    Weld.Part1 = plrH2
    plrH2.ChildAdded:Connect(function(New)
        game.Debris:AddItem(New,5)
        wait(5)
        Messages = Messages-1
    end)
    coroutine.resume(auto_move)
end)
owner:LoadCharacter()
wait(1)
NewMessage("Enum’s Admin V4 Loaded")