Slender REBORN Op Gui

-- Objects

local ScreenGui = Instance.new("ScreenGui")
local Holder = Instance.new("Frame")
local Title = Instance.new("TextLabel")
local ScrollingFrame = Instance.new("ScrollingFrame")
local Title2 = Instance.new("TextLabel")
local Close = Instance.new("TextButton")
local Open = Instance.new("TextButton")

-- Properties

ScreenGui.Parent = game.Players.LocalPlayer.PlayerGui

Holder.Name = "Holder"
Holder.Parent = ScreenGui
Holder.Active = true
Holder.AnchorPoint = Vector2.new(0, 0.5)
Holder.BackgroundColor3 = Color3.new(0.298039, 0.298039, 0.298039)
Holder.BorderSizePixel = 0
Holder.Draggable = true
Holder.Position = UDim2.new(0, 25, 0.5, 0)
Holder.Size = UDim2.new(0, 150, 0, 290)

Title.Name = "Title"
Title.Parent = Holder
Title.BackgroundColor3 = Color3.new(1, 1, 1)
Title.BackgroundTransparency = 1
Title.Size = UDim2.new(0, 120, 0, 10)
Title.ZIndex = 2
Title.Font = Enum.Font.SourceSansBold
Title.Text = "Slender man's Revenge"
Title.TextColor3 = Color3.new(0.1, 1, 1)
Title.TextSize = 14
Title.TextYAlignment = Enum.TextYAlignment.Top

ScrollingFrame.Parent = Holder
ScrollingFrame.AnchorPoint = Vector2.new(0.5, 0.5)
ScrollingFrame.BackgroundColor3 = Color3.new(0.196078, 0.196078, 0.196078)
ScrollingFrame.BorderSizePixel = 0
ScrollingFrame.Position = UDim2.new(0.5, 0, 0, 155)
ScrollingFrame.Size = UDim2.new(0, 140, 0, 250)
ScrollingFrame.BottomImage = "rbxassetid://985424344"
ScrollingFrame.CanvasSize = UDim2.new(0, 0, 0, 478)
ScrollingFrame.MidImage = "rbxassetid://985424344"
ScrollingFrame.ScrollBarThickness = 3
ScrollingFrame.TopImage = "rbxassetid://985424344"

Title2.Name = "Title2"
Title2.Parent = Holder
Title2.BackgroundColor3 = Color3.new(1, 1, 1)
Title2.BackgroundTransparency = 1
Title2.Position = UDim2.new(0, 0, 0, 10)
Title2.Size = UDim2.new(0, 120, 0, 10)
Title2.ZIndex = 2
Title2.Font = Enum.Font.SourceSansBold
Title2.Text = "Hack Gui"
Title2.TextColor3 = Color3.new(0.1, 1, 1)
Title2.TextSize = 14
Title2.TextYAlignment = Enum.TextYAlignment.Top

Close.Name = "Close"
Close.Parent = Holder
Close.BackgroundColor3 = Color3.new(0.282353, 0.282353, 0.282353)
Close.BorderSizePixel = 0
Close.Position = UDim2.new(0, 123, 0, 3)
Close.Size = UDim2.new(0, 20, 0, 22)
Close.Font = Enum.Font.SourceSansBold
Close.Text = "X"
Close.TextColor3 = Color3.new(0.1, 0.5, 0.5)
Close.TextScaled = true
Close.TextSize = 20
Close.TextWrapped = true

Open.Name = "Open"
Open.Parent = ScreenGui
Open.BackgroundColor3 = Color3.new(0.282353, 0.282353, 0.282353)
Open.BorderSizePixel = 0
Open.Position = UDim2.new(0, -100, 0.5, 155)
Open.Size = UDim2.new(0, 80, 0, 22)
Open.Font = Enum.Font.SourceSansBold
Open.Text = "Open"
Open.TextColor3 = Color3.new(0.1, 0.5, 0.5)
Open.TextScaled = true
Open.TextSize = 20
Open.TextWrapped = true

--Function

local frameitems = {"Military gear","Pet","Gravity","Taunt","PickPop","Original Cola Token","Fruit Cola Token","Camera","Popcorn","Latte","FlashLight","Lantern","PowerLED","Flare","GlowStick","Torch","iPhone","FlareGuns","Sans","Papyrus","Zombine","Combine","EliteCombine","RedSuit","PurpleSuit","BlackSuit","Skeleton","Praetor","ThirteenMillion","ThreeMillion","FourMillion"}

local frame = ScrollingFrame
for i=1, #frameitems do
local B = Instance.new("TextButton")
local VV = Instance.new("StringValue", B)
VV.Name = "Important"
VV.Value = frameitems[i]
B.Name = frameitems[i]
B.Parent = frame
B.BackgroundColor3 = Color3.new(0.282353, 0.282353, 0.282353)
B.BorderSizePixel = 0
B.Position = UDim2.new(0, 3, 0, (((i-1)*22)+(3*i)))
B.Size = UDim2.new(0, 134, 0, 22)
B.Font = Enum.Font.SourceSansBold
B.FontSize = Enum.FontSize.Size14
B.Text = frameitems[i]
B.TextColor3 = Color3.new(.1, .5, .5)
B.TextScaled = true
B.TextSize = 20
frame.CanvasSize = UDim2.new(0,0,0,(#frameitems*22+(i*3)+3))
if B.Name == "Military gear" then
B.Important.Value = "MGear"
elseif B.Name == "Pet" then
B.Important.Value = "Pets"
elseif B.Name == "Original Cola Token" then
B.Important.Value = "OCola"
elseif B.Name == "Fruit Cola Token" then
B.Important.Value = "FCola"
elseif B.Name == "Gravity" then
B.Important.Value = "Gravity"
elseif B.Name == "Taunt" then
B.Important.Value = "Taunt"
elseif B.Name == "Camera" then
B.Important.Value = "Twitter4"
elseif B.Name == "Latte" then
B.Important.Value = "Twitter2"
elseif B.Name == "Popcorn" then
B.Important.Value = "Twitter1"
end
B.MouseButton1Down:connect(function()
game.Players.LocalPlayer:FindFirstChild(B.Important.Value):FireServer()
end)
end
Open.MouseButton1Down:connect(function()
Open:TweenPosition(UDim2.new(0, -100, 0.5, 155), "Out", "Quad", 1,false)
Holder:TweenPosition(UDim2.new(0, 25, 0.5, 0), "Out", "Quad", 1,false)
end)
Close.MouseButton1Down:connect(function()
Open:TweenPosition(UDim2.new(0, 0, 0.5, 155), "Out", "Bounce", 1,false)
Holder:TweenPosition(UDim2.new(0, -200, 0.5, 0), "Out", "Quad", 1,false)
end)
while true do
wait()
for i,v in pairs(game.Players.LocalPlayer.Backpack:GetChildren()) do
if v.ClassName == "Tool" then
if v.CanBeDropped == false then
v.CanBeDropped = true
end
end
end
end