UI Test

Player = game.Players.LocalPlayer
Mouse = Player:GetMouse()
PlayerGui = Player:WaitForChild("PlayerGui")
Screen = Instance.new("ScreenGui",PlayerGui)
Top = Instance.new("TextButton",Screen)
Top.Size = UDim2.new(0,224,0,30)
Top.Style = "RobloxRoundButton"
Top.Text = "Server 1"
Top.TextColor3 = Color3.new(230/255,230/255,230/255)
Top.TextStrokeTransparency = 0.8
Top.Active = true
Top.Draggable = true
Top.AutoButtonColor = false
Top.TextXAlignment = "Left"
Top.ZIndex = 5
local TopConnected = Instance.new("ImageLabel",Top)
    TopConnected.BackgroundTransparency = 1
    TopConnected.Image = "rbxassetid://176612478"
    TopConnected.Parent = Top
    TopConnected.Position = UDim2.new(1,-15,0,-5)
    TopConnected.Size = UDim2.new(0,16,0,16)
    TopConnected.ZIndex = 6
    TopConnected.BackgroundTransparency = 1
    TopConnected.ImageColor3 = Color3.new(200/255,100/255,0)
    local TopConnectedGlow = TopConnected:clone()
        TopConnectedGlow.Image = "rbxassetid://174654077"
        TopConnectedGlow.Parent = TopConnected
        TopConnectedGlow.ImageTransparency = 0.2
        TopConnectedGlow.Position = UDim2.new(-0.2,0,-0.25,0)
        TopConnectedGlow.Size = UDim2.new(1.5,0,1.5,0)
        TopConnectedGlow.ZIndex = 6
        TopConnectedGlow.ImageColor3 = TopConnected.ImageColor3
Back = Instance.new("TextButton",Top)
Back.Text = ""
Back.Style = "RobloxRoundButton"
Back.Size = UDim2.new(0,220,0,20)
Back.Position = UDim2.new(0,-10,0,10)
Back.AutoButtonColor = false
BTN = 0
function glerp(UD1,UD2,a)
    return UDim2.new(
        UD1.X.Scale+((UD2.X.Scale-UD1.X.Scale)*a),
        UD1.X.Offset+((UD2.X.Offset-UD1.X.Offset)*a),
        UD1.Y.Scale+((UD2.Y.Scale-UD1.Y.Scale)*a),
        UD1.Y.Offset+((UD2.Y.Offset-UD1.Y.Offset)*a)
    )
