add gs
This commit is contained in:
@@ -0,0 +1,244 @@
|
||||
--[[
|
||||
// ScrollingTextBox.lua
|
||||
|
||||
// Creates a scrolling text box to be used with controlers and selectable
|
||||
// guis
|
||||
|
||||
// NOTE: Add any api needed to further expand this module
|
||||
]]
|
||||
local CoreGui = game:GetService("CoreGui")
|
||||
local GuiRoot = CoreGui:FindFirstChild("RobloxGui")
|
||||
local Modules = GuiRoot:FindFirstChild("Modules")
|
||||
local ShellModules = Modules:FindFirstChild("Shell")
|
||||
local TextService = game:GetService('TextService')
|
||||
|
||||
local GlobalSettings = require(ShellModules:FindFirstChild('GlobalSettings'))
|
||||
local Utility = require(ShellModules:FindFirstChild('Utility'))
|
||||
|
||||
local SoundManager = require(ShellModules:FindFirstChild('SoundManager'))
|
||||
|
||||
local createScrollingTextBox = function(size, position, parent)
|
||||
local this = {}
|
||||
|
||||
local SCROLL_BUFFER = 2
|
||||
|
||||
this.OnSelectableChanged = Utility.Signal()
|
||||
|
||||
-- adjust selection image
|
||||
local edgeSelectionImage = Utility.Create'ImageLabel'
|
||||
{
|
||||
Name = "EdgeSelectionImage";
|
||||
Size = UDim2.new(1, 32, 1, 32);
|
||||
Position = UDim2.new(0, -16, 0, -16);
|
||||
Image = 'rbxasset://textures/ui/SelectionBox.png';
|
||||
ScaleType = Enum.ScaleType.Slice;
|
||||
SliceCenter = Rect.new(21,21,41,41);
|
||||
BackgroundTransparency = 1;
|
||||
}
|
||||
|
||||
local container = Utility.Create'Frame'
|
||||
{
|
||||
Name = "ScrollingTextBox";
|
||||
Size = size or UDim2.new();
|
||||
Position = position or UDim2.new();
|
||||
BackgroundTransparency = 1;
|
||||
Parent = parent;
|
||||
}
|
||||
local scrollingFrame = Utility.Create'ScrollingFrame'
|
||||
{
|
||||
Name = "ScrollingBox";
|
||||
Size = UDim2.new(1, 0, 1, 0);
|
||||
Position = UDim2.new(0, 0, 0, 0);
|
||||
BackgroundTransparency = 1;
|
||||
ScrollBarThickness = 0;
|
||||
SelectionImageObject = edgeSelectionImage;
|
||||
Selectable = false;
|
||||
Parent = container;
|
||||
|
||||
SoundManager:CreateSound('MoveSelection');
|
||||
}
|
||||
local textLabel = Utility.Create'TextLabel'
|
||||
{
|
||||
Name = "TextLabel";
|
||||
Size = UDim2.new(1, 0, 4, 0);
|
||||
Position = UDim2.new(0, 0, 0, 0);
|
||||
BackgroundTransparency = 1;
|
||||
TextXAlignment = Enum.TextXAlignment.Left;
|
||||
TextYAlignment = Enum.TextYAlignment.Top;
|
||||
Font = GlobalSettings.LightFont;
|
||||
FontSize = GlobalSettings.DescriptionSize;
|
||||
TextColor3 = GlobalSettings.WhiteTextColor;
|
||||
TextWrapped = true;
|
||||
Text = "";
|
||||
Parent = scrollingFrame;
|
||||
}
|
||||
local upArrow = Utility.Create'ImageLabel'
|
||||
{
|
||||
Name = "UpArrow";
|
||||
BackgroundTransparency = 1;
|
||||
ImageColor3 = GlobalSettings.WhiteTextColor;
|
||||
Visible = false;
|
||||
Parent = container;
|
||||
Image = "rbxasset://textures/ui/Shell/Icons/UpIndicatorIcon@1080.png";
|
||||
Size = UDim2.new(0, 20, 0, 18);
|
||||
Position = UDim2.new(1, -20, 1, 21);
|
||||
}
|
||||
local downArrow = Utility.Create'ImageLabel'
|
||||
{
|
||||
Name = "DownArrow";
|
||||
BackgroundTransparency = 1;
|
||||
ImageColor3 = GlobalSettings.WhiteTextColor;
|
||||
Visible = false;
|
||||
Parent = container;
|
||||
Image = "rbxasset://textures/ui/Shell/Icons/DownIndicatorIcon@1080.png";
|
||||
Size = UDim2.new(0, 20, 0, 18);
|
||||
Position = UDim2.new(1, -20, 1, 43);
|
||||
}
|
||||
|
||||
local hintImage = Utility.Create'ImageLabel'
|
||||
{
|
||||
Name = "RightStickHint";
|
||||
BackgroundTransparency = 1;
|
||||
ImageColor3 = GlobalSettings.WhiteTextColor;
|
||||
Visible = false;
|
||||
Parent = container;
|
||||
Image = "rbxasset://textures/ui/Shell/Icons/RightStickHint@1080.png";
|
||||
Size = UDim2.new(0, 32, 0, 32);
|
||||
Position = UDim2.new(1, -64, 1, 25);
|
||||
}
|
||||
|
||||
--[[ Private Functions ]]--
|
||||
local function setArrowState()
|
||||
local canvasPosition = scrollingFrame.CanvasPosition
|
||||
local maxSizeY = textLabel.AbsoluteSize.y - scrollingFrame.AbsoluteWindowSize.y
|
||||
if canvasPosition.y >= maxSizeY - SCROLL_BUFFER then
|
||||
downArrow.ImageColor3 = GlobalSettings.GreyTextColor
|
||||
else
|
||||
downArrow.ImageColor3 = GlobalSettings.WhiteTextColor
|
||||
end
|
||||
if canvasPosition.y <= SCROLL_BUFFER then
|
||||
upArrow.ImageColor3 = GlobalSettings.GreyTextColor
|
||||
else
|
||||
upArrow.ImageColor3 = GlobalSettings.WhiteTextColor
|
||||
end
|
||||
end
|
||||
|
||||
local function setScrollSize()
|
||||
local textSize = TextService:GetTextSize(textLabel.Text, Utility.ConvertFontSizeEnumToInt(textLabel.FontSize), textLabel.Font, Vector2.new(textLabel.AbsoluteSize.X, 6000))
|
||||
local ySize = textSize.y
|
||||
|
||||
textLabel.Size = UDim2.new(1, 0, 0, ySize)
|
||||
scrollingFrame.CanvasSize = UDim2.new(0, 0, 0, ySize)
|
||||
local areArrowsVisible = ySize > scrollingFrame.AbsoluteSize.y
|
||||
this:SetArrowsVisible(areArrowsVisible)
|
||||
this:SetSelectable(areArrowsVisible)
|
||||
setArrowState();
|
||||
end
|
||||
|
||||
--[[ Events ]]--
|
||||
scrollingFrame:GetPropertyChangedSignal('CanvasPosition'):connect(function()
|
||||
setArrowState()
|
||||
end)
|
||||
scrollingFrame:GetPropertyChangedSignal('AbsoluteWindowSize'):connect(function()
|
||||
setArrowState()
|
||||
end)
|
||||
scrollingFrame.SelectionGained:Connect(function()
|
||||
hintImage.Visible = true
|
||||
end)
|
||||
scrollingFrame.SelectionLost:Connect(function()
|
||||
hintImage.Visible = false
|
||||
end)
|
||||
|
||||
|
||||
--[[ Public API ]]--
|
||||
function this:SetParent(newParent)
|
||||
if container.Parent ~= newParent then
|
||||
container.Parent = newParent
|
||||
spawn(function()
|
||||
setScrollSize()
|
||||
end)
|
||||
end
|
||||
end
|
||||
|
||||
function this:SetPosition(newPosition)
|
||||
container.Position = newPosition
|
||||
end
|
||||
|
||||
function this:SetSize(newSize)
|
||||
if container.Size ~= newSize then
|
||||
container.Size = newSize
|
||||
spawn(function()
|
||||
setScrollSize()
|
||||
end)
|
||||
end
|
||||
end
|
||||
|
||||
function this:SetFontSize(newFontSize)
|
||||
if textLabel.FontSize ~= newFontSize then
|
||||
textLabel.FontSize = newFontSize
|
||||
spawn(function()
|
||||
setScrollSize()
|
||||
end)
|
||||
end
|
||||
end
|
||||
|
||||
function this:SetFont(newFont)
|
||||
if textLabel.Font ~= newFont then
|
||||
textLabel.Font = newFont
|
||||
spawn(function()
|
||||
setScrollSize()
|
||||
end)
|
||||
end
|
||||
end
|
||||
|
||||
function this:SetText(text)
|
||||
if textLabel.Text ~= tostring(text) then
|
||||
textLabel.Text = tostring(text)
|
||||
spawn(function()
|
||||
setScrollSize()
|
||||
end)
|
||||
end
|
||||
end
|
||||
|
||||
function this:SetLayoutOrder(layoutOrder)
|
||||
container.LayoutOrder = layoutOrder
|
||||
end
|
||||
|
||||
function this:SetSelectable(value)
|
||||
scrollingFrame.Selectable = value
|
||||
this.OnSelectableChanged:fire(value)
|
||||
end
|
||||
|
||||
function this:SetZIndex(value)
|
||||
container.ZIndex = value
|
||||
textLabel.ZIndex = value
|
||||
upArrow.ZIndex = value
|
||||
downArrow.ZIndex = value
|
||||
hintImage.ZIndex = value
|
||||
end
|
||||
|
||||
function this:SetArrowsVisible(value)
|
||||
upArrow.Visible = value
|
||||
downArrow.Visible = value
|
||||
end
|
||||
|
||||
function this:GetContainer()
|
||||
return container
|
||||
end
|
||||
|
||||
function this:GetSelectableObject()
|
||||
return scrollingFrame
|
||||
end
|
||||
|
||||
function this:GetArrowsVisible()
|
||||
return upArrow.Visible
|
||||
end
|
||||
|
||||
function this:IsSelectable()
|
||||
return scrollingFrame.Selectable
|
||||
end
|
||||
|
||||
return this
|
||||
end
|
||||
|
||||
return createScrollingTextBox
|
||||
Reference in New Issue
Block a user