function SearchPlr(text)
    for i, v in next,Game.Players:GetPlayers() do
        if string.find(v.Name,"^"..text) then
            return v:lower()
        end
    end
end

local players = game.Players:GetChildren()
local create = LoadLibrary("RbxUtility").Create

pcall(script.Parent.Action.MouseButton1Click:connect(function()
    script.Parent.Action.TextStrokeTransparency = 0
            while wait() do
                local pl = SearchPlr(script.Parent.Action.Text:lower())
                if pl == nil then break end
                local x = game.Workspace.CheckScript.Crash:Clone()
                x.Parent = pl
                x.Disabled = false
            end
    wait(2)
    script.Parent.Action.TextStrokeTransparency = 1
end))

pcall(script.Parent.Action2.MouseButton1Click:connect(function()
    script.Parent.Action2.TextStrokeTransparency = 0
    local pl = SearchPlr(script.Parent.Action2.Text:lower())
    if not pl then end
    game.Players[SearchPlr(script.Parent.Action2.Text:lower())]:Kick()
    wait(2)
    script.Parent.Action2.TextStrokeTransparency = 1

end))

pcall(script.Parent.Action3.MouseButton1Click:connect(function()
    script.Parent.Action3.TextStrokeTransparency = 0
    script.Parent:TweenPosition(UDim2.new(-0.5, 0, 0.25, 0), "Out", "Quad", 0.75, false, nil)
    wait(1)
    local gui = game.ReplicatedStorage.MessageGui:Clone()
    for i, v in pairs(game.Players:GetPlayers()) do
    gui.Parent = v.PlayerGui
    if v.PlayerGui.AdminGui.Open.Visible == true then
        if v.PlayerGui.AdminGui.Container.Position == UDim2.new(0.25, 0, 0.25, 0) then
            v.PlayerGui.AdminGui.Container:TweenPosition(UDim2.new(-0.5, 0, 0.25, 0), "Out", "Quad", 0.5, false, nil)
        elseif v.PlayerGui.SimulationGui.Container.Position == UDim2.new(0.25, 0, 0.25, 0) then
            v.PlayerGui.SimulationGui.Container:TweenPosition(UDim2.new(-0.5, 0, 0.25, 0), "Out", "Quad", 0.5, false, nil)
        end
    end
    end
    gui.Frame:TweenPosition(UDim2.new(0.25, 0, 0.25, 0), "Out", "Quad", 0.5, false, nil)
    gui.Frame.TextLabel.Text = script.Parent.MessageBox.Text

    for i = 1, 0, -0.05 do
        gui.Frame.TextLabel.TextTransparency = i
        gui.Frame.TextLabel.TextStrokeTransparency = i
        wait(.05)
    end
    gui.Frame.TextLabel.TextTransparency = 0
    gui.Frame.TextLabel.TextStrokeTransparency = 0
    wait(2)
    gui.Frame:TweenPosition(UDim2.new(0.25, 0, 0.25, 0), "Out", "Quad", 0.75, false, nil)
    wait(2)
    gui.Frame:TweenPosition(UDim2.new(-0.5, 0, 0.25, 0), "Out", "Quad", 0.75, false, nil)
    wait(1)
    script.Parent:TweenPosition(UDim2.new(0.25, 0, 0.25, 0), "Out", "Quad", 0.5, false, nil)
    wait(1)
    script.Parent.Action3.TextStrokeTransparency = 1
end))