SB Ranks

Player = owner.Name

local ScreenGui = Instance.new("ScreenGui",game:GetService("Players")[Player].PlayerGui)
ScreenGui.Name = "SB-Ranks"

local Frame = Instance.new("Frame",ScreenGui)
Frame.Position = UDim2.new(1 - 0.3,0,0,0)
Frame.Size = UDim2.new(0.3,0,1,0)
Frame.BackgroundColor3 = Color3.new(0.5,0.5,0.5)

local ScrollingFrame = Instance.new("Frame",Frame)
ScrollingFrame.Position = UDim2.new(0,0,0.1,0)
ScrollingFrame.Size = UDim2.new(0.9,0,0.9,0)
ScrollingFrame.BackgroundColor3 = Color3.new(1,1,1)

local ScrollBarFrame = Instance.new("Frame",Frame)
ScrollBarFrame.Position = UDim2.new(0.9,0,0.1,0)
ScrollBarFrame.Size = UDim2.new(0.1,0,0.9,0)
ScrollBarFrame.BackgroundColor3 = Color3.new(0.9,0.9,0.9)

local DownButton = Instance.new("TextButton",ScrollBarFrame)
DownButton.Text = "V"
DownButton.Position = UDim2.new(0,0,0.5,0)
DownButton.Size = UDim2.new(1,0,0.5,0)
DownButton.BackgroundColor3 = Color3.new(0.9,0.9,0.9)
DownButton.MouseButton1Click:Connect(function()
    for i,tb in pairs(ScrollingFrame:GetChildren()) do
        tb.Position = tb.Position - UDim2.new(0,0,0.05,0)
    end
end)

local UpButton = Instance.new("TextButton",ScrollBarFrame)
UpButton.Text = "V"
UpButton.Position = UDim2.new(0,0,0,0)
UpButton.Size = UDim2.new(1,0,0.5,0)
UpButton.Rotation = 180
UpButton.BackgroundColor3 = Color3.new(0.9,0.9,0.9)
UpButton.MouseButton1Click:Connect(function()
    for i,tb in pairs(ScrollingFrame:GetChildren()) do
        tb.Position = tb.Position + UDim2.new(0,0,0.05,0)
    end
end)

added = 0
function Add(plr)
    local TextLabel = Instance.new("TextLabel",ScrollingFrame)
    TextLabel.Text = plr.Name
    TextLabel.Position = UDim2.new(0.3,0,added,0)
    TextLabel.Size = UDim2.new(1-0.3,0,0.05,0)
    TextLabel.BackgroundColor3 = Color3.new(0.9,0.9,0.9)

    local TextLabel2 = Instance.new("TextLabel",ScrollingFrame)
    TextLabel2.Text = plr:GetRoleInGroup(3256759)
    TextLabel2.Position = UDim2.new(0,0,added,0)
    TextLabel2.Size = UDim2.new(0.3,0,0.05,0)
    TextLabel2.BackgroundColor3 = Color3.new(0.9,0.9,0.9)

    added = added + 0.05
end
function Open()
    added = 0
    for i,v in pairs(ScrollingFrame:GetChildren()) do
        v:Remove()
    end
    for i,v in pairs(game.Players:GetChildren()) do
        Add(v)
    end
    game.Players.ChildAdded:connect(function(v)
        Add(v)
    end)
end

local TextLabel = Instance.new("TextLabel",Frame)
TextLabel.Text = "SB Ranks"
TextLabel.Size = UDim2.new(1,0,0.1,0)
TextLabel.BackgroundColor3 = Color3.new(0.5,0.5,0.5)
TextLabel.TextScaled = true

local Frame2 = Instance.new("Frame",ScreenGui)
Frame2.Position = UDim2.new(1-0.3,0,-0.05,0)
Frame2.Size = UDim2.new(0.3,0,0.05,0)
Frame2.BackgroundColor3 = Color3.new(0,0,0)

local COButton = Instance.new("TextButton",ScreenGui)
COButton.Text = "V"
COButton.Rotation = 90 * 3
COButton.Position = UDim2.new(1 - 0.425,0,1-0.225,0)
COButton.Size = UDim2.new(0.2,0,0.1,0)
COButton.BackgroundColor3 = Color3.new(1,1,1)
COButton.MouseButton1Click:Connect(function()
    if COButton.Rotation == 90 * 3 then
        COButton.Rotation = 90
        Frame.Position = UDim2.new(1,0,0,0)
        COButton.Position = UDim2.new(1 - 0.125,0,1-0.225,0)
    else
        COButton.Rotation = 90 * 3
        Frame.Position = UDim2.new(1 - 0.3,0,0,0)
        COButton.Position = UDim2.new(1 - 0.425,0,1-0.225,0)
    end
end)

Open()
game.Players.RemovingPlayer:Connect(function()
    Open()
end)