end
function Button(plyr)
    Back.Size = Back.Size+UDim2.new(0,0,0,40)
    local Bt= Instance.new("TextButton",Back)
    Bt.Size = UDim2.new(0,200,0,40)
    Bt.Position = UDim2.new(0,-2,0,-2+(40*BTN))
    Bt.Style = Back.Style
    Bt.Text = ""
    local Switch = Instance.new("Frame",Bt)
        Switch.Position = UDim2.new(1,-15,-0.5,0)
        Switch.Size = UDim2.new(0,20,2,0)
        Switch.BackgroundTransparency = 1
        local Slider = Instance.new("ImageLabel",Switch)
            Slider.Size = UDim2.new(0,12,1,-14)
            Slider.Position = UDim2.new(0,5,0,6)
            Slider.Rotation = -90
            Slider.BackgroundTransparency = 1
            Slider.ZIndex = 2
            Slider.ImageColor3 = Color3.new(180/255,180/255,180/255)
            Slider.Image = "rbxassetid://176288837"
            local SliderTop = Instance.new("ImageLabel",Slider)
                SliderTop.Size = UDim2.new(0,14,0,14)
                SliderTop.Position = UDim2.new(0,5,0,3)
                SliderTop.BackgroundTransparency = 1
                SliderTop.ImageColor3 = Color3.new(170/255,170/255,170/255)
                SliderTop.Image = "rbxassetid://176612478"
            local SliderBottom = SliderTop:clone()
                SliderBottom.Position = UDim2.new(0,-6,0,3)
                SliderBottom.Parent = Slider
            local State = Instance.new("ImageButton",Slider)
                local StateOn = true
                State.BackgroundTransparency = 1
                State.Image = "rbxassetid://176612478"
                State.Parent = Slider
                State.Size = UDim2.new(0,14,0,14)
                State.BackgroundTransparency = 1
                State.ImageColor3 = Color3.new(0,200/255,0)
                State.Position = UDim2.new(0,5,0,3)
                State.ZIndex = 3
                local StateGlow = State:clone()
                    StateGlow.Image = "rbxassetid://174654077"
                    StateGlow.Parent = State
                    StateGlow.ImageTransparency = 0.2
                    StateGlow.Position = UDim2.new(-0.25,0,-0.25,0)
                    StateGlow.Size = UDim2.new(1.5,0,1.5,0)
                    StateGlow.ZIndex = 4
                StateGlow.MouseButton1Click:connect(function()
                    if StateOn then
                        StateOn = false
                        State.Position = UDim2.new(0,-5,0,3)
                        State.ImageColor3 = Color3.new(200/255,100/255,0)
                    else
                        StateOn = true
                        State.Position = UDim2.new(0,5,0,3)
                        State.ImageColor3 = Color3.new(0,200/255,0)
                    end
                    StateGlow.ImageColor3 = State.ImageColor3
                end)
                local GlowSize = Vector2.new(1.5,1.5)
                StateGlow.MouseEnter:connect(function()
                    GlowSize = Vector2.new(2.5,2.5)
                end)
                StateGlow.MouseLeave:connect(function()
                    GlowSize = Vector2.new(1.5,1.5)
                end)
                game:GetService("RunService").RenderStepped:connect(function()
                    StateGlow.Size = glerp(StateGlow.Size,UDim2.new(GlowSize.X,0,GlowSize.Y,0),0.1)
                    StateGlow.Position = UDim2.new(-((StateGlow.Size.X.Scale-1)/2),0,-((StateGlow.Size.Y.Scale-1)/2),0)
                end)
    local Pad1 = Instance.new("Frame",Bt)
        Pad1.BackgroundColor3 = Color3.new(100/255,100/255,100/255)
        Pad1.Position = UDim2.new(0,25,0.5,0)
        Pad1.Size = UDim2.new(1,-45,0,1)
        Pad1.BorderSizePixel = 0
    local Pad2 = Pad1:clone()
        Pad2.Parent = Bt
        Pad2.Size = UDim2.new(0,1,2,0)
        Pad2.Position = UDim2.new(0,25,-0.5,0)
    local Name = Instance.new("TextLabel",Bt)
        Name.Text = plyr ~= nil and plyr.Name or BTN+1
        Name.BackgroundTransparency = 1
        Name.Position = UDim2.new(0.2,-5,0,-5)
        Name.Size = UDim2.new(0.5,0,0,10)
        Name.TextColor3 = Color3.new(200/255,200/255,200/255)
        Name.FontSize = "Size14"
        Name.TextStrokeTransparency = 0.8
        Name.TextStrokeColor3 = Color3.new(0,0,0)
        Name.TextXAlignment = "Left"
        Name.Font = "SourceSans"
    local ID = Name:clone()
        ID.Parent = Bt
        ID.Text = "userId:"..(plyr ~= nil and plyr.userId or "userId: "..BTN+1)
        ID.Position = UDim2.new(0.2,-5,0,10)
    local Image = Instance.new("ImageLabel",Bt)
    Image.Image = "http://www.roblox.com/Thumbs/Avatar.ashx?x=100&y=100&Format=Png&username="..(plyr ~= nil and plyr.Name or "ROBLOX")
    Image.BackgroundTransparency = 1
    Image.Position = UDim2.new(0,-7,-0.5,0)
    Image.Size = UDim2.new(0,32,2,0)
    BTN = BTN+1
end
for i,v in pairs(game.Players:GetPlayers()) do
    Button(v)
end