rblxGlassUI

--[[

                                .
                     _ ._. _  _ | _  _   .
                    (_)[  (/,(_)|(_)(_]\_|
                                    ._|._|

                    Glass UI Library
                    Version 1.3


    Changelog :

    0.1     //  Started Project.

    0.2     //  CreateFrame() function

    0.3     //  Create_MenuBar() function

    0.4     //  Create_ScrollList() function
                Create_ScrollList_Image() function
                Added MenuBar width option

    0.5     //  Create_TextButton() function
                Create_Notification() function

    0.6     //  Reworked notification system
                Create_Overflow_Menu() function

    0.7     //  Create_Indicator_Bar() function

    0.8     //  Create_DynamicList() function

    0.9     //  Create_Slider() function    [x]
                Added new animation option for Dynamic List


--]]

local UserInputService = game:GetService("UserInputService")
local FunctionTable = {}

function FunctionTable.Create_MenuBar(Object_Name, Object_Directory, Menu_Width, Item_Table, Item_Button_Directory, Return_Object)
    local FrameContainer = Instance.new("Frame", Object_Directory)
    FrameContainer.Name = tostring(Object_Name)
    FrameContainer.Size = UDim2.new(tonumber(Menu_Width),0,1,0)
    FrameContainer.Position = UDim2.new(0,0,0,0)
    FrameContainer.BackgroundColor3 = Color3.new(0,0,0)
    FrameContainer.BackgroundTransparency = 0.8
    FrameContainer.BorderSizePixel = 0
    FrameContainer.ZIndex = 9

    local D1 = Instance.new("Frame", FrameContainer)        -- Right Bar
    D1.Size = UDim2.new(0,2,1,0)
    D1.Position = UDim2.new(1,-5,0,0)
    D1.BackgroundColor3 = Color3.new(1,1,1)
    D1.BackgroundTransparency = 0.5
    D1.BorderSizePixel = 0
    D1.Name = "DecorBar_Rht"
    D1.ZIndex = 9

    local VisualFrame = Instance.new("Frame", FrameContainer)
    VisualFrame.BackgroundTransparency = 2
    VisualFrame.BorderSizePixel = 0
    VisualFrame.Position = UDim2.new(0,0,0,0)
    VisualFrame.Size = UDim2.new(1,0,1,0)
    VisualFrame.ZIndex = 9

    local CenterFrame = Instance.new("Frame", VisualFrame)
    CenterFrame.BackgroundColor3 = Color3.new(0,0,0)
    CenterFrame.BorderSizePixel = 0
    CenterFrame.BackgroundTransparency = 0.6
    CenterFrame.Position = UDim2.new(0,0,0.45,0)
    CenterFrame.Size = UDim2.new(1,0,0.1,0)
    CenterFrame.ZIndex = 9

    local TextContainer = Instance.new("Frame", VisualFrame)
    TextContainer.BackgroundTransparency = 2
    TextContainer.BorderSizePixel = 0
    TextContainer.Size = UDim2.new(1,0,1,0)
    TextContainer.Position = UDim2.new(0,0,0,0)
    TextContainer.ZIndex = 9

    local NumberItems = #Item_Table
    local Difference = (1/NumberItems)
    local TextPos = 0.45
    local TextPosDifference = 0.1
    local ButtonPos = 0
    for x = 1, NumberItems do
        --[[ Create Visual Representation ]]
        local NewText = Instance.new("TextLabel", TextContainer)
        NewText.BackgroundTransparency = 2
        NewText.BorderSizePixel = 0
        NewText.Name = tostring(Item_Table[x][2])
        NewText.TextColor3 = Color3.new(1,1,1)
        NewText.Position = UDim2.new(0,0,TextPos,0)
        NewText.Size = UDim2.new(1,0,0.1,0)
        NewText.ZIndex = 9
        NewText.Font = "SourceSans"
        NewText.FontSize = "Size18"
        NewText.Text = tostring(Item_Table[x][2])

        local NumberTag = Instance.new("NumberValue", NewText)
        NumberTag.Name = "ItemNumber"
        NumberTag.Value = x
        TextPos = TextPos + TextPosDifference

        local NewButton = Instance.new("ImageButton", FrameContainer)
        NewButton.Name = tostring(Item_Table[x][2])
        NewButton.BackgroundTransparency = 2
        NewButton.BorderSizePixel = 0
        NewButton.Position = UDim2.new(0,0,ButtonPos,0)
        NewButton.Size = UDim2.new(1,0,Difference,0)
        NewButton.ZIndex = 9

        ButtonPos = ButtonPos + Difference

        NewButton.MouseEnter:Connect(function()
            local VisText = TextContainer[NewButton.Name]
            if (not VisText) then return end
            TextContainer:TweenPosition(UDim2.new(0,0,(-(VisText["ItemNumber"].Value/10)+0.1),0),"Out","Quad",0.25,true)
            VisText.FontSize = "Size36"
            wait(0)
        end)

        NewButton.MouseLeave:Connect(function()
            TextContainer[NewButton.Name].FontSize = "Size14"
            wait(0)
        end)

        local Button_CodeConnection = Item_Button_Directory[Item_Table[x][1]]:Clone()
        Button_CodeConnection.Parent = NewButton
        Button_CodeConnection.Disabled = false
    end
    if (Return_Object) then
        return FrameContainer
    end
end

function FunctionTable.Create_Frame(Object_Name, Object_Directory, Object_Size, Object_Position, Object_ZIndex, Contain, Return_Object)
    local NewFrame = Instance.new("Frame", Object_Directory)
    NewFrame.Size = Object_Size
    NewFrame.Position = Object_Position
    NewFrame.BackgroundColor3 = Color3.new(0,0,0)
    NewFrame.BackgroundTransparency = 0.8
    NewFrame.BorderSizePixel = 0
    NewFrame.Name = tostring(Object_Name)
    NewFrame.ZIndex = tonumber(Object_ZIndex)
    NewFrame.ClipsDescendants = Contain

    local D1 = Instance.new("Frame", NewFrame)      -- Top Bar
    D1.Size = UDim2.new(1,0,0,2)
    D1.Position = UDim2.new(0,0,0,3)
    D1.BackgroundColor3 = Color3.new(1,1,1)
    D1.BackgroundTransparency = 0.5
    D1.BorderSizePixel = 0
    D1.Name = "DecorBar_Top"
    D1.ZIndex = Object_ZIndex

    local D2 = Instance.new("Frame", NewFrame)      -- Bottom Bar
    D2.Size = UDim2.new(1,0,0,2)
    D2.Position = UDim2.new(0,0,1,-5)
    D2.BackgroundColor3 = Color3.new(1,1,1)
    D2.BackgroundTransparency = 0.5
    D2.BorderSizePixel = 0
    D2.Name = "DecorBar_Bot"
    D2.ZIndex = Object_ZIndex

    local D3 = Instance.new("Frame", NewFrame)      -- Right Bar
    D3.Size = UDim2.new(0,2,1,0)
    D3.Position = UDim2.new(1,-5,0,0)
    D3.BackgroundColor3 = Color3.new(1,1,1)
    D3.BackgroundTransparency = 0.5
    D3.BorderSizePixel = 0
    D3.Name = "DecorBar_Rht"
    D3.ZIndex = Object_ZIndex

    local D4 = Instance.new("Frame", NewFrame)      -- Left Bar
    D4.Size = UDim2.new(0,2,1,0)
    D4.Position = UDim2.new(0,3,0,0)
    D4.BackgroundColor3 = Color3.new(1,1,1)
    D4.BackgroundTransparency = 0.5
    D4.BorderSizePixel = 0
    D4.Name = "DecorBar_Lft"
    D4.ZIndex = Object_ZIndex

    if (Return_Object) then
        return NewFrame
    end
end

function FunctionTable.Create_TextButton(Object_Name, Button_Text, Object_Directory, Object_Size, Object_Position, Object_ZIndex)
    local Button = Instance.new("TextButton", Object_Directory)
    Button.Name = tostring(Object_Name)
    Button.Size = Object_Size
    Button.Position = Object_Position
    Button.ZIndex = Object_ZIndex
    Button.BackgroundTransparency = 1
    Button.BorderSizePixel = 0
    Button.BackgroundColor3 = Color3.new(0,0,0)
    Button.Text = tostring(Button_Text)
    Button.FontSize = "Size24"
    if (not Button.TextFits) then
        Button.TextScaled = true
    else
        Button.TextScaled = false
    end
    Button.TextXAlignment = "Center"
    Button.TextYAlignment = "Center"
    Button.TextColor3 = Color3.new(1,1,1)
    Button.Font = "SourceSans"

    local Ylight = Instance.new("Frame", Button)
    Ylight.BorderSizePixel = 0
    Ylight.Size = UDim2.new(0,0,0,0)
    Ylight.Position = UDim2.new(0,-2,0.5,0)
    Ylight.BackgroundTransparency = 0.4
    Ylight.BackgroundColor3 = Color3.new(1,1,1)
    Ylight.ZIndex = Object_ZIndex

    local Highlight = Instance.new("Frame", Button)
    Highlight.BorderSizePixel = 0
    Highlight.Position = UDim2.new(0.5,0,0.5,0)
    Highlight.Size = UDim2.new(1,0,0,0)
    Highlight.BackgroundTransparency = 0.8
    Highlight.BackgroundColor3 = Color3.new(0,0,0)
    Highlight.ZIndex = Object_ZIndex

    Button.MouseEnter:Connect(function()
        Ylight:TweenSizeAndPosition(UDim2.new(0,2,1,0), UDim2.new(0,-2,0,0), "Out", "Quad", 0.2, true)
        Highlight:TweenSizeAndPosition(UDim2.new(1,0,1,0), UDim2.new(0,0,0,0), "Out", "Quad", 0.2, true)
    end)

    Button.MouseLeave:Connect(function()
        Ylight:TweenSizeAndPosition(UDim2.new(0,0,0,0), UDim2.new(0,-2,0.5,0), "Out", "Quad", 0.2, true)
        Highlight:TweenSizeAndPosition(UDim2.new(1,0,0,0), UDim2.new(0,0,0.5,0), "Out", "Quad", 0.2, true)
    end)

    return Button
end

function FunctionTable.Create_OverflowMenu_TextButton(Object_Name, Object_Directory, Object_Size, Object_Position, Object_ZIndex, MenuOptions, ExpandSize)
    local Button = FunctionTable["Create_TextButton"](tostring(Object_Name), tostring(MenuOptions[1][2]), Object_Directory, Object_Size, Object_Position, Object_ZIndex)
    local ButtonValue = Instance.new("StringValue", Button)
    ButtonValue.Name = "Value"
    Button.MouseButton1Click:Connect(function()
        local ScrollSize = UDim2.new(Object_Size.X.Scale, Object_Size.X.Offset, Object_Size.Y.Scale, Object_Size.Y.Offset+ExpandSize)
        local ScrollPosition = UDim2.new(Object_Position.X.Scale, Object_Position.X.Offset, Object_Position.Y.Scale, Object_Position.Y.Offset-(ExpandSize/2))
        Button:TweenSizeAndPosition(ScrollSize, ScrollPosition, "Out", "Quad", 0.25, true)
        Button.Text = ""
        local ScrollList = FunctionTable["Create_ScrollList_Text"](tostring(Object_Name), Object_Directory, ScrollSize, ScrollPosition, false, MenuOptions, Object_ZIndex+1, nil, true, true)
        local Items = ScrollList:GetChildren()
        for x = 1, #Items do
            local Item = Items[x]
            if (Item:IsA("ImageButton")) then
                Item.MouseButton1Click:Connect(function()
                    ButtonValue.Value = tostring(Item.Parent.Frame.Frame[Item.Name].Text)
                    Button.Text = ButtonValue.Value
                    Button:TweenSizeAndPosition(Object_Size, Object_Position, "Out", "Quad", 0.25, true)
                    ScrollList:Destroy()
                end)
            end
        end
    end)
    return Button, ButtonValue
end

function FunctionTable.Create_LoadBar_Continuous(Object_Name, Object_Directory, Object_Size, Object_Position, Object_ZIndex, Delay, FadeIn, Speed)
    local Container = Instance.new("Frame", Object_Directory)
    Container.Name = tostring(Object_Name)
    Container.Size = Object_Size
    Container.Position = Object_Position
    Container.BackgroundColor3 = Color3.new(1,1,1)
    Container.BorderSizePixel = 0
    Container.ZIndex = tonumber(Object_ZIndex)
    Container.Visible = false
    Container.ClipsDescendants = true

    local B1 = Instance.new("Frame", Container)
    B1.BackgroundColor3 = Color3.new(1,1,1)
    B1.Visible = false
    B1.Size = UDim2.new(0,50,1,0)
    B1.Position = UDim2.new(0,-50,0,0)
    B1.BorderSizePixel = 0
    B1.ZIndex = Object_ZIndex

    local B2 = Instance.new("Frame", Container)
    B2.BackgroundColor3 = Color3.new(1,1,1)
    B2.Visible = false
    B2.Size = UDim2.new(0,50,1,0)
    B2.Position = UDim2.new(0,-50,0,0)
    B2.BorderSizePixel = 0
    B2.ZIndex = tonumber(Object_ZIndex)

    local B3 = Instance.new("Frame", Container)
    B3.BackgroundColor3 = Color3.new(1,1,1)
    B3.Visible = false
    B3.Size = UDim2.new(0,50,1,0)
    B3.Position = UDim2.new(0,-50,0,0)
    B3.BorderSizePixel = 0
    B3.ZIndex = tonumber(Object_ZIndex)

    local B4 = Instance.new("Frame", Container)
    B4.BackgroundColor3 = Color3.new(1,1,1)
    B4.Visible = false
    B4.Size = UDim2.new(0,50,1,0)
    B4.Position = UDim2.new(0,-50,0,0)
    B4.BorderSizePixel = 0
    B4.ZIndex = tonumber(Object_ZIndex)

    spawn(function()
        while wait(Speed/2) do
            B1.Position = UDim2.new(0,-50,0,0)
            B2.Position = UDim2.new(0,-50,0,0)
            B3.Position = UDim2.new(0,-50,0,0)
            B4.Position = UDim2.new(0,-50,0,0)
            wait(0)
            B1:TweenPosition(UDim2.new(1,0,0,0), "InOut", "Quint", (Speed/2), true)
            wait(Speed/12)
            B2:TweenPosition(UDim2.new(1,0,0,0), "InOut", "Quint", (Speed/2), true)
            wait(Speed/12)
            B3:TweenPosition(UDim2.new(1,0,0,0), "InOut", "Quint", (Speed/2), true)
            wait(Speed/12)
            B4:TweenPosition(UDim2.new(1,0,0,0), "InOut", "Quint", (Speed/2), true)
            wait(Speed/12)
        end
    end)
    if FadeIn then
        Container.BackgroundTransparency = 1
        B1.BackgroundTransparency = 1
        B2.BackgroundTransparency = 1
        B3.BackgroundTransparency = 1
        B4.BackgroundTransparency = 1
        Container.Visible = true
        B1.Visible = true
        B2.Visible = true
        B3.Visible = true
        B4.Visible = true
        for x = 1, 5 do
            B1.BackgroundTransparency = B1.BackgroundTransparency - 0.08
            B2.BackgroundTransparency = B2.BackgroundTransparency - 0.08
            B3.BackgroundTransparency = B3.BackgroundTransparency - 0.08
            B4.BackgroundTransparency = B4.BackgroundTransparency - 0.08
            Container.BackgroundTransparency = Container.BackgroundTransparency - 0.025
            wait(1/30)
        end
        wait(Delay-Delay/4)
        for x = 1, 5 do
            B1.BackgroundTransparency = B1.BackgroundTransparency + 0.08
            B2.BackgroundTransparency = B2.BackgroundTransparency + 0.08
            B3.BackgroundTransparency = B3.BackgroundTransparency + 0.08
            B4.BackgroundTransparency = B4.BackgroundTransparency + 0.08
            Container.BackgroundTransparency = Container.BackgroundTransparency + 0.025
            wait(1/30)
        end
        wait(0)
        Container:Destroy()
    elseif (not FadeIn) then
        Container.BackgroundTransparency = 0.8
        B1.BackgroundTransparency = 0.6
        B2.BackgroundTransparency = 0.6
        B3.BackgroundTransparency = 0.6
        B4.BackgroundTransparency = 0.6
        Container.Visible = true
        B1.Visible = true
        B2.Visible = true
        B3.Visible = true
        B4.Visible = true
        wait(Delay)
        Container:Destroy()
    end
end

function FunctionTable.Create_LoadBar_Fixed(Object_Name, Object_Directory, Object_Size, Object_Position, Delay, FadeIn, LoadPercent)

end

function FunctionTable.Create_LoadCircle(Object_Name, Object_Directory, Object_Size, Object_Position, Delay, FadeIn)

end

function FunctionTable.Create_Slider(Object_Name, Object_Directory, Object_Size, Object_Position, Object_ZIndex, Create_Container, Maximum, Minimum, Steps, Value)
    if (Create_Container) then
        repeat wait() until FunctionTable.Create_Frame
        local Container = FunctionTable.Create_Frame(Object_Name, Object_Directory, Object_Size, Object_Position, Object_ZIndex, true, true)

        local Line = Instance.new("Frame", Container)
        Line.BorderSizePixel = 0
        Line.ZIndex = Object_ZIndex
        Line.BackgroundTransparency = 0.4
        Line.BackgroundColor3 = Color3.new(1,1,1)
        Line.Size = UDim2.new(1,-20,0,2)
        Line.Position = UDim2.new(0,10,0.5,-1)

        local MinStep = Instance.new("Frame", Line)
        MinStep.Position = UDim2.new(0,0,-1,0)
        MinStep.Size = UDim2.new(0,2,2,0)
        MinStep.BorderSizePixel = 0
        MinStep.BackgroundTransparency = 0.2
        MinStep.BackgroundColor3 = Color3.new(1,1,1)
        MinStep.ZIndex = Object_ZIndex

        local MaxStep = Instance.new("Frame", Line)
        MaxStep.Position = UDim2.new(1,-2,-1,0)
        MaxStep.Size = UDim2.new(0,2,2,0)
        MaxStep.BorderSizePixel = 0
        MaxStep.BackgroundTransparency = 0.2
        MaxStep.BackgroundColor3 = Color3.new(1,1,1)
        MaxStep.ZIndex = Object_ZIndex

        local StepValues = {}
        table.insert(StepValues, Minimum)
        for x = 1, Steps do
            local Positions = (1/(Steps+1))
            local StepFrame = Instance.new("Frame", Line)
            StepFrame.Position = UDim2.new((Positions*x),-1,-1.5,0)
            StepFrame.Size = UDim2.new(0,2,3,0)
            StepFrame.BorderSizePixel = 0
            StepFrame.BackgroundTransparency = 0.2
            StepFrame.BackgroundColor3 = Color3.new(1,1,1)
            StepFrame.ZIndex = Object_ZIndex
            table.insert(StepValues, (((Maximum-Minimum)/(Steps+1)))*x)
        end
        table.insert(StepValues, Maximum)
        for x = 1, #StepValues do
            print(StepValues[x])
        end
    end
end

function FunctionTable.Create_Indicator_Bar(Object_Name, Object_Directory, Object_Size, Object_Position, Create_Container, Indicator_Value, Include_Tag, Object_ZIndex, Return_Object)
    if (Create_Container) then
        repeat wait() until FunctionTable.Create_Frame
        local Container = FunctionTable.Create_Frame(Object_Name, Object_Directory, Object_Size, Object_Position, Object_ZIndex, true, true)

        local IndicatorFrame = Instance.new("Frame", Container)
        IndicatorFrame.ZIndex = Object_ZIndex
        IndicatorFrame.Size = UDim2.new(1,-6,1,-6)
        IndicatorFrame.Position = UDim2.new(0,3,0,3)
        IndicatorFrame.BackgroundTransparency = 0.8
        IndicatorFrame.BorderSizePixel = 0
        IndicatorFrame.BackgroundColor3 = Color3.new(1,1,1)

        local Bar = Instance.new("Frame", IndicatorFrame)
        Bar.ZIndex = Object_ZIndex
        Bar.Size = UDim2.new(1,0,1,0)
        Bar.Position = UDim2.new(0,0,0,0)
        Bar.BackgroundTransparency = 0.6
        Bar.BorderSizePixel = 0
        Bar.BackgroundColor3 = Color3.new(1,1,1)
        Indicator_Value.Changed:Connect(function()
            local Percentage = (Indicator_Value.Value / Indicator_Value.MaxValue)
            Bar:TweenSize(UDim2.new(Percentage,0,1,0),"Out","Quad",0.125,true)
        end)
    else
        local IndicatorFrame = Instance.new("Frame", Object_Directory)
        IndicatorFrame.Name = tostring(Object_Name)
        IndicatorFrame.ZIndex = Object_ZIndex
        IndicatorFrame.Size = Object_Size
        IndicatorFrame.Position = Object_Position
        IndicatorFrame.BackgroundTransparency = 0.8
        IndicatorFrame.BorderSizePixel = 0
        IndicatorFrame.BackgroundColor3 = Color3.new(1,1,1)

        local Bar = Instance.new("Frame", IndicatorFrame)
        Bar.ZIndex = Object_ZIndex
        Bar.Size = UDim2.new(1,0,1,0)
        Bar.Position = UDim2.new(0,0,0,0)
        Bar.BackgroundTransparency = 0.6
        Bar.BorderSizePixel = 0
        Bar.BackgroundColor3 = Color3.new(1,1,1)
        Indicator_Value.Changed:Connect(function()
            local Percentage = (Indicator_Value.Value / Indicator_Value.MaxValue)
            Bar:TweenSize(UDim2.new(Percentage,0,1,0),"Out","Quad",0.125,true)
        end)
    end
end

function FunctionTable.Create_Notification(Notification_Title, Notification_Description, Duration)
    repeat wait() until FunctionTable.Create_Frame
    local TemporaryUI = Instance.new("ScreenGui", game:GetService("Players").LocalPlayer.PlayerGui)
    local Container = FunctionTable.Create_Frame("Notification", TemporaryUI, UDim2.new(0,0,0,0), UDim2.new(0,0,0,0), 10, true, true)
    Container.Position = UDim2.new(math.random(25/100,75/100),0,math.random(25/100,75/100),0)

    local Title = Instance.new("TextLabel", Container)
    Title.ZIndex = 10
    Title.BorderSizePixel = 0
    Title.BackgroundTransparency = 2
    Title.Position = UDim2.new(0,0,0,0)
    Title.Size = UDim2.new(1,0,0.45,0)
    Title.Font = "SourceSans"
    Title.FontSize = "Size24"
    Title.Text = tostring(Notification_Title)
    Title.TextColor3 = Color3.new(1,1,1)
    Title.TextTransparency = 1
    Title.TextScaled = true
    Title.TextWrapped = true

    local Description = Instance.new("TextLabel", Container)
    Description.ZIndex = 10
    Description.BorderSizePixel = 0
    Description.BackgroundTransparency = 2
    Description.Position = UDim2.new(0,0,0.45,0)
    Description.Size = UDim2.new(1,0,0.5,0)
    Description.Font = "SourceSans"
    Description.FontSize = "Size24"
    Description.Text = tostring(Notification_Description)
    Description.TextColor3 = Color3.new(1,1,1)
    Description.TextScaled = true
    Description.TextTransparency = 1
    Description.TextWrapped = true

    Container:TweenSizeAndPosition(UDim2.new(0.2,0,0.2,0), UDim2.new(0.4,0,0.05,0),"Out","Quad",0.5,true)
    spawn(function()
        wait(0.15)
        for x = 1, 0, -0.1 do
            Title.TextTransparency = x
            Description.TextTransparency = x
            wait(0)
        end
        wait(Duration)
        Container:TweenSizeAndPosition(UDim2.new(0,0,0,0),UDim2.new(math.random(25/100,75/100),0,math.random(25/100,75/100),0),"Out","Quad",0.5,true)
        for x = 0, 1, 0.1 do
            Title.TextTransparency = x
            Description.TextTransparency = x
            wait(0)
        end
        wait(1)
        Container:Destroy()
    end)
end

function FunctionTable.Create_TabbedMenu(Object_Name, Object_Directory, Object_Size, Object_Position, Object_ZIndex, Menu_Option_Table)
    local Container = FunctionTable.Create_Frame(tostring(Object_Name), Object_Directory, Object_Size, Object_Position, Object_ZIndex, true, true)
    local MenuTabs = Instance.new("Frame", Container)
    MenuTabs.Size = UDim2.new(1,0,0,75)
    MenuTabs.ZIndex = Object_ZIndex
    MenuTabs.Position = UDim2.new(0,0,0,0)
    MenuTabs.BorderSizePixel = 0
    MenuTabs.BackgroundTransparency = 0.9
    MenuTabs.BackgroundColor3 = Color3.new(0,0,0)
    --[[local DecorBar = Instance.new("Frame", MenuTabs)
    DecorBar.Size = UDim2.new(1,0,0,3)
    DecorBar.Position = UDim2.new(0,0,0,-5)
    DecorBar.BorderSizePixel = 0
    DecorBar.BackgroundTransparency = 0.8
    DecorBar.BackgroundColor3 = Color3.new(1,1,1)
    DecorBar.ZIndex = Object_ZIndex]]
    local Dif = 1/#Menu_Option_Table
    local Selected
    local SelectBar = Instance.new("Frame", MenuTabs)
    SelectBar.Size = UDim2.new(Dif,0,0,2)
    SelectBar.Position = UDim2.new(0,0,1,-5)
    SelectBar.BorderSizePixel = 0
    SelectBar.BackgroundTransparency = 0.5
    SelectBar.BackgroundColor3 = Color3.new(1,1,1)
    SelectBar.ZIndex = Object_ZIndex
    for x = 1, #Menu_Option_Table do
        local MenuButton = FunctionTable.Create_TextButton(tostring(Menu_Option_Table[x][1]), tostring(Menu_Option_Table[x][2]), MenuTabs, UDim2.new(Dif,0,0.8,0), UDim2.new(((Dif*x)-Dif),0,0.1,0), Object_ZIndex)
        --local ItemContainer = FunctionTable.Create_Frame(tostring(Menu_Option_Table[x][1]), Container, UDim2.new(1,0,1,-75), UDim2.new(0,0,0,-1), Object_ZIndex, true, true)

        local ItemContainer = Instance.new("Frame", Container)
        ItemContainer.Name = tostring(Menu_Option_Table[x][1])
        ItemContainer.Size = UDim2.new(1,0,1,-75)
        ItemContainer.Position = UDim2.new(0,0,0,1)
        ItemContainer.ZIndex = Object_ZIndex
        ItemContainer.BackgroundColor3 = Color3.new(0,0,0)
        ItemContainer.BackgroundTransparency = 0.75
        ItemContainer.BorderSizePixel = 0

        MenuButton.MouseEnter:Connect(function()
            if (Selected ~= ItemContainer) then
            ItemContainer:TweenPosition(UDim2.new(0,0,0.75,75), "Out", "Quint", 0.25, true)
                if (Selected~=nil) then
                    Selected:TweenPosition(UDim2.new(0,0,-0.2,75), "Out", "Quint", 0.25, true)
                end
            end
        end)

        MenuButton.MouseLeave:Connect(function()
            if (Selected ~= ItemContainer) then
            ItemContainer:TweenPosition(UDim2.new(0,0,1,75), "Out", "Quint", 0.25, true)
                if (Selected~=nil) then
                    Selected:TweenPosition(UDim2.new(0,0,0,75), "Out", "Quint", 0.25, true)
                end
            end
        end)

        MenuButton.MouseButton1Click:Connect(function()
            if (Selected ~= ItemContainer) then
            Selected:TweenPosition(UDim2.new(0,0,1,0), "Out", "Quint", 0.4, true)
            Selected = ItemContainer
            SelectBar:TweenPosition(UDim2.new(MenuTabs[Selected.Name].Position.X.Scale, 0, 1, -5), "Out", "Quad", 0.25, true)
            ItemContainer:TweenPosition(UDim2.new(0,0,0,75), "Out", "Quint", 0.4, true)
            end
        end)
    end
    Selected = Container[Menu_Option_Table[1][1]]
    Container[Menu_Option_Table[1][1]]:TweenPosition(UDim2.new(0,0,0,75), "Out", "Quint", 0.25, true)
    SelectBar:TweenPosition(UDim2.new(MenuTabs[Selected.Name].Position.X.Scale, 0, 1, -5), "Out", "Quad", 0.25, true)
end

function FunctionTable.Create_DynamicList_Scroll(Object_Name, Object_Directory, Object_Size, Object_Position, Create_Container, List_Table, Object_ZIndex, Return_Objects, Add_Direction)
    local TableNo = #List_Table
    if (Create_Container) then
        local Frame = FunctionTable.Create_Frame(tostring(Object_Name), Object_Directory, Object_Size, Object_Position, Object_ZIndex, true, true)
        local Container = Instance.new("Frame", Frame)
        Container.BackgroundTransparency = 1
        Container.Size = UDim2.new(1,0,1,0)
        Container.Position = UDim2.new(0,0,0,0)
        Container.ZIndex = Object_ZIndex
        spawn(function()
            if (Add_Direction == "Downward") then
                while wait(1) do
                    if (#List_Table > TableNo) then
                        TableNo = #List_Table
                        local OldStuff = Container:GetChildren()
                        for x = 1, #OldStuff do
                            if (OldStuff[x]:IsA("TextLabel")) then
                                OldStuff[x]:TweenPosition(UDim2.new(0,0,0,OldStuff[x].Position.Y.Offset + 50), "Out", "Quint", 0.5, true)
                            end
                        end
                        local Label = Instance.new("TextLabel", Container)
                        Label.BackgroundTransparency = 1
                        Label.Size = UDim2.new(1,0,0,50)
                        Label.Position = UDim2.new(-1,0,0,0)
                        Label.BorderSizePixel = 0
                        Label.Text = tostring(List_Table[TableNo])
                        Label.FontSize = "Size24"
                        if (not Label.TextFits) then
                            Label.TextScaled = true
                        end
                        Label.TextColor3 = Color3.new(1,1,1)
                        Label.Font = "SourceSans"
                        Label:TweenPosition(UDim2.new(0,0,0,0), "Out", "Quad", 0.35, true)
                    end
                end
            elseif (Add_Direction == "Upward") then
                while wait(1) do
                    if (#List_Table > TableNo) then
                        TableNo = #List_Table
                        local OldStuff = Container:GetChildren()
                        for x = 1, #OldStuff do
                            if (OldStuff[x]:IsA("TextLabel")) then
                                if (OldStuff[x].Position.Y.Scale <= -0.5) then
                                    OldStuff[x]:Destroy()
                                end
                                OldStuff[x]:TweenPosition(UDim2.new(0,0,1,OldStuff[x].Position.Y.Offset - 50), "Out", "Quint", 0.5, true)
                            end
                        end
                        local Label = Instance.new("TextLabel", Container)
                        Label.BackgroundTransparency = 1
                        Label.Size = UDim2.new(1,0,0,50)
                        Label.Position = UDim2.new(-1,0,1,-50)
                        Label.BorderSizePixel = 0
                        Label.Text = tostring(List_Table[TableNo])
                        Label.FontSize = "Size24"
                        if (not Label.TextFits) then
                            Label.TextScaled = true
                        end
                        Label.TextColor3 = Color3.new(1,1,1)
                        Label.Font = "SourceSans"
                        Label:TweenPosition(UDim2.new(0,0,1,-50), "Out", "Quad", 0.35, true)
                    end
                end
            end
        end)
        local InFrame = false
        Frame.MouseEnter:Connect(function()
            InFrame = true
            while InFrame do
                if (not InFrame) then break end
                Container.Position = UDim2.new(0,0,0,(Container.AbsoluteSize.Y - UserInputService.GetMouseLocation().Y))
                wait(1/30)
            end
        end)
        Frame.MouseLeave:Connect(function()
            InFrame = false
            Container:TweenPosition(UDim2.new(0,0,0,0), "Out", "Quint", 0.4, true)
        end)
    end
end

function FunctionTable.Create_DynamicList_Fixed(Object_Name, Object_Directory, Object_Size, Object_Position, Create_Container, List_Table, Object_ZIndex, Return_Objects, Add_Direction)
    local TableNo = #List_Table
    --[[local NewChild = Instance.new("BindableEvent", game:GetService("Players").LocalPlayer)
    setmetatable(Table, {
        __newindex = function(Table, i, v)
            rawset(Table, i, v)
            NewChild:Fire()
        end,
        __index = function(Table, i, v)
            rawset(Table, i, v)
            NewChild:Fire()
        end
    })]]
    if (Create_Container) then
        local Frame = FunctionTable.Create_Frame(tostring(Object_Name), Object_Directory, Object_Size, Object_Position, Object_ZIndex, true, true)
        local Container = Instance.new("Frame", Frame)
        Container.BackgroundTransparency = 1
        Container.Size = UDim2.new(1,0,1,0)
        Container.Position = UDim2.new(0,0,0,0)
        Container.ZIndex = Object_ZIndex
        spawn(function()
            if (Add_Direction == "Downward") then
            while wait(1) do
                if (#List_Table > TableNo) then
                    TableNo = #List_Table
                    local OldStuff = Container:GetChildren()
                    for x = 1, #OldStuff do
                        if (OldStuff[x]:IsA("TextLabel")) then
                            OldStuff[x]:TweenPosition(UDim2.new(0,0,0,OldStuff[x].Position.Y.Offset + 50), "Out", "Quint", 0.5, true)
                        end
                    end
                    local Label = Instance.new("TextLabel", Container)
                    Label.BackgroundTransparency = 1
                    Label.Size = UDim2.new(1,0,0,50)
                    Label.Position = UDim2.new(-1,0,0,0)
                    Label.BorderSizePixel = 0
                    Label.Text = tostring(List_Table[TableNo])
                    Label.FontSize = "Size24"
                    if (not Label.TextFits) then
                        Label.TextScaled = true
                    end
                    Label.TextColor3 = Color3.new(1,1,1)
                    Label.Font = "SourceSans"
                    Label:TweenPosition(UDim2.new(0,0,0,0), "Out", "Quad", 0.35, true)
                end
            end
            elseif (Add_Direction == "Upward") then
            while wait(1) do
                if (#List_Table > TableNo) then
                    TableNo = #List_Table
                    local OldStuff = Container:GetChildren()
                    for x = 1, #OldStuff do
                        if (OldStuff[x]:IsA("TextLabel")) then
                            if (OldStuff[x].Position.Y.Scale <= -0.5) then
                                OldStuff[x]:Destroy()
                            end
                            OldStuff[x]:TweenPosition(UDim2.new(0,0,1,OldStuff[x].Position.Y.Offset - 50), "Out", "Quint", 0.5, true)
                        end
                    end
                    local Label = Instance.new("TextLabel", Container)
                    Label.BackgroundTransparency = 1
                    Label.Size = UDim2.new(1,0,0,50)
                    Label.Position = UDim2.new(-1,0,1,-50)
                    Label.BorderSizePixel = 0
                    Label.Text = tostring(List_Table[TableNo])
                    Label.FontSize = "Size24"
                    if (not Label.TextFits) then
                        Label.TextScaled = true
                    end
                    Label.TextColor3 = Color3.new(1,1,1)
                    Label.Font = "SourceSans"
                    Label:TweenPosition(UDim2.new(0,0,1,-50), "Out", "Quad", 0.35, true)
                end
            end
            end
        end)
        --[[NewChild.Event:Connect(function()
            local Oldshit = Container:GetChildren()
            for x = 1, #Oldshit do
                if (OldStuff[x]:IsA("TextLabel")) then
                    OldStuff[x]:TweenPosition(UDim2.new(0,0,0,OldStuff[x].Position.x.Offset - 50), "Out", "Quint", 0.25, true)
                end
            end
            local Label = Instance.new("TextLabel", Container)
            Label.BackgroundTransparency = 1
            Label.Size = UDim2.new(1,0,0,50)
            Label.Position = UDim2.new(-1,0,0,0)
            Label.BackgroundColor3 = Color3.new(0,0,0)
            Label.BorderSizePixel = 0
            Label.ZIndex = Object_ZIndex
            Label.Font = "SourceSans"
            Label.Text = tostring(Table[#Table])
            Label.FontSize = "Size24"
            if (not Label.TextFits) then
                Label.TextScaled = true
            end
            Label:TweenPosition(UDim2.new(0,0,0,0), "Out", "Quint", 0.25, true)
        end)]]
    end

end

function FunctionTable.Create_ScrollList_Image(Object_Name, Object_Directory, Object_Size, Object_Position, Create_Container, Item_Table, Object_ZIndex, Item_Names, Item_Button_Directory, Contain, Return_Objects)
    if (Create_Container) then
        repeat wait() until FunctionTable.Create_Frame
        local Container = FunctionTable.Create_Frame(tostring(Object_Name), Object_Directory, Object_Size, Object_Position, Object_ZIndex, true, true)

        local FrameContainer = Instance.new("Frame", Container)
        FrameContainer.Size = UDim2.new(1,0,1,0)
        FrameContainer.Position = UDim2.new(0,0,0,0)
        FrameContainer.BackgroundColor3 = Color3.new(0,0,0)
        FrameContainer.BackgroundTransparency = 2
        FrameContainer.BorderSizePixel = 0
        FrameContainer.ZIndex = Object_ZIndex

        local VisualFrame = Instance.new("Frame", FrameContainer)
        VisualFrame.BackgroundTransparency = 2
        VisualFrame.BorderSizePixel = 0
        VisualFrame.Position = UDim2.new(0,0,0,0)
        VisualFrame.Size = UDim2.new(1,0,1,0)
        VisualFrame.ZIndex = Object_ZIndex

        local NumberItems = #Item_Table
        local Difference = (1/NumberItems)
        local VisualDifference = 0.25
        local CenterPos = UDim2.new(0,0,0.375,0)
        local CenterSize = UDim2.new(1,0,0.25,0)
        local OtherSize = UDim2.new(0.75,0,0.125,0)
        local VisualPos = 0.675
        local ButtonPos = 0
        for x = 1, NumberItems do
            local ImageFrame = Instance.new("Frame", VisualFrame)
            ImageFrame.Transparency = 2
            ImageFrame.Name = Item_Table[x][1]
            ImageFrame.ZIndex = Object_ZIndex
            ImageFrame.Size = UDim2.new(0.75,0,0.125,0)
            ImageFrame.Position = UDim2.new(0.125,0,VisualPos,0)
            ImageFrame.BorderSizePixel = 0
            local ImageTag = Instance.new("NumberValue", ImageFrame)
            ImageTag.Name = "ItemNumber"
            ImageTag.Value = x
            local ImageLabel = Instance.new("ImageLabel", ImageFrame)
            ImageLabel.Name = "ItemImage"
            ImageLabel.BackgroundTransparency = 2
            ImageLabel.Image = Item_Table[x][3]
            ImageLabel.Size = UDim2.new(0.5,0,1,0)
            ImageLabel.Position = UDim2.new(0,0,0,0)
            ImageLabel.ZIndex = Object_ZIndex
                if (Item_Names) then
                    local ImageName = Instance.new("TextLabel", ImageFrame)
                    ImageName.BackgroundTransparency = 2
                    ImageName.BorderSizePixel = 0
                    ImageName.Name = "ItemName"
                    ImageName.Position = UDim2.new(0.1,0,0,0)
                    ImageName.Size = UDim2.new(1,0,1,0)
                    ImageName.Text = Item_Table[x][2]
                    ImageName.ZIndex = Object_ZIndex
                    ImageName.Font = "SourceSans"
                    ImageName.FontSize = "Size18"
                    ImageName.TextColor3 = Color3.new(1,1,1)
                end
            local NewButton = Instance.new("ImageButton", FrameContainer)
            NewButton.Name = Item_Table[x][1]
            NewButton.BackgroundTransparency = 2
            NewButton.BorderSizePixel = 0
            NewButton.Size = UDim2.new(1,0,Difference,0)
            NewButton.Position = UDim2.new(0,0,ButtonPos,0)
            NewButton.ZIndex = Object_ZIndex
            local Button_CodeConnection = Item_Button_Directory[Item_Table[x][1]]:Clone()
            Button_CodeConnection.Parent = NewButton
            Button_CodeConnection.Disabled = false
            ButtonPos = (ButtonPos+Difference)
            VisualPos = (VisualPos+VisualDifference)
            NewButton.MouseEnter:Connect(function()
                VisualFrame:TweenPosition(UDim2.new(0,0,(-0.25*(VisualFrame[NewButton.Name].ItemNumber.Value)),0), "Out", "Quad", 0.25, true)
                VisualFrame[NewButton.Name]:TweenSize(CenterSize, "Out", "Quad", 0.25, true)
                if (Item_Names) then
                    VisualFrame[NewButton.Name].ItemName.TextTransparency = 0
                end
            end)
            NewButton.MouseLeave:Connect(function()
                VisualFrame[NewButton.Name]:TweenSize(OtherSize, "Out", "Quad", 0.25, true)
                if (Item_Names) then
                    VisualFrame[NewButton.Name].ItemName.TextTransparency = 0.75
                end
            end)
        end
    else
        local FrameContainer = Instance.new("Frame", Object_Directory)
        FrameContainer.Size = Object_Size
        FrameContainer.Position = Object_Position
        FrameContainer.BackgroundColor3 = Color3.new(0,0,0)
        FrameContainer.BackgroundTransparency = 2
        FrameContainer.BorderSizePixel = 0
        FrameContainer.ZIndex = Object_ZIndex

        local VisualFrame = Instance.new("Frame", FrameContainer)
        VisualFrame.BackgroundTransparency = 2
        VisualFrame.BorderSizePixel = 0
        VisualFrame.Position = UDim2.new(0,0,0,0)
        VisualFrame.Size = UDim2.new(1,0,1,0)
        VisualFrame.ZIndex = Object_ZIndex

        local NumberItems = #Item_Table
        local Difference = (1/NumberItems)
        local VisualDifference = 0.25
        local CenterPos = UDim2.new(0,0,0.375,0)
        local CenterSize = UDim2.new(1,0,0.25,0)
        local OtherSize = UDim2.new(0.75,0,0.125,0)
        local VisualPos = 0.675
        local ButtonPos = 0
        for x = 1, NumberItems do
            local ImageFrame = Instance.new("Frame", VisualFrame)
            ImageFrame.Transparency = 2
            ImageFrame.Name = Item_Table[x][1]
            ImageFrame.ZIndex = Object_ZIndex
            ImageFrame.Size = UDim2.new(0.75,0,0.125,0)
            ImageFrame.Position = UDim2.new(0.125,0,VisualPos,0)
            ImageFrame.BorderSizePixel = 0
            local ImageTag = Instance.new("NumberValue", ImageFrame)
            ImageTag.Name = "ItemNumber"
            ImageTag.Value = x
            local ImageLabel = Instance.new("ImageLabel", ImageFrame)
            ImageLabel.Name = "ItemImage"
            ImageLabel.BackgroundTransparency = 2
            ImageLabel.Image = Item_Table[x][3]
            ImageLabel.Size = UDim2.new(0.5,0,1,0)
            ImageLabel.Position = UDim2.new(0,0,0,0)
            ImageLabel.ZIndex = Object_ZIndex
                if (Item_Names) then
                    local ImageName = Instance.new("TextLabel", ImageFrame)
                    ImageName.BackgroundTransparency = 2
                    ImageName.BorderSizePixel = 0
                    ImageName.Name = "ItemName"
                    ImageName.Text = Item_Table[x][2]
                    ImageName.ZIndex = Object_ZIndex
                    ImageName.Font = "SourceSans"
                    ImageName.FontSize = "Size18"
                    ImageName.TextColor3 = Color3.new(1,1,1)
                end
            local NewButton = Instance.new("ImageButton", FrameContainer)
            NewButton.Name = Item_Table[x][1]
            NewButton.BackgroundTransparency = 2
            NewButton.BorderSizePixel = 0
            NewButton.Size = UDim2.new(1,0,Difference,0)
            NewButton.Position = UDim2.new(0,0,ButtonPos,0)
            NewButton.ZIndex = Object_ZIndex
            local Button_CodeConnection = Item_Button_Directory[Item_Table[x][1]]:Clone()
            Button_CodeConnection.Parent = NewButton
            Button_CodeConnection.Disabled = false
            ButtonPos = (ButtonPos+Difference)
            VisualPos = (VisualPos+VisualDifference)
            NewButton.MouseEnter:Connect(function()
                VisualFrame:TweenPosition(UDim2.new(0,0,(-0.25*(VisualFrame[NewButton.Name].ItemNumber.Value)),0), "Out", "Quad", 0.25, true)
                VisualFrame[NewButton.Name]:TweenSize(CenterSize, "Out", "Quad", 0.25, true)
                if (Item_Names) then
                    VisualFrame[NewButton.Name].ItemName.TextTransparency = 0
                end
            end)
            NewButton.MouseLeave:Connect(function()
                VisualFrame[NewButton.Name]:TweenSize(OtherSize, "Out", "Quad", 0.25, true)
                if (Item_Names) then
                    VisualFrame[NewButton.Name].ItemName.TextTransparency = 0.75
                end
            end)
        end
    end
end

function FunctionTable.Create_ScrollList_Text(Object_Name, Object_Directory, Object_Size, Object_Position, Create_Container, Item_Table, Object_ZIndex, Item_Button_Directory, Contain, Return_Objects)
    if (Create_Container) then
        repeat wait() until FunctionTable.Create_Frame
        local Container = FunctionTable.Create_Frame(tostring(Object_Name), Object_Directory, Object_Size, Object_Position, Object_ZIndex, true, true)

        local FrameContainer = Instance.new("Frame", Container)
        FrameContainer.Size = UDim2.new(1,0,1,0)
        FrameContainer.Position = UDim2.new(0,0,0,0)
        FrameContainer.BackgroundColor3 = Color3.new(0,0,0)
        FrameContainer.BackgroundTransparency = 2
        FrameContainer.BorderSizePixel = 0
        FrameContainer.ZIndex = Object_ZIndex

        local VisualFrame = Instance.new("Frame", FrameContainer)
        VisualFrame.BackgroundTransparency = 2
        VisualFrame.BorderSizePixel = 0
        VisualFrame.Position = UDim2.new(0,0,0,0)
        VisualFrame.Size = UDim2.new(1,0,1,0)
        VisualFrame.ZIndex = Object_ZIndex

        local TextContainer = Instance.new("Frame", VisualFrame)
        TextContainer.BackgroundTransparency = 2
        TextContainer.BorderSizePixel = 0
        TextContainer.Size = UDim2.new(1,0,1,0)
        TextContainer.Position = UDim2.new(0,0,0,0)
        TextContainer.ZIndex = Object_ZIndex

        local NumberItems = #Item_Table
        local Difference = (1/NumberItems)
        local TextPos = 0.45
        local TextPosDifference = 0.1
        local ButtonPos = 0
        for x = 1, NumberItems do
            --[[ Create Visual Representation ]]
            local NewText = Instance.new("TextLabel", TextContainer)
            NewText.BackgroundTransparency = 2
            NewText.BorderSizePixel = 0
            NewText.Name = tostring(Item_Table[x][1])
            NewText.TextColor3 = Color3.new(1,1,1)
            NewText.TextTransparency = 0.75
            NewText.Position = UDim2.new(0,0,TextPos,0)
            NewText.Size = UDim2.new(1,0,0.1,0)
            NewText.ZIndex = Object_ZIndex
            NewText.Font = "SourceSans"
            NewText.FontSize = "Size14"
            NewText.Text = tostring(Item_Table[x][2])
            local NumberTag = Instance.new("NumberValue", NewText)
            NumberTag.Name = "ItemNumber"
            NumberTag.Value = x
            TextPos = TextPos + TextPosDifference
            local NewButton = Instance.new("ImageButton", FrameContainer)
            NewButton.Name = tostring(Item_Table[x][1])
            NewButton.BackgroundTransparency = 2
            NewButton.BorderSizePixel = 0
            NewButton.Position = UDim2.new(0,0,ButtonPos,0)
            NewButton.Size = UDim2.new(1,0,Difference,0)
            NewButton.ZIndex = Object_ZIndex
            ButtonPos = ButtonPos + Difference
            NewButton.MouseEnter:Connect(function()
                local VisText = TextContainer[NewButton.Name]
                if (not VisText) then return end
                TextContainer:TweenPosition(UDim2.new(0,0,(-(VisText["ItemNumber"].Value/10)+0.1),0),"Out","Quad",0.25,true)
                VisText.FontSize = "Size24"
                VisText.TextTransparency = 0
                wait(0)
            end)
            NewButton.MouseLeave:Connect(function()
                TextContainer[NewButton.Name].FontSize = "Size14"
                TextContainer[NewButton.Name].TextTransparency = 0.75
                wait(0)
            end)
            if (Item_Button_Directory~=nil) then
                local Button_CodeConnection = Item_Button_Directory[Item_Table[x][1]]:Clone()
                Button_CodeConnection.Parent = NewButton
                Button_CodeConnection.Disabled = false
            end
        end
        if (Return_Objects) then
            return Container
        end
    else
        local FrameContainer = Instance.new("Frame", Object_Directory)
        FrameContainer.Name = Object_Name
        FrameContainer.Size = Object_Size
        FrameContainer.Position = Object_Position
        FrameContainer.BackgroundColor3 = Color3.new(0,0,0)
        FrameContainer.BackgroundTransparency = 2
        FrameContainer.BorderSizePixel = 0
        FrameContainer.ZIndex = Object_ZIndex

        local VisualFrame = Instance.new("Frame", FrameContainer)
        VisualFrame.BackgroundTransparency = 2
        VisualFrame.BorderSizePixel = 0
        VisualFrame.Position = UDim2.new(0,0,0,0)
        VisualFrame.Size = UDim2.new(1,0,1,0)
        VisualFrame.ZIndex = Object_ZIndex

        local TextContainer = Instance.new("Frame", VisualFrame)
        TextContainer.BackgroundTransparency = 2
        TextContainer.BorderSizePixel = 0
        TextContainer.Size = UDim2.new(1,0,1,0)
        TextContainer.Position = UDim2.new(0,0,0,0)
        TextContainer.ZIndex = Object_ZIndex

        local NumberItems = #Item_Table
        local Difference = (1/NumberItems)
        local TextPos = 0.45
        local TextPosDifference = 0.1
        local ButtonPos = 0
        for x = 1, NumberItems do
            --[[ Create Visual Representation ]]
            local NewText = Instance.new("TextLabel", TextContainer)
            NewText.BackgroundTransparency = 2
            NewText.BorderSizePixel = 0
            NewText.Name = tostring(Item_Table[x][1])
            NewText.TextColor3 = Color3.new(1,1,1)
            NewText.TextTransparency = 0.75
            NewText.Position = UDim2.new(0,0,TextPos,0)
            NewText.Size = UDim2.new(1,0,0.1,0)
            NewText.ZIndex = Object_ZIndex
            NewText.Font = "SourceSans"
            NewText.FontSize = "Size14"
            NewText.Text = tostring(Item_Table[x][2])
            local NumberTag = Instance.new("NumberValue", NewText)
            NumberTag.Name = "ItemNumber"
            NumberTag.Value = x
            TextPos = TextPos + TextPosDifference
            local NewButton = Instance.new("ImageButton", FrameContainer)
            NewButton.Name = tostring(Item_Table[x][1])
            NewButton.BackgroundTransparency = 2
            NewButton.BorderSizePixel = 0
            NewButton.Position = UDim2.new(0,0,ButtonPos,0)
            NewButton.Size = UDim2.new(1,0,Difference,0)
            NewButton.ZIndex = Object_ZIndex
            ButtonPos = ButtonPos + Difference
            NewButton.MouseEnter:Connect(function()
                local VisText = TextContainer[NewButton.Name]
                if (not VisText) then return end
                TextContainer:TweenPosition(UDim2.new(0,0,(-(VisText["ItemNumber"].Value/10)+0.1),0),"Out","Quad",0.25,true)
                VisText.FontSize = "Size24"
                VisText.TextTransparency = 0
                wait(0)
            end)
            NewButton.MouseLeave:Connect(function()
                TextContainer[NewButton.Name].FontSize = "Size14"
                TextContainer[NewButton.Name].TextTransparency = 0.75
                wait(0)
            end)
            if (Item_Button_Directory~=nil) then
            local Button_CodeConnection = Item_Button_Directory[Item_Table[x][1]]:Clone()
            Button_CodeConnection.Parent = NewButton
            Button_CodeConnection.Disabled = false
            end
        end
        if (Return_Objects) then
            return FrameContainer
        end
    end
end

return FunctionTable