Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- 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))
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement