From 8e3f903c256e6cff4d0eb8927544111fa908d0b3 Mon Sep 17 00:00:00 2001 From: SushiDesigner <54828677+SushiDesigner@users.noreply.github.com> Date: Sun, 3 Sep 2023 15:34:36 -0600 Subject: [PATCH] oops --- assets/ugc/854 | 114 - assets/ugc/855 | 23 - assets/ugc/856 | 1 - assets/ugc/857 | 2394 --------------------- assets/ugc/858 | 110 - assets/ugc/859 | 852 -------- assets/ugc/860 | 561 ----- assets/ugc/861 | 1368 ------------ assets/ugc/862 | 73 - assets/ugc/863 | 307 --- assets/ugc/864 | 1386 ------------- assets/ugc/865 | 1272 ------------ assets/ugc/866 | 317 --- assets/ugc/867 | 2928 -------------------------- assets/ugc/868 | 869 -------- assets/ugc/869 | 429 ---- assets/ugc/870 | 872 -------- assets/ugc/871 | 1091 ---------- assets/ugc/872 | 147 -- assets/ugc/873 | 265 --- assets/ugc/874 | 4032 ------------------------------------ assets/ugc/875 | 24 - assets/ugc/876 | 1116 ---------- assets/ugc/877 | 2208 -------------------- assets/ugc/asset-0.png | Bin 24887 -> 0 bytes assets/ugc/asset-1.png | Bin 16951 -> 0 bytes assets/ugc/gamefile-0.rbxl | Bin 427254 -> 0 bytes assets/ugc/itemfile-0.rbxm | 140 -- assets/ugc/itemfile-1.rbxm | Bin 4238 -> 0 bytes 29 files changed, 22899 deletions(-) delete mode 100644 assets/ugc/854 delete mode 100644 assets/ugc/855 delete mode 100644 assets/ugc/856 delete mode 100644 assets/ugc/857 delete mode 100644 assets/ugc/858 delete mode 100644 assets/ugc/859 delete mode 100644 assets/ugc/860 delete mode 100644 assets/ugc/861 delete mode 100644 assets/ugc/862 delete mode 100644 assets/ugc/863 delete mode 100644 assets/ugc/864 delete mode 100644 assets/ugc/865 delete mode 100644 assets/ugc/866 delete mode 100644 assets/ugc/867 delete mode 100644 assets/ugc/868 delete mode 100644 assets/ugc/869 delete mode 100644 assets/ugc/870 delete mode 100644 assets/ugc/871 delete mode 100644 assets/ugc/872 delete mode 100644 assets/ugc/873 delete mode 100644 assets/ugc/874 delete mode 100644 assets/ugc/875 delete mode 100644 assets/ugc/876 delete mode 100644 assets/ugc/877 delete mode 100644 assets/ugc/asset-0.png delete mode 100644 assets/ugc/asset-1.png delete mode 100644 assets/ugc/gamefile-0.rbxl delete mode 100644 assets/ugc/itemfile-0.rbxm delete mode 100644 assets/ugc/itemfile-1.rbxm diff --git a/assets/ugc/854 b/assets/ugc/854 deleted file mode 100644 index e281996..0000000 --- a/assets/ugc/854 +++ /dev/null @@ -1,114 +0,0 @@ ---rbxassetid%854% --- Creates all neccessary scripts for the gui on initial load, everything except build tools --- Created by Ben T. 10/29/10 --- Please note that these are loaded in a specific order to diminish errors/perceived load time by user - -local scriptContext = game:GetService("ScriptContext") -local touchEnabled = false -pcall(function() touchEnabled = game:GetService("UserInputService").TouchEnabled end) - --- library registration -scriptContext:AddCoreScript(855, scriptContext,"/Libraries/LibraryRegistration/LibraryRegistration") - -local function waitForChild(instance, name) - while not instance:FindFirstChild(name) do - instance.ChildAdded:wait() - end -end -local function waitForProperty(instance, property) - while not instance[property] do - instance.Changed:wait() - end -end - --- Responsible for tracking logging items -local scriptContext = game:GetService("ScriptContext") -scriptContext:AddCoreScript(856, scriptContext, "CoreScripts/Sections") - -waitForChild(game:GetService("CoreGui"),"RobloxGui") -local screenGui = game:GetService("CoreGui"):FindFirstChild("RobloxGui") - --- SettingsScript -scriptContext:AddCoreScript(857,screenGui,"CoreScripts/Settings") - -if not touchEnabled then - -- ToolTipper (creates tool tips for gui) - scriptContext:AddCoreScript(858,screenGui,"CoreScripts/ToolTip") -else - scriptContext:AddCoreScript(859,screenGui,"CoreScripts/TouchControls") -end - --- MainBotChatScript -scriptContext:AddCoreScript(860,screenGui,"CoreScripts/MainBotChatScript") - --- Developer Console Script -scriptContext:AddCoreScript(861,screenGui,"CoreScripts/DeveloperConsole") - --- Popup Script -scriptContext:AddCoreScript(862,screenGui,"CoreScripts/PopupScript") --- Friend Notification Script (probably can use this script to expand out to other notifications) -scriptContext:AddCoreScript(863,screenGui,"CoreScripts/NotificationScript") --- Chat script -scriptContext:AddCoreScript(864, screenGui, "CoreScripts/ChatScript") --- Purchase Prompt Script -scriptContext:AddCoreScript(865, screenGui, "CoreScripts/PurchasePromptScript") --- Health Script -scriptContext:AddCoreScript(866, screenGui, "CoreScripts/HealthScript") - -if not touchEnabled then - -- New Player List - scriptContext:AddCoreScript(867,screenGui,"CoreScripts/PlayerListScript") -elseif screenGui.AbsoluteSize.Y > 600 then - -- New Player List - scriptContext:AddCoreScript(867,screenGui,"CoreScripts/PlayerListScript") -else - delay(5, function() - if screenGui.AbsoluteSize.Y >= 600 then - -- New Player List - scriptContext:AddCoreScript(867,screenGui,"CoreScripts/PlayerListScript") - end - end) -end - -if game.CoreGui.Version >= 3 then - -- Backpack Builder, creates most of the backpack gui - scriptContext:AddCoreScript(868,screenGui,"CoreScripts/BackpackScripts/BackpackBuilder") - - waitForChild(screenGui,"CurrentLoadout") - waitForChild(screenGui,"Backpack") - local Backpack = screenGui.Backpack - - -- Manager handles all big backpack state changes, other scripts subscribe to this and do things accordingly - if game.CoreGui.Version >= 7 then - scriptContext:AddCoreScript(869,Backpack,"CoreScripts/BackpackScripts/BackpackManager") - end - - -- Backpack Gear (handles all backpack gear tab stuff) - game:GetService("ScriptContext"):AddCoreScript(870,Backpack,"CoreScripts/BackpackScripts/BackpackGear") - -- Loadout Script, used for gear hotkeys - scriptContext:AddCoreScript(871,screenGui.CurrentLoadout,"CoreScripts/BackpackScripts/LoadoutScript") - if game.CoreGui.Version >= 8 then - -- Wardrobe script handles all character dressing operations - scriptContext:AddCoreScript(-1,Backpack,"CoreScripts/BackpackScripts/BackpackWardrobe") - end -end - -local IsPersonalServer = not not game.Workspace:FindFirstChild("PSVariable") -if IsPersonalServer then - game:GetService("ScriptContext"):AddCoreScript(872,game.Players.LocalPlayer,"BuildToolManager") -end -game.Workspace.ChildAdded:connect(function(nchild) - if nchild.Name=='PSVariable' and nchild:IsA('BoolValue') then - IsPersonalServer = true - game:GetService("ScriptContext"):AddCoreScript(872,game.Players.LocalPlayer,"BuildToolManager") - end -end) - -if touchEnabled then -- touch devices don't use same control frame - -- only used for touch device button generation - scriptContext:AddCoreScript(873,screenGui,"CoreScripts/ContextActionTouch") - - waitForChild(screenGui, 'ControlFrame') - waitForChild(screenGui.ControlFrame, 'BottomLeftControl') - screenGui.ControlFrame.BottomLeftControl.Visible = false -end \ No newline at end of file diff --git a/assets/ugc/855 b/assets/ugc/855 deleted file mode 100644 index 95700e5..0000000 --- a/assets/ugc/855 +++ /dev/null @@ -1,23 +0,0 @@ ---rbxassetid%855% --- Library Registration Script --- This script is used to register RbxLua libraries on game servers, so game scripts have --- access to all of the libraries (otherwise only local scripts do) - -local sc = game:GetService("ScriptContext") -local tries = 0 - -while not sc and tries < 3 do - tries = tries + 1 - sc = game:GetService("ScriptContext") - wait(0.2) -end - -if sc then - sc:RegisterLibrary("Libraries/RbxGui", "874") - sc:RegisterLibrary("Libraries/RbxGear", "875") - sc:RegisterLibrary("Libraries/RbxUtility", "876") - sc:RegisterLibrary("Libraries/RbxStamper", "877") - sc:LibraryRegistrationComplete() -else - print("failed to find script context, libraries did not load") -end diff --git a/assets/ugc/856 b/assets/ugc/856 deleted file mode 100644 index 5bacbde..0000000 --- a/assets/ugc/856 +++ /dev/null @@ -1 +0,0 @@ ---rbxassetid%856% \ No newline at end of file diff --git a/assets/ugc/857 b/assets/ugc/857 deleted file mode 100644 index ff9e188..0000000 --- a/assets/ugc/857 +++ /dev/null @@ -1,2394 +0,0 @@ ---rbxassetid%857% -local function waitForChild(instance, name) - while not instance:FindFirstChild(name) do - instance.ChildAdded:wait() - end -end - -local function waitForProperty(instance, property) - while not instance[property] do - instance.Changed:wait() - end -end - ---Include -local Create = assert(LoadLibrary("RbxUtility")).Create - - --- A Few Script Globals -local gui -if script.Parent:FindFirstChild("ControlFrame") then - gui = script.Parent:FindFirstChild("ControlFrame") -else - gui = script.Parent -end - -local helpButton = nil -local updateCameraDropDownSelection = nil -local updateVideoCaptureDropDownSelection = nil -local updateSmartCameraDropDownSelection = nil -local updateTouchMovementDropDownSelection = nil -local tweenTime = 0.2 - -local mouseLockLookScreenUrl = "http://www.mete0r.xyz/asset?id=54071825" -local classicLookScreenUrl = "http://www.mete0r.xyz/Asset?id=45915798" - -local hasGraphicsSlider = (game:GetService("CoreGui").Version >= 5) -local GraphicsQualityLevels = 10 -- how many levels we allow on graphics slider -local recordingVideo = false - -local currentMenuSelection = nil -local lastMenuSelection = {} - -local defaultPosition = UDim2.new(0,0,0,0) -local newGuiPlaces = {0,41324860} - -local centerDialogs = {} -local mainShield = nil - -local testReport = false - -local inStudioMode = UserSettings().GameSettings:InStudioMode() --- REMOVE WHEN NOT TESTING --- inStudioMode = false - -local macClient = false -local success, isMac = pcall(function() return not game.GuiService.IsWindows end) -macClient = success and isMac --- REMOVE WHEN NOT TESTING ---macClient = true - -local customCameraDefaultType = "Default (Classic)" -local touchClient = false -pcall(function() touchClient = game:GetService("UserInputService").TouchEnabled end) --- REMOVE WHEN NOT TESTING --- touchClient = true -if touchClient then - hasGraphicsSlider = false - customCameraDefaultType = "Default (Follow)" -end - -local function Color3I(r,g,b) - return Color3.new(r/255,g/255,b/255) -end - -local function robloxLock(instance) - instance.RobloxLocked = true - children = instance:GetChildren() - if children then - for i, child in ipairs(children) do - robloxLock(child) - end - end -end - -function resumeGameFunction(shield) - shield.Settings:TweenPosition(UDim2.new(0.5, -262,-0.5, -200),Enum.EasingDirection.InOut,Enum.EasingStyle.Sine,tweenTime,true) - delay(tweenTime,function() - shield.Visible = false - for i = 1, #centerDialogs do - centerDialogs[i].Visible = false - game.GuiService:RemoveCenterDialog(centerDialogs[i]) - end - game.GuiService:RemoveCenterDialog(shield) - settingsButton.Active = true - currentMenuSelection = nil - lastMenuSelection = {} - pcall(function() game:GetService("UserInputService").OverrideMouseIconEnabled = false end) - end) -end - -function goToMenu(container,menuName, moveDirection,size,position) - if type(menuName) ~= "string" then return end - - table.insert(lastMenuSelection,currentMenuSelection) - if menuName == "GameMainMenu" then - lastMenuSelection = {} - end - - local containerChildren = container:GetChildren() - local selectedMenu = false - for i = 1, #containerChildren do - if containerChildren[i].Name == menuName then - containerChildren[i].Visible = true - currentMenuSelection = {container = container,name = menuName, direction = moveDirection, lastSize = size} - selectedMenu = true - if size and position then - containerChildren[i]:TweenSizeAndPosition(size,position,Enum.EasingDirection.InOut,Enum.EasingStyle.Sine,tweenTime,true) - elseif size then - containerChildren[i]:TweenSizeAndPosition(size,UDim2.new(0.5,-size.X.Offset/2,0.5,-size.Y.Offset/2),Enum.EasingDirection.InOut,Enum.EasingStyle.Sine,tweenTime,true) - else - containerChildren[i]:TweenPosition(UDim2.new(0,0,0,0),Enum.EasingDirection.InOut,Enum.EasingStyle.Sine,tweenTime,true) - end - else - if moveDirection == "left" then - containerChildren[i]:TweenPosition(UDim2.new(-1,-525,0,0),Enum.EasingDirection.InOut,Enum.EasingStyle.Sine,tweenTime,true) - elseif moveDirection == "right" then - containerChildren[i]:TweenPosition(UDim2.new(1,525,0,0),Enum.EasingDirection.InOut,Enum.EasingStyle.Sine,tweenTime,true) - elseif moveDirection == "up" then - containerChildren[i]:TweenPosition(UDim2.new(0,0,-1,-400),Enum.EasingDirection.InOut,Enum.EasingStyle.Sine,tweenTime,true) - elseif moveDirection == "down" then - containerChildren[i]:TweenPosition(UDim2.new(0,0,1,400),Enum.EasingDirection.InOut,Enum.EasingStyle.Sine,tweenTime,true) - end - delay(tweenTime,function() - containerChildren[i].Visible = false - end) - end - end -end - -function resetLocalCharacter() - local player = game.Players.LocalPlayer - if player then - if player.Character and player.Character:FindFirstChild("Humanoid") then - player.Character.Humanoid.Health = 0 - end - end -end - -local function createTextButton(text,style,fontSize,buttonSize,buttonPosition) - local newTextButton = Instance.new("TextButton") - newTextButton.Font = Enum.Font.SourceSansBold - newTextButton.FontSize = fontSize - newTextButton.Size = buttonSize - newTextButton.Position = buttonPosition - newTextButton.Style = style - newTextButton.TextColor3 = Color3.new(1,1,1) - newTextButton.Text = text - return newTextButton -end - -local function CreateTextButtons(frame, buttons, yPos, ySize) - if #buttons < 1 then - error("Must have more than one button") - end - - local buttonNum = 1 - local buttonObjs = {} - - local function toggleSelection(button) - for i, obj in ipairs(buttonObjs) do - if obj == button then - obj.Style = Enum.ButtonStyle.RobloxRoundDefaultButton - else - obj.Style = Enum.ButtonStyle.RobloxRoundButton - end - end - end - - for i, obj in ipairs(buttons) do - local button = Instance.new("TextButton") - button.Name = "Button" .. buttonNum - button.Font = Enum.Font.SourceSansBold - button.FontSize = Enum.FontSize.Size18 - button.AutoButtonColor = true - button.Style = Enum.ButtonStyle.RobloxRoundButton - button.Text = obj.Text - button.TextColor3 = Color3.new(1,1,1) - button.MouseButton1Click:connect(function() toggleSelection(button) obj.Function() end) - button.Parent = frame - button.ZIndex = 8 - buttonObjs[buttonNum] = button - - buttonNum = buttonNum + 1 - end - - toggleSelection(buttonObjs[1]) - - local numButtons = buttonNum-1 - - if numButtons == 1 then - frame.Button1.Position = UDim2.new(0.35, 0, yPos.Scale, yPos.Offset) - frame.Button1.Size = UDim2.new(.4,0,ySize.Scale, ySize.Offset) - elseif numButtons == 2 then - frame.Button1.Position = UDim2.new(0.1, 0, yPos.Scale, yPos.Offset) - frame.Button1.Size = UDim2.new(.35,0, ySize.Scale, ySize.Offset) - - frame.Button2.Position = UDim2.new(0.55, 0, yPos.Scale, yPos.Offset) - frame.Button2.Size = UDim2.new(.35,0, ySize.Scale, ySize.Offset) - elseif numButtons >= 3 then - local spacing = .1 / numButtons - local buttonSize = .9 / numButtons - - buttonNum = 1 - while buttonNum <= numButtons do - buttonObjs[buttonNum].Position = UDim2.new(spacing*buttonNum + (buttonNum-1) * buttonSize, 0, yPos.Scale, yPos.Offset) - buttonObjs[buttonNum].Size = UDim2.new(buttonSize, 0, ySize.Scale, ySize.Offset) - buttonNum = buttonNum + 1 - end - end -end - -function setRecordGui(recording, stopRecordButton, recordVideoButton) - if recording then - stopRecordButton.Visible = true - recordVideoButton.Text = "Stop Recording" - else - stopRecordButton.Visible = false - recordVideoButton.Text = "Record Video" - end -end - -function recordVideoClick(recordVideoButton, stopRecordButton) - recordingVideo = not recordingVideo - setRecordGui(recordingVideo, stopRecordButton, recordVideoButton) -end - -local currentlyToggling = false; -local DevConsoleToggle = nil; - -delay(0, function() - DevConsoleToggle = gui:WaitForChild("ToggleDevConsole") -end) - -function toggleDeveloperConsole() - if not DevConsoleToggle then - return - end - - DevConsoleToggle:Invoke() -end - -function backToGame(buttonClicked, shield, settingsButton) - buttonClicked.Parent.Parent.Parent.Parent.Visible = false - shield.Visible = false - for i = 1, #centerDialogs do - game.GuiService:RemoveCenterDialog(centerDialogs[i]) - centerDialogs[i].Visible = false - end - centerDialogs = {} - game.GuiService:RemoveCenterDialog(shield) - settingsButton.Active = true -end - -function setDisabledState(guiObject) - if not guiObject then return end - - if guiObject:IsA("TextLabel") then - guiObject.TextTransparency = 0.9 - elseif guiObject:IsA("TextButton") then - guiObject.TextTransparency = 0.9 - guiObject.Active = false - else - if guiObject["ClassName"] then - print("setDisabledState() got object of unsupported type. object type is ",guiObject.ClassName) - end - end -end - -local function createHelpDialog(baseZIndex) - - if helpButton == nil then - if gui:FindFirstChild("TopLeftControl") and gui.TopLeftControl:FindFirstChild("Help") then - helpButton = gui.TopLeftControl.Help - elseif gui:FindFirstChild("BottomRightControl") and gui.BottomRightControl:FindFirstChild("Help") then - helpButton = gui.BottomRightControl.Help - end - end - - local shield = Instance.new("Frame") - shield.Name = "HelpDialogShield" - shield.Active = true - shield.Visible = false - shield.Size = UDim2.new(1,0,1,0) - shield.BackgroundColor3 = Color3I(51,51,51) - shield.BorderColor3 = Color3I(27,42,53) - shield.BackgroundTransparency = 0.4 - shield.ZIndex = baseZIndex + 2 - - local helpDialog = Instance.new("Frame") - helpDialog.Name = "HelpDialog" - helpDialog.Style = Enum.FrameStyle.DropShadow - helpDialog.Position = UDim2.new(.2, 0, .2, 0) - helpDialog.Size = UDim2.new(0.6, 0, 0.6, 0) - helpDialog.Active = true - helpDialog.Parent = shield - helpDialog.ZIndex = baseZIndex + 2 - - local titleLabel = Instance.new("TextLabel") - titleLabel.Name = "Title" - titleLabel.Text = "Keyboard & Mouse Controls" - titleLabel.Font = Enum.Font.SourceSansBold - titleLabel.FontSize = Enum.FontSize.Size36 - titleLabel.Position = UDim2.new(0, 0, 0.025, 0) - titleLabel.Size = UDim2.new(1, 0, 0, 40) - titleLabel.TextColor3 = Color3.new(1,1,1) - titleLabel.BackgroundTransparency = 1 - titleLabel.Parent = helpDialog - titleLabel.ZIndex = baseZIndex + 2 - - local buttonRow = Instance.new("Frame") - buttonRow.Name = "Buttons" - buttonRow.Position = UDim2.new(0.1, 0, .07, 40) - buttonRow.Size = UDim2.new(0.8, 0, 0, 45) - buttonRow.BackgroundTransparency = 1 - buttonRow.Parent = helpDialog - buttonRow.ZIndex = baseZIndex + 2 - - local imageFrame = Instance.new("Frame") - imageFrame.Name = "ImageFrame" - imageFrame.Position = UDim2.new(0.05, 0, 0.075, 80) - imageFrame.Size = UDim2.new(0.9, 0, .9, -120) - imageFrame.BackgroundTransparency = 1 - imageFrame.Parent = helpDialog - imageFrame.ZIndex = baseZIndex + 2 - - local layoutFrame = Instance.new("Frame") - layoutFrame.Name = "LayoutFrame" - layoutFrame.Position = UDim2.new(0.5, 0, 0, 0) - layoutFrame.Size = UDim2.new(1.5, 0, 1, 0) - layoutFrame.BackgroundTransparency = 1 - layoutFrame.SizeConstraint = Enum.SizeConstraint.RelativeYY - layoutFrame.Parent = imageFrame - layoutFrame.ZIndex = baseZIndex + 2 - - local image = Instance.new("ImageLabel") - image.Name = "Image" - if UserSettings().GameSettings.ControlMode == Enum.ControlMode["Mouse Lock Switch"] then - image.Image = mouseLockLookScreenUrl - else - image.Image = classicLookScreenUrl - end - image.Position = UDim2.new(-0.5, 0, 0, 0) - image.Size = UDim2.new(1, 0, 1, 0) - image.BackgroundTransparency = 1 - image.Parent = layoutFrame - image.ZIndex = baseZIndex + 2 - - local buttons = {} - buttons[1] = {} - buttons[1].Text = "Look" - buttons[1].Function = function() - if UserSettings().GameSettings.ControlMode == Enum.ControlMode["Mouse Lock Switch"] then - image.Image = mouseLockLookScreenUrl - else - image.Image = classicLookScreenUrl - end - end - buttons[2] = {} - buttons[2].Text = "Move" - buttons[2].Function = function() - image.Image = "http://www.mete0r.xyz/Asset?id=45915811" - end - buttons[3] = {} - buttons[3].Text = "Gear" - buttons[3].Function = function() - image.Image = "http://www.mete0r.xyz/Asset?id=45917596" - end - buttons[4] = {} - buttons[4].Text = "Zoom" - buttons[4].Function = function() - image.Image = "http://www.mete0r.xyz/Asset?id=45915825" - end - - CreateTextButtons(buttonRow, buttons, UDim.new(0, 0), UDim.new(1,0)) - - local devConsoleButton = Create'TextButton'{ - Name = "DeveloperConsoleButton"; - Text = "Log"; - Size = UDim2.new(0,60,0,30); - Style = Enum.ButtonStyle.RobloxRoundButton; - Position = UDim2.new(1,-65,1,-35); - Font = Enum.Font.SourceSansBold; - FontSize = Enum.FontSize.Size18; - TextColor3 = Color3.new(1,1,1); - ZIndex = baseZIndex + 4; - BackgroundTransparency = 1; - Parent = helpDialog; - } - - Create'TextLabel'{ - Name = "DeveloperConsoleButton"; - Text = "F9"; - Size = UDim2.new(0,14,0,14); - Position = UDim2.new(1,-6,0, -2); - Font = Enum.Font.SourceSansBold; - FontSize = Enum.FontSize.Size12; - TextColor3 = Color3.new(0,1,0); - ZIndex = baseZIndex + 4; - BackgroundTransparency = 1; - Parent = devConsoleButton; - } - - waitForProperty(game.Players, "LocalPlayer") - game.Players.LocalPlayer:GetMouse().KeyDown:connect(function(key) - if string.byte(key) == 34 then --F9 - toggleDeveloperConsole() - end - end) - - devConsoleButton.MouseButton1Click:connect(function() - toggleDeveloperConsole() - shield.Visible = false - game.GuiService:RemoveCenterDialog(shield) - end) - - -- set up listeners for type of mouse mode, but keep constructing gui at same time - delay(0, function() - waitForChild(gui,"UserSettingsShield") - waitForChild(gui.UserSettingsShield,"Settings") - waitForChild(gui.UserSettingsShield.Settings,"SettingsStyle") - waitForChild(gui.UserSettingsShield.Settings.SettingsStyle, "GameSettingsMenu") - waitForChild(gui.UserSettingsShield.Settings.SettingsStyle.GameSettingsMenu, "CameraField") - waitForChild(gui.UserSettingsShield.Settings.SettingsStyle.GameSettingsMenu.CameraField, "DropDownMenuButton") - gui.UserSettingsShield.Settings.SettingsStyle.GameSettingsMenu.CameraField.DropDownMenuButton.Changed:connect(function(prop) - if prop ~= "Text" then return end - if buttonRow.Button1.Style == Enum.ButtonStyle.RobloxRoundDefaultButton then -- only change if this is the currently selected panel - if gui.UserSettingsShield.Settings.SettingsStyle.GameSettingsMenu.CameraField.DropDownMenuButton.Text == "Classic" then - image.Image = classicLookScreenUrl - else - image.Image = mouseLockLookScreenUrl - end - end - end) - end) - - - local okBtn = Instance.new("TextButton") - okBtn.Name = "OkBtn" - okBtn.Text = "OK" - okBtn.Modal = true - okBtn.Size = UDim2.new(0.3, 0, 0, 45) - okBtn.Position = UDim2.new(0.35, 0, .975, -50) - okBtn.Font = Enum.Font.SourceSansBold - okBtn.FontSize = Enum.FontSize.Size18 - okBtn.BackgroundTransparency = 1 - okBtn.TextColor3 = Color3.new(1,1,1) - okBtn.Style = Enum.ButtonStyle.RobloxRoundDefaultButton - okBtn.ZIndex = baseZIndex + 2 - okBtn.MouseButton1Click:connect( - function() - shield.Visible = false - game.GuiService:RemoveCenterDialog(shield) - end) - okBtn.Parent = helpDialog - - robloxLock(shield) - return shield -end - -local function createLeaveConfirmationMenu(baseZIndex,shield) - local frame = Instance.new("Frame") - frame.Name = "LeaveConfirmationMenu" - frame.BackgroundTransparency = 1 - frame.Size = UDim2.new(1,0,1,0) - frame.Position = UDim2.new(0,0,2,400) - frame.ZIndex = baseZIndex + 4 - - local yesButton = createTextButton("Leave",Enum.ButtonStyle.RobloxRoundButton,Enum.FontSize.Size24,UDim2.new(0,128,0,50),UDim2.new(0,313,0.8,0)) - yesButton.Name = "YesButton" - yesButton.ZIndex = baseZIndex + 4 - yesButton.Parent = frame - yesButton.Modal = true - yesButton:SetVerb("Exit") - - local noButton = createTextButton("Stay",Enum.ButtonStyle.RobloxRoundDefaultButton,Enum.FontSize.Size24,UDim2.new(0,128,0,50),UDim2.new(0,90,0.8,0)) - noButton.Name = "NoButton" - noButton.Parent = frame - noButton.ZIndex = baseZIndex + 4 - noButton.MouseButton1Click:connect(function() - goToMenu(shield.Settings.SettingsStyle,"GameMainMenu","down",UDim2.new(0,525,0,430)) - shield.Settings:TweenSize(UDim2.new(0,525,0,430),Enum.EasingDirection.InOut,Enum.EasingStyle.Sine,tweenTime,true) - end) - - local leaveText = Instance.new("TextLabel") - leaveText.Name = "LeaveText" - leaveText.Text = "Leave this game?" - leaveText.Size = UDim2.new(1,0,0.8,0) - leaveText.TextWrap = true - leaveText.TextColor3 = Color3.new(1,1,1) - leaveText.Font = Enum.Font.SourceSansBold - leaveText.FontSize = Enum.FontSize.Size36 - leaveText.BackgroundTransparency = 1 - leaveText.ZIndex = baseZIndex + 4 - leaveText.Parent = frame - - return frame -end - -local function createResetConfirmationMenu(baseZIndex,shield) - local frame = Instance.new("Frame") - frame.Name = "ResetConfirmationMenu" - frame.BackgroundTransparency = 1 - frame.Size = UDim2.new(1,0,1,0) - frame.Position = UDim2.new(0,0,2,400) - frame.ZIndex = baseZIndex + 4 - - local yesButton = createTextButton("Reset",Enum.ButtonStyle.RobloxRoundDefaultButton,Enum.FontSize.Size24,UDim2.new(0,128,0,50),UDim2.new(0,313,0,280)) - yesButton.Name = "YesButton" - yesButton.ZIndex = baseZIndex + 4 - yesButton.Parent = frame - yesButton.Modal = true - yesButton.MouseButton1Click:connect(function() - resumeGameFunction(shield) - resetLocalCharacter() - end) - - local noButton = createTextButton("Cancel",Enum.ButtonStyle.RobloxRoundButton,Enum.FontSize.Size24,UDim2.new(0,128,0,50),UDim2.new(0,90,0,280)) - noButton.Name = "NoButton" - noButton.Parent = frame - noButton.ZIndex = baseZIndex + 4 - noButton.MouseButton1Click:connect(function() - goToMenu(shield.Settings.SettingsStyle,"GameMainMenu","down",UDim2.new(0,525,0,430)) - shield.Settings:TweenSize(UDim2.new(0,525,0,430),Enum.EasingDirection.InOut,Enum.EasingStyle.Sine,tweenTime,true) - end) - - local resetCharacterText = Instance.new("TextLabel") - resetCharacterText.Name = "ResetCharacterText" - resetCharacterText.Text = "Are you sure you want to reset your character?" - resetCharacterText.Size = UDim2.new(1,0,0.8,0) - resetCharacterText.TextWrap = true - resetCharacterText.TextColor3 = Color3.new(1,1,1) - resetCharacterText.Font = Enum.Font.SourceSansBold - resetCharacterText.FontSize = Enum.FontSize.Size36 - resetCharacterText.BackgroundTransparency = 1 - resetCharacterText.ZIndex = baseZIndex + 4 - resetCharacterText.Parent = frame - - local fineResetCharacterText = resetCharacterText:Clone() - fineResetCharacterText.Name = "FineResetCharacterText" - fineResetCharacterText.Text = "You will be put back on a spawn point" - fineResetCharacterText.Size = UDim2.new(0,303,0,18) - fineResetCharacterText.Position = UDim2.new(0, 109, 0, 215) - fineResetCharacterText.FontSize = Enum.FontSize.Size18 - fineResetCharacterText.Parent = frame - - return frame -end - -local function createGameMainMenu(baseZIndex, shield) - - local buttonTop = 54 - - local gameMainMenuFrame = Instance.new("Frame") - gameMainMenuFrame.Name = "GameMainMenu" - gameMainMenuFrame.BackgroundTransparency = 1 - gameMainMenuFrame.Size = UDim2.new(1,0,1,0) - gameMainMenuFrame.ZIndex = baseZIndex + 4 - gameMainMenuFrame.Parent = settingsFrame - - -- GameMainMenu Children - - -- RESUME GAME - local resumeGameButton = createTextButton("Resume Game",Enum.ButtonStyle.RobloxRoundDefaultButton,Enum.FontSize.Size24,UDim2.new(0,340,0,50),UDim2.new(0.5,-170,0,buttonTop)) - resumeGameButton.Name = "resumeGameButton" - resumeGameButton.ZIndex = baseZIndex + 4 - resumeGameButton.Parent = gameMainMenuFrame - resumeGameButton.Modal = true - resumeGameButton.MouseButton1Click:connect(function() resumeGameFunction(shield) end) - buttonTop = buttonTop + 51 - - -- RESET CHARACTER - local resetButton = createTextButton("Reset Character",Enum.ButtonStyle.RobloxRoundButton,Enum.FontSize.Size24,UDim2.new(0,340,0,50),UDim2.new(0.5,-170,0,buttonTop)) - resetButton.Name = "ResetButton" - resetButton.ZIndex = baseZIndex + 4 - resetButton.Parent = gameMainMenuFrame - buttonTop = buttonTop + 51 - - -- GAME SETTINGS - local gameSettingsButton = createTextButton("Game Settings",Enum.ButtonStyle.RobloxRoundButton,Enum.FontSize.Size24,UDim2.new(0,340,0,50),UDim2.new(0.5,-170,0,buttonTop)) - gameSettingsButton.Name = "SettingsButton" - gameSettingsButton.ZIndex = baseZIndex + 4 - gameSettingsButton.Parent = gameMainMenuFrame - buttonTop = buttonTop + 51 - - -- HELP BUTTON - local robloxHelpButton = createTextButton("Help",Enum.ButtonStyle.RobloxRoundButton,Enum.FontSize.Size18,UDim2.new(0,164,0,50),UDim2.new(0,92,0,buttonTop)) - robloxHelpButton.Name = "HelpButton" - robloxHelpButton.ZIndex = baseZIndex + 4 - robloxHelpButton.Parent = gameMainMenuFrame - robloxHelpButton.Visible = not touchClient - if macClient or touchClient then - robloxHelpButton.Size = UDim2.new(0,340,0,50) - robloxHelpButton.FontSize = Enum.FontSize.Size24 - end - - helpButton = robloxHelpButton - - local helpDialog = createHelpDialog(baseZIndex) - helpDialog.Parent = gui - - helpButton.MouseButton1Click:connect( - function() - table.insert(centerDialogs,helpDialog) - game.GuiService:AddCenterDialog(helpDialog, Enum.CenterDialogType.ModalDialog, - --ShowFunction - function() - helpDialog.Visible = true - mainShield.Visible = false - end, - --HideFunction - function() - helpDialog.Visible = false - end) - end) - helpButton.Active = true - - -- SCREEN SHOT - local screenshotButton = createTextButton("Screenshot",Enum.ButtonStyle.RobloxRoundButton,Enum.FontSize.Size18,UDim2.new(0,168,0,50),UDim2.new(0,264,0,buttonTop)) - screenshotButton.Name = "ScreenshotButton" - screenshotButton.ZIndex = baseZIndex + 4 - screenshotButton.Parent = gameMainMenuFrame - screenshotButton.Visible = not macClient and not touchClient - screenshotButton:SetVerb("Screenshot") - - if not touchClient then - buttonTop = buttonTop + 51 - end - - -- REPORT ABUSE - local reportAbuseButton = createTextButton("Report Abuse",Enum.ButtonStyle.RobloxRoundButton,Enum.FontSize.Size18,UDim2.new(0,164,0,50),UDim2.new(0,92,0,buttonTop)) - reportAbuseButton.Name = "ReportAbuseButton" - reportAbuseButton.ZIndex = baseZIndex + 4 - reportAbuseButton.Parent = gameMainMenuFrame - if macClient or touchClient then - reportAbuseButton.Size = UDim2.new(0,340,0,50) - reportAbuseButton.FontSize = Enum.FontSize.Size24 - end - - -- RECORD VIDEO - local recordVideoButton = createTextButton("Record Video",Enum.ButtonStyle.RobloxRoundButton,Enum.FontSize.Size18,UDim2.new(0,168,0,50),UDim2.new(0,264,0,buttonTop)) - recordVideoButton.Name = "RecordVideoButton" - recordVideoButton.ZIndex = baseZIndex + 4 - recordVideoButton.Parent = gameMainMenuFrame - recordVideoButton.Visible = not macClient and not touchClient - recordVideoButton:SetVerb("RecordToggle") - - local stopRecordButton = Instance.new("ImageButton") - stopRecordButton.Name = "StopRecordButton" - stopRecordButton.BackgroundTransparency = 1 - stopRecordButton.Image = "rbxasset://textures/ui/RecordStop.png" - stopRecordButton.Size = UDim2.new(0,59,0,27) - stopRecordButton:SetVerb("RecordToggle") - - stopRecordButton.MouseButton1Click:connect(function() recordVideoClick(recordVideoButton, stopRecordButton) end) - stopRecordButton.Visible = false - stopRecordButton.Parent = gui - buttonTop = buttonTop + 51 - - -- LEAVE GAME - local isAndroid = false - pcall(function() isAndroid = (Game:GetService("UserInputService"):GetPlatform() == Enum.Platform.Android) end) - - if (not isAndroid) then - local leaveGameButton = createTextButton("Leave Game",Enum.ButtonStyle.RobloxRoundButton,Enum.FontSize.Size24,UDim2.new(0,340,0,50),UDim2.new(0.5,-170,0,buttonTop)) - leaveGameButton.Name = "LeaveGameButton" - leaveGameButton.ZIndex = baseZIndex + 4 - leaveGameButton.Parent = gameMainMenuFrame - end - - return gameMainMenuFrame -end - -local function createGameSettingsMenu(baseZIndex, shield) - local gameSettingsMenuFrame = Instance.new("Frame") - gameSettingsMenuFrame.Name = "GameSettingsMenu" - gameSettingsMenuFrame.BackgroundTransparency = 1 - gameSettingsMenuFrame.Size = UDim2.new(1,0,1,0) - gameSettingsMenuFrame.ZIndex = baseZIndex + 4 - - local title = Instance.new("TextLabel") - title.Name = "Title" - title.Text = "Settings" - title.Size = UDim2.new(1,0,0,48) - title.Position = UDim2.new(0,9,0,-9) - title.Font = Enum.Font.SourceSansBold - title.FontSize = Enum.FontSize.Size36 - title.TextColor3 = Color3.new(1,1,1) - title.ZIndex = baseZIndex + 4 - title.BackgroundTransparency = 1 - title.Parent = gameSettingsMenuFrame - - - --[[ - local studioText = Instance.new("TextLabel") - studioText.Visible = false - studioText.Name = "StudioText" - studioText.Text = "Studio Mode" - studioText.Size = UDim2.new(0,95,0,18) - studioText.Position = UDim2.new(0,62,0,179) - studioText.Font = Enum.Font.SourceSansBold - studioText.FontSize = Enum.FontSize.Size18 - studioText.TextColor3 = Color3.new(1,1,1) - studioText.ZIndex = baseZIndex + 4 - studioText.BackgroundTransparency = 1 - studioText.Parent = gameSettingsMenuFrame - - local studioShortcut = fullscreenShortcut:clone() - studioShortcut.Name = "StudioShortcutText" - studioShortcut.Visible = false -- TODO: turn back on when f2 hack is fixed - studioShortcut.Text = "F2" - studioShortcut.Position = UDim2.new(0,154,0,175) - studioShortcut.Parent = gameSettingsMenuFrame - - local studioCheckbox = nil - --]] - - - local itemTop = 35 - ---------------------------------------------------------------------------------------------------- - -- C A M E R A C O N T R O L S - ---------------------------------------------------------------------------------------------------- - - if not touchClient then - local cameraLabel = Instance.new("TextLabel") - cameraLabel.Name = "CameraLabel" - cameraLabel.Text = "Character & Camera Controls" - cameraLabel.Font = Enum.Font.SourceSansBold - cameraLabel.FontSize = Enum.FontSize.Size18 - cameraLabel.Position = UDim2.new(0,31,0,itemTop + 6) - cameraLabel.Size = UDim2.new(0,224,0,18) - cameraLabel.TextColor3 = Color3I(255,255,255) - cameraLabel.TextXAlignment = Enum.TextXAlignment.Left - cameraLabel.BackgroundTransparency = 1 - cameraLabel.ZIndex = baseZIndex + 4 - cameraLabel.Parent = gameSettingsMenuFrame - - local mouseLockLabel = game.CoreGui.RobloxGui:FindFirstChild("MouseLockLabel",true) - - local enumItems = Enum.ControlMode:GetEnumItems() - local enumNames = {} - local enumNameToItem = {} - for i,obj in ipairs(enumItems) do - enumNames[i] = obj.Name - enumNameToItem[obj.Name] = obj - end - - local cameraDropDown - cameraDropDown, updateCameraDropDownSelection = RbxGui.CreateDropDownMenu(enumNames, - function(text) - UserSettings().GameSettings.ControlMode = enumNameToItem[text] - - pcall(function() - if mouseLockLabel and UserSettings().GameSettings.ControlMode == Enum.ControlMode["Mouse Lock Switch"] then - mouseLockLabel.Visible = true - elseif mouseLockLabel then - mouseLockLabel.Visible = false - end - end) - end, false, true, baseZIndex) - cameraDropDown.Name = "CameraField" - cameraDropDown.ZIndex = baseZIndex + 4 - cameraDropDown.DropDownMenuButton.ZIndex = baseZIndex + 4 - cameraDropDown.DropDownMenuButton.Icon.ZIndex = baseZIndex + 4 - cameraDropDown.Position = UDim2.new(0, 270, 0, itemTop) - cameraDropDown.Size = UDim2.new(0,200,0,32) - cameraDropDown.Parent = gameSettingsMenuFrame - - itemTop = itemTop + 35 - end - - ---------------------------------------------------------------------------------------------------- - -- V I D E O C A P T U R E S E T T I N G S - ---------------------------------------------------------------------------------------------------- - - local syncVideoCaptureSetting = nil - - if not macClient and not touchClient then - local videoCaptureLabel = Instance.new("TextLabel") - videoCaptureLabel.Name = "VideoCaptureLabel" - videoCaptureLabel.Text = "After Capturing Video" - videoCaptureLabel.Font = Enum.Font.SourceSansBold - videoCaptureLabel.FontSize = Enum.FontSize.Size18 - videoCaptureLabel.Position = UDim2.new(0,32,0,itemTop + 6) - videoCaptureLabel.Size = UDim2.new(0,164,0,18) - videoCaptureLabel.BackgroundTransparency = 1 - videoCaptureLabel.TextColor3 = Color3I(255,255,255) - videoCaptureLabel.TextXAlignment = Enum.TextXAlignment.Left - videoCaptureLabel.ZIndex = baseZIndex + 4 - videoCaptureLabel.Parent = gameSettingsMenuFrame - - local videoNames = {} - local videoNameToItem = {} - videoNames[1] = "Just Save to Disk" - videoNameToItem[videoNames[1]] = Enum.UploadSetting["Never"] - videoNames[2] = "Upload to YouTube" - videoNameToItem[videoNames[2]] = Enum.UploadSetting["Ask me first"] - - local videoCaptureDropDown = nil - videoCaptureDropDown, updateVideoCaptureDropDownSelection = RbxGui.CreateDropDownMenu(videoNames, - function(text) - UserSettings().GameSettings.VideoUploadPromptBehavior = videoNameToItem[text] - end, false, true, baseZIndex) - videoCaptureDropDown.Name = "VideoCaptureField" - videoCaptureDropDown.ZIndex = baseZIndex + 4 - videoCaptureDropDown.DropDownMenuButton.ZIndex = baseZIndex + 4 - videoCaptureDropDown.DropDownMenuButton.Icon.ZIndex = baseZIndex + 4 - videoCaptureDropDown.Position = UDim2.new(0, 270, 0, itemTop) - videoCaptureDropDown.Size = UDim2.new(0,200,0,32) - videoCaptureDropDown.Parent = gameSettingsMenuFrame - - syncVideoCaptureSetting = function() - if UserSettings().GameSettings.VideoUploadPromptBehavior == Enum.UploadSetting["Never"] then - updateVideoCaptureDropDownSelection(videoNames[1]) - elseif UserSettings().GameSettings.VideoUploadPromptBehavior == Enum.UploadSetting["Ask me first"] then - updateVideoCaptureDropDownSelection(videoNames[2]) - else - UserSettings().GameSettings.VideoUploadPromptBehavior = Enum.UploadSetting["Ask me first"] - updateVideoCaptureDropDownSelection(videoNames[2]) - end - end - itemTop = itemTop + 35 - end - - - ---------------------------------------------------------------------------------------------------- - -- C U S T O M C A M E R A C O N T R O L S - ---------------------------------------------------------------------------------------------------- - - local smartCameraLabel = Instance.new("TextLabel") - smartCameraLabel.Name = "SmartCameraLabel" - smartCameraLabel.Text = "Camera Mode" - smartCameraLabel.Font = Enum.Font.SourceSansBold - smartCameraLabel.FontSize = Enum.FontSize.Size18 - smartCameraLabel.Position = UDim2.new(0,31,0,itemTop + 6) - smartCameraLabel.Size = UDim2.new(0,224,0,18) - smartCameraLabel.TextColor3 = Color3I(255,255,255) - smartCameraLabel.TextXAlignment = Enum.TextXAlignment.Left - smartCameraLabel.BackgroundTransparency = 1 - smartCameraLabel.ZIndex = baseZIndex + 4 - smartCameraLabel.Parent = gameSettingsMenuFrame - - local smartEnumItems = nil - smartEnumItems = Enum.CustomCameraMode:GetEnumItems() - - local smartEnumNames = {} - local smartEnumNameToItem = {} - - for i,obj in pairs(smartEnumItems) do - local displayName = obj.Name - if (obj.Name == "Default") then - displayName = customCameraDefaultType - end - smartEnumNames[i] = displayName - smartEnumNameToItem[displayName] = obj.Value - end - - local smartCameraDropDown - smartCameraDropDown, updateSmartCameraDropDownSelection = RbxGui.CreateDropDownMenu(smartEnumNames, - function(text) - UserSettings().GameSettings.CameraMode = smartEnumNameToItem[text] - end, false, true, baseZIndex) - smartCameraDropDown.Name = "SmartCameraField" - smartCameraDropDown.ZIndex = baseZIndex + 4 - smartCameraDropDown.DropDownMenuButton.ZIndex = baseZIndex + 4 - smartCameraDropDown.DropDownMenuButton.Icon.ZIndex = baseZIndex + 4 - smartCameraDropDown.Position = UDim2.new(0, 270, 0, itemTop) - smartCameraDropDown.Size = UDim2.new(0,200,0,32) - smartCameraDropDown.Parent = gameSettingsMenuFrame - - itemTop = itemTop + 35 - - - ---------------------------------------------------------------------------------------------------- - -- T O U C H M O V E M E N T C O N T R O L S - ---------------------------------------------------------------------------------------------------- - if (touchClient) then - local touchMovementLabel = Instance.new("TextLabel") - touchMovementLabel.Name = "TouchMovementLabel" - touchMovementLabel.Text = "Movement Mode" - touchMovementLabel.Font = Enum.Font.SourceSansBold - touchMovementLabel.FontSize = Enum.FontSize.Size18 - touchMovementLabel.Position = UDim2.new(0,31,0,itemTop + 6) - touchMovementLabel.Size = UDim2.new(0,224,0,18) - touchMovementLabel.TextColor3 = Color3I(255,255,255) - touchMovementLabel.TextXAlignment = Enum.TextXAlignment.Left - touchMovementLabel.BackgroundTransparency = 1 - touchMovementLabel.ZIndex = baseZIndex + 4 - touchMovementLabel.Parent = gameSettingsMenuFrame - - local touchEnumItems = Enum.TouchMovementMode:GetEnumItems() - local touchEnumNames = {} - local touchEnumNameToItem = {} - for i,obj in ipairs(touchEnumItems) do - local displayName = obj.Name - if (obj.Name == "Default") then - displayName = "Default (Thumbstick)" - end - touchEnumNames[i] = displayName - touchEnumNameToItem[displayName] = obj - end - - local touchMovementDropDown - touchMovementDropDown, updateTouchMovementDropDownSelection = RbxGui.CreateDropDownMenu(touchEnumNames, - function(text) - UserSettings().GameSettings.TouchMovementMode = touchEnumNameToItem[text] - end, false, true, baseZIndex) - touchMovementDropDown.Name = "touchMovementField" - touchMovementDropDown.ZIndex = baseZIndex + 4 - touchMovementDropDown.DropDownMenuButton.ZIndex = baseZIndex + 4 - touchMovementDropDown.DropDownMenuButton.Icon.ZIndex = baseZIndex + 4 - touchMovementDropDown.Position = UDim2.new(0, 270, 0, itemTop) - touchMovementDropDown.Size = UDim2.new(0,200,0,32) - touchMovementDropDown.Parent = gameSettingsMenuFrame - - itemTop = itemTop + 35 - end - - ---------------------------------------------------------------------------------------------------- - -- F U L L S C R E E N M O D E - ---------------------------------------------------------------------------------------------------- - - local fullscreenText = nil - local fullscreenShortcut = nil - local fullscreenCheckbox = nil - - if not touchClient then - - itemTop = itemTop + 15 - - fullscreenText = Instance.new("TextLabel") - fullscreenText.Name = "FullscreenText" - fullscreenText.Text = "Fullscreen Mode" - - fullscreenText.Position = UDim2.new(0,31,0,itemTop + 6) - fullscreenText.Size = UDim2.new(0,224,0,18) - - fullscreenText.Font = Enum.Font.SourceSansBold - fullscreenText.FontSize = Enum.FontSize.Size18 - fullscreenText.TextXAlignment = Enum.TextXAlignment.Left - fullscreenText.TextColor3 = Color3.new(1,1,1) - fullscreenText.ZIndex = baseZIndex + 4 - fullscreenText.BackgroundTransparency = 1 - fullscreenText.Parent = gameSettingsMenuFrame - - fullscreenCheckbox = createTextButton("",Enum.ButtonStyle.RobloxRoundButton,Enum.FontSize.Size18,UDim2.new(0,32,0,32),UDim2.new(0, 270, 0, itemTop- 4)) - fullscreenCheckbox.Name = "FullscreenCheckbox" - fullscreenCheckbox.ZIndex = baseZIndex + 4 - fullscreenCheckbox.Parent = gameSettingsMenuFrame - fullscreenCheckbox:SetVerb("ToggleFullScreen") - if UserSettings().GameSettings:InFullScreen() then fullscreenCheckbox.Text = "X" end - if hasGraphicsSlider then - UserSettings().GameSettings.FullscreenChanged:connect(function(isFullscreen) - if isFullscreen then - fullscreenCheckbox.Text = "X" - else - fullscreenCheckbox.Text = "" - end - end) - else - fullscreenCheckbox.MouseButton1Click:connect(function() - if fullscreenCheckbox.Text == "" then - fullscreenCheckbox.Text = "X" - else - fullscreenCheckbox.Text = "" - end - end) - end - end - - - - ---------------------------------------------------------------------------------------------------- - -- G R A P H I C S S L I D E R - ---------------------------------------------------------------------------------------------------- - if hasGraphicsSlider then - local qualityText = Instance.new("TextLabel") - qualityText.Name = "QualityText" - qualityText.Text = "Graphics Quality" - qualityText.Size = UDim2.new(0,224,0,18) - qualityText.Position = UDim2.new(0,31,0,239) - - qualityText.TextXAlignment = Enum.TextXAlignment.Left - qualityText.Font = Enum.Font.SourceSansBold - qualityText.FontSize = Enum.FontSize.Size18 - qualityText.TextColor3 = Color3.new(1,1,1) - qualityText.ZIndex = baseZIndex + 4 - qualityText.BackgroundTransparency = 1 - qualityText.Parent = gameSettingsMenuFrame - qualityText.Visible = not inStudioMode - - local autoText = qualityText:clone() - autoText.Name = "AutoText" - autoText.Text = "Auto" - autoText.Position = UDim2.new(0,270,0,214) - autoText.TextColor3 = Color3.new(128/255,128/255,128/255) - autoText.Size = UDim2.new(0,34,0,18) - autoText.Parent = gameSettingsMenuFrame - autoText.Visible = not inStudioMode - - local fasterText = autoText:clone() - fasterText.Name = "FasterText" - fasterText.Text = "Faster" - fasterText.Position = UDim2.new(0,185,0,274) - fasterText.TextColor3 = Color3.new(95,95,95) - fasterText.FontSize = Enum.FontSize.Size14 - fasterText.Parent = gameSettingsMenuFrame - fasterText.Visible = not inStudioMode - - local betterQualityText = autoText:clone() - betterQualityText.Name = "BetterQualityText" - betterQualityText.Text = "Better Quality" - betterQualityText.TextWrap = true - betterQualityText.Size = UDim2.new(0,41,0,28) - betterQualityText.Position = UDim2.new(0,390,0,269) - betterQualityText.TextColor3 = Color3.new(95,95,95) - betterQualityText.FontSize = Enum.FontSize.Size14 - betterQualityText.Parent = gameSettingsMenuFrame - betterQualityText.Visible = not inStudioMode - - local autoGraphicsButton = createTextButton("X",Enum.ButtonStyle.RobloxRoundButton,Enum.FontSize.Size18,UDim2.new(0,32,0,32),UDim2.new(0,270,0,230)) - autoGraphicsButton.Name = "AutoGraphicsButton" - autoGraphicsButton.ZIndex = baseZIndex + 4 - autoGraphicsButton.Parent = gameSettingsMenuFrame - autoGraphicsButton.Visible = not inStudioMode - - local graphicsSlider, graphicsLevel = RbxGui.CreateSliderNew(GraphicsQualityLevels,150,UDim2.new(0, 230, 0, 280)) -- graphics - 1 because slider starts at 1 instead of 0 - graphicsSlider.Parent = gameSettingsMenuFrame - graphicsSlider.Bar.ZIndex = baseZIndex + 4 - graphicsSlider.Bar.Slider.ZIndex = baseZIndex + 5 - graphicsSlider.Visible = not inStudioMode - graphicsLevel.Value = math.floor((settings().Rendering:GetMaxQualityLevel() - 1)/2) - - local graphicsSetter = Instance.new("TextBox") - graphicsSetter.Name = "GraphicsSetter" - graphicsSetter.BackgroundColor3 = Color3.new(0,0,0) - graphicsSetter.BorderColor3 = Color3.new(128/255,128/255,128/255) - graphicsSetter.Size = UDim2.new(0,50,0,25) - graphicsSetter.Position = UDim2.new(0,450,0,269) - graphicsSetter.TextColor3 = Color3.new(1,1,1) - graphicsSetter.Font = Enum.Font.SourceSansBold - graphicsSetter.FontSize = Enum.FontSize.Size18 - graphicsSetter.Text = "Auto" - graphicsSetter.ZIndex = 1 - graphicsSetter.TextWrap = true - graphicsSetter.Parent = gameSettingsMenuFrame - graphicsSetter.Visible = not inStudioMode - - local isAutoGraphics = true - if not inStudioMode then - isAutoGraphics = (UserSettings().GameSettings.SavedQualityLevel == Enum.SavedQualitySetting.Automatic) - else - settings().Rendering.EnableFRM = false - end - - local listenToGraphicsLevelChange = true - - local function setAutoGraphicsGui(active) - isAutoGraphics = active - if active then - autoGraphicsButton.Text = "X" - betterQualityText.ZIndex = 1 - fasterText.ZIndex = 1 - graphicsSlider.Bar.ZIndex = 1 - graphicsSlider.BarLeft.ZIndex = 1 - graphicsSlider.BarRight.ZIndex = 1 - graphicsSlider.Bar.Fill.ZIndex = 1 - graphicsSlider.FillLeft.ZIndex = 1 - graphicsSlider.Bar.Slider.ZIndex = 1 - graphicsSetter.ZIndex = 1 - graphicsSetter.Text = "Auto" - else - autoGraphicsButton.Text = "" - graphicsSlider.Bar.ZIndex = baseZIndex + 4 - graphicsSlider.Bar.Slider.ZIndex = baseZIndex + 6 - graphicsSlider.BarLeft.ZIndex = baseZIndex + 4 - graphicsSlider.BarRight.ZIndex = baseZIndex + 4 - graphicsSlider.Bar.Fill.ZIndex = baseZIndex + 5 - graphicsSlider.FillLeft.ZIndex = baseZIndex + 5 - betterQualityText.ZIndex = baseZIndex + 4 - fasterText.ZIndex = baseZIndex + 4 - graphicsSetter.ZIndex = baseZIndex + 4 - end - end - - local function goToAutoGraphics() - setAutoGraphicsGui(true) - - UserSettings().GameSettings.SavedQualityLevel = Enum.SavedQualitySetting.Automatic - - settings().Rendering.QualityLevel = Enum.QualityLevel.Automatic - end - - local function setGraphicsQualityLevel(newLevel) - local percentage = newLevel/GraphicsQualityLevels - local newSetting = math.floor((settings().Rendering:GetMaxQualityLevel() - 1) * percentage) - if newSetting == 20 then -- Level 20 is the same as level 21, except it doesn't render ambient occlusion - newSetting = 21 - elseif newLevel == 1 then -- make sure we can go to lowest settings (for terrible computers) - newSetting = 1 - elseif newSetting > settings().Rendering:GetMaxQualityLevel() then - newSetting = settings().Rendering:GetMaxQualityLevel() - 1 - end - - UserSettings().GameSettings.SavedQualityLevel = newLevel - settings().Rendering.QualityLevel = newSetting - end - - local function goToManualGraphics(explicitLevel) - setAutoGraphicsGui(false) - - if explicitLevel then - graphicsLevel.Value = explicitLevel - else - graphicsLevel.Value = math.floor((settings().Rendering.AutoFRMLevel/(settings().Rendering:GetMaxQualityLevel() - 1)) * GraphicsQualityLevels) - end - - if explicitLevel == graphicsLevel.Value then -- make sure we are actually in right graphics mode - setGraphicsQualityLevel(graphicsLevel.Value) - end - - if not explicitLevel then - UserSettings().GameSettings.SavedQualityLevel = graphicsLevel.Value - end - graphicsSetter.Text = tostring(graphicsLevel.Value) - end - - local function showAutoGraphics() - autoText.ZIndex = baseZIndex + 4 - autoGraphicsButton.ZIndex = baseZIndex + 4 - end - - local function hideAutoGraphics() - autoText.ZIndex = 1 - autoGraphicsButton.ZIndex = 1 - end - - local function showManualGraphics() - graphicsSlider.Bar.ZIndex = baseZIndex + 4 - graphicsSlider.Bar.Slider.ZIndex = baseZIndex + 5 - betterQualityText.ZIndex = baseZIndex + 4 - fasterText.ZIndex = baseZIndex + 4 - graphicsSetter.ZIndex = baseZIndex + 4 - end - - local function hideManualGraphics() - betterQualityText.ZIndex = 1 - fasterText.ZIndex = 1 - graphicsSlider.Bar.ZIndex = 1 - graphicsSlider.Bar.Slider.ZIndex = 1 - graphicsSetter.ZIndex = 1 - end - - local function translateSavedQualityLevelToInt(savedQualityLevel) - if savedQualityLevel == Enum.SavedQualitySetting.Automatic then - return 0 - elseif savedQualityLevel == Enum.SavedQualitySetting.QualityLevel1 then - return 1 - elseif savedQualityLevel == Enum.SavedQualitySetting.QualityLevel2 then - return 2 - elseif savedQualityLevel == Enum.SavedQualitySetting.QualityLevel3 then - return 3 - elseif savedQualityLevel == Enum.SavedQualitySetting.QualityLevel4 then - return 4 - elseif savedQualityLevel == Enum.SavedQualitySetting.QualityLevel5 then - return 5 - elseif savedQualityLevel == Enum.SavedQualitySetting.QualityLevel6 then - return 6 - elseif savedQualityLevel == Enum.SavedQualitySetting.QualityLevel7 then - return 7 - elseif savedQualityLevel == Enum.SavedQualitySetting.QualityLevel8 then - return 8 - elseif savedQualityLevel == Enum.SavedQualitySetting.QualityLevel9 then - return 9 - elseif savedQualityLevel == Enum.SavedQualitySetting.QualityLevel10 then - return 10 - end - end - - local function enableGraphicsWidget() - settings().Rendering.EnableFRM = true - - isAutoGraphics = (UserSettings().GameSettings.SavedQualityLevel == Enum.SavedQualitySetting.Automatic) - if isAutoGraphics then - showAutoGraphics() - goToAutoGraphics() - else - showAutoGraphics() - showManualGraphics() - goToManualGraphics(translateSavedQualityLevelToInt(UserSettings().GameSettings.SavedQualityLevel)) - end - end - - local function disableGraphicsWidget() - hideManualGraphics() - hideAutoGraphics() - settings().Rendering.EnableFRM = false - end - - graphicsSetter.FocusLost:connect(function() - if isAutoGraphics then - graphicsSetter.Text = tostring(graphicsLevel.Value) - return - end - - local newGraphicsValue = tonumber(graphicsSetter.Text) - if newGraphicsValue == nil then - graphicsSetter.Text = tostring(graphicsLevel.Value) - return - end - - if newGraphicsValue < 1 then newGraphicsValue = 1 - elseif newGraphicsValue >= settings().Rendering:GetMaxQualityLevel() then - newGraphicsValue = settings().Rendering:GetMaxQualityLevel() - 1 - end - - graphicsLevel.Value = newGraphicsValue - setGraphicsQualityLevel(graphicsLevel.Value) - graphicsSetter.Text = tostring(graphicsLevel.Value) - end) - - graphicsLevel.Changed:connect(function(prop) - if isAutoGraphics then return end - if not listenToGraphicsLevelChange then return end - - graphicsSetter.Text = tostring(graphicsLevel.Value) - setGraphicsQualityLevel(graphicsLevel.Value) - end) - - -- setup our graphic mode on load - if inStudioMode or UserSettings().GameSettings.SavedQualityLevel == Enum.SavedQualitySetting.Automatic then - if inStudioMode then - settings().Rendering.EnableFRM = false - disableGraphicsWidget() - else - settings().Rendering.EnableFRM = true - goToAutoGraphics() - end - else - settings().Rendering.EnableFRM = true - goToManualGraphics(translateSavedQualityLevelToInt(UserSettings().GameSettings.SavedQualityLevel)) - end - - autoGraphicsButton.MouseButton1Click:connect(function() - if inStudioMode and not game.Players.LocalPlayer then return end - - if not isAutoGraphics then - goToAutoGraphics() - else - goToManualGraphics(graphicsLevel.Value) - end - end) - - local lastUpdate = nil - game.GraphicsQualityChangeRequest:connect(function(graphicsIncrease) - if isAutoGraphics then return end -- only can set graphics in manual mode - - if graphicsIncrease then - if (graphicsLevel.Value + 1) > GraphicsQualityLevels then return end - graphicsLevel.Value = graphicsLevel.Value + 1 - graphicsSetter.Text = tostring(graphicsLevel.Value) - setGraphicsQualityLevel(graphicsLevel.Value) - - game:GetService("GuiService"):SendNotification("Graphics Quality", - "Increased to (" .. graphicsSetter.Text .. ")", - "", - 2, - function() - end) - else - if (graphicsLevel.Value - 1) <= 0 then return end - graphicsLevel.Value = graphicsLevel.Value - 1 - graphicsSetter.Text = tostring(graphicsLevel.Value) - setGraphicsQualityLevel(graphicsLevel.Value) - - game:GetService("GuiService"):SendNotification("Graphics Quality", - "Decreased to (" .. graphicsSetter.Text .. ")", - "", - 2, - function() - end) - end - end) - - game.Players.PlayerAdded:connect(function(player) - if player == game.Players.LocalPlayer and inStudioMode then - enableGraphicsWidget() - end - end) - game.Players.PlayerRemoving:connect(function(player) - if player == game.Players.LocalPlayer and inStudioMode then - disableGraphicsWidget() - end - end) - - studioCheckbox = createTextButton("",Enum.ButtonStyle.RobloxRoundButton,Enum.FontSize.Size18,UDim2.new(0,25,0,25),UDim2.new(0,30,0,176)) - studioCheckbox.Name = "StudioCheckbox" - studioCheckbox.ZIndex = baseZIndex + 4 - --studioCheckbox.Parent = gameSettingsMenuFrame -- todo: enable when studio h4x aren't an issue anymore - studioCheckbox:SetVerb("TogglePlayMode") - studioCheckbox.Visible = false -- todo: enabled when studio h4x aren't an issue anymore - - local wasManualGraphics = (settings().Rendering.QualityLevel ~= Enum.QualityLevel.Automatic) - if inStudioMode and not game.Players.LocalPlayer then - studioCheckbox.Text = "X" - disableGraphicsWidget() - elseif inStudioMode then - studioCheckbox.Text = "X" - enableGraphicsWidget() - end - if hasGraphicsSlider then - UserSettings().GameSettings.StudioModeChanged:connect(function(isStudioMode) - inStudioMode = isStudioMode - if isStudioMode then - wasManualGraphics = (settings().Rendering.QualityLevel ~= Enum.QualityLevel.Automatic) - goToAutoGraphics() - studioCheckbox.Text = "X" - autoGraphicsButton.ZIndex = 1 - autoText.ZIndex = 1 - else - if wasManualGraphics then - goToManualGraphics() - end - studioCheckbox.Text = "" - autoGraphicsButton.ZIndex = baseZIndex + 4 - autoText.ZIndex = baseZIndex + 4 - end - end) - else - studioCheckbox.MouseButton1Click:connect(function() - if not studioCheckbox.Active then return end - - if studioCheckbox.Text == "" then - studioCheckbox.Text = "X" - else - studioCheckbox.Text = "" - end - end) - end - end - - - if game:FindFirstChild("NetworkClient") then -- we are playing online - setDisabledState(studioText) - setDisabledState(studioShortcut) - setDisabledState(studioCheckbox) - end - - - ---------------------------------------------------------------------------------------------------- - -- O K B U T T O N - ---------------------------------------------------------------------------------------------------- - - - local backButton - if hasGraphicsSlider then - backButton = createTextButton("OK",Enum.ButtonStyle.RobloxRoundDefaultButton,Enum.FontSize.Size24,UDim2.new(0,180,0,50),UDim2.new(0,170,0,315)) - backButton.Modal = true - else - backButton = createTextButton("OK",Enum.ButtonStyle.RobloxRoundDefaultButton,Enum.FontSize.Size24,UDim2.new(0,180,0,50),UDim2.new(0,170,0,270)) - backButton.Modal = true - end - - backButton.Name = "BackButton" - backButton.ZIndex = baseZIndex + 4 - backButton.Parent = gameSettingsMenuFrame - - return gameSettingsMenuFrame -end - -local showMainMenu = nil - -if LoadLibrary then - RbxGui = LoadLibrary("RbxGui") - local baseZIndex = 4 -if UserSettings then - - waitForChild(gui,"TopLeftControl") - waitForChild(gui,"BottomLeftControl") - - - local settingButtonParent = gui:WaitForChild("TopLeftControl") - local createSettingsDialog = function() - if touchClient then - waitForChild(gui,"TopLeftControl") - else - settingButtonParent = gui:WaitForChild("BottomLeftControl") - end - - settingsButton = settingButtonParent:FindFirstChild("SettingsButton") - - if settingsButton == nil then - settingsButton = Instance.new("ImageButton") - settingsButton.Name = "SettingsButton" - settingsButton.Image = "rbxasset://textures/ui/homeButton.png" - settingsButton.BackgroundTransparency = 1 - settingsButton.Active = false - settingsButton.Size = UDim2.new(0,36,0,28) - if (touchClient) then - settingsButton.Position = UDim2.new(0,2,0,5) - else - settingsButton.Position = UDim2.new(0, 15, 1, -42) - end - settingsButton.Parent = settingButtonParent - end - - local shield = Instance.new("TextButton") - shield.Text = "" - shield.Name = "UserSettingsShield" - shield.Active = true - shield.AutoButtonColor = false - shield.Visible = false - shield.Size = UDim2.new(1,0,1,0) - shield.BackgroundColor3 = Color3I(51,51,51) - shield.BorderColor3 = Color3I(27,42,53) - shield.BackgroundTransparency = 0.4 - shield.ZIndex = baseZIndex + 2 - mainShield = shield - - local frame = Instance.new("Frame") - frame.Name = "Settings" - frame.Position = UDim2.new(0.5, -262, -0.5, -200) - frame.Size = UDim2.new(0, 525, 0, 430) - frame.BackgroundTransparency = 1 - frame.Active = true - frame.Parent = shield - - local settingsFrame = Instance.new("Frame") - settingsFrame.Name = "SettingsStyle" - settingsFrame.Size = UDim2.new(1, 0, 1, 0) - settingsFrame.Style = Enum.FrameStyle.DropShadow - settingsFrame.Active = true - settingsFrame.ZIndex = baseZIndex + 3 - settingsFrame.Parent = frame - - local gameMainMenu = createGameMainMenu(baseZIndex, shield) - gameMainMenu.Parent = settingsFrame - - gameMainMenu.ScreenshotButton.MouseButton1Click:connect(function() - backToGame(gameMainMenu.ScreenshotButton, shield, settingsButton) - end) - - gameMainMenu.RecordVideoButton.MouseButton1Click:connect(function() - recordVideoClick(gameMainMenu.RecordVideoButton, gui.StopRecordButton) - backToGame(gameMainMenu.RecordVideoButton, shield, settingsButton) - end) - - if settings():FindFirstChild("Game Options") then - pcall(function() - settings():FindFirstChild("Game Options").VideoRecordingChangeRequest:connect(function(recording) - recordingVideo = recording - setRecordGui(recording, gui.StopRecordButton, gameMainMenu.RecordVideoButton) - end) - end) - end - - game.CoreGui.RobloxGui.Changed:connect(function(prop) -- We have stopped recording when we resize - if prop == "AbsoluteSize" and recordingVideo then - recordVideoClick(gameMainMenu.RecordVideoButton, gui.StopRecordButton) - end - end) - - function localPlayerChange() - gameMainMenu.ResetButton.Visible = game.Players.LocalPlayer - if game.Players.LocalPlayer then - settings().Rendering.EnableFRM = true - elseif inStudioMode then - settings().Rendering.EnableFRM = false - end - end - - gameMainMenu.ResetButton.Visible = game.Players.LocalPlayer - if game.Players.LocalPlayer ~= nil then - game.Players.LocalPlayer.Changed:connect(function() - localPlayerChange() - end) - else - delay(0,function() - waitForProperty(game.Players,"LocalPlayer") - gameMainMenu.ResetButton.Visible = game.Players.LocalPlayer - game.Players.LocalPlayer.Changed:connect(function() - localPlayerChange() - end) - end) - end - - gameMainMenu.ReportAbuseButton.Visible = game:FindFirstChild("NetworkClient") - -- TODO: remove line below when not testing report abuse - if (testReport) then - gameMainMenu.ReportAbuseButton.Visible = true - end - if not gameMainMenu.ReportAbuseButton.Visible then - game.ChildAdded:connect(function(child) - if child:IsA("NetworkClient") then - gameMainMenu.ReportAbuseButton.Visible = game:FindFirstChild("NetworkClient") - end - end) - end - - gameMainMenu.ResetButton.MouseButton1Click:connect(function() - goToMenu(settingsFrame,"ResetConfirmationMenu","up",UDim2.new(0,525,0,370)) - end) - - local leaveGameButton = gameMainMenu:FindFirstChild("LeaveGameButton") - if (leaveGameButton) then - gameMainMenu.LeaveGameButton.MouseButton1Click:connect(function() - goToMenu(settingsFrame,"LeaveConfirmationMenu","down",UDim2.new(0,525,0,300)) - end) - end - - showMainMenu = function(overrideMenu, overrideDir, overrideSize) - if shield.Visible and overrideMenu then - goToMenu(settingsFrame,overrideMenu,overrideDir,overrideSize) - return - end - - game.GuiService:AddCenterDialog(shield, Enum.CenterDialogType.ModalDialog, - --showFunction - function() - settingsButton.Active = false - if updateCameraDropDownSelection ~= nil then - updateCameraDropDownSelection(UserSettings().GameSettings.ControlMode.Name) - end - - local cameraMode = UserSettings().GameSettings.CameraMode.Name - if (cameraMode == "Default") then - cameraMode = customCameraDefaultType - end - updateSmartCameraDropDownSelection(cameraMode) - - if updateTouchMovementDropDownSelection ~= nil then - local moveMode = UserSettings().GameSettings.TouchMovementMode.Name - if (moveMode == "Default") then - moveMode = "Default (Thumbstick)" - end - updateTouchMovementDropDownSelection(moveMode) - end - - pcall(function() game:GetService("UserInputService").OverrideMouseIconEnabled = true end) - - - if syncVideoCaptureSetting then - syncVideoCaptureSetting() - end - - local menuToGoTo = "GameMainMenu" - local direction = "right" - local menuSize = UDim2.new(0,525,0,430) - - if overrideMenu then - menuToGoTo = overrideMenu - end - if overrideDir then - direction = overrideDir - end - if overrideSize then - menuSize = overrideSize - end - - goToMenu(settingsFrame,menuToGoTo,direction,menuSize) - shield.Visible = true - shield.Active = true - settingsFrame.Parent:TweenPosition(UDim2.new(0.5, -262,0.5, -200),Enum.EasingDirection.InOut,Enum.EasingStyle.Sine,tweenTime,true) - settingsFrame.Parent:TweenSize(UDim2.new(0,525,0,430),Enum.EasingDirection.InOut,Enum.EasingStyle.Sine,tweenTime,true) - end, - --hideFunction - function() - settingsFrame.Parent:TweenPosition(UDim2.new(0.5, -262,-0.5, -200),Enum.EasingDirection.InOut,Enum.EasingStyle.Sine,tweenTime,true) - settingsFrame.Parent:TweenSize(UDim2.new(0,525,0,430),Enum.EasingDirection.InOut,Enum.EasingStyle.Sine,tweenTime,true) - shield.Visible = false - settingsButton.Active = true - end) - end - - if game.CoreGui.Version >= 4 then -- we can use escape! - game:GetService("GuiService").EscapeKeyPressed:connect(function() - if currentMenuSelection == nil then - showMainMenu() - elseif #lastMenuSelection > 0 then - if #centerDialogs > 0 then - for i = 1, #centerDialogs do - game.GuiService:RemoveCenterDialog(centerDialogs[i]) - centerDialogs[i].Visible = false - end - centerDialogs = {} - end - - goToMenu(lastMenuSelection[#lastMenuSelection]["container"],lastMenuSelection[#lastMenuSelection]["name"], - lastMenuSelection[#lastMenuSelection]["direction"],lastMenuSelection[#lastMenuSelection]["lastSize"]) - - table.remove(lastMenuSelection,#lastMenuSelection) - if #lastMenuSelection == 1 then -- apparently lua can't reduce count to 0... T_T - lastMenuSelection = {} - end - else - resumeGameFunction(shield) - end - end) - end - - local gameSettingsMenu = createGameSettingsMenu(baseZIndex, shield) - gameSettingsMenu.Visible = false - gameSettingsMenu.Parent = settingsFrame - - gameMainMenu.SettingsButton.MouseButton1Click:connect(function() - goToMenu(settingsFrame,"GameSettingsMenu","left",UDim2.new(0,525,0,350)) - end) - - gameSettingsMenu.BackButton.MouseButton1Click:connect(function() - goToMenu(settingsFrame,"GameMainMenu","right",UDim2.new(0,525,0,430)) - end) - - local resetConfirmationWindow = createResetConfirmationMenu(baseZIndex, shield) - resetConfirmationWindow.Visible = false - resetConfirmationWindow.Parent = settingsFrame - - local leaveConfirmationWindow = createLeaveConfirmationMenu(baseZIndex,shield) - leaveConfirmationWindow.Visible = false - leaveConfirmationWindow.Parent = settingsFrame - - robloxLock(shield) - - settingsButton.MouseButton1Click:connect( - function() - game.GuiService:AddCenterDialog(shield, Enum.CenterDialogType.ModalDialog, - --showFunction - function() - settingsButton.Active = false - if updateCameraDropDownSelection ~= nil then - updateCameraDropDownSelection(UserSettings().GameSettings.ControlMode.Name) - end - - local cameraMode = UserSettings().GameSettings.CameraMode.Name - if (cameraMode == "Default") then - cameraMode = customCameraDefaultType - end - updateSmartCameraDropDownSelection(cameraMode) - - if updateTouchMovementDropDownSelection ~= nil then - local moveMode = UserSettings().GameSettings.TouchMovementMode.Name - if (moveMode == "Default") then - moveMode = "Default (Thumbstick)" - end - updateTouchMovementDropDownSelection(moveMode) - end - - if syncVideoCaptureSetting then - syncVideoCaptureSetting() - end - - goToMenu(settingsFrame,"GameMainMenu","right",UDim2.new(0,525,0,430)) - shield.Visible = true - settingsFrame.Parent:TweenPosition(UDim2.new(0.5, -262,0.5, -200),Enum.EasingDirection.InOut,Enum.EasingStyle.Sine,tweenTime,true) - settingsFrame.Parent:TweenSize(UDim2.new(0,525,0,430),Enum.EasingDirection.InOut,Enum.EasingStyle.Sine,tweenTime,true) - end, - --hideFunction - function() - settingsFrame.Parent:TweenPosition(UDim2.new(0.5, -262,-0.5, -200),Enum.EasingDirection.InOut,Enum.EasingStyle.Sine,tweenTime,true) - settingsFrame.Parent:TweenSize(UDim2.new(0,525,0,430),Enum.EasingDirection.InOut,Enum.EasingStyle.Sine,tweenTime,true) - shield.Visible = false - settingsButton.Active = true - end) - end) - - return shield - end - - delay(0, function() - createSettingsDialog().Parent = gui - - settingButtonParent.SettingsButton.Active = true --- settingButtonParent.SettingsButton.Position = UDim2.new(0,2,0,-2) - - if mouseLockLabel and UserSettings().GameSettings.ControlMode == Enum.ControlMode["Mouse Lock Switch"] then - mouseLockLabel.Visible = true - elseif mouseLockLabel then - mouseLockLabel.Visible = false - end - - -- our script has loaded, get rid of older buttons now - local leaveGameButton = gui.BottomLeftControl:FindFirstChild("Exit") - if leaveGameButton then leaveGameButton:Remove() end - - local topLeft = gui:FindFirstChild("TopLeftControl") - if topLeft then - leaveGameButton = topLeft:FindFirstChild("Exit") - if leaveGameButton then leaveGameButton:Remove() end - - if settingButtonParent ~= topLeft then - topLeft:Remove() - end - end - --]] - end) - -end --UserSettings call - -local createSaveDialogs = function() - local shield = Instance.new("TextButton") - shield.Text = "" - shield.AutoButtonColor = false - shield.Name = "SaveDialogShield" - shield.Active = true - shield.Visible = false - shield.Size = UDim2.new(1,0,1,0) - shield.BackgroundColor3 = Color3I(51,51,51) - shield.BorderColor3 = Color3I(27,42,53) - shield.BackgroundTransparency = 0.4 - shield.ZIndex = baseZIndex+1 - - local clearAndResetDialog - local save - local saveLocal - local dontSave - local cancel - - local messageBoxButtons = {} - messageBoxButtons[1] = {} - messageBoxButtons[1].Text = "Save" - messageBoxButtons[1].Style = Enum.ButtonStyle.RobloxRoundDefaultButton - messageBoxButtons[1].Function = function() save() end - messageBoxButtons[1].ZIndex = baseZIndex+3 - messageBoxButtons[2] = {} - messageBoxButtons[2].Text = "Cancel" - messageBoxButtons[2].Function = function() cancel() end - messageBoxButtons[2].Style = Enum.ButtonStyle.RobloxRoundButton - messageBoxButtons[2].ZIndex = baseZIndex+3 - messageBoxButtons[3] = {} - messageBoxButtons[3].Text = "Don't Save" - messageBoxButtons[3].Function = function() dontSave() end - messageBoxButtons[3].Style = Enum.ButtonStyle.RobloxRoundButton - messageBoxButtons[3].ZIndex = baseZIndex+3 - - local saveDialogMessageBox = RbxGui.CreateStyledMessageDialog("Unsaved Changes", "Save your changes to ROBLOX before leaving?", "Confirm", messageBoxButtons) - saveDialogMessageBox.Visible = true - saveDialogMessageBox.Parent = shield - saveDialogMessageBox.ZIndex = baseZIndex+2 - saveDialogMessageBox.Style = Enum.FrameStyle.DropShadow - saveDialogMessageBox.Title.ZIndex = baseZIndex+3 - saveDialogMessageBox.Message.ZIndex = baseZIndex+3 - saveDialogMessageBox.StyleImage.ZIndex = baseZIndex+3 - - - local errorBoxButtons = {} - - local buttonOffset = 1 - if game.LocalSaveEnabled then - errorBoxButtons[buttonOffset] = {} - errorBoxButtons[buttonOffset].Text = "Save to Disk" - errorBoxButtons[buttonOffset].Function = function() saveLocal() end - buttonOffset = buttonOffset + 1 - end - errorBoxButtons[buttonOffset] = {} - errorBoxButtons[buttonOffset].Text = "Keep Playing" - errorBoxButtons[buttonOffset].Function = function() cancel() end - errorBoxButtons[buttonOffset].Style = Enum.ButtonStyle.RobloxRoundButton - errorBoxButtons[buttonOffset].ZIndex = baseZIndex+3 - errorBoxButtons[buttonOffset+1] = {} - errorBoxButtons[buttonOffset+1].Text = "Don't Save" - errorBoxButtons[buttonOffset+1].Function = function() dontSave() end - errorBoxButtons[buttonOffset+1].Style = Enum.ButtonStyle.RobloxRoundButton - errorBoxButtons[buttonOffset+1].ZIndex = baseZIndex+3 - - local errorDialogMessageBox = RbxGui.CreateStyledMessageDialog("Upload Failed", "Sorry, we could not save your changes to ROBLOX. If this problem continues to occur, please make sure your Roblox account has a verified email address.", "Error", errorBoxButtons) - errorDialogMessageBox.Visible = false - errorDialogMessageBox.Parent = shield - errorDialogMessageBox.ZIndex = baseZIndex+2 - errorDialogMessageBox.Style = Enum.FrameStyle.DropShadow - errorDialogMessageBox.Title.ZIndex = baseZIndex+3 - errorDialogMessageBox.Message.ZIndex = baseZIndex+3 - errorDialogMessageBox.StyleImage.ZIndex = baseZIndex+3 - - local spinnerDialog = Instance.new("Frame") - spinnerDialog.Name = "SpinnerDialog" - spinnerDialog.Style = Enum.FrameStyle.DropShadow - spinnerDialog.Size = UDim2.new(0, 350, 0, 150) - spinnerDialog.Position = UDim2.new(.5, -175, .5, -75) - spinnerDialog.Visible = false - spinnerDialog.Active = true - spinnerDialog.ZIndex = baseZIndex+1 - spinnerDialog.Parent = shield - - local waitingLabel = Instance.new("TextLabel") - waitingLabel.Name = "WaitingLabel" - waitingLabel.Text = "Saving to ROBLOX..." - waitingLabel.Font = Enum.Font.SourceSansBold - waitingLabel.FontSize = Enum.FontSize.Size18 - waitingLabel.Position = UDim2.new(0.5, 25, 0.5, 0) - waitingLabel.TextColor3 = Color3.new(1,1,1) - waitingLabel.ZIndex = baseZIndex+2 - waitingLabel.Parent = spinnerDialog - - local spinnerFrame = Instance.new("Frame") - spinnerFrame.Name = "Spinner" - spinnerFrame.Size = UDim2.new(0, 80, 0, 80) - spinnerFrame.Position = UDim2.new(0.5, -150, 0.5, -40) - spinnerFrame.BackgroundTransparency = 1 - spinnerFrame.ZIndex = baseZIndex+2 - spinnerFrame.Parent = spinnerDialog - - local spinnerIcons = {} - local spinnerNum = 1 - while spinnerNum <= 8 do - local spinnerImage = Instance.new("ImageLabel") - spinnerImage.Name = "Spinner"..spinnerNum - spinnerImage.Size = UDim2.new(0, 16, 0, 16) - spinnerImage.Position = UDim2.new(.5+.3*math.cos(math.rad(45*spinnerNum)), -8, .5+.3*math.sin(math.rad(45*spinnerNum)), -8) - spinnerImage.BackgroundTransparency = 1 - spinnerImage.Image = "http://www.mete0r.xyz/Asset?id=45880710" - spinnerImage.ZIndex = baseZIndex+3 - spinnerImage.Parent = spinnerFrame - - spinnerIcons[spinnerNum] = spinnerImage - spinnerNum = spinnerNum + 1 - end - - save = function() - saveDialogMessageBox.Visible = false - - --Show the spinner dialog - spinnerDialog.Visible = true - local spin = true - --Make it spin - delay(0, function() - local spinPos = 0 - while spin do - local pos = 0 - - while pos < 8 do - if pos == spinPos or pos == ((spinPos+1)%8) then - spinnerIcons[pos+1].Image = "http://www.mete0r.xyz/Asset?id=45880668" - else - spinnerIcons[pos+1].Image = "http://www.mete0r.xyz/Asset?id=45880710" - end - - pos = pos + 1 - end - spinPos = (spinPos + 1) % 8 - wait(0.2) - end - end) - - --Do the save while the spinner is going, function will wait - local result = game:SaveToRoblox() - if not result then - --Try once more - result = game:SaveToRoblox() - end - - --Hide the spinner dialog - spinnerDialog.Visible = false - --And cause the delay thread to stop - spin = false - - --Now process the result - if result then - --Success, close - game:FinishShutdown(false) - clearAndResetDialog() - else - --Failure, show the second dialog prompt - errorDialogMessageBox.Visible = true - end - end - - saveLocal = function() - errorDialogMessageBox.Visible = false - game:FinishShutdown(true) - clearAndResetDialog() - end - - dontSave = function() - saveDialogMessageBox.Visible = false - errorDialogMessageBox.Visible = false - game:FinishShutdown(false) - clearAndResetDialog() - end - cancel = function() - saveDialogMessageBox.Visible = false - errorDialogMessageBox.Visible = false - clearAndResetDialog() - end - - clearAndResetDialog = function() - saveDialogMessageBox.Visible = true - errorDialogMessageBox.Visible = false - spinnerDialog.Visible = false - shield.Visible = false - game.GuiService:RemoveCenterDialog(shield) - end - - robloxLock(shield) - shield.Visible = false - return shield -end - -local createReportAbuseDialog = function() - --Only show things if we are a NetworkClient - -- TODO: add line back in when not testing report abuse - if not testReport then - waitForChild(game,"NetworkClient") - end - - waitForChild(game,"Players") - waitForProperty(game.Players, "LocalPlayer") - local localPlayer = game.Players.LocalPlayer - - local reportAbuseButton - waitForChild(gui,"UserSettingsShield") - waitForChild(gui.UserSettingsShield, "Settings") - waitForChild(gui.UserSettingsShield.Settings,"SettingsStyle") - waitForChild(gui.UserSettingsShield.Settings.SettingsStyle,"GameMainMenu") - waitForChild(gui.UserSettingsShield.Settings.SettingsStyle.GameMainMenu, "ReportAbuseButton") - reportAbuseButton = gui.UserSettingsShield.Settings.SettingsStyle.GameMainMenu.ReportAbuseButton - - local shield = Instance.new("TextButton") - shield.Name = "ReportAbuseShield" - shield.Text = "" - shield.AutoButtonColor = false - shield.Active = true - shield.Visible = false - shield.Size = UDim2.new(1,0,1,0) - shield.BackgroundColor3 = Color3I(51,51,51) - shield.BorderColor3 = Color3I(27,42,53) - shield.BackgroundTransparency = 0.4 - shield.ZIndex = baseZIndex + 1 - - local closeAndResetDialgo - - local messageBoxButtons = {} - messageBoxButtons[1] = {} - messageBoxButtons[1].Text = "Ok" - messageBoxButtons[1].Modal = true - messageBoxButtons[1].Style = Enum.ButtonStyle.RobloxRoundDefaultButton - messageBoxButtons[1].ZIndex = baseZIndex+3 - messageBoxButtons[1].Function = function() closeAndResetDialog() end - local calmingMessageBox = RbxGui.CreateMessageDialog("Thanks for your report!", "Our moderators will review the chat logs and determine what happened. The other user is probably just trying to make you mad.\n\nIf anyone used swear words, inappropriate language, or threatened you in real life, please report them for Bad Words or Threats", messageBoxButtons) - calmingMessageBox.Visible = false - calmingMessageBox.Parent = shield - calmingMessageBox.ZIndex = baseZIndex+2 - calmingMessageBox.Style = Enum.FrameStyle.DropShadow - calmingMessageBox.Title.ZIndex = baseZIndex+3 - calmingMessageBox.Message.ZIndex = baseZIndex+3 - - local recordedMessageBox = RbxGui.CreateMessageDialog("Thanks for your report!","We've recorded your report for evaluation.", messageBoxButtons) - recordedMessageBox.Visible = false - recordedMessageBox.Parent = shield - recordedMessageBox.ZIndex = baseZIndex+2 - recordedMessageBox.Style = Enum.FrameStyle.DropShadow - recordedMessageBox.Title.ZIndex = baseZIndex+3 - recordedMessageBox.Message.ZIndex = baseZIndex+3 - - local normalMessageBox = RbxGui.CreateMessageDialog("Thanks for your report!", "Our moderators will review the chat logs and determine what happened.", messageBoxButtons) - normalMessageBox.Visible = false - normalMessageBox.Parent = shield - normalMessageBox.ZIndex = baseZIndex+2 - normalMessageBox.Style = Enum.FrameStyle.DropShadow - normalMessageBox.Title.ZIndex = baseZIndex+3 - normalMessageBox.Message.ZIndex = baseZIndex+3 - - local frame = Instance.new("Frame") - frame.Name = "Settings" - frame.Position = UDim2.new(0.5, -240, 0.5, -160) - frame.Size = UDim2.new(0.0, 480, 0.0, 320) - frame.BackgroundTransparency = 1 - frame.Active = true - frame.Parent = shield - - local settingsFrame = Instance.new("Frame") - settingsFrame.Name = "ReportAbuseStyle" - settingsFrame.Size = UDim2.new(1, 0, 1, 0) - settingsFrame.Style = Enum.FrameStyle.DropShadow - settingsFrame.Active = true - settingsFrame.ZIndex = baseZIndex + 1 - settingsFrame.Parent = frame - - local description = Instance.new("TextLabel") - description.Name = "Description" - description.Text = "This will send a complete report to a moderator. The moderator will review the chat log and take appropriate action." - description.TextColor3 = Color3I(221,221,221) - description.Position = UDim2.new(0, 10, 0, 10) - description.Size = UDim2.new(1, -20, 0, 40) - description.BackgroundTransparency = 1 - description.Font = Enum.Font.SourceSans - description.FontSize = Enum.FontSize.Size18 - description.TextWrap = true - description.ZIndex = baseZIndex + 2 - description.TextXAlignment = Enum.TextXAlignment.Left - description.TextYAlignment = Enum.TextYAlignment.Top - description.Parent = settingsFrame - - local playerLabel = Instance.new("TextLabel") - playerLabel.Name = "PlayerLabel" - playerLabel.Text = "Which player?" - playerLabel.BackgroundTransparency = 1 - playerLabel.Font = Enum.Font.SourceSans - playerLabel.FontSize = Enum.FontSize.Size18 - playerLabel.Position = UDim2.new(0.025,20,0,92) - playerLabel.Size = UDim2.new(0.4,0,0,36) - playerLabel.TextColor3 = Color3I(255,255,255) - playerLabel.TextXAlignment = Enum.TextXAlignment.Left - playerLabel.ZIndex = baseZIndex + 2 - playerLabel.Parent = settingsFrame - - local gameOrPlayerLabel = Instance.new("TextLabel") - gameOrPlayerLabel.Name = "TypeLabel" - gameOrPlayerLabel.Text = "Game or Player:" - gameOrPlayerLabel.BackgroundTransparency = 1 - gameOrPlayerLabel.Font = Enum.Font.SourceSans - gameOrPlayerLabel.FontSize = Enum.FontSize.Size18 - gameOrPlayerLabel.Position = UDim2.new(0.025,20,0,55) - gameOrPlayerLabel.Size = UDim2.new(0.4,0,0,36) - gameOrPlayerLabel.TextColor3 = Color3I(255,255,255) - gameOrPlayerLabel.TextXAlignment = Enum.TextXAlignment.Left - gameOrPlayerLabel.ZIndex = baseZIndex + 2 - gameOrPlayerLabel.Parent = settingsFrame - - local abuseLabel = Instance.new("TextLabel") - abuseLabel.Name = "AbuseLabel" - abuseLabel.Text = "Type of Abuse:" - abuseLabel.Font = Enum.Font.SourceSans - abuseLabel.BackgroundTransparency = 1 - abuseLabel.FontSize = Enum.FontSize.Size18 - abuseLabel.Position = UDim2.new(0.025,20,0,131) - abuseLabel.Size = UDim2.new(0.4,0,0,36) - abuseLabel.TextColor3 = Color3I(255,255,255) - abuseLabel.TextXAlignment = Enum.TextXAlignment.Left - abuseLabel.ZIndex = baseZIndex + 2 - abuseLabel.Parent = settingsFrame - - local abusingPlayer = nil - local abuse = nil - local submitReportButton = nil - local gameOrPlayer = nil - - local updatePlayerSelection = nil - local createPlayersDropDown = function() - local players = game:GetService("Players") - local playerNames = {} - local nameToPlayer = {} - local children = players:GetChildren() - local pos = 1 - if children then - for i, player in ipairs(children) do - if player:IsA("Player") and player ~= localPlayer then - playerNames[pos] = player.Name - nameToPlayer[player.Name] = player - pos = pos + 1 - end - end - end - local playerDropDown = nil - playerDropDown, updatePlayerSelection = RbxGui.CreateDropDownMenu(playerNames, - function(playerName) - abusingPlayer = nameToPlayer[playerName] - if abuse and abusingPlayer then - submitReportButton.Active = true - end - end, false, true, baseZIndex) - playerDropDown.Name = "PlayersComboBox" - playerDropDown.ZIndex = baseZIndex + 2 - playerDropDown.Position = UDim2.new(.425, 0, 0, 94) - playerDropDown.Size = UDim2.new(.55,0,0,32) - - return playerDropDown - end - - local gameOrPlayerTable = {"Game","Player"} - local gameOrPlayerDropDown = nil - gameOrPlayerDropDown = RbxGui.CreateDropDownMenu(gameOrPlayerTable, - function(gameOrPlayerText) - gameOrPlayer = gameOrPlayerText - if gameOrPlayer == "Game" then - submitReportButton.Active = true - playerLabel.Visible = false - local playerDropDown = gameOrPlayerDropDown.Parent:FindFirstChild("PlayersComboBox") - if playerDropDown then - playerDropDown.Visible = false - end - else - playerLabel.Visible = true - local playerDropDown = gameOrPlayerDropDown.Parent:FindFirstChild("PlayersComboBox") - if playerDropDown then - playerDropDown.Visible = true - end - end - end, true, true, baseZIndex) - gameOrPlayerDropDown.Name = "TypeComboBox" - gameOrPlayerDropDown.ZIndex = baseZIndex + 2 - gameOrPlayerDropDown.Position = UDim2.new(0.425, 0, 0, 55) - gameOrPlayerDropDown.Size = UDim2.new(0.55,0,0,32) - gameOrPlayerDropDown.Parent = settingsFrame - - local abuses = {"Swearing","Bullying","Scamming","Dating","Cheating/Exploiting","Personal Questions","Offsite Links","Bad Model or Script","Bad Username"} - local abuseDropDown, updateAbuseSelection = RbxGui.CreateDropDownMenu(abuses, - function(abuseText) - abuse = abuseText - if abuse and abusingPlayer then - submitReportButton.Active = true - end - end, true, true, baseZIndex) - abuseDropDown.Name = "AbuseComboBox" - abuseDropDown.ZIndex = baseZIndex + 2 - abuseDropDown.Position = UDim2.new(0.425, 0, 0, 133) - abuseDropDown.Size = UDim2.new(0.55,0,0,32) - abuseDropDown.Parent = settingsFrame - - local shortDescriptionLabel = Instance.new("TextLabel") - shortDescriptionLabel.Name = "ShortDescriptionLabel" - shortDescriptionLabel.Text = "Short Description: (optional)" - shortDescriptionLabel.Font = Enum.Font.SourceSans - shortDescriptionLabel.FontSize = Enum.FontSize.Size18 - shortDescriptionLabel.Position = UDim2.new(0.025,0,0,165) - shortDescriptionLabel.Size = UDim2.new(0.95,0,0,36) - shortDescriptionLabel.TextColor3 = Color3I(255,255,255) - shortDescriptionLabel.TextXAlignment = Enum.TextXAlignment.Left - shortDescriptionLabel.BackgroundTransparency = 1 - shortDescriptionLabel.ZIndex = baseZIndex + 2 - shortDescriptionLabel.Parent = settingsFrame - - local shortDescriptionWrapper = Instance.new("Frame") - shortDescriptionWrapper.Name = "ShortDescriptionWrapper" - shortDescriptionWrapper.Position = UDim2.new(0.025,0,0,195) - shortDescriptionWrapper.Size = UDim2.new(0.95,0,1,-250) - shortDescriptionWrapper.BackgroundColor3 = Color3I(206,206,206) - shortDescriptionWrapper.BorderSizePixel = 0 - shortDescriptionWrapper.ZIndex = baseZIndex + 2 - shortDescriptionWrapper.Parent = settingsFrame - - local shortDescriptionBox = Instance.new("TextBox") - shortDescriptionBox.Name = "TextBox" - shortDescriptionBox.Text = "" - shortDescriptionBox.ClearTextOnFocus = false - shortDescriptionBox.Font = Enum.Font.SourceSans - shortDescriptionBox.FontSize = Enum.FontSize.Size18 - shortDescriptionBox.Position = UDim2.new(0,3,0,3) - shortDescriptionBox.Size = UDim2.new(1,-6,1,-6) - shortDescriptionBox.TextColor3 = Color3I(0,0,0) - shortDescriptionBox.TextXAlignment = Enum.TextXAlignment.Left - shortDescriptionBox.TextYAlignment = Enum.TextYAlignment.Top - shortDescriptionBox.TextWrap = true - shortDescriptionBox.BackgroundColor3 = Color3I(206,206,206) - shortDescriptionBox.BorderColor3 = Color3I(206,206,206) - shortDescriptionBox.ZIndex = baseZIndex + 2 - shortDescriptionBox.Parent = shortDescriptionWrapper - - submitReportButton = Instance.new("TextButton") - submitReportButton.Name = "SubmitReportBtn" - submitReportButton.Active = false - submitReportButton.Modal = true - submitReportButton.Font = Enum.Font.SourceSans - submitReportButton.FontSize = Enum.FontSize.Size18 - submitReportButton.Position = UDim2.new(0.1, 0, 1, -50) - submitReportButton.Size = UDim2.new(0.35,0,0,40) - submitReportButton.AutoButtonColor = true - submitReportButton.Style = Enum.ButtonStyle.RobloxRoundDefaultButton - submitReportButton.Text = "Submit Report" - submitReportButton.TextColor3 = Color3I(255,255,255) - submitReportButton.ZIndex = baseZIndex + 2 - submitReportButton.Parent = settingsFrame - - submitReportButton.MouseButton1Click:connect(function() - if submitReportButton.Active then - if abuse and abusingPlayer then - frame.Visible = false - if gameOrPlayer == "Player" then - game.Players:ReportAbuse(abusingPlayer, abuse, shortDescriptionBox.Text) - else - game.Players:ReportAbuse(nil, abuse, shortDescriptionBox.Text) - end - if abuse == "Cheating/Exploiting" then - recordedMessageBox.Visible = true - elseif abuse == "Bullying" or abuse == "Swearing" then - calmingMessageBox.Visible = true - else - normalMessageBox.Visible = true - end - else - closeAndResetDialog() - end - end - end) - - local cancelButton = Instance.new("TextButton") - cancelButton.Name = "CancelBtn" - cancelButton.Font = Enum.Font.SourceSans - cancelButton.FontSize = Enum.FontSize.Size18 - cancelButton.Position = UDim2.new(0.55, 0, 1, -50) - cancelButton.Size = UDim2.new(0.35,0,0,40) - cancelButton.AutoButtonColor = true - cancelButton.Style = Enum.ButtonStyle.RobloxRoundDefaultButton - cancelButton.Text = "Cancel" - cancelButton.TextColor3 = Color3I(255,255,255) - cancelButton.ZIndex = baseZIndex + 2 - cancelButton.Parent = settingsFrame - - closeAndResetDialog = function() - --Delete old player combo box - local oldComboBox = settingsFrame:FindFirstChild("PlayersComboBox") - if oldComboBox then - oldComboBox.Parent = nil - end - - abusingPlayer = nil updatePlayerSelection(nil) - abuse = nil updateAbuseSelection(nil) - submitReportButton.Active = false - shortDescriptionBox.Text = "" - frame.Visible = true - calmingMessageBox.Visible = false - recordedMessageBox.Visible = false - normalMessageBox.Visible = false - shield.Visible = false - reportAbuseButton.Active = true - game.GuiService:RemoveCenterDialog(shield) - end - - cancelButton.MouseButton1Click:connect(closeAndResetDialog) - - reportAbuseButton.MouseButton1Click:connect( - function() - createPlayersDropDown().Parent = settingsFrame - table.insert(centerDialogs,shield) - game.GuiService:AddCenterDialog(shield, Enum.CenterDialogType.ModalDialog, - --ShowFunction - function() - reportAbuseButton.Active = false - shield.Visible = true - mainShield.Visible = false - end, - --HideFunction - function() - reportAbuseButton.Active = true - shield.Visible = false - end) - end) - - robloxLock(shield) - return shield -end - -local createChatBar = function() - --Only show a chat bar if we are a NetworkClient - waitForChild(game, "NetworkClient") - - waitForChild(game, "Players") - waitForProperty(game.Players, "LocalPlayer") - - local chatBar = Instance.new("Frame") - chatBar.Name = "ChatBar" - chatBar.Size = UDim2.new(1, 0, 0, 22) - chatBar.Position = UDim2.new(0, 0, 1, 0) - chatBar.BackgroundColor3 = Color3.new(0,0,0) - chatBar.BorderSizePixel = 0 - - local chatBox = Instance.new("TextBox") - chatBox.Text = "" - chatBox.Visible = false - chatBox.Size = UDim2.new(1,-4,1,0) - chatBox.Position = UDim2.new(0,2,0,0) - chatBox.TextXAlignment = Enum.TextXAlignment.Left - chatBox.Font = Enum.Font.SourceSansBold - chatBox.ClearTextOnFocus = false - chatBox.FontSize = Enum.FontSize.Size14 - chatBox.TextColor3 = Color3.new(1,1,1) - chatBox.BackgroundTransparency = 1 - --chatBox.Parent = chatBar - - local chatButton = Instance.new("TextButton") - chatButton.Size = UDim2.new(1,-4,1,0) - chatButton.Position = UDim2.new(0,2,0,0) - chatButton.AutoButtonColor = false - chatButton.Text = "To chat click here or press \"/\" key" - chatButton.TextXAlignment = Enum.TextXAlignment.Left - chatButton.Font = Enum.Font.SourceSansBold - chatButton.FontSize = Enum.FontSize.Size14 - chatButton.TextColor3 = Color3.new(1,1,1) - chatButton.BackgroundTransparency = 1 - --chatButton.Parent = chatBar - - local activateChat = function() - if chatBox.Visible then - return - end - chatButton.Visible = false - chatBox.Text = "" - chatBox.Visible = true - chatBox:CaptureFocus() - end - - chatButton.MouseButton1Click:connect(activateChat) - - local hotKeyEnabled = true - local toggleHotKey = function(value) - hotKeyEnabled = value - end - - local guiService = game:GetService("GuiService") - local newChatMode = pcall(function() - --guiService:AddSpecialKey(Enum.SpecialKey.ChatHotkey) - --guiService.SpecialKeyPressed:connect(function(key) if key == Enum.SpecialKey.ChatHotkey and hotKeyEnabled then activateChat() end end) - end) - if not newChatMode then - --guiService:AddKey("/") - --guiService.KeyPressed:connect(function(key) if key == "/" and hotKeyEnabled then activateChat() end end) - end - - chatBox.FocusLost:connect( - function(enterPressed) - if enterPressed then - if chatBox.Text ~= "" then - local str = chatBox.Text - if string.sub(str, 1, 1) == '%' then - game.Players:TeamChat(string.sub(str, 2)) - else - game.Players:Chat(str) - end - end - end - chatBox.Text = "" - chatBox.Visible = false - chatButton.Visible = true - end) - robloxLock(chatBar) - return chatBar, toggleHotKey -end - ---Spawn a thread for the Save dialogs -local isSaveDialogSupported = pcall(function() local var = game.LocalSaveEnabled end) -if isSaveDialogSupported then - delay(0, - function() - local saveDialogs = createSaveDialogs() - saveDialogs.Parent = gui - - game.RequestShutdown = function() - table.insert(centerDialogs,saveDialogs) - game.GuiService:AddCenterDialog(saveDialogs, Enum.CenterDialogType.QuitDialog, - --ShowFunction - function() - saveDialogs.Visible = true - end, - --HideFunction - function() - saveDialogs.Visible = false - end) - - return true - end - end) -end - ---Spawn a thread to listen to leave game prompts -Spawn(function() - local showLeaveEvent = nil - pcall(function() showLeaveEvent = Game:GetService("GuiService").ShowLeaveConfirmation end) - if not showLeaveEvent then return end - - function showLeaveConfirmation() - if showMainMenu then - showMainMenu("LeaveConfirmationMenu","down",UDim2.new(0,525,0,300)) - end - end - - Game:GetService("GuiService").ShowLeaveConfirmation:connect(function( ) - if currentMenuSelection == nil then - showLeaveConfirmation() - else - resumeGameFunction(gui.UserSettingsShield) - end - end) -end) - ---Spawn a thread for the Report Abuse dialogs -delay(0, - function() - createReportAbuseDialog().Parent = gui - waitForChild(gui,"UserSettingsShield") - waitForChild(gui.UserSettingsShield, "Settings") - waitForChild(gui.UserSettingsShield.Settings,"SettingsStyle") - waitForChild(gui.UserSettingsShield.Settings.SettingsStyle,"GameMainMenu") - waitForChild(gui.UserSettingsShield.Settings.SettingsStyle.GameMainMenu, "ReportAbuseButton") - gui.UserSettingsShield.Settings.SettingsStyle.GameMainMenu.ReportAbuseButton.Active = true - end) - -end --LoadLibrary if diff --git a/assets/ugc/858 b/assets/ugc/858 deleted file mode 100644 index 8d06c37..0000000 --- a/assets/ugc/858 +++ /dev/null @@ -1,110 +0,0 @@ ---rbxassetid%858% -local controlFrame = script.Parent:FindFirstChild("ControlFrame") - -if not controlFrame then return end - -local topLeftControl = controlFrame:FindFirstChild("TopLeftControl") -local bottomLeftControl = controlFrame:FindFirstChild("BottomLeftControl") -local bottomRightControl = controlFrame:FindFirstChild("BottomRightControl") - - -local frameTip = Instance.new("TextLabel") -frameTip.Name = "ToolTip" -frameTip.Text = "" -frameTip.Font = Enum.Font.ArialBold -frameTip.FontSize = Enum.FontSize.Size12 -frameTip.TextColor3 = Color3.new(1,1,1) -frameTip.BorderSizePixel = 0 -frameTip.ZIndex = 10 -frameTip.Size = UDim2.new(2,0,1,0) -frameTip.Position = UDim2.new(1,0,0,0) -frameTip.BackgroundColor3 = Color3.new(0,0,0) -frameTip.BackgroundTransparency = 1 -frameTip.TextTransparency = 1 -frameTip.TextWrap = true - -local inside = Instance.new("BoolValue") -inside.Name = "inside" -inside.Value = false -inside.Parent = frameTip - -function setUpListeners(frameToListen) - local fadeSpeed = 0.1 - frameToListen.Parent.MouseEnter:connect(function() - if frameToListen:FindFirstChild("inside") then - frameToListen.inside.Value = true - wait(1.2) - if frameToListen.inside.Value then - while frameToListen.inside.Value and frameToListen.BackgroundTransparency > 0 do - frameToListen.BackgroundTransparency = frameToListen.BackgroundTransparency - fadeSpeed - frameToListen.TextTransparency = frameToListen.TextTransparency - fadeSpeed - wait() - end - end - end - end) - function killTip(killFrame) - killFrame.inside.Value = false - killFrame.BackgroundTransparency = 1 - killFrame.TextTransparency = 1 - end - frameToListen.Parent.MouseLeave:connect(function() killTip(frameToListen) end) - frameToListen.Parent.MouseButton1Click:connect(function() killTip(frameToListen) end) -end - -function createSettingsButtonTip(parent) - if parent == nil then - parent = bottomLeftControl:FindFirstChild("SettingsButton") - end - - local toolTip = frameTip:clone() - toolTip.RobloxLocked = true - toolTip.Text = "Settings/Leave Game" - toolTip.Position = UDim2.new(0,0,0,-18) - toolTip.Size = UDim2.new(0,120,0,20) - toolTip.Parent = parent - setUpListeners(toolTip) -end - -wait(5) -- make sure we are loaded in, won't need tool tips for first 5 seconds anyway - ----------------- set up Bottom Left Tool Tips ------------------------- - -local bottomLeftChildren = bottomLeftControl:GetChildren() -local hasSettingsTip = false - -for i = 1, #bottomLeftChildren do - - if bottomLeftChildren[i].Name == "Exit" then - local exitTip = frameTip:clone() - exitTip.RobloxLocked = true - exitTip.Text = "Leave Place" - exitTip.Position = UDim2.new(0,0,-1,0) - exitTip.Size = UDim2.new(1,0,1,0) - exitTip.Parent = bottomLeftChildren[i] - setUpListeners(exitTip) - elseif bottomLeftChildren[i].Name == "SettingsButton" then - hasSettingsTip = true - createSettingsButtonTip(bottomLeftChildren[i]) - end -end - ----------------- set up Bottom Right Tool Tips ------------------------- - -local bottomRightChildren = bottomRightControl:GetChildren() - -for i = 1, #bottomRightChildren do - if bottomRightChildren[i].Name:find("Camera") ~= nil then - local cameraTip = frameTip:clone() - cameraTip.RobloxLocked = true - cameraTip.Text = "Camera View" - if bottomRightChildren[i].Name:find("Zoom") then - cameraTip.Position = UDim2.new(-1,0,-1.5) - else - cameraTip.Position = UDim2.new(0,0,-1.5,0) - end - cameraTip.Size = UDim2.new(2,0,1.25,0) - cameraTip.Parent = bottomRightChildren[i] - setUpListeners(cameraTip) - end -end diff --git a/assets/ugc/859 b/assets/ugc/859 deleted file mode 100644 index 4f93297..0000000 --- a/assets/ugc/859 +++ /dev/null @@ -1,852 +0,0 @@ ---rbxassetid%859% --- This is responsible for all touch controls we show (as of this writing, only on iOS) --- this includes character move thumbsticks, and buttons for jump, use of items, camera, etc. --- Written by Ben Tkacheff, Copyright Roblox 2013 - --- obligatory stuff to make sure we don't access nil data -while not Game do - wait() -end -while not Game:FindFirstChild("Players") do - wait() -end -while not Game.Players.LocalPlayer do - wait() -end -while not Game:FindFirstChild("CoreGui") do - wait() -end -while not Game.CoreGui:FindFirstChild("RobloxGui") do - wait() -end - -local userInputService = Game:GetService("UserInputService") -local success = pcall(function() userInputService:IsLuaTouchControls() end) -if not success then - script:Destroy() -end - ----------------------------------------------------------------------------- ----------------------------------------------------------------------------- --- Variables -local screenResolution = Game:GetService("GuiService"):GetScreenResolution() -function isSmallScreenDevice() - return screenResolution.y <= 500 -end - -local GameSettings = UserSettings().GameSettings - -local localPlayer = Game.Players.LocalPlayer - -local isInThumbstickMode = false - -local thumbstickInactiveAlpha = 0.3 -local thumbstickSize = 120 -if isSmallScreenDevice() then - thumbstickSize = 70 -end - -local touchControlsSheet = "rbxasset://textures/ui/TouchControlsSheet.png" -local DPadSheet = "rbxasset://textures/ui/DPadSheet.png" -local ThumbstickDeadZone = 5 -local ThumbstickMaxPercentGive = 0.92 -local thumbstickTouches = {} - -local jumpButtonSize = 90 -if isSmallScreenDevice() then - jumpButtonSize = 70 -end -local oldJumpTouches = {} -local currentJumpTouch = nil - -local CameraRotateSensitivity = 0.007 -local CameraRotateDeadZone = CameraRotateSensitivity * 16 -local CameraZoomSensitivity = 0.03 -local PinchZoomDelay = 0.2 -local cameraTouch = nil -local dpadTouch = nil - - --- make sure all of our images are good to go -Game:GetService("ContentProvider"):Preload(touchControlsSheet) -Game:GetService("ContentProvider"):Preload(DPadSheet) - ----------------------------------------------------------------------------- ----------------------------------------------------------------------------- --- Functions - -local isPointInRect = function(point, rectPos, rectSize) - if point.x >= rectPos.x and point.x <= (rectPos.x + rectSize.x) then - if point.y >= rectPos.y and point.y <= (rectPos.y + rectSize.y) then - return true - end - end - - return false -end - - --- --- Thumbstick Control --- - -function setCameraTouch(newTouch) - cameraTouch = newTouch - if newTouch == nil then - pcall(function() userInputService.InCameraGesture = false end) - else - pcall(function() userInputService.InCameraGesture = true end) - end -end - -function DistanceBetweenTwoPoints(point1, point2) - local dx = point2.x - point1.x - local dy = point2.y - point1.y - return math.sqrt( (dx*dx) + (dy*dy) ) -end - -function transformFromCenterToTopLeft(pointToTranslate, guiObject) - return UDim2.new(0,pointToTranslate.x - guiObject.AbsoluteSize.x/2,0,pointToTranslate.y - guiObject.AbsoluteSize.y/2) -end - -function rotatePointAboutLocation(pointToRotate, pointToRotateAbout, radians) - local sinAnglePercent = math.sin(radians) - local cosAnglePercent = math.cos(radians) - - local transformedPoint = pointToRotate - - -- translate point back to origin: - transformedPoint = Vector2.new(transformedPoint.x - pointToRotateAbout.x, transformedPoint.y - pointToRotateAbout.y) - - -- rotate point - local xNew = transformedPoint.x * cosAnglePercent - transformedPoint.y * sinAnglePercent - local yNew = transformedPoint.x * sinAnglePercent + transformedPoint.y * cosAnglePercent - - -- translate point back: - transformedPoint = Vector2.new(xNew + pointToRotateAbout.x, yNew + pointToRotateAbout.y) - - return transformedPoint -end - -function dotProduct(v1,v2) - return ((v1.x*v2.x) + (v1.y*v2.y)) -end - -function stationaryThumbstickTouchMove(thumbstickFrame, thumbstickOuter, touchLocation) - local thumbstickOuterCenterPosition = Vector2.new(thumbstickOuter.Position.X.Offset + thumbstickOuter.AbsoluteSize.x/2, thumbstickOuter.Position.Y.Offset + thumbstickOuter.AbsoluteSize.y/2) - local centerDiff = DistanceBetweenTwoPoints(touchLocation, thumbstickOuterCenterPosition) - - -- thumbstick is moving outside our region, need to cap its distance - if centerDiff > (thumbstickSize/2) then - local thumbVector = Vector2.new(touchLocation.x - thumbstickOuterCenterPosition.x,touchLocation.y - thumbstickOuterCenterPosition.y); - local normal = thumbVector.unit - if normal.x == math.nan or normal.x == math.inf then - normal = Vector2.new(0,normal.y) - end - if normal.y == math.nan or normal.y == math.inf then - normal = Vector2.new(normal.x,0) - end - - local newThumbstickInnerPosition = thumbstickOuterCenterPosition + (normal * (thumbstickSize/2)) - thumbstickFrame.Position = transformFromCenterToTopLeft(newThumbstickInnerPosition, thumbstickFrame) - else - thumbstickFrame.Position = transformFromCenterToTopLeft(touchLocation,thumbstickFrame) - end - - return Vector2.new(thumbstickFrame.Position.X.Offset - thumbstickOuter.Position.X.Offset,thumbstickFrame.Position.Y.Offset - thumbstickOuter.Position.Y.Offset) -end - -function followThumbstickTouchMove(thumbstickFrame, thumbstickOuter, touchLocation) - local thumbstickOuterCenter = Vector2.new(thumbstickOuter.Position.X.Offset + thumbstickOuter.AbsoluteSize.x/2, thumbstickOuter.Position.Y.Offset + thumbstickOuter.AbsoluteSize.y/2) - - -- thumbstick is moving outside our region, need to position outer thumbstick texture carefully (to make look and feel like actual joystick controller) - if DistanceBetweenTwoPoints(touchLocation, thumbstickOuterCenter) > thumbstickSize/2 then - local thumbstickInnerCenter = Vector2.new(thumbstickFrame.Position.X.Offset + thumbstickFrame.AbsoluteSize.x/2, thumbstickFrame.Position.Y.Offset + thumbstickFrame.AbsoluteSize.y/2) - local movementVectorUnit = Vector2.new(touchLocation.x - thumbstickInnerCenter.x, touchLocation.y - thumbstickInnerCenter.y).unit - - local outerToInnerVectorCurrent = Vector2.new(thumbstickInnerCenter.x - thumbstickOuterCenter.x, thumbstickInnerCenter.y - thumbstickOuterCenter.y) - local outerToInnerVectorCurrentUnit = outerToInnerVectorCurrent.unit - local movementVector = Vector2.new(touchLocation.x - thumbstickInnerCenter.x, touchLocation.y - thumbstickInnerCenter.y) - - -- First, find the angle between the new thumbstick movement vector, - -- and the vector between thumbstick inner and thumbstick outer. - -- We will use this to pivot thumbstick outer around thumbstick inner, gives a nice joystick feel - local crossOuterToInnerWithMovement = (outerToInnerVectorCurrentUnit.x * movementVectorUnit.y) - (outerToInnerVectorCurrentUnit.y * movementVectorUnit.x) - local angle = math.atan2(crossOuterToInnerWithMovement, dotProduct(outerToInnerVectorCurrentUnit, movementVectorUnit)) - local anglePercent = angle * math.min( (movementVector.magnitude)/(outerToInnerVectorCurrent.magnitude), 1.0); - - -- If angle is significant, rotate about the inner thumbsticks current center - if math.abs(anglePercent) > 0.00001 then - local outerThumbCenter = rotatePointAboutLocation(thumbstickOuterCenter, thumbstickInnerCenter, anglePercent) - thumbstickOuter.Position = transformFromCenterToTopLeft(Vector2.new(outerThumbCenter.x,outerThumbCenter.y), thumbstickOuter) - end - - -- now just translate outer thumbstick to make sure it stays nears inner thumbstick - thumbstickOuter.Position = UDim2.new(0,thumbstickOuter.Position.X.Offset+movementVector.x,0,thumbstickOuter.Position.Y.Offset+movementVector.y) - end - - thumbstickFrame.Position = transformFromCenterToTopLeft(touchLocation,thumbstickFrame) - - -- a bit of error checking to make sure thumbsticks stay close to eachother - thumbstickFramePosition = Vector2.new(thumbstickFrame.Position.X.Offset,thumbstickFrame.Position.Y.Offset) - thumbstickOuterPosition = Vector2.new(thumbstickOuter.Position.X.Offset,thumbstickOuter.Position.Y.Offset) - if DistanceBetweenTwoPoints(thumbstickFramePosition, thumbstickOuterPosition) > thumbstickSize/2 then - local vectorWithLength = (thumbstickOuterPosition - thumbstickFramePosition).unit * thumbstickSize/2 - thumbstickOuter.Position = UDim2.new(0,thumbstickFramePosition.x + vectorWithLength.x,0,thumbstickFramePosition.y + vectorWithLength.y) - end - - return Vector2.new(thumbstickFrame.Position.X.Offset - thumbstickOuter.Position.X.Offset,thumbstickFrame.Position.Y.Offset - thumbstickOuter.Position.Y.Offset) -end - -function movementOutsideDeadZone(movementVector) - return ( (math.abs(movementVector.x) > ThumbstickDeadZone) or (math.abs(movementVector.y) > ThumbstickDeadZone) ) -end - -function constructThumbstick(defaultThumbstickPos, updateFunction, stationaryThumbstick) - local thumbstickFrame = Instance.new("Frame") - thumbstickFrame.Name = "ThumbstickFrame" - thumbstickFrame.Active = true - thumbstickFrame.Size = UDim2.new(0,thumbstickSize,0,thumbstickSize) - thumbstickFrame.Position = defaultThumbstickPos - thumbstickFrame.BackgroundTransparency = 1 - - local outerThumbstick = Instance.new("ImageLabel") - outerThumbstick.Name = "OuterThumbstick" - outerThumbstick.Image = touchControlsSheet - outerThumbstick.ImageRectOffset = Vector2.new(0,0) - outerThumbstick.ImageRectSize = Vector2.new(220,220) - outerThumbstick.BackgroundTransparency = 1 - outerThumbstick.Size = UDim2.new(0,thumbstickSize,0,thumbstickSize) - outerThumbstick.Position = defaultThumbstickPos - outerThumbstick.Parent = Game.CoreGui.RobloxGui - - local innerThumbstick = Instance.new("ImageLabel") - innerThumbstick.Name = "InnerThumbstick" - innerThumbstick.Image = touchControlsSheet - innerThumbstick.ImageRectOffset = Vector2.new(220,0) - innerThumbstick.ImageRectSize = Vector2.new(111,111) - innerThumbstick.BackgroundTransparency = 1 - innerThumbstick.Size = UDim2.new(0,thumbstickSize/2,0,thumbstickSize/2) - innerThumbstick.Position = UDim2.new(0, thumbstickFrame.Size.X.Offset/2 - thumbstickSize/4, 0, thumbstickFrame.Size.Y.Offset/2 - thumbstickSize/4) - innerThumbstick.Parent = thumbstickFrame - innerThumbstick.ZIndex = 2 - - local thumbstickTouch = nil - local userInputServiceTouchMovedCon = nil - local userInputSeviceTouchEndedCon = nil - - local startInputTracking = function(inputObject) - if thumbstickTouch then return end - if inputObject == cameraTouch then return end - if inputObject == currentJumpTouch then return end - if inputObject.UserInputType ~= Enum.UserInputType.Touch then return end - - thumbstickTouch = inputObject - table.insert(thumbstickTouches,thumbstickTouch) - - thumbstickFrame.Position = transformFromCenterToTopLeft(thumbstickTouch.Position,thumbstickFrame) - outerThumbstick.Position = thumbstickFrame.Position - - userInputServiceTouchMovedCon = userInputService.TouchMoved:connect(function(movedInput) - if movedInput == thumbstickTouch then - local movementVector = nil - if stationaryThumbstick then - movementVector = stationaryThumbstickTouchMove(thumbstickFrame,outerThumbstick,Vector2.new(movedInput.Position.x,movedInput.Position.y)) - else - movementVector = followThumbstickTouchMove(thumbstickFrame,outerThumbstick,Vector2.new(movedInput.Position.x,movedInput.Position.y)) - end - - if updateFunction then - updateFunction(movementVector,outerThumbstick.Size.X.Offset/2) - end - end - end) - userInputSeviceTouchEndedCon = userInputService.TouchEnded:connect(function(endedInput) - if endedInput == thumbstickTouch then - if updateFunction then - updateFunction(Vector2.new(0,0),1) - end - - userInputSeviceTouchEndedCon:disconnect() - userInputServiceTouchMovedCon:disconnect() - - thumbstickFrame.Position = defaultThumbstickPos - outerThumbstick.Position = defaultThumbstickPos - - for i, object in pairs(thumbstickTouches) do - if object == thumbstickTouch then - table.remove(thumbstickTouches,i) - break - end - end - thumbstickTouch = nil - end - end) - end - - thumbstickFrame.Visible = not userInputService.ModalEnabled - outerThumbstick.Visible = not userInputService.ModalEnabled - - thumbstickFrame.InputBegan:connect(startInputTracking) - return thumbstickFrame, outerThumbstick -end - ----------------------------------------------------------------------------- ----------------------------------------------------------------------------- --- --- DPad Control --- - -function createDPadArrowButton(name, parent, position, size, image, spriteOffset, spriteSize) - local DPadArrow = Instance.new("ImageButton") - DPadArrow.Name = name - DPadArrow.Image = image - DPadArrow.ImageRectOffset = spriteOffset - DPadArrow.ImageRectSize = spriteSize - DPadArrow.BackgroundTransparency = 1 - DPadArrow.Size = size - DPadArrow.Position = position - DPadArrow.Parent = parent - return DPadArrow -end - -function createDPad() - local DPadFrame = Instance.new("Frame") - DPadFrame.Name = "DPadFrame" - DPadFrame.Active = true - DPadFrame.Size = UDim2.new(0,192,0,192) - DPadFrame.Position = UDim2.new(0,10,1,-230) - DPadFrame.BackgroundTransparency = 1 - - -- local image = "rbxassetid://133293265" - local image = DPadSheet - local bigSize = UDim2.new(0,64,0,64) - local smallSize = UDim2.new(0,23,0,23) - local spriteSizeLarge = Vector2.new(128, 128) - local spriteSizeSmall = Vector2.new(46, 46) - - createDPadArrowButton("BackButton", DPadFrame, UDim2.new(0.5, -32, 1, -64), bigSize, image, Vector2.new(0, 0), spriteSizeLarge) - createDPadArrowButton("ForwardButton", DPadFrame, UDim2.new(0.5, -32, 0, 0), bigSize, image, Vector2.new(0, 258), spriteSizeLarge) - createDPadArrowButton("JumpButton", DPadFrame, UDim2.new(0.5, -32, 0.5, -32), bigSize, image, Vector2.new(129, 0), spriteSizeLarge) - createDPadArrowButton("LeftButton", DPadFrame, UDim2.new(0, 0, 0.5, -32), bigSize, image, Vector2.new(129,129), spriteSizeLarge) - createDPadArrowButton("RightButton", DPadFrame, UDim2.new(1, -64, 0.5, -32), bigSize, image, Vector2.new(0, 129), spriteSizeLarge) - createDPadArrowButton("forwardLeftButton", DPadFrame, UDim2.new(0, 35, 0, 35), smallSize, image, Vector2.new(129,258), spriteSizeSmall) - createDPadArrowButton("forwardRightButton", DPadFrame, UDim2.new(1, -55, 0, 35), smallSize, image, Vector2.new(176,258), spriteSizeSmall) - - return DPadFrame -end - - - - -function setupDPadControls(DPadFrame) - - local moveCharacterFunc = localPlayer.MoveCharacter - DPadFrame.JumpButton.InputBegan:connect(function(inputObject) - localPlayer:JumpCharacter() - end) - local movementVector = Vector2.new(0,0) - - function setupButton(button,funcToCallBegin,funcToCallEnd) - button.InputBegan:connect(function(inputObject) - if not dpadTouch and inputObject.UserInputType == Enum.UserInputType.Touch and inputObject.UserInputState == Enum.UserInputState.Begin then - dpadTouch = inputObject - funcToCallBegin() - end - end) - button.InputEnded:connect(function(inputObject) - if dpadTouch == inputObject then - if funcToCallEnd then - funcToCallEnd() - end - end - end) - end - - local forwardButtonBegin = function() - movementVector = Vector2.new(0,-1) - moveCharacterFunc(localPlayer, Vector2.new(0,-1), 1) - - DPadFrame.forwardLeftButton.Visible = true - DPadFrame.forwardRightButton.Visible = true - end - - local backwardButtonBegin = function() - movementVector = Vector2.new(0,1) - moveCharacterFunc(localPlayer, Vector2.new(0,1),1) - end - - local leftButtonBegin = function() - movementVector = Vector2.new(-1,0) - moveCharacterFunc(localPlayer, Vector2.new(-1,0),1) - end - - local rightButtonBegin = function() - movementVector = Vector2.new(1,0) - moveCharacterFunc(localPlayer, Vector2.new(1,0),1) - end - - DPadFrame.InputEnded:connect(function() - DPadFrame.forwardLeftButton.Visible = false - DPadFrame.forwardRightButton.Visible = false - end) - - local endStep = 0.08 - local endMovementFunc = function() - DPadFrame.forwardLeftButton.Visible = false - DPadFrame.forwardRightButton.Visible = false - - Spawn(function() - while not dpadTouch and movementVector ~= Vector2.new(0,0) do - local newX = movementVector.x - local newY = movementVector.y - - if movementVector.x > 0 then - newX = movementVector.x - endStep - if newX < 0 then newX = 0 end - elseif movementVector.x < 0 then - newX = movementVector.x + endStep - if newX > 0 then newX = 0 end - end - - if movementVector.y > 0 then - newY = movementVector.y - endStep - if newY < 0 then newY = 0 end - elseif movementVector.y < 0 then - newY = movementVector.y + endStep - if newY > 0 then newY = 0 end - end - - movementVector = Vector2.new(newX,newY) - moveCharacterFunc(localPlayer, movementVector,1) - wait(1/60) - end - - if movementVector ~= Vector2.new(0,0) then - movementVector = Vector2.new(0,0) - moveCharacterFunc(localPlayer,Vector2.new(0,0) ,0) - end - end) - end - - local removeDiagonalButtons = function() - if isPointInRect(dpadTouch.Position,DPadFrame.ForwardButton.AbsolutePosition,DPadFrame.ForwardButton.AbsoluteSize) then - DPadFrame.forwardLeftButton.Visible = false - DPadFrame.forwardRightButton.Visible = false - end - end - - setupButton(DPadFrame.ForwardButton,forwardButtonBegin,removeDiagonalButtons) - setupButton(DPadFrame.BackButton,backwardButtonBegin,nil) - setupButton(DPadFrame.LeftButton,leftButtonBegin,nil) - setupButton(DPadFrame.RightButton,rightButtonBegin,nil) - - local getMovementVector = function(touchPosition) - local xDiff = touchPosition.x - (DPadFrame.AbsolutePosition.x + DPadFrame.AbsoluteSize.x/2) - local yDiff = touchPosition.y - (DPadFrame.AbsolutePosition.y + DPadFrame.AbsoluteSize.y/2) - local vectorNew = Vector2.new(xDiff,yDiff) - - movementVector = vectorNew.unit - return vectorNew.unit - end - - Game:GetService("UserInputService").TouchMoved:connect(function(touchObject) - if touchObject == dpadTouch then - if isPointInRect(dpadTouch.Position,DPadFrame.AbsolutePosition,DPadFrame.AbsoluteSize) then - moveCharacterFunc(localPlayer, getMovementVector(dpadTouch.Position),1) - else - endMovementFunc() - end - end - end) - Game:GetService("UserInputService").TouchEnded:connect(function(touchObject) - if touchObject == dpadTouch then - dpadTouch = nil - endMovementFunc() - end - end) - - - DPadFrame.Visible = not userInputService.ModalEnabled - -end - ----------------------------------------------------------------------------- ----------------------------------------------------------------------------- --- --- Character Movement --- -local characterThumbstick = nil -local characterOuterThumbstick = nil - -function setupCharacterMovement( parentFrame ) - local lastMovementVector, lastMaxMovement = nil - local moveCharacterFunc = localPlayer.MoveCharacter - local moveCharacterFunction = function ( movementVector, maxMovement ) - if localPlayer then - if movementOutsideDeadZone(movementVector) then - lastMovementVector = movementVector - lastMaxMovement = maxMovement - -- sometimes rounding error will not allow us to go max speed at some - -- thumbstick angles, fix this with a bit of fudging near 100% throttle - if movementVector.magnitude/maxMovement > ThumbstickMaxPercentGive then - maxMovement = movementVector.magnitude - 1 - end - moveCharacterFunc(localPlayer, movementVector, maxMovement) - else - lastMovementVector = Vector2.new(0,0) - lastMaxMovement = 1 - moveCharacterFunc(localPlayer, lastMovementVector, lastMaxMovement) - end - end - end - - local thumbstickPos = UDim2.new(0,thumbstickSize/2,1,-thumbstickSize*1.75) - if isSmallScreenDevice() then - thumbstickPos = UDim2.new(0,(thumbstickSize/2) - 10,1,-thumbstickSize - 20) - end - - characterThumbstick, characterOuterThumbstick = constructThumbstick(thumbstickPos, moveCharacterFunction, false) - characterThumbstick.Name = "CharacterThumbstick" - characterThumbstick.Parent = parentFrame - - local refreshCharacterMovement = function() - if localPlayer and isInThumbstickMode and moveCharacterFunc and lastMovementVector and lastMaxMovement then - moveCharacterFunc(localPlayer, lastMovementVector, lastMaxMovement) - end - end - return refreshCharacterMovement -end - ----------------------------------------------------------------------------- ----------------------------------------------------------------------------- --- --- Jump Button --- -local jumpButton = nil - -function setupJumpButton( parentFrame ) - if (jumpButton == nil) then - jumpButton = Instance.new("ImageButton") - jumpButton.Name = "JumpButton" - jumpButton.BackgroundTransparency = 1 - jumpButton.Image = touchControlsSheet - jumpButton.ImageRectOffset = Vector2.new(176,222) - jumpButton.ImageRectSize = Vector2.new(174,174) - jumpButton.Size = UDim2.new(0,jumpButtonSize,0,jumpButtonSize) - if isSmallScreenDevice() then - jumpButton.Position = UDim2.new(1, -(jumpButtonSize*2.25), 1, -jumpButtonSize - 20) - else - jumpButton.Position = UDim2.new(1, -(jumpButtonSize*2.75), 1, -jumpButtonSize - 120) - end - - local playerJumpFunc = localPlayer.JumpCharacter - - local doJumpLoop = function () - while currentJumpTouch do - if localPlayer then - playerJumpFunc(localPlayer) - end - wait(1/60) - end - end - - jumpButton.InputBegan:connect(function(inputObject) - if inputObject.UserInputType ~= Enum.UserInputType.Touch then return end - if currentJumpTouch then return end - if inputObject == cameraTouch then return end - for i, touch in pairs(oldJumpTouches) do - if touch == inputObject then - return - end - end - - currentJumpTouch = inputObject - jumpButton.ImageRectOffset = Vector2.new(0,222) - jumpButton.ImageRectSize = Vector2.new(174,174) - doJumpLoop() - end) - jumpButton.InputEnded:connect(function (inputObject) - if inputObject.UserInputType ~= Enum.UserInputType.Touch then return end - - jumpButton.ImageRectOffset = Vector2.new(176,222) - jumpButton.ImageRectSize = Vector2.new(174,174) - - if inputObject == currentJumpTouch then - table.insert(oldJumpTouches,currentJumpTouch) - currentJumpTouch = nil - end - end) - userInputService.InputEnded:connect(function ( globalInputObject ) - for i, touch in pairs(oldJumpTouches) do - if touch == globalInputObject then - table.remove(oldJumpTouches,i) - break - end - end - end) - jumpButton.Parent = parentFrame - end - jumpButton.Visible = not userInputService.ModalEnabled -end - -function isTouchUsedByJumpButton( touch ) - if touch == currentJumpTouch then return true end - for i, touchToCompare in pairs(oldJumpTouches) do - if touch == touchToCompare then - return true - end - end - - return false -end - -function isTouchUsedByThumbstick(touch) - for i, touchToCompare in pairs(thumbstickTouches) do - if touch == touchToCompare then - return true - end - end - - return false -end - ----------------------------------------------------------------------------- ----------------------------------------------------------------------------- --- --- Camera Control --- - -function setupCameraControl(parentFrame, refreshCharacterMoveFunc) - local lastPos = nil - local hasRotatedCamera = false - local rotateCameraFunc = userInputService.RotateCamera - - local pinchTime = -1 - local shouldPinch = false - local lastPinchScale = nil - local zoomCameraFunc = userInputService.ZoomCamera - local pinchTouches = {} - local pinchFrame = nil - local pinchInputChangedCon = nil - local pinchInputEndedCon = nil - - local resetCameraRotateState = function() - setCameraTouch(nil) - hasRotatedCamera = false - lastPos = nil - end - - local resetPinchState = function () - pinchTouches = {} - - pinchTime = -1 - lastPinchScale = nil - shouldPinch = false - pinchFrame:Destroy() - pinchFrame = nil - end - - local startPinch = function(firstTouch, secondTouch) - -- track pinching in new frame - if pinchFrame then pinchFrame:Destroy() end -- make sure we didn't track in any mud - pinchFrame = Instance.new("Frame") - pinchFrame.Name = "PinchFrame" - pinchFrame.BackgroundTransparency = 1 - pinchFrame.Parent = parentFrame - pinchFrame.Size = UDim2.new(1,0,1,0) - - pinchFrame.InputChanged:connect(function(inputObject) - if inputObject.UserInputType ~= Enum.UserInputType.Touch then return end - - if not shouldPinch then - resetPinchState() - return - end - - if lastPinchScale == nil then -- first pinch move, just set up scale - if inputObject == firstTouch then - lastPinchScale = (inputObject.Position - secondTouch.Position).magnitude - firstTouch = inputObject - elseif inputObject == secondTouch then - lastPinchScale = (inputObject.Position - firstTouch.Position).magnitude - secondTouch = inputObject - end - else -- we are now actually pinching, do comparison to last pinch size - local newPinchDistance = 0 - if inputObject == firstTouch then - newPinchDistance = (inputObject.Position - secondTouch.Position).magnitude - firstTouch = inputObject - elseif inputObject == secondTouch then - newPinchDistance = (inputObject.Position - firstTouch.Position).magnitude - secondTouch = inputObject - end - if newPinchDistance ~= 0 then - local pinchDiff = newPinchDistance - lastPinchScale - if pinchDiff ~= 0 then - zoomCameraFunc(userInputService, (pinchDiff * CameraZoomSensitivity)) - end - lastPinchScale = newPinchDistance - end - end - end) - pinchFrame.InputEnded:connect(function(inputObject) -- pinch is over, destroy all - if inputObject == firstTouch or inputObject == secondTouch then - resetPinchState() - end - end) - end - - local pinchGestureReceivedTouch = function(inputObject) - if #pinchTouches < 1 then - table.insert(pinchTouches,inputObject) - pinchTime = tick() - shouldPinch = false - elseif #pinchTouches == 1 then - shouldPinch = ( (tick() - pinchTime) <= PinchZoomDelay ) - - if shouldPinch then - table.insert(pinchTouches,inputObject) - startPinch(pinchTouches[1], pinchTouches[2]) - resetCameraRotateState() - return true - else -- shouldn't ever get here, but just in case - pinchTouches = {} - end - end - - return false - end - - parentFrame.InputBegan:connect(function (inputObject) - if inputObject.UserInputType ~= Enum.UserInputType.Touch then return end - if isTouchUsedByJumpButton(inputObject) then return end - - local usedByThumbstick = isTouchUsedByThumbstick(inputObject) - local isPinching = false - if not usedByThumbstick then - isPinching = pinchGestureReceivedTouch(inputObject) - end - - if cameraTouch == nil and not usedByThumbstick and not isPinching then - setCameraTouch(inputObject) - lastPos = Vector2.new(cameraTouch.Position.x,cameraTouch.Position.y) - lastTick = tick() - end - end) - - userInputService.InputChanged:connect(function (inputObject) - if inputObject.UserInputType ~= Enum.UserInputType.Touch then return end - if cameraTouch ~= inputObject then return end - - local newPos = Vector2.new(cameraTouch.Position.x,cameraTouch.Position.y) - local touchDiff = Vector2.new(0,0) - if lastPos then - touchDiff = (lastPos - newPos) * CameraRotateSensitivity - end - - -- first time rotating outside deadzone, just setup for next changed event - if not hasRotatedCamera and (touchDiff.magnitude > CameraRotateDeadZone) then - hasRotatedCamera = true - lastPos = newPos - end - - -- fire everytime after we have rotated out of deadzone - if hasRotatedCamera and (lastPos ~= newPos) then - rotateCameraFunc(userInputService, touchDiff) - refreshCharacterMoveFunc() - lastPos = newPos - end - end) - userInputService.InputEnded:connect(function (inputObject) - if cameraTouch == inputObject or cameraTouch == nil then - resetCameraRotateState() - end - - for i, touch in pairs(pinchTouches) do - if touch == inputObject then - table.remove(pinchTouches,i) - end - end - end) -end - ----------------------------------------------------------------------------- ----------------------------------------------------------------------------- --- --- Touch Control --- - -local touchControlFrame = nil -local characterDPad = nil - -function setupTouchControls() - touchControlFrame = Instance.new("Frame") - touchControlFrame.Name = "TouchControlFrame" - touchControlFrame.Size = UDim2.new(1,0,1,0) - touchControlFrame.BackgroundTransparency = 1 - touchControlFrame.Parent = Game.CoreGui.RobloxGui - - userInputService.ProcessedEvent:connect(function(inputObject, processed) - if not processed then return end - - -- kill camera pan if the touch is used by some user controls - if inputObject == cameraTouch and inputObject.UserInputState == Enum.UserInputState.Begin then - setCameraTouch(nil) - end - end) - - setupJumpButton(touchControlFrame) - local refreshCharacterMoveFunc = setupCharacterMovement(touchControlFrame) - setupCameraControl(touchControlFrame, refreshCharacterMoveFunc) - - characterDPad = createDPad() - characterDPad.Name = "CharacterDPad" - characterDPad.Parent = touchControlFrame - setupDPadControls(characterDPad) - - userInputService.Changed:connect(function(prop) - if prop == "ModalEnabled" then - activateTouchControls() - end - end) - - activateTouchControls() -end - -function activateTouchControls() - -- set user controlled visibility - if userInputService.ModalEnabled then - characterThumbstick.Visible = false - characterOuterThumbstick.Visible = false - jumpButton.Visible = false - characterDPad.Visible = false - else - if (GameSettings.TouchMovementMode.Name == "Thumbstick" or GameSettings.TouchMovementMode.Name == "Default") then - isInThumbstickMode = true - else - isInThumbstickMode = false - end - - characterThumbstick.Visible = isInThumbstickMode - characterOuterThumbstick.Visible = isInThumbstickMode - jumpButton.Visible = isInThumbstickMode - characterDPad.Visible = not isInThumbstickMode - end -end - ----------------------------------------------------------------------------- ----------------------------------------------------------------------------- --- Start of Script - -if userInputService:IsLuaTouchControls() then - setupTouchControls() -else - script:Destroy() -end - -GameSettings.Changed:connect(function(property) - if (property == "TouchMovementMode") then - activateTouchControls() - end -end) diff --git a/assets/ugc/860 b/assets/ugc/860 deleted file mode 100644 index cd5385d..0000000 --- a/assets/ugc/860 +++ /dev/null @@ -1,561 +0,0 @@ ---rbxassetid%860% -function waitForProperty(instance, name) - while not instance[name] do - instance.Changed:wait() - end -end - -function waitForChild(instance, name) - while not instance:FindFirstChild(name) do - instance.ChildAdded:wait() - end -end - - -local mainFrame -local choices = {} -local lastChoice -local choiceMap = {} -local currentConversationDialog -local currentConversationPartner -local currentAbortDialogScript - -local tooFarAwayMessage = "You are too far away to chat!" -local tooFarAwaySize = 300 -local characterWanderedOffMessage = "Chat ended because you walked away" -local characterWanderedOffSize = 350 -local conversationTimedOut = "Chat ended because you didn't reply" -local conversationTimedOutSize = 350 - -local player -local screenGui -local chatNotificationGui -local messageDialog -local timeoutScript -local reenableDialogScript -local dialogMap = {} -local dialogConnections = {} - -local gui = nil -waitForChild(game,"CoreGui") -waitForChild(game.CoreGui,"RobloxGui") -if game.CoreGui.RobloxGui:FindFirstChild("ControlFrame") then - gui = game.CoreGui.RobloxGui.ControlFrame -else - gui = game.CoreGui.RobloxGui -end - -function currentTone() - if currentConversationDialog then - return currentConversationDialog.Tone - else - return Enum.DialogTone.Neutral - end -end - - -function createChatNotificationGui() - chatNotificationGui = Instance.new("BillboardGui") - chatNotificationGui.Name = "ChatNotificationGui" - chatNotificationGui.ExtentsOffset = Vector3.new(0,1,0) - chatNotificationGui.Size = UDim2.new(4, 0, 5.42857122, 0) - chatNotificationGui.SizeOffset = Vector2.new(0,0) - chatNotificationGui.StudsOffset = Vector3.new(0.4, 4.3, 0) - chatNotificationGui.Enabled = true - chatNotificationGui.RobloxLocked = true - chatNotificationGui.Active = true - - local image = Instance.new("ImageLabel") - image.Name = "Image" - image.Active = false - image.BackgroundTransparency = 1 - image.Position = UDim2.new(0,0,0,0) - image.Size = UDim2.new(1.0,0,1.0,0) - image.Image = "" - image.RobloxLocked = true - image.Parent = chatNotificationGui - - - local button = Instance.new("ImageButton") - button.Name = "Button" - button.AutoButtonColor = false - button.Position = UDim2.new(0.0879999995, 0, 0.0529999994, 0) - button.Size = UDim2.new(0.829999983, 0, 0.460000008, 0) - button.Image = "" - button.BackgroundTransparency = 1 - button.RobloxLocked = true - button.Parent = image -end - -function getChatColor(tone) - if tone == Enum.DialogTone.Neutral then - return Enum.ChatColor.Blue - elseif tone == Enum.DialogTone.Friendly then - return Enum.ChatColor.Green - elseif tone == Enum.DialogTone.Enemy then - return Enum.ChatColor.Red - end -end - -function styleChoices(tone) - for i, obj in pairs(choices) do - resetColor(obj, tone) - end - resetColor(lastChoice, tone) -end - -function styleMainFrame(tone) - if tone == Enum.DialogTone.Neutral then - mainFrame.Style = Enum.FrameStyle.ChatBlue - mainFrame.Tail.Image = "rbxasset://textures/chatBubble_botBlue_tailRight.png" - elseif tone == Enum.DialogTone.Friendly then - mainFrame.Style = Enum.FrameStyle.ChatGreen - mainFrame.Tail.Image = "rbxasset://textures/chatBubble_botGreen_tailRight.png" - elseif tone == Enum.DialogTone.Enemy then - mainFrame.Style = Enum.FrameStyle.ChatRed - mainFrame.Tail.Image = "rbxasset://textures/chatBubble_botRed_tailRight.png" - end - - styleChoices(tone) -end -function setChatNotificationTone(gui, purpose, tone) - if tone == Enum.DialogTone.Neutral then - gui.Image.Image = "rbxasset://textures/chatBubble_botBlue_notify_bkg.png" - elseif tone == Enum.DialogTone.Friendly then - gui.Image.Image = "rbxasset://textures/chatBubble_botGreen_notify_bkg.png" - elseif tone == Enum.DialogTone.Enemy then - gui.Image.Image = "rbxasset://textures/chatBubble_botRed_notify_bkg.png" - end - if purpose == Enum.DialogPurpose.Quest then - gui.Image.Button.Image = "rbxasset://textures/chatBubble_bot_notify_bang.png" - elseif purpose == Enum.DialogPurpose.Help then - gui.Image.Button.Image = "rbxasset://textures/chatBubble_bot_notify_question.png" - elseif purpose == Enum.DialogPurpose.Shop then - gui.Image.Button.Image = "rbxasset://textures/chatBubble_bot_notify_money.png" - end -end - -function createMessageDialog() - messageDialog = Instance.new("Frame"); - messageDialog.Name = "DialogScriptMessage" - messageDialog.Style = Enum.FrameStyle.RobloxRound - messageDialog.Visible = false - - local text = Instance.new("TextLabel") - text.Name = "Text" - text.Position = UDim2.new(0,0,0,-1) - text.Size = UDim2.new(1,0,1,0) - text.FontSize = Enum.FontSize.Size14 - text.BackgroundTransparency = 1 - text.TextColor3 = Color3.new(1,1,1) - text.RobloxLocked = true - text.Parent = messageDialog -end - -function showMessage(msg, size) - messageDialog.Text.Text = msg - messageDialog.Size = UDim2.new(0,size,0,40) - messageDialog.Position = UDim2.new(0.5, -size/2, 0.5, -40) - messageDialog.Visible = true - wait(2) - messageDialog.Visible = false -end - -function variableDelay(str) - local length = math.min(string.len(str), 100) - wait(0.75 + ((length/75) * 1.5)) -end - -function resetColor(frame, tone) - if tone == Enum.DialogTone.Neutral then - frame.BackgroundColor3 = Color3.new(0/255, 0/255, 179/255) - frame.Number.TextColor3 = Color3.new(45/255, 142/255, 245/255) - elseif tone == Enum.DialogTone.Friendly then - frame.BackgroundColor3 = Color3.new(0/255, 77/255, 0/255) - frame.Number.TextColor3 = Color3.new(0/255, 190/255, 0/255) - elseif tone == Enum.DialogTone.Enemy then - frame.BackgroundColor3 = Color3.new(140/255, 0/255, 0/255) - frame.Number.TextColor3 = Color3.new(255/255,88/255, 79/255) - end -end - -function highlightColor(frame, tone) - if tone == Enum.DialogTone.Neutral then - frame.BackgroundColor3 = Color3.new(2/255, 108/255, 255/255) - frame.Number.TextColor3 = Color3.new(1, 1, 1) - elseif tone == Enum.DialogTone.Friendly then - frame.BackgroundColor3 = Color3.new(0/255, 128/255, 0/255) - frame.Number.TextColor3 = Color3.new(1, 1, 1) - elseif tone == Enum.DialogTone.Enemy then - frame.BackgroundColor3 = Color3.new(204/255, 0/255, 0/255) - frame.Number.TextColor3 = Color3.new(1, 1, 1) - end -end - -function wanderDialog() - print("Wander") - mainFrame.Visible = false - endDialog() - showMessage(characterWanderedOffMessage, characterWanderedOffSize) -end - -function timeoutDialog() - print("Timeout") - mainFrame.Visible = false - endDialog() - showMessage(conversationTimedOut, conversationTimedOutSize) -end -function normalEndDialog() - print("Done") - endDialog() -end - -function endDialog() - if currentAbortDialogScript then - currentAbortDialogScript:Remove() - currentAbortDialogScript = nil - end - - local dialog = currentConversationDialog - currentConversationDialog = nil - if dialog and dialog.InUse then - local reenableScript = reenableDialogScript:Clone() - reenableScript.archivable = false - reenableScript.Disabled = false - reenableScript.Parent = dialog - end - - for dialog, gui in pairs(dialogMap) do - if dialog and gui then - gui.Enabled = not dialog.InUse - end - end - - currentConversationPartner = nil -end - -function sanitizeMessage(msg) - if string.len(msg) == 0 then - return "..." - else - return msg - end -end - -function selectChoice(choice) - renewKillswitch(currentConversationDialog) - - --First hide the Gui - mainFrame.Visible = false - if choice == lastChoice then - game.Chat:Chat(game.Players.LocalPlayer.Character, "Goodbye!", getChatColor(currentTone())) - - normalEndDialog() - else - local dialogChoice = choiceMap[choice] - - game.Chat:Chat(game.Players.LocalPlayer.Character, sanitizeMessage(dialogChoice.UserDialog), getChatColor(currentTone())) - wait(1) - currentConversationDialog:SignalDialogChoiceSelected(player, dialogChoice) - game.Chat:Chat(currentConversationPartner, sanitizeMessage(dialogChoice.ResponseDialog), getChatColor(currentTone())) - - variableDelay(dialogChoice.ResponseDialog) - presentDialogChoices(currentConversationPartner, dialogChoice:GetChildren()) - end -end - -function newChoice(numberText) - local frame = Instance.new("TextButton") - frame.BackgroundColor3 = Color3.new(0/255, 0/255, 179/255) - frame.AutoButtonColor = false - frame.BorderSizePixel = 0 - frame.Text = "" - frame.MouseEnter:connect(function() highlightColor(frame, currentTone()) end) - frame.MouseLeave:connect(function() resetColor(frame, currentTone()) end) - frame.MouseButton1Click:connect(function() selectChoice(frame) end) - frame.RobloxLocked = true - - local number = Instance.new("TextLabel") - number.Name = "Number" - number.TextColor3 = Color3.new(127/255, 212/255, 255/255) - number.Text = numberText - number.FontSize = Enum.FontSize.Size14 - number.BackgroundTransparency = 1 - number.Position = UDim2.new(0,4,0,2) - number.Size = UDim2.new(0,20,0,24) - number.TextXAlignment = Enum.TextXAlignment.Left - number.TextYAlignment = Enum.TextYAlignment.Top - number.RobloxLocked = true - number.Parent = frame - - local prompt = Instance.new("TextLabel") - prompt.Name = "UserPrompt" - prompt.BackgroundTransparency = 1 - prompt.TextColor3 = Color3.new(1,1,1) - prompt.FontSize = Enum.FontSize.Size14 - prompt.Position = UDim2.new(0,28, 0, 2) - prompt.Size = UDim2.new(1,-32, 1, -4) - prompt.TextXAlignment = Enum.TextXAlignment.Left - prompt.TextYAlignment = Enum.TextYAlignment.Top - prompt.TextWrap = true - prompt.RobloxLocked = true - prompt.Parent = frame - - return frame -end -function initialize(parent) - choices[1] = newChoice("1)") - choices[2] = newChoice("2)") - choices[3] = newChoice("3)") - choices[4] = newChoice("4)") - - lastChoice = newChoice("5)") - lastChoice.UserPrompt.Text = "Goodbye!" - lastChoice.Size = UDim2.new(1,0,0,28) - - mainFrame = Instance.new("Frame") - mainFrame.Name = "UserDialogArea" - mainFrame.Size = UDim2.new(0, 350, 0, 200) - mainFrame.Style = Enum.FrameStyle.ChatBlue - mainFrame.Visible = false - - imageLabel = Instance.new("ImageLabel") - imageLabel.Name = "Tail" - imageLabel.Size = UDim2.new(0,62,0,53) - imageLabel.Position = UDim2.new(1,8,0.25) - imageLabel.Image = "rbxasset://textures/chatBubble_botBlue_tailRight.png" - imageLabel.BackgroundTransparency = 1 - imageLabel.RobloxLocked = true - imageLabel.Parent = mainFrame - - for n, obj in pairs(choices) do - obj.RobloxLocked = true - obj.Parent = mainFrame - end - lastChoice.RobloxLocked = true - lastChoice.Parent = mainFrame - - mainFrame.RobloxLocked = true - mainFrame.Parent = parent -end - -function presentDialogChoices(talkingPart, dialogChoices) - if not currentConversationDialog then - return - end - - currentConversationPartner = talkingPart - sortedDialogChoices = {} - for n, obj in pairs(dialogChoices) do - if obj:IsA("DialogChoice") then - table.insert(sortedDialogChoices, obj) - end - end - table.sort(sortedDialogChoices, function(a,b) return a.Name < b.Name end) - - if #sortedDialogChoices == 0 then - normalEndDialog() - return - end - - local pos = 1 - local yPosition = 0 - choiceMap = {} - for n, obj in pairs(choices) do - obj.Visible = false - end - - for n, obj in pairs(sortedDialogChoices) do - if pos <= #choices then - --3 lines is the maximum, set it to that temporarily - choices[pos].Size = UDim2.new(1, 0, 0, 24*3) - choices[pos].UserPrompt.Text = obj.UserDialog - local height = math.ceil(choices[pos].UserPrompt.TextBounds.Y/24)*24 - - choices[pos].Position = UDim2.new(0, 0, 0, yPosition) - choices[pos].Size = UDim2.new(1, 0, 0, height) - choices[pos].Visible = true - - choiceMap[choices[pos]] = obj - - yPosition = yPosition + height - pos = pos + 1 - end - end - - lastChoice.Position = UDim2.new(0,0,0,yPosition) - lastChoice.Number.Text = pos .. ")" - - mainFrame.Size = UDim2.new(0, 350, 0, yPosition+24+32) - mainFrame.Position = UDim2.new(0,20,0.0, -mainFrame.Size.Y.Offset-20) - styleMainFrame(currentTone()) - mainFrame.Visible = true -end - -function doDialog(dialog) - while not Instance.Lock(dialog, player) do - wait() - end - - if dialog.InUse then - Instance.Unlock(dialog) - return - else - dialog.InUse = true - Instance.Unlock(dialog) - end - - currentConversationDialog = dialog - game.Chat:Chat(dialog.Parent, dialog.InitialPrompt, getChatColor(dialog.Tone)) - variableDelay(dialog.InitialPrompt) - - presentDialogChoices(dialog.Parent, dialog:GetChildren()) -end - -function renewKillswitch(dialog) - if currentAbortDialogScript then - currentAbortDialogScript:Remove() - currentAbortDialogScript = nil - end - - currentAbortDialogScript = timeoutScript:Clone() - currentAbortDialogScript.archivable = false - currentAbortDialogScript.Disabled = false - currentAbortDialogScript.Parent = dialog -end - -function checkForLeaveArea() - while currentConversationDialog do - if currentConversationDialog.Parent and (player:DistanceFromCharacter(currentConversationDialog.Parent.Position) >= currentConversationDialog.ConversationDistance) then - wanderDialog() - end - wait(1) - end -end - -function startDialog(dialog) - if dialog.Parent and dialog.Parent:IsA("BasePart") then - if player:DistanceFromCharacter(dialog.Parent.Position) >= dialog.ConversationDistance then - showMessage(tooFarAwayMessage, tooFarAwaySize) - return - end - - for dialog, gui in pairs(dialogMap) do - if dialog and gui then - gui.Enabled = false - end - end - - renewKillswitch(dialog) - - delay(1, checkForLeaveArea) - doDialog(dialog) - end -end - -function removeDialog(dialog) - if dialogMap[dialog] then - dialogMap[dialog]:Remove() - dialogMap[dialog] = nil - end - if dialogConnections[dialog] then - dialogConnections[dialog]:disconnect() - dialogConnections[dialog] = nil - end -end - -function addDialog(dialog) - if dialog.Parent then - if dialog.Parent:IsA("BasePart") then - local chatGui = chatNotificationGui:clone() - chatGui.Enabled = not dialog.InUse - chatGui.Adornee = dialog.Parent - chatGui.RobloxLocked = true - chatGui.Parent = game.CoreGui - chatGui.Image.Button.MouseButton1Click:connect(function() startDialog(dialog) end) - setChatNotificationTone(chatGui, dialog.Purpose, dialog.Tone) - - dialogMap[dialog] = chatGui - - dialogConnections[dialog] = dialog.Changed:connect(function(prop) - if prop == "Parent" and dialog.Parent then - --This handles the reparenting case, seperate from removal case - removeDialog(dialog) - addDialog(dialog) - elseif prop == "InUse" then - chatGui.Enabled = not currentConversationDialog and not dialog.InUse - if dialog == currentConversationDialog then - timeoutDialog() - end - elseif prop == "Tone" or prop == "Purpose" then - setChatNotificationTone(chatGui, dialog.Purpose, dialog.Tone) - end - end) - else -- still need to listen to parent changes even if current parent is not a BasePart - dialogConnections[dialog] = dialog.Changed:connect(function(prop) - if prop == "Parent" and dialog.Parent then - --This handles the reparenting case, seperate from removal case - removeDialog(dialog) - addDialog(dialog) - end - end) - end - end -end - -function fetchScripts() - local model = game:GetService("InsertService"):LoadAsset(39226062) - if type(model) == "string" then -- load failed, lets try again - wait(0.1) - model = game:GetService("InsertService"):LoadAsset(39226062) - end - if type(model) == "string" then -- not going to work, lets bail - return - end - - waitForChild(model,"TimeoutScript") - timeoutScript = model.TimeoutScript - waitForChild(model,"ReenableDialogScript") - reenableDialogScript = model.ReenableDialogScript -end - -function onLoad() - waitForProperty(game.Players, "LocalPlayer") - player = game.Players.LocalPlayer - waitForProperty(player, "Character") - - --print("Fetching Scripts") - fetchScripts() - - --print("Creating Guis") - createChatNotificationGui() - - --print("Creating MessageDialog") - createMessageDialog() - messageDialog.RobloxLocked = true - messageDialog.Parent = gui - - --print("Waiting for BottomLeftControl") - waitForChild(gui, "BottomLeftControl") - - --print("Initializing Frame") - local frame = Instance.new("Frame") - frame.Name = "DialogFrame" - frame.Position = UDim2.new(0,0,0,0) - frame.Size = UDim2.new(0,0,0,0) - frame.BackgroundTransparency = 1 - frame.RobloxLocked = true - frame.Parent = gui.BottomLeftControl - initialize(frame) - - --print("Adding Dialogs") - game.CollectionService.ItemAdded:connect(function(obj) if obj:IsA("Dialog") then addDialog(obj) end end) - game.CollectionService.ItemRemoved:connect(function(obj) if obj:IsA("Dialog") then removeDialog(obj) end end) - for i, obj in pairs(game.CollectionService:GetCollection("Dialog")) do - if obj:IsA("Dialog") then - addDialog(obj) - end - end -end - -onLoad() \ No newline at end of file diff --git a/assets/ugc/861 b/assets/ugc/861 deleted file mode 100644 index 27d6037..0000000 --- a/assets/ugc/861 +++ /dev/null @@ -1,1368 +0,0 @@ ---rbxassetid%861% ---Include -local Create = assert(LoadLibrary("RbxUtility")).Create - --- A Few Script Globals -local gui -if script.Parent:FindFirstChild("ControlFrame") then - gui = script.Parent:FindFirstChild("ControlFrame") -else - gui = script.Parent -end - --- Dev-Console Root - -local Dev_Container = Create'Frame'{ - Name = 'DevConsoleContainer'; - Parent = gui; - BackgroundColor3 = Color3.new(0,0,0); - BackgroundTransparency = 0.9; - Position = UDim2.new(0, 100, 0, 10); - Size = UDim2.new(0.5, 20, 0.5, 20); - Visible = false; - BackgroundTransparency = 0.9; -} - -local ToggleConsole = Create'BindableFunction'{ - Name = 'ToggleDevConsole'; - Parent = gui -} - - -local devConsoleInitialized = false -function initializeDeveloperConsole() - if devConsoleInitialized then - return - end - devConsoleInitialized = true - - ---Dev-Console Variables - local LOCAL_CONSOLE = 1 - local SERVER_CONSOLE = 2 - local SERVER_STATS = 3 - - local MAX_LIST_SIZE = 1000 - - local minimumSize = Vector2.new(350, 180) - local currentConsole = LOCAL_CONSOLE - - local localMessageList = {} - local serverMessageList = {} - - local localOffset = 0 - local serverOffset = 0 - local serverStatsOffset = 0 - - local errorToggleOn = true - local warningToggleOn = true - local infoToggleOn = true - local outputToggleOn = true - local wordWrapToggleOn = false - - local textHolderSize = 0 - - local frameNumber = 0 - - --Create Dev-Console - - local Dev_Body = Create'Frame'{ - Name = 'Body'; - Parent = Dev_Container; - BackgroundColor3 = Color3.new(0,0,0); - BackgroundTransparency = 0.5; - Position = UDim2.new(0, 0, 0, 21); - Size = UDim2.new(1, 0, 1, -25); - } - - local Dev_OptionsHolder = Create'Frame'{ - Name = 'OptionsHolder'; - Parent = Dev_Body; - BackgroundColor3 = Color3.new(0,0,0); - BackgroundTransparency = 1.0; - Position = UDim2.new(0, 318, 0, 0); - Size = UDim2.new(1, -355, 0, 24); - ClipsDescendants = true - } - - local Dev_OptionsBar = Create'Frame'{ - Name = 'OptionsBar'; - Parent = Dev_OptionsHolder; - BackgroundColor3 = Color3.new(0,0,0); - BackgroundTransparency = 1.0; - Position = UDim2.new(0.0, -250, 0, 4); - Size = UDim2.new(0, 234, 0, 18); - } - - local Dev_ErrorToggleFilter = Create'TextButton'{ - Name = 'ErrorToggleButton'; - Parent = Dev_OptionsBar; - BackgroundColor3 = Color3.new(0,0,0); - BorderColor3 = Color3.new(1.0, 0, 0); - Position = UDim2.new(0, 115, 0, 0); - Size = UDim2.new(0, 18, 0, 18); - Font = "SourceSansBold"; - FontSize = Enum.FontSize.Size14; - Text = ""; - TextColor3 = Color3.new(1.0, 0, 0); - } - - Create'Frame'{ - Name = 'CheckFrame'; - Parent = Dev_ErrorToggleFilter; - BackgroundColor3 = Color3.new(1.0,0,0); - BorderColor3 = Color3.new(1.0, 0, 0); - Position = UDim2.new(0, 4, 0, 4); - Size = UDim2.new(0, 10, 0, 10); - } - - local Dev_InfoToggleFilter = Create'TextButton'{ - Name = 'InfoToggleButton'; - Parent = Dev_OptionsBar; - BackgroundColor3 = Color3.new(0,0,0); - BorderColor3 = Color3.new(0.4, 0.5, 1.0); - Position = UDim2.new(0, 65, 0, 0); - Size = UDim2.new(0, 18, 0, 18); - Font = "SourceSansBold"; - FontSize = Enum.FontSize.Size14; - Text = ""; - TextColor3 = Color3.new(0.4, 0.5, 1.0); - } - - Create'Frame'{ - Name = 'CheckFrame'; - Parent = Dev_InfoToggleFilter; - BackgroundColor3 = Color3.new(0.4, 0.5, 1.0); - BorderColor3 = Color3.new(0.4, 0.5, 1.0); - Position = UDim2.new(0, 4, 0, 4); - Size = UDim2.new(0, 10, 0, 10); - } - - local Dev_OutputToggleFilter = Create'TextButton'{ - Name = 'OutputToggleButton'; - Parent = Dev_OptionsBar; - BackgroundColor3 = Color3.new(0,0,0); - BorderColor3 = Color3.new(1.0, 1.0, 1.0); - Position = UDim2.new(0, 40, 0, 0); - Size = UDim2.new(0, 18, 0, 18); - Font = "SourceSansBold"; - FontSize = Enum.FontSize.Size14; - Text = ""; - TextColor3 = Color3.new(1.0, 1.0, 1.0); - } - - Create'Frame'{ - Name = 'CheckFrame'; - Parent = Dev_OutputToggleFilter; - BackgroundColor3 = Color3.new(1.0, 1.0, 1.0); - BorderColor3 = Color3.new(1.0, 1.0, 1.0); - Position = UDim2.new(0, 4, 0, 4); - Size = UDim2.new(0, 10, 0, 10); - } - - local Dev_WarningToggleFilter = Create'TextButton'{ - Name = 'WarningToggleButton'; - Parent = Dev_OptionsBar; - BackgroundColor3 = Color3.new(0,0,0); - BorderColor3 = Color3.new(1.0, 0.6, 0.4); - Position = UDim2.new(0, 90, 0, 0); - Size = UDim2.new(0, 18, 0, 18); - Font = "SourceSansBold"; - FontSize = Enum.FontSize.Size14; - Text = ""; - TextColor3 = Color3.new(1.0, 0.6, 0.4); - } - - Create'Frame'{ - Name = 'CheckFrame'; - Parent = Dev_WarningToggleFilter; - BackgroundColor3 = Color3.new(1.0, 0.6, 0.4); - BorderColor3 = Color3.new(1.0, 0.6, 0.4); - Position = UDim2.new(0, 4, 0, 4); - Size = UDim2.new(0, 10, 0, 10); - } - - local Dev_WordWrapToggle = Create'TextButton'{ - Name = 'WordWrapToggleButton'; - Parent = Dev_OptionsBar; - BackgroundColor3 = Color3.new(0,0,0); - BorderColor3 = Color3.new(0.8, 0.8, 0.8); - Position = UDim2.new(0, 215, 0, 0); - Size = UDim2.new(0, 18, 0, 18); - Font = "SourceSansBold"; - FontSize = Enum.FontSize.Size14; - Text = ""; - TextColor3 = Color3.new(0.8, 0.8, 0.8); - } - - Create'Frame'{ - Name = 'CheckFrame'; - Parent = Dev_WordWrapToggle; - BackgroundColor3 = Color3.new(0.8, 0.8, 0.8); - BorderColor3 = Color3.new(0.8, 0.8, 0.8); - Position = UDim2.new(0, 4, 0, 4); - Size = UDim2.new(0, 10, 0, 10); - Visible = false - } - - Create'TextLabel'{ - Name = 'Filter'; - Parent = Dev_OptionsBar; - BackgroundTransparency = 1.0; - Position = UDim2.new(0, 0, 0, 0); - Size = UDim2.new(0, 40, 0, 18); - Font = "SourceSansBold"; - FontSize = Enum.FontSize.Size14; - Text = "Filter"; - TextColor3 = Color3.new(1, 1, 1); - } - - Create'TextLabel'{ - Name = 'WordWrap'; - Parent = Dev_OptionsBar; - BackgroundTransparency = 1; - Position = UDim2.new(0, 150, 0, 0); - Size = UDim2.new(0, 50, 0, 18); - Font = "SourceSansBold"; - FontSize = Enum.FontSize.Size14; - Text = "Word Wrap"; - TextColor3 = Color3.new(1, 1, 1); - } - - local Dev_ScrollBar = Create'Frame'{ - Name = 'ScrollBar'; - Parent = Dev_Body; - BackgroundColor3 = Color3.new(0,0,0); - BackgroundTransparency = 0.9; - Position = UDim2.new(1, -20, 0, 26); - Size = UDim2.new(0, 20, 1, -50); - Visible = false; - BackgroundTransparency = 0.9; - } - - local Dev_ScrollArea = Create'Frame'{ - Name = 'ScrollArea'; - Parent = Dev_ScrollBar; - BackgroundTransparency = 1; - Position = UDim2.new(0, 0, 0, 23); - Size = UDim2.new(1, 0, 1, -46); - BackgroundTransparency = 1; - } - - local Dev_Handle = Create'ImageButton'{ - Name = 'Handle'; - Parent = Dev_ScrollArea; - BackgroundColor3 = Color3.new(0,0,0); - BackgroundTransparency = 0.5; - Position = UDim2.new(0, 0, .2, 0); - Size = UDim2.new(0, 20, 0, 40); - BackgroundTransparency = 0.5; - } - - Create'ImageLabel'{ - Name = 'ImageLabel'; - Parent = Dev_Handle; - BackgroundTransparency = 1; - Position = UDim2.new(0, 0, 0.5, -8); - Rotation = 180; - Size = UDim2.new(1, 0, 0, 16); - Image = "http://www.mete0r.xyz/Asset?id=151205881"; - } - - local Dev_DownButton = Create'ImageButton'{ - Name = 'Down'; - Parent = Dev_ScrollBar; - BackgroundColor3 = Color3.new(0,0,0); - BackgroundTransparency = 0.5; - Position = UDim2.new(0, 0, 1, -20); - Size = UDim2.new(0, 20, 0, 20); - BackgroundTransparency = 0.5; - } - - Create'ImageLabel'{ - Name = 'ImageLabel'; - Parent = Dev_DownButton; - BackgroundTransparency = 1; - Position = UDim2.new(0, 3, 0, 3); - Size = UDim2.new(0, 14, 0, 14); - Rotation = 180; - Image = "http://www.mete0r.xyz/Asset?id=151205813"; - } - - local Dev_UpButton = Create'ImageButton'{ - Name = 'Up'; - Parent = Dev_ScrollBar; - BackgroundColor3 = Color3.new(0,0,0); - BackgroundTransparency = 0.5; - Position = UDim2.new(0, 0, 0, 0); - Size = UDim2.new(0, 20, 0, 20); - } - - Create'ImageLabel'{ - Name = 'ImageLabel'; - Parent = Dev_UpButton; - BackgroundTransparency = 1; - Position = UDim2.new(0, 3, 0, 3); - Size = UDim2.new(0, 14, 0, 14); - Image = "http://www.mete0r.xyz/Asset?id=151205813"; - } - - local flagExists, flagValue = pcall(function () return settings():GetFFlag("ConsoleCodeExecutionEnabled") end) - local codeExecutionEnabled = flagExists and flagValue - local isCreator = game.Players.LocalPlayer.userId == game.CreatorId - local function shouldShowCommandBar() - return codeExecutionEnabled and isCreator - end - local function getCommandBarOffset() - return shouldShowCommandBar() and currentConsole == SERVER_CONSOLE and -22 or 0 - end - - local Dev_TextBox = Create'Frame'{ - Name = 'TextBox'; - Parent = Dev_Body; - BackgroundColor3 = Color3.new(0,0,0); - BackgroundTransparency = 0.6; - Position = UDim2.new(0, 2, 0, 26); - Size = UDim2.new(1, -4, 1, -28); - ClipsDescendants = true; - } - - local Dev_TextHolder = Create'Frame'{ - Name = 'TextHolder'; - Parent = Dev_TextBox; - BackgroundColor3 = Color3.new(0,0,0); - BackgroundTransparency = 0; - Position = UDim2.new(0, 0, 0, 0); - Size = UDim2.new(1, 0, 1, 0); - } - - local Dev_OptionsButton = Create'ImageButton'{ - Name = 'OptionsButton'; - Parent = Dev_Body; - BackgroundColor3 = Color3.new(0,0,0); - BackgroundTransparency = 1.0; - Position = UDim2.new(0, 298, 0, 2); - Size = UDim2.new(0, 20, 0, 20); - } - - Create'ImageLabel'{ - Name = 'ImageLabel'; - Parent = Dev_OptionsButton; - BackgroundTransparency = 1.0; - Position = UDim2.new(0, 0, 0, 0); - Size = UDim2.new(1, 0, 1, 0); - Rotation = 0; - Image = "http://www.mete0r.xyz/Asset?id=152093917"; - } - - local Dev_CommandBar = Create'Frame'{ - Name = "CommandBar"; - Parent = Dev_Container; - BackgroundTransparency = 0; - BackgroundColor3 = Color3.new(0, 0, 0); - BorderSizePixel = 0; - Size = UDim2.new(1, -25, 0, 24); - Position = UDim2.new(0, 2, 1, -28); - Visible = false; - ZIndex = 2; - BorderSizePixel = 0; - } - - local Dev_CommandBarTextBox = Create'TextBox'{ - Name = 'CommandBarTextBox'; - Parent = Dev_CommandBar; - BackgroundTransparency = 1; - MultiLine = false; - ZIndex = 2; - Position = UDim2.new(0, 25, 0, 2); - Size = UDim2.new(1, -30, 0, 20); - Font = Enum.Font.Legacy; - FontSize = Enum.FontSize.Size10; - TextColor3 = Color3.new(1, 1, 1); - TextXAlignment = Enum.TextXAlignment.Left; - TextYAlignment = Enum.TextYAlignment.Center; - Text = "Code goes here"; - } - - Create'TextLabel'{ - Name = "PromptLabel"; - Parent = Dev_CommandBar; - BackgroundTransparency = 1; - Size = UDim2.new(0, 20, 1, 0); - Position = UDim2.new(0, 5, 0, 0); - Font = Enum.Font.Legacy; - FontSize = Enum.FontSize.Size10; - TextColor3 = Color3.new(1, 1, 1); - TextXAlignment = Enum.TextXAlignment.Center; - TextYAlignment = Enum.TextYAlignment.Center; - ZIndex = 2; - Text = ">"; - } - - Dev_CommandBarTextBox.FocusLost:connect(function(enterPressed) - if enterPressed then - local code = Dev_CommandBarTextBox.Text - game:GetService("LogService"):ExecuteScript(code) - Dev_CommandBarTextBox.Text = "" - - -- scroll to the bottom of the console - serverOffset = 0 - Dev_CommandBarTextBox:CaptureFocus() - end - end) - - local Dev_ResizeButton = Create'ImageButton'{ - Name = 'ResizeButton'; - Parent = Dev_Body; - BackgroundColor3 = Color3.new(0,0,0); - BackgroundTransparency = 0.5; - Position = UDim2.new(1, -20, 1, -20); - Size = UDim2.new(0, 20, 0, 20); - } - - Create'ImageLabel'{ - Name = 'ImageLabel'; - Parent = Dev_ResizeButton; - BackgroundTransparency = 1; - Position = UDim2.new(0, 6, 0, 6); - Size = UDim2.new(0.8, 0, 0.8, 0); - Rotation = 135; - Image = "http://www.mete0r.xyz/Asset?id=151205813"; - } - - Create'TextButton'{ - Name = 'LocalConsole'; - Parent = Dev_Body; - BackgroundColor3 = Color3.new(0,0,0); - BackgroundTransparency = 0.6; - Position = UDim2.new(0, 7, 0, 5); - Size = UDim2.new(0, 90, 0, 20); - Font = "SourceSansBold"; - FontSize = Enum.FontSize.Size14; - Text = "Local Console"; - TextColor3 = Color3.new(1, 1, 1); - TextYAlignment = Enum.TextYAlignment.Center; - } - - Create'TextButton'{ - Name = 'ServerConsole'; - Parent = Dev_Body; - BackgroundColor3 = Color3.new(0,0,0); - BackgroundTransparency = 0.8; - Position = UDim2.new(0, 102, 0, 5); - Size = UDim2.new(0, 90, 0, 17); - Font = "SourceSansBold"; - FontSize = Enum.FontSize.Size14; - Text = "Server Console"; - TextColor3 = Color3.new(1, 1, 1); - TextYAlignment = Enum.TextYAlignment.Center; - } - - Create'TextButton'{ - Name = 'ServerStats'; - Parent = Dev_Body; - BackgroundColor3 = Color3.new(0,0,0); - BackgroundTransparency = 0.8; - Position = UDim2.new(0, 197, 0, 5); - Size = UDim2.new(0, 90, 0, 17); - Font = "SourceSansBold"; - FontSize = Enum.FontSize.Size14; - Text = "Server Stats"; - TextColor3 = Color3.new(1, 1, 1); - TextYAlignment = Enum.TextYAlignment.Center; - } - - local Dev_TitleBar = Create'Frame'{ - Name = 'TitleBar'; - Parent = Dev_Container; - BackgroundColor3 = Color3.new(0,0,0); - BackgroundTransparency = 0.5; - Position = UDim2.new(0, 0, 0, 0); - Size = UDim2.new(1, 0, 0, 20); - } - - local Dev_CloseButton = Create'ImageButton'{ - Name = 'CloseButton'; - Parent = Dev_TitleBar; - BackgroundColor3 = Color3.new(0,0,0); - BackgroundTransparency = 0.5; - Position = UDim2.new(1, -20, 0, 0); - Size = UDim2.new(0, 20, 0, 20); - } - - Create'ImageLabel'{ - Parent = Dev_CloseButton; - BackgroundColor3 = Color3.new(0,0,0); - BackgroundTransparency = 1; - Position = UDim2.new(0, 3, 0, 3); - Size = UDim2.new(0, 14, 0, 14); - Image = "http://www.mete0r.xyz/Asset?id=151205852"; - } - - Create'TextButton'{ - Name = 'TextButton'; - Parent = Dev_TitleBar; - BackgroundColor3 = Color3.new(0,0,0); - BackgroundTransparency = 0.5; - Position = UDim2.new(0, 0, 0, 0); - Size = UDim2.new(1, -23, 1, 0); - Text = ""; - } - - Create'TextLabel'{ - Name = 'TitleText'; - Parent = Dev_TitleBar; - BackgroundTransparency = 1; - Position = UDim2.new(0, 0, 0, 0); - Size = UDim2.new(0, 185, 0, 20); - Font = "SourceSansBold"; - FontSize = Enum.FontSize.Size18; - Text = "Server Console"; - TextColor3 = Color3.new(1, 1, 1); - Text = "Roblox Developer Console"; - TextYAlignment = Enum.TextYAlignment.Top; - } - - local Dev_StatsChartFrame = Create'Frame'{ - Name = 'ChartFrame'; - BackgroundColor3 = Color3.new(0, 0, 0); - BackgroundTransparency = 0.5; - BorderColor3 = Color3.new(1.0, 1.0, 1.0); - Position = UDim2.new(0, 0, 0, 0); - Size = UDim2.new(0, 250, 0, 100); - } - - Create'TextLabel'{ - Name = 'TitleText'; - Parent = Dev_StatsChartFrame; - BackgroundTransparency = 0.5; - BackgroundColor3 = Color3.new(255,0,0); - Position = UDim2.new(0, 0, 0, 0); - Size = UDim2.new(1, 0, 0, 15); - Text = ""; - Font = "SourceSansBold"; - FontSize = Enum.FontSize.Size14; - TextColor3 = Color3.new(1, 1, 1); - TextYAlignment = Enum.TextYAlignment.Top; - } - - Create'TextLabel'{ - Name = 'ChartValue'; - Parent = Dev_StatsChartFrame; - BackgroundTransparency = 1.0; - BackgroundColor3 = Color3.new(0,0,0); - Position = UDim2.new(0, 5, 0, 39); - Size = UDim2.new(0, 100, 0, 15); - Text = ""; - Font = "SourceSansBold"; - FontSize = Enum.FontSize.Size14; - TextColor3 = Color3.new(1, 1, 1); - TextYAlignment = Enum.TextYAlignment.Top; - TextXAlignment = Enum.TextXAlignment.Left; - } - - Create'TextLabel'{ - Name = 'ChartMaxValue'; - Parent = Dev_StatsChartFrame; - BackgroundTransparency = 1.0; - BackgroundColor3 = Color3.new(0,0,0); - Position = UDim2.new(0, 5, 0, 15); - Size = UDim2.new(0, 100, 0, 15); - Text = "Max: "; - Font = "SourceSansBold"; - FontSize = Enum.FontSize.Size14; - TextColor3 = Color3.new(1, 1, 1); - TextYAlignment = Enum.TextYAlignment.Top; - TextXAlignment = Enum.TextXAlignment.Left; - } - - Create'TextLabel'{ - Name = 'ChartMinValue'; - Parent = Dev_StatsChartFrame; - BackgroundTransparency = 1.0; - BackgroundColor3 = Color3.new(0,0,0); - Position = UDim2.new(0, 5, 0, 27); - Size = UDim2.new(0, 100, 0, 15); - Text = "Min: "; - Font = "SourceSansBold"; - FontSize = Enum.FontSize.Size14; - TextColor3 = Color3.new(1, 1, 1); - TextYAlignment = Enum.TextYAlignment.Top; - TextXAlignment = Enum.TextXAlignment.Left; - } - - local Dev_StatsChartBar = Create'TextLabel'{ - Name = 'StatsChartBar'; - BackgroundColor3 = Color3.new(0,255,0); - Position = UDim2.new(0, 0, 0, 52); - Size = UDim2.new(0, 5, 0, 40); - Text = ""; - } - - ---Saved Mouse Information - local previousMousePos = nil - local pPos = nil - - local previousMousePosResize = nil - local pSize = nil - - local previousMousePosScroll = nil - local pScrollHandle = nil - local pOffset = nil - - local scrollUpIsDown = false - local scrollDownIsDown = false - - function clean() - previousMousePos = nil - pPos = nil - previousMousePosResize = nil - pSize = nil - previousMousePosScroll = nil - pScrollHandle = nil - pOffset = nil - scrollUpIsDown = false - scrollDownIsDown = false - end - - -- Set up server stat charts - local numBars = 40 - local numCharts = 0 - local charts = {} - local statsListenerConnection = nil - - function initStatsListener() - if (statsListenerConnection == nil) then - game.NetworkClient:GetChildren()[1]:RequestServerStats(true) - statsListenerConnection = game.NetworkClient:GetChildren()[1].StatsReceived:connect(refreshCharts) - end - end - - function removeStatsListener() - if (statsListenerConnection ~= nil) then - game.NetworkClient:GetChildren()[1]:RequestServerStats(false) - statsListenerConnection:disconnect() - statsListenerConnection = nil - end - end - - function createChart(_frame) - local chart = { - frame = _frame, - values = {}, - bars = {}, - curIndex = 0 - } - return chart - end - - function setupCharts(name) - local newChart = createChart(Dev_StatsChartFrame:Clone()) - newChart.frame.Parent = Dev_TextHolder - newChart.frame.TitleText.Text = name - local newPos = 5 + numCharts * 110 - newChart.frame.Position = UDim2.new(0, 5, 0, newPos); - for i = 1, numBars do - local bar = Dev_StatsChartBar:Clone() - bar.Position = UDim2.new(bar.Position.X.Scale, i * (bar.Size.X.Offset + 1), bar.Position.Y.Scale, bar.Position.Y.Offset) - bar.Parent = newChart.frame - table.insert(newChart.bars, bar) - end - - charts[name] = newChart - numCharts = numCharts + 1 - textHolderSize = newPos + 110 - end - - function clearCharts() - for i, chart in pairs(charts) do - chart.frame.Parent = nil - charts[i] = nil - end - numCharts = 0 - end - - function refreshCharts(stats) - for name, stat in pairs(stats) do - if (charts[name] == nil) then - setupCharts(name) - end - - local chart = charts[name] - chart.curIndex = chart.curIndex + 1 - - -- remove old data - if chart.curIndex > numBars + 1 then - chart.curIndex = numBars + 1 - table.remove(chart.values, 1) - end - - chart.values[chart.curIndex] = stat - - updateChart(chart) - end - end - - function updateChart(chart) - local maxValue = .0001 - local minValue = chart.values[chart.curIndex] - - for i = chart.curIndex, chart.curIndex-numBars, -1 do - if i == 0 then break end - if chart.values[i] > maxValue then maxValue = chart.values[i] end - if chart.values[i] < minValue then minValue = chart.values[i] end - end - - chart.frame.ChartValue.Text = "Current: "..chart.values[chart.curIndex] - chart.frame.ChartMaxValue.Text = "Max: "..maxValue - chart.frame.ChartMinValue.Text = "Min: "..minValue - - for i = 1,numBars do - - if chart.curIndex - i + 1 < 1 then - chart.bars[i].BackgroundTransparency = 1 - else - chart.bars[i].BackgroundTransparency = 0 - - chart.bars[i].Size = UDim2.new(chart.bars[i].Size.X.Scale, chart.bars[i].Size.X.Offset, chart.bars[i].Size.Y.Scale, - Dev_StatsChartBar.Size.Y.Offset * (chart.values[chart.curIndex - i + 1] / maxValue)) - - chart.bars[i].Position = UDim2.new(chart.bars[i].Position.X.Scale, chart.bars[i].Position.X.Offset, Dev_StatsChartBar.Position.Y.Scale, - Dev_StatsChartBar.Position.Y.Offset + (45 - chart.bars[i].Size.Y.Offset)) - end - - end - end - - ---Handle Dev-Console Position - function refreshConsolePosition(x, y) - if not previousMousePos then - return - end - - local delta = Vector2.new(x, y) - previousMousePos - Dev_Container.Position = UDim2.new(0, pPos.X + delta.X, 0, pPos.Y + delta.Y) - end - - Dev_TitleBar.TextButton.MouseButton1Down:connect(function(x, y) - previousMousePos = Vector2.new(x, y) - pPos = Dev_Container.AbsolutePosition - end) - - Dev_TitleBar.TextButton.MouseButton1Up:connect(function(x, y) - clean() - end) - - ---Handle Dev-Console Size - function refreshConsoleSize(x, y) - if not previousMousePosResize then - return - end - - local delta = Vector2.new(x, y) - previousMousePosResize - Dev_Container.Size = UDim2.new(0, math.max(pSize.X + delta.X, minimumSize.X), 0, math.max(pSize.Y + delta.Y, minimumSize.Y)) - end - Dev_Container.Body.ResizeButton.MouseButton1Down:connect(function(x, y) - previousMousePosResize = Vector2.new(x, y) - pSize = Dev_Container.AbsoluteSize - end) - - Dev_Container.Body.ResizeButton.MouseButton1Up:connect(function(x, y) - clean() - end) - - - ---Handle Dev-Console Close Button - Dev_TitleBar.CloseButton.MouseButton1Down:connect(function(x, y) - Dev_Container.Visible = false - end) - - Dev_Container.TitleBar.CloseButton.MouseButton1Up:connect(function() - clean() - removeStatsListener() - clearCharts() - end) - - local optionsHidden = true - local animating = false - --Options - function startAnimation() - if animating then return end - animating = true - - repeat - if optionsHidden then - frameNumber = frameNumber - 1 - else - frameNumber = frameNumber + 1 - end - - local x = frameNumber / 5 - local smoothStep = x * x * (3 - (2 * x)) - Dev_OptionsButton.ImageLabel.Rotation = smoothStep * 5 * 9 - Dev_OptionsBar.Position = UDim2.new(0, (smoothStep * 5 * 50) - 250, 0, 4) - - wait() - if (frameNumber <= 0 and optionsHidden) or (frameNumber >= 5 and not optionsHidden) then - animating = false - end - until not animating - end - - Dev_OptionsButton.MouseButton1Down:connect(function(x, y) - optionsHidden = not optionsHidden - startAnimation() - end) - - --Scroll Position - - function changeOffset(value) - if (currentConsole == LOCAL_CONSOLE) then - localOffset = localOffset + value - elseif (currentConsole == SERVER_CONSOLE) then - serverOffset = serverOffset + value - elseif (currentConsole == SERVER_STATS) then - serverStatsOffset = serverStatsOffset + value - end - - repositionList() - end - - --Refresh Dev-Console Text - function refreshTextHolderForReal() - local childMessages = Dev_TextHolder:GetChildren() - - local messageList = {} - - if (currentConsole == LOCAL_CONSOLE) then - messageList = localMessageList - elseif (currentConsole == SERVER_CONSOLE) then - messageList = serverMessageList - end - - local posOffset = 0 - - for i = 1, #childMessages do - childMessages[i].Visible = false - end - - for i = 1, #messageList do - local message - - local movePosition = false - - if i > #childMessages then - message = Create'TextLabel'{ - Name = 'Message'; - Parent = Dev_TextHolder; - BackgroundTransparency = 1; - TextXAlignment = 'Left'; - Size = UDim2.new(1, 0, 0, 14); - FontSize = 'Size10'; - ZIndex = 1; - } - movePosition = true - else - message = childMessages[i] - end - - if (outputToggleOn or messageList[i].Type ~= Enum.MessageType.MessageOutput) and - (infoToggleOn or messageList[i].Type ~= Enum.MessageType.MessageInfo) and - (warningToggleOn or messageList[i].Type ~= Enum.MessageType.MessageWarning) and - (errorToggleOn or messageList[i].Type ~= Enum.MessageType.MessageError) then - message.TextWrapped = wordWrapToggleOn - message.Size = UDim2.new(0.98, 0, 0, 2000) - message.Parent = Dev_Container - message.Text = messageList[i].Time.." -- "..messageList[i].Message - - message.Size = UDim2.new(0.98, 0, 0, message.TextBounds.Y) - message.Position = UDim2.new(0, 5, 0, posOffset) - message.Parent = Dev_TextHolder - posOffset = posOffset + message.TextBounds.Y - - if movePosition then - if (currentConsole == LOCAL_CONSOLE and localOffset > 0) or (currentConsole == SERVER_CONSOLE and serverOffset > 0) then - changeOffset(message.TextBounds.Y) - end - end - - message.Visible = true - - if messageList[i].Type == Enum.MessageType.MessageError then - message.TextColor3 = Color3.new(1, 0, 0) - elseif messageList[i].Type == Enum.MessageType.MessageInfo then - message.TextColor3 = Color3.new(0.4, 0.5, 1) - elseif messageList[i].Type == Enum.MessageType.MessageWarning then - message.TextColor3 = Color3.new(1, 0.6, 0.4) - else - message.TextColor3 = Color3.new(1, 1, 1) - end - end - - - end - - textHolderSize = posOffset - - repositionList() - - end - - -- Refreshing the textholder every 0.1 (if needed) is good enough, surely fast enough - -- We don't want it to update 50x in a tick because there are 50 messages in that tick - -- (Whenever for one reason or another a lot of output comes in, it can lag - -- This will make it behave better in a situation of a lot of output comming in) - local refreshQueued = false - function refreshTextHolder() - if refreshQueued or currentConsole == SERVER_STATS then return end - Delay(0.1,function() - refreshQueued = false - refreshTextHolderForReal() - end) refreshQueued = true - end - - --Handle Dev-Console Scrollbar - - local inside = 0 - function holdingUpButton() - if scrollUpIsDown then - return - end - scrollUpIsDown = true - wait(.6) - inside = inside + 1 - while scrollUpIsDown and inside < 2 do - wait() - changeOffset(12) - end - inside = inside - 1 - end - - function holdingDownButton() - if scrollDownIsDown then - return - end - scrollDownIsDown = true - wait(.6) - inside = inside + 1 - while scrollDownIsDown and inside < 2 do - wait() - changeOffset(-12) - end - inside = inside - 1 - end - - Dev_Container.Body.ScrollBar.Up.MouseButton1Click:connect(function() - changeOffset(10) - end) - - Dev_Container.Body.ScrollBar.Up.MouseButton1Down:connect(function() - changeOffset(10) - holdingUpButton() - end) - - Dev_Container.Body.ScrollBar.Up.MouseButton1Up:connect(function() - clean() - end) - - Dev_Container.Body.ScrollBar.Down.MouseButton1Down:connect(function() - changeOffset(-10) - holdingDownButton() - end) - - Dev_Container.Body.ScrollBar.Down.MouseButton1Up:connect(function() - clean() - end) - - function handleScroll(x, y) - if not previousMousePosScroll then - return - end - - local delta = (Vector2.new(x, y) - previousMousePosScroll).Y - - local backRatio = 1 - (Dev_Container.Body.TextBox.AbsoluteSize.Y / Dev_TextHolder.AbsoluteSize.Y) - - local movementSize = Dev_ScrollArea.AbsoluteSize.Y - Dev_ScrollArea.Handle.AbsoluteSize.Y - local normalDelta = math.max(math.min(delta, movementSize), 0 - movementSize) - local normalRatio = normalDelta / movementSize - - local textMovementSize = (backRatio * Dev_TextHolder.AbsoluteSize.Y) - local offsetChange = textMovementSize * normalRatio - - if (currentConsole == LOCAL_CONSOLE) then - localOffset = pOffset - offsetChange - elseif (currentConsole == SERVER_CONSOLE) then - serverOffset = pOffset - offsetChange - elseif (currentConsole == SERVER_STATS) then - serverStatsOffset = pOffset - offsetChange - end - end - - Dev_ScrollArea.Handle.MouseButton1Down:connect(function(x, y) - previousMousePosScroll = Vector2.new(x, y) - pScrollHandle = Dev_ScrollArea.Handle.AbsolutePosition - if (currentConsole == LOCAL_CONSOLE) then - pOffset = localOffset - elseif (currentConsole == SERVER_CONSOLE) then - pOffset = serverOffset - elseif (currentConsole == SERVER_STATS) then - pOffset = serverStatsOffset - end - - end) - - Dev_ScrollArea.Handle.MouseButton1Up:connect(function(x, y) - clean() - end) - - local function existsInsideContainer(container, x, y) - local pos = container.AbsolutePosition - local size = container.AbsoluteSize - if x < pos.X or x > pos.X + size.X or y < pos.y or y > pos.y + size.y then - return false - end - return true - end - - - - --Refresh Dev-Console Message Positions - function repositionList() - - if (currentConsole == LOCAL_CONSOLE) then - localOffset = math.min(math.max(localOffset, 0), textHolderSize - Dev_Container.Body.TextBox.AbsoluteSize.Y) - Dev_TextHolder.Size = UDim2.new(1, 0, 0, textHolderSize) - elseif (currentConsole == SERVER_CONSOLE) then - serverOffset = math.min(math.max(serverOffset, 0), textHolderSize - Dev_Container.Body.TextBox.AbsoluteSize.Y) - Dev_TextHolder.Size = UDim2.new(1, 0, 0, textHolderSize) - elseif (currentConsole == SERVER_STATS) then - serverStatsOffset = math.min(math.max(serverStatsOffset, 0), textHolderSize - Dev_Container.Body.TextBox.AbsoluteSize.Y) - Dev_TextHolder.Size = UDim2.new(1, 0, 0, textHolderSize) - end - - local ratio = Dev_Container.Body.TextBox.AbsoluteSize.Y / Dev_TextHolder.AbsoluteSize.Y - - if ratio >= 1 then - Dev_Container.Body.ScrollBar.Visible = false - Dev_Container.Body.TextBox.Size = UDim2.new(1, -4, 1, -28 + getCommandBarOffset()) - - if (currentConsole == LOCAL_CONSOLE) then - Dev_TextHolder.Position = UDim2.new(0, 0, 1, 0 - textHolderSize) - elseif (currentConsole == SERVER_CONSOLE) then - Dev_TextHolder.Position = UDim2.new(0, 0, 1, 0 - textHolderSize) - end - - - else - Dev_Container.Body.ScrollBar.Visible = true - Dev_Container.Body.TextBox.Size = UDim2.new(1, -25, 1, -28 + getCommandBarOffset()) - - local backRatio = 1 - ratio - local offsetRatio - - if (currentConsole == LOCAL_CONSOLE) then - offsetRatio = localOffset / Dev_TextHolder.AbsoluteSize.Y - elseif (currentConsole == SERVER_CONSOLE) then - offsetRatio = serverOffset / Dev_TextHolder.AbsoluteSize.Y - elseif (currentConsole == SERVER_STATS) then - offsetRatio = (serverStatsOffset / Dev_TextHolder.AbsoluteSize.Y) - end - - local topRatio = math.max(0, backRatio - offsetRatio) - local scrollHandleSize = math.max((Dev_ScrollArea.AbsoluteSize.Y) * ratio, 21) - - local scrollRatio = scrollHandleSize / Dev_ScrollArea.AbsoluteSize.Y - local ratioConversion = (1 - scrollRatio) / (1 - ratio) - - local topScrollRatio = topRatio * ratioConversion - - local sPos = math.min((Dev_ScrollArea.AbsoluteSize.Y) * topScrollRatio, Dev_ScrollArea.AbsoluteSize.Y - scrollHandleSize) - - Dev_ScrollArea.Handle.Size = UDim2.new(1, 0, 0, scrollHandleSize) - Dev_ScrollArea.Handle.Position = UDim2.new(0, 0, 0, sPos) - - if (currentConsole == LOCAL_CONSOLE) then - Dev_TextHolder.Position = UDim2.new(0, 0, 1, 0 - textHolderSize + localOffset) - elseif (currentConsole == SERVER_CONSOLE) then - Dev_TextHolder.Position = UDim2.new(0, 0, 1, 0 - textHolderSize + serverOffset) - elseif (currentConsole == SERVER_STATS) then - Dev_TextHolder.Position = UDim2.new(0, 0, 1, 0 - textHolderSize + serverStatsOffset) - end - - end - end - - -- Easy, fast, and working nicely - local function numberWithZero(num) - return (num < 10 and "0" or "")..num - end - - local str = "%s:%s:%s" - - function ConvertTimeStamp(timeStamp) - local localTime = timeStamp - os.time() + math.floor(tick()) - local dayTime = localTime % 86400 - - local hour = math.floor(dayTime/3600) - - dayTime = dayTime - (hour * 3600) - local minute = math.floor(dayTime/60) - - dayTime = dayTime - (minute * 60) - local second = dayTime - - local h = numberWithZero(hour) - local m = numberWithZero(minute) - local s = numberWithZero(dayTime) - - return str:format(h,m,s) - end - - --Filter - - Dev_OptionsBar.ErrorToggleButton.MouseButton1Down:connect(function(x, y) - errorToggleOn = not errorToggleOn - Dev_OptionsBar.ErrorToggleButton.CheckFrame.Visible = errorToggleOn - refreshTextHolder() - end) - - Dev_OptionsBar.WarningToggleButton.MouseButton1Down:connect(function(x, y) - warningToggleOn = not warningToggleOn - Dev_OptionsBar.WarningToggleButton.CheckFrame.Visible = warningToggleOn - refreshTextHolder() - end) - - Dev_OptionsBar.InfoToggleButton.MouseButton1Down:connect(function(x, y) - infoToggleOn = not infoToggleOn - Dev_OptionsBar.InfoToggleButton.CheckFrame.Visible = infoToggleOn - refreshTextHolder() - end) - - Dev_OptionsBar.OutputToggleButton.MouseButton1Down:connect(function(x, y) - outputToggleOn = not outputToggleOn - Dev_OptionsBar.OutputToggleButton.CheckFrame.Visible = outputToggleOn - refreshTextHolder() - end) - - Dev_OptionsBar.WordWrapToggleButton.MouseButton1Down:connect(function(x, y) - wordWrapToggleOn = not wordWrapToggleOn - Dev_OptionsBar.WordWrapToggleButton.CheckFrame.Visible = wordWrapToggleOn - refreshTextHolder() - end) - - ---Dev-Console Message Functionality - function AddLocalMessage(str, messageType, timeStamp) - localMessageList[#localMessageList+1] = {Message = str, Time = ConvertTimeStamp(timeStamp), Type = messageType} - while #localMessageList > MAX_LIST_SIZE do - table.remove(localMessageList, 1) - end - - refreshTextHolder() - end - - function AddServerMessage(str, messageType, timeStamp) - serverMessageList[#serverMessageList+1] = {Message = str, Time = ConvertTimeStamp(timeStamp), Type = messageType} - while #serverMessageList > MAX_LIST_SIZE do - table.remove(serverMessageList, 1) - end - - refreshTextHolder() - end - - - - --Handle Dev-Console Local/Server Buttons - Dev_Container.Body.LocalConsole.MouseButton1Click:connect(function(x, y) - if (currentConsole ~= LOCAL_CONSOLE) then - - if (currentConsole == SERVER_STATS) then - removeStatsListener() - clearCharts() - end - - Dev_Container.CommandBar.Visible = false - - currentConsole = LOCAL_CONSOLE - local localConsole = Dev_Container.Body.LocalConsole - local serverConsole = Dev_Container.Body.ServerConsole - local serverStats = Dev_Container.Body.ServerStats - - localConsole.Size = UDim2.new(0, 90, 0, 20) - serverConsole.Size = UDim2.new(0, 90, 0, 17) - serverStats.Size = UDim2.new(0, 90, 0, 17) - localConsole.BackgroundTransparency = 0.6 - serverConsole.BackgroundTransparency = 0.8 - serverStats.BackgroundTransparency = 0.8 - - if game:FindFirstChild("Players") and game.Players["LocalPlayer"] then - local mouse = game.Players.LocalPlayer:GetMouse() - local mousePos = Vector2.new(mouse.X, mouse.Y) - refreshConsolePosition(mouse.X, mouse.Y) - refreshConsoleSize(mouse.X, mouse.Y) - handleScroll(mouse.X, mouse.Y) - end - - refreshTextHolder() - end - end) - - Dev_Container.Body.LocalConsole.MouseButton1Up:connect(function() - clean() - end) - - local serverHistoryRequested = false; - - Dev_Container.Body.ServerConsole.MouseButton1Click:connect(function(x, y) - - if not serverHistoryRequested then - serverHistoryRequested = true - game:GetService("LogService"):RequestServerOutput() - end - - if (currentConsole ~= SERVER_CONSOLE) then - - Dev_Container.CommandBar.Visible = shouldShowCommandBar() - - if (currentConsole == SERVER_STATS) then - removeStatsListener() - clearCharts() - end - - currentConsole = SERVER_CONSOLE - local localConsole = Dev_Container.Body.LocalConsole - local serverConsole = Dev_Container.Body.ServerConsole - local serverStats = Dev_Container.Body.ServerStats - - serverConsole.Size = UDim2.new(0, 90, 0, 20) - localConsole.Size = UDim2.new(0, 90, 0, 17) - serverConsole.BackgroundTransparency = 0.6 - localConsole.BackgroundTransparency = 0.8 - serverStats.BackgroundTransparency = 0.8 - - if game:FindFirstChild("Players") and game.Players["LocalPlayer"] then - local mouse = game.Players.LocalPlayer:GetMouse() - local mousePos = Vector2.new(mouse.X, mouse.Y) - refreshConsolePosition(mouse.X, mouse.Y) - refreshConsoleSize(mouse.X, mouse.Y) - handleScroll(mouse.X, mouse.Y) - end - - refreshTextHolder() - end - end) - - ---Extra Mouse Handlers for Dev-Console - Dev_Container.Body.ServerConsole.MouseButton1Up:connect(function() - clean() - end) - - Dev_Container.Body.ServerStats.MouseButton1Click:connect(function(x, y) - if (currentConsole ~= SERVER_STATS) then - - Dev_Container.CommandBar.Visible = false - - currentConsole = SERVER_STATS - local localConsole = Dev_Container.Body.LocalConsole - local serverConsole = Dev_Container.Body.ServerConsole - local serverStats = Dev_Container.Body.ServerStats - - serverStats.Size = UDim2.new(0, 90, 0, 20) - serverConsole.Size = UDim2.new(0, 90, 0, 17) - localConsole.Size = UDim2.new(0, 90, 0, 17) - serverStats.BackgroundTransparency = 0.6 - serverConsole.BackgroundTransparency = 0.8 - localConsole.BackgroundTransparency = 0.8 - - -- clear holder of log entries - local messages = Dev_TextHolder:GetChildren() - for i = 1, #messages do - messages[i].Visible = false - end - - pcall(function() initStatsListener() end) - - end - end) - - Dev_Container.Body.ServerStats.MouseButton1Up:connect(function() - clean() - end) - - if game:FindFirstChild("Players") and game.Players["LocalPlayer"] then - local LocalMouse = game.Players.LocalPlayer:GetMouse() - LocalMouse.Move:connect(function() - if not Dev_Container.Visible then - return - end - local mouse = game.Players.LocalPlayer:GetMouse() - local mousePos = Vector2.new(mouse.X, mouse.Y) - refreshConsolePosition(mouse.X, mouse.Y) - refreshConsoleSize(mouse.X, mouse.Y) - handleScroll(mouse.X, mouse.Y) - - refreshTextHolder() - repositionList() - end) - - LocalMouse.Button1Up:connect(function() - clean() - end) - - LocalMouse.WheelForward:connect(function() - if not Dev_Container.Visible then - return - end - if existsInsideContainer(Dev_Container, LocalMouse.X, LocalMouse.Y) then - changeOffset(10) - end - end) - - LocalMouse.WheelBackward:connect(function() - if not Dev_Container.Visible then - return - end - if existsInsideContainer(Dev_Container, LocalMouse.X, LocalMouse.Y) then - changeOffset(-10) - end - end) - - end - - Dev_ScrollArea.Handle.MouseButton1Down:connect(function() - repositionList() - end) - - - ---Populate Dev-Console with dummy messages - - local history = game:GetService("LogService"):GetLogHistory() - - for i = 1, #history do - AddLocalMessage(history[i].message, history[i].messageType, history[i].timestamp) - end - - game:GetService("LogService").MessageOut:connect(function(message, messageType) - AddLocalMessage(message, messageType, os.time()) - end) - - game:GetService("LogService").ServerMessageOut:connect(AddServerMessage) - -end - -local currentlyToggling = false -function ToggleConsole.OnInvoke() - if currentlyToggling then - return - end - - currentlyToggling = true - initializeDeveloperConsole() - Dev_Container.Visible = not Dev_Container.Visible - currentlyToggling = false - - if not Dev_Container.Visible then - removeStatsListener() - clearCharts() - end - -end diff --git a/assets/ugc/862 b/assets/ugc/862 deleted file mode 100644 index ca64461..0000000 --- a/assets/ugc/862 +++ /dev/null @@ -1,73 +0,0 @@ ---rbxassetid%862% ---build our gui - -local popupFrame = Instance.new("Frame") -popupFrame.Position = UDim2.new(0.5,-165,0.5,-175) -popupFrame.Size = UDim2.new(0,330,0,350) -popupFrame.Style = Enum.FrameStyle.DropShadow -popupFrame.ZIndex = 4 -popupFrame.Name = "Popup" -popupFrame.Visible = false -popupFrame.Parent = script.Parent - -local darken = popupFrame:clone() -darken.Size = UDim2.new(1,16,1,16) -darken.Position = UDim2.new(0,-8,0,-8) -darken.Name = "Darken" -darken.ZIndex = 1 -darken.Parent = popupFrame - -local acceptButton = Instance.new("TextButton") -acceptButton.Position = UDim2.new(0,20,0,270) -acceptButton.Size = UDim2.new(0,100,0,50) -acceptButton.Font = Enum.Font.ArialBold -acceptButton.FontSize = Enum.FontSize.Size24 -acceptButton.Style = Enum.ButtonStyle.RobloxRoundButton -acceptButton.TextColor3 = Color3.new(248/255,248/255,248/255) -acceptButton.Text = "Yes" -acceptButton.ZIndex = 5 -acceptButton.Name = "AcceptButton" -acceptButton.Parent = popupFrame - -local declineButton = acceptButton:clone() -declineButton.Position = UDim2.new(1,-120,0,270) -declineButton.Text = "No" -declineButton.Name = "DeclineButton" -declineButton.Parent = popupFrame - -local okButton = acceptButton:clone() -okButton.Name = "OKButton" -okButton.Text = "OK" -okButton.Position = UDim2.new(0.5,-50,0,270) -okButton.Visible = false -okButton.Parent = popupFrame - -local popupImage = Instance.new("ImageLabel") -popupImage.BackgroundTransparency = 1 -popupImage.Position = UDim2.new(0.5,-140,0,10) -popupImage.Size = UDim2.new(0,280,0,280) -popupImage.ZIndex = 3 -popupImage.Name = "PopupImage" -popupImage.Parent = popupFrame - -local backing = Instance.new("ImageLabel") -backing.BackgroundTransparency = 1 -backing.Size = UDim2.new(1,0,1,0) -backing.Image = "http://www.mete0r.xyz/asset/?id=47574181" -backing.Name = "Backing" -backing.ZIndex = 2 -backing.Parent = popupImage - -local popupText = Instance.new("TextLabel") -popupText.Name = "PopupText" -popupText.Size = UDim2.new(1,0,0.8,0) -popupText.Font = Enum.Font.ArialBold -popupText.FontSize = Enum.FontSize.Size36 -popupText.BackgroundTransparency = 1 -popupText.Text = "Hello I'm a popup" -popupText.TextColor3 = Color3.new(248/255,248/255,248/255) -popupText.TextWrap = true -popupText.ZIndex = 5 -popupText.Parent = popupFrame - -script:remove() \ No newline at end of file diff --git a/assets/ugc/863 b/assets/ugc/863 deleted file mode 100644 index dc36e03..0000000 --- a/assets/ugc/863 +++ /dev/null @@ -1,307 +0,0 @@ ---rbxassetid%863% -function waitForProperty(instance, property) - while not instance[property] do - instance.Changed:wait() - end -end -function waitForChild(instance, name) - while not instance:FindFirstChild(name) do - instance.ChildAdded:wait() - end -end - -waitForProperty(game.Players,"LocalPlayer") -waitForChild(script.Parent,"Popup") -waitForChild(script.Parent.Popup,"AcceptButton") -script.Parent.Popup.AcceptButton.Modal = true - -local localPlayer = game.Players.LocalPlayer -local teleportUI = nil - -local acceptedTeleport = Instance.new("IntValue") - -local friendRequestBlacklist = {} - -local teleportEnabled = true - -local makePopupInvisible = function() - if script.Parent.Popup then script.Parent.Popup.Visible = false end -end - -function makeFriend(fromPlayer,toPlayer) - - local popup = script.Parent:FindFirstChild("Popup") - if popup == nil then return end -- there is no popup! - if popup.Visible then return end -- currently popping something, abort! - if friendRequestBlacklist[fromPlayer] then return end -- previously cancelled friend request, we don't want it! - - popup.PopupText.Text = "Accept Friend Request from " .. tostring(fromPlayer.Name) .. "?" - popup.PopupImage.Image = "http://www.mete0r.xyz/thumbs/avatar.ashx?userId="..tostring(fromPlayer.userId).."&x=352&y=352" - - showTwoButtons() - popup.Visible = true - popup.AcceptButton.Text = "Accept" - popup.DeclineButton.Text = "Decline" - popup:TweenSize(UDim2.new(0,330,0,350),Enum.EasingDirection.Out,Enum.EasingStyle.Quart,1,true) - - local yesCon, noCon - - yesCon = popup.AcceptButton.MouseButton1Click:connect(function() - popup.Visible = false - toPlayer:RequestFriendship(fromPlayer) - if yesCon then yesCon:disconnect() end - if noCon then noCon:disconnect() end - popup:TweenSize(UDim2.new(0,0,0,0),Enum.EasingDirection.Out,Enum.EasingStyle.Quart,1,true,makePopupInvisible()) - end) - - noCon = popup.DeclineButton.MouseButton1Click:connect(function() - popup.Visible = false - toPlayer:RevokeFriendship(fromPlayer) - friendRequestBlacklist[fromPlayer] = true - print("pop up blacklist") - if yesCon then yesCon:disconnect() end - if noCon then noCon:disconnect() end - popup:TweenSize(UDim2.new(0,0,0,0),Enum.EasingDirection.Out,Enum.EasingStyle.Quart,1,true,makePopupInvisible()) - end) -end - - -game.Players.FriendRequestEvent:connect(function(fromPlayer,toPlayer,event) - - -- if this doesn't involve me, then do nothing - if fromPlayer ~= localPlayer and toPlayer ~= localPlayer then return end - - if fromPlayer == localPlayer then - if event == Enum.FriendRequestEvent.Accept then - game:GetService("GuiService"):SendNotification("You are Friends", - "With " .. toPlayer.Name .. "!", - "http://www.mete0r.xyz/thumbs/avatar.ashx?userId="..tostring(toPlayer.userId).."&x=48&y=48", - 5, - function() - - end) - end - elseif toPlayer == localPlayer then - if event == Enum.FriendRequestEvent.Issue then - if friendRequestBlacklist[fromPlayer] then return end -- previously cancelled friend request, we don't want it! - game:GetService("GuiService"):SendNotification("Friend Request", - "From " .. fromPlayer.Name, - "http://www.mete0r.xyz/thumbs/avatar.ashx?userId="..tostring(fromPlayer.userId).."&x=48&y=48", - 8, - function() - makeFriend(fromPlayer,toPlayer) - end) - elseif event == Enum.FriendRequestEvent.Accept then - game:GetService("GuiService"):SendNotification("You are Friends", - "With " .. fromPlayer.Name .. "!", - "http://www.mete0r.xyz/thumbs/avatar.ashx?userId="..tostring(fromPlayer.userId).."&x=48&y=48", - 5, - function() - - end) - end - end -end) - -function showOneButton() - local popup = script.Parent:FindFirstChild("Popup") - if popup then - popup.OKButton.Visible = true - popup.DeclineButton.Visible = false - popup.AcceptButton.Visible = false - end -end - -function showTwoButtons() - local popup = script.Parent:FindFirstChild("Popup") - if popup then - popup.OKButton.Visible = false - popup.DeclineButton.Visible = true - popup.AcceptButton.Visible = true - end -end - -function onTeleport(teleportState, placeId, spawnName) - if game:GetService("TeleportService").CustomizedTeleportUI == false then - if teleportState == Enum.TeleportState.Started then - showTeleportUI("Teleport started...", 0) - elseif teleportState == Enum.TeleportState.WaitingForServer then - showTeleportUI("Requesting server...", 0) - elseif teleportState == Enum.TeleportState.InProgress then - showTeleportUI("Teleporting...", 0) - elseif teleportState == Enum.TeleportState.Failed then - showTeleportUI("Teleport failed. Insufficient privileges or target place does not exist.", 3) - end - end -end - -function showTeleportUI(message, timer) - if teleportUI ~= nil then - teleportUI:Remove() - end - waitForChild(localPlayer, "PlayerGui") - teleportUI = Instance.new("Message", localPlayer.PlayerGui) - teleportUI.Text = message - if timer > 0 then - wait(timer) - teleportUI:Remove() - end -end - -if teleportEnabled then - - localPlayer.OnTeleport:connect(onTeleport) - - game:GetService("TeleportService").ErrorCallback = function(message) - local popup = script.Parent:FindFirstChild("Popup") - showOneButton() - popup.PopupText.Text = message - local clickCon - clickCon = popup.OKButton.MouseButton1Click:connect(function() - game:GetService("TeleportService"):TeleportCancel() - if clickCon then clickCon:disconnect() end - game.GuiService:RemoveCenterDialog(script.Parent:FindFirstChild("Popup")) - popup:TweenSize(UDim2.new(0,0,0,0),Enum.EasingDirection.Out,Enum.EasingStyle.Quart,1,true,makePopupInvisible()) - end) - game.GuiService:AddCenterDialog(script.Parent:FindFirstChild("Popup"), Enum.CenterDialogType.QuitDialog, - --ShowFunction - function() - showOneButton() - script.Parent:FindFirstChild("Popup").Visible = true - popup:TweenSize(UDim2.new(0,330,0,350),Enum.EasingDirection.Out,Enum.EasingStyle.Quart,1,true) - end, - --HideFunction - function() - popup:TweenSize(UDim2.new(0,0,0,0),Enum.EasingDirection.Out,Enum.EasingStyle.Quart,1,true,makePopupInvisible()) - end) - - end - game:GetService("TeleportService").ConfirmationCallback = function(message, placeId, spawnName) - local popup = script.Parent:FindFirstChild("Popup") - popup.PopupText.Text = message - popup.PopupImage.Image = "" - - local yesCon, noCon - - local function killCons() - if yesCon then yesCon:disconnect() end - if noCon then noCon:disconnect() end - game.GuiService:RemoveCenterDialog(script.Parent:FindFirstChild("Popup")) - popup:TweenSize(UDim2.new(0,0,0,0),Enum.EasingDirection.Out,Enum.EasingStyle.Quart,1,true,makePopupInvisible()) - end - - yesCon = popup.AcceptButton.MouseButton1Click:connect(function() - killCons() - local success, err = pcall(function() game:GetService("TeleportService"):TeleportImpl(placeId,spawnName) end) - if not success then - showOneButton() - popup.PopupText.Text = err - local clickCon - clickCon = popup.OKButton.MouseButton1Click:connect(function() - if clickCon then clickCon:disconnect() end - game.GuiService:RemoveCenterDialog(script.Parent:FindFirstChild("Popup")) - popup:TweenSize(UDim2.new(0,0,0,0),Enum.EasingDirection.Out,Enum.EasingStyle.Quart,1,true,makePopupInvisible()) - end) - game.GuiService:AddCenterDialog(script.Parent:FindFirstChild("Popup"), Enum.CenterDialogType.QuitDialog, - --ShowFunction - function() - showOneButton() - script.Parent:FindFirstChild("Popup").Visible = true - popup:TweenSize(UDim2.new(0,330,0,350),Enum.EasingDirection.Out,Enum.EasingStyle.Quart,1,true) - end, - --HideFunction - function() - popup:TweenSize(UDim2.new(0,0,0,0),Enum.EasingDirection.Out,Enum.EasingStyle.Quart,1,true,makePopupInvisible()) - end) - end - end) - - noCon = popup.DeclineButton.MouseButton1Click:connect(function() - killCons() - local success = pcall(function() game:GetService("TeleportService"):TeleportCancel() end) - end) - - local centerDialogSuccess = pcall(function() game.GuiService:AddCenterDialog(script.Parent:FindFirstChild("Popup"), Enum.CenterDialogType.QuitDialog, - --ShowFunction - function() - showTwoButtons() - popup.AcceptButton.Text = "Leave" - popup.DeclineButton.Text = "Stay" - script.Parent:FindFirstChild("Popup").Visible = true - popup:TweenSize(UDim2.new(0,330,0,350),Enum.EasingDirection.Out,Enum.EasingStyle.Quart,1,true) - end, - --HideFunction - function() - popup:TweenSize(UDim2.new(0,0,0,0),Enum.EasingDirection.Out,Enum.EasingStyle.Quart,1,true,makePopupInvisible()) - end) - end) - - if centerDialogSuccess == false then - script.Parent:FindFirstChild("Popup").Visible = true - popup.AcceptButton.Text = "Leave" - popup.DeclineButton.Text = "Stay" - popup:TweenSize(UDim2.new(0,330,0,350),Enum.EasingDirection.Out,Enum.EasingStyle.Quart,1,true) - end - return true - - end -end - -game:GetService("MarketplaceService").ClientLuaDialogRequested:connect(function(message, accept, decline) - local popup = script.Parent:FindFirstChild("Popup") - popup.PopupText.Text = message - popup.PopupImage.Image = "" - - local yesCon, noCon - - local function killCons() - if yesCon then yesCon:disconnect() end - if noCon then noCon:disconnect() end - game.GuiService:RemoveCenterDialog(script.Parent:FindFirstChild("Popup")) - popup:TweenSize(UDim2.new(0,0,0,0),Enum.EasingDirection.Out,Enum.EasingStyle.Quart,1,true,makePopupInvisible()) - end - - yesCon = popup.AcceptButton.MouseButton1Click:connect(function() - killCons() - game:GetService("MarketplaceService"):SignalServerLuaDialogClosed(true); - end) - - noCon = popup.DeclineButton.MouseButton1Click:connect(function() - killCons() - game:GetService("MarketplaceService"):SignalServerLuaDialogClosed(false); - end) - - local centerDialogSuccess = pcall(function() game.GuiService:AddCenterDialog(script.Parent:FindFirstChild("Popup"), Enum.CenterDialogType.QuitDialog, - function() - showTwoButtons() - popup.AcceptButton.Text = accept - popup.DeclineButton.Text = decline - script.Parent:FindFirstChild("Popup").Visible = true - popup:TweenSize(UDim2.new(0,330,0,350),Enum.EasingDirection.Out,Enum.EasingStyle.Quart,1,true) - end, - function() - popup:TweenSize(UDim2.new(0,0,0,0),Enum.EasingDirection.Out,Enum.EasingStyle.Quart,1,true,makePopupInvisible()) - end) - end) - - if centerDialogSuccess == false then - script.Parent:FindFirstChild("Popup").Visible = true - popup.AcceptButton.Text = accept - popup.DeclineButton.Text = decline - popup:TweenSize(UDim2.new(0,330,0,350),Enum.EasingDirection.Out,Enum.EasingStyle.Quart,1,true) - end - - return true - -end) - -Game:GetService("PointsService").PointsAwarded:connect( function(userId, pointsAwarded, userBalanceInGame, userTotalBalance) - if userId == Game.Players.LocalPlayer.userId then - game:GetService("GuiService"):SendNotification("Points Awarded!", - "You received " ..tostring(pointsAwarded) .. " points!", - "http://www.mete0r.xyz/asset?id=155363793", - 5, - function() - end) - end -end) diff --git a/assets/ugc/864 b/assets/ugc/864 deleted file mode 100644 index 76e29e9..0000000 --- a/assets/ugc/864 +++ /dev/null @@ -1,1386 +0,0 @@ ---rbxassetid%864% ---[[ - //FileName: ChatScript.LUA - //Written by: Sorcus - //Description: Code for lua side chat on ROBLOX. Supports Scrolling. - //NOTE: If you find any bugs or inaccuracies PM Sorcus on ROBLOX or @Canavus on Twitter -]] - -local forceChatGUI = false - --- Utility functions + Globals -local function WaitForChild(parent, childName) - while parent:FindFirstChild(childName) == nil do - parent.ChildAdded:wait(0.03) - end - return parent[childName] -end - -local function typedef(obj) - return obj -end - -local function IsPhone() - local cGui = Game:GetService('CoreGui') - local rGui = WaitForChild(cGui, 'RobloxGui') - if rGui.AbsoluteSize.Y < 600 then - return true - end - return false -end - --- Users can use enough white spaces to spoof chatting as other players --- This function removes trailing and leading white spaces --- AFAIK, there is no reason for spam white spaces -local function StringTrim(str,nstr) - -- %s+ stands whitespaces - -- We yank out any whitespaces at the begin and end of the string - -- After that, we put a tab behind newlines - -- That way people can't fake messages on a new line - return str:match("^%s*(.-)%s*$"):gsub("\n","\n"..nstr) -end - -while Game.Players.LocalPlayer == nil do wait(0.03) end - -local Player = Game.Players.LocalPlayer -while Player.Character == nil do wait(0.03) end -local RbxUtility = LoadLibrary('RbxUtility') -local Gui = typedef(RbxUtility) -local Camera = Game.Workspace.CurrentCamera - --- Services -local CoreGuiService = Game:GetService('CoreGui') -local PlayersService = Game:GetService('Players') -local DebrisService= Game:GetService('Debris') -local GuiService = Game:GetService('GuiService') -local inputService = game:GetService("UserInputService") - --- Lua Enums -local Enums do - Enums = {} - local EnumName = {} -- used as unique key for enum name - local enum_mt = { - __call = function(self,value) - return self[value] or self[tonumber(value)] - end; - __index = { - GetEnumItems = function(self) - local t = {} - for i,item in pairs(self) do - if type(i) == 'number' then - t[#t+1] = item - end - end - table.sort(t,function(a,b) return a.Value < b.Value end) - return t - end; - }; - __tostring = function(self) - return "Enum." .. self[EnumName] - end; - } - local item_mt = { - __call = function(self,value) - return value == self or value == self.Name or value == self.Value - end; - __tostring = function(self) - return "Enum." .. self[EnumName] .. "." .. self.Name - end; - } - function CreateEnum(enumName) - return function(t) - local e = {[EnumName] = enumName} - for i,name in pairs(t) do - local item = setmetatable({Name=name,Value=i,Enum=e,[EnumName]=enumName},item_mt) - e[i] = item - e[name] = item - e[item] = item - end - Enums[enumName] = e - return setmetatable(e, enum_mt) - end - end -end ---------------------------------------------------- ------------------- Input class -------------------- -local Input = { - Mouse = Player:GetMouse(), - Speed = 0, - Simulating = false, - - Configuration = { - DefaultSpeed = 1 - }, - UserIsScrolling = false - } - ---------------------------------------------------- ------------------- Chat class -------------------- -local Chat = { - - ChatColors = { - BrickColor.new("Bright red"), - BrickColor.new("Bright blue"), - BrickColor.new("Earth green"), - BrickColor.new("Bright violet"), - BrickColor.new("Bright orange"), - BrickColor.new("Bright yellow"), - BrickColor.new("Light reddish violet"), - BrickColor.new("Brick yellow"), - }, - - Gui = nil, - Frame = nil, - RenderFrame = nil, - TapToChatLabel = nil, - ClickToChatButton = nil, - - ScrollingLock = false, - EventListener = nil, - - -- This is actually a ring buffer - -- Meaning at hitting the historyLength it wraps around - -- Reuses the text objects, so chat atmost uses 100 text objects - MessageQueue = {}, - - -- Stores all the values for configuring chat - Configuration = { - FontSize = Enum.FontSize.Size18, -- 10 is good - -- Also change this when you are changing the above, this is suboptimal but so is our interface to find FontSize - NumFontSize = 12, - HistoryLength = 20, -- stores up to 50 of the last chat messages for you to scroll through, - Size = UDim2.new(0.38, 0, 0.20, 0), - MessageColor = Color3.new(1, 1, 1), - AdminMessageColor = Color3.new(1, 215/255, 0), - XScale = 0.025, - LifeTime = 45, - Position = UDim2.new(0, 2, 0.05, 0), - DefaultTweenSpeed = 0.15, - HaltTime = 1/15, -- Why would people need to be chatting faster than every 1/15th of a second? - }, - - PreviousMessage = tick(), -- Timestamp of previous message - - -- This could be redone by just using the previous and next fields of the Queue - -- But the iterators cause issues, will be optimized later - SlotPositions_List = {}, - -- To precompute and store all player null strings since its an expensive process - CachedSpaceStrings_List = {}, - MouseOnFrame = false, - GotFocus = false, - - Messages_List = {}, - MessageThread = nil, - - Admins_List = { - 'Rbadam', 'Adamintygum', 'androidtest', 'RobloxFrenchie', 'JacksSmirkingRevenge', 'LindaPepita', 'vaiobot', 'Goddessnoob', 'effward', 'Blockhaak', 'Drewbda', '659223', 'Tone', 'fasterbuilder19', 'Zeuxcg', 'concol2', - 'ReeseMcBlox', 'Jeditkacheff', 'whkm1980', 'ChiefJustus', 'Ellissar', 'Arbolito', 'Noob007', 'Limon', 'cmed', 'hawkington', 'Tabemono', 'autoconfig', 'BrightEyes', 'Monsterinc3D', 'MrDoomBringer', 'IsolatedEvent', - 'CountOnConnor', 'Scubasomething', 'OnlyTwentyCharacters', 'LordRugdumph', 'bellavour', 'david.baszucki', 'ibanez2189', 'Sorcus', 'DeeAna00', 'TheLorekt', 'NiqueMonster', 'Thorasaur', 'MSE6', 'CorgiParade', 'Varia', - '4runningwolves', 'pulmoesflor', 'Olive71', 'groundcontroll2', 'GuruKrish', 'Countvelcro', 'IltaLumi', 'juanjuan23', 'OstrichSized', 'jackintheblox', 'SlingshotJunkie', 'gordonrox24', 'sharpnine', 'Motornerve', 'Motornerve', - 'watchmedogood', 'jmargh', 'JayKorean', 'Foyle', 'MajorTom4321', 'Shedletsky', 'supernovacaine', 'FFJosh', 'Sickenedmonkey', 'Doughtless', 'KBUX', 'totallynothere', 'ErzaStar', 'Keith', 'Chro', 'SolarCrane', 'GloriousSalt', - 'UristMcSparks', 'ITOlaurEN', 'Malcomso', 'Stickmasterluke', 'windlight13', 'yumyumcheerios', 'Stravant', 'ByteMe', 'imaginationsensation', 'Matt.Dusek', 'Mcrtest', 'Seranok', 'maxvee', 'Coatp0cketninja', 'Screenme', - 'b1tsh1ft', 'Totbl', 'Aquabot8', 'grossinger', 'Merely', 'CDakkar', 'Siekiera', 'Robloxkidsaccount', 'flotsamthespork', 'Soggoth', 'Phil', 'OrcaSparkles', 'skullgoblin', 'RickROSStheB0SS', 'ArgonPirate', 'NobleDragon', - 'Squidcod', 'Raeglyn', 'RobloxSai', 'Briarroze', 'hawkeyebandit', 'DapperBuffalo', 'Vukota', 'swiftstone', 'Gemlocker', 'Loopylens', 'Tarabyte', 'Timobius', 'Tobotrobot', 'Foster008', 'Twberg', 'DarthVaden', 'Khanovich', - 'CodeWriter', 'VladTheFirst', 'Phaedre', 'gorroth', 'SphinxShen', 'jynj1984', 'RoboYZ', 'ZodiacZak', 'superman205', 'ConvexRumbler', 'mpliner476', 'geekndestroy', 'glewis17' - }, - - - SafeChat_List = { - ['Use the Chat menu to talk to me.'] = {'/sc 0', true}, - ['I can only see menu chats.'] = {'/sc 1', true}, - ['Hello'] = { - ['Hi'] = {'/sc 2_0', true, ['Hi there!'] = true, ['Hi everyone'] = true}, - ['Howdy'] = {'/sc 2_1', true, ['Howdy partner!'] = true}, - ['Greetings'] = {'/sc 2_2', true, ['Greetings everyone'] = true, ['Greetings Robloxians!'] = true, ['Seasons greetings!'] = true}, - ['Welcome'] = {'/sc 2_3', true, ['Welcome to my place'] = true, ['Welcome to my barbeque'] = true, ['Welcome to our base'] = true}, - ['Hey there!'] = {'/sc 2_4', true}, - ['What\'s up?'] = {'/sc 2_5', true, ['How are you doing?'] = true, ['How\'s it going?'] = true, ['What\'s new?'] = true}, - ['Good day'] = {'/sc 2_6', true, ['Good morning'] = true, ['Good evening'] = true, ['Good afternoon'] = true, ['Good night'] = true}, - ['Silly'] = {'/sc 2_7', true, ['Waaaaaaaz up?!'] = true, ['Hullo!'] = true, ['Behold greatness, mortals!'] = true, ['Pardon me, is this Sparta?'] = true, ['THIS IS SPARTAAAA!'] = true}, - ['Happy Holidays!'] = {'/sc 2_8', true, ['Happy New Year!'] = true, - ['Happy Valentine\'s Day!'] = true, - ['Beware the Ides of March!'] = true, - ['Happy St. Patrick\'s Day!'] = true, - ['Happy Easter!'] = true, - ['Happy Earth Day!'] = true, - ['Happy 4th of July!'] = true, - ['Happy Thanksgiving!'] = true, - ['Happy Halloween!'] = true, - ['Happy Hanukkah!'] = true, - ['Merry Christmas!'] = true, - ['Happy Halloween!'] = true, - ['Happy Earth Day!'] = true, - ['Happy May Day!'] = true, - ['Happy Towel Day!'] = true, - ['Happy ROBLOX Day!'] = true, - ['Happy LOL Day!'] = true }, - - [1] = '/sc 2' - }, - ['Goodbye'] = { - ['Good Night']= {'/sc 3_0', true, - ['Sweet dreams'] = true, - ['Go to sleep!'] = true, - ['Lights out!'] = true, - ['Bedtime'] = true, - ['Going to bed now'] = true}, - - ['Later']= {'/sc 3_1', true, - ['See ya later'] = true, - ['Later gator!'] = true, - ['See you tomorrow'] = true}, - - ['Bye'] = {'/sc 3_2', true, ['Hasta la bye bye!'] = true}, - ['I\'ll be right back'] = {'/sc 3_3', true}, - ['I have to go'] = {'/sc 3_4', true}, - ['Farewell'] = {'/sc 3_5', true, ['Take care'] = true, ['Have a nice day'] = true, ['Goodluck!'] = true, ['Ta-ta for now!'] = true}, - ['Peace'] = {'/sc 3_6', true, ['Peace out!'] = true, ['Peace dudes!'] = true, ['Rest in pieces!'] = true}, - ['Silly'] = {'/sc 3_7', true, - ['To the batcave!'] = true, - ['Over and out!'] = true, - ['Happy trails!'] = true, - ['I\'ve got to book it!'] = true, - ['Tootles!'] = true, - ['Smell you later!'] = true, - ['GG!'] = true, - ['My house is on fire! gtg.'] = true}, - [1] = '/sc 3' - }, - ['Friend'] ={ - ['Wanna be friends?'] = {'/sc 4_0', true}, - ['Follow me'] = {'/sc 4_1', true, ['Come to my place!'] = true, ['Come to my base!'] = true, ['Follow me, team!'] = true, ['Follow me'] = true}, - ['Your place is cool'] = {'/sc 4_2', true, ['Your place is fun'] = true, ['Your place is awesome'] = true, ['Your place looks good'] = true, ['This place is awesome!'] = true}, - ['Thank you'] = {'/sc 4_3', true, ['Thanks for playing'] = true, ['Thanks for visiting'] = true, ['Thanks for everything'] = true, ['No, thank you'] = true, ['Thanx'] = true}, - ['No problem'] = {'/sc 4_4', true, ['Don\'t worry'] = true, ['That\'s ok'] = true, ['np'] = true}, - ['You are ...'] = {'/sc 4_5', true, - ['You are great!'] = true, - ['You are good!'] = true, - ['You are cool!'] = true, - ['You are funny!'] = true, - ['You are silly!'] = true, - ['You are awesome!'] = true, - ['You are doing something I don\'t like, please stop'] = true - }, - ['I like ...'] = {'/sc 4_6', true, ['I like your name'] = true, ['I like your shirt'] = true, ['I like your place'] = true, ['I like your style'] = true, - ['I like you'] = true, ['I like items'] = true, ['I like money'] = true}, - ['Sorry'] = {'/sc 4_7', true, ['My bad!'] = true, ['I\'m sorry'] = true, ['Whoops!'] = true, ['Please forgive me.'] = true, ['I forgive you.'] = true, - ['I didn\'t mean to do that.'] = true, ['Sorry, I\'ll stop now.'] = true}, - [1] = '/sc 4' - }, - ['Questions'] = { - ['Who?'] = {'/sc 5_0', true, ['Who wants to be my friend?'] = true, ['Who wants to be on my team?'] = true, ['Who made this brilliant game?'] = true}, - ['What?'] = {'/sc 5_1', true, ['What is your favorite animal?'] = true, ['What is your favorite game?'] = true, ['What is your favorite movie?'] = true, - ['What is your favorite TV show?'] = true, ['What is your favorite music?'] = true, ['What are your hobbies?'] = true, ['LOLWUT?'] = true}, - ['When?'] = {'/sc 5_2', true, ['When are you online?'] = true, ['When is the new version coming out?'] = true, ['When can we play again?'] = true, ['When will your place be done?'] = true}, - ['Where?'] = {'/sc 5_3', true, ['Where do you want to go?'] = true, ['Where are you going?'] = true, ['Where am I?!'] = true, ['Where did you go?'] = true}, - ['How?'] = {'/sc 5_4', true, ['How are you today?'] = true, ['How did you make this cool place?'] = true, ['LOLHOW?'] = true}, - ['Can I...'] = {'/sc 5_5', true, ['Can I have a tour?'] = true, ['Can I be on your team?'] = true, ['Can I be your friend?'] = true, ['Can I try something?'] = true, - ['Can I have that please?'] = true, ['Can I have that back please?'] = true, ['Can I have borrow your hat?'] = true, ['Can I have borrow your gear?'] = true}, - [1] = '/sc 5' - }, - ['Answers'] = { - ['You need help?'] = {'/sc 6_0', true, ['Check out the news section'] = true, ['Check out the help section'] = true, ['Read the wiki!'] = true, - ['All the answers are in the wiki!'] = true, ['I will help you with this.'] = true}, - ['Some people ...'] = {'/sc 6_1', true, ['Me'] = true, ['Not me'] = true, ['You'] = true, ['All of us'] = true, ['Everyone but you'] = true, ['Builderman!'] = true, - ['Telamon!'] = true, ['My team'] = true, ['My group'] = true, ['Mom'] = true, ['Dad'] = true, ['Sister'] = true, ['Brother'] = true, ['Cousin'] = true, - ['Grandparent'] = true, ['Friend'] = true}, - ['Time ...'] = {'/sc 6_2', true, ['In the morning'] = true, ['In the afternoon'] = true, ['At night'] = true, ['Tomorrow'] = true, ['This week'] = true, ['This month'] = true, - ['Sometime'] = true, ['Sometimes'] = true, ['Whenever you want'] = true, ['Never'] = true, ['After this'] = true, ['In 10 minutes'] = true, ['In a couple hours'] = true, - ['In a couple days'] = true}, - ['Animals'] = {'/sc 6_3', true, - ['Cats'] = {['Lion'] = true, ['Tiger'] = true, ['Leopard'] = true, ['Cheetah'] = true}, - ['Dogs'] = {['Wolves'] = true, ['Beagle'] = true, ['Collie'] = true, ['Dalmatian'] = true, ['Poodle'] = true, ['Spaniel'] = true, - ['Shepherd'] = true, ['Terrier'] = true, ['Retriever'] = true}, - ['Horses'] = {['Ponies'] = true, ['Stallions'] = true, ['Pwnyz'] = true}, - ['Reptiles'] = {['Dinosaurs'] = true, ['Lizards'] = true, ['Snakes'] = true, ['Turtles!'] = true}, - ['Hamster'] = true, - ['Monkey'] = true, - ['Bears'] = true, - ['Fish'] = {['Goldfish'] = true, ['Sharks'] = true, ['Sea Bass'] = true, ['Halibut'] = true, ['Tropical Fish'] = true}, - ['Birds'] = {['Eagles'] = true, ['Penguins'] = true, ['Parakeets'] = true, ['Owls'] = true, ['Hawks'] = true, ['Pidgeons'] = true}, - ['Elephants'] = true, - ['Mythical Beasts'] = {['Dragons'] = true, ['Unicorns'] = true, ['Sea Serpents'] = true, ['Sphinx'] = true, ['Cyclops'] = true, - ['Minotaurs'] = true, ['Goblins'] = true, ['Honest Politicians'] = true, ['Ghosts'] = true, ['Scylla and Charybdis'] = true} - }, - ['Games'] = {'/sc 6_4', true, - ['Action'] = true, ['Puzzle'] = true, ['Strategy'] = true, ['Racing'] = true, ['RPG'] = true, ['Obstacle Course'] = true, ['Tycoon'] = true, - ['Roblox'] = { ['BrickBattle'] = true, ['Community Building'] = true, ['Roblox Minigames'] = true, ['Contest Place'] = true}, - ['Board games'] = { ['Chess'] = true, ['Checkers'] = true, ['Settlers of Catan'] = true, ['Tigris and Euphrates'] = true, ['El Grande'] = true, - ['Stratego'] = true, ['Carcassonne'] = true} - }, - ['Sports'] = {'/sc 6_5', true, ['Hockey'] = true, ['Soccer'] = true, ['Football'] = true, ['Baseball'] = true, ['Basketball'] = true, - ['Volleyball'] = true, ['Tennis'] = true, ['Sports team practice'] = true, - ['Watersports'] = { ['Surfing'] = true,['Swimming'] = true, ['Water Polo'] = true}, - ['Winter sports'] = { ['Skiing'] = true, ['Snowboarding'] = true, ['Sledding'] = true, ['Skating'] = true}, - ['Adventure'] = {['Rock climbing'] = true, ['Hiking'] = true, ['Fishing'] = true, ['Horseback riding'] = true}, - ['Wacky'] = {['Foosball'] = true, ['Calvinball'] = true, ['Croquet'] = true, ['Cricket'] = true, ['Dodgeball'] = true, - ['Squash'] = true, ['Trampoline'] = true} - }, - ['Movies/TV'] = {'/sc 6_6', true, ['Science Fiction'] = true, ['Animated'] = {['Anime'] = true}, ['Comedy'] = true, ['Romantic'] = true, - ['Action'] = true, ['Fantasy'] = true}, - ['Music'] = {'/sc 6_7', true, ['Country'] = true, ['Jazz'] = true, ['Rap'] = true, ['Hip-hop'] = true, ['Techno'] = true, ['Classical'] = true, - ['Pop'] = true, ['Rock'] = true}, - ['Hobbies'] = {'/sc 6_8', true, - ['Computers'] = { ['Building computers'] = true, ['Videogames'] = true, ['Coding'] = true, ['Hacking'] = true}, - ['The Internet'] = { ['lol. teh internets!'] = true, ['Watching vids'] = true}, - ['Dance'] = true, ['Gymnastics'] = true, ['Listening to music'] = true, ['Arts and crafts'] = true, - ['Martial Arts'] = {['Karate'] = true, ['Judo'] = true, ['Taikwon Do'] = true, ['Wushu'] = true, ['Street fighting'] = true}, - ['Music lessons'] = {['Playing in my band'] = true, ['Playing piano'] = true, ['Playing guitar'] = true, - ['Playing violin'] = true, ['Playing drums'] = true, ['Playing a weird instrument'] = true} - }, - ['Location'] = {'/sc 6_9', true, - ['USA'] = { - ['West'] = { ['Alaska'] = true, ['Arizona'] = true, ['California'] = true, ['Colorado'] = true, ['Hawaii'] = true, - ['Idaho'] = true, ['Montana'] = true, ['Nevada'] = true, ['New Mexico'] = true, ['Oregon'] = true, - ['Utah'] = true, ['Washington'] = true, ['Wyoming'] = true - }, - ['South'] = { ['Alabama'] = true, ['Arkansas'] = true, ['Florida'] = true, ['Georgia'] = true, ['Kentucky'] = true, - ['Louisiana'] = true, ['Mississippi'] = true, ['North Carolina'] = true, ['Oklahoma'] = true, - ['South Carolina'] = true, ['Tennessee'] = true, ['Texas'] = true, ['Virginia'] = true, ['West Virginia'] = true - }, - ['Northeast'] = {['Connecticut'] = true, ['Delaware'] = true, ['Maine'] = true, ['Maryland'] = true, ['Massachusetts'] = true, - ['New Hampshire'] = true, ['New Jersey'] = true, ['New York'] = true, ['Pennsylvania'] = true, ['Rhode Island'] = true, - ['Vermont'] = true - }, - ['Midwest'] = {['Illinois'] = true, ['Indiana'] = true, ['Iowa'] = true, ['Kansas'] = true, ['Michigan'] = true, ['Minnesota'] = true, - ['Missouri'] = true, ['Nebraska'] = true, ['North Dakota'] = true, ['Ohio'] = true, ['South Dakota'] = true, ['Wisconsin'] = true} - }, - ['Canada'] = {['Alberta'] = true, ['British Columbia'] = true, ['Manitoba'] = true, ['New Brunswick'] = true, ['Newfoundland'] = true, - ['Northwest Territories'] = true, ['Nova Scotia'] = true, ['Nunavut'] = true, ['Ontario'] = true, ['Prince Edward Island'] = true, - ['Quebec'] = true, ['Saskatchewan'] = true, ['Yukon'] = true}, - ['Mexico'] = true, - ['Central America'] = true, - ['Europe'] = {['France'] = true, ['Germany'] = true, ['Spain'] = true, ['Italy'] = true, ['Poland'] = true, ['Switzerland'] = true, - ['Greece'] = true, ['Romania'] = true, ['Netherlands'] = true, - ['Great Britain'] = {['England'] = true, ['Scotland'] = true, ['Wales'] = true, ['Northern Ireland'] = true} - }, - ['Asia'] = { ['China'] = true, ['India'] = true, ['Japan'] = true, ['Korea'] = true, ['Russia'] = true, ['Vietnam'] = true}, - ['South America'] = { ['Argentina'] = true, ['Brazil'] = true}, - ['Africa'] = { ['Eygpt'] = true, ['Swaziland'] = true}, - ['Australia'] = true, ['Middle East'] = true, ['Antarctica'] = true, ['New Zealand'] = true - }, - ['Age'] = {'/sc 6_10', true, ['Rugrat'] = true, ['Kid'] = true, ['Tween'] = true, ['Teen'] = true, ['Twenties'] = true, - ['Old'] = true, ['Ancient'] = true, ['Mesozoic'] = true, ['I don\'t want to say my age. Don\'t ask.'] = true}, - ['Mood'] = {'/sc 6_11', true, ['Good'] = true, ['Great!'] = true, ['Not bad'] = true, ['Sad'] = true, ['Hyper'] = true, - ['Chill'] = true, ['Happy'] = true, ['Kind of mad'] = true}, - ['Boy'] = {'/sc 6_12', true}, - ['Girl'] = {'/sc 6_13', true}, - ['I don\'t want to say boy or girl. Don\'t ask.'] = {'/sc 6_14', true}, - [1] = '/sc 6' - }, - ['Game'] = { - ['Let\'s build'] = {'/sc 7_0', true}, - ['Let\'s battle'] = {'/sc 7_1', true}, - ['Nice one!'] = {'/sc 7_2', true}, - ['So far so good'] = {'/sc 7_3', true}, - ['Lucky shot!'] = {'/sc 7_4', true}, - ['Oh man!'] = {'/sc 7_5', true}, - ['I challenge you to a fight!'] = {'/sc 7_6', true}, - ['Help me with this'] = {'/sc 7_7', true}, - ['Let\'s go to your game'] = {'/sc 7_8', true}, - ['Can you show me how do to that?'] = {'/sc 7_9', true}, - ['Backflip!'] = {'/sc 7_10', true}, - ['Frontflip!'] = {'/sc 7_11', true}, - ['Dance!'] = {'/sc 7_12', true}, - ['I\'m on your side!'] = {'/sc 7_13', true}, - ['Game Commands'] = {'/sc 7_14', true, ['regen'] = true, ['reset'] = true, ['go'] = true, ['fix'] = true, ['respawn'] = true}, - [1] = '/sc 7' - }; - ['Silly'] = { - ['Muahahahaha!'] = true, - ['all your base are belong to me!'] = true, - ['GET OFF MAH LAWN'] = true, - ['TEH EPIK DUCK IS COMING!!!'] = true, - ['ROFL'] = true, - ['1337'] = {true, ['i r teh pwnz0r!'] = true, ['w00t!'] = true, ['z0mg h4x!'] = true, ['ub3rR0xXorzage!'] = true} - }, - ['Yes'] = { - ['Absolutely!'] = true, - ['Rock on!'] = true, - ['Totally!'] = true, - ['Juice!'] = true, - ['Yay!'] = true, - ['Yesh'] = true - }, - ['No'] = { - ['Ummm. No.'] = true, - ['...'] = true, - ['Stop!'] = true, - ['Go away!'] = true, - ['Don\'t do that'] = true, - ['Stop breaking the rules'] = true, - ['I don\'t want to'] = true - }, - ['Ok'] = { - ['Well... ok'] = true, - ['Sure'] = true - }, - ['Uncertain'] = { - ['Maybe'] = true, - ['I don\'t know'] = true, - ['idk'] = true, - ['I can\'t decide'] = true, - ['Hmm...'] = true - }, - [':-)'] = { - [':-('] = true, - [':D'] = true, - [':-O'] = true, - ['lol'] = true, - ['=D'] = true, - ['D='] = true, - ['XD'] = true, - [';D'] = true, - [';)'] = true, - ['O_O'] = true, - ['=)'] = true, - ['@_@'] = true, - ['>_<'] = true, - ['T_T'] = true, - ['^_^'] = true, - ['<(0_0<) <(0_0)> (>0_0)> KIRBY DANCE'] = true, - [')\';'] = true, - [':3'] = true - }, - ['Ratings'] = { - ['Rate it!'] = true, - ['I give it a 1 out of 10'] = true, - ['I give it a 2 out of 10'] = true, - ['I give it a 3 out of 10'] = true, - ['I give it a 4 out of 10'] = true, - ['I give it a 5 out of 10'] = true, - ['I give it a 6 out of 10'] = true, - ['I give it a 7 out of 10'] = true, - ['I give it a 8 out of 10'] = true, - ['I give it a 9 out of 10'] = true, - ['I give it a 10 out of 10!'] = true, - } - }, - CreateEnum('SafeChat'){'Level1', 'Level2', 'Level3'}, - SafeChatTree = {}, - TempSpaceLabel = nil - } ---------------------------------------------------- - -local function GetNameValue(pName) - local value = 0 - for index = 1, #pName do - local cValue = string.byte(string.sub(pName, index, index)) - local reverseIndex = #pName - index + 1 - if #pName%2 == 1 then - reverseIndex = reverseIndex - 1 - end - if reverseIndex%4 >= 2 then - cValue = -cValue - end - value = value + cValue - end - return value%8 -end - -function Chat:ComputeChatColor(pName) - return self.ChatColors[GetNameValue(pName) + 1].Color -end - --- This is context based scrolling -function Chat:EnableScrolling(toggle) - -- Genius idea gone to fail, if we switch the camera type we can effectively lock the - -- camera and do no click scrolling - self.MouseOnFrame = false - if self.RenderFrame then - self.RenderFrame.MouseEnter:connect(function() - local character = Player.Character - local torso = WaitForChild(character, 'Torso') - local humanoid = WaitForChild(character, 'Humanoid') - local head = WaitForChild(character, 'Head') - if toggle then - self.MouseOnFrame = true - Camera.CameraType = 'Scriptable' - -- Get relative position of camera and keep to it - Spawn(function() - local currentRelativePos = Camera.CoordinateFrame.p - torso.Position - while Chat.MouseOnFrame do - Camera.CoordinateFrame = CFrame.new(torso.Position + currentRelativePos, head.Position) - wait(0.015) - end - end) - end - end) - - self.RenderFrame.MouseLeave:connect(function() - Camera.CameraType = 'Custom' - self.MouseOnFrame = false - end) - end -end - --- TODO: Scrolling using Mouse wheel -function Chat:OnScroll(speed) - if self.MouseOnFrame then - -- - end -end - --- Check if we are running on a touch device -function Chat:IsTouchDevice() - local touchEnabled = false - pcall(function() touchEnabled = inputService.TouchEnabled end) - return touchEnabled -end - --- Scrolling -function Chat:ScrollQueue(value) - --[[for i = 1, #self.MessageQueue do - if self.MessageQueue[i] then - for _, label in pairs(self.MessageQueue[i]) do - local next = self.MessageQueue[i].Next - local previous = self.MessageQueue[i].Previous - if label and label:IsA('TextLabel') or label:IsA('TextButton') then - if value > 0 and previous and previous['Message'] then - label.Position = previous['Message'].Position - elseif value < 1 and next['Message'] then - label.Position = previous['Message'].Position - end - end - end - end - end ]] -end - --- Handles the rendering of the text objects in their appropriate places -function Chat:UpdateQueue(field, diff) - -- Have to do some sort of correction here - for i = #self.MessageQueue, 1, -1 do - if self.MessageQueue[i] then - for _, label in pairs(self.MessageQueue[i]) do - if label and type(label) ~= 'table' and type(label) ~= 'number' then - if label:IsA('TextLabel') or label:IsA('TextButton') or label:IsA('ImageLabel') then - if diff then - label.Position = label.Position - UDim2.new(0, 0, diff, 0) - else - local yOffset = 0 - local xOffset = 20 - if label:IsA('ImageLabel') then - yOffset = 4 - xOffset = 0 - end - if field == self.MessageQueue[i] then - label.Position = UDim2.new(self.Configuration.XScale, xOffset, label.Position.Y.Scale - field['Message'].Size.Y.Scale , yOffset) - -- Just to show up popping effect for the latest message in chat - if label:IsA('TextLabel') or label:IsA('TextButton') then - Spawn(function() - wait(0.05) - while label.TextTransparency >= 0 do - label.TextTransparency = label.TextTransparency - 0.2 - wait(0.03) - end - if label == field['Message'] then - label.TextStrokeTransparency = 0.6 - else - label.TextStrokeTransparency = 1.0 - end - end) - else - Spawn(function() - wait(0.05) - while label.ImageTransparency >= 0 do - label.ImageTransparency = label.ImageTransparency - 0.2 - wait(0.03) - end - end) - - end - else - label.Position = UDim2.new(self.Configuration.XScale, xOffset, label.Position.Y.Scale - field['Message'].Size.Y.Scale, yOffset) - end - if label.Position.Y.Scale < -0.01 then - -- NOTE: Remove this fix when Textbounds is fixed - label.Visible = false - label:Destroy() - end - end - end - end - end - end - end -end - -function Chat:CreateScrollBar() - -- Code for scrolling is in here, partially, but scroll bar drawing isn't drawn - -- TODO: Implement -end - --- For scrolling, to see if we hit the bounds so that we can stop it from scrolling anymore -function Chat:CheckIfInBounds(value) - if #Chat.MessageQueue < 3 then - return true - end - - if value > 0 and Chat.MessageQueue[1] and Chat.MessageQueue[1]['Player'] and Chat.MessageQueue[1]['Player'].Position.Y.Scale == 0 then - return true - elseif value < 0 and Chat.MessageQueue[1] and Chat.MessageQueue[1]['Player'] and Chat.MessageQueue[1]['Player'].Position.Y.Scale < 0 then - return true - else - return false - end - return false -end - --- This is to precompute all playerName space strings --- This is used to offset the message by exactly this + 2 spacestrings -function Chat:ComputeSpaceString(pLabel) - local nString = " " - if not self.TempSpaceLabel then - self.TempSpaceLabel = Gui.Create'TextButton' - { - Size = UDim2.new(0, pLabel.AbsoluteSize.X, 0, pLabel.AbsoluteSize.Y); - FontSize = self.Configuration.FontSize; - Parent = self.RenderFrame; - BackgroundTransparency = 1.0; - Text = nString; - Name = 'SpaceButton' - }; - else - self.TempSpaceLabel.Text = nString - end - - while self.TempSpaceLabel.TextBounds.X < pLabel.TextBounds.X do - nString = nString .. " " - self.TempSpaceLabel.Text = nString - end - nString = nString .. " " - self.CachedSpaceStrings_List[pLabel.Text] = nString - self.TempSpaceLabel.Text = "" - return nString -end - --- When the playerChatted event fires --- The message is what the player chatted -function Chat:UpdateChat(cPlayer, message) - local messageField = { - ['Player'] = cPlayer, - ['Message'] = message - } - if coroutine.status(Chat.MessageThread) == 'dead' then - --Chat.Messages_List = {} - table.insert(Chat.Messages_List, messageField) - Chat.MessageThread = coroutine.create(function() - for i = 1, #Chat.Messages_List do - local field = Chat.Messages_List[i] - Chat:CreateMessage(field['Player'], field['Message']) - end - Chat.Messages_List = {} - end) - coroutine.resume(Chat.MessageThread) - else - table.insert(Chat.Messages_List, messageField) - end -end - -function Chat:RecalculateSpacing() - --[[for i = 1, #self.MessageQueue do - local pLabel = self.MessageQueue[i]['Player'] - local mLabel = self.MessageQueue[i]['Message'] - - local prevYScale = mLabel.Size.Y.Scale - local prevText = mLabel.Text - mLabel.Text = prevText - - local heightField = mLabel.TextBounds.Y - - mLabel.Size = UDim2.new(1, 0, heightField/self.RenderFrame.AbsoluteSize.Y, 0) - pLabel.Size = mLabel.Size - - local diff = mLabel.Size.Y.Scale - prevYScale - - Chat:UpdateQueue(self.MessageQueue[i], diff) - end ]] -end - -function Chat:ApplyFilter(str) - --[[for _, word in pair(self.Filter_List) do - if string.find(str, word) then - str:gsub(word, '@#$^') - end - end ]] -end - --- NOTE: Temporarily disabled ring buffer to allow for chat to always wrap around -function Chat:CreateMessage(cPlayer, message) - local pName - if not cPlayer then - pName = '' - else - pName = cPlayer.Name - end - local pLabel,mLabel - -- Our history stores upto 50 messages that is 100 textlabels - -- If we ever hit the mark, which would be in every popular game btw - -- we wrap around and reuse the labels - if #self.MessageQueue > self.Configuration.HistoryLength then - --[[pLabel = self.MessageQueue[#self.MessageQueue]['Player'] - mLabel = self.MessageQueue[#self.MessageQueue]['Message'] - - pLabel.Text = pName .. ':' - pLabel.Name = pName - - local pColor - if cPlayer.Neutral then - pLabel.TextColor3 = Chat:ComputeChatColor(pName) - else - pLabel.TextColor3 = cPlayer.TeamColor.Color - end - - local nString - - if not self.CachedSpaceStrings_List[pName] then - nString = Chat:ComputeSpaceString(pLabel) - else - nString = self.CachedSpaceStrings_List[pName] - end - - mLabel.Text = "" - mLabel.Name = pName .. " - message" - mLabel.Text = nString .. message; - - mLabel.Parent = nil - mLabel.Parent = self.RenderFrame - - mLabel.Position = UDim2.new(0, 0, 1, 0); - pLabel.Position = UDim2.new(0, 0, 1, 0);]] - - -- Reinserted at the beginning, ring buffer - self.MessageQueue[#self.MessageQueue] = nil - end - --else - -- Haven't hit the mark yet, so keep creating - - local nString = "" - - - pLabel = Gui.Create'ImageLabel' - { - Name = pName; - Parent = self.RenderFrame; - Size = UDim2.new(0, 14, 0, 14); - BackgroundTransparency = 1.0; - Position = UDim2.new(0, 0, 1, -10); - BorderSizePixel = 0.0; - Image = "rbxasset://textures/ui/chat_teamButton.png"; - ImageTransparency = 1.0; - }; - - local pColor - if cPlayer.Neutral then - pLabel.ImageColor3 = Chat:ComputeChatColor(pName) - else - pLabel.ImageColor3 = cPlayer.TeamColor.Color - end - - mLabel = Gui.Create'TextLabel' - { - Name = pName .. ' - message'; - -- Max is 3 lines - Size = UDim2.new(1, 0, 0.5, 0); - TextColor3 = Chat.Configuration.MessageColor; - Font = Enum.Font.SourceSans; - FontSize = Chat.Configuration.FontSize; - TextXAlignment = Enum.TextXAlignment.Left; - TextYAlignment = Enum.TextYAlignment.Top; - Text = ""; -- this is to stop when the engine reverts the swear words to default, which is button, ugh - Parent = self.RenderFrame; - TextWrapped = true; - BackgroundTransparency = 1.0; - TextTransparency = 1.0; - Position = UDim2.new(0, 40, 1, 0); - BorderSizePixel = 0.0; - TextStrokeColor3 = Color3.new(0, 0, 0); - TextStrokeTransparency = 0.6; - --Active = false; - }; - mLabel.Text = nString .. pName .. ": " .. message; - - if not pName then - mLabel.TextColor3 = Color3.new(0, 0.4, 1.0) - end - --end - - for _, adminName in pairs(self.Admins_List) do - if string.lower(adminName) == string.lower(pName) then - mLabel.TextColor3 = self.Configuration.AdminMessageColor - end - end - - pLabel.Visible = true - mLabel.Visible = true - - -- This will give beautiful multilines as well - local heightField = mLabel.TextBounds.Y - - mLabel.Size = UDim2.new(1, 0, heightField/self.RenderFrame.AbsoluteSize.Y, 0) - - local yPixels = self.RenderFrame.AbsoluteSize.Y - local yFieldSize = mLabel.TextBounds.Y - - local queueField = {} - queueField['Player'] = pLabel - queueField['Message'] = mLabel - queueField['SpawnTime'] = tick() -- Used for identifying when to make the message invisible - - table.insert(self.MessageQueue, 1, queueField) - Chat:UpdateQueue(queueField) -end - -function Chat:ScreenSizeChanged() - wait() - while self.Frame.AbsoluteSize.Y > 120 do - self.Frame.Size = self.Frame.Size - UDim2.new(0, 0, 0.005, 0) - end - Chat:RecalculateSpacing() -end - - -function Chat:FindButtonTree(scButton, rootList) - local list = {} - rootList = rootList or self.SafeChatTree - for button, _ in pairs(rootList) do - if button == scButton then - list = rootList[button] - elseif type(rootList[button]) == 'table' then - list = Chat:FindButtonTree(scButton, rootList[button]) - end - end - return list -end - -function Chat:ToggleSafeChatMenu(scButton) - local list = Chat:FindButtonTree(scButton, self.SafeChatTree) - if list then - for button, _ in pairs(list) do - if button:IsA('TextButton') or button:IsA('ImageButton') then - button.Visible = not button.Visible - end - end - return true - end - return false -end - -function Chat:CreateSafeChatOptions(list, rootButton) - local text_List = {} - level = level or 0 - local count = 0 - text_List[rootButton] = {} - text_List[rootButton][1] = list[1] - rootButton = rootButton or self.SafeChatButton - for msg, _ in pairs(list) do - if type(msg) == 'string' then - local chatText = Gui.Create'TextButton' - { - Name = msg; - Text = msg; - Size = UDim2.new(0, 100, 0, 20); - TextXAlignment = Enum.TextXAlignment.Center; - TextColor3 = Color3.new(0.2, 0.1, 0.1); - BackgroundTransparency = 0.5; - BackgroundColor3 = Color3.new(1, 1, 1); - Parent = self.SafeChatFrame; - Visible = false; - Position = UDim2.new(0, rootButton.Position.X.Scale + 105, 0, rootButton.Position.Y.Scale - ((count - 3) * 100)); - }; - - count = count + 1 - - if type(list[msg]) == 'table' then - text_List[rootButton][chatText] = Chat:CreateSafeChatOptions(list[msg], chatText) - else - --table.insert(text_List[chatText], true) - end - chatText.MouseEnter:connect(function() - Chat:ToggleSafeChatMenu(chatText) - end) - - chatText.MouseLeave:connect(function() - Chat:ToggleSafeChatMenu(chatText) - end) - - chatText.MouseButton1Click:connect(function() - local lList = Chat:FindButtonTree(chatText) - if lList then - for i, v in pairs(lList) do - end - else - end - pcall(function() PlayersService:Chat(lList[1]) end) - end) - end - end - return text_List -end - -function Chat:CreateSafeChatGui() - self.SafeChatFrame = Gui.Create'Frame' - { - Name = 'SafeChatFrame'; - Size = UDim2.new(1, 0, 1, 0); - Parent = self.Gui; - BackgroundTransparency = 1.0; - - Gui.Create'ImageButton' - { - Name = 'SafeChatButton'; - Size = UDim2.new(0, 44, 0, 31); - Position = UDim2.new(0, 1, 0.35, 0); - BackgroundTransparency = 1.0; - Image = 'http://www.mete0r.xyz/asset/?id=97080365'; - }; - } - - self.SafeChatButton = self.SafeChatFrame.SafeChatButton - -- safe chat button is the root of this tree - self.SafeChatTree[self.SafeChatButton] = Chat:CreateSafeChatOptions(self.SafeChat_List, self.SafeChatButton) - - self.SafeChatButton.MouseButton1Click:connect(function() - Chat:ToggleSafeChatMenu(self.SafeChatButton) - end) -end - - -function Chat:FocusOnChatBar() - if self.ClickToChatButton then - self.ClickToChatButton.Visible = false - end - - self.GotFocus = true - if self.Frame['Background'] then - self.Frame.Background.Visible = false - end - self.ChatBar:CaptureFocus() -end - --- For touch devices we create a button instead -function Chat:CreateTouchButton() - self.ChatTouchFrame = Gui.Create'Frame' - { - Name = 'ChatTouchFrame'; - Size = UDim2.new(0, 128, 0, 32); - Position = UDim2.new(0, 88, 0, 0); - BackgroundTransparency = 1.0; - Parent = self.Gui; - - Gui.Create'ImageButton' - { - Name = 'ChatLabel'; - Size = UDim2.new(0, 74, 0, 28); - Position = UDim2.new(0, 0, 0, 0); - BackgroundTransparency = 1.0; - ZIndex = 2.0; - }; - Gui.Create'ImageLabel' - { - Name = 'Background'; - Size = UDim2.new(1, 0, 1, 0); - Position = UDim2.new(0, 0, 0, 0); - BackgroundTransparency = 1.0; - Image = 'http://www.mete0r.xyz/asset/?id=97078724' - }; - - } - self.TapToChatLabel = self.ChatTouchFrame.ChatLabel - self.TouchLabelBackground = self.ChatTouchFrame.Background - - self.ChatBar = Gui.Create'TextBox' - { - Name = 'ChatBar'; - Size = UDim2.new(1, 0, 0.2, 0); - Position = UDim2.new(0, 0, 0.8, 800); - Text = ""; - ZIndex = 1.0; - BackgroundTransparency = 1.0; - Parent = self.Frame; - TextXAlignment = Enum.TextXAlignment.Left; - TextColor3 = Color3.new(1, 1, 1); - ClearTextOnFocus = false; - }; - - self.TapToChatLabel.MouseButton1Click:connect(function() - self.TapToChatLabel.Visible = false - --self.ChatBar.Visible = true - --self.Frame.Background.Visible = true - self.ChatBar:CaptureFocus() - self.GotFocus = true - if self.TouchLabelBackground then - self.TouchLabelBackground.Visible = false - end - end) -end - --- Non touch devices, create the bottom chat bar -function Chat:CreateChatBar() - -- okay now we do - local status, result = pcall(function() return GuiService.UseLuaChat end) - if forceChatGUI or (status and result) then - self.ClickToChatButton = Gui.Create'TextButton' - { - Name = 'ClickToChat'; - Size = UDim2.new(1, 0, 0, 20); - BackgroundTransparency = 1.0; - ZIndex = 2.0; - Parent = self.Gui; - Text = "To chat click here or press \"/\" key"; - TextColor3 = Color3.new(1, 1, 0.9); - Position = UDim2.new(0, 0, 1, 0); - TextXAlignment = Enum.TextXAlignment.Left; - FontSize = Enum.FontSize.Size12; - } - - self.ChatBar = Gui.Create'TextBox' - { - Name = 'ChatBar'; - Size = UDim2.new(1, 0, 0, 20); - Position = UDim2.new(0, 0, 1, 0); - Text = ""; - ZIndex = 1.0; - BackgroundColor3 = Color3.new(0, 0, 0); - BackgroundTransparency = 0.25; - Parent = self.Gui; - TextXAlignment = Enum.TextXAlignment.Left; - TextColor3 = Color3.new(1, 1, 1); - FontSize = Enum.FontSize.Size12; - ClearTextOnFocus = false; - Text = ''; - }; - - -- Engine has code to offset the entire world, so if we do it by -20 pixels nothing gets in our chat's way - --GuiService:SetGlobalSizeOffsetPixel(0, -20) - local success, error = pcall(function() GuiService:SetGlobalGuiInset(0, 0, 0, 20) end) - if not success then - pcall(function() GuiService:SetGlobalSizeOffsetPixel(0, -20) end) -- Doesn't hurt to throw a non-existent function into a pcall - end - -- ChatHotKey is '/' - GuiService:AddSpecialKey(Enum.SpecialKey.ChatHotkey) - GuiService.SpecialKeyPressed:connect(function(key) - if key == Enum.SpecialKey.ChatHotkey then - Chat:FocusOnChatBar() - end - end) - - self.ClickToChatButton.MouseButton1Click:connect(function() - Chat:FocusOnChatBar() - end) - end -end - --- Create the initial Chat stuff --- Done only once -function Chat:CreateGui() - self.Gui = WaitForChild(CoreGuiService, 'RobloxGui') - self.Frame = Gui.Create'Frame' - { - Name = 'ChatFrame'; - --Size = self.Configuration.Size; - Size = UDim2.new(0, 500, 0, 120); - Position = UDim2.new(0, 0, 0, 55); - BackgroundTransparency = 1.0; - --ClipsDescendants = true; - ZIndex = 0.0; - Parent = self.Gui; - Active = false; - - Gui.Create'ImageLabel' - { - Name = 'Background'; - Image = 'http://www.mete0r.xyz/asset/?id=97120937'; --96551212'; - Size = UDim2.new(1.3, 0, 1.64, 0); - Position = UDim2.new(0, 0, 0, 0); - BackgroundTransparency = 1.0; - ZIndex = 0.0; - Visible = false - }; - - Gui.Create'Frame' - { - Name = 'Border'; - Size = UDim2.new(1, 0, 0, 1); - Position = UDim2.new(0, 0, 0.8, 0); - BackgroundTransparency = 0.0; - BackgroundColor3 = Color3.new(236/255, 236/255, 236/255); - BorderSizePixel = 0.0; - Visible = false; - }; - - Gui.Create'Frame' - { - Name = 'ChatRenderFrame'; - Size = UDim2.new(1.02, 0, 1.01, 0); - Position = UDim2.new(0, 0, 0, 0); - BackgroundTransparency = 1.0; - --ClipsDescendants = true; - ZIndex = 0.0; - Active = false; - - }; - }; - - Spawn(function() - wait(0.5) - if IsPhone() then - self.Frame.Size = UDim2.new(0, 280, 0, 120) - end - end) - - self.RenderFrame = self.Frame.ChatRenderFrame - if Chat:IsTouchDevice() then - self.Frame.Position = self.Configuration.Position; - self.RenderFrame.Size = UDim2.new(1, 0, 1, 0) - elseif self.Frame.AbsoluteSize.Y > 120 then - Chat:ScreenSizeChanged() - self.Gui.Changed:connect(function(property) - if property == 'AbsoluteSize' then - Chat:ScreenSizeChanged() - end - end) - end - - if forceChatGUI or Player.ChatMode == Enum.ChatMode.TextAndMenu then - if Chat:IsTouchDevice() then - Chat:CreateTouchButton() - else - Chat:CreateChatBar() - --Chat:CreateSafeChatGui() - end - - if self.ChatBar then - self.ChatBar.FocusLost:connect(function(enterPressed) - Chat.GotFocus = false - if Chat:IsTouchDevice() then - self.ChatBar.Visible = false - self.TapToChatLabel.Visible = true - - if self.TouchLabelBackground then - self.TouchLabelBackground.Visible = true - end - end - if enterPressed and self.ChatBar.Text ~= "" then - - if tick() - Chat.PreviousMessage > Chat.Configuration.HaltTime then -- Make sure that the user isn't deliberately spamming the chat - Chat.PreviousMessage = tick() - local cText = self.ChatBar.Text - if string.sub(self.ChatBar.Text, 1, 1) == '%' then - cText = '(TEAM) ' .. string.sub(cText, 2, #cText) - pcall(function() PlayersService:TeamChat(cText) end) - else - pcall(function() PlayersService:Chat(cText) end) - end - - if self.ClickToChatButton then - self.ClickToChatButton.Visible = true - end - self.ChatBar.Text = "" - end - end - Spawn(function() - wait(5.0) - if not Chat.GotFocus then - Chat.Frame.Background.Visible = false - end - end) - end) - - -- Make the escape key clear the chat box (like it used to) - inputService.InputBegan:connect(function(input) - if (input.KeyCode == Enum.KeyCode.Escape) then - if self.ClickToChatButton then - self.ClickToChatButton.Visible = true - end - - self.ChatBar.Text = "" - end - end) - end - end -end - --- Scrolling function --- Applies a speed(velocity) to have nice scrolling effect -function Input:OnMouseScroll() - Spawn(function() - -- How long should the speed last? - while Input.Speed ~=0 do - if Input.Speed > 1 then - while Input.Speed > 0 do - Input.Speed = Input.Speed - 1 - wait(0.25) - end - elseif Input.Speed < 0 then - while Input.Speed < 0 do - Input.Speed = Input.Speed + 1 - wait(0.25) - end - end - wait(0.03) - end - end) - if Chat:CheckIfInBounds(Input.Speed) then - return - end - Chat:ScrollQueue() -end - -function Input:ApplySpeed(value) - Input.Speed = Input.Speed + value - if not self.Simulating then - Input:OnMouseScroll() - end -end - -function Input:Initialize() - self.Mouse.WheelBackward:connect(function() - Input:ApplySpeed(self.Configuration.DefaultSpeed) - end) - - self.Mouse.WheelForward:connect(function() - Input:ApplySpeed(self.Configuration.DefaultSpeed) - end) -end - -function Chat:FindMessageInSafeChat(message, list) - local foundMessage = false - for msg, _ in pairs(list) do - if msg == message then - return true - end - if type(list[msg]) == 'table' then - foundMessage = Chat:FindMessageInSafeChat(message, list[msg]) - if foundMessage then - return true - end - end - end - return foundMessage -end - --- Just a wrapper around our PlayerChatted event -function Chat:PlayerChatted(...) - local args = {...} - local argCount = select('#', ...) - local player - local message - -- This doesn't look very good, but what else to do? - if args[2] then - player = args[2] - end - if args[3] then - message = args[3] - if string.sub(message, 1, 1) == '%' then - message = '(TEAM) ' .. string.sub(message, 2, #message) - end - end - - if PlayersService.ClassicChat then - if string.sub(message, 1, 3) == '/e ' or string.sub(message, 1, 7) == '/emote ' then - -- don't do anything right now - elseif forceChatGUI or Player.ChatMode == Enum.ChatMode.TextAndMenu then - Chat:UpdateChat(player, message) - elseif Player.ChatMode == Enum.ChatMode.Menu and string.sub(message, 1, 3) == '/sc' then - Chat:UpdateChat(player, message) - else - if Chat:FindMessageInSafeChat(message, self.SafeChat_List) then - Chat:UpdateChat(player, message) - end - end - end -end - --- After Chat.Configuration.Lifetime seconds of existence, the labels become invisible --- Runs only every 5 seconds and has to loop through 50 values --- Shouldn't be too expensive -function Chat:CullThread() - while true do - if #self.MessageQueue > 0 then - for _, field in pairs(self.MessageQueue) do - if field['SpawnTime'] and field['Player'] and field['Message'] and tick() - field['SpawnTime'] > self.Configuration.LifeTime then - field['Player'].Visible = false - field['Message'].Visible = false - end - end - end - wait(5.0) - end -end - --- RobloxLock everything so users can't delete them(?) -function Chat:LockAllFields(gui) - local children = gui:GetChildren() - for i = 1, #children do - children[i].RobloxLocked = true - if #children[i]:GetChildren() > 0 then - Chat:LockAllFields(children[i]) - end - end -end - -function Chat:CoreGuiChanged(coreGuiType,enabled) - if coreGuiType == Enum.CoreGuiType.Chat or coreGuiType == Enum.CoreGuiType.All then - if self.Frame then self.Frame.Visible = enabled end - if self.TapToChatLabel then self.TapToChatLabel.Visible = enabled end - - if not Chat:IsTouchDevice() and self.ChatBar then - self.ChatBar.Visible = enabled - if enabled then - GuiService:SetGlobalGuiInset(0, 0, 0, 20) - else - GuiService:SetGlobalGuiInset(0, 0, 0, 0) - end - end - end -end - --- Constructor --- This function initializes everything -function Chat:Initialize() - - Chat:CreateGui() - - pcall(function() - Chat:CoreGuiChanged(Enum.CoreGuiType.Chat, Game.StarterGui:GetCoreGuiEnabled(Enum.CoreGuiType.Chat)) - Game.StarterGui.CoreGuiChangedSignal:connect(function(coreGuiType,enabled) Chat:CoreGuiChanged(coreGuiType,enabled) end) - end) - - self.EventListener = PlayersService.PlayerChatted:connect(function(...) - -- This event has 4 callback arguments - -- Enum.PlayerChatType.All, chatPlayer, message, targetPlayer - Chat:PlayerChatted(...) - - end) - - self.MessageThread = coroutine.create(function() end) - coroutine.resume(self.MessageThread) - - -- Initialize input for us - Input:Initialize() - -- Eww, everytime a player is added, you have to redo the connection - -- Seems this is not automatic - -- NOTE: PlayerAdded only fires on the server, hence ChildAdded is used here - PlayersService.ChildAdded:connect(function() - Chat.EventListener:disconnect() - self.EventListener = PlayersService.PlayerChatted:connect(function(...) - -- This event has 4 callback arguments - -- Enum.PlayerChatType.All, chatPlayer, message, targetPlayer - Chat:PlayerChatted(...) - end) - end) - - Spawn(function() - Chat:CullThread() - end) - - self.Frame.RobloxLocked = true - Chat:LockAllFields(self.Frame) - self.Frame.DescendantAdded:connect(function(descendant) - Chat:LockAllFields(descendant) - end) -end - -Chat:Initialize() diff --git a/assets/ugc/865 b/assets/ugc/865 deleted file mode 100644 index 9709474..0000000 --- a/assets/ugc/865 +++ /dev/null @@ -1,1272 +0,0 @@ ---rbxassetid%865% --- this script creates the gui and sends the web requests for in game purchase prompts - --- wait for important items to appear -while not Game do - wait(0.1) -end -while not game:GetService("MarketplaceService") do - wait(0.1) -end -while not game:FindFirstChild("CoreGui") do - wait(0.1) -end -while not game.CoreGui:FindFirstChild("RobloxGui") do - wait(0.1) -end - --------------------------------- Global Variables ---------------------------------------- --- utility variables -local RbxUtility = nil -local baseUrl = game:GetService("ContentProvider").BaseUrl:lower() -baseUrl = string.gsub(baseUrl,"/m.","/www.") --mobile site does not work for this stuff! - -local doNativePurchasing = true - --- data variables -local currentProductInfo, currentAssetId, currentCurrencyType, currentCurrencyAmount, currentEquipOnPurchase, currentProductId, currentServerResponseTable, thirdPartyProductName -local checkingPlayerFunds = false -local purchasingConsumable = false - --- gui variables -local currentlyPrompting = false -local currentlyPurchasing = false -local purchaseDialog, errorDialog = nil -local tweenTime = 0.3 -local showPosition = UDim2.new(0.5,-217,0.5,-146) -local hidePosition = UDim2.new(0.5,-217,1,25) -local isSmallScreen = nil -local spinning = false -local spinnerIcons = nil -local smallScreenThreshold = 450 -local renderSteppedConnection = nil - --- user facing images -local assetUrls = {} -local assetUrl = "http://www.mete0r.xyz/Asset/?id=" -local errorImageUrl = assetUrl .. "42557901" table.insert(assetUrls, errorImageUrl) -local buyImageUrl = assetUrl .. "142494143" table.insert(assetUrls,buyImageUrl) -local cancelButtonImageUrl = assetUrl .. "142494219" table.insert(assetUrls, cancelButtonImageUrl) -local freeButtonImageDownUrl = assetUrl .. "104651761" table.insert(assetUrls, freeButtonImageDownUrl) -local loadingImage = assetUrl .. "143116791" table.insert(assetUrls,loadingImage) - --- user facing string -local buyHeaderText = "Buy Item" -local takeHeaderText = "Take Item" -local buyFailedHeaderText = "An Error Occurred" - -local errorPurchasesDisabledText = "In-game purchases are disabled" -local errorPurchasesBuyRobuxText = "your account does not have enough Robux" -local errorPurchasesUnknownText = "Roblox is performing maintenance" - -local purchaseSucceededText = "Your purchase of itemName succeeded!" -local purchaseFailedText = "Your purchase of itemName failed because errorReason. Your account has not been charged. Please try again soon." -local productPurchaseText = "Would you like to buy the itemName assetType for currencyTypecurrencyAmount?" -local productPurchaseTixOnlyText = "Would you like to buy the itemName assetType for currencyAmount currencyType?" -local freeItemPurchaseText = "Would you like to take the assetType itemName for FREE?" -local freeItemBalanceText = "Your balance of Robux or Tix will not be affected by this transaction." -local upgradeBCText = "You require an upgrade to your Builders Club membership to purchase this item. Click 'Buy Builders Club' to upgrade." -local productPurchaseWithMoreRobuxText = "Buy robuxToBuyAmount$R to get itemName assetType." -local productPurchaseWithMoreRobuxRemainderText = "The remaining purchaseRemainder$R will be credited to your ROBUX balance." -local balanceFutureTenseText = "Your balance after this transaction will be " -local balanceCurrentTenseText = "Your balance is now " - --- robux product arrays -local bcRobuxProducts = {90, 180, 270, 360, 450, 1000, 2750} -local nonBcRobuxProducts = {80, 160, 240, 320, 400, 800, 2000} --------------------------------- End Global Variables ---------------------------------------- - - ------------------------------ Util Functions --------------------------------------------- -function getSecureApiBaseUrl() - local secureApiUrl = baseUrl - secureApiUrl = string.gsub(secureApiUrl,"http","https") - secureApiUrl = string.gsub(secureApiUrl,"www","api") - return secureApiUrl -end - -function getRbxUtility() - if not RbxUtility then - RbxUtility = LoadLibrary("RbxUtility") - end - return RbxUtility -end - -function preloadAssets() - for i = 1, #assetUrls do - game:GetService("ContentProvider"):Preload(assetUrls[i]) - end -end ------------------------------ End Util Functions --------------------------------------------- - - --------------------------------- Accept/Decline Functions -------------------------------------- -function removeCurrentPurchaseInfo() - currentAssetId = nil - currentCurrencyType = nil - currentCurrencyAmount = nil - currentEquipOnPurchase = nil - currentProductId = nil - currentProductInfo = nil - currentServerResponseTable = nil - - checkingPlayerFunds = false -end - -function userPurchaseActionsEnded(isSuccess) - checkingPlayerFunds = false - - purchaseDialog.BodyFrame.AfterBalanceText.Visible = false - - if isSuccess then -- show the user we bought the item successfully, when they close this dialog we will call signalPromptEnded - local newPurchasedSucceededText = string.gsub( purchaseSucceededText,"itemName", tostring(currentProductInfo["Name"])) - purchaseDialog.BodyFrame.ItemDescription.Text = newPurchasedSucceededText - - local playerBalance = getPlayerBalance() - local keyWord = "robux" - if currentCurrencyType == Enum.CurrencyType.Tix then - keyWord = "tickets" - end - - local afterBalanceNumber = playerBalance[keyWord] - purchaseDialog.BodyFrame.AfterBalanceText.Text = tostring(balanceCurrentTenseText) .. currencyTypeToString(currentCurrencyType) .. tostring(afterBalanceNumber) .. "." - purchaseDialog.BodyFrame.AfterBalanceText.Visible = true - - setButtonsVisible(purchaseDialog.BodyFrame.OkPurchasedButton) - hidePurchasing() - else -- otherwise we didn't purchase, no need to show anything, just signal and close dialog - signalPromptEnded(isSuccess) - end -end - -function signalPromptEnded(isSuccess) - closePurchasePrompt() - if purchasingConsumable then - game:GetService("MarketplaceService"):SignalPromptProductPurchaseFinished(game.Players.LocalPlayer.userId, currentProductId, isSuccess) - else - game:GetService("MarketplaceService"):SignalPromptPurchaseFinished(game.Players.LocalPlayer, currentAssetId, isSuccess) - end - removeCurrentPurchaseInfo() -end - -function getClosestRobuxProduct(amountNeededToBuy, robuxProductArray) - local closest = robuxProductArray[1]; - local closestIndex = 1 - - for i = 1, #robuxProductArray do - if ( math.abs(robuxProductArray[i] - amountNeededToBuy) < math.abs(closest - amountNeededToBuy) ) then - closest = robuxProductArray[i] - closestIndex = i - end - end - - if closest < amountNeededToBuy then - closest = robuxProductArray[1 + closestIndex] - end - - return closest -end - ---todo: get productIds from server instead of embedding values -function getMinimumProductNeededForPurchase(amountNeededToBuy) - local isBcMember = (Game.Players.LocalPlayer.MembershipType ~= Enum.MembershipType.None) - local productAmount = nil - - if isBcMember then - productAmount = getClosestRobuxProduct(amountNeededToBuy, bcRobuxProducts) - else - productAmount = getClosestRobuxProduct(amountNeededToBuy, nonBcRobuxProducts) - end - - local isAndroid = false - pcall(function() isAndroid = (Game:GetService("UserInputService"):GetPlatform() == Enum.Platform.Android) end) - - local prependString = "" - local appendString = "" - local appPrefix = "" - - if isAndroid then - prependString = "robux" - if isBcMember then - appendString = "bc" - end - appPrefix = "com.roblox.client." - else - if isBcMember then - appendString = "RobuxBC" - else - appendString = "RobuxNonBC" - end - - appPrefix = "com.roblox.robloxmobile." - end - - local productString = appPrefix .. prependString .. tostring(productAmount) .. appendString - - return productAmount, productString -end - -function getClosestRobuxProductToBuyItem(productAmount, playerBalanceInRobux) - local amountNeededToBuy = productAmount - playerBalanceInRobux - local amountToBuy, productName = getMinimumProductNeededForPurchase(amountNeededToBuy) - local remainderAfterPurchase = amountToBuy - productAmount - - return amountToBuy, remainderAfterPurchase, productName -end - -function canUseNewRobuxToProductFlow() - return (Game:GetService("UserInputService").TouchEnabled and doNativePurchasing) -end - --- make sure our gui displays the proper purchase data, and set the productid we will try and buy if use specifies a buy action -function updatePurchasePromptData(insufficientFunds) - local newItemDescription = "" - - -- id to use when we request a purchase - if not currentProductId then - currentProductId = currentProductInfo["ProductId"] - end - - if isFreeItem() then - newItemDescription = string.gsub( freeItemPurchaseText,"itemName", tostring(currentProductInfo["Name"])) - newItemDescription = string.gsub( newItemDescription,"assetType", tostring(assetTypeToString(currentProductInfo["AssetTypeId"])) ) - setHeaderText(takeHeaderText) - elseif insufficientFunds and canUseNewRobuxToProductFlow() then - local purchaseText = productPurchaseWithMoreRobuxText - - local playerBalance = getPlayerBalance() - if not playerBalance then - newItemDescription = "Could not retrieve your balance. Please try again later." - elseif canUseNewRobuxToProductFlow() then - local amountToBuy, remainderAfterPurchase, productName = getClosestRobuxProductToBuyItem(currentCurrencyAmount, playerBalance["robux"]) - thirdPartyProductName = productName - - newItemDescription = string.gsub( purchaseText,"itemName", tostring(currentProductInfo["Name"])) - newItemDescription = string.gsub( newItemDescription,"assetType", tostring(assetTypeToString(currentProductInfo["AssetTypeId"])) ) - newItemDescription = string.gsub( newItemDescription,"robuxToBuyAmount", tostring(amountToBuy)) - - if remainderAfterPurchase > 0 then - newItemDescription = newItemDescription .. " " .. string.gsub( productPurchaseWithMoreRobuxRemainderText,"purchaseRemainder", tostring(remainderAfterPurchase)) - end - end - setHeaderText(buyHeaderText) - else - local purchaseText = productPurchaseText - if currentProductIsTixOnly() then - purchaseText = productPurchaseTixOnlyText - end - - newItemDescription = string.gsub( purchaseText,"itemName", tostring(currentProductInfo["Name"])) - newItemDescription = string.gsub( newItemDescription,"assetType", tostring(assetTypeToString(currentProductInfo["AssetTypeId"])) ) - newItemDescription = string.gsub( newItemDescription,"currencyType", tostring(currencyTypeToString(currentCurrencyType)) ) - newItemDescription = string.gsub( newItemDescription,"currencyAmount", tostring(currentCurrencyAmount)) - setHeaderText(buyHeaderText) - end - - purchaseDialog.BodyFrame.ItemDescription.Text = newItemDescription - - if purchasingConsumable then - purchaseDialog.BodyFrame.ItemPreview.Image = baseUrl .. "thumbs/asset.ashx?assetid=" .. tostring(currentProductInfo["IconImageAssetId"]) .. '&x=100&y=100&format=png' - else - purchaseDialog.BodyFrame.ItemPreview.Image = baseUrl .. "thumbs/asset.ashx?assetid=" .. tostring(currentAssetId) .. '&x=100&y=100&format=png' - end -end - -function checkIfCanPurchase() - if checkingPlayerFunds then - local canPurchase, insufficientFunds, notRightBC = canPurchaseItem() -- check again to see if we can buy item - if not canPurchase or (insufficientFunds or notRightBC) then -- wait a bit and try a few more times - local retries = 20 - while retries > 0 and (insufficientFunds or notRightBC) and checkingPlayerFunds and canPurchase do - wait(0.5) - canPurchase, insufficientFunds, notRightBC = canPurchaseItem() - retries = retries - 1 - end - end - if canPurchase and not insufficientFunds then - -- we can buy item! set our buttons up and we will exit this loop - setButtonsVisible(purchaseDialog.BodyFrame.BuyButton,purchaseDialog.BodyFrame.CancelButton, purchaseDialog.BodyFrame.AfterBalanceText) - end - end -end - -function closePurchasePrompt() - purchaseDialog:TweenPosition(hidePosition, Enum.EasingDirection.Out, Enum.EasingStyle.Quad, tweenTime, true, function() - game.GuiService:RemoveCenterDialog(purchaseDialog) - hidePurchasing() - - purchaseDialog.Visible = false - currentlyPrompting = false - currentlyPurchasing = false - - Game:GetService("UserInputService").ModalEnabled = false - end) -end - -function showPurchasePrompt() - local canPurchase, insufficientFunds, notRightBC, override, descText = canPurchaseItem() - - if canPurchase then - updatePurchasePromptData(insufficientFunds) - - if override and descText then - purchaseDialog.BodyFrame.ItemDescription.Text = descText - purchaseDialog.BodyFrame.AfterBalanceText.Visible = false - end - game.GuiService:AddCenterDialog(purchaseDialog, Enum.CenterDialogType.ModalDialog, - --ShowFunction - function() - -- set the state for our buttons - purchaseDialog.Visible = true - - if not currentlyPurchasing then - if isFreeItem() then - setButtonsVisible(purchaseDialog.BodyFrame.FreeButton, purchaseDialog.BodyFrame.CancelButton) - elseif notRightBC then - setButtonsVisible(purchaseDialog.BodyFrame.BuyBCButton, purchaseDialog.BodyFrame.CancelButton) - elseif insufficientFunds then - setButtonsVisible(purchaseDialog.BodyFrame.BuyRobuxButton, purchaseDialog.BodyFrame.CancelButton) - elseif override then - if currentProductIsTixOnly() then - purchaseDialog.BodyFrame.AfterBalanceText.Visible = true - end - setButtonsVisible(purchaseDialog.BodyFrame.BuyDisabledButton, purchaseDialog.BodyFrame.CancelButton) - else - setButtonsVisible(purchaseDialog.BodyFrame.BuyButton, purchaseDialog.BodyFrame.CancelButton) - end - end - - Game:GetService("UserInputService").ModalEnabled = true - - purchaseDialog:TweenPosition(showPosition, Enum.EasingDirection.Out, Enum.EasingStyle.Quad, tweenTime, true) - end, - --HideFunction - function() - Game:GetService("UserInputService").ModalEnabled = false - purchaseDialog.Visible = false - end) - else -- we failed in prompting a purchase, do a decline - doDeclinePurchase() - end -end - --- given an asset id, this function will grab that asset from the website, and return the first "Tool" object found inside it -function getToolAssetID(assetID) - local newTool = game:GetService("InsertService"):LoadAsset(assetID) - if not newTool then return nil end - - if newTool:IsA("Tool") then - return newTool - end - - local toolChildren = newTool:GetChildren() - for i = 1, #toolChildren do - if toolChildren[i]:IsA("Tool") then - return toolChildren[i] - end - end - return nil -end - --- the user tried to purchase by clicking the purchase button, but something went wrong. --- let them know their account was not charged, and that they do not own the item yet. -function purchaseFailed(errorType) - local name = "Item" - if currentProductInfo then name = currentProductInfo["Name"] end - - local newPurchasedFailedText = string.gsub( purchaseFailedText,"itemName", tostring(name)) - - if errorType == "inGamePurchasesDisabled" then - newPurchasedFailedText = string.gsub( newPurchasedFailedText,"errorReason", tostring(errorPurchasesDisabledText) ) - elseif errorType == "didNotBuyRobux" then - newPurchasedFailedText = string.gsub( newPurchasedFailedText,"errorReason", tostring(errorPurchasesBuyRobuxText) ) - else - newPurchasedFailedText = string.gsub( newPurchasedFailedText,"errorReason", tostring(errorPurchasesUnknownText) ) - end - - purchaseDialog.BodyFrame.ItemDescription.Text = newPurchasedFailedText - purchaseDialog.BodyFrame.ItemPreview.Image = errorImageUrl - purchaseDialog.BodyFrame.AfterBalanceText.Text = "" - - setButtonsVisible(purchaseDialog.BodyFrame.OkButton) - - setHeaderText(buyFailedHeaderText) - - hidePurchasing() -end - --- user has specified they want to buy an item, now try to attempt to buy it for them -function doAcceptPurchase(currencyPreferredByUser) - if currentlyPurchasing then return end - currentlyPurchasing = true - - showPurchasing() -- shows a purchasing ui (shows spinner) - - local startTime = tick() - - -- http call to do the purchase - local response = "none" - local url = nil - - -- consumables need to use a different url - if purchasingConsumable then - url = getSecureApiBaseUrl() .. "marketplace/submitpurchase?productId=" .. tostring(currentProductId) .. - "¤cyTypeId=" .. tostring(currencyEnumToInt(currentCurrencyType)) .. - "&expectedUnitPrice=" .. tostring(currentCurrencyAmount) .. - "&placeId=" .. tostring(Game.PlaceId) - local flagExists, flagValue = pcall(function() settings():GetFFlag("AddRequestIdToDeveloperProductPurchases") end) - if flagExists and flagValue then - local h = game:GetService("HttpService") - url = url .. "&requestId=" .. h:UrlEncode(h:GenerateGUID()) - end - else - url = getSecureApiBaseUrl() .. "marketplace/purchase?productId=" .. tostring(currentProductId) .. - "¤cyTypeId=" .. tostring(currencyEnumToInt(currentCurrencyType)) .. - "&purchasePrice=" .. tostring(currentCurrencyAmount) .. - "&locationType=Game" .. "&locationId=" .. Game.PlaceId - end - - local success, reason = ypcall(function() - response = game:HttpPostAsync(url, "RobloxPurchaseRequest") - end) - - -- debug output for us (found in the logs from local) - print("doAcceptPurchase success from ypcall is ",success,"reason is",reason) - - if (tick() - startTime) < 1 then - wait(1) -- allow the purchasing waiting dialog to at least be readable (otherwise it might flash, looks bad)... - end - - -- check to make sure purchase actually happened on the web end - if response == "none" or response == nil or response == '' then - print("did not get a proper response from web on purchase of",currentAssetId,currentProductId) - purchaseFailed() - return - end - - -- parse our response, decide how to react - response = getRbxUtility().DecodeJSON(response) - - if response then - if response["success"] == false then - if response["status"] ~= "AlreadyOwned" then - print("web return response of fail on purchase of",currentAssetId,currentProductId) - if (response["status"] == "EconomyDisabled") then - purchaseFailed("inGamePurchasesDisabled") - else - purchaseFailed() - end - return - end - end - else - print("web return response of non parsable JSON on purchase of",currentAssetId) - purchaseFailed() - return - end - - -- check to see if this item was bought, and if we want to equip it (also need to make sure the asset type was gear) - if currentEquipOnPurchase and success and currentAssetId and tonumber(currentProductInfo["AssetTypeId"]) == 19 then - local tool = getToolAssetID(tonumber(currentAssetId)) - if tool then - tool.Parent = game.Players.LocalPlayer.Backpack - end - end - - if purchasingConsumable then - if not response["receipt"] then - print("tried to buy productId, but no receipt returned. productId was",currentProductId) - purchaseFailed() - return - end - Game:GetService("MarketplaceService"):SignalClientPurchaseSuccess( tostring(response["receipt"]), game.Players.LocalPlayer.userId, currentProductId ) - else - userPurchaseActionsEnded(success) - end -end - --- user pressed the cancel button, just remove all purchasing prompts -function doDeclinePurchase() - if currentlyPurchasing then return end - userPurchaseActionsEnded(false) -end --------------------------------- End Accept/Decline Functions -------------------------------------- - - ----------------------------------------------- Currency Functions --------------------------------------------- --- enums have no implicit conversion to numbers in lua, has to have a function to do this -function currencyEnumToInt(currencyEnum) - if currencyEnum == Enum.CurrencyType.Robux or currencyEnum == Enum.CurrencyType.Default then - return 1 - elseif currencyEnum == Enum.CurrencyType.Tix then - return 2 - end -end - --- oi, this isn't so ugly anymore -function assetTypeToString(assetType) - local assetTypes = { - [1] = "Image"; - [2] = "T-Shirt"; - [3] = "Audio"; - [4] = "Mesh"; - [5] = "Lua"; - [6] = "HTML"; - [7] = "Text"; - [8] = "Hat"; - [9] = "Place"; - [10] = "Model"; - [11] = "Shirt"; - [12] = "Pants"; - [13] = "Decal"; - [16] = "Avatar"; - [17] = "Head"; - [18] = "Face"; - [19] = "Gear"; - [21] = "Badge"; - [22] = "Group Emblem"; - [24] = "Animation"; - [25] = "Arms"; - [26] = "Legs"; - [27] = "Torso"; - [28] = "Right Arm"; - [29] = "Left Arm"; - [30] = "Left Leg"; - [31] = "Right Leg"; - [32] = "Package"; - [33] = "YouTube Video"; - [34] = "Game Pass"; - [0] = "Product"; - } - return assetTypes[assetType] or "" -end - -function currencyTypeToString(currencyType) - if currencyType == Enum.CurrencyType.Tix then - return "Tix" - else - return "R$" - end -end - --- figure out what currency to use based on the currency you can actually sell the item in and what the script specified -function setCurrencyAmountAndType(priceInRobux, priceInTix) - if currentCurrencyType == Enum.CurrencyType.Default or currentCurrencyType == Enum.CurrencyType.Robux then -- sell for default (user doesn't care) or robux - if priceInRobux ~= nil and priceInRobux ~= 0 then -- we can sell for robux - currentCurrencyAmount = priceInRobux - currentCurrencyType = Enum.CurrencyType.Robux - else -- have to use tix - currentCurrencyAmount = priceInTix - currentCurrencyType = Enum.CurrencyType.Tix - end - elseif currentCurrencyType == Enum.CurrencyType.Tix then -- we want to sell for tix - if priceInTix ~= nil and priceInTix ~= 0 then -- we can sell for tix - currentCurrencyAmount = priceInTix - currentCurrencyType = Enum.CurrencyType.Tix - else -- have to use robux - currentCurrencyAmount = priceInRobux - currentCurrencyType = Enum.CurrencyType.Robux - end - else - return false - end - - if currentCurrencyAmount == nil then - return false - end - - return true -end - --- will get the player's balance of robux and tix, return in a table -function getPlayerBalance() - local playerBalance = nil - local success, errorCode = ypcall(function() playerBalance = game:HttpGetAsync(getSecureApiBaseUrl() .. "currency/balance") end) - if not success then - print("Get player balance failed because",errorCode) - return nil - end - - if playerBalance == '' then - return nil - end - - playerBalance = getRbxUtility().DecodeJSON(playerBalance) - - return playerBalance -end - --- should open an external default browser window to this url -function openBuyCurrencyWindow() - checkingPlayerFunds = true - game:GetService("GuiService"):OpenBrowserWindow(baseUrl .. "Upgrades/Robux.aspx") -end - -function buyEnoughCurrencyForProduct() - showPurchasing() - Game.MarketplaceService:PromptNativePurchase(Game.Players.LocalPlayer, thirdPartyProductName) -end - -function openBCUpSellWindow() - checkingPlayerFunds = true - Game:GetService('GuiService'):OpenBrowserWindow(baseUrl .. "Upgrades/BuildersClubMemberships.aspx") -end - --- set up the gui text at the bottom of the prompt (alerts user to how much money they will have left, or if they need to buy more to buy the item) -function updateAfterBalanceText(playerBalance, notRightBc, balancePreText) - if isFreeItem() then - purchaseDialog.BodyFrame.AfterBalanceText.Text = freeItemBalanceText - return true, false - end - - local keyWord = nil - if currentCurrencyType == Enum.CurrencyType.Robux then - keyWord = "robux" - elseif currentCurrencyType == Enum.CurrencyType.Tix then - keyWord = "tickets" - end - - if not keyWord then - return false - end - - local playerBalanceNumber = tonumber(playerBalance[keyWord]) - if not playerBalanceNumber then - return false - end - - local afterBalanceNumber = playerBalanceNumber - currentCurrencyAmount - - -- check to see if we have enough of the desired currency to allow a purchase, if not we need to prompt user to buy robux - if not notRightBc then - if afterBalanceNumber < 0 and keyWord == "robux" then - purchaseDialog.BodyFrame.AfterBalanceText.Text = "" - return true, true - elseif afterBalanceNumber < 0 and keyWord == "tickets" then - purchaseDialog.BodyFrame.AfterBalanceText.Text = "You need " .. tostring(-afterBalanceNumber) .. " " .. currencyTypeToString(currentCurrencyType) .. " more to buy this item." - return true, true -- user can't buy more tickets, so we say fail the transaction (maybe instead we can prompt them to trade currency???) - end - else - purchaseDialog.BodyFrame.AfterBalanceText.Text = upgradeBCText - return true, false - end - - if currentProductIsTixOnly() then - purchaseDialog.BodyFrame.AfterBalanceText.Text = tostring(balancePreText) .. tostring(afterBalanceNumber) .. " " .. currencyTypeToString(currentCurrencyType) .. "." - else - purchaseDialog.BodyFrame.AfterBalanceText.Text = tostring(balancePreText) .. currencyTypeToString(currentCurrencyType) .. tostring(afterBalanceNumber) .. "." - end - purchaseDialog.BodyFrame.AfterBalanceText.Visible = true - return true, false -end - -function isFreeItem() - -- if both of these are true, then the item is free, just prompt user if they want to take one - return currentProductInfo and currentProductInfo["IsForSale"] == true and currentProductInfo["IsPublicDomain"] == true -end ----------------------------------------------- End Currency Functions --------------------------------------------- - - ----------------------------------------------- Data Functions ----------------------------------------------------- - --- more enum to int fun! -function membershipTypeToNumber(membership) - if membership == Enum.MembershipType.None then - return 0 - elseif membership == Enum.MembershipType.BuildersClub then - return 1 - elseif membership == Enum.MembershipType.TurboBuildersClub then - return 2 - elseif membership == Enum.MembershipType.OutrageousBuildersClub then - return 3 - end - - return -1 -end - -function currentProductIsTixOnly() - local priceInRobux = currentProductInfo["PriceInRobux"] - local priceInTix = currentProductInfo["PriceInTickets"] - - if priceInRobux == nil then return true end - priceInRobux = tonumber(priceInRobux) - if priceInRobux == nil then return true end - - if priceInTix == nil then return false end - priceInTix = tonumber(priceInTix) - if priceInTix == nil then return false end - - return (priceInRobux <= 0 and priceInTix > 0) -end - --- This functions checks to make sure the purchase is even possible, if not it returns false and we don't prompt user (some situations require user feedback when we won't prompt) -function canPurchaseItem() - - -- first we see if player already owns the asset/get the productinfo - local playerOwnsAsset = false - local notRightBc = false - local descText = nil - - if purchasingConsumable then - currentProductInfo = game:GetService("MarketplaceService"):GetProductInfo(currentProductId, Enum.InfoType.Product) - else - currentProductInfo = game:GetService("MarketplaceService"):GetProductInfo(currentAssetId) - end - - if currentProductInfo == nil then - descText = "In-game sales are temporarily disabled. Please try again later." - return true, nil, nil, true, descText - end - - if not purchasingConsumable then - if not currentAssetId then - return false - end - if currentAssetId <= 0 then - return false - end - - local success, errorCode = ypcall(function() playerOwnsAsset = game:HttpGetAsync(getSecureApiBaseUrl() - .. "ownership/hasAsset?userId=" - .. tostring(game.Players.LocalPlayer.userId) - .. "&assetId=" .. tostring(currentAssetId)) - end) - - if not success then - return false - end - - if playerOwnsAsset == true or playerOwnsAsset == "true" then - descText = "You already own this item." - return true, nil, nil, true, descText - end - end - - -- For public models, as there is still the freeButton, indicating it should be - -- available, while this function (canPurchaseItem) doesn't count on free stuff - if isFreeItem() then - return true - end - - purchaseDialog.BodyFrame.AfterBalanceText.Visible = true - - -- next we parse through product info and see if we can purchase - - if type(currentProductInfo) ~= "table" then - currentProductInfo = getRbxUtility().DecodeJSON(currentProductInfo) - end - - if not currentProductInfo then - descText = "Could not get product info. Please try again later." - return true, nil, nil, true, descText - end - - if currentProductInfo["IsForSale"] == false and currentProductInfo["IsPublicDomain"] == false then - descText = "This item is no longer for sale." - return true, nil, nil, true, descText - end - - -- now we start talking money, making sure we are going to be able to purchase this - if not setCurrencyAmountAndType(tonumber(currentProductInfo["PriceInRobux"]), tonumber(currentProductInfo["PriceInTickets"])) then - descText = "We couldn't retrieve the price of the item correctly. Please try again later." - return true, nil, nil, true, descText - end - - local playerBalance = getPlayerBalance() - if not playerBalance then - descText = "Could not retrieve your balance. Please try again later." - return true, nil, nil, true, descText - end - - if tonumber(currentProductInfo["MinimumMembershipLevel"]) > membershipTypeToNumber(game.Players.LocalPlayer.MembershipType) then - notRightBc = true - end - - local updatedBalance, insufficientFunds = updateAfterBalanceText(playerBalance, notRightBc, balanceFutureTenseText) - - if notRightBc then - purchaseDialog.BodyFrame.AfterBalanceText.Active = true - return true, insufficientFunds, notRightBc, false - end - - if currentProductInfo["ContentRatingTypeId"] == 1 then - if game.Players.LocalPlayer:GetUnder13() then - descText = "Your account is under 13 so purchase of this item is not allowed." - return true, nil, nil, true, descText - end - end - - if (currentProductInfo["IsLimited"] == true or currentProductInfo["IsLimitedUnique"] == true) and - (currentProductInfo["Remaining"] == "" or currentProductInfo["Remaining"] == 0 or currentProductInfo["Remaining"] == nil) then - descText = "All copies of this item have been sold out! Try buying from other users on www.mete0r.xyz." - return true, nil, nil, true, descText - end - - if not updatedBalance then - descText = 'Could not update your balance. Please check back after some time.' - return true, nil, nil, true, descText - end - - if insufficientFunds then - -- if this is a ticket only time and we don't have enough, tell the user to get more tix - if currentProductIsTixOnly() then - descText = "This item costs more tickets than you currently have! Try trading currency on www.mete0r.xyz to get more tickets." - return true, nil, nil, true, descText - end - end - - -- we use insufficient funds to display a prompt to buy more robux - return true, insufficientFunds -end - ----------------------------------------------- End Data Functions ----------------------------------------------------- - - ----------------------------------------------- Gui Functions ---------------------------------------------- -function startSpinner() - if purchaseDialog.PurchasingFrame.Visible then return end - purchaseDialog.PurchasingFrame.Visible = true - - renderSteppedConnection = Game:GetService("RunService").RenderStepped:connect(function() - purchaseDialog.PurchasingFrame.PurchasingSpinnerOuter.Rotation = purchaseDialog.PurchasingFrame.PurchasingSpinnerOuter.Rotation + 7 - purchaseDialog.PurchasingFrame.PurchasingSpinnerInner.Rotation = purchaseDialog.PurchasingFrame.PurchasingSpinnerInner.Rotation - 9 - end) -end - -function stopSpinner() - if renderSteppedConnection then - renderSteppedConnection:disconnect() - renderSteppedConnection = nil - purchaseDialog.PurchasingFrame.Visible = false - end -end - --- next two functions control the "Purchasing..." overlay -function showPurchasing() - startSpinner() -end - -function hidePurchasing() - stopSpinner() -end - --- convenience method to say exactly what buttons should be visible (all others are not!) -function setButtonsVisible(...) - local args = {...} - local argCount = select('#', ...) - - local bodyFrameChildren = purchaseDialog.BodyFrame:GetChildren() - for i = 1, #bodyFrameChildren do - if bodyFrameChildren[i]:IsA("GuiButton") then - bodyFrameChildren[i].Visible = false - for j = 1, argCount do - if bodyFrameChildren[i] == args[j] then - bodyFrameChildren[i].Visible = true - break - end - end - end - end -end - --- all the gui init. Would be nice if this didn't have to be a script -function createPurchasePromptGui() - purchaseDialog = Instance.new("Frame") - purchaseDialog.Name = "PurchaseFrame" - purchaseDialog.Size = UDim2.new(0,435,0,292) - purchaseDialog.Position = hidePosition - purchaseDialog.Active = true - purchaseDialog.Visible = false - purchaseDialog.BackgroundColor3 = Color3.new(225/255,225/255,225/255) - purchaseDialog.BorderSizePixel = 0 - purchaseDialog.Parent = game.CoreGui.RobloxGui - - local bodyFrame = Instance.new("Frame") - bodyFrame.Name = "BodyFrame" - bodyFrame.Active = true - bodyFrame.Size = UDim2.new(1,-10,1,-55) - bodyFrame.Position = UDim2.new(0,5,0,50) - bodyFrame.BackgroundColor3 = Color3.new(1, 1, 1) - bodyFrame.BorderSizePixel = 0 - bodyFrame.ZIndex = 8 - bodyFrame.Parent = purchaseDialog - - local titleLabel = createTextObject("TitleLabel", "Buy Item", "TextLabel", Enum.FontSize.Size36) - titleLabel.Active = true - titleLabel.Font = Enum.Font.SourceSansBold - titleLabel.TextColor3 = Color3.new(54/255,54/255,54/255) - titleLabel.ZIndex = 8 - titleLabel.Size = UDim2.new(1,0,0,50) - titleLabel.Parent = purchaseDialog - - local distanceBetweenButtons = 20 - - local cancelButton = createImageButton("CancelButton") - cancelButton.Position = UDim2.new(0.5,(distanceBetweenButtons/2),1,-100) - cancelButton.BorderColor3 = Color3.new(86/255,86/255,86/255) - cancelButton.Parent = bodyFrame - cancelButton.Modal = true - cancelButton.ZIndex = 8 - cancelButton.Image = cancelButtonImageUrl - cancelButton.MouseButton1Up:connect(function( ) - cancelButton.Image = cancelButtonImageUrl - end) - cancelButton.MouseLeave:connect(function( ) - cancelButton.Image = cancelButtonImageUrl - end) - cancelButton.MouseButton1Click:connect(doDeclinePurchase) - - local cancelText = createTextObject("CancelText","Cancel","TextLabel",Enum.FontSize.Size24) - cancelText.TextColor3 = Color3.new(1,1,1) - cancelText.Size = UDim2.new(1,0,1,0) - cancelText.ZIndex = 8 - cancelText.Parent = cancelButton - - local cancelHoverFrame = Instance.new("Frame") - cancelHoverFrame.Name = "HoverFrame" - cancelHoverFrame.Size = UDim2.new(1,0,1,0) - cancelHoverFrame.BackgroundColor3 = Color3.new(1,1,1) - cancelHoverFrame.BackgroundTransparency = 0.7 - cancelHoverFrame.BorderSizePixel = 0 - cancelHoverFrame.Visible = false - cancelHoverFrame.ZIndex = 8 - cancelHoverFrame.Parent = cancelButton - cancelButton.MouseEnter:connect(function() - cancelHoverFrame.Visible = true - end) - cancelButton.MouseLeave:connect(function( ) - cancelHoverFrame.Visible = false - end) - cancelButton.MouseButton1Click:connect(function( ) - cancelHoverFrame.Visible = false - end) - - local buyButton = createImageButton("BuyButton") - buyButton.Position = UDim2.new(0.5,-117-(distanceBetweenButtons/2),1,-100) - buyButton.BorderColor3 = Color3.new(0,112/255,1/255) - buyButton.Image = buyImageUrl - buyButton.ZIndex = 8 - buyButton.Parent = bodyFrame - - local buyText = createTextObject("BuyText","Buy Now","TextLabel",Enum.FontSize.Size24) - buyText.ZIndex = 8 - buyText.TextColor3 = Color3.new(1,1,1) - buyText.Size = UDim2.new(1,0,1,0) - buyText.Parent = buyButton - - local buyHoverFrame = cancelHoverFrame:Clone() - buyButton.MouseEnter:connect(function() - buyHoverFrame.Visible = true - end) - buyButton.MouseLeave:connect(function( ) - buyHoverFrame.Visible = false - end) - buyButton.MouseButton1Click:connect(function( ) - buyHoverFrame.Visible = false - end) - buyHoverFrame.Parent = buyButton - - local buyDisabledButton = buyButton:Clone() - buyDisabledButton.Name = "BuyDisabledButton" - buyDisabledButton.AutoButtonColor = false - buyDisabledButton.Visible = false - buyDisabledButton.Active = false - buyDisabledButton.Parent = bodyFrame - - local buyRobux = buyButton:Clone() - buyRobux.Name = "BuyRobuxButton" - buyRobux.AutoButtonColor = false - buyRobux.Visible = false - buyRobux.ZIndex = 8 - - if canUseNewRobuxToProductFlow() then - buyRobux.BuyText.Text = "Buy" - else - buyRobux.BuyText.Text = "Buy R$" - end - - buyRobux.MouseEnter:connect(function() - buyRobux.HoverFrame.Visible = true - end) - buyRobux.MouseLeave:connect(function( ) - buyRobux.HoverFrame.Visible = false - end) - buyRobux.MouseButton1Click:connect(function( ) - buyRobux.HoverFrame.Visible = false - - if canUseNewRobuxToProductFlow() then - buyEnoughCurrencyForProduct() - else - openBuyCurrencyWindow() - end - end) - buyRobux.Parent = bodyFrame - - local buyBC = buyRobux:Clone() - buyBC.Name = "BuyBCButton" - buyBC.BuyText.Text = "Buy Builders Club" - buyBC.MouseEnter:connect(function() - buyBC.HoverFrame.Visible = true - end) - buyBC.MouseLeave:connect(function( ) - buyBC.HoverFrame.Visible = false - end) - buyBC.MouseButton1Click:connect(function( ) - buyBC.HoverFrame.Visible = false - openBCUpSellWindow() - end) - buyBC.Parent = bodyFrame - - local freeButton = buyButton:Clone() - freeButton.BuyText.Text = "Take Free" - freeButton.BackgroundTransparency = 1 - freeButton.Name = "FreeButton" - freeButton.Visible = false - freeButton.MouseEnter:connect(function() - freeButton.HoverFrame.Visible = true - end) - freeButton.MouseButton1Click:connect(function( ) - freeButton.HoverFrame.Visible = false - end) - freeButton.MouseLeave:connect(function( ) - freeButton.HoverFrame.Visible = false - end) - freeButton.Parent = bodyFrame - - local okButton = buyButton:Clone() - okButton.BuyText.Text = "Ok" - okButton.Name = "OkButton" - okButton.Visible = false - okButton.Position = UDim2.new(0.5,-okButton.Size.X.Offset/2,1,-100) - okButton.Modal = true - okButton.MouseEnter:connect(function() - okButton.HoverFrame.Visible = true - end) - okButton.MouseButton1Click:connect(function( ) - okButton.HoverFrame.Visible = false - signalPromptEnded(false) - end) - okButton.MouseLeave:connect(function( ) - okButton.HoverFrame.Visible = false - end) - okButton.Parent = bodyFrame - - local okPurchasedButton = okButton:Clone() - okPurchasedButton.Name = "OkPurchasedButton" - okPurchasedButton.MouseEnter:connect(function() - okPurchasedButton.HoverFrame.Visible = true - end) - okPurchasedButton.MouseLeave:connect(function( ) - okPurchasedButton.HoverFrame.Visible = false - end) - okPurchasedButton.MouseButton1Click:connect(function() - okPurchasedButton.HoverFrame.Visible = false - if purchasingConsumable then - userPurchaseProductActionsEnded(true) - else - signalPromptEnded(true) - end - end) - okPurchasedButton.Parent = bodyFrame - - buyButton.MouseButton1Click:connect(function() doAcceptPurchase(Enum.CurrencyType.Robux) end) - freeButton.MouseButton1Click:connect(function() doAcceptPurchase(false) end) - - local itemPreview = Instance.new("ImageLabel") - itemPreview.Name = "ItemPreview" - itemPreview.BackgroundTransparency = 1 - itemPreview.BorderSizePixel = 0 - itemPreview.Position = UDim2.new(0,20,0,20) - itemPreview.Size = UDim2.new(0,100,0,100) - itemPreview.ZIndex = 9 - itemPreview.Parent = bodyFrame - - local itemDescription = createTextObject("ItemDescription","","TextLabel",Enum.FontSize.Size18) - itemDescription.TextXAlignment = Enum.TextXAlignment.Left - itemDescription.Position = UDim2.new(0.5, -70, 0, 10) - itemDescription.Size = UDim2.new(0,245,0,115) - itemDescription.TextColor3 = Color3.new(54/255,54/255,54/255) - itemDescription.ZIndex = 8 - itemDescription.Parent = bodyFrame - - local afterBalanceText = createTextObject("AfterBalanceText","","TextLabel",Enum.FontSize.Size14) - afterBalanceText.BackgroundTransparency = 1 - afterBalanceText.TextColor3 = Color3.new(102/255,102/255,102/255) - afterBalanceText.Position = UDim2.new(0,5,1,-33) - afterBalanceText.Size = UDim2.new(1,-10,0,28) - afterBalanceText.ZIndex = 8 - afterBalanceText.Parent = bodyFrame - - local purchasingFrame = Instance.new("Frame") - purchasingFrame.Name = "PurchasingFrame" - purchasingFrame.Size = UDim2.new(1,0,1,0) - purchasingFrame.BackgroundColor3 = Color3.new(0,0,0) - purchasingFrame.BackgroundTransparency = 0.05 - purchasingFrame.BorderSizePixel = 0 - purchasingFrame.ZIndex = 9 - purchasingFrame.Visible = false - purchasingFrame.Active = true - purchasingFrame.Parent = purchaseDialog - - local purchasingLabel = createTextObject("PurchasingLabel","Purchasing","TextLabel",Enum.FontSize.Size48) - purchasingLabel.Size = UDim2.new(1,0,1,0) - purchasingLabel.Position = UDim2.new(0,0,0,-24) - purchasingLabel.ZIndex = 10 - purchasingLabel.Parent = purchasingFrame - - local purchasingSpinner = Instance.new("ImageLabel") - purchasingSpinner.Name = "PurchasingSpinnerOuter" - purchasingSpinner.Image = loadingImage - purchasingSpinner.BackgroundTransparency = 1 - purchasingSpinner.BorderSizePixel = 0 - purchasingSpinner.Size = UDim2.new(0,64,0,64) - purchasingSpinner.Position = UDim2.new(0.5,-32,0.5,32) - purchasingSpinner.ZIndex = 10 - purchasingSpinner.Parent = purchasingFrame - - local purchasingSpinnerInner = purchasingSpinner:Clone() - purchasingSpinnerInner.BackgroundTransparency = 1 - purchasingSpinnerInner.Name = "PurchasingSpinnerInner" - purchasingSpinnerInner.Size = UDim2.new(0,32,0,32) - purchasingSpinnerInner.Position = UDim2.new(0.5,-16,0.5,48) - purchasingSpinnerInner.Parent = purchasingFrame -end - --- next 2 functions are convenienvce creation functions for guis -function createTextObject(name, text, type, size) - local textLabel = Instance.new(type) - textLabel.Font = Enum.Font.SourceSans - textLabel.TextColor3 = Color3.new(217/255, 217/255, 217/255) - textLabel.TextWrapped = true - textLabel.Name = name - textLabel.Text = text - textLabel.BackgroundTransparency = 1 - textLabel.BorderSizePixel = 0 - textLabel.FontSize = size - - return textLabel -end - -function createImageButton(name) - local imageButton = Instance.new("ImageButton") - imageButton.Size = UDim2.new(0,117,0,60) - imageButton.Name = name - return imageButton -end - -function setHeaderText(text) - purchaseDialog.TitleLabel.Text = text -end - -function doPurchasePrompt(player, assetId, equipIfPurchased, currencyType, productId) - if not purchaseDialog then - createPurchasePromptGui() - end - - if player == game.Players.LocalPlayer then - if currentlyPrompting then return end - - currentlyPrompting = true - - currentAssetId = assetId - currentProductId = productId - currentCurrencyType = currencyType - currentEquipOnPurchase = equipIfPurchased - - purchasingConsumable = (currentProductId ~= nil) - - showPurchasePrompt() - end -end - -function userPurchaseProductActionsEnded(userIsClosingDialog) - checkingPlayerFunds = false - - if userIsClosingDialog then - closePurchasePrompt() - if currentServerResponseTable then - local isPurchased = false - if tostring(currentServerResponseTable["isValid"]):lower() == "true" then - isPurchased = true - end - - Game:GetService("MarketplaceService"):SignalPromptProductPurchaseFinished(tonumber(currentServerResponseTable["playerId"]), tonumber(currentServerResponseTable["productId"]), isPurchased) - end - removeCurrentPurchaseInfo() - else - if tostring(currentServerResponseTable["isValid"]):lower() == "true" then - local newPurchasedSucceededText = string.gsub( purchaseSucceededText,"itemName", tostring(currentProductInfo["Name"])) - purchaseDialog.BodyFrame.ItemDescription.Text = newPurchasedSucceededText - - local playerBalance = getPlayerBalance() - local keyWord = "robux" - if currentCurrencyType == Enum.CurrencyType.Tix then - keyWord = "tickets" - end - - local afterBalanceNumber = playerBalance[keyWord] - purchaseDialog.BodyFrame.AfterBalanceText.Text = tostring(balanceCurrentTenseText) .. currencyTypeToString(currentCurrencyType) .. tostring(afterBalanceNumber) .. "." - - setButtonsVisible(purchaseDialog.BodyFrame.OkPurchasedButton) - hidePurchasing() - else - purchaseFailed() - end - end -end - -function doProcessServerPurchaseResponse(serverResponseTable) - if not serverResponseTable then - purchaseFailed() - return - end - - if serverResponseTable["playerId"] and tonumber(serverResponseTable["playerId"]) == game.Players.LocalPlayer.userId then - currentServerResponseTable = serverResponseTable - userPurchaseProductActionsEnded(false) - end -end - ----------------------------------------------- End Gui Functions ---------------------------------------------- - - ----------------------------------------------- Script Event start/initialization ---------------------------------------------- -preloadAssets() - -game:GetService("MarketplaceService").PromptProductPurchaseRequested:connect(function(player, productId, equipIfPurchased, currencyType) - doPurchasePrompt(player, nil, equipIfPurchased, currencyType, productId) -end) - -Game:GetService("MarketplaceService").PromptPurchaseRequested:connect(function(player, assetId, equipIfPurchased, currencyType) - doPurchasePrompt(player, assetId, equipIfPurchased, currencyType, nil) -end) - -Game:GetService("MarketplaceService").ServerPurchaseVerification:connect(function(serverResponseTable) - doProcessServerPurchaseResponse(serverResponseTable) -end) - -Game:GetService("GuiService").BrowserWindowClosed:connect(checkIfCanPurchase) - -if not canUseNewRobuxToProductFlow() then return end - -Game.MarketplaceService.NativePurchaseFinished:connect(function(player, productId, wasPurchased) - if wasPurchased then - - -- try for 20 seconds to see if we get the funds if we purchased something - local retriesLeft = 40 - local canPurchase, insufficientFunds, notRightBC = canPurchaseItem() - while canPurchase and insufficientFunds and retriesLeft > 0 do - wait(0.5) - canPurchase, insufficientFunds, notRightBC = canPurchaseItem() - retriesLeft = retriesLeft - 1 - end - - if canPurchase and not insufficientFunds and not notRightBC then - doAcceptPurchase(Enum.CurrencyType.Robux) - else - purchaseFailed("didNotBuyRobux") - end - else - purchaseFailed("didNotBuyRobux") - end -end) diff --git a/assets/ugc/866 b/assets/ugc/866 deleted file mode 100644 index b052e42..0000000 --- a/assets/ugc/866 +++ /dev/null @@ -1,317 +0,0 @@ ---rbxassetid%866% ---[[ - This script controls the gui the player sees in regards to his or her health. - Can be turned with Game.StarterGui:SetCoreGuiEnabled(Enum.CoreGuiType.Health,false) - Copyright ROBLOX 2014. Written by Ben Tkacheff. ---]] - ---------------------------------------------------------------------- --- Initialize/Variables -while not Game do - wait(1/60) -end -while not Game.Players do - wait(1/60) -end - -local useCoreHealthBar = false -local success = pcall(function() useCoreHealthBar = Game.Players:GetUseCoreScriptHealthBar() end) -if not success or not useCoreHealthBar then - return -end - -local currentHumanoid = nil - -local HealthGui = nil -local lastHealth = 100 -local HealthPercentageForOverlay = 5 -local maxBarTweenTime = 0.3 -local greenColor = Color3.new(0.2, 1, 0.2) -local redColor = Color3.new(1, 0.2, 0.2) -local yellowColor = Color3.new(1, 1, 0.2) - -local guiEnabled = false -local healthChangedConnection = nil -local humanoidDiedConnection = nil -local characterAddedConnection = nil - -local greenBarImage = "rbxasset://textures/ui/Health-BKG-Center.png" -local greenBarImageLeft = "rbxasset://textures/ui/Health-BKG-Left-Cap.png" -local greenBarImageRight = "rbxasset://textures/ui/Health-BKG-Right-Cap.png" -local hurtOverlayImage = "http://www.mete0r.xyz/asset/?id=34854607" - -Game:GetService("ContentProvider"):Preload(greenBarImage) -Game:GetService("ContentProvider"):Preload(hurtOverlayImage) - -while not Game.Players.LocalPlayer do - wait(1/60) -end - ---------------------------------------------------------------------- --- Functions - -local capHeight = 15 -local capWidth = 7 - -function CreateGui() - if HealthGui and #HealthGui:GetChildren() > 0 then - HealthGui.Parent = Game.CoreGui.RobloxGui - return - end - - local hurtOverlay = Instance.new("ImageLabel") - hurtOverlay.Name = "HurtOverlay" - hurtOverlay.BackgroundTransparency = 1 - hurtOverlay.Image = hurtOverlayImage - hurtOverlay.Position = UDim2.new(-10,0,-10,0) - hurtOverlay.Size = UDim2.new(20,0,20,0) - hurtOverlay.Visible = false - hurtOverlay.Parent = HealthGui - - local healthFrame = Instance.new("Frame") - healthFrame.Name = "HealthFrame" - healthFrame.BackgroundTransparency = 1 - healthFrame.BackgroundColor3 = Color3.new(1,1,1) - healthFrame.BorderColor3 = Color3.new(0,0,0) - healthFrame.BorderSizePixel = 0 - healthFrame.Position = UDim2.new(0.5,-85,1,-20) - healthFrame.Size = UDim2.new(0,170,0,capHeight) - healthFrame.Parent = HealthGui - - - local healthBarBackCenter = Instance.new("ImageLabel") - healthBarBackCenter.Name = "healthBarBackCenter" - healthBarBackCenter.BackgroundTransparency = 1 - healthBarBackCenter.Image = greenBarImage - healthBarBackCenter.Size = UDim2.new(1,-capWidth*2,1,0) - healthBarBackCenter.Position = UDim2.new(0,capWidth,0,0) - healthBarBackCenter.Parent = healthFrame - healthBarBackCenter.ImageColor3 = Color3.new(1,1,1) - - local healthBarBackLeft = Instance.new("ImageLabel") - healthBarBackLeft.Name = "healthBarBackLeft" - healthBarBackLeft.BackgroundTransparency = 1 - healthBarBackLeft.Image = greenBarImageLeft - healthBarBackLeft.Size = UDim2.new(0,capWidth,1,0) - healthBarBackLeft.Position = UDim2.new(0,0,0,0) - healthBarBackLeft.Parent = healthFrame - healthBarBackLeft.ImageColor3 = Color3.new(1,1,1) - - local healthBarBackRight = Instance.new("ImageLabel") - healthBarBackRight.Name = "healthBarBackRight" - healthBarBackRight.BackgroundTransparency = 1 - healthBarBackRight.Image = greenBarImageRight - healthBarBackRight.Size = UDim2.new(0,capWidth,1,0) - healthBarBackRight.Position = UDim2.new(1,-capWidth,0,0) - healthBarBackRight.Parent = healthFrame - healthBarBackRight.ImageColor3 = Color3.new(1,1,1) - - - local healthBar = Instance.new("Frame") - healthBar.Name = "HealthBar" - healthBar.BackgroundTransparency = 1 - healthBar.BackgroundColor3 = Color3.new(1,1,1) - healthBar.BorderColor3 = Color3.new(0,0,0) - healthBar.BorderSizePixel = 0 - healthBar.ClipsDescendants = true - healthBar.Position = UDim2.new(0, 0, 0, 0) - healthBar.Size = UDim2.new(1,0,1,0) - healthBar.Parent = healthFrame - - - local healthBarCenter = Instance.new("ImageLabel") - healthBarCenter.Name = "healthBarCenter" - healthBarCenter.BackgroundTransparency = 1 - healthBarCenter.Image = greenBarImage - healthBarCenter.Size = UDim2.new(1,-capWidth*2,1,0) - healthBarCenter.Position = UDim2.new(0,capWidth,0,0) - healthBarCenter.Parent = healthBar - healthBarCenter.ImageColor3 = greenColor - - local healthBarLeft = Instance.new("ImageLabel") - healthBarLeft.Name = "healthBarLeft" - healthBarLeft.BackgroundTransparency = 1 - healthBarLeft.Image = greenBarImageLeft - healthBarLeft.Size = UDim2.new(0,capWidth,1,0) - healthBarLeft.Position = UDim2.new(0,0,0,0) - healthBarLeft.Parent = healthBar - healthBarLeft.ImageColor3 = greenColor - - local healthBarRight = Instance.new("ImageLabel") - healthBarRight.Name = "healthBarRight" - healthBarRight.BackgroundTransparency = 1 - healthBarRight.Image = greenBarImageRight - healthBarRight.Size = UDim2.new(0,capWidth,1,0) - healthBarRight.Position = UDim2.new(1,-capWidth,0,0) - healthBarRight.Parent = healthBar - healthBarRight.ImageColor3 = greenColor - - HealthGui.Parent = Game.CoreGui.RobloxGui -end - -function UpdateGui(health) - if not HealthGui then return end - - local healthFrame = HealthGui:FindFirstChild("HealthFrame") - if not healthFrame then return end - - local healthBar = healthFrame:FindFirstChild("HealthBar") - if not healthBar then return end - - -- If more than 1/4 health, bar = green. Else, bar = red. - local percentHealth = (health/currentHumanoid.MaxHealth) - if percentHealth ~= percentHealth then - percentHealth = 1 - healthBar.healthBarCenter.ImageColor3 = yellowColor - healthBar.healthBarRight.ImageColor3 = yellowColor - healthBar.healthBarLeft.ImageColor3 = yellowColor - elseif percentHealth > 0.25 then - healthBar.healthBarCenter.ImageColor3 = greenColor - healthBar.healthBarRight.ImageColor3 = greenColor - healthBar.healthBarLeft.ImageColor3 = greenColor - else - healthBar.healthBarCenter.ImageColor3 = redColor - healthBar.healthBarRight.ImageColor3 = redColor - healthBar.healthBarLeft.ImageColor3 = redColor - end - - local width = (health / currentHumanoid.MaxHealth) - width = math.max(math.min(width,1),0) -- make sure width is between 0 and 1 - if width ~= width then width = 1 end - - local healthDelta = lastHealth - health - lastHealth = health - - local percentOfTotalHealth = math.abs(healthDelta/currentHumanoid.MaxHealth) - percentOfTotalHealth = math.max(math.min(percentOfTotalHealth,1),0) -- make sure percentOfTotalHealth is between 0 and 1 - if percentOfTotalHealth ~= percentOfTotalHealth then percentOfTotalHealth = 1 end - - local newHealthSize = UDim2.new(width,0,1,0) - - healthBar.Size = newHealthSize - - local sizeX = healthBar.AbsoluteSize.X - if sizeX < capWidth then - healthBar.healthBarCenter.Visible = false - healthBar.healthBarRight.Visible = false - elseif sizeX < (2*capWidth + 1) then - healthBar.healthBarCenter.Visible = true - healthBar.healthBarCenter.Size = UDim2.new(0,sizeX - capWidth,1,0) - healthBar.healthBarRight.Visible = false - else - healthBar.healthBarCenter.Visible = true - healthBar.healthBarCenter.Size = UDim2.new(1,-capWidth*2,1,0) - healthBar.healthBarRight.Visible = true - end - - local thresholdForHurtOverlay = currentHumanoid.MaxHealth * (HealthPercentageForOverlay/100) - - if healthDelta >= thresholdForHurtOverlay then - AnimateHurtOverlay() - end - -end - -function AnimateHurtOverlay() - if not HealthGui then return end - - local overlay = HealthGui:FindFirstChild("HurtOverlay") - if not overlay then return end - - local newSize = UDim2.new(20, 0, 20, 0) - local newPos = UDim2.new(-10, 0, -10, 0) - - if overlay:IsDescendantOf(Game) then - -- stop any tweens on overlay - overlay:TweenSizeAndPosition(newSize,newPos,Enum.EasingDirection.Out,Enum.EasingStyle.Linear,0,true,function() - - -- show the gui - overlay.Size = UDim2.new(1,0,1,0) - overlay.Position = UDim2.new(0,0,0,0) - overlay.Visible = true - - -- now tween the hide - if overlay:IsDescendantOf(Game) then - overlay:TweenSizeAndPosition(newSize,newPos,Enum.EasingDirection.Out,Enum.EasingStyle.Quad,10,false,function() - overlay.Visible = false - end) - else - overlay.Size = newSize - overlay.Position = newPos - end - end) - else - overlay.Size = newSize - overlay.Position = newPos - end - -end - -function humanoidDied() - UpdateGui(0) -end - -function disconnectPlayerConnections() - if characterAddedConnection then characterAddedConnection:disconnect() end - if humanoidDiedConnection then humanoidDiedConnection:disconnect() end - if healthChangedConnection then healthChangedConnection:disconnect() end -end - -function newPlayerCharacter() - disconnectPlayerConnections() - startGui() -end - -function startGui() - characterAddedConnection = Game.Players.LocalPlayer.CharacterAdded:connect(newPlayerCharacter) - - local character = Game.Players.LocalPlayer.Character - if not character then - return - end - - currentHumanoid = character:WaitForChild("Humanoid") - if not currentHumanoid then - return - end - - if not Game.StarterGui:GetCoreGuiEnabled(Enum.CoreGuiType.Health) then - return - end - - healthChangedConnection = currentHumanoid.HealthChanged:connect(UpdateGui) - humanoidDiedConnection = currentHumanoid.Died:connect(humanoidDied) - UpdateGui(currentHumanoid.Health) - - CreateGui() -end - - - ---------------------------------------------------------------------- --- Start Script - -HealthGui = Instance.new("Frame") -HealthGui.Name = "HealthGui" -HealthGui.BackgroundTransparency = 1 -HealthGui.Size = UDim2.new(1,0,1,0) - -Game.StarterGui.CoreGuiChangedSignal:connect(function(coreGuiType,enabled) - if coreGuiType == Enum.CoreGuiType.Health or coreGuiType == Enum.CoreGuiType.All then - if guiEnabled and not enabled then - if HealthGui then - HealthGui.Parent = nil - end - disconnectPlayerConnections() - elseif not guiEnabled and enabled then - startGui() - end - - guiEnabled = enabled - end -end) - -if Game.StarterGui:GetCoreGuiEnabled(Enum.CoreGuiType.Health) then - guiEnabled = true - startGui() -end \ No newline at end of file diff --git a/assets/ugc/867 b/assets/ugc/867 deleted file mode 100644 index 79fc7d5..0000000 --- a/assets/ugc/867 +++ /dev/null @@ -1,2928 +0,0 @@ ---rbxassetid%867% --- cool playerlist 4 2014L remade by Mlaofmd#8192 --------------------- --- Super Util --------------------- - -local ADMINS = -{ - null= 1, - ['null 123']= 2, --any number -} - - - -local Images = { - bottomDark = '94691904', - bottomLight = '94691940', - midDark = '94691980', - midLight = '94692025', - LargeDark = '96098866', - LargeLight = '96098920', - LargeHeader = '96097470', - NormalHeader = '94692054', - LargeBottom = '96397271', - NormalBottom = '94754966', - DarkBluePopupMid = '97114905', - LightBluePopupMid = '97114905', - DarkPopupMid = '97112126', - LightPopupMid = '97109338', - DarkBluePopupTop = '97114838', - DarkBluePopupBottom = '97114758', - DarkPopupBottom = '100869219', - LightPopupBottom = '97109175', -} - -local BASE_TWEEN = .25 - -local MOUSE_HOLD_TIME = .15 -local MOUSE_DRAG_DISTANCE = 15 - -local BACKGROUND_TRANSPARENCY = 0.7 ---[[ - Generic object Create function, which I am using to create Gui's - Thanks to Stravant! ---]] -local Obj = {} -function Obj.Create(guiType) - return function(data) - local obj = Instance.new(guiType) - for k, v in pairs(data) do - if type(k) == 'number' then - v.Parent = obj - else - obj[k] = v - end - end - return obj - end -end - ---[[ - makes a full sized background for a guiobject - @Args: - imgName asset name of image to fill background - @Return: background gui object ---]] -function MakeBackgroundGuiObjOld(imgName) - return Obj.Create'ImageLabel' - { - Name = 'Background', - BackgroundTransparency = 1, - Image = imgName, - Position = UDim2.new(0, 0, 0, 0), - Size = UDim2.new(1,0,1,0), - } -end - -function MakeBackgroundGuiObj(imgName) - return Obj.Create'Frame' - { - Name = 'Background', - BackgroundTransparency = BACKGROUND_TRANSPARENCY, - BackgroundColor3 = Color3.new(0,0,0), - BorderSizePixel = 0, - Position = UDim2.new(0, 1, 0, 1), - Size = UDim2.new(1,-2,1,-2), - } -end - - ---[[ turns 255 integer color value to a color3 --]] -function Color3I(r,g,b) - return Color3.new(r/255,g/255,b/255) -end - ---[[ - Gets correct icon for builder's club status to display by name - @Args: - membershipType Enum of membership status - @Return: string of image asset ---]] -function getMembershipTypeIcon(membershipType,playerName) - if ADMINS[string.lower(playerName)]~=nil then - if ADMINS[string.lower(playerName)] == 1 then - return "rbxasset://textures/AdminIcon01.png" --u can change directory and icon, roblox url or ur url idk - elseif ADMINS[string.lower(playerName)] == 2 then - return "rbxasset://textures/AdminIcon02.png" --u can change directory and icon, roblox url or ur url idk - else - return ADMINS[string.lower(playerName)] - end - elseif membershipType == Enum.MembershipType.None then - return "" - elseif membershipType == Enum.MembershipType.BuildersClub then - return "rbxasset://textures/ui/TinyBcIcon.png" - elseif membershipType == Enum.MembershipType.TurboBuildersClub then - return "rbxasset://textures/ui/TinyTbcIcon.png" - elseif membershipType == Enum.MembershipType.OutrageousBuildersClub then - return "rbxasset://textures/ui/TinyObcIcon.png" - else - error("Unknown membershipType" .. membershipType) - end -end - -local function getFriendStatusIcon(friendStatus) - if friendStatus == Enum.FriendStatus.Unknown or friendStatus == Enum.FriendStatus.NotFriend then - return "" - elseif friendStatus == Enum.FriendStatus.Friend then - return "http://www.mete0r.xyz/asset/?id=99749771" - elseif friendStatus == Enum.FriendStatus.FriendRequestSent then - return "http://www.mete0r.xyz/asset/?id=99776888" - elseif friendStatus == Enum.FriendStatus.FriendRequestReceived then - return "http://www.mete0r.xyz/asset/?id=99776838" - else - error("Unknown FriendStatus: " .. friendStatus) - end -end - - ---[[ - Utility function to create buttons for the popup menus - @Args: - nparent what to parent this button to - ntext text to put on this button - index number index of this entry in menu - last is this the last element of the popup menu - @Return: a popup menu button ---]] -function MakePopupButton(nparent,ntext,index,last) - local tobj = Obj.Create"ImageButton" - { - Name = 'ReportButton', - BackgroundTransparency = 1, - BackgroundColor3 = Color3.new(0, 0, 0), - Position = UDim2.new(0,0,1*index,0), - Size = UDim2.new(1, 0, 1, 0), - ZIndex=7, - Obj.Create'TextLabel' - { - Name = 'ButtonText', - BackgroundTransparency = 0.6, - BackgroundColor3 = Color3.new(0, 0, 0), - Position = UDim2.new(.07, 0, .07, 0), - Size = UDim2.new(.86,0,.86,0), - Parent = HeaderFrame, - Font = 'ArialBold', - Text = ntext, - FontSize = 'Size14', - TextScaled = true, - TextColor3 = Color3.new(1,1,1), - TextStrokeTransparency = 1, - ZIndex=7, - }, - Parent = nparent, - } - - return tobj -end - - ---[[ - obligatory wait for child function - @Args: - parent Parent object to look for child in - child name of child object to look for - @Return: object waited for ---]] -function WaitForChild(parent,child) - while not parent:FindFirstChild(child) do - wait() debugprint(" child "..parent.Name.." waiting for "..child) - end - return parent[child] -end - - --------------------------- - -- Workspace Objects - --------------------------- - --- might want to move all this to an init function, wait for localplayer elsewhere -local Players = game:GetService('Players') --- make sure this doesn't run on the server(it will if you dont do this) -while not Players.LocalPlayer do - Players.Changed:wait() -end - -local LocalPlayer = Players.LocalPlayer -local Mouse = LocalPlayer:GetMouse() - -local ScreenGui = Obj.Create"Frame" -{ - Name = 'PlayerListScreen', - Size = UDim2.new(1, 0, 1, 0), - BackgroundTransparency = 1, - Parent = script.Parent -} -local MainFrame = Obj.Create"Frame" -{ - Name = 'LeaderBoardFrame', - Position = UDim2.new(1, -150, 0.005, 0), - Size = UDim2.new(0, 150, 0, 800), - BackgroundTransparency = 1, - Parent = ScreenGui, -} - ---frame used for expanding leaderstats when frame is 'focused' -local FocusFrame = Obj.Create"Frame" -{ - Name = 'FocusFrame', - Position = UDim2.new(0, 0, 0, 0), - Size = UDim2.new(1, 0, 0, 100), - BackgroundTransparency = 1, - Active = true, - Parent = MainFrame, -} - -local TemplateFrameYSize = 0.670000017 - - -- HEADER -local HeaderFrame = Obj.Create"Frame" -{ - Name = 'Header', - BackgroundTransparency = 1, - Position = UDim2.new(0,0,0,0), - Size = UDim2.new(1, 0, .07, 0), - Parent = MainFrame, - MakeBackgroundGuiObj('http://www.mete0r.xyz/asset/?id=94692054'), -} - local HeaderFrameHeight = HeaderFrame.Size.Y.Scale - local MaximizeButton = Obj.Create"ImageButton" - { - Name = 'MaximizeButton', - Active = true, - BackgroundTransparency = 1, - Position = UDim2.new(0, 0, 0, 0), - Size = UDim2.new(1,0,1,0), - Parent = HeaderFrame, - } - local HeaderName = Obj.Create"TextLabel" - { - Name = 'PlayerName', - BackgroundTransparency = 1, - Position = UDim2.new(0, 0, .05, 0), - Size = UDim2.new(.98,0,.38,0), - Parent = HeaderFrame, - Font = 'ArialBold', - Text = LocalPlayer.Name, - FontSize='Size24', - --TextScaled = true, - TextColor3 = Color3.new(1,1,1), - TextStrokeColor3 = Color3.new(0,0,0), - TextStrokeTransparency = 0, - TextXAlignment = 'Right', - TextYAlignment = 'Center', - } - local HeaderScore = Obj.Create"TextLabel" - { - Name = 'PlayerScore', - BackgroundTransparency = 1, - Position = UDim2.new(0, 0, .4, 0), - Size = UDim2.new(.98,0,0,30), - Parent = HeaderFrame, - Font = 'ArialBold', - Text = '', - FontSize='Size24', - TextYAlignment = 'Top', - --TextScaled = true, - TextColor3 = Color3.new(1,1,1), - TextStrokeTransparency = 1, - TextXAlignment = 'Right', - TextYAlignment = 'Top', - } - -- BOTTOM - --used for shifting bottom frame for mouse over effects -local BottomShiftFrame = Obj.Create"Frame" -{ - Name= 'BottomShiftFrame', - BackgroundTransparency = 1, - Position = UDim2.new(0,0,HeaderFrameHeight,0), - Size = UDim2.new(1,0,1,0), - Parent=MainFrame, -} - local BottomFrame = Obj.Create"Frame" - { - Name = 'Bottom', - BackgroundTransparency = 1, - Position = UDim2.new(0,0,.07,0), - Size = UDim2.new(1, 0, .03, 0), - Parent = BottomShiftFrame, - } - local ExtendButton = Obj.Create"ImageButton" - { - Name = 'bigbutton', - Active = true, - BackgroundTransparency = 1, - Position = UDim2.new(0, 0, 0, 0), - Size = UDim2.new(1,0,1.5,0), - ZIndex = 3, - Parent = BottomFrame, - } - local ExtendTab = Obj.Create"ImageButton" - { - Name = 'extendTab', - Active = true, - BackgroundTransparency = 1, - Image = 'rbxasset://textures/ui/expandPlayerList.png', - Position = UDim2.new(.608, 0, .3, 0), - Size = UDim2.new(0,27,0,11), - Parent = BottomFrame, - } -local TopClipFrame = Obj.Create"Frame" -{ - Name = 'ListFrame', - BackgroundTransparency = 1, - Position = UDim2.new(-1,0,.07,0), - Size = UDim2.new(2, 0, 1, 0), - Parent = MainFrame, - ClipsDescendants = true, -} - local BottomClipFrame = Obj.Create"Frame" - { - Name = 'BottomFrame', - BackgroundTransparency = 1, - Position = UDim2.new(0,0, - .8,0), - Size = UDim2.new(1, 0, 1, 0), - Parent = TopClipFrame, - ClipsDescendants = true, - } - local ScrollBarFrame = Obj.Create"Frame" - { - Name = 'ScrollBarFrame', - BackgroundTransparency = 1, - Position = UDim2.new(.987,0,.8,0), - Size = UDim2.new(.01, 0, .2, 0), - Parent = BottomClipFrame, - } - local ScrollBar = Obj.Create"Frame" - { - Name = 'ScrollBar', - BackgroundTransparency = 0, - BackgroundColor3 = Color3.new(.2,.2,.2), - Position = UDim2.new(0,0,0,0), - Size = UDim2.new(1, 0, .5, 0), - ZIndex = 5, - Parent = ScrollBarFrame, - - } - local ListFrame = Obj.Create"Frame" - { - Name = 'SubFrame', - BackgroundTransparency = 1, - Position = UDim2.new(0,0,.8,0), - Size = UDim2.new(1, 0, 1, 0), - Parent = BottomClipFrame, - } -local PopUpClipFrame = Obj.Create"Frame" -{ - Name = 'PopUpFrame', - BackgroundTransparency = 1, - SizeConstraint='RelativeXX', - Position = MainFrame.Position + UDim2.new( 0,-150,0,0), - Size = UDim2.new(0,150,0,800), - Parent = MainFrame, - ClipsDescendants = true, - ZIndex=7, -} -local PopUpPanel = nil - local PopUpPanelTemplate = Obj.Create"Frame" - { - Name = 'Panel', - BackgroundTransparency = 1, - Position = UDim2.new(1,0,0,0), - Size = UDim2.new(1,0,.032,0), - Parent = PopUpClipFrame, - } - -local StatTitles = Obj.Create"Frame" -{ - Name = 'StatTitles', - BackgroundTransparency = 1, - Position = UDim2.new(0,0,1,-10), - Size = UDim2.new(1, 0, 0, 0), - Parent = HeaderFrame, -} - -local IsMinimized = Instance.new('BoolValue') -local IsMaximized = Instance.new('BoolValue') -local IsTabified = Instance.new('BoolValue') -local AreNamesExpanded = Instance.new('BoolValue') - - -local MiddleTemplate = Obj.Create"Frame" -{ - Name = 'MidTemplate', - BackgroundTransparency = 1, - Position = UDim2.new(100,0,.07,0), - Size = UDim2.new(.5, 0, .025, 0),--UDim2.new(1, 0, .03, 0), - Obj.Create'ImageLabel' - { - Name = 'BCLabel', - Active = true, - BackgroundTransparency = 1, - Position = UDim2.new(.005, 5, .20, -2), - Size = UDim2.new(0,16,0,16), - SizeConstraint = 'RelativeYY', - Image = "", - ZIndex = 4, - }, - Obj.Create'ImageLabel' - { - Name = 'FriendLabel', - Active = true, - BackgroundTransparency = 1, - Position = UDim2.new(.005, 5, .15, 0), - Size = UDim2.new(0,16,0,16), - SizeConstraint = 'RelativeYY', - Image = "", - ZIndex = 4, - }, - Obj.Create"ImageButton" - { - Name = 'ClickListener', - Active = true, - BackgroundTransparency = 1, - BorderSizePixel = 0, - Position = UDim2.new(0, 1, 0, 1), - Size = UDim2.new(1, -2,1,-2), - ZIndex = 3, - }, - Obj.Create"Frame" - { - Name = 'TitleFrame', - BackgroundTransparency = 1, - Position = UDim2.new(.01, 0, 0, 0), - Size = UDim2.new(0,140,1,0), - BorderSizePixel = 0, - ClipsDescendants=true, - Obj.Create"TextLabel" - { - Name = 'Title', - BackgroundTransparency = 1, - Position = UDim2.new(0, 5, 0, 0), - Size = UDim2.new(100,0,1,0), - Font = 'Arial', - FontSize='Size14', - TextColor3 = Color3.new(1,1,1), - TextXAlignment = 'Left', - TextYAlignment = 'Center', - ZIndex = 3, - }, - }, - - Obj.Create"TextLabel" - { - Name = 'PlayerScore', - BackgroundTransparency = 1, - Position = UDim2.new(0, 0, 0, 0), - Size = UDim2.new(1,0,1,0), - Font = 'ArialBold', - Text = '', - FontSize='Size14', - TextColor3 = Color3.new(1,1,1), - TextXAlignment = 'Right', - TextYAlignment = 'Center', - ZIndex = 3, - }, - --Obj.Create'IntValue'{Name = 'ID'}, - --Obj.Create'ObjectValue'{Name = 'Player'}, - --Obj.Create'IntValue'{Name = 'Score'}, - ZIndex = 3, -} -local MiddleBGTemplate = Obj.Create"Frame" -{ - Name = 'MidBGTemplate', - BackgroundTransparency = 1, - Position = UDim2.new(100,0,.07,0), - Size = UDim2.new(.5, 0, .025, 0),--UDim2.new(1, 0, .03, 0), - MakeBackgroundGuiObj('http://www.mete0r.xyz/asset/?id=94692025'), - -} - - -- REPORT ABUSE OBJECTS - -local ReportAbuseShield = Obj.Create"TextButton" -{ - Name = "ReportAbuseShield", - Text = "", - AutoButtonColor = false, - Active = true, - Visible = true, - Size = UDim2.new(1,0,1,0), - BackgroundColor3 = Color3I(51,51,51), - BorderColor3 = Color3I(27,42,53), - BackgroundTransparency = 1, -} - -local ReportAbuseFrame = Obj.Create "Frame" -{ - Name = "Settings", - Position = UDim2.new(0.5, - 250, 0.5, - 200), - Size = UDim2.new(0.0, 500, 0.0, 400), - BackgroundTransparency = 1, - Active = true, - Parent = ReportAbuseShield, -} - -local AbuseSettingsFrame = Obj.Create"Frame" -{ - Name = "ReportAbuseStyle", - Size = UDim2.new(1, 0, 1, 0), - Active = true, - BackgroundTransparency = 1, - MakeBackgroundGuiObj('http://www.mete0r.xyz/asset/?id=96488767'), -- 96480351'), - Obj.Create"TextLabel" - { - Name = "Title", - Text = "Report Abuse", - TextColor3 = Color3I(221,221,221), - Position = UDim2.new(0.5, 0, 0, 30), - Font = Enum.Font.ArialBold, - FontSize = Enum.FontSize.Size36, - }, - Obj.Create"TextLabel" - { - Name = "Description", - Text = "This will send a complete report to a moderator. The moderator will review the chat log and take appropriate action.", - TextColor3 = Color3I(221,221,221), - Position = UDim2.new(.01, 0, 0, 55), - Size = UDim2.new(.99, 0, 0, 40), - BackgroundTransparency = 1, - Font = Enum.Font.Arial, - FontSize = Enum.FontSize.Size18, - TextWrap = true, - TextXAlignment = Enum.TextXAlignment.Left, - TextYAlignment = Enum.TextYAlignment.Top, - }, - Obj.Create"TextLabel" - { - Name = "AbuseLabel", - Text = "What did they do?", - Font = Enum.Font.Arial, - BackgroundTransparency = 1, - FontSize = Enum.FontSize.Size18, - Position = UDim2.new(0.025,0,0,140), - Size = UDim2.new(0.4,0,0,36), - TextColor3 = Color3I(255,255,255), - TextXAlignment = Enum.TextXAlignment.Left, - }, - Obj.Create"TextLabel" - { - Name = "ShortDescriptionLabel", - Text = "Short Description: (optional)", - Font = Enum.Font.Arial, - FontSize = Enum.FontSize.Size18, - Position = UDim2.new(0.025,0,0,180), - Size = UDim2.new(0.95,0,0,36), - TextColor3 = Color3I(255,255,255), - TextXAlignment = Enum.TextXAlignment.Left, - BackgroundTransparency = 1, - }, - Obj.Create"TextLabel" - { - Name = "ReportingPlayerLabel", - Text = "Reporting Player", - BackgroundTransparency = 1, - Font = Enum.Font.Arial, - FontSize = Enum.FontSize.Size18, - Position = UDim2.new(0.025,0,0,100), - Size = UDim2.new(0.95,0,0,36), - TextColor3 = Color3I(255,255,255), - TextXAlignment = Enum.TextXAlignment.Left, - Parent = AbuseSettingsFrame - }, - - Parent = ReportAbuseFrame, -} - -local AbusePlayerLabel = Obj.Create"TextLabel" -{ - Name = "PlayerLabel", - Text = "", - BackgroundTransparency = 1, - Font = Enum.Font.ArialBold, - FontSize = Enum.FontSize.Size18, - Position = UDim2.new(0.025,0,0,100), - Size = UDim2.new(0.95,0,0,36), - TextColor3 = Color3I(255,255,255), - TextXAlignment = Enum.TextXAlignment.Right, - Parent = AbuseSettingsFrame -} - -local SubmitReportButton = Obj.Create"ImageButton" -{ - Name = "SubmitReportBtn", - Active = false, - BackgroundTransparency = 1, - Position = UDim2.new(.5, - 200, 1, - 80), - Size = UDim2.new(0,150,0,50), - AutoButtonColor = false, - Image = 'http://www.mete0r.xyz/asset/?id=96502438', -- 96501119', - Parent = AbuseSettingsFrame, -} - -local CancelReportButton = Obj.Create"ImageButton" -{ - Name = "CancelBtn", - BackgroundTransparency = 1, - Position = UDim2.new(0.5, 50, 1, - 80), - Size = UDim2.new(0,150,0,50), - AutoButtonColor = true, - Image = 'http://www.mete0r.xyz/asset/?id=96500683', - Parent = AbuseSettingsFrame, -} - -local AbuseDescriptionWrapper = Obj.Create"Frame" -{ - Name = "AbuseDescriptionWrapper", - Position = UDim2.new(0.025,0,0,220), - Size = UDim2.new(0.95,0,1, - 310), - BackgroundColor3 = Color3I(0,0,0), - BorderSizePixel = 0, - Parent = AbuseSettingsFrame, -} - -local AbuseDescriptionBox - -local OriginalAbuseDescriptionBox = Obj.Create"TextBox" -{ - Name = "TextBox", - Text = "", - ClearTextOnFocus = false, - Font = Enum.Font.Arial, - FontSize = Enum.FontSize.Size18, - Position = UDim2.new(0,3,0,3), - Size = UDim2.new(1, - 6,1, - 6), - TextColor3 = Color3I(255,255,255), - TextXAlignment = Enum.TextXAlignment.Left, - TextYAlignment = Enum.TextYAlignment.Top, - TextWrap = true, - BackgroundColor3 = Color3I(0,0,0), - BorderSizePixel = 0, -} - -local CalmingAbuseBox = Obj.Create'Frame' -{ - Name = 'AbuseFeedbackBox', - BackgroundTransparency = 1, - Position=UDim2.new(0.25, 0, 0.300000012, 0), - Size=UDim2.new(0.5, 0, 0.370000005, 0), - MakeBackgroundGuiObj('http://www.mete0r.xyz/asset/?id=96506233'), - Obj.Create'TextLabel' - { - Name = 'Header', - Position=UDim2.new(0,10,.05,0), - Size=UDim2.new(1, -30, .15, 0), - TextScaled = true, - BackgroundTransparency = 1, - TextXAlignment = Enum.TextXAlignment.Center, - TextYAlignment = Enum.TextYAlignment.Top, - Text = 'Thanks for your report!', - TextColor3 = Color3.new(1,1,1), - FontSize = Enum.FontSize.Size48, - Font = 'ArialBold', - }, - Obj.Create'TextLabel' - { - Name = 'content', - Position = UDim2.new(0,10,.20,0), - Size = UDim2.new(1, -30, .40, 0), - TextScaled = true, - BackgroundTransparency = 1, - TextColor3 = Color3.new(1,1,1), - Text = 'Our moderators will review the chat logs and determine what happened. The other user is probably just trying to make you mad.\n\nIf anyone used swear words, inappropriate language, or threatened you in real life, please report them for Bad Words or Threats', - TextWrapped = true, - TextYAlignment = Enum.TextYAlignment.Top, - FontSize = Enum.FontSize.Size24, - Font = 'Arial', - }, - Obj.Create'ImageButton' - { - Name = "OkButton", - BackgroundTransparency = 1, - Position = UDim2.new(0.5, -75, 1, -80), - Size = UDim2.new(0,150,0,50), - AutoButtonColor = true, - Image = 'http://www.mete0r.xyz/asset/?id=96507959', - } -} -local NormalAbuseBox = Obj.Create'Frame' -{ - Name = 'AbuseFeedbackBox', - BackgroundTransparency = 1, - Position = UDim2.new(0.25, 0, 0.300000012, 0), - Size = UDim2.new(0.5, 0, 0.370000005, 0), - MakeBackgroundGuiObj('http://www.mete0r.xyz/asset/?id=96506233'), - Obj.Create'TextLabel' - { - Name = 'Header', - Position = UDim2.new(0,10,.05,0), - Size = UDim2.new(1, -30, .15, 0), - TextScaled = true, - BackgroundTransparency = 1, - TextColor3 = Color3.new(1,1,1), - TextXAlignment = Enum.TextXAlignment.Center, - TextYAlignment = Enum.TextYAlignment.Top, - Text = 'Thanks for your report!', - FontSize = Enum.FontSize.Size48, - Font ='ArialBold' - }, - Obj.Create'TextLabel' - { - Name = 'content', - Position = UDim2.new(0,10,.20,0), - Size = UDim2.new(1, -30, .15, 0), - TextScaled = true, - BackgroundTransparency = 1, - TextColor3 = Color3.new(1,1,1), - Text = "Our moderators will review the chat logs and determine what happened.", - TextWrapped = true, - TextYAlignment = Enum.TextYAlignment.Top, - FontSize = Enum.FontSize.Size24, - Font = 'Arial', - }, - Obj.Create'ImageButton' - { - Name = "OkButton", - BackgroundTransparency = 1, - Position = UDim2.new(0.5, -75, 1, -80), - Size = UDim2.new(0,150,0,50), - AutoButtonColor = true, - Image = 'http://www.mete0r.xyz/asset/?id=96507959', - }, -} - -local BigButton=Instance.new('ImageButton') - BigButton.Size=UDim2.new(1,0,1,0) - BigButton.BackgroundTransparency=1 - BigButton.ZIndex=8 - BigButton.Visible=false - --BigButton.Active=false - BigButton.Parent=ScreenGui - - - local debugFrame = Obj.Create"Frame" - { - Name = 'debugframe', - Position = UDim2.new(0, 0, 0, 0), - Size = UDim2.new(0, 150, 0, 800),--0.99000001 - BackgroundTransparency = 1, - - } - local debugplayers = Obj.Create"TextLabel" - { - BackgroundTransparency = .8, - Position = UDim2.new(0, 0, .01, 0), - Size = UDim2.new(1,0,.5,0), - Parent = debugFrame, - Font = 'ArialBold', - Text = '--', - FontSize='Size14', - TextWrapped=true, - TextColor3 = Color3.new(1,1,1), - TextStrokeColor3 = Color3.new(0,0,0), - TextStrokeTransparency = 0, - TextXAlignment = 'Right', - TextYAlignment = 'Center', - } - local debugOutput = Obj.Create"TextLabel" - { - BackgroundTransparency = .8, - Position = UDim2.new(0, 0, .5, 0), - Size = UDim2.new(1,0,.5,0), - Parent = debugFrame, - Font = 'ArialBold', - Text = '--', - FontSize='Size14', - TextWrapped=true, - TextColor3 = Color3.new(1,1,1), - TextStrokeColor3 = Color3.new(0,0,0), - TextStrokeTransparency = 0, - TextXAlignment = 'Right', - TextYAlignment = 'Center', - } - - ---[[ - simple function to toggle the display of debug output ---]] -local DebugPrintEnabled=true -function debugprint(str) - --print(str) - if DebugPrintEnabled then - debugOutput.Text=str - end -end - - - ------------------------- - -- Script objects - ------------------------- -local RbxGui = assert(LoadLibrary('RbxGui')) - - -- number of entries to show if you click minimize -local DefaultEntriesOnScreen = 8 - - - - - -for _,i in pairs(Images) do - Game:GetService("ContentProvider"):Preload("http://www.mete0r.xyz/asset/?id="..i) -end - - -- ordered array of 'score data', each entry has: - -- Name(String) - -- Priority(number) - -- IsPrimary (bool, should it be shown in upper right) - -- MaxLength (integer, of the length of the longest element for this column) -local ScoreNames = {} - -- prevents flipping in playerlist panels -local AddId = 0 - -- intermediate table form of all player entries in format of: - -- Frame - -- Player - -- Score - -- ID - -- MyTeam (team ENRTY(not actual team) I am currently on) -local PlayerFrames = {} - -- intermediate ordered frame array, composed of Entrys of - -- Frame - -- MyTeam (my team object) - -- MyPlayers ( an ordered array of all player frames in team ) - -- AutoHide (bool saying whether it should be hidden) - -- IsHidden (bool) - -- ID (int to prevent flipping out of leaderboard, fun times) -local TeamFrames = {} - -- one special entry from teamFrames, for unaffiliated players, only shown if players non - empty -local NeutralTeam = nil - - -- final 'to be displayed' list of frames -local MiddleFrames = {} -local MiddleFrameBackgrounds = {} -local MiddleFrameHeight = .03 - -- time of last click -local LastClick = 0 -local ButtonCooldown = .25 - -local OnIos = false -pcall(function() OnIos = Game:GetService('UserInputService').TouchEnabled end) - - - -- you get 200 of x screen space per stat added, start width 16% -local BaseScreenXSize = 150 -local SpacingPerStat = 10 --spacing between stats - - -local MaximizedBounds = UDim2.new(.5,0,1,0) -local MaximizedPosition = UDim2.new(.25,0,.1,0) -local NormalBounds = UDim2.new(0,BaseScreenXSize, 0, 800) -local NormalPosition = UDim2.new(1 , - BaseScreenXSize, 0.005, 0) - -local MinimizedBounds = UDim2.new(0, BaseScreenXSize, 0.99000001, 0) - ---free space to give last stat on the right -local RightEdgeSpace = -.04 - - -- where the scroll par currently is positioned -local ScrollPosition = 0.75999999 -local IsDragging = false -- am I dragging the player list - -local DefaultBottomClipPos = BottomClipFrame.Position.Y.Scale - -local LastSelectedPlayerEntry = nil -local SelectedPlayerEntry = nil -local SelectedPlayer = nil - - -- locks(semaphores) for stopping race conditions -local AddingFrameLock = false -local ChangingOrderLock = false -local AddingStatLock = false -local BaseUpdateLock = false -local WaitForClickLock = false -local InPopupWaitForClick=false -local PlayerChangedLock = false -local NeutralTeamLock = false - -local ScrollWheelConnections = {} - - -local DefaultListSize = 15 -if not OnIos then DefaultListSize = 24 end -local DidMinimizeDrag = false - ---local PlaceCreatorId=game.CreatorId - - -- report abuse objects -local AbuseName -local Abuses = { - "Bad Words or Threats", - "Bad Username", - "Talking about Dating", - "Account Trading or Sharing", - "Asking Personal Questions", - "Rude or Mean Behavior", - "False Reporting Me" -} -local UpdateAbuseFunction -local AbuseDropDown, UpdateAbuseSelection - -local PrivilegeLevel = -{ - Owner = 255, - Admin = 240, - Member = 128, - Visitor = 10, - Banned = 0, -} - - -local IsPersonalServer = not not game.Workspace:FindFirstChild("PSVariable") - -game.Workspace.ChildAdded:connect(function(nchild) - if nchild.Name=='PSVariable' and nchild:IsA('BoolValue') then - IsPersonalServer=true - end -end) - ------------------------------- - -- Static Functions - ------------------------------- -function GetTotalEntries() - return math.min(#MiddleFrameBackgrounds,DefaultEntriesOnScreen) -end - -function GetEntryListLength() - local numEnts=#PlayerFrames+#TeamFrames - if NeutralTeam then - numEnts=numEnts+1 - end - return numEnts -end - -function AreAllEntriesOnScreen() - return #MiddleFrameBackgrounds * MiddleTemplate.Size.Y.Scale <= 1 + DefaultBottomClipPos -end - -function GetLengthOfVisbleScroll() - return 1 + DefaultBottomClipPos -end - -function GetMaxScroll() - return DefaultBottomClipPos * - 1 -end - -- can be optimized by caching when this varible changes -function GetMinScroll() - if AreAllEntriesOnScreen() then - return GetMaxScroll() - else - return (GetMaxScroll() - (#MiddleFrameBackgrounds * MiddleTemplate.Size.Y.Scale)) + (1 + DefaultBottomClipPos) - end -end - -function AbsoluteToPercent(x,y) - return Vector2.new(x,y)/ScreenGui.AbsoluteSize -end ---[[ - tweens property of element from starta to enda over length of time - Warning: should be put in a Spawn call - @Args: - element textobject to tween transparency on - propName - starta alpha to start tweening - enda alpha to end tweening on - length how many seconds to spend tweening ---]] -function TweenProperty(obj, propName, inita, enda, length) - local startTime = tick() - while tick()-startTimenrank do - game:GetService("PersonalServerService"):Demote(player) - end -end ---[[ - called when player selects new privilege level from popup menu - @Args: - player player to set privileges on - nlevel new privilege level for this player ---]] -function OnPrivilegeLevelSelect(player,nlevel,BanPlayerButton,VisitorButton,MemberButton,AdminButton) - debugprint('setting privilege level') - SetPrivilegeRank(player,nlevel) - HighlightMyRank(player,BanPlayerButton,VisitorButton,MemberButton,AdminButton) -end - ---[[ - Highlights current rank of this player in the popup menu - @Args: - player Player to check for rank on ---]] -function HighlightMyRank(player,BanPlayerButton,VisitorButton,MemberButton,AdminButton) - BanPlayerButton.Image= 'http://www.mete0r.xyz/asset/?id='..Images['LightPopupMid'] - VisitorButton.Image= 'http://www.mete0r.xyz/asset/?id='..Images['DarkPopupMid'] - MemberButton.Image= 'http://www.mete0r.xyz/asset/?id='..Images['LightPopupMid'] - AdminButton.Image= 'http://www.mete0r.xyz/asset/?id='..Images['DarkPopupBottom'] - - local rank=player.PersonalServerRank - if rank <= PrivilegeLevel['Banned'] then - BanPlayerButton.Image='http://www.mete0r.xyz/asset/?id='..Images['LightBluePopupMid'] - elseif rank <= PrivilegeLevel['Visitor'] then - VisitorButton.Image='http://www.mete0r.xyz/asset/?id='..Images['DarkBluePopupMid'] - elseif rank <= PrivilegeLevel['Member'] then - MemberButton.Image='http://www.mete0r.xyz/asset/?id='..Images['LightBluePopupMid'] - elseif rank <= PrivilegeLevel['Admin'] then - AdminButton.Image= 'http://www.mete0r.xyz/asset/?id='..Images['DarkBluePopupBottom'] - end -end - - -------------------------- - -- Report abuse handling - -------------------------- ---[[ - does final reporting of abuse on selected player, calls closeAbuseDialog ---]] -function OnSubmitAbuse() - if SubmitReportButton.Active then - if AbuseName and SelectedPlayer then - AbuseSettingsFrame.Visible = false - game.Players:ReportAbuse(SelectedPlayer, AbuseName, AbuseDescriptionBox.Text) - if AbuseName == "Rude or Mean Behavior" or AbuseName == "False Reporting Me" then - CalmingAbuseBox.Parent = ReportAbuseShield - else - debugprint('opening abuse box') - NormalAbuseBox.Parent = ReportAbuseShield - end - else - CloseAbuseDialog() - end - end -end - ---[[ - opens the abuse dialog, initialises text to display selectedplayer ---]] -function OpenAbuseDialog() - debugprint('adding report dialog') - AbusePlayerLabel.Text = SelectedPlayer.Name - --AbuseDescriptionBox.Text = "" - PopUpPanel:TweenPosition(UDim2.new(1,0,0,0), "Out", "Linear", BASE_TWEEN,true) - AbuseDescriptionBox=OriginalAbuseDescriptionBox:Clone() - AbuseDescriptionBox.Parent = AbuseDescriptionWrapper - ReportAbuseShield.Parent = ScreenGui - ClosePopUpPanel() -end ---[[ - resets and closes abuse dialog ---]] -function CloseAbuseDialog() - AbuseName = nil - SubmitReportButton.Active = false - SubmitReportButton.Image = 'http://www.mete0r.xyz/asset/?id=96502438' -- 96501119', - AbuseDescriptionBox:Destroy() - CalmingAbuseBox.Parent = nil - NormalAbuseBox.Parent = nil - ReportAbuseShield.Parent = nil - AbuseSettingsFrame.Visible = true -end - ---[[ - creates dropdownbox, registers all listeners for abuse dialog ---]] -function InitReportAbuse() - - UpdateAbuseFunction = function(abuseText) - AbuseName = abuseText - if AbuseName and SelectedPlayer then - SubmitReportButton.Active = true - SubmitReportButton.Image = 'http://www.mete0r.xyz/asset/?id=96501119' - end - end - - AbuseDropDown, UpdateAbuseSelection = RbxGui.CreateDropDownMenu(Abuses, UpdateAbuseFunction, true) - AbuseDropDown.Name = "AbuseComboBox" - AbuseDropDown.Position = UDim2.new(0.425, 0, 0, 142) - AbuseDropDown.Size = UDim2.new(0.55,0,0,32) - AbuseDropDown.Parent = AbuseSettingsFrame - - - CancelReportButton.MouseButton1Click:connect(CloseAbuseDialog) - SubmitReportButton.MouseButton1Click:connect(OnSubmitAbuse) - - CalmingAbuseBox:FindFirstChild('OkButton').MouseButton1Down:connect(CloseAbuseDialog) - NormalAbuseBox:FindFirstChild('OkButton').MouseButton1Down:connect(CloseAbuseDialog) -end - -------------------------------------- --- Friend/unfriending -------------------------------------- ---[[ - gets enum val of friend status, uses pcall for some reason?(from old playerlist) - @Args: - player player object to check if friends with - @Return: enum of friend status ---]] -local function GetFriendStatus(player) - if player == game.Players.LocalPlayer then - return Enum.FriendStatus.NotFriend - else - local success, result = pcall(function() return game.Players.LocalPlayer:GetFriendStatus(player) end) - if success then - return result - else - return Enum.FriendStatus.NotFriend - end - end -end - ---[[ - when friend button is clicked, tries to take appropriate action, - based on current friend status with SelectedPlayer ---]] -function OnFriendButtonSelect() - - local friendStatus=GetFriendStatus(SelectedPlayer) - if friendStatus==Enum.FriendStatus.Friend then - LocalPlayer:RevokeFriendship(SelectedPlayer) - elseif friendStatus==Enum.FriendStatus.Unknown or friendStatus==Enum.FriendStatus.NotFriend then - LocalPlayer:RequestFriendship(SelectedPlayer) - elseif friendStatus==Enum.FriendStatus.FriendRequestSent then - LocalPlayer:RevokeFriendship(SelectedPlayer) - elseif friendStatus==Enum.FriendStatus.FriendRequestReceived then - LocalPlayer:RequestFriendship(SelectedPlayer) - end - --PersonalServerPanel:TweenPosition(UDim2.new(1,0,0,0), "Out", "Quad", .5,true) - ClosePopUpPanel() - --PopUpPanel:TweenPosition(UDim2.new(1,0,0,0), "Out", "Linear", BASE_TWEEN,true) -end - -function OnFriendRefuseButtonSelect() - - - LocalPlayer:RevokeFriendship(SelectedPlayer) - ClosePopUpPanel() - PopUpPanel:TweenPosition(UDim2.new(1,0,0,0), "Out", "Linear", BASE_TWEEN,true) -end ------------------------------------- --- Player Entry Handling ------------------------------------- ---[[ - used by lua's table.sort to sort player entries ---]] -function PlayerSortFunction(a,b) - -- prevents flipping out leaderboard - if a['Score'] == b['Score'] then - return a['Player'].Name:upper() > b['Player'].Name:upper() - end - if not a['Score'] then return false end - if not b['Score'] then return true end - return a['Score'] < b['Score'] -end - - --------------------------------- - -- Stat Handling - --------------------------------- - -- removes and closes all leaderboard stuffs -function BlowThisPopsicleStand() - --ScreenGui:Destroy() - --script:Destroy() - --time to make the fanboys rage... - Tabify() -end ---[[ - used by lua's table.sort to prioritize score entries ---]] -function StatSort(a,b) - -- primary stats should be shown before all others - if a.IsPrimary ~= b.IsPrimary then - return a.IsPrimary - end - -- if priorities are equal, then return the first added one - if a.Priority == b.Priority then - return a.AddId < b.AddId - end - return a.Priority < b.Priority -end ---[[ - doing WAAY too much here, for optimization update only your team - @Args: - playerEntry Entry of player who had a stat change - property Name of stat changed ---]] -function StatChanged(playerEntry,property) - - -- if(playerEntry['MyTeam']) then - -- UpdateSingleTeam(playerEntry['MyTeam']) - -- else - BaseUpdate() - -- end -end ---[[ - Called when stat is added - if playerEntry is localplayer, will add to score names and re-sort the stats, and resize the width of the leaderboard - for all players, will add a listener for if this stat changes - if stat is a string value, crashes the leaderboard - Note:change crash to a 'tabify' leaderboard later - @Args: - nchild new child value to leaderstats - playerEntry entry this stat was added to ---]] -function StatAdded(nchild,playerEntry) - -- dont re - add a leaderstat I alreday have - while AddingStatLock do debugprint('in stat added function lock') wait(1/30) end - AddingStatLock = true - if not (nchild:IsA('StringValue') or nchild:IsA('IntValue') or nchild:IsA('BoolValue') or nchild:IsA('NumberValue') or nchild:IsA('DoubleConstrainedValue') or nchild:IsA('IntConstrainedValue')) then - BlowThisPopsicleStand() - else - local haveScore = false - for _,i in pairs(ScoreNames) do - if i['Name']==nchild.Name then haveScore=true end - end - if not haveScore then - local nstat = {} - nstat['Name'] = nchild.Name - nstat['Priority'] = 0 - if(nchild:FindFirstChild('Priority')) then - nstat['Priority'] = nchild.Priority - end - nstat['IsPrimary'] = false - if(nchild:FindFirstChild('IsPrimary')) then - nstat['IsPrimary'] = true - end - nstat.AddId = AddId - AddId = AddId + 1 - table.insert(ScoreNames,nstat) - table.sort(ScoreNames,StatSort) - if not StatTitles:FindFirstChild(nstat['Name']) then - CreateStatTitle(nstat['Name']) - end - UpdateMaximize() - - end - end - AddingStatLock = false - StatChanged(playerEntry) - nchild.Changed:connect(function(property) StatChanged(playerEntry,property) end) - - -end ---returns whether any of the existing players has this stat -function DoesStatExist(statName, exception) - for _,playerf in pairs(PlayerFrames) do - if playerf['Player'] ~= exception and playerf['Player']:FindFirstChild('leaderstats') and playerf['Player'].leaderstats:FindFirstChild(statName) then - --print('player:' .. playerf['Player'].Name ..' has stat') - return true - end - end - return false -end - - - ---[[ - Called when stat is removed from player - for all players, destroys the stat frame associated with this value, - then calls statchanged(to resize frame) - if playerEntry==localplayer, will remove from scorenames - @Args: - nchild ___value to be removed - playerEntry entry of player value is being removed from ---]] -function StatRemoved(nchild,playerEntry) - while AddingStatLock do debugprint('In Adding Stat Lock1') wait(1/30) end - AddingStatLock = true - if playerEntry['Frame']:FindFirstChild(nchild.Name) then - debugprint('Destroyed frame!') - playerEntry['Frame'][nchild.Name].Parent = nil - end - if not DoesStatExist(nchild.Name, playerEntry['Player']) then - for i,val in ipairs(ScoreNames) do - if val['Name'] == nchild.Name then - table.remove(ScoreNames,i) - if StatTitles:FindFirstChild(nchild.Name) then - StatTitles[nchild.Name]:Destroy() - end - for _,teamf in pairs(TeamFrames) do - if teamf['Frame']:FindFirstChild(nchild.Name) then - teamf['Frame'][nchild.Name]:Destroy() - end - end - end - end - end - AddingStatLock = false - StatChanged(playerEntry) -end ---[[ - clears all stats from a given playerEntry - used when leaderstats are removed, or when new leaderstats are added(for weird edge case)+ ---]] -function RemoveAllStats(playerEntry) - for i,val in ipairs(ScoreNames) do - StatRemoved(val,playerEntry) - end - -end - - -function GetScoreValue(score) - if score:IsA('DoubleConstrainedValue') or score:IsA('IntConstrainedValue') then - return score.ConstrainedValue - elseif score:IsA('BoolValue') then - if score.Value then return 1 else return 0 end - else - return score.Value - end -end ---[[ - ---]] -function MakeScoreEntry(entry,scoreval,panel) - if not panel:FindFirstChild('PlayerScore') then return end - local nscoretxt = panel:FindFirstChild('PlayerScore'):Clone() - local thisScore = nil - --here lies the resting place of a once great and terrible bug - --may its treachery never be forgoten, lest its survivors fall for it again - --RIP the leaderstat bug, oct 2012-nov 2012 - wait() - if entry['Player']:FindFirstChild('leaderstats') and entry['Player'].leaderstats:FindFirstChild(scoreval['Name']) then - thisScore = entry['Player']:FindFirstChild('leaderstats'):FindFirstChild(scoreval['Name']) - else - return - end - - if not entry['Player'].Parent then return end - - nscoretxt.Name = scoreval['Name'] - nscoretxt.Text = tostring(GetScoreValue(thisScore)) - if scoreval['Name'] == ScoreNames[1]['Name'] then - debugprint('changing score') - entry['Score'] = GetScoreValue(thisScore) - if entry['Player'] == LocalPlayer then HeaderScore.Text = tostring(GetScoreValue(thisScore)) end - end - - thisScore.Changed:connect(function() - if not thisScore.Parent then return end - if scoreval['Name'] == ScoreNames[1]['Name'] then - - entry['Score'] = GetScoreValue(thisScore) - if entry['Player'] == LocalPlayer then HeaderScore.Text = tostring(GetScoreValue(thisScore)) end - end - nscoretxt.Text = tostring(GetScoreValue(thisScore)) - BaseUpdate() - end) - return nscoretxt - -end - -function CreateStatTitle(statName) - - local ntitle = MiddleTemplate:FindFirstChild('PlayerScore'):Clone() - ntitle.Name = statName - ntitle.Text = statName - -- ntitle - if IsMaximized.Value then - ntitle.TextTransparency = 0 - else - ntitle.TextTransparency = 1 - end - ntitle.Parent = StatTitles -end - -function RecreateScoreColumns(ptable) - while AddingStatLock do debugprint ('In Adding Stat Lock2') wait(1/30) end - AddingStatLock = true - local Xoffset=5--15 --current offset from Right - local maxXOffset=Xoffset - local MaxSizeColumn=0 --max size for this column - - -- foreach known leaderstat - for j = #ScoreNames, 1,-1 do - local scoreval = ScoreNames[j] - - MaxSizeColumn=0 - -- for each entry in this player table - for i,entry in ipairs(ptable) do - local panel = entry['Frame'] - local tplayer = entry['Player'] - -- if this panel does not have an element named after this stat - if not panel:FindFirstChild(scoreval['Name']) then - -- make an entry for this object - local nentry = MakeScoreEntry(entry,scoreval,panel) - if nentry then - debugprint('adding '..nentry.Name..' to '..entry['Player'].Name ) - nentry.Parent = panel - -- add score to team - if entry['MyTeam'] and entry['MyTeam'] ~= NeutralTeam and not entry['MyTeam']['Frame']:FindFirstChild(scoreval['Name']) then - local ntitle = nentry:Clone() - --ntitle.TextXAlignment = 'Right' - ntitle.Parent = entry['MyTeam']['Frame'] - end - - end - end - scoreval['XOffset']=Xoffset - - if panel:FindFirstChild(scoreval['Name']) then - MaxSizeColumn=math.max(MaxSizeColumn,panel[scoreval['Name']].TextBounds.X) - end - end - - if AreNamesExpanded.Value then - MaxSizeColumn=math.max(MaxSizeColumn,StatTitles[scoreval['Name'] ].TextBounds.X) - StatTitles[scoreval['Name'] ]:TweenPosition(UDim2.new(RightEdgeSpace,-Xoffset,0,0),'Out','Linear',BASE_TWEEN,true) - else - StatTitles[scoreval['Name'] ]:TweenPosition(UDim2.new((.4+((.6/#ScoreNames)*(j-1)))-1,0,0,0),'Out','Linear',BASE_TWEEN,true) - end - scoreval['ColumnSize']=MaxSizeColumn - Xoffset= Xoffset+SpacingPerStat+MaxSizeColumn - maxXOffset=math.max(Xoffset,maxXOffset) - end - NormalBounds = UDim2.new(0, BaseScreenXSize+maxXOffset-SpacingPerStat,0,800) - NormalPosition = UDim2.new(1 , -NormalBounds.X.Offset, NormalPosition.Y.Scale, 0) - UpdateHeaderNameSize() - UpdateMaximize() - - AddingStatLock = false -end - --------------------------- - -- Minimizing and maximizing - --------------------------- - -function ToggleMinimize() - IsMinimized.Value = not IsMinimized.Value - UpdateStatNames() -end - -function ToggleMaximize() - IsMaximized.Value = not IsMaximized.Value - RecreateScoreColumns(PlayerFrames) --done to re-position stat names NOTE: optimize-able -end - -function Tabify() - IsTabified.Value= true - IsMaximized.Value=false - IsMinimized.Value=true - UpdateMinimize() - IsTabified.Value= true - ScreenGui:TweenPosition(UDim2.new(NormalBounds.X.Scale, NormalBounds.X.Offset-10, 0,0),'Out','Linear',BASE_TWEEN*1.2,true) -end - -function UnTabify() - if IsTabified.Value then - IsTabified.Value= false - ScreenGui:TweenPosition(UDim2.new(0, 0, 0,0),'Out','Linear',BASE_TWEEN*1.2,true) - end -end - ---[[ - Does more than it looks like - monitors positions of the clipping frames and bottom frames - called from EVERYWHERE, too much probably ---]] -function UpdateMinimize() - - if IsMinimized.Value then - if IsMaximized.Value then - ToggleMaximize() - end - if not IsTabified.Value then - MainFrame.Size = UDim2.new(0.010, HeaderName.TextBounds.X, NormalBounds.Y.Scale,NormalBounds.Y.Offset) - MainFrame.Position = UDim2.new(.990, -HeaderName.TextBounds.X, NormalPosition.Y.Scale,0) - else - MainFrame.Size = NormalBounds - MainFrame.Position = NormalPosition - end - --(#MiddleFrameBackgrounds*MiddleBGTemplate.Size.Y.Scale) - BottomClipFrame.Position = UDim2.new(0,0,-1,0) - BottomFrame.Position = UDim2.new(0,0,0,0) - FocusFrame.Size=UDim2.new(1,0,HeaderFrameHeight,0) - ExtendTab.Image = 'rbxasset://textures/ui/expandPlayerList.png' - else - if not IsMaximized.Value then - MainFrame.Size = NormalBounds - MainFrame.Position = NormalPosition - end - --do limiting - DefaultBottomClipPos = math.min(math.max(DefaultBottomClipPos,-1),-1+(#MiddleFrameBackgrounds*MiddleBGTemplate.Size.Y.Scale)) - UpdateScrollPosition() - - BottomClipFrame.Position=UDim2.new(0,0,DefaultBottomClipPos,0) - local bottomPositon = (DefaultBottomClipPos+BottomClipFrame.Size.Y.Scale) - BottomFrame.Position=UDim2.new(0,0,bottomPositon,0) - FocusFrame.Size=UDim2.new(1,0,bottomPositon + HeaderFrameHeight,0) - ExtendTab.Image = 'rbxasset://textures/ui/expandPlayerList.png' - end -end - ---[[ - Manages the position/size of the mainFrame, swaps out different resolution images for the frame - fades in and out the stat names, moves position of headername and header score ---]] -function UpdateMaximize() - if IsMaximized.Value then - for j = 1, #ScoreNames,1 do - local scoreval = ScoreNames[j] - StatTitles[scoreval['Name'] ]:TweenPosition(UDim2.new(.4+((.6/#ScoreNames)*(j-1))-1,0,0,0),'Out','Linear',BASE_TWEEN,true) - end - - if IsMinimized.Value then - ToggleMinimize() - else - UpdateMinimize() - end - - - MainFrame:TweenSizeAndPosition(MaximizedBounds,MaximizedPosition,'Out','Linear',BASE_TWEEN*1.2,true) - HeaderScore:TweenPosition(UDim2.new(0,0,HeaderName.Position.Y.Scale,0), "Out", "Linear", BASE_TWEEN*1.2,true) - HeaderName:TweenPosition(UDim2.new( - .1, - HeaderScore.TextBounds.x,HeaderName.Position.Y.Scale,0), "Out", "Linear", BASE_TWEEN*1.2,true) - for index, i in ipairs(MiddleFrames) do - - if i:FindFirstChild('ClickListener') then - i.ClickListener.Size = UDim2.new(1,-2,i.ClickListener.Size.Y.Scale, i.ClickListener.Size.Y.Offset) - end - - for j=1, #ScoreNames,1 do - local scoreval = ScoreNames[j] - if i:FindFirstChild(scoreval['Name']) then - i[scoreval['Name']]:TweenPosition(UDim2.new(.4+((.6/#ScoreNames)*(j-1))-1,0,0,0), "Out", "Linear", BASE_TWEEN,true) - end - end - end - for i,entry in ipairs(PlayerFrames) do - WaitForChild(entry['Frame'],'TitleFrame').Size=UDim2.new(.38,0,entry['Frame'].TitleFrame.Size.Y.Scale,0) - end - - for i,entry in ipairs(TeamFrames) do - WaitForChild(entry['Frame'],'TitleFrame').Size=UDim2.new(.38,0,entry['Frame'].TitleFrame.Size.Y.Scale,0) - end - - else - if not IsMinimized.Value then - MainFrame:TweenSizeAndPosition(NormalBounds,NormalPosition,'Out','Linear',BASE_TWEEN*1.2,true) - end - HeaderScore:TweenPosition(UDim2.new(0,0,.4,0), "Out", "Linear", BASE_TWEEN*1.2,true) - HeaderName:TweenPosition(UDim2.new(0,0,HeaderName.Position.Y.Scale,0), "Out", "Linear", BASE_TWEEN*1.2,true) - for index, i in ipairs(MiddleFrames) do - if i:FindFirstChild('ClickListener') then - i.ClickListener.Size = UDim2.new(1, -2,i.ClickListener.Size.Y.Scale, i.ClickListener.Size.Y.Offset) - for j=1, #ScoreNames,1 do - local scoreval = ScoreNames[j] - if i:FindFirstChild(scoreval['Name']) and scoreval['XOffset'] then - --print('updateing stat position: ' .. scoreval['Name']) - i[scoreval['Name']]:TweenPosition(UDim2.new(RightEdgeSpace,-scoreval['XOffset'],0,0), "Out", "Linear", BASE_TWEEN,true) - end - end - end - end - - for i,entry in ipairs(TeamFrames) do - WaitForChild(entry['Frame'],'TitleFrame').Size=UDim2.new(0,BaseScreenXSize*.9,entry['Frame'].TitleFrame.Size.Y.Scale,0) - - end - for i,entry in ipairs(PlayerFrames) do - WaitForChild(entry['Frame'],'TitleFrame').Size=UDim2.new(0,BaseScreenXSize*.9,entry['Frame'].TitleFrame.Size.Y.Scale,0) - end - end -end - -function UpdateStatNames() - if not AreNamesExpanded.Value or IsMinimized.Value then - CloseNames() - else - ExpandNames() - end -end - -function ExpandNames() - if #ScoreNames ~= 0 then - for _,i in pairs(StatTitles:GetChildren()) do - Spawn(function()TweenProperty(i,'TextTransparency',i.TextTransparency,0,BASE_TWEEN) end) - end - HeaderFrameHeight=.09 - --as of writing, this and 'CloseNames' are the only places headerframe is resized - HeaderFrame:TweenSizeAndPosition(UDim2.new(HeaderFrame.Size.X.Scale, HeaderFrame.Size.X.Offset, HeaderFrameHeight,0), - HeaderFrame.Position,'Out','Linear',BASE_TWEEN*1.2,true) - TopClipFrame:TweenPosition(UDim2.new(TopClipFrame.Position.X.Scale,0,HeaderFrameHeight,0),'Out','Linear',BASE_TWEEN*1.2,true) - BottomShiftFrame:TweenPosition(UDim2.new(0,0,HeaderFrameHeight,0), "Out", 'Linear', BASE_TWEEN*1.2,true) - - end - -end - -function CloseNames() - if #ScoreNames ~= 0 then - HeaderFrameHeight=.07 - if not (IsMaximized.Value) then - for _,i in pairs(StatTitles:GetChildren()) do - Spawn(function()TweenProperty(i,'TextTransparency',i.TextTransparency,1,BASE_TWEEN) end) - end - end - BottomShiftFrame:TweenPosition(UDim2.new(0,0,HeaderFrameHeight,0), "Out", 'Linear', BASE_TWEEN*1.2,true) - HeaderFrame:TweenSizeAndPosition(UDim2.new(HeaderFrame.Size.X.Scale, HeaderFrame.Size.X.Offset, HeaderFrameHeight,0), - HeaderFrame.Position,'Out','Linear',BASE_TWEEN*1.2,true) - TopClipFrame:TweenPosition(UDim2.new(TopClipFrame.Position.X.Scale,0,HeaderFrameHeight,0),'Out','Linear',BASE_TWEEN*1.2,true) - end -end - -function OnScrollWheelMove(direction) - if not (IsTabified.Value or IsMinimized.Value or InPopupWaitForClick) then - local StartFrame = ListFrame.Position - local newFrameY = math.max(math.min(StartFrame.Y.Scale + (direction),GetMaxScroll()),GetMinScroll()) - - ListFrame.Position = UDim2.new(StartFrame.X.Scale,StartFrame.X.Offset,newFrameY,StartFrame.Y.Offset) - UpdateScrollPosition() - end -end - -function AttachScrollWheel() - if ScrollWheelConnections then return end - ScrollWheelConnections = {} - table.insert(ScrollWheelConnections,Mouse.WheelForward:connect(function() - OnScrollWheelMove(.05) - end)) - table.insert(ScrollWheelConnections,Mouse.WheelBackward:connect(function() - OnScrollWheelMove(-.05) - end)) -end - -function DetachScrollWheel() - if ScrollWheelConnections then - for _,i in pairs(ScrollWheelConnections) do - i:disconnect() - end - end - ScrollWheelConnections=nil -end - -FocusFrame.MouseEnter:connect(function() - if not (IsMinimized.Value or IsTabified.Value) then - AttachScrollWheel() - end -end) -FocusFrame.MouseLeave:connect(function() - --if not (IsMaximized.Value or IsMinimized.Value) then - DetachScrollWheel() - --end -end) - - ------------------------ - -- Scroll Bar functions - ------------------------ ---[[ - updates whether the scroll bar should be showing, if it is showing, updates - the size of it ---]] -function UpdateScrollBarVisibility() - if AreAllEntriesOnScreen() then - ScrollBar.BackgroundTransparency = 1 - else - ScrollBar.BackgroundTransparency = 0 - UpdateScrollBarSize() - end -end ---[[ - updates size of scrollbar depending on how many entries exist ---]] -function UpdateScrollBarSize() - local entryListSize = #MiddleFrameBackgrounds * MiddleTemplate.Size.Y.Scale - local shownAreaSize = ((BottomClipFrame.Position.Y.Scale) + 1) - ScrollBar.Size = UDim2.new(1,0,shownAreaSize/entryListSize,0) - -end ---[[ - updates position of listframe so that no gaps at the bottom or top of the list are visible - updates position of scrollbar to match what parts of the list are visible ---]] -function UpdateScrollPosition() - local minPos = GetMinScroll() - local maxPos = GetMaxScroll() - local scrollLength = maxPos - minPos - - local yscrollpos=math.max(math.min(ListFrame.Position.Y.Scale,maxPos),minPos) - ListFrame.Position=UDim2.new(ListFrame.Position.X.Scale,ListFrame.Position.X.Offset,yscrollpos,ListFrame.Position.Y.Offset) - - local adjustedLength = 1 - ScrollBar.Size.Y.Scale - ScrollBar.Position = UDim2.new(0,0,adjustedLength - (adjustedLength * ((ListFrame.Position.Y.Scale - minPos)/scrollLength)),0) -end - ---[[ - WARNING:this is in a working state, but uses massive hacks - revize when global input is available - Manages scrolling of the playerlist on mouse drag ---]] -function StartDrag(entry,startx,starty) - local startDragTime = tick() - local stopDrag = false - local openPanel = true - local draggedFrame = WaitForChild(entry['Frame'],'ClickListener') - local function dragExit() - stopDrag = true - - if entry['Player'] and SelectedPlayer and openPanel - and (entry['Player']~=LocalPlayer and (SelectedPlayer.userId>1 and LocalPlayer.userId>1)) then - ActivatePlayerEntryPanel(entry) - end - end - local startY = nil - local StartFrame = ListFrame.Position - local function dragpoll(nx,ny) - if not startY then - startY = AbsoluteToPercent(nx,ny).Y - end - local nowY = AbsoluteToPercent(nx,ny).Y - debugprint('drag dist:'..Vector2.new(startx-nx,starty-ny).magnitude) - if Vector2.new(startx-nx,starty-ny).magnitude>MOUSE_DRAG_DISTANCE then - openPanel=false - end - - local newFrameY = math.max(math.min(StartFrame.Y.Scale + (nowY - startY),GetMaxScroll()),GetMinScroll()) - ListFrame.Position = UDim2.new(StartFrame.X.Scale,StartFrame.X.Offset,newFrameY,StartFrame.Y.Offset) - UpdateScrollPosition() - end - WaitForClick(ScreenGui,dragpoll,dragExit) -end - - -function StartMinimizeDrag() - Delay(0,function() - local startTime=tick() - debugprint('Got Click2') - local stopDrag = false - local function dragExit() - --debugprint('undone click2') - if tick()-startTime<.25 then --was click - ToggleMinimize() - else --was drag - if (DefaultBottomClipPos >= -1+(#MiddleFrameBackgrounds*MiddleBGTemplate.Size.Y.Scale)) then - DidMinimizeDrag = false - else - DidMinimizeDrag = true - end - if IsMinimized.Value then - ToggleMinimize() - end - end - stopDrag = true - end - local startY = nil - local StartFrame = DefaultBottomClipPos - local function dragpoll(nx,ny) - if not IsMinimized.Value then - - if not startY then - startY = AbsoluteToPercent(nx,ny).Y - end - local nowY = AbsoluteToPercent(nx,ny).Y - local newFrameY - newFrameY = math.min(math.max(StartFrame + (nowY - startY),-1),-1+(#MiddleFrameBackgrounds*MiddleBGTemplate.Size.Y.Scale)) - DefaultBottomClipPos = newFrameY - UpdateMinimize() - ScrollBarFrame.Size= UDim2.new(ScrollBarFrame.Size.X.Scale,0,(DefaultBottomClipPos+BottomClipFrame.Size.Y.Scale),0) - ScrollBarFrame.Position= UDim2.new(ScrollBarFrame.Position.X.Scale,0,1-ScrollBarFrame.Size.Y.Scale,0) - UpdateScrollBarSize() - UpdateScrollPosition() - UpdateScrollBarVisibility() - - end - end - Spawn(function() WaitForClick(ScreenGui,dragpoll,dragExit) end) - end) - -end - - ------------------------------- - -- Input Callback functions - ------------------------------- -IsMaximized.Value=false -IsMinimized.Value=false -IsMaximized.Changed:connect(UpdateMaximize) -IsMinimized.Changed:connect(UpdateMinimize) - -ExtendButton.MouseButton1Down:connect(function() - if(time() - LastClick < ButtonCooldown) or InPopupWaitForClick then return end - LastClick = time() - if IsTabified.Value then - UnTabify() - else - StartMinimizeDrag() - end -end) - -MaximizeButton.MouseButton1Click:connect(function() - if(time() - LastClick < ButtonCooldown) or InPopupWaitForClick then return end - LastClick = time() - if IsTabified.Value then - UnTabify() - elseif not AreNamesExpanded.Value then - AreNamesExpanded.Value = true - BaseUpdate() - else - ToggleMaximize() - end -end) - -MaximizeButton.MouseButton2Click:connect(function() - if(time() - LastClick < ButtonCooldown) or InPopupWaitForClick then return end - LastClick = time() - if IsTabified.Value then - UnTabify() - elseif IsMaximized.Value then - ToggleMaximize() - elseif AreNamesExpanded.Value then - AreNamesExpanded.Value = false - BaseUpdate() - else - Tabify() - end -end) - - -------------------------------- --- MiddleFrames management -------------------------------- ---[[ - adds a background frame to the listframe ---]] -function AddMiddleBGFrame() - local nBGFrame = MiddleBGTemplate:Clone() - nBGFrame.Position = UDim2.new(.5,0,((#MiddleFrameBackgrounds) * nBGFrame.Size.Y.Scale),0) - nBGFrame.Background.BackgroundTransparency = 1 - - nBGFrame.Parent = ListFrame - table.insert(MiddleFrameBackgrounds,nBGFrame) - - if #MiddleFrameBackgrounds 1 do - fSize=fSize-1 - tHeader.FontSize=FONT_SIZES[fSize] - wait(.2) - end - HeaderName.FontSize=tHeader.FontSize - tHeader:Destroy() - end) -end -ScreenGui.Changed:connect(UpdateHeaderNameSize) - ---[[ - called only when the leaderstats object is added to a given player entry - removes old stats, adds any existing stats, and sets up listeners for new stats - @Args: - playerEntry A reference to the ENTRY(table) of the player who had leaderstats added ---]] -function LeaderstatsAdded(playerEntry) - --RemoveAllStats(playerEntry) - local nplayer = playerEntry['Player'] - for _,i in pairs(nplayer.leaderstats:GetChildren()) do - StatAdded(i,playerEntry) - end - nplayer.leaderstats.ChildAdded:connect(function(nchild) StatAdded(nchild,playerEntry) end) - nplayer.leaderstats.ChildRemoved:connect(function(nchild) StatRemoved(nchild,playerEntry) end) -end ---[[ - called when leaderstats object is removed from play in player entry - Note: may not be needed, might be able to just rely on leaderstats added - @Args: - oldLeaderstats leaderstats object to be removed - playerEntry A reference to the ENTRY(table) of the player ---]] -function LeaderstatsRemoved(oldLeaderstats,playerEntry) - while AddingFrameLock do debugprint('waiting to insert '..playerEntry['Player'].Name) wait(1/30) end - AddingFrameLock = true - RemoveAllStats(playerEntry) - AddingFrameLock = false -end - -function ClosePopUpPanel() - if SelectedPlayerEntry then - local tframe = SelectedPlayerEntry['Frame'] - Spawn(function() TweenProperty(tframe,'BackgroundTransparency',.5,1,BASE_TWEEN) end) - end - PopUpPanel:TweenPosition(UDim2.new(1,0,0,0), "Out", "Linear", BASE_TWEEN,true) - wait(.1) - InPopupWaitForClick= false - SelectedPlayerEntry = nil -end - ---[[ - prepares the needed popup to be tweened on screen, and updates the position of the popup clip - frame to match the selected player frame's position ---]] -function InitMovingPanel( entry, player) - PopUpClipFrame.Parent= ScreenGui - - if PopUpPanel then - PopUpPanel:Destroy() - end - PopUpPanel= PopUpPanelTemplate:Clone() - PopUpPanel.Parent= PopUpClipFrame - - local nextIndex = 2 - local friendStatus = GetFriendStatus(player) - debugprint (tostring(friendStatus)) - local showRankMenu = IsPersonalServer and LocalPlayer.PersonalServerRank >= PrivilegeLevel['Admin'] and LocalPlayer.PersonalServerRank > SelectedPlayer.PersonalServerRank - - - local ReportPlayerButton = MakePopupButton(PopUpPanel,'Report Player',0) - ReportPlayerButton.MouseButton1Click:connect(function() OpenAbuseDialog() end) - - local enableFriendRequests = true - - if enableFriendRequests then - local FriendPlayerButton = MakePopupButton(PopUpPanel,'Friend',1, not showRankMenu and friendStatus~=Enum.FriendStatus.FriendRequestReceived) - FriendPlayerButton.MouseButton1Click:connect(OnFriendButtonSelect) - - - if friendStatus==Enum.FriendStatus.Friend then - FriendPlayerButton:FindFirstChild('ButtonText').Text='UnFriend Player' - elseif friendStatus==Enum.FriendStatus.Unknown or friendStatus==Enum.FriendStatus.NotFriend then - FriendPlayerButton:FindFirstChild('ButtonText').Text='Send Request' - elseif friendStatus==Enum.FriendStatus.FriendRequestSent then - FriendPlayerButton:FindFirstChild('ButtonText').Text='Revoke Request' - elseif friendStatus==Enum.FriendStatus.FriendRequestReceived then - FriendPlayerButton:FindFirstChild('ButtonText').Text='Accept Friend' - local FriendRefuseButton = MakePopupButton(PopUpPanel,'Decline Friend',2,not showRankMenu) - FriendRefuseButton.MouseButton1Click:connect(OnFriendRefuseButtonSelect) - nextIndex=nextIndex+1 - end - end - - if showRankMenu then - local BanPlayerButton = MakePopupButton(PopUpPanel,'Ban',nextIndex) - local VisitorButton = MakePopupButton(PopUpPanel,'Visitor',nextIndex+1) - local MemberButton = MakePopupButton(PopUpPanel,'Member',nextIndex+2) - local AdminButton = MakePopupButton(PopUpPanel,'Admin',nextIndex+3,true) - - BanPlayerButton.MouseButton1Click:connect(function() - OnPrivilegeLevelSelect(player,PrivilegeLevel['Banned'],BanPlayerButton,VisitorButton,MemberButton,AdminButton) - end) - VisitorButton.MouseButton1Click:connect(function() - OnPrivilegeLevelSelect(player,PrivilegeLevel['Visitor'],BanPlayerButton,VisitorButton,MemberButton,AdminButton) - end) - MemberButton.MouseButton1Click:connect(function() - OnPrivilegeLevelSelect(player,PrivilegeLevel['Member'],BanPlayerButton,VisitorButton,MemberButton,AdminButton) - end) - AdminButton.MouseButton1Click:connect(function() - OnPrivilegeLevelSelect(player,PrivilegeLevel['Admin'],BanPlayerButton,VisitorButton,MemberButton,AdminButton) - end) - - HighlightMyRank(SelectedPlayer,BanPlayerButton,VisitorButton,MemberButton,AdminButton) - end - - PopUpPanel:TweenPosition(UDim2.new(0,0,0,0), "Out", "Linear", BASE_TWEEN,true) - Delay(0, function() - local tconnection - tconnection = Mouse.Button1Down:connect(function() - tconnection:disconnect() - ClosePopUpPanel() - end) - end) - - local myFrame = entry['Frame'] - -- THIS IS GARBAGE. - -- if I parent to frame to auto update position, it gets clipped - -- sometimes garbage is the only option. - Spawn(function() - while InPopupWaitForClick do - PopUpClipFrame.Position=UDim2.new( 0,myFrame.AbsolutePosition.X-PopUpClipFrame.Size.X.Offset,0,myFrame.AbsolutePosition.Y) - wait() - end - end) - -end - ---[[ - Called when a player entry in the leaderboard is clicked - either will highlight entry and start the drag event, or open a popup menu - @Args: - entry the player entry clicked ---]] -function OnPlayerEntrySelect(entry,startx,starty) - - if not InPopupWaitForClick then - - SelectedPlayerEntry = entry - SelectedPlayer = entry['Player'] - - StartDrag(entry,startx,starty) - end - - -end - -function ActivatePlayerEntryPanel(entry) - entry['Frame'].BackgroundColor3 = Color3.new(0,1,1) - Spawn(function() TweenProperty(entry['Frame'],'BackgroundTransparency',1,.5,.5) end) - InPopupWaitForClick=true - InitMovingPanel(entry,entry['Player']) -end - ---[[ - the basic update for the playerlist mode's state, - assures the order and length of the player frames ---]] -function PlayerListModeUpdate() - RecreateScoreColumns(PlayerFrames) - table.sort(PlayerFrames,PlayerSortFunction) - for i,val in ipairs(PlayerFrames) do - MiddleFrames[i] = val['Frame'] - end - for i = #PlayerFrames + 1,#MiddleFrames,1 do - MiddleFrames[i] = nil - end - UpdateMinimize() -end ---[[ - this one's a doozie, happens when a player is added to the game - inits their player frame and player entry, assigns them to a team if possible, - and hooks up their leaderstats - @Args: - nplayer new player object to insert ---]] -function InsertPlayerFrame(nplayer) - while AddingFrameLock do debugprint('waiting to insert '..nplayer.Name) wait(1/30) end - AddingFrameLock = true - - local nFrame = MiddleTemplate:Clone() - nFrame.ClickListener.BackgroundColor3 = Color3.new(0,0,0) - nFrame.ClickListener.BackgroundTransparency = BACKGROUND_TRANSPARENCY - nFrame.ClickListener.AutoButtonColor=false - - local playerName = nplayer.Name - local clansEnabled, clanTag = pcall(function() nplayer:GetClanTag() end) - if clansEnabled and clanTag and clanTag ~= "" then - playerName = "[" .. tostring(clanTag) .. "] " .. playerName - end - - WaitForChild(WaitForChild(nFrame,'TitleFrame'),'Title').Text = playerName - - nFrame.Position = UDim2.new(1,0,((#MiddleFrames) * nFrame.Size.Y.Scale),0) - - local nfriendstatus = GetFriendStatus(nplayer) - - nFrame:FindFirstChild('BCLabel').Image = getMembershipTypeIcon(nplayer.MembershipType,nplayer.Name) - nFrame:FindFirstChild('FriendLabel').Image = getFriendStatusIcon(nfriendstatus) - nFrame.Name = nplayer.Name - WaitForChild(WaitForChild(nFrame,'TitleFrame'),'Title').Text = playerName - - --move for bc label - nFrame.FriendLabel.Position=nFrame.FriendLabel.Position+UDim2.new(0,17,0,0) - nFrame.TitleFrame.Title.Position=nFrame.TitleFrame.Title.Position+UDim2.new(0,17,0,0) - - if(nFrame:FindFirstChild('FriendLabel').Image ~= '') then - nFrame.TitleFrame.Title.Position=nFrame.TitleFrame.Title.Position+UDim2.new(0,17,0,0) - end - - if nplayer.Name == LocalPlayer.Name then - nFrame.TitleFrame.Title.Font = 'ArialBold' - nFrame.PlayerScore.Font = 'ArialBold' - ChangeHeaderName(playerName) - local dropShadow = nFrame.TitleFrame.Title:Clone() - dropShadow.TextColor3 = Color3.new(0,0,0) - dropShadow.TextTransparency=0 - dropShadow.ZIndex=2 - dropShadow.Position=nFrame.TitleFrame.Title.Position+UDim2.new(0,1,0,1) - dropShadow.Name='DropShadow' - dropShadow.Parent= nFrame.TitleFrame - else - --Delay(2, function () OnFriendshipChanged(nplayer,LocalPlayer:GetFriendStatus(nplayer)) end) - end - nFrame.TitleFrame.Title.Font = 'ArialBold' - - - nFrame.Parent = ListFrame - nFrame.Position = UDim2.new(.5,0,((#MiddleFrames) * nFrame.Size.Y.Scale),0) - UpdateMinimize() - local nentry = {} - nentry['Frame'] = nFrame - nentry['Player'] = nplayer - nentry['ID'] = AddId - AddId = AddId + 1 - table.insert(PlayerFrames,nentry) - if #TeamFrames~=0 then - - if nplayer.Neutral then - nentry['MyTeam'] = nil - if not NeutralTeam then - AddNeutralTeam() - else - AddPlayerToTeam(NeutralTeam,nentry) - end - - else - local addedToTeam=false - for i,tval in ipairs(TeamFrames) do - if tval['MyTeam'].TeamColor == nplayer.TeamColor then - AddPlayerToTeam(tval,nentry) - nentry['MyTeam'] = tval - addedToTeam=true - end - end - if not addedToTeam then - nentry['MyTeam']=nil - if not NeutralTeam then - AddNeutralTeam() - else - AddPlayerToTeam(NeutralTeam,nentry) - end - nentry['MyTeam'] = NeutralTeam - end - end - - end - - if nplayer:FindFirstChild('leaderstats') then - LeaderstatsAdded(nentry) - end - - nplayer.ChildAdded:connect(function(nchild) - if nchild.Name == 'leaderstats' then - while AddingFrameLock do debugprint('in adding leaderstats lock') wait(1/30) end - if not nplayer:FindFirstChild("leaderstats") then return end - AddingFrameLock = true - LeaderstatsAdded(nentry) - AddingFrameLock = false - end - end) - - nplayer.ChildRemoved:connect(function (nchild) - if nplayer==LocalPlayer and nchild.Name == 'leaderstats' then - LeaderstatsRemoved(nchild,nentry) - end - end) - nplayer.Changed:connect(function(prop)PlayerChanged(nentry,prop) end) - - local listener = WaitForChild(nFrame,'ClickListener') - listener.Active = true - listener.MouseButton1Down:connect(function(nx,ny) OnPlayerEntrySelect(nentry, nx,ny) end) - - AddMiddleBGFrame() - BaseUpdate() - AddingFrameLock = false -end - ---[[ - Note:major optimization can be done here - removes this player's frame if it exists, calls base update ---]] -function RemovePlayerFrame(tplayer) - while AddingFrameLock do debugprint('in removing player frame lock') wait(1/30) end - AddingFrameLock = true - - local tteam - for i,key in ipairs(PlayerFrames) do - if tplayer == key['Player'] then - if PopUpClipFrame.Parent == key['Frame'] then - PopUpClipFrame.Parent = nil - end - key['Frame']:Destroy() - tteam=key['MyTeam'] - table.remove(PlayerFrames,i) - end - end - if tteam then - for j,tentry in ipairs(tteam['MyPlayers']) do - if tentry['Player'] == tplayer then - RemovePlayerFromTeam(tteam,j) - end - end - end - - RemoveMiddleBGFrame() - UpdateMinimize() - BaseUpdate() - AddingFrameLock = false -end - -Players.ChildRemoved:connect(RemovePlayerFrame) - ----------------------------- --- Team Callback Functions ----------------------------- ---[[ - turns a list of team entries with sub lists of players into a single ordered - list, in the correct order,and of the correct length - @Args: - tframes the team entries to unroll - outframes the list to unroll these entries into ---]] -function UnrollTeams(tframes,outframes) - local numEntries = 0 - if NeutralTeam and not NeutralTeam['IsHidden'] then - for i,val in ipairs(NeutralTeam['MyPlayers']) do - numEntries = numEntries + 1 - outframes[numEntries] = val['Frame'] - end - numEntries = numEntries + 1 - outframes[numEntries] = NeutralTeam['Frame'] - end - for i,val in ipairs(tframes) do - if not val['IsHidden'] then - for j,pval in ipairs(val.MyPlayers) do - numEntries = numEntries + 1 - outframes[numEntries] = pval['Frame'] - end - numEntries = numEntries + 1 - outframes[numEntries] = val['Frame'] - end - end - -- clear any additional entries from outframes - for i = numEntries + 1,#outframes,1 do - outframes[i] = nil - end -end ---[[ - uses lua's table.sort to sort the teams ---]] -function TeamSortFunc(a,b) - if a['TeamScore'] == b['TeamScore'] then - return a['ID'] < b['ID'] - end - if not a['TeamScore'] then return false end - if not b['TeamScore'] then return true end - return a['TeamScore'] < b['TeamScore'] - -end ---[[ - consider adding lock with wait for performance - sorts each of the team's player lists induvidually, adds up the team scores. - @Args: - tentries table of team entries ---]] -function SortTeams(tentries) - - for i,val in ipairs(tentries) do - - table.sort(val['MyPlayers'],PlayerSortFunction) - AddTeamScores(val) - end - table.sort(tentries,TeamSortFunc) -end ---[[ - base update for team mode, adds up the scores of all teams, sorts them, - then unrolls them into middleframes ---]] -function TeamListModeUpdate() - RecreateScoreColumns(PlayerFrames) - SortTeams(TeamFrames) - if NeutralTeam then - AddTeamScores(NeutralTeam) - --RecreateScoreColumns(NeutralTeam['MyPlayers']) - end - UnrollTeams(TeamFrames,MiddleFrames) -end ---[[ - adds up all the score of this team's players to form the team score - @Args: - team team entry to sum the scores of ---]] -function AddTeamScores(team) - - for j = 1, #ScoreNames,1 do - local i = ScoreNames[j] - local tscore = 0 - for _,j in ipairs(team['MyPlayers']) do - local tval = j['Player']:FindFirstChild('leaderstats') and j['Player'].leaderstats:FindFirstChild(i['Name']) - if tval and not tval:IsA('StringValue') then - tscore = tscore + GetScoreValue((j['Player'].leaderstats)[i['Name'] ]) - end - end - if team['Frame']:FindFirstChild(i['Name']) then - --team['Frame'][i['Name'] ].Size = UDim2.new(1 - (ScrollBarFrame.Size.X.Scale * 2),- ((j-1) * SpacingPerStat),1,0) - team['Frame'][i['Name'] ].Text = tostring(tscore) - end - end - UpdateMinimize() - -end - ---[[ - finds previous team this player was on, and if it exists calls removeplayerfromteam - @Args - entry Player entry ---]] -function FindRemovePlayerFromTeam(entry) - if entry['MyTeam'] then - for j,oldEntry in ipairs(entry['MyTeam']['MyPlayers']) do - if oldEntry['Player'] == entry['Player'] then - RemovePlayerFromTeam(entry['MyTeam'],j) - return - end - end - elseif NeutralTeam then - for j,oldEntry in ipairs(NeutralTeam['MyPlayers']) do - if oldEntry['Player'] == entry['Player'] then - RemovePlayerFromTeam(NeutralTeam,j) - return - end - end - end -end ---[[ - removes a single player from a given team (not usually called directly) - @Args: - teamEntry team entry to remove player from - index index of player in 'MyPlayers' list to remove ---]] -function RemovePlayerFromTeam(teamEntry,index) - table.remove(teamEntry['MyPlayers'],index) - --if teamEntry['AutoHide'] and #teamEntry['MyPlayers'] == 0 then - if teamEntry==NeutralTeam and #teamEntry['MyPlayers']==0 then - RemoveNeutralTeam() - end -end ---[[ - adds player entry entry to teamentry - removes them from any previous team - @Args: - teamEntry entry of team to add player to - entry player entry to add to this team ---]] -function AddPlayerToTeam(teamEntry,entry) - FindRemovePlayerFromTeam(entry) - table.insert(teamEntry['MyPlayers'],entry) - entry['MyTeam'] = teamEntry - if teamEntry['IsHidden'] then - teamEntry['Frame'].Parent = ListFrame - AddMiddleBGFrame() - end - teamEntry['IsHidden'] = false -end - - -function SetPlayerToTeam(entry) - FindRemovePlayerFromTeam(entry) - -- check to see if team exists, if it does add to that team - local setToTeam = false - for i,tframe in ipairs(TeamFrames) do - -- add my entry on the new team - if tframe['MyTeam'].TeamColor == entry['Player'].TeamColor then - AddPlayerToTeam(tframe,entry) - setToTeam = true - end - end - -- if player was set to an invalid team, then set it back to neutral - if not setToTeam and #(game.Teams:GetTeams())>0 then - debugprint(entry['Player'].Name..'could not find team') - entry['MyTeam']=nil - if not NeutralTeam then - AddNeutralTeam() - else AddPlayerToTeam(NeutralTeam,entry) end - end -end - ---[[ - Note:another big one, consiter breaking up - called when any children of player changes - handles 'Neutral', teamColor, Name and MembershipType changes - @Args - entry Player entry changed - property name of property changed ---]] -function PlayerChanged(entry, property) - while PlayerChangedLock do - debugprint('in playerchanged lock') - wait(1/30) - end - PlayerChangedLock=true - if property == 'Neutral' then - -- if player changing to neutral - if entry['Player'].Neutral and #(game.Teams:GetTeams())>0 then - debugprint(entry['Player'].Name..'setting to neutral') - FindRemovePlayerFromTeam(entry) - entry['MyTeam']=nil - if not NeutralTeam then - debugprint(entry['Player'].Name..'creating neutral team') - AddNeutralTeam() - else - debugprint(entry['Player'].Name..'adding to neutral team') - AddPlayerToTeam(NeutralTeam,entry) - end - elseif #(game.Teams:GetTeams())>0 then -- else player switching to a team, or a weird edgecase - debugprint(entry['Player'].Name..'has been set non-neutral') - SetPlayerToTeam(entry) - end - BaseUpdate() - elseif property == 'TeamColor' and not entry['Player'].Neutral and entry['Player'] ~= entry['MyTeam'] then - debugprint(entry['Player'].Name..'setting to new team') - SetPlayerToTeam(entry) - BaseUpdate() - elseif property == 'Name' or property == 'MembershipType' then - entry['Frame']:FindFirstChild('BCLabel').Image = getMembershipTypeIcon(entry['Player'].MembershipType,entry['Player'].Name) - entry['Frame'].Name = entry['Player'].Name - entry['Frame'].TitleFrame.Title.Text = entry['Player'].Name - if(entry['Frame'].BCLabel.Image ~= '') then - entry['Frame'].TitleFrame.Title.Position=UDim2.new(.01, 30, .1, 0) - end - if entry['Player'] == LocalPlayer then - entry['Frame'].TitleFrame.DropShadow.Text= entry['Player'].Name - ChangeHeaderName(entry['Player'].Name) - end - BaseUpdate() - end - PlayerChangedLock=false -end - -function OnFriendshipChanged(player,friendStatus) - - Delay(.5,function() - debugprint('friend status changed for:'..player.Name .." ".. tostring(friendStatus) .. " vs " .. tostring(GetFriendStatus(player)) ) - for _, entry in ipairs(PlayerFrames) do - if entry['Player']==player then - local nicon = getFriendStatusIcon(friendStatus) - if nicon == '' and entry['Frame'].FriendLabel.Image ~= '' then - entry['Frame'].TitleFrame.Title.Position=entry['Frame'].TitleFrame.Title.Position-UDim2.new(0,17,0,0) - elseif nicon ~= '' and entry['Frame'].FriendLabel.Image == '' then - entry['Frame'].TitleFrame.Title.Position=entry['Frame'].TitleFrame.Title.Position+UDim2.new(0,17,0,0) - debugprint('confirmed status:'..player.Name) - end - entry['Frame'].FriendLabel.Image = nicon - return - end - end - end) -end - -LocalPlayer.FriendStatusChanged:connect(OnFriendshipChanged) - ---[[ - adds a neutral team if nessisary - Note: a lot of redundant code here, might want to refactor to share a function with insertteamframe ---]] -function AddNeutralTeam() - while NeutralTeamLock do debugprint('in neutral team 2 lock') wait() end - NeutralTeamLock = true - - local defaultTeam = Instance.new('Team') - defaultTeam.TeamColor = BrickColor.new('White') - defaultTeam.Name = 'Neutral' - local nentry = {} - nentry['MyTeam'] = defaultTeam - nentry['MyPlayers'] = {} - nentry['Frame'] = MiddleTemplate:Clone() - WaitForChild(WaitForChild(nentry['Frame'],'TitleFrame'),'Title').Text = defaultTeam.Name - nentry['Frame'].TitleFrame.Position=UDim2.new(nentry['Frame'].TitleFrame.Position.X.Scale,nentry['Frame'].TitleFrame.Position.X.Offset,.1,0) - nentry['Frame'].TitleFrame.Size=UDim2.new(nentry['Frame'].TitleFrame.Size.X.Scale,nentry['Frame'].TitleFrame.Size.X.Offset,.8,0) - nentry['Frame'].TitleFrame.Title.Font = 'ArialBold' - nentry['Frame'].Position = UDim2.new(1,0,((#MiddleFrames) * nentry['Frame'].Size.Y.Scale),0) - WaitForChild(nentry['Frame'],'ClickListener').MouseButton1Down:connect(function(nx,ny) StartDrag(nentry,nx,ny) end) - nentry['Frame'].ClickListener.BackgroundColor3 = Color3.new(1,1,1) - nentry['Frame'].ClickListener.BackgroundTransparency = BACKGROUND_TRANSPARENCY - nentry['Frame'].ClickListener.AutoButtonColor=false - nentry['AutoHide'] = true - nentry['IsHidden'] = true - for _,i in pairs(PlayerFrames) do - if i['Player'].Neutral or not i['MyTeam'] then - AddPlayerToTeam(nentry,i) - end - end - if #nentry['MyPlayers'] > 0 then - NeutralTeam = nentry - UpdateMinimize() - BaseUpdate() - end - NeutralTeamLock = false -end - -function RemoveNeutralTeam() - while NeutralTeamLock do debugprint('in neutral team lock') wait() end - NeutralTeamLock = true - NeutralTeam['Frame']:Destroy() - NeutralTeam=nil - RemoveMiddleBGFrame() - NeutralTeamLock = false -end - ---[[ - ---]] -function TeamScoreChanged(entry,nscore) - WaitForChild(entry['Frame'],'PlayerScore').Text = tostring(nscore) - entry['TeamScore'] = nscore -end ---[[ - called when child added to a team, used for autohide functionality - Note: still has teamscore, consiter removing ---]] -function TeamChildAdded(entry,nchild) - if nchild.Name == 'AutoHide' then - entry['AutoHide'] = true - elseif nchild.Name == 'TeamScore' then - WaitForChild(entry['Frame'],'PlayerScore').Text = tostring(nchild.Value) - entry['TeamScore'] = nchild.Value - nchild.Changed:connect(function() TeamScoreChanged(entry,nchild.Value) end) - end -end ---[[ - called when child added to a team, used for autohide functionality - Note: still has teamscore, consiter removing ---]] -function TeamChildRemoved(entry,nchild) - if nchild.Name == 'AutoHide' then - entry['AutoHide'] = false - elseif nchild.Name == 'TeamScore' then - WaitForChild(entry['Frame'],'PlayerScore').Text = "" - entry['TeamScore'] = nil - end -end - -function TeamChanged(entry, property) - if property=='Name' then - WaitForChild(WaitForChild(entry['Frame'],'TitleFrame'),'Title').Text = entry['MyTeam'].Name - - elseif property=='TeamColor' then - entry['Frame'].ClickListener.BackgroundColor3 = entry['MyTeam'].TeamColor.Color - - for _,i in pairs(TeamFrames) do - if i['MyTeam'].TeamColor == entry['MyTeam'] then - RemoveTeamFrame(entry['MyTeam']) --NO DUPLICATE TEAMS! - end - end - - entry['MyPlayers']={} - - for _,i in pairs(PlayerFrames) do - SetPlayerToTeam(i) - end - BaseUpdate() - end -end - ---[[ - creates team entry and frame for this team, sets up listeners for this team - adds any players intended for this team,Creates neutral team if this is the first team added - Note:might be best to break this into multiple functions to simplify - @Args: - nteam new team object added ---]] -function InsertTeamFrame(nteam) - while AddingFrameLock do debugprint('in adding team frame lock') wait(1/30) end - AddingFrameLock = true - --for _,i in pairs(TeamFrames) do - local nentry = {} - nentry['MyTeam'] = nteam - nentry['MyPlayers'] = {} - nentry['Frame'] = MiddleTemplate:Clone() - WaitForChild(WaitForChild(nentry['Frame'],'TitleFrame'),'Title').Text = nteam.Name - nentry['Frame'].TitleFrame.Title.Font = 'ArialBold' - nentry['Frame'].TitleFrame.Title.FontSize = 'Size18' - nentry['Frame'].Position = UDim2.new(0.5,0,((#MiddleFrames) * nentry['Frame'].Size.Y.Scale),0) - WaitForChild(nentry['Frame'],'ClickListener').MouseButton1Down:connect(function(nx,ny) StartDrag(nentry,nx,ny) end) - nentry['Frame'].ClickListener.BackgroundColor3 = nteam.TeamColor.Color - nentry['Frame'].ClickListener.BackgroundTransparency = BACKGROUND_TRANSPARENCY - nentry['Frame'].ClickListener.AutoButtonColor=false - AddId = AddId + 1 - nentry['ID'] = AddId - nentry['AutoHide'] = false - if nteam:FindFirstChild('AutoHide') then - nentry['AutoHide'] = true - end - if nteam:FindFirstChild('TeamScore') then - TeamChildAdded(nentry,nteam.TeamScore) - - end - - nteam.ChildAdded:connect(function(nchild) TeamChildAdded(nentry,nchild) end) - nteam.ChildRemoved:connect(function(nchild) TeamChildRemoved(nentry,nchild) end) - nteam.Changed:connect(function(prop) TeamChanged(nentry,prop) end) - - for _,i in pairs(PlayerFrames) do - if not i['Player'].Neutral and i['Player'].TeamColor == nteam.TeamColor then - AddPlayerToTeam(nentry,i) - end - end - nentry['IsHidden'] = false - if not nentry['AutoHide'] or #nentry['MyPlayers'] > 0 then - nentry['Frame'].Parent = ListFrame - AddMiddleBGFrame() - else - nentry['IsHidden'] = true - nentry['Frame'].Parent = nil - end - - table.insert(TeamFrames,nentry) - UpdateMinimize() - BaseUpdate() - if #TeamFrames == 1 and not NeutralTeam then - AddNeutralTeam() - end - AddingFrameLock = false -end ---[[ - removes team from team list - @Args: - nteam Teamobject to remove ---]] -function RemoveTeamFrame(nteam) - while AddingFrameLock do debugprint('in removing team frame lock') wait(1/30) end - AddingFrameLock = true - if IsMinimized.Value then - end - local myEntry - for i,key in ipairs(TeamFrames) do - if nteam == key['MyTeam'] then - myEntry = key - key['Frame']:Destroy() - table.remove(TeamFrames,i) - end - end - if #TeamFrames==0 then - debugprint('removeteamframe, remove neutral') - if NeutralTeam then - RemoveNeutralTeam() - end - end - for i,key in ipairs(myEntry['MyPlayers']) do - RemovePlayerFromTeam(myEntry,i) - PlayerChanged(key, 'TeamColor') - end - RemoveMiddleBGFrame() - BaseUpdate() - AddingFrameLock = false -end - -function TeamAdded(nteam) - InsertTeamFrame(nteam) -end - -function TeamRemoved(nteam) - RemoveTeamFrame(nteam) -end - --------------------------------- ---[[ - called when ANYTHING changes the state of the playerlist - re-sorts everything,assures correct positions of all elements ---]] -function BaseUpdate() - while BaseUpdateLock do debugprint('in baseupdate lock') wait(1/30) end - BaseUpdateLock = true - --print ('baseupdate') - UpdateStatNames() - - if #TeamFrames == 0 and not NeutralTeam then - PlayerListModeUpdate() - else - TeamListModeUpdate() - end - for i,key in ipairs(MiddleFrames) do - if key.Parent ~= nil then - key.Position = UDim2.new(.5,0,((#MiddleFrames - (i)) * key.Size.Y.Scale),0) - end - end - if not IsMinimized.Value and #MiddleFrames>DefaultEntriesOnScreen then - UpdateScrollPosition() - end - - UpdateMinimize() - - UpdateScrollBarSize() - UpdateScrollPosition() - - UpdateScrollBarVisibility() - --debugprint('EndBaseUpdate') - BaseUpdateLock = false -end - ---[[ - code for attaching tab key to maximizing player list ---]] -game.GuiService:AddKey("\t") -local LastTabTime = time() -game.GuiService.KeyPressed:connect( -function(key) - if key == "\t" then - debugprint('caught tab key') - local modalCheck, isModal = pcall(function() return game.GuiService.IsModalDialog end) - if modalCheck == false or (modalCheck and isModal == false) then - if time() - LastTabTime > 0.4 then - LastTabTime = time() - if IsTabified.Value then - if not IsMaximized.Value then - ScreenGui:TweenPosition(UDim2.new(0, 0, 0,0),'Out','Linear',BASE_TWEEN*1.2,true) - IsMaximized.Value = true - else - ScreenGui:TweenPosition(UDim2.new(NormalBounds.X.Scale, NormalBounds.X.Offset-10, 0,0),'Out','Linear',BASE_TWEEN*1.2,true) - IsMaximized.Value = false - IsMinimized.Value=true - end - else - ToggleMaximize() - end - - end - end - end -end) - - -function PlayersChildAdded(tplayer) - if tplayer:IsA('Player') then - Spawn(function() debugPlayerAdd(tplayer) end) - else - BlowThisPopsicleStand() - end -end - -function coreGuiChanged(coreGuiType, enabled) - if coreGuiType == Enum.CoreGuiType.All or coreGuiType == Enum.CoreGuiType.PlayerList then - MainFrame.Visible = enabled - end -end - -function TeamsChildAdded(nteam) - if nteam:IsA('Team') then - TeamAdded(nteam) - else - BlowThisPopsicleStand() - end -end - -function TeamsChildRemoved(nteam) - if nteam:IsA('Team') then - TeamRemoved(nteam) - else - BlowThisPopsicleStand() - end -end - - ---------------------------- - -- Hookups and initialization - ---------------------------- -function debugPlayerAdd(p) - InsertPlayerFrame(p) -end - -pcall(function() - coreGuiChanged(Enum.CoreGuiType.PlayerList, Game.StarterGui:GetCoreGuiEnabled(Enum.CoreGuiType.PlayerList)) - Game.StarterGui.CoreGuiChangedSignal:connect(coreGuiChanged) -end) - -while not game:GetService('Teams') do wait(1/30) debugprint('Waiting For Teams') end -for _,i in pairs(game.Teams:GetTeams()) do TeamAdded(i) end -for _,i in pairs(Players:GetPlayers()) do Spawn(function() debugPlayerAdd(i) end) end - -game.Teams.ChildAdded:connect(TeamsChildAdded) -game.Teams.ChildRemoved:connect(TeamsChildRemoved) -Players.ChildAdded:connect(PlayersChildAdded) - -InitReportAbuse() -AreNamesExpanded.Value = true -BaseUpdate() - - - ---UGGGLY,find a better way later -wait(2) -IsPersonalServer= not not game.Workspace:FindFirstChild("PSVariable") - - ---------------------------- - -- Running Logic - ---------------------------- - - --debug stuffs, will only run for 'newplayerlistisbad' - if LocalPlayer.Name == 'newplayerlistisbad' or LocalPlayer.Name == 'imtotallyadmin' then - debugFrame.Parent = ScreenGui - Spawn(function() - while true do - local str_players='' - for _,i in pairs(game.Players:GetPlayers()) do - str_players= str_players .." " .. i.Name - end - debugplayers.Text=str_players - wait(.5) - end - end) - end - - diff --git a/assets/ugc/868 b/assets/ugc/868 deleted file mode 100644 index 224a706..0000000 --- a/assets/ugc/868 +++ /dev/null @@ -1,869 +0,0 @@ ---rbxassetid%868% --- This script creates almost all gui elements found in the backpack (warning: there are a lot!) --- TODO: automate this process - -if game.CoreGui.Version < 3 then return end -- peace out if we aren't using the right client - -local gui = script.Parent - --- A couple of necessary functions -local function waitForChild(instance, name) - while not instance:FindFirstChild(name) do - instance.ChildAdded:wait() - end -end -local function waitForProperty(instance, property) - while not instance[property] do - instance.Changed:wait() - end -end - -local function IsTouchDevice() - return Game:GetService('UserInputService').TouchEnabled -end - -local function IsPhone() - if Game:GetService("GuiService"):GetScreenResolution().Y <= 500 and IsTouchDevice() then - return true - end - return false -end - -waitForChild(game,"Players") -waitForProperty(game.Players,"LocalPlayer") -local player = game.Players.LocalPlayer - --- First up is the current loadout -local CurrentLoadout = Instance.new("Frame") -CurrentLoadout.Name = "CurrentLoadout" -CurrentLoadout.Position = UDim2.new(0.5, -300, 1, -85) -CurrentLoadout.Size = UDim2.new(0, 600, 0, 54) -CurrentLoadout.BackgroundTransparency = 1 -CurrentLoadout.RobloxLocked = true -CurrentLoadout.Parent = gui - -local CLBackground = Instance.new('ImageLabel') -CLBackground.Name = 'Background'; -CLBackground.Size = UDim2.new(1.2, 0, 1.2, 0); -CLBackground.Image = "http://www.mete0r.xyz/asset/?id=96536002" -CLBackground.BackgroundTransparency = 1.0; -CLBackground.Position = UDim2.new(-0.1, 0, -0.1, 0); -CLBackground.ZIndex = 0.0; -CLBackground.Parent = CurrentLoadout -CLBackground.Visible = false - -local Debounce = Instance.new("BoolValue") -Debounce.Name = "Debounce" -Debounce.RobloxLocked = true -Debounce.Parent = CurrentLoadout - -local BackpackButton = Instance.new("ImageButton") -BackpackButton.RobloxLocked = true -BackpackButton.Visible = false -BackpackButton.Name = "BackpackButton" -BackpackButton.BackgroundTransparency = 1 -BackpackButton.Image = "rbxasset://textures/ui/Backpack_Open.png" -BackpackButton.Position = UDim2.new(0.5, -7, 1, -55) -BackpackButton.Size = UDim2.new(0, 14, 0, 9) -waitForChild(gui,"ControlFrame") -BackpackButton.Parent = gui.ControlFrame - -local NumSlots = 9 - -if IsPhone() then - NumSlots = 3 - CurrentLoadout.Size = UDim2.new(0,180,0,54) - CurrentLoadout.Position = UDim2.new(0.5,-90,1,-85) -end - -for i = 0, NumSlots do - local slotFrame = Instance.new("Frame") - slotFrame.RobloxLocked = true - slotFrame.BackgroundColor3 = Color3.new(0,0,0) - slotFrame.BackgroundTransparency = 1 - slotFrame.BorderColor3 = Color3.new(1, 1, 1) - slotFrame.BorderSizePixel = 0 - slotFrame.Name = "Slot" .. tostring(i) - slotFrame.ZIndex = 4.0 - if i == 0 then - slotFrame.Position = UDim2.new(0.9, 48, 0, 0) - else - slotFrame.Position = UDim2.new((i - 1) * 0.1, (i-1)* 6,0,0) - end - - - slotFrame.Size = UDim2.new(0, 54, 1, 0) - slotFrame.Parent = CurrentLoadout - - if gui.AbsoluteSize.Y <= 320 then - slotFrame.Position = UDim2.new(0, (i-1)* 60, 0, -50) - end - if gui.AbsoluteSize.Y <= 320 and i == 0 then - slotFrame:Destroy() - end -end - -local TempSlot = Instance.new("ImageButton") -TempSlot.Name = "TempSlot" -TempSlot.Active = true -TempSlot.Size = UDim2.new(1,0,1,0) -TempSlot.BackgroundTransparency = 1.0 -TempSlot.Style = 'Custom' -TempSlot.Visible = false -TempSlot.RobloxLocked = true -TempSlot.Parent = CurrentLoadout -TempSlot.ZIndex = 3.0 - - local slotBackground = Instance.new('Frame') - slotBackground.Name = 'Background' - slotBackground.BackgroundTransparency = 1.0 - slotBackground.Style = "DropShadow" - slotBackground.Position = UDim2.new(0, -10, 0, -10) - slotBackground.Size = UDim2.new(1, 20, 1, 20) - slotBackground.Parent = TempSlot - - local HighLight = Instance.new('ImageLabel') - HighLight.Name = 'Highlight' - HighLight.BackgroundTransparency = 1.0 - HighLight.Image = 'http://www.mete0r.xyz/asset/?id=97643886' - HighLight.Size = UDim2.new(1, 0, 1, 0) - --HighLight.Parent = TempSlot - HighLight.Visible = false - - -- TempSlot Children - local GearReference = Instance.new("ObjectValue") - GearReference.Name = "GearReference" - GearReference.RobloxLocked = true - GearReference.Parent = TempSlot - - - local ToolTipLabel = Instance.new("TextLabel") - ToolTipLabel.Name = "ToolTipLabel" - ToolTipLabel.RobloxLocked = true - ToolTipLabel.Text = "" - ToolTipLabel.BackgroundTransparency = 0.5 - ToolTipLabel.BorderSizePixel = 0 - ToolTipLabel.Visible = false - ToolTipLabel.TextColor3 = Color3.new(1,1,1) - ToolTipLabel.BackgroundColor3 = Color3.new(0,0,0) - ToolTipLabel.TextStrokeTransparency = 0 - ToolTipLabel.Font = Enum.Font.ArialBold - ToolTipLabel.FontSize = Enum.FontSize.Size14 - --ToolTipLabel.TextWrap = true - ToolTipLabel.Size = UDim2.new(1,60,0,20) - ToolTipLabel.Position = UDim2.new(0,-30,0,-30) - ToolTipLabel.Parent = TempSlot - - - local Kill = Instance.new("BoolValue") - Kill.Name = "Kill" - Kill.RobloxLocked = true - Kill.Parent = TempSlot - - local GearImage = Instance.new("ImageLabel") - GearImage.Name = "GearImage" - GearImage.BackgroundTransparency = 1 - GearImage.Position = UDim2.new(0, 0, 0, 0) - GearImage.Size = UDim2.new(1, 0, 1, 0) - GearImage.ZIndex = 5.0 - GearImage.RobloxLocked = true - GearImage.Parent = TempSlot - - local SlotNumber = Instance.new("TextLabel") - SlotNumber.Name = "SlotNumber" - SlotNumber.BackgroundTransparency = 1 - SlotNumber.BorderSizePixel = 0 - SlotNumber.Font = Enum.Font.ArialBold - SlotNumber.FontSize = Enum.FontSize.Size18 - SlotNumber.Position = UDim2.new(0, 0, 0, 0) - SlotNumber.Size = UDim2.new(0,10,0,15) - SlotNumber.TextColor3 = Color3.new(1,1,1) - SlotNumber.TextTransparency = 0 - SlotNumber.TextXAlignment = Enum.TextXAlignment.Left - SlotNumber.TextYAlignment = Enum.TextYAlignment.Bottom - SlotNumber.RobloxLocked = true - SlotNumber.Parent = TempSlot - SlotNumber.ZIndex = 5 - - if IsTouchDevice() then - SlotNumber.Visible = false - end - - local SlotNumberDownShadow = SlotNumber:Clone() - SlotNumberDownShadow.Name = "SlotNumberDownShadow" - SlotNumberDownShadow.TextColor3 = Color3.new(0,0,0) - SlotNumberDownShadow.Position = UDim2.new(0, 1, 0, -1) - SlotNumberDownShadow.Parent = TempSlot - SlotNumberDownShadow.ZIndex = 2 - - local SlotNumberUpShadow = SlotNumberDownShadow:Clone() - SlotNumberUpShadow.Name = "SlotNumberUpShadow" - SlotNumberUpShadow.Position = UDim2.new(0, -1, 0, -1) - SlotNumberUpShadow.Parent = TempSlot - - local GearText = Instance.new("TextLabel") - GearText.RobloxLocked = true - GearText.Name = "GearText" - GearText.BackgroundTransparency = 1 - GearText.Font = Enum.Font.Arial - GearText.FontSize = Enum.FontSize.Size14 - GearText.Position = UDim2.new(0,-8,0,-8) - GearText.Size = UDim2.new(1,16,1,16) - GearText.Text = "" - GearText.TextColor3 = Color3.new(1,1,1) - GearText.TextWrap = true - GearText.Parent = TempSlot - GearText.ZIndex = 5.0 - ---- Great, now lets make the inventory! - -local Backpack = Instance.new("Frame") -Backpack.RobloxLocked = true -Backpack.Visible = false -Backpack.Name = "Backpack" -Backpack.Position = UDim2.new(0.5, 0, 0.5, 0) -Backpack.BackgroundColor3 = Color3.new(32/255, 32/255, 32/255) -Backpack.BackgroundTransparency = 0.5 -Backpack.BorderSizePixel = 0 -Backpack.Parent = gui -Backpack.Active = true - - -- Backpack Children - local SwapSlot = Instance.new("BoolValue") - SwapSlot.RobloxLocked = true - SwapSlot.Name = "SwapSlot" - SwapSlot.Parent = Backpack - - -- SwapSlot Children - local Slot = Instance.new("IntValue") - Slot.RobloxLocked = true - Slot.Name = "Slot" - Slot.Parent = SwapSlot - - local GearButton = Instance.new("ObjectValue") - GearButton.RobloxLocked = true - GearButton.Name = "GearButton" - GearButton.Parent = SwapSlot - - local Tabs = Instance.new("Frame") - Tabs.Name = "Tabs" - Tabs.Visible = false - Tabs.Active = false - Tabs.RobloxLocked = true - Tabs.BackgroundColor3 = Color3.new(0,0,0) - Tabs.BackgroundTransparency = 0.08 - Tabs.BorderSizePixel = 0 - Tabs.Position = UDim2.new(0,0,-0.1,-4) - Tabs.Size = UDim2.new(1,0,0.1,4) - Tabs.Parent = Backpack - - -- Tabs Children - - local tabLine = Instance.new("Frame") - tabLine.RobloxLocked = true - tabLine.Name = "TabLine" - tabLine.BackgroundColor3 = Color3.new(53/255, 53/255, 53/255) - tabLine.BorderSizePixel = 0 - tabLine.Position = UDim2.new(0,5,1,-4) - tabLine.Size = UDim2.new(1,-10,0,4) - tabLine.ZIndex = 2 - tabLine.Parent = Tabs - - local InventoryButton = Instance.new("TextButton") - InventoryButton.RobloxLocked = true - InventoryButton.Name = "InventoryButton" - InventoryButton.Size = UDim2.new(0,60,0,30) - InventoryButton.Position = UDim2.new(0,7,1,-31) - InventoryButton.BackgroundColor3 = Color3.new(1,1,1) - InventoryButton.BorderColor3 = Color3.new(1,1,1) - InventoryButton.Font = Enum.Font.ArialBold - InventoryButton.FontSize = Enum.FontSize.Size18 - InventoryButton.Text = "Gear" - InventoryButton.AutoButtonColor = false - InventoryButton.TextColor3 = Color3.new(0,0,0) - InventoryButton.Selected = true - InventoryButton.Active = true - InventoryButton.ZIndex = 3 - InventoryButton.Parent = Tabs - - if game.CoreGui.Version >= 8 then - local WardrobeButton = Instance.new("TextButton") - WardrobeButton.RobloxLocked = true - WardrobeButton.Name = "WardrobeButton" - WardrobeButton.Size = UDim2.new(0,90,0,30) - WardrobeButton.Position = UDim2.new(0,77,1,-31) - WardrobeButton.BackgroundColor3 = Color3.new(0,0,0) - WardrobeButton.BorderColor3 = Color3.new(1,1,1) - WardrobeButton.Font = Enum.Font.ArialBold - WardrobeButton.FontSize = Enum.FontSize.Size18 - WardrobeButton.Text = "Wardrobe" - WardrobeButton.AutoButtonColor = false - WardrobeButton.TextColor3 = Color3.new(1,1,1) - WardrobeButton.Selected = false - WardrobeButton.Active = true - WardrobeButton.Parent = Tabs - end - - local closeButton = Instance.new("TextButton") - closeButton.RobloxLocked = true - closeButton.Name = "CloseButton" - closeButton.Font = Enum.Font.ArialBold - closeButton.FontSize = Enum.FontSize.Size24 - closeButton.Position = UDim2.new(1,-33,0,4) - closeButton.Size = UDim2.new(0,30,0,30) - closeButton.Style = Enum.ButtonStyle.RobloxButton - closeButton.Text = "" - closeButton.TextColor3 = Color3.new(1,1,1) - closeButton.Parent = Tabs - closeButton.Modal = true - - --closeButton child - local XImage = Instance.new("ImageLabel") - XImage.RobloxLocked = true - XImage.Name = "XImage" - game:GetService("ContentProvider"):Preload("http://www.mete0r.xyz/asset/?id=75547445") - XImage.Image = "http://www.mete0r.xyz/asset/?id=75547445" --TODO: move to rbxasset - XImage.BackgroundTransparency = 1 - XImage.Position = UDim2.new(-.25,-1,-.25,-1) - XImage.Size = UDim2.new(1.5,2,1.5,2) - XImage.ZIndex = 2 - XImage.Parent = closeButton - - -- Generic Search gui used across backpack - local SearchFrame = Instance.new("Frame") - SearchFrame.RobloxLocked = true - SearchFrame.Name = "SearchFrame" - SearchFrame.BackgroundTransparency = 1 - SearchFrame.Position = UDim2.new(1,-220,0,2) - SearchFrame.Size = UDim2.new(0,220,0,24) - SearchFrame.Parent = Backpack - - -- SearchFrame Children - local SearchButton = Instance.new("ImageButton") - SearchButton.RobloxLocked = true - SearchButton.Name = "SearchButton" - SearchButton.Size = UDim2.new(0,25,0,25) - SearchButton.BackgroundTransparency = 1 - SearchButton.Image = "rbxasset://textures/ui/SearchIcon.png" - SearchButton.Parent = SearchFrame - - local SearchBoxFrame = Instance.new("TextButton") - SearchBoxFrame.RobloxLocked = true - SearchBoxFrame.Position = UDim2.new(0,25,0,-2) - SearchBoxFrame.Size = UDim2.new(1,-28,0,30) - SearchBoxFrame.Name = "SearchBoxFrame" - SearchBoxFrame.Text = "" - SearchBoxFrame.Style = Enum.ButtonStyle.RobloxRoundButton - SearchBoxFrame.Parent = SearchFrame - - -- SearchBoxFrame Children - local SearchBox = Instance.new("TextBox") - SearchBox.RobloxLocked = true - SearchBox.Name = "SearchBox" - SearchBox.BackgroundTransparency = 1 - SearchBox.Font = Enum.Font.ArialBold - SearchBox.FontSize = Enum.FontSize.Size12 - SearchBox.Position = UDim2.new(0,-5,0,-5) - SearchBox.Size = UDim2.new(1,10,1,10) - SearchBox.TextColor3 = Color3.new(1,1,1) - SearchBox.TextXAlignment = Enum.TextXAlignment.Left - SearchBox.ZIndex = 2 - SearchBox.TextWrap = true - SearchBox.Text = "Search..." - SearchBox.Parent = SearchBoxFrame - - - local ResetButton = Instance.new("TextButton") - ResetButton.RobloxLocked = true - ResetButton.Visible = false - ResetButton.Name = "ResetButton" - ResetButton.Position = UDim2.new(1,-26,0,3) - ResetButton.Size = UDim2.new(0,20,0,20) - ResetButton.Style = Enum.ButtonStyle.RobloxButtonDefault - ResetButton.Text = "X" - ResetButton.TextColor3 = Color3.new(1,1,1) - ResetButton.Font = Enum.Font.ArialBold - ResetButton.FontSize = Enum.FontSize.Size18 - ResetButton.ZIndex = 3 - ResetButton.Parent = SearchFrame - -------------------------------- GEAR ------------------------------------------------------- - local Gear = Instance.new("Frame") - Gear.Name = "Gear" - Gear.RobloxLocked = true - Gear.BackgroundTransparency = 1 - Gear.Size = UDim2.new(1,0,1,0) - Gear.ClipsDescendants = true - Gear.Parent = Backpack - - -- Gear Children - local AssetsList = Instance.new("Frame") - AssetsList.RobloxLocked = true - AssetsList.Name = "AssetsList" - AssetsList.BackgroundTransparency = 1 - AssetsList.Size = UDim2.new(0.2,0,1,0) - AssetsList.Style = Enum.FrameStyle.RobloxSquare - AssetsList.Visible = false - AssetsList.Parent = Gear - - local GearGrid = Instance.new("Frame") - GearGrid.RobloxLocked = true - GearGrid.Name = "GearGrid" - GearGrid.Size = UDim2.new(0.95, 0, 1, 0) - GearGrid.BackgroundTransparency = 1 - GearGrid.Parent = Gear - - - local GearButton = Instance.new("ImageButton") - GearButton.RobloxLocked = true - GearButton.Visible = false - GearButton.Name = "GearButton" - GearButton.Size = UDim2.new(0, 54, 0, 54) - GearButton.Style = 'Custom' - GearButton.Parent = GearGrid - GearButton.BackgroundTransparency = 1.0 - - local slotBackground = Instance.new('Frame') - slotBackground.Name = 'Background' - slotBackground.BackgroundTransparency = 1.0 - slotBackground.Size = UDim2.new(1, 16, 1, 16) - slotBackground.Position = UDim2.new(0, -8, 0, -8) - slotBackground.Parent = GearButton - slotBackground.Style = "DropShadow" - - - -- GearButton Children - local GearReference = Instance.new("ObjectValue") - GearReference.RobloxLocked = true - GearReference.Name = "GearReference" - GearReference.Parent = GearButton - - local GreyOutButton = Instance.new("Frame") - GreyOutButton.RobloxLocked = true - GreyOutButton.Name = "GreyOutButton" - GreyOutButton.BackgroundTransparency = 0.5 - GreyOutButton.Size = UDim2.new(1,0,1,0) - GreyOutButton.Active = true - GreyOutButton.Visible = false - GreyOutButton.ZIndex = 3 - GreyOutButton.Parent = GearButton - - local GearText = Instance.new("TextLabel") - GearText.RobloxLocked = true - GearText.Name = "GearText" - GearText.BackgroundTransparency = 1 - GearText.Font = Enum.Font.Arial - GearText.FontSize = Enum.FontSize.Size14 - GearText.Position = UDim2.new(0,-8,0,-8) - GearText.Size = UDim2.new(1,16,1,16) - GearText.Text = "" - GearText.ZIndex = 2 - GearText.TextColor3 = Color3.new(1,1,1) - GearText.TextWrap = true - GearText.Parent = GearButton - - local GearGridScrollingArea = Instance.new("Frame") - GearGridScrollingArea.RobloxLocked = true - GearGridScrollingArea.Name = "GearGridScrollingArea" - GearGridScrollingArea.Position = UDim2.new(1, -19, 0, 35) - GearGridScrollingArea.Size = UDim2.new(0, 17, 1, -45) - GearGridScrollingArea.BackgroundTransparency = 1 - GearGridScrollingArea.Parent = Gear - - local GearLoadouts = Instance.new("Frame") - GearLoadouts.RobloxLocked = true - GearLoadouts.Name = "GearLoadouts" - GearLoadouts.BackgroundTransparency = 1 - GearLoadouts.Position = UDim2.new(0.7,23,0.5,1) - GearLoadouts.Size = UDim2.new(0.3,-23,0.5,-1) - GearLoadouts.Parent = Gear - GearLoadouts.Visible = false - - -- GearLoadouts Children - local GearLoadoutsHeader = Instance.new("Frame") - GearLoadoutsHeader.RobloxLocked = true - GearLoadoutsHeader.Name = "GearLoadoutsHeader" - GearLoadoutsHeader.BackgroundColor3 = Color3.new(0,0,0) - GearLoadoutsHeader.BackgroundTransparency = 0.2 - GearLoadoutsHeader.BorderColor3 = Color3.new(1,0,0) - GearLoadoutsHeader.Size = UDim2.new(1,2,0.15,-1) - GearLoadoutsHeader.Parent = GearLoadouts - - -- GearLoadoutsHeader Children - local LoadoutsHeaderText = Instance.new("TextLabel") - LoadoutsHeaderText.RobloxLocked = true - LoadoutsHeaderText.Name = "LoadoutsHeaderText" - LoadoutsHeaderText.BackgroundTransparency = 1 - LoadoutsHeaderText.Font = Enum.Font.ArialBold - LoadoutsHeaderText.FontSize = Enum.FontSize.Size18 - LoadoutsHeaderText.Size = UDim2.new(1,0,1,0) - LoadoutsHeaderText.Text = "Loadouts" - LoadoutsHeaderText.TextColor3 = Color3.new(1,1,1) - LoadoutsHeaderText.Parent = GearLoadoutsHeader - - local GearLoadoutsScrollingArea = GearGridScrollingArea:clone() - GearLoadoutsScrollingArea.RobloxLocked = true - GearLoadoutsScrollingArea.Name = "GearLoadoutsScrollingArea" - GearLoadoutsScrollingArea.Position = UDim2.new(1,-15,0.15,2) - GearLoadoutsScrollingArea.Size = UDim2.new(0,17,0.85,-2) - GearLoadoutsScrollingArea.Parent = GearLoadouts - - local LoadoutsList = Instance.new("Frame") - LoadoutsList.RobloxLocked = true - LoadoutsList.Name = "LoadoutsList" - LoadoutsList.Position = UDim2.new(0,0,0.15,2) - LoadoutsList.Size = UDim2.new(1,-17,0.85,-2) - LoadoutsList.Style = Enum.FrameStyle.RobloxSquare - LoadoutsList.Parent = GearLoadouts - - local GearPreview = Instance.new("Frame") - GearPreview.RobloxLocked = true - GearPreview.Name = "GearPreview" - GearPreview.Position = UDim2.new(0.7,23,0,0) - GearPreview.Size = UDim2.new(0.3,-28,0.5,-1) - GearPreview.BackgroundTransparency = 1 - GearPreview.ZIndex = 7 - GearPreview.Parent = Gear - - -- GearPreview Children - local GearStats = Instance.new("Frame") - GearStats.RobloxLocked = true - GearStats.Name = "GearStats" - GearStats.BackgroundTransparency = 1 - GearStats.Position = UDim2.new(0,0,0.75,0) - GearStats.Size = UDim2.new(1,0,0.25,0) - GearStats.ZIndex = 8 - GearStats.Parent = GearPreview - - -- GearStats Children - local GearName = Instance.new("TextLabel") - GearName.RobloxLocked = true - GearName.Name = "GearName" - GearName.BackgroundTransparency = 1 - GearName.Font = Enum.Font.ArialBold - GearName.FontSize = Enum.FontSize.Size18 - GearName.Position = UDim2.new(0,-3,0,0) - GearName.Size = UDim2.new(1,6,1,5) - GearName.Text = "" - GearName.TextColor3 = Color3.new(1,1,1) - GearName.TextWrap = true - GearName.ZIndex = 9 - GearName.Parent = GearStats - - local GearImage = Instance.new("ImageLabel") - GearImage.RobloxLocked = true - GearImage.Name = "GearImage" - GearImage.Image = "" - GearImage.BackgroundTransparency = 1 - GearImage.Position = UDim2.new(0.125,0,0,0) - GearImage.Size = UDim2.new(0.75,0,0.75,0) - GearImage.ZIndex = 8 - GearImage.Parent = GearPreview - - --GearImage Children - local GearIcons = Instance.new("Frame") - GearIcons.BackgroundColor3 = Color3.new(0,0,0) - GearIcons.BackgroundTransparency = 0.5 - GearIcons.BorderSizePixel = 0 - GearIcons.RobloxLocked = true - GearIcons.Name = "GearIcons" - GearIcons.Position = UDim2.new(0.4,2,0.85,-2) - GearIcons.Size = UDim2.new(0.6,0,0.15,0) - GearIcons.Visible = false - GearIcons.ZIndex = 9 - GearIcons.Parent = GearImage - - -- GearIcons Children - local GenreImage = Instance.new("ImageLabel") - GenreImage.RobloxLocked = true - GenreImage.Name = "GenreImage" - GenreImage.BackgroundColor3 = Color3.new(102/255,153/255,1) - GenreImage.BackgroundTransparency = 0.5 - GenreImage.BorderSizePixel = 0 - GenreImage.Size = UDim2.new(0.25,0,1,0) - GenreImage.Parent = GearIcons - - local AttributeOneImage = GenreImage:clone() - AttributeOneImage.RobloxLocked = true - AttributeOneImage.Name = "AttributeOneImage" - AttributeOneImage.BackgroundColor3 = Color3.new(1,51/255,0) - AttributeOneImage.Position = UDim2.new(0.25,0,0,0) - AttributeOneImage.Parent = GearIcons - - local AttributeTwoImage = GenreImage:clone() - AttributeTwoImage.RobloxLocked = true - AttributeTwoImage.Name = "AttributeTwoImage" - AttributeTwoImage.BackgroundColor3 = Color3.new(153/255,1,153/255) - AttributeTwoImage.Position = UDim2.new(0.5,0,0,0) - AttributeTwoImage.Parent = GearIcons - - local AttributeThreeImage = GenreImage:clone() - AttributeThreeImage.RobloxLocked = true - AttributeThreeImage.Name = "AttributeThreeImage" - AttributeThreeImage.BackgroundColor3 = Color3.new(0,0.5,0.5) - AttributeThreeImage.Position = UDim2.new(0.75,0,0,0) - AttributeThreeImage.Parent = GearIcons - -------------------------------- WARDROBE ------------------------------------------------------- - if game.CoreGui.Version < 8 then - -- no need for this to stick around, we aren't ready for wardrobe - script:remove() - return - end - - local function makeCharFrame(frameName, parent) - local frame = Instance.new("Frame") - frame.RobloxLocked = true - frame.Size = UDim2.new(1,0,1,-70) - frame.Position = UDim2.new(0,0,0,20) - frame.Name = frameName - frame.BackgroundTransparency = 1 - frame.Parent = parent - frame.Visible = false - return frame - end - local function makeZone( zoneName, image, size, position, parent ) - local zone = Instance.new("ImageLabel") - zone.RobloxLocked = true - zone.Name = zoneName - zone.Image = image - zone.Size = size - zone.BackgroundTransparency = 1 - zone.Position = position - zone.Parent = parent - return zone - end - local function makeStyledButton( buttonName, size, position, parent, buttonStyle ) - local button = Instance.new("ImageButton") - button.RobloxLocked = true - button.Name = buttonName - button.Size = size - button.Position = position - if buttonStyle then - button.Style = buttonStyle - else - button.BackgroundColor3 = Color3.new(0,0,0) - button.BorderColor3 = Color3.new(1,1,1) - end - button.Parent = parent - return button - end - local function makeTextLabel( TextLabelName,text,position,parent ) - local label = Instance.new("TextLabel") - label.RobloxLocked = true - label.BackgroundTransparency = 1 - label.Size = UDim2.new(0,32,0,14) - label.Name = TextLabelName - label.Font = Enum.Font.Arial - label.TextColor3 = Color3.new(1,1,1) - label.FontSize = Enum.FontSize.Size14 - label.Text = text - label.Position = position - label.Parent = parent - end - - - local Wardrobe = Instance.new("Frame") - Wardrobe.Name = "Wardrobe" - Wardrobe.RobloxLocked = true - Wardrobe.BackgroundTransparency = 1 - Wardrobe.Visible = false - Wardrobe.Size = UDim2.new(1,0,1,0) - Wardrobe.Parent = Backpack - - local AssetList = Instance.new("Frame") - AssetList.RobloxLocked = true - AssetList.Name = "AssetList" - AssetList.Position = UDim2.new(0,4,0,5) - AssetList.Size = UDim2.new(0,85,1,-5) - AssetList.BackgroundTransparency = 1 - AssetList.Visible = true - AssetList.Parent = Wardrobe - - local PreviewAssetFrame = Instance.new("Frame") - PreviewAssetFrame.RobloxLocked = true - PreviewAssetFrame.Name = "PreviewAssetFrame" - PreviewAssetFrame.BackgroundTransparency = 1 - PreviewAssetFrame.Position = UDim2.new(1,-240,0,30) - PreviewAssetFrame.Size = UDim2.new(0,250,0,250) - PreviewAssetFrame.Parent = Wardrobe - - local PreviewAssetBacking = Instance.new("TextButton") - PreviewAssetBacking.RobloxLocked = true - PreviewAssetBacking.Name = "PreviewAssetBacking" - PreviewAssetBacking.Active = false - PreviewAssetBacking.Text = "" - PreviewAssetBacking.AutoButtonColor = false - PreviewAssetBacking.Size = UDim2.new(1,0,1,0) - PreviewAssetBacking.Style = Enum.ButtonStyle.RobloxButton - PreviewAssetBacking.Visible = false - PreviewAssetBacking.ZIndex = 9 - PreviewAssetBacking.Parent = PreviewAssetFrame - - local PreviewAssetImage = Instance.new("ImageLabel") - PreviewAssetImage.RobloxLocked = true - PreviewAssetImage.Name = "PreviewAssetImage" - PreviewAssetImage.BackgroundTransparency = 0.8 - PreviewAssetImage.Position = UDim2.new(0.5,-100,0,0) - PreviewAssetImage.Size = UDim2.new(0,200,0,200) - PreviewAssetImage.BorderSizePixel = 0 - PreviewAssetImage.ZIndex = 10 - PreviewAssetImage.Parent = PreviewAssetBacking - - local AssetNameLabel = Instance.new("TextLabel") - AssetNameLabel.Name = "AssetNameLabel" - AssetNameLabel.RobloxLocked = true - AssetNameLabel.BackgroundTransparency = 1 - AssetNameLabel.Position = UDim2.new(0,0,1,-20) - AssetNameLabel.Size = UDim2.new(0.5,0,0,24) - AssetNameLabel.ZIndex = 10 - AssetNameLabel.Font = Enum.Font.Arial - AssetNameLabel.Text = "" - AssetNameLabel.TextColor3 = Color3.new(1,1,1) - AssetNameLabel.TextScaled = true - AssetNameLabel.Parent = PreviewAssetBacking - - local AssetTypeLabel = AssetNameLabel:clone() - AssetTypeLabel.RobloxLocked = true - AssetTypeLabel.Name = "AssetTypeLabel" - AssetTypeLabel.TextScaled = false - AssetTypeLabel.FontSize = Enum.FontSize.Size18 - AssetTypeLabel.Position = UDim2.new(0.5,3,1,-20) - AssetTypeLabel.Parent = PreviewAssetBacking - - - - local PreviewButton = Instance.new("TextButton") - PreviewButton.RobloxLocked = true - PreviewButton.Name = "PreviewButton" - PreviewButton.Text = "Rotate" - PreviewButton.BackgroundColor3 = Color3.new(0,0,0) - PreviewButton.BackgroundTransparency = 0.5 - PreviewButton.BorderColor3 = Color3.new(1,1,1) - PreviewButton.BorderSizePixel = 0 - PreviewButton.Position = UDim2.new(1.2,-62,1,-50) - PreviewButton.Size = UDim2.new(0,125,0,50) - PreviewButton.Font = Enum.Font.ArialBold - PreviewButton.FontSize = Enum.FontSize.Size24 - PreviewButton.TextColor3 = Color3.new(1,1,1) - PreviewButton.TextWrapped = true - PreviewButton.TextStrokeTransparency = 0 - PreviewButton.Parent = Wardrobe - - local CharacterPane = Instance.new("Frame") - CharacterPane.RobloxLocked = true - CharacterPane.Name = "CharacterPane" - CharacterPane.Position = UDim2.new(1,-220,0,32) - CharacterPane.Size = UDim2.new(0,220,1,-40) - CharacterPane.BackgroundTransparency = 1 - CharacterPane.Visible = true - CharacterPane.Parent = Wardrobe - - --CharacterPane Children - local FaceFrame = makeCharFrame("FacesFrame", CharacterPane) - game:GetService("ContentProvider"):Preload("http://www.mete0r.xyz/asset/?id=75460621") - makeZone("FaceZone","http://www.mete0r.xyz/asset/?id=75460621",UDim2.new(0,157,0,137),UDim2.new(0.5,-78,0.5,-68),FaceFrame) - makeStyledButton("Face",UDim2.new(0,64,0,64),UDim2.new(0.5,-32,0.5,-135),FaceFrame) - - local HeadFrame = makeCharFrame("HeadsFrame", CharacterPane) - makeZone("FaceZone","http://www.mete0r.xyz/asset/?id=75460621",UDim2.new(0,157,0,137),UDim2.new(0.5,-78,0.5,-68),HeadFrame) - makeStyledButton("Head",UDim2.new(0,64,0,64),UDim2.new(0.5,-32,0.5,-135),HeadFrame) - - local HatsFrame = makeCharFrame("HatsFrame", CharacterPane) - game:GetService("ContentProvider"):Preload("http://www.mete0r.xyz/asset/?id=75457888") - local HatsZone = makeZone("HatsZone","http://www.mete0r.xyz/asset/?id=75457888",UDim2.new(0,186,0,184),UDim2.new(0.5,-93,0.5,-100), HatsFrame) - makeStyledButton("Hat1Button",UDim2.new(0,64,0,64),UDim2.new(0,-1,0,-1),HatsZone,Enum.ButtonStyle.RobloxButton) - makeStyledButton("Hat2Button",UDim2.new(0,64,0,64),UDim2.new(0,63,0,-1),HatsZone,Enum.ButtonStyle.RobloxButton) - makeStyledButton("Hat3Button",UDim2.new(0,64,0,64),UDim2.new(0,127,0,-1),HatsZone,Enum.ButtonStyle.RobloxButton) - - local PantsFrame = makeCharFrame("PantsFrame", CharacterPane) - game:GetService("ContentProvider"):Preload("http://www.mete0r.xyz/asset/?id=75457920") - makeZone("PantsZone","http://www.mete0r.xyz/asset/?id=75457920",UDim2.new(0,121,0,99),UDim2.new(0.5,-60,0.5,-100),PantsFrame) - - local pantFrame = Instance.new("Frame") - pantFrame.RobloxLocked = true - pantFrame.Size = UDim2.new(0,25,0,56) - pantFrame.Position = UDim2.new(0.5,-26,0.5,0) - pantFrame.BackgroundColor3 = Color3.new(0,0,0) - pantFrame.BorderColor3 = Color3.new(1,1,1) - pantFrame.Name = "PantFrame" - pantFrame.Parent = PantsFrame - - local otherPantFrame = pantFrame:clone() - otherPantFrame.Position = UDim2.new(0.5,3,0.5,0) - otherPantFrame.RobloxLocked = true - otherPantFrame.Parent = PantsFrame - - local CurrentPants = Instance.new("ImageButton") - CurrentPants.RobloxLocked = true - CurrentPants.BackgroundTransparency = 1 - CurrentPants.ZIndex = 2 - CurrentPants.Name = "CurrentPants" - CurrentPants.Position = UDim2.new(0.5,-31,0.5,-4) - CurrentPants.Size = UDim2.new(0,54,0,59) - CurrentPants.Parent = PantsFrame - - local MeshFrame = makeCharFrame("PackagesFrame", CharacterPane) - local torsoButton = makeStyledButton("TorsoMeshButton", UDim2.new(0,64,0,64),UDim2.new(0.5,-32,0.5,-110),MeshFrame,Enum.ButtonStyle.RobloxButton) - makeTextLabel("TorsoLabel","Torso",UDim2.new(0.5,-16,0,-25),torsoButton) - local leftLegButton = makeStyledButton("LeftLegMeshButton", UDim2.new(0,64,0,64),UDim2.new(0.5,0,0.5,-25),MeshFrame,Enum.ButtonStyle.RobloxButton) - makeTextLabel("LeftLegLabel","Left Leg",UDim2.new(0.5,-16,0,-25),leftLegButton) - local rightLegButton = makeStyledButton("RightLegMeshButton", UDim2.new(0,64,0,64),UDim2.new(0.5,-64,0.5,-25),MeshFrame,Enum.ButtonStyle.RobloxButton) - makeTextLabel("RightLegLabel","Right Leg",UDim2.new(0.5,-16,0,-25),rightLegButton) - local rightArmButton = makeStyledButton("RightArmMeshButton", UDim2.new(0,64,0,64),UDim2.new(0.5,-96,0.5,-110),MeshFrame,Enum.ButtonStyle.RobloxButton) - makeTextLabel("RightArmLabel","Right Arm",UDim2.new(0.5,-16,0,-25),rightArmButton) - local leftArmButton = makeStyledButton("LeftArmMeshButton", UDim2.new(0,64,0,64),UDim2.new(0.5,32,0.5,-110),MeshFrame,Enum.ButtonStyle.RobloxButton) - makeTextLabel("LeftArmLabel","Left Arm",UDim2.new(0.5,-16,0,-25),leftArmButton) - - local TShirtFrame = makeCharFrame("T-ShirtsFrame",CharacterPane) - game:GetService("ContentProvider"):Preload("http://www.mete0r.xyz/asset/?id=75460642") - makeZone("TShirtZone","http://www.mete0r.xyz/asset/?id=75460642",UDim2.new(0,121,0,154),UDim2.new(0.5,-60,0.5,-100),TShirtFrame) - makeStyledButton("TShirtButton", UDim2.new(0,64,0,64),UDim2.new(0.5,-32,0.5,-64),TShirtFrame) - - - local ShirtFrame = makeCharFrame("ShirtsFrame", CharacterPane) - makeZone("ShirtZone","http://www.mete0r.xyz/asset/?id=75460642",UDim2.new(0,121,0,154),UDim2.new(0.5,-60,0.5,-100),ShirtFrame) - makeStyledButton("ShirtButton", UDim2.new(0,64,0,64),UDim2.new(0.5,-32,0.5,-64),ShirtFrame) - - - local ColorFrame = makeCharFrame("ColorFrame", CharacterPane) - game:GetService("ContentProvider"):Preload("http://www.mete0r.xyz/asset/?id=76049888") - local ColorZone = makeZone("ColorZone","http://www.mete0r.xyz/asset/?id=76049888", UDim2.new(0,120,0,150),UDim2.new(0.5,-60,0.5,-100),ColorFrame) - makeStyledButton("Head",UDim2.new(0.26,0,0.19,0),UDim2.new(0.37,0,0.02,0),ColorZone).AutoButtonColor = false - makeStyledButton("LeftArm",UDim2.new(0.19,0,0.36,0),UDim2.new(0.78,0,0.26,0),ColorZone).AutoButtonColor = false - makeStyledButton("RightArm",UDim2.new(0.19,0,0.36,0),UDim2.new(0.025,0,0.26,0),ColorZone).AutoButtonColor = false - makeStyledButton("Torso",UDim2.new(0.43,0,0.36,0),UDim2.new(0.28,0,0.26,0),ColorZone).AutoButtonColor = false - makeStyledButton("RightLeg",UDim2.new(0.19,0,0.31,0),UDim2.new(0.275,0,0.67,0),ColorZone).AutoButtonColor = false - makeStyledButton("LeftLeg",UDim2.new(0.19,0,0.31,0),UDim2.new(0.525,0,0.67,0),ColorZone).AutoButtonColor = false - - -- Character Panel label (shows what category we are currently browsing) - local CategoryLabel = Instance.new("TextLabel") - CategoryLabel.RobloxLocked = true - CategoryLabel.Name = "CategoryLabel" - CategoryLabel.BackgroundTransparency = 1 - CategoryLabel.Font = Enum.Font.ArialBold - CategoryLabel.FontSize = Enum.FontSize.Size18 - CategoryLabel.Position = UDim2.new(0,0,0,-7) - CategoryLabel.Size = UDim2.new(1,0,0,20) - CategoryLabel.TextXAlignment = Enum.TextXAlignment.Center - CategoryLabel.Text = "All" - CategoryLabel.TextColor3 = Color3.new(1,1,1) - CategoryLabel.Parent = CharacterPane - - --Save Button - local SaveButton = Instance.new("TextButton") - SaveButton.RobloxLocked = true - SaveButton.Name = "SaveButton" - SaveButton.Size = UDim2.new(0.6,0,0,50) - SaveButton.Position = UDim2.new(0.2,0,1,-50) - SaveButton.Style = Enum.ButtonStyle.RobloxButton - SaveButton.Selected = false - SaveButton.Font = Enum.Font.ArialBold - SaveButton.FontSize = Enum.FontSize.Size18 - SaveButton.Text = "Save" - SaveButton.TextColor3 = Color3.new(1,1,1) - SaveButton.Parent = CharacterPane - --- no need for this to stick around - -script:Destroy() diff --git a/assets/ugc/869 b/assets/ugc/869 deleted file mode 100644 index 1d02742..0000000 --- a/assets/ugc/869 +++ /dev/null @@ -1,429 +0,0 @@ ---rbxassetid%869% --- This script manages context switches in the backpack (Gear to Wardrobe, etc.) and player state changes. Also manages global functions across different tabs (currently only search) -if game.CoreGui.Version < 7 then return end -- peace out if we aren't using the right client - --- basic functions -local function waitForChild(instance, name) - while not instance:FindFirstChild(name) do - instance.ChildAdded:wait() - end - return instance:FindFirstChild(name) -end -local function waitForProperty(instance, property) - while not instance[property] do - instance.Changed:wait() - end -end - --- don't do anything if we are in an empty game -waitForChild(game,"Players") -if #game.Players:GetChildren() < 1 then - game.Players.ChildAdded:wait() -end --- make sure everything is loaded in before we do anything --- get our local player -waitForProperty(game.Players,"LocalPlayer") -local player = game.Players.LocalPlayer - - - ------------------------- Locals ------------------------------ -local backpack = script.Parent -waitForChild(backpack,"Gear") - -local screen = script.Parent.Parent -assert(screen:IsA("ScreenGui")) - -waitForChild(backpack, "Tabs") -waitForChild(backpack.Tabs, "CloseButton") -local closeButton = backpack.Tabs.CloseButton - -waitForChild(backpack.Tabs, "InventoryButton") -local inventoryButton = backpack.Tabs.InventoryButton -if game.CoreGui.Version >= 8 then - waitForChild(backpack.Tabs, "WardrobeButton") - local wardrobeButton = backpack.Tabs.WardrobeButton -end -waitForChild(backpack.Parent,"ControlFrame") -local backpackButton = waitForChild(backpack.Parent.ControlFrame,"BackpackButton") -local currentTab = "gear" - -local searchFrame = waitForChild(backpack,"SearchFrame") -waitForChild(backpack.SearchFrame,"SearchBoxFrame") -local searchBox = waitForChild(backpack.SearchFrame.SearchBoxFrame,"SearchBox") -local searchButton = waitForChild(backpack.SearchFrame,"SearchButton") -local resetButton = waitForChild(backpack.SearchFrame,"ResetButton") - -local robloxGui = waitForChild(Game.CoreGui, 'RobloxGui') -local currentLoadout = waitForChild(robloxGui, 'CurrentLoadout') - -local canToggle = true -local readyForNextEvent = true -local backpackIsOpen = false -local active = true -local disabledByDeveloper = false - -local humanoidDiedCon = nil - -local backpackButtonPos - -local guiTweenSpeed = 0.25 -- how quickly we open/close the backpack - -local searchDefaultText = "Search..." -local tilde = "~" -local backquote = "`" - -local backpackSize = UDim2.new(0, 600, 0, 400) - -if robloxGui.AbsoluteSize.Y <= 500 then - backpackSize = UDim2.new(0, 200, 0, 140) -end - - ------------------------- End Locals --------------------------- - - ----------------------------------------- Public Event Setup ---------------------------------------- - -function createPublicEvent(eventName) - assert(eventName, "eventName is nil") - assert(tostring(eventName),"eventName is not a string") - - local newEvent = Instance.new("BindableEvent") - newEvent.Name = tostring(eventName) - newEvent.Parent = script - - return newEvent -end - -function createPublicFunction(funcName, invokeFunc) - assert(funcName, "funcName is nil") - assert(tostring(funcName), "funcName is not a string") - assert(invokeFunc, "invokeFunc is nil") - assert(type(invokeFunc) == "function", "invokeFunc should be of type 'function'") - - local newFunction = Instance.new("BindableFunction") - newFunction.Name = tostring(funcName) - newFunction.OnInvoke = invokeFunc - newFunction.Parent = script - - return newFunction -end - --- Events -local resizeEvent = createPublicEvent("ResizeEvent") -local backpackOpenEvent = createPublicEvent("BackpackOpenEvent") -local backpackCloseEvent = createPublicEvent("BackpackCloseEvent") -local tabClickedEvent = createPublicEvent("TabClickedEvent") -local searchRequestedEvent = createPublicEvent("SearchRequestedEvent") ----------------------------------------- End Public Event Setup ---------------------------------------- - - - ---------------------------- Internal Functions ---------------------------------------- - -function deactivateBackpack() - backpack.Visible = false - active = false -end - -function activateBackpack() - initHumanoidDiedConnections() - active = true - backpack.Visible = backpackIsOpen - if backpackIsOpen then - toggleBackpack() - end -end - -function initHumanoidDiedConnections() - if humanoidDiedCon then - humanoidDiedCon:disconnect() - end - waitForProperty(game.Players.LocalPlayer,"Character") - waitForChild(game.Players.LocalPlayer.Character,"Humanoid") - humanoidDiedCon = game.Players.LocalPlayer.Character.Humanoid.Died:connect(deactivateBackpack) -end - -local hideBackpack = function() - backpackIsOpen = false - readyForNextEvent = false - backpackButton.Selected = false - resetSearch() - backpackCloseEvent:Fire(currentTab) - backpack.Tabs.Visible = false - searchFrame.Visible = false - backpack:TweenSizeAndPosition(UDim2.new(0, backpackSize.X.Offset,0, 0), UDim2.new(0.5, -backpackSize.X.Offset/2, 1, -85), Enum.EasingDirection.Out, Enum.EasingStyle.Quad, guiTweenSpeed, true, - function() - game.GuiService:RemoveCenterDialog(backpack) - backpack.Visible = false - backpackButton.Selected = false - end) - delay(guiTweenSpeed,function() - game.GuiService:RemoveCenterDialog(backpack) - backpack.Visible = false - backpackButton.Selected = false - readyForNextEvent = true - canToggle = true - end) -end - -function showBackpack() - game.GuiService:AddCenterDialog(backpack, Enum.CenterDialogType.PlayerInitiatedDialog, - function() - backpack.Visible = true - backpackButton.Selected = true - end, - function() - backpack.Visible = false - backpackButton.Selected = false - end) - backpack.Visible = true - backpackButton.Selected = true - backpack:TweenSizeAndPosition(backpackSize, UDim2.new(0.5, -backpackSize.X.Offset/2, 1, -backpackSize.Y.Offset - 88), Enum.EasingDirection.Out, Enum.EasingStyle.Quad, guiTweenSpeed, true) - delay(guiTweenSpeed,function() - backpack.Tabs.Visible = false - searchFrame.Visible = true - backpackOpenEvent:Fire(currentTab) - canToggle = true - readyForNextEvent = true - backpackButton.Image = "rbxasset://textures/ui/Backpack_Close.png" - backpackButton.Position = UDim2.new(0.5, -7, 1, -backpackSize.Y.Offset - 108) - end) -end - -function toggleBackpack() - if not game.Players.LocalPlayer then return end - if not game.Players.LocalPlayer["Character"] then return end - if not canToggle then return end - if not readyForNextEvent then return end - readyForNextEvent = false - canToggle = false - - backpackIsOpen = not backpackIsOpen - - if backpackIsOpen then - showBackpack() - else - backpackButton.Position = UDim2.new(0.5, -7, 1, -55) - backpackButton.Selected = false - backpackButton.Image = "rbxasset://textures/ui/Backpack_Open.png" - hideBackpack() - - - local clChildren = currentLoadout:GetChildren() - for i = 1, #clChildren do - if clChildren[i] and clChildren[i]:IsA('Frame') then - local frame = clChildren[i] - if #frame:GetChildren() > 0 then - backpackButton.Position = UDim2.new(0.5, -7, 1, -108) - backpackButton.Visible = true - if frame:GetChildren()[1]:IsA('ImageButton') then - local imgButton = frame:GetChildren()[1] - imgButton.Active = true - imgButton.Draggable = false - end - end - end - end - - end -end - -function closeBackpack() - if backpackIsOpen then - toggleBackpack() - end -end - -function setSelected(tab) - assert(tab) - assert(tab:IsA("TextButton")) - - tab.BackgroundColor3 = Color3.new(1,1,1) - tab.TextColor3 = Color3.new(0,0,0) - tab.Selected = true - tab.ZIndex = 3 -end - -function setUnselected(tab) - assert(tab) - assert(tab:IsA("TextButton")) - - tab.BackgroundColor3 = Color3.new(0,0,0) - tab.TextColor3 = Color3.new(1,1,1) - tab.Selected = false - tab.ZIndex = 1 -end - -function updateTabGui(selectedTab) - assert(selectedTab) - - if selectedTab == "gear" then - setSelected(inventoryButton) - setUnselected(wardrobeButton) - elseif selectedTab == "wardrobe" then - setSelected(wardrobeButton) - setUnselected(inventoryButton) - end -end - -function mouseLeaveTab(button) - assert(button) - assert(button:IsA("TextButton")) - - if button.Selected then return end - - button.BackgroundColor3 = Color3.new(0,0,0) -end - -function mouseOverTab(button) - assert(button) - assert(button:IsA("TextButton")) - - if button.Selected then return end - - button.BackgroundColor3 = Color3.new(39/255,39/255,39/255) -end - -function newTabClicked(tabName) - assert(tabName) - tabName = string.lower(tabName) - currentTab = tabName - - updateTabGui(tabName) - tabClickedEvent:Fire(tabName) - resetSearch() -end - -function trim(s) - return (s:gsub("^%s*(.-)%s*$", "%1")) -end - -function splitByWhitespace(text) - if type(text) ~= "string" then return nil end - - local terms = {} - for token in string.gmatch(text, "[^%s]+") do - if string.len(token) > 0 then - table.insert(terms,token) - end - end - return terms -end - -function resetSearchBoxGui() - resetButton.Visible = false - searchBox.Text = searchDefaultText -end - -function doSearch() - local searchText = searchBox.Text - if searchText == "" then - resetSearch() - return - end - searchText = trim(searchText) - resetButton.Visible = true - termTable = splitByWhitespace(searchText) - searchRequestedEvent:Fire(searchText) -- todo: replace this with termtable when table passing is possible -end - -function resetSearch() - resetSearchBoxGui() - searchRequestedEvent:Fire() -end - -local backpackReady = function() - readyForNextEvent = true -end - -function coreGuiChanged(coreGuiType,enabled) - if coreGuiType == Enum.CoreGuiType.Backpack or coreGuiType == Enum.CoreGuiType.All then - active = enabled - disabledByDeveloper = not enabled - - if disabledByDeveloper then - game:GetService("GuiService"):RemoveKey(tilde) - game:GetService("GuiService"):RemoveKey(backquote) - else - game:GetService("GuiService"):AddKey(tilde) - game:GetService("GuiService"):AddKey(backquote) - end - - resetSearch() - searchFrame.Visible = enabled and backpackIsOpen - - currentLoadout.Visible = enabled - backpack.Visible = false - backpackButton.Visible = enabled - end -end - ---------------------------- End Internal Functions ------------------------------------- - - ------------------------------- Public Functions Setup ------------------------------------- -createPublicFunction("CloseBackpack", hideBackpack) -createPublicFunction("BackpackReady", backpackReady) ------------------------------- End Public Functions Setup --------------------------------- - - ------------------------- Connections/Script Main ------------------------------------------- - -coreGuiChanged(Enum.CoreGuiType.Backpack, Game.StarterGui:GetCoreGuiEnabled(Enum.CoreGuiType.Backpack)) -Game.StarterGui.CoreGuiChangedSignal:connect(coreGuiChanged) - -inventoryButton.MouseButton1Click:connect(function() newTabClicked("gear") end) -inventoryButton.MouseEnter:connect(function() mouseOverTab(inventoryButton) end) -inventoryButton.MouseLeave:connect(function() mouseLeaveTab(inventoryButton) end) - -if game.CoreGui.Version >= 8 then - wardrobeButton.MouseButton1Click:connect(function() newTabClicked("wardrobe") end) - wardrobeButton.MouseEnter:connect(function() mouseOverTab(wardrobeButton) end) - wardrobeButton.MouseLeave:connect(function() mouseLeaveTab(wardrobeButton) end) -end - -closeButton.MouseButton1Click:connect(closeBackpack) - -screen.Changed:connect(function(prop) - if prop == "AbsoluteSize" then - resizeEvent:Fire(screen.AbsoluteSize) - end -end) - --- GuiService key setup -game:GetService("GuiService"):AddKey(tilde) -game:GetService("GuiService"):AddKey(backquote) -game:GetService("GuiService").KeyPressed:connect(function(key) - if not active or disabledByDeveloper then return end - if key == tilde or key == backquote then - toggleBackpack() - end -end) -backpackButton.MouseButton1Click:connect(function() - if not active or disabledByDeveloper then return end - toggleBackpack() -end) - -if game.Players.LocalPlayer["Character"] then - activateBackpack() -end - -game.Players.LocalPlayer.CharacterAdded:connect(activateBackpack) - --- search functions -searchBox.FocusLost:connect(function(enterPressed) - if enterPressed or searchBox.Text ~= "" then - doSearch() - elseif searchBox.Text == "" then - resetSearch() - end -end) -searchButton.MouseButton1Click:connect(doSearch) -resetButton.MouseButton1Click:connect(resetSearch) - -if searchFrame and robloxGui.AbsoluteSize.Y <= 500 then - searchFrame.RobloxLocked = false - searchFrame:Destroy() -end \ No newline at end of file diff --git a/assets/ugc/870 b/assets/ugc/870 deleted file mode 100644 index f148138..0000000 --- a/assets/ugc/870 +++ /dev/null @@ -1,872 +0,0 @@ ---rbxassetid%870% --- A couple of necessary functions -local function waitForChild(instance, name) - assert(instance) - assert(name) - while not instance:FindFirstChild(name) do - instance.ChildAdded:wait() - end - return instance:FindFirstChild(name) -end -local function waitForProperty(instance, property) - assert(instance) - assert(property) - while not instance[property] do - instance.Changed:wait() - end -end - -local function IsTouchDevice() - return Game:GetService('UserInputService').TouchEnabled -end - - -waitForChild(game,"Players") -waitForProperty(game.Players,"LocalPlayer") -local player = game.Players.LocalPlayer - -local RbxGui, msg = LoadLibrary("RbxGui") -if not RbxGui then print("could not find RbxGui!") return end - ---- Begin Locals -local StaticTabName = "gear" - -local backpack = script.Parent -local screen = script.Parent.Parent - -local backpackItems = {} -local buttons = {} - -local debounce = false -local browsingMenu = false - -local mouseEnterCons = {} -local mouseClickCons = {} - -local characterChildAddedCon = nil -local characterChildRemovedCon = nil -local backpackAddCon = nil - -local playerBackpack = waitForChild(player,"Backpack") - -waitForChild(backpack,"Tabs") - -waitForChild(backpack,"Gear") -local gearPreview = waitForChild(backpack.Gear,"GearPreview") - -local scroller = waitForChild(backpack.Gear,"GearGridScrollingArea") - -local currentLoadout = waitForChild(backpack.Parent,"CurrentLoadout") - -local grid = waitForChild(backpack.Gear,"GearGrid") -local gearButton = waitForChild(grid,"GearButton") - -local swapSlot = waitForChild(script.Parent,"SwapSlot") - -local backpackManager = waitForChild(script.Parent,"CoreScripts/BackpackScripts/BackpackManager") -local backpackOpenEvent = waitForChild(backpackManager,"BackpackOpenEvent") -local backpackCloseEvent = waitForChild(backpackManager,"BackpackCloseEvent") -local tabClickedEvent = waitForChild(backpackManager,"TabClickedEvent") -local resizeEvent = waitForChild(backpackManager,"ResizeEvent") -local searchRequestedEvent = waitForChild(backpackManager,"SearchRequestedEvent") -local tellBackpackReadyFunc = waitForChild(backpackManager,"BackpackReady") - --- creating scroll bar early as to make sure items get placed correctly -local scrollFrame, scrollUp, scrollDown, recalculateScroll = RbxGui.CreateScrollingFrame(nil, "grid", Vector2.new(6, 6)) - -scrollFrame.Position = UDim2.new(0,0,0,30) -scrollFrame.Size = UDim2.new(1,0,1,-30) -scrollFrame.Parent = backpack.Gear.GearGrid - -local scrollBar = Instance.new("Frame") -scrollBar.Name = "ScrollBar" -scrollBar.BackgroundTransparency = 0.9 -scrollBar.BackgroundColor3 = Color3.new(1,1,1) -scrollBar.BorderSizePixel = 0 -scrollBar.Size = UDim2.new(0, 17, 1, -36) -scrollBar.Position = UDim2.new(0,0,0,18) -scrollBar.Parent = scroller - -scrollDown.Position = UDim2.new(0,0,1,-17) - -scrollUp.Parent = scroller -scrollDown.Parent = scroller - -local scrollFrameLoadout, scrollUpLoadout, scrollDownLoadout, recalculateScrollLoadout = RbxGui.CreateScrollingFrame() - -scrollFrameLoadout.Position = UDim2.new(0,0,0,0) -scrollFrameLoadout.Size = UDim2.new(1,0,1,0) -scrollFrameLoadout.Parent = backpack.Gear.GearLoadouts.LoadoutsList - -local LoadoutButton = Instance.new("TextButton") -LoadoutButton.RobloxLocked = true -LoadoutButton.Name = "LoadoutButton" -LoadoutButton.Font = Enum.Font.ArialBold -LoadoutButton.FontSize = Enum.FontSize.Size14 -LoadoutButton.Position = UDim2.new(0,0,0,0) -LoadoutButton.Size = UDim2.new(1,0,0,32) -LoadoutButton.Style = Enum.ButtonStyle.RobloxButton -LoadoutButton.Text = "Loadout #1" -LoadoutButton.TextColor3 = Color3.new(1,1,1) -LoadoutButton.Parent = scrollFrameLoadout - -local LoadoutButtonTwo = LoadoutButton:clone() -LoadoutButtonTwo.Text = "Loadout #2" -LoadoutButtonTwo.Parent = scrollFrameLoadout - -local LoadoutButtonThree = LoadoutButton:clone() -LoadoutButtonThree.Text = "Loadout #3" -LoadoutButtonThree.Parent = scrollFrameLoadout - -local LoadoutButtonFour = LoadoutButton:clone() -LoadoutButtonFour.Text = "Loadout #4" -LoadoutButtonFour.Parent = scrollFrameLoadout - -local scrollBarLoadout = Instance.new("Frame") -scrollBarLoadout.Name = "ScrollBarLoadout" -scrollBarLoadout.BackgroundTransparency = 0.9 -scrollBarLoadout.BackgroundColor3 = Color3.new(1,1,1) -scrollBarLoadout.BorderSizePixel = 0 -scrollBarLoadout.Size = UDim2.new(0, 17, 1, -36) -scrollBarLoadout.Position = UDim2.new(0,0,0,18) -scrollBarLoadout.Parent = backpack.Gear.GearLoadouts.GearLoadoutsScrollingArea - -scrollDownLoadout.Position = UDim2.new(0,0,1,-17) - -scrollUpLoadout.Parent = backpack.Gear.GearLoadouts.GearLoadoutsScrollingArea -scrollDownLoadout.Parent = backpack.Gear.GearLoadouts.GearLoadoutsScrollingArea - - --- Begin Functions -function removeFromMap(map,object) - for i = 1, #map do - if map[i] == object then - table.remove(map,i) - break - end - end -end - -function robloxLock(instance) - instance.RobloxLocked = true - children = instance:GetChildren() - if children then - for i, child in ipairs(children) do - robloxLock(child) - end - end -end - -function resize() - local size = 0 - if gearPreview.AbsoluteSize.Y > gearPreview.AbsoluteSize.X then - size = gearPreview.AbsoluteSize.X * 0.75 - else - size = gearPreview.AbsoluteSize.Y * 0.75 - end - - waitForChild(gearPreview,"GearImage") - gearPreview.GearImage.Size = UDim2.new(0,size,0,size) - gearPreview.GearImage.Position = UDim2.new(0,gearPreview.AbsoluteSize.X/2 - size/2,0.75,-size) - - resizeGrid() -end - -function addToGrid(child) - if not child:IsA("Tool") then - if not child:IsA("HopperBin") then - return - end - end - if child:FindFirstChild("RobloxBuildTool") then return end - - for i,v in pairs(backpackItems) do -- check to see if we already have this gear registered - if v == child then return end - end - - table.insert(backpackItems,child) - - local changeCon = child.Changed:connect(function(prop) - if prop == "Name" then - if buttons[child] then - if buttons[child].Image == "" then - buttons[child].GearText.Text = child.Name - end - end - end - end) - local ancestryCon = nil - ancestryCon = child.AncestryChanged:connect(function(theChild,theParent) - local thisObject = nil - for k,v in pairs(backpackItems) do - if v == child then - thisObject = v - break - end - end - - waitForProperty(player,"Character") - waitForChild(player,"Backpack") - if (child.Parent ~= player.Backpack and child.Parent ~= player.Character) then - if ancestryCon then ancestryCon:disconnect() end - if changeCon then changeCon:disconnect() end - - for k,v in pairs(backpackItems) do - if v == thisObject then - if mouseEnterCons[buttons[v]] then mouseEnterCons[buttons[v]]:disconnect() end - if mouseClickCons[buttons[v]] then mouseClickCons[buttons[v]]:disconnect() end - buttons[v].Parent = nil - buttons[v] = nil - break - end - end - - removeFromMap(backpackItems,thisObject) - - resizeGrid() - else - resizeGrid() - end - updateGridActive() - end) - resizeGrid() -end - -function buttonClick(button) - if button:FindFirstChild("UnequipContextMenu") and not button.Active then - button.UnequipContextMenu.Visible = true - browsingMenu = true - end -end - -function previewGear(button) - if not browsingMenu then - gearPreview.Visible = false - gearPreview.GearImage.Image = button.Image - gearPreview.GearStats.GearName.Text = button.GearReference.Value.Name - end -end - -function findEmptySlot() - local smallestNum = nil - local loadout = currentLoadout:GetChildren() - for i = 1, #loadout do - if loadout[i]:IsA("Frame") and #loadout[i]:GetChildren() <= 0 then - local frameNum = tonumber(string.sub(loadout[i].Name,5)) - if frameNum == 0 then frameNum = 10 end - if not smallestNum or (smallestNum > frameNum) then - smallestNum = frameNum - end - end - end - if smallestNum == 10 then smallestNum = 0 end - return smallestNum -end - -function checkForSwap(button,x,y) - local loadoutChildren = currentLoadout:GetChildren() - for i = 1, #loadoutChildren do - if loadoutChildren[i]:IsA("Frame") and string.find(loadoutChildren[i].Name,"Slot") then - if x >= loadoutChildren[i].AbsolutePosition.x and x <= (loadoutChildren[i].AbsolutePosition.x + loadoutChildren[i].AbsoluteSize.x) then - if y >= loadoutChildren[i].AbsolutePosition.y and y <= (loadoutChildren[i].AbsolutePosition.y + loadoutChildren[i].AbsoluteSize.y) then - local slot = tonumber(string.sub(loadoutChildren[i].Name,5)) - swapGearSlot(slot,button) - return true - end - end - end - end - return false -end - -function resizeGrid() - for k,v in pairs(backpackItems) do - if not v:FindFirstChild("RobloxBuildTool") then - if not buttons[v] then - local buttonClone = gearButton:clone() - buttonClone.Parent = grid.ScrollingFrame - buttonClone.Visible = true - buttonClone.Image = v.TextureId - if buttonClone.Image == "" then - buttonClone.GearText.Text = v.Name - end - - buttonClone.GearReference.Value = v - buttonClone.Draggable = true - buttons[v] = buttonClone - - - if not IsTouchDevice() then - local unequipMenu = getGearContextMenu() - - - unequipMenu.Visible = false - unequipMenu.Parent = buttonClone - end - - local beginPos = nil - buttonClone.DragBegin:connect(function(value) - waitForChild(buttonClone, 'Background') - buttonClone['Background'].ZIndex = 10 - buttonClone.ZIndex = 10 - beginPos = value - end) - buttonClone.DragStopped:connect(function(x,y) - waitForChild(buttonClone, 'Background') - buttonClone['Background'].ZIndex = 1.0 - buttonClone.ZIndex = 2 - if beginPos ~= buttonClone.Position then - if not checkForSwap(buttonClone,x,y) then - buttonClone:TweenPosition(beginPos,Enum.EasingDirection.Out, Enum.EasingStyle.Quad, 0.5, true) - buttonClone.Draggable = false - delay(0.5,function() - buttonClone.Draggable = true - end) - else - buttonClone.Position = beginPos - end - end - end) - local clickTime = tick() - mouseEnterCons[buttonClone] = buttonClone.MouseEnter:connect(function() previewGear(buttonClone) end) - mouseClickCons[buttonClone] = buttonClone.MouseButton1Click:connect(function() - local newClickTime = tick() - if buttonClone.Active and (newClickTime - clickTime) < 0.5 then - local slot = findEmptySlot() - if slot then - buttonClone.ZIndex = 1 - swapGearSlot(slot,buttonClone) - end - else - buttonClick(buttonClone) - end - clickTime = newClickTime - end) - end - end - end - recalculateScroll() -end - -function showPartialGrid(subset) - for k,v in pairs(buttons) do - v.Parent = nil - end - if subset then - for k,v in pairs(subset) do - v.Parent = grid.ScrollingFrame - end - end - recalculateScroll() -end - -function showEntireGrid() - for k,v in pairs(buttons) do - v.Parent = grid.ScrollingFrame - end - recalculateScroll() -end - -function inLoadout(gear) - local children = currentLoadout:GetChildren() - for i = 1, #children do - if children[i]:IsA("Frame") then - local button = children[i]:GetChildren() - if #button > 0 then - if button[1].GearReference.Value and button[1].GearReference.Value == gear then - return true - end - end - end - end - return false -end - -function updateGridActive() - for k,v in pairs(backpackItems) do - if buttons[v] then - local gear = nil - local gearRef = buttons[v]:FindFirstChild("GearReference") - - if gearRef then gear = gearRef.Value end - - if not gear then - buttons[v].Active = false - elseif inLoadout(gear) then - buttons[v].Active = false - else - buttons[v].Active = true - end - end - end -end - -function centerGear(loadoutChildren) - local gearButtons = {} - local lastSlotAdd = nil - for i = 1, #loadoutChildren do - if loadoutChildren[i]:IsA("Frame") and #loadoutChildren[i]:GetChildren() > 0 then - if loadoutChildren[i].Name == "Slot0" then - lastSlotAdd = loadoutChildren[i] - else - table.insert(gearButtons, loadoutChildren[i]) - end - end - end - if lastSlotAdd then table.insert(gearButtons,lastSlotAdd) end - - local startPos = ( 1 - (#gearButtons * 0.1) ) / 2 - for i = 1, #gearButtons do - gearButtons[i]:TweenPosition(UDim2.new(startPos + ((i - 1) * 0.1),0,0,0), Enum.EasingDirection.Out, Enum.EasingStyle.Quad, 0.25, true) - end -end - -function tabClickHandler(tabName) - if tabName == StaticTabName then - backpackOpenHandler(tabName) - else - backpackCloseHandler(tabName) - end -end - -function backpackOpenHandler(currentTab) - if currentTab and currentTab ~= StaticTabName then - backpack.Gear.Visible = false - return - end - - backpack.Gear.Visible = true - updateGridActive() - - resizeGrid() - resize() - tellBackpackReadyFunc:Invoke() -end - -function backpackCloseHandler(currentTab) - if currentTab and currentTab ~= StaticTabName then - backpack.Gear.Visible = false - return - end - - backpack.Gear.Visible = false - - resizeGrid() - resize() - tellBackpackReadyFunc:Invoke() -end - -function loadoutCheck(child, selectState) - if not child:IsA("ImageButton") then return end - for k,v in pairs(backpackItems) do - if buttons[v] then - if child:FindFirstChild("GearReference") and buttons[v]:FindFirstChild("GearReference") then - if buttons[v].GearReference.Value == child.GearReference.Value then - buttons[v].Active = selectState - break - end - end - end - end -end - -function clearPreview() - gearPreview.GearImage.Image = "" - gearPreview.GearStats.GearName.Text = "" -end - -function removeAllEquippedGear(physGear) - local stuff = player.Character:GetChildren() - for i = 1, #stuff do - if ( stuff[i]:IsA("Tool") or stuff[i]:IsA("HopperBin") ) and stuff[i] ~= physGear then - stuff[i].Parent = playerBackpack - end - end -end - -function equipGear(physGear) - removeAllEquippedGear(physGear) - physGear.Parent = player.Character - updateGridActive() -end - -function unequipGear(physGear) - physGear.Parent = playerBackpack - updateGridActive() -end - -function highlight(button) - button.TextColor3 = Color3.new(0,0,0) - button.BackgroundColor3 = Color3.new(0.8,0.8,0.8) -end -function clearHighlight(button) - button.TextColor3 = Color3.new(1,1,1) - button.BackgroundColor3 = Color3.new(0,0,0) -end - -function swapGearSlot(slot,gearButton) - if not swapSlot.Value then -- signal loadout to swap a gear out - swapSlot.Slot.Value = slot - swapSlot.GearButton.Value = gearButton - swapSlot.Value = true - updateGridActive() - end -end - - -local UnequipGearMenuClick = function(element, menu) - if type(element.Action) ~= "number" then return end - local num = element.Action - if num == 1 then -- remove from loadout - unequipGear(menu.Parent.GearReference.Value) - local inventoryButton = menu.Parent - local gearToUnequip = inventoryButton.GearReference.Value - local loadoutChildren = currentLoadout:GetChildren() - local slot = -1 - for i = 1, #loadoutChildren do - if loadoutChildren[i]:IsA("Frame") then - local button = loadoutChildren[i]:GetChildren() - if button[1] and button[1].GearReference.Value == gearToUnequip then - slot = button[1].SlotNumber.Text - break - end - end - end - swapGearSlot(slot,nil) - end -end - -function setupCharacterConnections() - - if backpackAddCon then backpackAddCon:disconnect() end - backpackAddCon = game.Players.LocalPlayer.Backpack.ChildAdded:connect(function(child) addToGrid(child) end) - - -- make sure we get all the children - local backpackChildren = game.Players.LocalPlayer.Backpack:GetChildren() - for i = 1, #backpackChildren do - addToGrid(backpackChildren[i]) - end - - if characterChildAddedCon then characterChildAddedCon:disconnect() end - characterChildAddedCon = - game.Players.LocalPlayer.Character.ChildAdded:connect(function(child) - addToGrid(child) - updateGridActive() - end) - - if characterChildRemovedCon then characterChildRemovedCon:disconnect() end - characterChildRemovedCon = - game.Players.LocalPlayer.Character.ChildRemoved:connect(function(child) - updateGridActive() - end) - - wait() - centerGear(currentLoadout:GetChildren()) -end - -function removeCharacterConnections() - if characterChildAddedCon then characterChildAddedCon:disconnect() end - if characterChildRemovedCon then characterChildRemovedCon:disconnect() end - if backpackAddCon then backpackAddCon:disconnect() end -end - -function trim(s) - return (s:gsub("^%s*(.-)%s*$", "%1")) -end - -function filterGear(terms) - local filteredGear = {} - for k,v in pairs(backpackItems) do - if buttons[v] then - local gearString = string.lower(buttons[v].GearReference.Value.Name) - gearString = trim(gearString) - for i = 1, #terms do - if string.match(gearString,terms[i]) then - table.insert(filteredGear,buttons[v]) - break - end - end - end - end - - return filteredGear -end -function splitByWhitespace(text) - if type(text) ~= "string" then return nil end - - local terms = {} - for token in string.gmatch(text, "[^%s]+") do - if string.len(token) > 0 then - table.insert(terms,token) - end - end - return terms -end -function showSearchGear(searchTerms) - if not backpack.Gear.Visible then return end -- currently not active tab - - local searchTermTable = splitByWhitespace(searchTerms) - if searchTermTable and (#searchTermTable > 0) then - currSearchTerms = searchTermTable - else - currSearchTerms = nil - end - - if searchTermTable == nil then - showEntireGrid() - return - end - - local filteredButtons = filterGear(currSearchTerms) - showPartialGrid(filteredButtons) -end - -function nukeBackpack() - while #buttons > 0 do - table.remove(buttons) - end - buttons = {} - while #backpackItems > 0 do - table.remove(backpackItems) - end - backpackItems = {} - local scrollingFrameChildren = grid.ScrollingFrame:GetChildren() - for i = 1, #scrollingFrameChildren do - scrollingFrameChildren[i]:remove() - end -end - -function getGearContextMenu() - local gearContextMenu = Instance.new("Frame") - gearContextMenu.Active = true - gearContextMenu.Name = "UnequipContextMenu" - gearContextMenu.Size = UDim2.new(0,115,0,70) - gearContextMenu.Position = UDim2.new(0,-16,0,-16) - gearContextMenu.BackgroundTransparency = 1 - gearContextMenu.Visible = false - - local gearContextMenuButton = Instance.new("TextButton") - gearContextMenuButton.Name = "UnequipContextMenuButton" - gearContextMenuButton.Text = "" - gearContextMenuButton.Style = Enum.ButtonStyle.RobloxButtonDefault - gearContextMenuButton.ZIndex = 8 - gearContextMenuButton.Size = UDim2.new(1, 0, 1, -20) - gearContextMenuButton.Visible = true - gearContextMenuButton.Parent = gearContextMenu - - local elementHeight = 12 - - local contextMenuElements = {} - local contextMenuElementsName = {"Remove Hotkey"} - - for i = 1, #contextMenuElementsName do - local element = {} - element.Type = "Button" - element.Text = contextMenuElementsName[i] - element.Action = i - element.DoIt = UnequipGearMenuClick - table.insert(contextMenuElements,element) - end - - for i, contextElement in ipairs(contextMenuElements) do - local element = contextElement - if element.Type == "Button" then - local button = Instance.new("TextButton") - button.Name = "UnequipContextButton" .. i - button.BackgroundColor3 = Color3.new(0,0,0) - button.BorderSizePixel = 0 - button.TextXAlignment = Enum.TextXAlignment.Left - button.Text = " " .. contextElement.Text - button.Font = Enum.Font.Arial - button.FontSize = Enum.FontSize.Size14 - button.Size = UDim2.new(1, 8, 0, elementHeight) - button.Position = UDim2.new(0,0,0,elementHeight * i) - button.TextColor3 = Color3.new(1,1,1) - button.ZIndex = 9 - button.Parent = gearContextMenuButton - - if not IsTouchDevice() then - - button.MouseButton1Click:connect(function() - if button.Active and not gearContextMenu.Parent.Active then - local success, result = pcall(function() element.DoIt(element, gearContextMenu) end) - browsingMenu = false - gearContextMenu.Visible = false - clearHighlight(button) - clearPreview() - end - end) - - button.MouseEnter:connect(function() - if button.Active and gearContextMenu.Parent.Active then - highlight(button) - end - end) - button.MouseLeave:connect(function() - if button.Active and gearContextMenu.Parent.Active then - clearHighlight(button) - end - end) - end - - contextElement.Button = button - contextElement.Element = button - elseif element.Type == "Label" then - local frame = Instance.new("Frame") - frame.Name = "ContextLabel" .. i - frame.BackgroundTransparency = 1 - frame.Size = UDim2.new(1, 8, 0, elementHeight) - - local label = Instance.new("TextLabel") - label.Name = "Text1" - label.BackgroundTransparency = 1 - label.BackgroundColor3 = Color3.new(1,1,1) - label.BorderSizePixel = 0 - label.TextXAlignment = Enum.TextXAlignment.Left - label.Font = Enum.Font.ArialBold - label.FontSize = Enum.FontSize.Size14 - label.Position = UDim2.new(0.0, 0, 0, 0) - label.Size = UDim2.new(0.5, 0, 1, 0) - label.TextColor3 = Color3.new(1,1,1) - label.ZIndex = 9 - label.Parent = frame - element.Label1 = label - - if element.GetText2 then - label = Instance.new("TextLabel") - label.Name = "Text2" - label.BackgroundTransparency = 1 - label.BackgroundColor3 = Color3.new(1,1,1) - label.BorderSizePixel = 0 - label.TextXAlignment = Enum.TextXAlignment.Right - label.Font = Enum.Font.Arial - label.FontSize = Enum.FontSize.Size14 - label.Position = UDim2.new(0.5, 0, 0, 0) - label.Size = UDim2.new(0.5, 0, 1, 0) - label.TextColor3 = Color3.new(1,1,1) - label.ZIndex = 9 - label.Parent = frame - element.Label2 = label - end - frame.Parent = gearContextMenuButton - element.Label = frame - element.Element = frame - end - end - - gearContextMenu.ZIndex = 4 - gearContextMenu.MouseLeave:connect(function() - browsingMenu = false - gearContextMenu.Visible = false - clearPreview() - end) - robloxLock(gearContextMenu) - - return gearContextMenu -end - -function coreGuiChanged(coreGuiType,enabled) - if coreGuiType == Enum.CoreGuiType.Backpack or coreGuiType == Enum.CoreGuiType.All then - if not enabled then - backpack.Gear.Visible = false - end - end -end - - -local backpackChildren = player.Backpack:GetChildren() -for i = 1, #backpackChildren do - addToGrid(backpackChildren[i]) -end - -------------------------- Start Lifelong Connections ----------------------- - - -resizeEvent.Event:connect(function(absSize) - if debounce then return end - - debounce = true - wait() - resize() - resizeGrid() - debounce = false -end) - -currentLoadout.ChildAdded:connect(function(child) loadoutCheck(child, false) end) -currentLoadout.ChildRemoved:connect(function(child) loadoutCheck(child, true) end) - -currentLoadout.DescendantAdded:connect(function(descendant) - if not backpack.Visible and ( descendant:IsA("ImageButton") or descendant:IsA("TextButton") ) then - centerGear(currentLoadout:GetChildren()) - end -end) -currentLoadout.DescendantRemoving:connect(function(descendant) - if not backpack.Visible and ( descendant:IsA("ImageButton") or descendant:IsA("TextButton") ) then - wait() - centerGear(currentLoadout:GetChildren()) - end -end) - -grid.MouseEnter:connect(function() clearPreview() end) -grid.MouseLeave:connect(function() clearPreview() end) - -player.CharacterRemoving:connect(function() - removeCharacterConnections() - nukeBackpack() -end) -player.CharacterAdded:connect(function() setupCharacterConnections() end) - -player.ChildAdded:connect(function(child) - if child:IsA("Backpack") then - playerBackpack = child - if backpackAddCon then backpackAddCon:disconnect() end - backpackAddCon = game.Players.LocalPlayer.Backpack.ChildAdded:connect(function(child) addToGrid(child) end) - end -end) - -swapSlot.Changed:connect(function() - if not swapSlot.Value then - updateGridActive() - end -end) - -local loadoutChildren = currentLoadout:GetChildren() -for i = 1, #loadoutChildren do - if loadoutChildren[i]:IsA("Frame") and string.find(loadoutChildren[i].Name,"Slot") then - loadoutChildren[i].ChildRemoved:connect(function() - updateGridActive() - end) - loadoutChildren[i].ChildAdded:connect(function() - updateGridActive() - end) - end -end -------------------------- End Lifelong Connections ----------------------- - -coreGuiChanged(Enum.CoreGuiType.Backpack, Game.StarterGui:GetCoreGuiEnabled(Enum.CoreGuiType.Backpack)) -Game.StarterGui.CoreGuiChangedSignal:connect(coreGuiChanged) - -resize() -resizeGrid() - --- make sure any items in the loadout are accounted for in inventory -local loadoutChildren = currentLoadout:GetChildren() -for i = 1, #loadoutChildren do - loadoutCheck(loadoutChildren[i], false) -end -if not backpack.Visible then centerGear(currentLoadout:GetChildren()) end - --- make sure that inventory is listening to gear reparenting -if characterChildAddedCon == nil and game.Players.LocalPlayer["Character"] then - setupCharacterConnections() -end -if not backpackAddCon then - backpackAddCon = game.Players.LocalPlayer.Backpack.ChildAdded:connect(function(child) addToGrid(child) end) -end - -backpackOpenEvent.Event:connect(backpackOpenHandler) -backpackCloseEvent.Event:connect(backpackCloseHandler) -tabClickedEvent.Event:connect(tabClickHandler) -searchRequestedEvent.Event:connect(showSearchGear) - -recalculateScrollLoadout() \ No newline at end of file diff --git a/assets/ugc/871 b/assets/ugc/871 deleted file mode 100644 index c266d36..0000000 --- a/assets/ugc/871 +++ /dev/null @@ -1,1091 +0,0 @@ ---rbxassetid%871% -if game.CoreGui.Version < 3 then return end -- peace out if we aren't using the right client - --- A couple of necessary functions -local function waitForChild(instance, name) - while not instance:FindFirstChild(name) do - instance.ChildAdded:wait() - end - return instance:FindFirstChild(name) -end -local function waitForProperty(instance, property) - while not instance[property] do - instance.Changed:wait() - end -end - -local useCoreHealthBar = false -pcall(function() useCoreHealthBar = Game.Players:GetUseCoreScriptHealthBar() end) - - -local currentLoadout = script.Parent -local StaticTabName = "gear" -local backpackEnabled = true - -local robloxGui = game:GetService("CoreGui"):FindFirstChild("RobloxGui") -assert(robloxGui) -local controlFrame = waitForChild(robloxGui, 'ControlFrame') -local backpackButton = waitForChild(controlFrame, 'BackpackButton') -local backpack = waitForChild(robloxGui, 'Backpack') -waitForChild(robloxGui,"CurrentLoadout") -waitForChild(robloxGui.CurrentLoadout,"TempSlot") -waitForChild(robloxGui.CurrentLoadout.TempSlot,"SlotNumber") - -local function IsTouchDevice() - return Game:GetService('UserInputService').TouchEnabled -end - -local function IsSmallScreen() - return (robloxGui.AbsoluteSize.Y <= 500) -end - -local function moveHealthBar(pGui) - waitForChild(pGui, 'HealthGUI') - waitForChild(pGui['HealthGUI'], 'tray') - local tray = pGui['HealthGUI']['tray'] - tray.Position = UDim2.new(0.5, -85, 1, -26) -end - -local function setHealthBarVisible( pGui, visible ) - waitForChild(pGui, 'HealthGUI') - waitForChild(pGui['HealthGUI'], 'tray') - local tray = pGui['HealthGUI']['tray'] - tray.Visible = visible -end - - ---- Begin Locals -waitForChild(game,"Players") -waitForProperty(game.Players,"LocalPlayer") -local player = game.Players.LocalPlayer - -if not useCoreHealthBar then - waitForChild(player, 'PlayerGui') - Spawn(function() - moveHealthBar(player.PlayerGui) - end) -end - -while player.Character == nil do wait(0.03) end -local humanoid = waitForChild(player.Character, 'Humanoid') -humanoid.Died:connect(function() - backpackButton.Visible = false -end) - -waitForChild(game, "LocalBackpack") -game.LocalBackpack:SetOldSchoolBackpack(false) - -waitForChild(currentLoadout.Parent,"Backpack") -local guiBackpack = currentLoadout.Parent.Backpack - -local backpackManager = waitForChild(guiBackpack,"CoreScripts/BackpackScripts/BackpackManager") -local backpackOpenEvent = waitForChild(backpackManager,"BackpackOpenEvent") -local backpackCloseEvent = waitForChild(backpackManager,"BackpackCloseEvent") -local tabClickedEvent = waitForChild(backpackManager,"TabClickedEvent") -local resizeEvent = waitForChild(backpackManager,"ResizeEvent") - -local inGearTab = true - -local maxNumLoadoutItems = 10 -if IsSmallScreen() then - maxNumLoadoutItems = 4 -end - - -local characterChildAddedCon = nil -local backpackChildCon = nil - -local debounce = false - -local enlargeFactor = 1.18 -local buttonSizeEnlarge = UDim2.new(1 * enlargeFactor,0,1 * enlargeFactor,0) -local buttonSizeNormal = UDim2.new(1,0,1,0) -local enlargeOverride = true -local guiTweenSpeed = 0.5 - -local firstInstanceOfLoadout = false - -local inventory = {} - -local gearSlots = {} -for i = 1, maxNumLoadoutItems do - gearSlots[i] = "empty" -end - -local backpackWasOpened = false ---- End Locals - - - - - - --- Begin Functions -local function backpackIsOpen() - if guiBackpack then - return guiBackpack.Visible - end - return false -end - - -local function kill(prop,con,gear) - if con then con:disconnect() end - if prop == true and gear then - reorganizeLoadout(gear,false) - end -end - -function registerNumberKeys() - for i = 0, 9 do - game:GetService("GuiService"):AddKey(tostring(i)) - end -end - -function unregisterNumberKeys() - for i = 0, 9 do - game:GetService("GuiService"):RemoveKey(tostring(i)) - end -end - -function characterInWorkspace() - if game.Players["LocalPlayer"] then - if game.Players.LocalPlayer["Character"] then - if game.Players.LocalPlayer.Character ~= nil then - if game.Players.LocalPlayer.Character.Parent ~= nil then - return true - end - end - end - end - - return false -end - -function removeGear(gear) - local emptySlot = nil - for i = 1, #gearSlots do - if gearSlots[i] == gear and gear.Parent ~= nil then - emptySlot = i - break - end - end - if emptySlot then - if gearSlots[emptySlot].GearReference.Value then - if gearSlots[emptySlot].GearReference.Value.Parent == game.Players.LocalPlayer.Character then -- if we currently have this equipped, unequip it - gearSlots[emptySlot].GearReference.Value.Parent = game.Players.LocalPlayer.Backpack - end - - if gearSlots[emptySlot].GearReference.Value:IsA("HopperBin") and gearSlots[emptySlot].GearReference.Value.Active then -- this is an active hopperbin - gearSlots[emptySlot].GearReference.Value:Disable() - gearSlots[emptySlot].GearReference.Value.Active = false - end - end - - gearSlots[emptySlot] = "empty" - - local centerizeX = gear.Size.X.Scale/2 - local centerizeY = gear.Size.Y.Scale/2 - --[[gear:TweenSizeAndPosition(UDim2.new(0,0,0,0), - UDim2.new(gear.Position.X.Scale + centerizeX,gear.Position.X.Offset,gear.Position.Y.Scale + centerizeY,gear.Position.Y.Offset), - Enum.EasingDirection.Out, Enum.EasingStyle.Quad,guiTweenSpeed/4,true)]] - delay(0, - function() - gear:remove() - end) - - Spawn(function() - while backpackIsOpen() do wait(0.03) end - waitForChild(player, 'Backpack') - local allEmpty = true - for i = 1, #gearSlots do - if gearSlots[i] ~= 'empty' then - allEmpty = false - end - end - - if allEmpty then - if #player.Backpack:GetChildren() < 1 then - backpackButton.Visible = false - else - backpackButton.Position = UDim2.new(0.5, -7, 1, -55) - end - end - end) - end -end - -function insertGear(gear, addToSlot) - local pos = nil - if not addToSlot then - for i = 1, #gearSlots do - if gearSlots[i] == "empty" then - pos = i - break - end - end - - if pos == 1 and gearSlots[1] ~= "empty" then gear:remove() return end -- we are currently full, can't add in - else - pos = addToSlot - -- push all gear down one slot - local start = 1 - for i = 1, #gearSlots do - if gearSlots[i] == "empty" then - start = i - break - end - end - for i = start, pos + 1, -1 do - gearSlots[i] = gearSlots[i - 1] - if i == 10 then - gearSlots[i].SlotNumber.Text = "0" - gearSlots[i].SlotNumberDownShadow.Text = "0" - gearSlots[i].SlotNumberUpShadow.Text = "0" - else - gearSlots[i].SlotNumber.Text = i - gearSlots[i].SlotNumberDownShadow.Text = i - gearSlots[i].SlotNumberUpShadow.Text = i - end - end - end - - gearSlots[pos] = gear - if pos ~= maxNumLoadoutItems then - if(type(tostring(pos)) == "string") then - local posString = tostring(pos) - gear.SlotNumber.Text = posString - gear.SlotNumberDownShadow.Text = posString - gear.SlotNumberUpShadow.Text = posString - end - else -- tenth gear doesn't follow mathematical pattern :( - gear.SlotNumber.Text = "0" - gear.SlotNumberDownShadow.Text = "0" - gear.SlotNumberUpShadow.Text = "0" - end - gear.Visible = true - - local con = nil - con = gear.Kill.Changed:connect(function(prop) kill(prop,con,gear) end) -end - - -function reorganizeLoadout(gear, inserting, equipped, addToSlot) - if inserting then -- add in gear - insertGear(gear, addToSlot) - else - removeGear(gear) - end - if gear ~= "empty" then gear.ZIndex = 1 end -end - -function checkToolAncestry(child,parent) - if child:FindFirstChild("RobloxBuildTool") then return end -- don't show roblox build tools - if child:IsA("Tool") or child:IsA("HopperBin") then - for i = 1, #gearSlots do - if gearSlots[i] ~= "empty" and gearSlots[i].GearReference.Value == child then - if parent == nil then - gearSlots[i].Kill.Value = true - return false - elseif child.Parent == player.Character then - gearSlots[i].Selected = true - return true - elseif child.Parent == player.Backpack then - if child:IsA("Tool") or child:IsA("HopperBin") then gearSlots[i].Selected = false end - return true - else - gearSlots[i].Kill.Value = true - return false - end - return true - end - end - end -end - -function removeAllEquippedGear(physGear) - local stuff = player.Character:GetChildren() - for i = 1, #stuff do - if ( stuff[i]:IsA("Tool") or stuff[i]:IsA("HopperBin") ) and stuff[i] ~= physGear then - if stuff[i]:IsA("Tool") then stuff[i].Parent = player.Backpack end - if stuff[i]:IsA("HopperBin") then - stuff[i]:Disable() - end - end - end -end - -function hopperBinSwitcher(numKey, physGear) - if not physGear then return end - - physGear:ToggleSelect() - - if gearSlots[numKey] == "empty" then return end - - if not physGear.Active then - gearSlots[numKey].Selected = false - normalizeButton(gearSlots[numKey]) - else - gearSlots[numKey].Selected = true - enlargeButton(gearSlots[numKey]) - end -end - -function toolSwitcher(numKey) - - if not gearSlots[numKey] then return end - local physGear = gearSlots[numKey].GearReference.Value - if physGear == nil then return end - - removeAllEquippedGear(physGear) -- we don't remove this gear, as then we get a double switcheroo - - local key = numKey - if numKey == 0 then key = 10 end - - for i = 1, #gearSlots do - if gearSlots[i] and gearSlots[i] ~= "empty" and i ~= key then - normalizeButton(gearSlots[i]) - gearSlots[i].Selected = false - if gearSlots[i].GearReference and gearSlots[i].GearReference.Value and gearSlots[i].GearReference.Value:IsA("HopperBin") and gearSlots[i].GearReference.Value.Active then - gearSlots[i].GearReference.Value:ToggleSelect() - end - end - end - - if physGear:IsA("HopperBin") then - hopperBinSwitcher(numKey,physGear) - else - if physGear.Parent == player.Character then - physGear.Parent = player.Backpack - - if gearSlots[numKey] ~= "empty" then - gearSlots[numKey].Selected = false - normalizeButton(gearSlots[numKey]) - end - else - --player.Character.Humanoid:EquipTool(physGear) - - physGear.Parent = player.Character - gearSlots[numKey].Selected = true - - enlargeButton(gearSlots[numKey]) - end - end -end - - -function activateGear(num) - local numKey = nil - if num == "0" then - numKey = 10 -- why do lua indexes have to start at 1? :( - else - numKey = tonumber(num) - end - - if(numKey == nil) then return end - - if gearSlots[numKey] ~= "empty" then - toolSwitcher(numKey) - end -end - - -enlargeButton = function(button) - if button.Size.Y.Scale > 1 then return end - if not button.Parent then return end - if not button.Selected then return end - - for i = 1, #gearSlots do - if gearSlots[i] == "empty" then break end - if gearSlots[i] ~= button then - normalizeButton(gearSlots[i]) - end - end - - if not enlargeOverride then - return - end - - if button:FindFirstChild('Highlight') then - button.Highlight.Visible = true - end - - if button:IsA("ImageButton") or button:IsA("TextButton") then - button.ZIndex = 5 - local centerizeX = -(buttonSizeEnlarge.X.Scale - button.Size.X.Scale)/2 - local centerizeY = -(buttonSizeEnlarge.Y.Scale - button.Size.Y.Scale)/2 - button:TweenSizeAndPosition(buttonSizeEnlarge, - UDim2.new(button.Position.X.Scale + centerizeX,button.Position.X.Offset,button.Position.Y.Scale + centerizeY,button.Position.Y.Offset), - Enum.EasingDirection.Out, Enum.EasingStyle.Quad,guiTweenSpeed/5,enlargeOverride) - end -end - -normalizeAllButtons = function() - for i = 1, #gearSlots do - if gearSlots[i] == "empty" then break end - if gearSlots[i] ~= button then - normalizeButton(gearSlots[i],0.1) - end - end -end - - -normalizeButton = function(button, speed) - if not button then return end - if button.Size.Y.Scale <= 1 then return end - if button.Selected then return end - if not button.Parent then return end - - local moveSpeed = speed - if moveSpeed == nil or type(moveSpeed) ~= "number" then moveSpeed = guiTweenSpeed/5 end - - if button:FindFirstChild('Highlight') then - button.Highlight.Visible = false - end - - if button:IsA("ImageButton") or button:IsA("TextButton") then - button.ZIndex = 1 - local inverseEnlarge = 1/enlargeFactor - local centerizeX = -(buttonSizeNormal.X.Scale - button.Size.X.Scale)/2 - local centerizeY = -(buttonSizeNormal.Y.Scale - button.Size.Y.Scale)/2 - button:TweenSizeAndPosition(buttonSizeNormal, - UDim2.new(button.Position.X.Scale + centerizeX,button.Position.X.Offset,button.Position.Y.Scale + centerizeY,button.Position.Y.Offset), - Enum.EasingDirection.Out, Enum.EasingStyle.Quad,moveSpeed,enlargeOverride) - end -end - -local waitForDebounce = function() - while debounce do - wait() - end -end - -function pointInRectangle(point,rectTopLeft,rectSize) - if point.x > rectTopLeft.x and point.x < (rectTopLeft.x + rectSize.x) then - if point.y > rectTopLeft.y and point.y < (rectTopLeft.y + rectSize.y) then - return true - end - end - return false -end - -function swapGear(gearClone,toFrame) - local toFrameChildren = toFrame:GetChildren() - if #toFrameChildren == 1 then - if toFrameChildren[1]:FindFirstChild("SlotNumber") then - - local toSlot = tonumber(toFrameChildren[1].SlotNumber.Text) - local gearCloneSlot = tonumber(gearClone.SlotNumber.Text) - if toSlot == 0 then toSlot = 10 end - if gearCloneSlot == 0 then gearCloneSlot = 10 end - - gearSlots[toSlot] = gearClone - gearSlots[gearCloneSlot] = toFrameChildren[1] - - toFrameChildren[1].SlotNumber.Text = gearClone.SlotNumber.Text - toFrameChildren[1].SlotNumberDownShadow.Text = gearClone.SlotNumber.Text - toFrameChildren[1].SlotNumberUpShadow.Text = gearClone.SlotNumber.Text - - local subString = string.sub(toFrame.Name,5) - gearClone.SlotNumber.Text = subString - gearClone.SlotNumberDownShadow.Text = subString - gearClone.SlotNumberUpShadow.Text = subString - - gearClone.Position = UDim2.new(gearClone.Position.X.Scale,0,gearClone.Position.Y.Scale,0) - toFrameChildren[1].Position = UDim2.new(toFrameChildren[1].Position.X.Scale,0,toFrameChildren[1].Position.Y.Scale,0) - - toFrameChildren[1].Parent = gearClone.Parent - gearClone.Parent = toFrame - end - else - local slotNum = tonumber(gearClone.SlotNumber.Text) - if slotNum == 0 then slotNum = 10 end - gearSlots[slotNum] = "empty" -- reset this gear slot - - local subString = string.sub(toFrame.Name,5) - gearClone.SlotNumber.Text = subString - gearClone.SlotNumberDownShadow.Text = subString - gearClone.SlotNumberUpShadow.Text = subString - - local toSlotNum = tonumber(gearClone.SlotNumber.Text) - if toSlotNum == 0 then toSlotNum = 10 end - gearSlots[toSlotNum] = gearClone - gearClone.Position = UDim2.new(gearClone.Position.X.Scale,0,gearClone.Position.Y.Scale,0) - gearClone.Parent = toFrame - end -end - -function resolveDrag(gearClone,x,y) - local mousePoint = Vector2.new(x,y) - - local frame = gearClone.Parent - local frames = frame.Parent:GetChildren() - - for i = 1, #frames do - if frames[i]:IsA("Frame") then - if pointInRectangle(mousePoint, frames[i].AbsolutePosition,frames[i].AbsoluteSize) then - swapGear(gearClone,frames[i]) - return true - end - end - end - - if x < frame.AbsolutePosition.x or x > ( frame.AbsolutePosition.x + frame.AbsoluteSize.x ) then - reorganizeLoadout(gearClone,false) - return false - elseif y < frame.AbsolutePosition.y or y > ( frame.AbsolutePosition.y + frame.AbsoluteSize.y ) then - reorganizeLoadout(gearClone,false) - return false - else - if dragBeginPos then gearClone.Position = dragBeginPos end - return -1 - end -end - -function unequipAllItems(dontEquipThis) - for i = 1, #gearSlots do - if gearSlots[i] == "empty" then break end - if gearSlots[i].GearReference.Value and gearSlots[i].GearReference.Value ~= dontEquipThis then - if gearSlots[i].GearReference.Value:IsA("HopperBin") then - gearSlots[i].GearReference.Value:Disable() - elseif gearSlots[i].GearReference.Value:IsA("Tool") then - gearSlots[i].GearReference.Value.Parent = game.Players.LocalPlayer.Backpack - end - gearSlots[i].Selected = false - end - end -end - -function showToolTip(button, tip) - if button and button:FindFirstChild("ToolTipLabel") and button.ToolTipLabel:IsA("TextLabel") and not IsTouchDevice() then - button.ToolTipLabel.Text = tostring(tip) - local xSize = button.ToolTipLabel.TextBounds.X + 6 - button.ToolTipLabel.Size = UDim2.new(0,xSize,0,20) - button.ToolTipLabel.Position = UDim2.new(0.5,-xSize/2,0,-30) - button.ToolTipLabel.Visible = true - end -end - -function hideToolTip(button, tip) - if button and button:FindFirstChild("ToolTipLabel") and button.ToolTipLabel:IsA("TextLabel") then - button.ToolTipLabel.Visible = false - end -end - -local addingPlayerChild = function(child, equipped, addToSlot, inventoryGearButton) - waitForDebounce() - debounce = true - - if child:FindFirstChild("RobloxBuildTool") then debounce = false return end -- don't show roblox build tools - if not child:IsA("Tool") then - if not child:IsA("HopperBin") then - debounce = false - return -- we don't care about anything besides tools (sigh...) - end - end - - if not addToSlot then - for i = 1, #gearSlots do - if gearSlots[i] ~= "empty" and gearSlots[i].GearReference.Value == child then -- we already have gear, do nothing - debounce = false - return - end - end - end - - local gearClone = currentLoadout.TempSlot:clone() - gearClone.Name = child.Name - gearClone.GearImage.Image = child.TextureId - if gearClone.GearImage.Image == "" then - gearClone.GearText.Text = child.Name - end - gearClone.GearReference.Value = child - - gearClone.MouseEnter:connect(function() - local gear = gearClone.GearReference and gearClone.GearReference.Value - if gear:IsA("Tool") and gear.ToolTip ~= "" then - showToolTip(gearClone, gear.ToolTip) - end - end) - - gearClone.MouseLeave:connect(function() - local gear = gearClone.GearReference and gearClone.GearReference.Value - if gear:IsA("Tool") and gear.ToolTip ~= "" then - hideToolTip(gearClone, gear.ToolTip) - end - end) - - gearClone.RobloxLocked = true - - local slotToMod = -1 - - if not addToSlot then - for i = 1, #gearSlots do - if gearSlots[i] == "empty" then - slotToMod = i - break - end - end - else - slotToMod = addToSlot - end - - if slotToMod == - 1 then -- No available slot to add in! - debounce = false - return - end - - local slotNum = slotToMod % 10 - local parent = currentLoadout:FindFirstChild("Slot"..tostring(slotNum)) - gearClone.Parent = parent - - if inventoryGearButton then - local absolutePositionFinal = inventoryGearButton.AbsolutePosition - local currentAbsolutePosition = gearClone.AbsolutePosition - local diff = absolutePositionFinal - currentAbsolutePosition - gearClone.Position = UDim2.new(gearClone.Position.X.Scale,diff.x,gearClone.Position.Y.Scale,diff.y) - gearClone.ZIndex = 4 - end - - if addToSlot then - reorganizeLoadout(gearClone, true, equipped, addToSlot) - else - reorganizeLoadout(gearClone, true) - end - - if gearClone.Parent == nil then debounce = false return end -- couldn't fit in (hopper is full!) - - if equipped then - gearClone.Selected = true - unequipAllItems(child) - delay(guiTweenSpeed + 0.01,function() -- if our gear is equipped, we will want to enlarge it when done moving - if gearClone:FindFirstChild("GearReference") and ( (gearClone.GearReference.Value:IsA("Tool") and gearClone.GearReference.Value.Parent == player.Character) or - (gearClone.GearReference.Value:IsA("HopperBin") and gearClone.GearReference.Value.Active == true) ) then - enlargeButton(gearClone) - end - end) - end - - local dragBeginPos = nil - local clickCon, buttonDeleteCon, mouseEnterCon, mouseLeaveCon, dragStop, dragBegin = nil - clickCon = gearClone.MouseButton1Click:connect(function() - if characterInWorkspace() then - if not gearClone.Draggable then - activateGear(gearClone.SlotNumber.Text) - end - end - end) - mouseEnterCon = gearClone.MouseEnter:connect(function() - if guiBackpack.Visible then - gearClone.Draggable = true - end - end) - dragBegin = gearClone.DragBegin:connect(function(pos) - dragBeginPos = pos - gearClone.ZIndex = 7 - local children = gearClone:GetChildren() - for i = 1, #children do - if children[i]:IsA("TextLabel") then - if string.find(children[i].Name,"Shadow") then - children[i].ZIndex = 8 - else - children[i].ZIndex = 9 - end - elseif children[i]:IsA("Frame") or children[i]:IsA("ImageLabel") then - children[i].ZIndex = 7 - end - end - end) - dragStop = gearClone.DragStopped:connect(function(x,y) - if gearClone.Selected then - gearClone.ZIndex = 4 - else - gearClone.ZIndex = 3 - end - local children = gearClone:GetChildren() - for i = 1, #children do - if children[i]:IsA("TextLabel") then - if string.find(children[i].Name,"Shadow") then - children[i].ZIndex = 3 - else - children[i].ZIndex = 4 - end - elseif children[i]:IsA("Frame") or children[i]:IsA("ImageLabel") then - children[i].ZIndex = 2 - end - end - resolveDrag(gearClone,x,y) - end) - mouseLeaveCon = gearClone.MouseLeave:connect(function() - gearClone.Draggable = false - end) - buttonDeleteCon = gearClone.AncestryChanged:connect(function() - if gearClone.Parent and gearClone.Parent.Parent == currentLoadout then return end - if clickCon then clickCon:disconnect() end - if buttonDeleteCon then buttonDeleteCon:disconnect() end - if mouseEnterCon then mouseEnterCon:disconnect() end - if mouseLeaveCon then mouseLeaveCon:disconnect() end - if dragStop then dragStop:disconnect() end - if dragBegin then dragBegin:disconnect() end - end) -- this probably isn't necessary since objects are being deleted (probably), but this might still leak just in case - - local childCon = nil - local childChangeCon = nil - childCon = child.AncestryChanged:connect(function(newChild,parent) - if not checkToolAncestry(newChild,parent) then - if childCon then childCon:disconnect() end - if childChangeCon then childChangeCon:disconnect() end - removeFromInventory(child) - elseif parent == game.Players.LocalPlayer.Backpack then - normalizeButton(gearClone) - end - end) - - childChangeCon = child.Changed:connect(function(prop) - if prop == "Name" then - if gearClone and gearClone.GearImage.Image == "" then - gearClone.GearText.Text = child.Name - end - elseif prop == "Active" then - if child and child:IsA("HopperBin") then - if not child.Active then - gearClone.Selected = false - normalizeButton(gearClone) - end - end - elseif prop == "TextureId" then - gearClone.GearImage.Image = child.TextureId - end - end) - - debounce = false - - Spawn(function() - while backpackIsOpen() do wait(0.03) end - backpackButton.Position = UDim2.new(0.5, -7, 1, -55) - - for i = 1, #gearSlots do - if gearSlots[i] ~= 'empty' then - backpackButton.Position = UDim2.new(0.5, -7, 1, -108) - if backpackEnabled then - backpackButton.Visible = true - end - end - end - end) -end - -function addToInventory(child) - if not child:IsA("Tool") or not child:IsA("HopperBin") then return end - - local slot = nil - for i = 1, #inventory do - if inventory[i] and inventory[i] == child then return end - if not inventory[i] then slot = i end - end - if slot then - inventory[slot] = child - elseif #inventory < 1 then - inventory[1] = child - else - inventory[#inventory + 1] = child - end -end - -function removeFromInventory(child) - for i = 1, #inventory do - if inventory[i] == child then - table.remove(inventory,i) - inventory[i] = nil - end - end -end - -local spreadOutGear = function() - loadoutChildren = currentLoadout:GetChildren() - - for i = 1, #loadoutChildren do - if loadoutChildren[i]:IsA("Frame") then - loadoutChildren[i].BackgroundTransparency = 0.5 - local slot = tonumber(string.sub(loadoutChildren[i].Name,5)) - if slot == 0 then slot = 10 end - if IsSmallScreen() then - loadoutChildren[i]:TweenPosition(UDim2.new(0,(slot-1) * 60,0,0), Enum.EasingDirection.Out, Enum.EasingStyle.Quad, 0.25, true) - else - loadoutChildren[i]:TweenPosition(UDim2.new((slot - 1)/10,0,0,0), Enum.EasingDirection.Out, Enum.EasingStyle.Quad, 0.25, true) - end - end - end -end - -local centerGear = function() - loadoutChildren = currentLoadout:GetChildren() - local gearButtons = {} - local lastSlotAdd = nil - - for i = 1, #loadoutChildren do - if loadoutChildren[i]:IsA("Frame") then - if #loadoutChildren[i]:GetChildren() > 0 then - if loadoutChildren[i].Name == "Slot0" then - lastSlotAdd = loadoutChildren[i] - else - table.insert(gearButtons, loadoutChildren[i]) - end - end - loadoutChildren[i].BackgroundTransparency = 1 - end - end - if lastSlotAdd then table.insert(gearButtons,lastSlotAdd) end - - local startPos = ( 1 - (#gearButtons * 0.1) ) / 2 - for i = 1, #gearButtons do - if IsSmallScreen() then - startPos = ( 0.5 - (#gearButtons * 0.333)/2 ) - gearButtons[i]:TweenPosition(UDim2.new(startPos + (i-1) * 0.33, 0, 0, 0), Enum.EasingDirection.Out, Enum.EasingStyle.Quad, 0.25, true) - else - gearButtons[i]:TweenPosition(UDim2.new(startPos + ((i - 1) * 0.1),0,0,0), Enum.EasingDirection.Out, Enum.EasingStyle.Quad, 0.25, true) - end - end -end - -function editLoadout() - backpackWasOpened = true - if inGearTab then - spreadOutGear() - end -end - -function readonlyLoadout() - if not inGearTab then - centerGear() - end -end - -function setupBackpackListener() - if backpackChildCon then backpackChildCon:disconnect() backpackChildCon = nil end - backpackChildCon = player.Backpack.ChildAdded:connect(function(child) - if not firstInstanceOfLoadout then - firstInstanceOfLoadout = true - if backpackEnabled then - backpackButton.Visible = true - end - end - addingPlayerChild(child) - addToInventory(child) - end) -end - -function playerCharacterChildAdded(child) - addingPlayerChild(child,true) - addToInventory(child) -end - -function activateLoadout() - currentLoadout.Visible = true -end - -function deactivateLoadout() - currentLoadout.Visible = false -end - -function tabHandler(inFocus) - inGearTab = inFocus - if inFocus then - editLoadout() - else - readonlyLoadout() - end -end - -function coreGuiChanged(coreGuiType,enabled) - if coreGuiType == Enum.CoreGuiType.Backpack or coreGuiType == Enum.CoreGuiType.All then - backpackButton.Visible = enabled - backpackEnabled = enabled - - if enabled then - registerNumberKeys() - else - unregisterNumberKeys() - end - end - - if not useCoreHealthBar and coreGuiType == Enum.CoreGuiType.Health or coreGuiType == Enum.CoreGuiType.All then - setHealthBarVisible(game.Players.LocalPlayer.PlayerGui, enabled) - end -end --- End Functions - - - - - - --- Begin Script -registerNumberKeys() - -coreGuiChanged(Enum.CoreGuiType.Backpack, Game.StarterGui:GetCoreGuiEnabled(Enum.CoreGuiType.Backpack)) -if not useCoreHealthBar then - coreGuiChanged(Enum.CoreGuiType.Health, Game.StarterGui:GetCoreGuiEnabled(Enum.CoreGuiType.Health)) -end -Game.StarterGui.CoreGuiChangedSignal:connect(coreGuiChanged) - -wait() -- let stuff initialize incase this is first heartbeat... - -waitForChild(player,"Backpack") -waitForProperty(player,"Character") - --- not sure why this had no delay but the player.CharacterAdded one had one... this type of error would be easier to avoid with function reusage -delay(1,function() - local backpackChildren = player.Backpack:GetChildren() - local size = math.min(10,#backpackChildren) - for i = 1, size do - if backpackEnabled then - backpackButton.Visible = true - end - addingPlayerChild(backpackChildren[i],false) - end - setupBackpackListener() -end) - -delay(2, function() - --while true do - if not backpackWasOpened then - if IsSmallScreen() then - local cChildren = currentLoadout:GetChildren() - for i = 1, #cChildren do - local slotNum = tonumber(string.sub(cChildren[i].Name, 5, string.len(cChildren[i].Name))) - if type(slotNum) == 'number' then - cChildren[i].Position = UDim2.new(0, (slotNum-1) * 60, 0, 0) - end - end - end - end - wait(0.25) - --end -end) - -if not useCoreHealthBar then - player.ChildAdded:connect(function(child) - if child:IsA('PlayerGui') then - moveHealthBar(child) - end - end) -end - -waitForProperty(player,"Character") -for i,v in ipairs(player.Character:GetChildren()) do - playerCharacterChildAdded(v) -end -characterChildAddedCon = player.Character.ChildAdded:connect(function(child) playerCharacterChildAdded(child) end) - -waitForChild(player.Character,"Humanoid") -humanoidDiedCon = player.Character.Humanoid.Died:connect(function() - if humanoidDiedCon then humanoidDiedCon:disconnect() humanoidDiedCon = nil end - deactivateLoadout() - if backpackChildCon then backpackChildCon:disconnect() backpackChildCon = nil end - backpackWasOpened = false -end) - -player.CharacterRemoving:connect(function() - for i = 1, #gearSlots do - if gearSlots[i] ~= "empty" then - gearSlots[i].Parent = nil - gearSlots[i] = "empty" - end - end -end) - -player.CharacterAdded:connect(function() - waitForProperty(game.Players,"LocalPlayer") - player = game.Players.LocalPlayer -- make sure we are still looking at the correct character - waitForChild(player,"Backpack") - - - delay(1,function() - local backpackChildren = player.Backpack:GetChildren() - local size = math.min(10,#backpackChildren) - for i = 1, size do - if backpackEnabled then - backpackButton.Visible = true - end - addingPlayerChild(backpackChildren[i],false) - end - setupBackpackListener() - end) - - activateLoadout() - - if characterChildAddedCon then - characterChildAddedCon:disconnect() - characterChildAddedCon = nil - end - - characterChildAddedCon = - player.Character.ChildAdded:connect(function(child) - addingPlayerChild(child,true) - end) - - waitForChild(player.Character,"Humanoid") - if backpack.Visible then - backpackOpenEvent:Fire() - end - humanoidDiedCon = - player.Character.Humanoid.Died:connect(function() - if backpackEnabled then - backpackButton.Visible = false - end - firstInstanceOfLoadout = false - deactivateLoadout() - - if humanoidDiedCon then humanoidDiedCon:disconnect() humanoidDiedCon = nil end - if backpackChildCon then backpackChildCon:disconnect() backpackChildCon = nil end - end) - if not useCoreHealthBar then - waitForChild(player, 'PlayerGui') - moveHealthBar(player.PlayerGui) - end - delay(2, function() - --while true do - if not backpackWasOpened then - if IsSmallScreen() then - local cChildren = currentLoadout:GetChildren() - for i = 1, #cChildren do - local slotNum = tonumber(string.sub(cChildren[i].Name, 5, string.len(cChildren[i].Name))) - if type(slotNum) == 'number' then - cChildren[i].Position = UDim2.new(0, (slotNum-1) * 60, 0, 0) - end - end - end - end - wait(0.25) - --end - end) -end) - -waitForChild(guiBackpack,"SwapSlot") -guiBackpack.SwapSlot.Changed:connect(function() - if guiBackpack.SwapSlot.Value then - local swapSlot = guiBackpack.SwapSlot - local pos = swapSlot.Slot.Value - if pos == 0 then pos = 10 end - if gearSlots[pos] then - reorganizeLoadout(gearSlots[pos],false) - end - if swapSlot.GearButton.Value then - addingPlayerChild(swapSlot.GearButton.Value.GearReference.Value,false,pos) - end - guiBackpack.SwapSlot.Value = false - end -end) - -game:GetService("GuiService").KeyPressed:connect(function(key) - if characterInWorkspace() then - activateGear(key) - end -end) - -backpackOpenEvent.Event:connect(editLoadout) -backpackCloseEvent.Event:connect(centerGear) -tabClickedEvent.Event:connect(function ( tabName ) - tabHandler(tabName == StaticTabName) -end) diff --git a/assets/ugc/872 b/assets/ugc/872 deleted file mode 100644 index 57348c7..0000000 --- a/assets/ugc/872 +++ /dev/null @@ -1,147 +0,0 @@ ---rbxassetid%872% --- Responsible for giving out tools in personal servers - --- first, lets see if buildTools have already been created --- create the object in lighting (TODO: move to some sort of "container" object when we have one) -local toolsArray = game.Lighting:FindFirstChild("BuildToolsModel") -local ownerArray = game.Lighting:FindFirstChild("OwnerToolsModel") -local hasBuildTools = false - -function getIds(idTable, assetTable) - for i = 1, #idTable do - local model = game:GetService("InsertService"):LoadAsset(idTable[i]) - if model then - local children = model:GetChildren() - for i = 1, #children do - if children[i]:IsA("Tool") then - table.insert(assetTable,children[i]) - end - end - end - end -end - -function storeInLighting(modelName, assetTable) - local model = Instance.new("Model") - model.Archivable = false - model.Name = modelName - - for i = 1, #assetTable do - assetTable[i].Parent = model - end - - if not game.Lighting:FindFirstChild(modelName) then -- no one beat us to it, we get to insert - model.Parent = game.Lighting - end -end - -if not toolsArray then -- no one has made build tools yet, we get to! - local buildToolIds = {} - local ownerToolIds = {} - - table.insert(buildToolIds,73089166) -- PartSelectionTool - table.insert(buildToolIds,73089190) -- DeleteTool - table.insert(buildToolIds,73089204) -- CloneTool - table.insert(buildToolIds,73089214) -- RotateTool - table.insert(buildToolIds,73089239) -- ConfigTool - table.insert(buildToolIds,73089259) -- WiringTool - table.insert(buildToolIds,58921588) -- ClassicTool - - table.insert(ownerToolIds, 65347268) - - -- next, create array of our tools - local buildTools = {} - local ownerTools = {} - - getIds(buildToolIds, buildTools) - getIds(ownerToolIds, ownerTools) - - storeInLighting("BuildToolsModel",buildTools) - storeInLighting("OwnerToolsModel",ownerTools) - - toolsArray = game.Lighting:FindFirstChild("BuildToolsModel") - ownerArray = game.Lighting:FindFirstChild("OwnerToolsModel") -end - -local localBuildTools = {} - -function giveBuildTools() - if not hasBuildTools then - hasBuildTools = true - local theTools = toolsArray:GetChildren() - for i = 1, #theTools do - local toolClone = theTools[i]:clone() - if toolClone then - toolClone.Parent = game.Players.LocalPlayer.Backpack - table.insert(localBuildTools,toolClone) - end - end - end -end - -function giveOwnerTools() - local theOwnerTools = ownerArray:GetChildren() - for i = 1, #theOwnerTools do - local ownerToolClone = theOwnerTools[i]:clone() - if ownerToolClone then - ownerToolClone.Parent = game.Players.LocalPlayer.Backpack - table.insert(localBuildTools,ownerToolClone) - end - end -end - -function removeBuildTools() - if hasBuildTools then - hasBuildTools = false - for i = 1, #localBuildTools do - localBuildTools[i].Parent = nil - end - localBuildTools = {} - end -end - -if game.Players.LocalPlayer.HasBuildTools then - giveBuildTools() -end -if game.Players.LocalPlayer.PersonalServerRank >= 255 then - giveOwnerTools() -end - -local debounce = false -game.Players.LocalPlayer.Changed:connect(function(prop) - if prop == "HasBuildTools" then - while debounce do - wait(0.5) - end - - debounce = true - - if game.Players.LocalPlayer.HasBuildTools then - giveBuildTools() - else - removeBuildTools() - end - - if game.Players.LocalPlayer.PersonalServerRank >= 255 then - giveOwnerTools() - end - - debounce = false - elseif prop == "PersonalServerRank" then - if game.Players.LocalPlayer.PersonalServerRank >= 255 then - giveOwnerTools() - elseif game.Players.LocalPlayer.PersonalServerRank <= 0 then - game.Players.LocalPlayer:Remove() -- you're banned, goodbye! - end - end -end) - -game.Players.LocalPlayer.CharacterAdded:connect(function() - hasBuildTools = false - if game.Players.LocalPlayer.HasBuildTools then - giveBuildTools() - end - if game.Players.LocalPlayer.PersonalServerRank >= 255 then - giveOwnerTools() - end -end) \ No newline at end of file diff --git a/assets/ugc/873 b/assets/ugc/873 deleted file mode 100644 index cbcf2d5..0000000 --- a/assets/ugc/873 +++ /dev/null @@ -1,265 +0,0 @@ ---rbxassetid%873% --- ContextActionTouch.lua --- Copyright ROBLOX 2014, created by Ben Tkacheff --- this script controls ui and firing of lua functions that are bound in ContextActionService for touch inputs --- Essentially a user can bind a lua function to a key code, input type (mousebutton1 etc.) and this - --- Variables -local contextActionService = Game:GetService("ContextActionService") -local isTouchDevice = Game:GetService("UserInputService").TouchEnabled -local functionTable = {} -local buttonVector = {} -local buttonScreenGui = nil -local buttonFrame = nil - -local ContextDownImage = "http://www.mete0r.xyz/asset/?id=97166756" -local ContextUpImage = "http://www.mete0r.xyz/asset/?id=97166444" - -local oldTouches = {} - -local buttonPositionTable = { - [1] = UDim2.new(0,123,0,70), - [2] = UDim2.new(0,30,0,60), - [3] = UDim2.new(0,180,0,160), - [4] = UDim2.new(0,85,0,-25), - [5] = UDim2.new(0,185,0,-25), - [6] = UDim2.new(0,185,0,260), - [7] = UDim2.new(0,216,0,65) - } -local maxButtons = #buttonPositionTable - --- Preload images -Game:GetService("ContentProvider"):Preload(ContextDownImage) -Game:GetService("ContentProvider"):Preload(ContextUpImage) - -while not Game.Players do - wait() -end - -while not Game.Players.LocalPlayer do - wait() -end - -function createContextActionGui() - if not buttonScreenGui and isTouchDevice then - buttonScreenGui = Instance.new("ScreenGui") - buttonScreenGui.Name = "ContextActionGui" - - buttonFrame = Instance.new("Frame") - buttonFrame.BackgroundTransparency = 1 - buttonFrame.Size = UDim2.new(0.3,0,0.5,0) - buttonFrame.Position = UDim2.new(0.7,0,0.5,0) - buttonFrame.Name = "ContextButtonFrame" - buttonFrame.Parent = buttonScreenGui - end -end - --- functions -function setButtonSizeAndPosition(object) - local buttonSize = 55 - local xOffset = 10 - local yOffset = 95 - - -- todo: better way to determine mobile sized screens - local onSmallScreen = (game.CoreGui.RobloxGui.AbsoluteSize.X < 600) - if not onSmallScreen then - buttonSize = 85 - xOffset = 40 - end - - object.Size = UDim2.new(0,buttonSize,0,buttonSize) -end - -function contextButtonDown(button, inputObject, actionName) - if inputObject.UserInputType == Enum.UserInputType.Touch then - button.Image = ContextDownImage - contextActionService:CallFunction(actionName, Enum.UserInputState.Begin, inputObject) - end -end - -function contextButtonMoved(button, inputObject, actionName) - if inputObject.UserInputType == Enum.UserInputType.Touch then - button.Image = ContextDownImage - contextActionService:CallFunction(actionName, Enum.UserInputState.Change, inputObject) - end -end - -function contextButtonUp(button, inputObject, actionName) - button.Image = ContextUpImage - if inputObject.UserInputType == Enum.UserInputType.Touch and inputObject.UserInputState == Enum.UserInputState.End then - contextActionService:CallFunction(actionName, Enum.UserInputState.End, inputObject) - end -end - -function isSmallScreenDevice() - return Game:GetService("GuiService"):GetScreenResolution().y <= 320 -end - - -function createNewButton(actionName, functionInfoTable) - local contextButton = Instance.new("ImageButton") - contextButton.Name = "ContextActionButton" - contextButton.BackgroundTransparency = 1 - contextButton.Size = UDim2.new(0,90,0,90) - contextButton.Active = true - if isSmallScreenDevice() then - contextButton.Size = UDim2.new(0,70,0,70) - end - contextButton.Image = ContextUpImage - contextButton.Parent = buttonFrame - - local currentButtonTouch = nil - - Game:GetService("UserInputService").InputEnded:connect(function ( inputObject ) - oldTouches[inputObject] = nil - end) - contextButton.InputBegan:connect(function(inputObject) - if oldTouches[inputObject] then return end - - if inputObject.UserInputState == Enum.UserInputState.Begin and currentButtonTouch == nil then - currentButtonTouch = inputObject - contextButtonDown(contextButton, inputObject, actionName) - end - end) - contextButton.InputChanged:connect(function(inputObject) - if oldTouches[inputObject] then return end - if currentButtonTouch ~= inputObject then return end - - contextButtonMoved(contextButton, inputObject, actionName) - end) - contextButton.InputEnded:connect(function(inputObject) - if oldTouches[inputObject] then return end - if currentButtonTouch ~= inputObject then return end - - currentButtonTouch = nil - oldTouches[inputObject] = true - contextButtonUp(contextButton, inputObject, actionName) - end) - - local actionIcon = Instance.new("ImageLabel") - actionIcon.Name = "ActionIcon" - actionIcon.Position = UDim2.new(0.175, 0, 0.175, 0) - actionIcon.Size = UDim2.new(0.65, 0, 0.65, 0) - actionIcon.BackgroundTransparency = 1 - if functionInfoTable["image"] and type(functionInfoTable["image"]) == "string" then - actionIcon.Image = functionInfoTable["image"] - end - actionIcon.Parent = contextButton - - local actionTitle = Instance.new("TextLabel") - actionTitle.Name = "ActionTitle" - actionTitle.Size = UDim2.new(1,0,1,0) - actionTitle.BackgroundTransparency = 1 - actionTitle.Font = Enum.Font.SourceSansBold - actionTitle.TextColor3 = Color3.new(1,1,1) - actionTitle.TextStrokeTransparency = 0 - actionTitle.FontSize = Enum.FontSize.Size18 - actionTitle.TextWrapped = true - actionTitle.Text = "" - if functionInfoTable["title"] and type(functionInfoTable["title"]) == "string" then - actionTitle.Text = functionInfoTable["title"] - end - actionTitle.Parent = contextButton - - return contextButton -end - -function createButton( actionName, functionInfoTable ) - local button = createNewButton(actionName, functionInfoTable) - - local position = nil - for i = 1,#buttonVector do - if buttonVector[i] == "empty" then - position = i - break - end - end - - if not position then - position = #buttonVector + 1 - end - - if position > maxButtons then - return -- todo: let user know we have too many buttons already? - end - - buttonVector[position] = button - functionTable[actionName]["button"] = button - - button.Position = buttonPositionTable[position] - button.Parent = buttonFrame - - if buttonScreenGui and buttonScreenGui.Parent == nil then - buttonScreenGui.Parent = Game.Players.LocalPlayer.PlayerGui - end -end - -function removeAction(actionName) - if not functionTable[actionName] then return end - - local actionButton = functionTable[actionName]["button"] - - if actionButton then - actionButton.Parent = nil - - for i = 1,#buttonVector do - if buttonVector[i] == actionButton then - buttonVector[i] = "empty" - break - end - end - - actionButton:Destroy() - end - - functionTable[actionName] = nil -end - -function addAction(actionName,createTouchButton,functionInfoTable) - if functionTable[actionName] then - removeAction(actionName) - end - functionTable[actionName] = {functionInfoTable} - if createTouchButton and isTouchDevice then - createContextActionGui() - createButton(actionName, functionInfoTable) - end -end - --- Connections -contextActionService.BoundActionChanged:connect( function(actionName, changeName, changeTable) - if functionTable[actionName] and changeTable then - local button = functionTable[actionName]["button"] - if button then - if changeName == "image" then - button.ActionIcon.Image = changeTable[changeName] - elseif changeName == "title" then - button.ActionTitle.Text = changeTable[changeName] - elseif changeName == "description" then - -- todo: add description to menu - elseif changeName == "position" then - button.Position = changeTable[changeName] - end - end - end -end) - -contextActionService.BoundActionAdded:connect( function(actionName, createTouchButton, functionInfoTable) - addAction(actionName, createTouchButton, functionInfoTable) -end) - -contextActionService.BoundActionRemoved:connect( function(actionName, functionInfoTable) - removeAction(actionName) -end) - -contextActionService.GetActionButtonEvent:connect( function(actionName) - if functionTable[actionName] then - contextActionService:FireActionButtonFoundSignal(actionName, functionTable[actionName]["button"]) - end -end) - --- make sure any bound data before we setup connections is handled -local boundActions = contextActionService:GetAllBoundActionInfo() -for actionName, actionData in pairs(boundActions) do - addAction(actionName,actionData["createTouchButton"],actionData) -end diff --git a/assets/ugc/874 b/assets/ugc/874 deleted file mode 100644 index c56a62d..0000000 --- a/assets/ugc/874 +++ /dev/null @@ -1,4032 +0,0 @@ ---rbxassetid%874% -local t = {} - -local function ScopedConnect(parentInstance, instance, event, signalFunc, syncFunc, removeFunc) - local eventConnection = nil - - --Connection on parentInstance is scoped by parentInstance (when destroyed, it goes away) - local tryConnect = function() - if game:IsAncestorOf(parentInstance) then - --Entering the world, make sure we are connected/synced - if not eventConnection then - eventConnection = instance[event]:connect(signalFunc) - if syncFunc then syncFunc() end - end - else - --Probably leaving the world, so disconnect for now - if eventConnection then - eventConnection:disconnect() - if removeFunc then removeFunc() end - end - end - end - - --Hook it up to ancestryChanged signal - local connection = parentInstance.AncestryChanged:connect(tryConnect) - - --Now connect us if we're already in the world - tryConnect() - - return connection -end - -local function getScreenGuiAncestor(instance) - local localInstance = instance - while localInstance and not localInstance:IsA("ScreenGui") do - localInstance = localInstance.Parent - end - return localInstance -end - -local function CreateButtons(frame, buttons, yPos, ySize) - local buttonNum = 1 - local buttonObjs = {} - for i, obj in ipairs(buttons) do - local button = Instance.new("TextButton") - button.Name = "Button" .. buttonNum - button.Font = Enum.Font.Arial - button.FontSize = Enum.FontSize.Size18 - button.AutoButtonColor = true - button.Modal = true - if obj["Style"] then - button.Style = obj.Style - else - button.Style = Enum.ButtonStyle.RobloxButton - end - if obj["ZIndex"] then - button.ZIndex = obj.ZIndex - end - button.Text = obj.Text - button.TextColor3 = Color3.new(1,1,1) - button.MouseButton1Click:connect(obj.Function) - button.Parent = frame - buttonObjs[buttonNum] = button - - buttonNum = buttonNum + 1 - end - local numButtons = buttonNum-1 - - if numButtons == 1 then - frame.Button1.Position = UDim2.new(0.35, 0, yPos.Scale, yPos.Offset) - frame.Button1.Size = UDim2.new(.4,0,ySize.Scale, ySize.Offset) - elseif numButtons == 2 then - frame.Button1.Position = UDim2.new(0.1, 0, yPos.Scale, yPos.Offset) - frame.Button1.Size = UDim2.new(.8/3,0, ySize.Scale, ySize.Offset) - - frame.Button2.Position = UDim2.new(0.55, 0, yPos.Scale, yPos.Offset) - frame.Button2.Size = UDim2.new(.35,0, ySize.Scale, ySize.Offset) - elseif numButtons >= 3 then - local spacing = .1 / numButtons - local buttonSize = .9 / numButtons - - buttonNum = 1 - while buttonNum <= numButtons do - buttonObjs[buttonNum].Position = UDim2.new(spacing*buttonNum + (buttonNum-1) * buttonSize, 0, yPos.Scale, yPos.Offset) - buttonObjs[buttonNum].Size = UDim2.new(buttonSize, 0, ySize.Scale, ySize.Offset) - buttonNum = buttonNum + 1 - end - end -end - -local function setSliderPos(newAbsPosX,slider,sliderPosition,bar,steps) - - local newStep = steps - 1 --otherwise we really get one more step than we want - local relativePosX = math.min(1, math.max(0, (newAbsPosX - bar.AbsolutePosition.X) / bar.AbsoluteSize.X )) - local wholeNum, remainder = math.modf(relativePosX * newStep) - if remainder > 0.5 then - wholeNum = wholeNum + 1 - end - relativePosX = wholeNum/newStep - - local result = math.ceil(relativePosX * newStep) - if sliderPosition.Value ~= (result + 1) then --only update if we moved a step - sliderPosition.Value = result + 1 - slider.Position = UDim2.new(relativePosX,-slider.AbsoluteSize.X/2,slider.Position.Y.Scale,slider.Position.Y.Offset) - end - -end - -local function cancelSlide(areaSoak) - areaSoak.Visible = false - if areaSoakMouseMoveCon then areaSoakMouseMoveCon:disconnect() end -end - -t.CreateStyledMessageDialog = function(title, message, style, buttons) - local frame = Instance.new("Frame") - frame.Size = UDim2.new(0.5, 0, 0, 165) - frame.Position = UDim2.new(0.25, 0, 0.5, -72.5) - frame.Name = "MessageDialog" - frame.Active = true - frame.Style = Enum.FrameStyle.RobloxRound - - local styleImage = Instance.new("ImageLabel") - styleImage.Name = "StyleImage" - styleImage.BackgroundTransparency = 1 - styleImage.Position = UDim2.new(0,5,0,15) - if style == "error" or style == "Error" then - styleImage.Size = UDim2.new(0, 71, 0, 71) - styleImage.Image = "http://www.mete0r.xyz/asset/?id=42565285" - elseif style == "notify" or style == "Notify" then - styleImage.Size = UDim2.new(0, 71, 0, 71) - styleImage.Image = "http://www.mete0r.xyz/asset/?id=42604978" - elseif style == "confirm" or style == "Confirm" then - styleImage.Size = UDim2.new(0, 74, 0, 76) - styleImage.Image = "http://www.mete0r.xyz/asset/?id=42557901" - else - return t.CreateMessageDialog(title,message,buttons) - end - styleImage.Parent = frame - - local titleLabel = Instance.new("TextLabel") - titleLabel.Name = "Title" - titleLabel.Text = title - titleLabel.TextStrokeTransparency = 0 - titleLabel.BackgroundTransparency = 1 - titleLabel.TextColor3 = Color3.new(221/255,221/255,221/255) - titleLabel.Position = UDim2.new(0, 80, 0, 0) - titleLabel.Size = UDim2.new(1, -80, 0, 40) - titleLabel.Font = Enum.Font.ArialBold - titleLabel.FontSize = Enum.FontSize.Size36 - titleLabel.TextXAlignment = Enum.TextXAlignment.Center - titleLabel.TextYAlignment = Enum.TextYAlignment.Center - titleLabel.Parent = frame - - local messageLabel = Instance.new("TextLabel") - messageLabel.Name = "Message" - messageLabel.Text = message - messageLabel.TextStrokeTransparency = 0 - messageLabel.TextColor3 = Color3.new(221/255,221/255,221/255) - messageLabel.Position = UDim2.new(0.025, 80, 0, 45) - messageLabel.Size = UDim2.new(0.95, -80, 0, 55) - messageLabel.BackgroundTransparency = 1 - messageLabel.Font = Enum.Font.Arial - messageLabel.FontSize = Enum.FontSize.Size18 - messageLabel.TextWrap = true - messageLabel.TextXAlignment = Enum.TextXAlignment.Left - messageLabel.TextYAlignment = Enum.TextYAlignment.Top - messageLabel.Parent = frame - - CreateButtons(frame, buttons, UDim.new(0, 105), UDim.new(0, 40) ) - - return frame -end - -t.CreateMessageDialog = function(title, message, buttons) - local frame = Instance.new("Frame") - frame.Size = UDim2.new(0.5, 0, 0.5, 0) - frame.Position = UDim2.new(0.25, 0, 0.25, 0) - frame.Name = "MessageDialog" - frame.Active = true - frame.Style = Enum.FrameStyle.RobloxRound - - local titleLabel = Instance.new("TextLabel") - titleLabel.Name = "Title" - titleLabel.Text = title - titleLabel.BackgroundTransparency = 1 - titleLabel.TextColor3 = Color3.new(221/255,221/255,221/255) - titleLabel.Position = UDim2.new(0, 0, 0, 0) - titleLabel.Size = UDim2.new(1, 0, 0.15, 0) - titleLabel.Font = Enum.Font.ArialBold - titleLabel.FontSize = Enum.FontSize.Size36 - titleLabel.TextXAlignment = Enum.TextXAlignment.Center - titleLabel.TextYAlignment = Enum.TextYAlignment.Center - titleLabel.Parent = frame - - local messageLabel = Instance.new("TextLabel") - messageLabel.Name = "Message" - messageLabel.Text = message - messageLabel.TextColor3 = Color3.new(221/255,221/255,221/255) - messageLabel.Position = UDim2.new(0.025, 0, 0.175, 0) - messageLabel.Size = UDim2.new(0.95, 0, .55, 0) - messageLabel.BackgroundTransparency = 1 - messageLabel.Font = Enum.Font.Arial - messageLabel.FontSize = Enum.FontSize.Size18 - messageLabel.TextWrap = true - messageLabel.TextXAlignment = Enum.TextXAlignment.Left - messageLabel.TextYAlignment = Enum.TextYAlignment.Top - messageLabel.Parent = frame - - CreateButtons(frame, buttons, UDim.new(0.8,0), UDim.new(0.15, 0)) - - return frame -end - -t.CreateDropDownMenu = function(items, onSelect, forRoblox, whiteSkin, baseZ) - local baseZIndex = 0 - if (type(baseZ) == "number") then - baseZIndex = baseZ - end - local width = UDim.new(0, 100) - local height = UDim.new(0, 32) - - local xPos = 0.055 - local frame = Instance.new("Frame") - local textColor = Color3.new(1,1,1) - if (whiteSkin) then - textColor = Color3.new(0.5, 0.5, 0.5) - end - frame.Name = "DropDownMenu" - frame.BackgroundTransparency = 1 - frame.Size = UDim2.new(width, height) - - local dropDownMenu = Instance.new("TextButton") - dropDownMenu.Name = "DropDownMenuButton" - dropDownMenu.TextWrap = true - dropDownMenu.TextColor3 = textColor - dropDownMenu.Text = "Choose One" - dropDownMenu.Font = Enum.Font.ArialBold - dropDownMenu.FontSize = Enum.FontSize.Size18 - dropDownMenu.TextXAlignment = Enum.TextXAlignment.Left - dropDownMenu.TextYAlignment = Enum.TextYAlignment.Center - dropDownMenu.BackgroundTransparency = 1 - dropDownMenu.AutoButtonColor = true - if (whiteSkin) then - dropDownMenu.Style = Enum.ButtonStyle.RobloxRoundDropdownButton - else - dropDownMenu.Style = Enum.ButtonStyle.RobloxButton - end - dropDownMenu.Size = UDim2.new(1,0,1,0) - dropDownMenu.Parent = frame - dropDownMenu.ZIndex = 2 + baseZIndex - - local dropDownIcon = Instance.new("ImageLabel") - dropDownIcon.Name = "Icon" - dropDownIcon.Active = false - if (whiteSkin) then - dropDownIcon.Image = "rbxasset://textures/ui/dropdown_arrow.png" - dropDownIcon.Size = UDim2.new(0,16,0,12) - dropDownIcon.Position = UDim2.new(1,-17,0.5, -6) - else - dropDownIcon.Image = "http://www.mete0r.xyz/asset/?id=45732894" - dropDownIcon.Size = UDim2.new(0,11,0,6) - dropDownIcon.Position = UDim2.new(1,-11,0.5, -2) - end - dropDownIcon.BackgroundTransparency = 1 - dropDownIcon.Parent = dropDownMenu - dropDownIcon.ZIndex = 2 + baseZIndex - - local itemCount = #items - local dropDownItemCount = #items - local useScrollButtons = false - if dropDownItemCount > 6 then - useScrollButtons = true - dropDownItemCount = 6 - end - - local droppedDownMenu = Instance.new("TextButton") - droppedDownMenu.Name = "List" - droppedDownMenu.Text = "" - droppedDownMenu.BackgroundTransparency = 1 - --droppedDownMenu.AutoButtonColor = true - if (whiteSkin) then - droppedDownMenu.Style = Enum.ButtonStyle.RobloxRoundDropdownButton - else - droppedDownMenu.Style = Enum.ButtonStyle.RobloxButton - end - droppedDownMenu.Visible = false - droppedDownMenu.Active = true --Blocks clicks - droppedDownMenu.Position = UDim2.new(0,0,0,0) - droppedDownMenu.Size = UDim2.new(1,0, (1 + dropDownItemCount)*.8, 0) - droppedDownMenu.Parent = frame - droppedDownMenu.ZIndex = 2 + baseZIndex - - local choiceButton = Instance.new("TextButton") - choiceButton.Name = "ChoiceButton" - choiceButton.BackgroundTransparency = 1 - choiceButton.BorderSizePixel = 0 - choiceButton.Text = "ReplaceMe" - choiceButton.TextColor3 = textColor - choiceButton.TextXAlignment = Enum.TextXAlignment.Left - choiceButton.TextYAlignment = Enum.TextYAlignment.Center - choiceButton.BackgroundColor3 = Color3.new(1, 1, 1) - choiceButton.Font = Enum.Font.Arial - choiceButton.FontSize = Enum.FontSize.Size18 - if useScrollButtons then - choiceButton.Size = UDim2.new(1,-13, .8/((dropDownItemCount + 1)*.8),0) - else - choiceButton.Size = UDim2.new(1, 0, .8/((dropDownItemCount + 1)*.8),0) - end - choiceButton.TextWrap = true - choiceButton.ZIndex = 2 + baseZIndex - - local areaSoak = Instance.new("TextButton") - areaSoak.Name = "AreaSoak" - areaSoak.Text = "" - areaSoak.BackgroundTransparency = 1 - areaSoak.Active = true - areaSoak.Size = UDim2.new(1,0,1,0) - areaSoak.Visible = false - areaSoak.ZIndex = 3 + baseZIndex - - local dropDownSelected = false - - local scrollUpButton - local scrollDownButton - local scrollMouseCount = 0 - - local setZIndex = function(baseZIndex) - droppedDownMenu.ZIndex = baseZIndex +1 - if scrollUpButton then - scrollUpButton.ZIndex = baseZIndex + 3 - end - if scrollDownButton then - scrollDownButton.ZIndex = baseZIndex + 3 - end - - local children = droppedDownMenu:GetChildren() - if children then - for i, child in ipairs(children) do - if child.Name == "ChoiceButton" then - child.ZIndex = baseZIndex + 2 - elseif child.Name == "ClickCaptureButton" then - child.ZIndex = baseZIndex - end - end - end - end - - local scrollBarPosition = 1 - local updateScroll = function() - if scrollUpButton then - scrollUpButton.Active = scrollBarPosition > 1 - end - if scrollDownButton then - scrollDownButton.Active = scrollBarPosition + dropDownItemCount <= itemCount - end - - local children = droppedDownMenu:GetChildren() - if not children then return end - - local childNum = 1 - for i, obj in ipairs(children) do - if obj.Name == "ChoiceButton" then - if childNum < scrollBarPosition or childNum >= scrollBarPosition + dropDownItemCount then - obj.Visible = false - else - obj.Position = UDim2.new(0,0,((childNum-scrollBarPosition+1)*.8)/((dropDownItemCount+1)*.8),0) - obj.Visible = true - end - obj.TextColor3 = textColor - obj.BackgroundTransparency = 1 - - childNum = childNum + 1 - end - end - end - local toggleVisibility = function() - dropDownSelected = not dropDownSelected - - areaSoak.Visible = not areaSoak.Visible - dropDownMenu.Visible = not dropDownSelected - droppedDownMenu.Visible = dropDownSelected - if dropDownSelected then - setZIndex(4 + baseZIndex) - else - setZIndex(2 + baseZIndex) - end - if useScrollButtons then - updateScroll() - end - end - droppedDownMenu.MouseButton1Click:connect(toggleVisibility) - - local updateSelection = function(text) - local foundItem = false - local children = droppedDownMenu:GetChildren() - local childNum = 1 - if children then - for i, obj in ipairs(children) do - if obj.Name == "ChoiceButton" then - if obj.Text == text then - obj.Font = Enum.Font.ArialBold - foundItem = true - scrollBarPosition = childNum - if (whiteSkin) then - obj.TextColor3 = Color3.new(90/255,142/255,233/255) - end - else - obj.Font = Enum.Font.Arial - if (whiteSkin) then - obj.TextColor3 = textColor - end - end - childNum = childNum + 1 - end - end - end - if not text then - dropDownMenu.Text = "Choose One" - scrollBarPosition = 1 - else - if not foundItem then - error("Invalid Selection Update -- " .. text) - end - - if scrollBarPosition + dropDownItemCount > itemCount + 1 then - scrollBarPosition = itemCount - dropDownItemCount + 1 - end - - dropDownMenu.Text = text - end - end - - local function scrollDown() - if scrollBarPosition + dropDownItemCount <= itemCount then - scrollBarPosition = scrollBarPosition + 1 - updateScroll() - return true - end - return false - end - local function scrollUp() - if scrollBarPosition > 1 then - scrollBarPosition = scrollBarPosition - 1 - updateScroll() - return true - end - return false - end - - if useScrollButtons then - --Make some scroll buttons - scrollUpButton = Instance.new("ImageButton") - scrollUpButton.Name = "ScrollUpButton" - scrollUpButton.BackgroundTransparency = 1 - scrollUpButton.Image = "rbxasset://textures/ui/scrollbuttonUp.png" - scrollUpButton.Size = UDim2.new(0,17,0,17) - scrollUpButton.Position = UDim2.new(1,-11,(1*.8)/((dropDownItemCount+1)*.8),0) - scrollUpButton.MouseButton1Click:connect( - function() - scrollMouseCount = scrollMouseCount + 1 - end) - scrollUpButton.MouseLeave:connect( - function() - scrollMouseCount = scrollMouseCount + 1 - end) - scrollUpButton.MouseButton1Down:connect( - function() - scrollMouseCount = scrollMouseCount + 1 - - scrollUp() - local val = scrollMouseCount - wait(0.5) - while val == scrollMouseCount do - if scrollUp() == false then - break - end - wait(0.1) - end - end) - - scrollUpButton.Parent = droppedDownMenu - - scrollDownButton = Instance.new("ImageButton") - scrollDownButton.Name = "ScrollDownButton" - scrollDownButton.BackgroundTransparency = 1 - scrollDownButton.Image = "rbxasset://textures/ui/scrollbuttonDown.png" - scrollDownButton.Size = UDim2.new(0,17,0,17) - scrollDownButton.Position = UDim2.new(1,-11,1,-11) - scrollDownButton.Parent = droppedDownMenu - scrollDownButton.MouseButton1Click:connect( - function() - scrollMouseCount = scrollMouseCount + 1 - end) - scrollDownButton.MouseLeave:connect( - function() - scrollMouseCount = scrollMouseCount + 1 - end) - scrollDownButton.MouseButton1Down:connect( - function() - scrollMouseCount = scrollMouseCount + 1 - - scrollDown() - local val = scrollMouseCount - wait(0.5) - while val == scrollMouseCount do - if scrollDown() == false then - break - end - wait(0.1) - end - end) - - local scrollbar = Instance.new("ImageLabel") - scrollbar.Name = "ScrollBar" - scrollbar.Image = "rbxasset://textures/ui/scrollbar.png" - scrollbar.BackgroundTransparency = 1 - scrollbar.Size = UDim2.new(0, 18, (dropDownItemCount*.8)/((dropDownItemCount+1)*.8), -(17) - 11 - 4) - scrollbar.Position = UDim2.new(1,-11,(1*.8)/((dropDownItemCount+1)*.8),17+2) - scrollbar.Parent = droppedDownMenu - end - - for i,item in ipairs(items) do - -- needed to maintain local scope for items in event listeners below - local button = choiceButton:clone() - if forRoblox then - button.RobloxLocked = true - end - button.Text = item - button.Parent = droppedDownMenu - if (whiteSkin) then - button.TextColor3 = textColor - end - - button.MouseButton1Click:connect(function() - --Remove Highlight - if (not whiteSkin) then - button.TextColor3 = Color3.new(1,1,1) - end - button.BackgroundTransparency = 1 - - updateSelection(item) - onSelect(item) - - toggleVisibility() - end) - button.MouseEnter:connect(function() - --Add Highlight - if (not whiteSkin) then - button.TextColor3 = Color3.new(0,0,0) - end - button.BackgroundTransparency = 0 - end) - - button.MouseLeave:connect(function() - --Remove Highlight - if (not whiteSkin) then - button.TextColor3 = Color3.new(1,1,1) - end - button.BackgroundTransparency = 1 - end) - end - - --This does the initial layout of the buttons - updateScroll() - - frame.AncestryChanged:connect(function(child,parent) - if parent == nil then - areaSoak.Parent = nil - else - areaSoak.Parent = getScreenGuiAncestor(frame) - end - end) - - dropDownMenu.MouseButton1Click:connect(toggleVisibility) - areaSoak.MouseButton1Click:connect(toggleVisibility) - return frame, updateSelection -end - -t.CreatePropertyDropDownMenu = function(instance, property, enum) - - local items = enum:GetEnumItems() - local names = {} - local nameToItem = {} - for i,obj in ipairs(items) do - names[i] = obj.Name - nameToItem[obj.Name] = obj - end - - local frame - local updateSelection - frame, updateSelection = t.CreateDropDownMenu(names, function(text) instance[property] = nameToItem[text] end) - - ScopedConnect(frame, instance, "Changed", - function(prop) - if prop == property then - updateSelection(instance[property].Name) - end - end, - function() - updateSelection(instance[property].Name) - end) - - return frame -end - -t.GetFontHeight = function(font, fontSize) - if font == nil or fontSize == nil then - error("Font and FontSize must be non-nil") - end - - if font == Enum.Font.Legacy then - if fontSize == Enum.FontSize.Size8 then - return 12 - elseif fontSize == Enum.FontSize.Size9 then - return 14 - elseif fontSize == Enum.FontSize.Size10 then - return 15 - elseif fontSize == Enum.FontSize.Size11 then - return 17 - elseif fontSize == Enum.FontSize.Size12 then - return 18 - elseif fontSize == Enum.FontSize.Size14 then - return 21 - elseif fontSize == Enum.FontSize.Size18 then - return 27 - elseif fontSize == Enum.FontSize.Size24 then - return 36 - elseif fontSize == Enum.FontSize.Size36 then - return 54 - elseif fontSize == Enum.FontSize.Size48 then - return 72 - else - error("Unknown FontSize") - end - elseif font == Enum.Font.Arial or font == Enum.Font.ArialBold then - if fontSize == Enum.FontSize.Size8 then - return 8 - elseif fontSize == Enum.FontSize.Size9 then - return 9 - elseif fontSize == Enum.FontSize.Size10 then - return 10 - elseif fontSize == Enum.FontSize.Size11 then - return 11 - elseif fontSize == Enum.FontSize.Size12 then - return 12 - elseif fontSize == Enum.FontSize.Size14 then - return 14 - elseif fontSize == Enum.FontSize.Size18 then - return 18 - elseif fontSize == Enum.FontSize.Size24 then - return 24 - elseif fontSize == Enum.FontSize.Size36 then - return 36 - elseif fontSize == Enum.FontSize.Size48 then - return 48 - else - error("Unknown FontSize") - end - else - error("Unknown Font " .. font) - end -end - -local function layoutGuiObjectsHelper(frame, guiObjects, settingsTable) - local totalPixels = frame.AbsoluteSize.Y - local pixelsRemaining = frame.AbsoluteSize.Y - for i, child in ipairs(guiObjects) do - if child:IsA("TextLabel") or child:IsA("TextButton") then - local isLabel = child:IsA("TextLabel") - if isLabel then - pixelsRemaining = pixelsRemaining - settingsTable["TextLabelPositionPadY"] - else - pixelsRemaining = pixelsRemaining - settingsTable["TextButtonPositionPadY"] - end - child.Position = UDim2.new(child.Position.X.Scale, child.Position.X.Offset, 0, totalPixels - pixelsRemaining) - child.Size = UDim2.new(child.Size.X.Scale, child.Size.X.Offset, 0, pixelsRemaining) - - if child.TextFits and child.TextBounds.Y < pixelsRemaining then - child.Visible = true - if isLabel then - child.Size = UDim2.new(child.Size.X.Scale, child.Size.X.Offset, 0, child.TextBounds.Y + settingsTable["TextLabelSizePadY"]) - else - child.Size = UDim2.new(child.Size.X.Scale, child.Size.X.Offset, 0, child.TextBounds.Y + settingsTable["TextButtonSizePadY"]) - end - - while not child.TextFits do - child.Size = UDim2.new(child.Size.X.Scale, child.Size.X.Offset, 0, child.AbsoluteSize.Y + 1) - end - pixelsRemaining = pixelsRemaining - child.AbsoluteSize.Y - - if isLabel then - pixelsRemaining = pixelsRemaining - settingsTable["TextLabelPositionPadY"] - else - pixelsRemaining = pixelsRemaining - settingsTable["TextButtonPositionPadY"] - end - else - child.Visible = false - pixelsRemaining = -1 - end - - else - --GuiObject - child.Position = UDim2.new(child.Position.X.Scale, child.Position.X.Offset, 0, totalPixels - pixelsRemaining) - pixelsRemaining = pixelsRemaining - child.AbsoluteSize.Y - child.Visible = (pixelsRemaining >= 0) - end - end -end - -t.LayoutGuiObjects = function(frame, guiObjects, settingsTable) - if not frame:IsA("GuiObject") then - error("Frame must be a GuiObject") - end - for i, child in ipairs(guiObjects) do - if not child:IsA("GuiObject") then - error("All elements that are layed out must be of type GuiObject") - end - end - - if not settingsTable then - settingsTable = {} - end - - if not settingsTable["TextLabelSizePadY"] then - settingsTable["TextLabelSizePadY"] = 0 - end - if not settingsTable["TextLabelPositionPadY"] then - settingsTable["TextLabelPositionPadY"] = 0 - end - if not settingsTable["TextButtonSizePadY"] then - settingsTable["TextButtonSizePadY"] = 12 - end - if not settingsTable["TextButtonPositionPadY"] then - settingsTable["TextButtonPositionPadY"] = 2 - end - - --Wrapper frame takes care of styled objects - local wrapperFrame = Instance.new("Frame") - wrapperFrame.Name = "WrapperFrame" - wrapperFrame.BackgroundTransparency = 1 - wrapperFrame.Size = UDim2.new(1,0,1,0) - wrapperFrame.Parent = frame - - for i, child in ipairs(guiObjects) do - child.Parent = wrapperFrame - end - - local recalculate = function() - wait() - layoutGuiObjectsHelper(wrapperFrame, guiObjects, settingsTable) - end - - frame.Changed:connect( - function(prop) - if prop == "AbsoluteSize" then - --Wait a heartbeat for it to sync in - recalculate(nil) - end - end) - frame.AncestryChanged:connect(recalculate) - - layoutGuiObjectsHelper(wrapperFrame, guiObjects, settingsTable) -end - - -t.CreateSlider = function(steps,width,position) - local sliderGui = Instance.new("Frame") - sliderGui.Size = UDim2.new(1,0,1,0) - sliderGui.BackgroundTransparency = 1 - sliderGui.Name = "SliderGui" - - local sliderSteps = Instance.new("IntValue") - sliderSteps.Name = "SliderSteps" - sliderSteps.Value = steps - sliderSteps.Parent = sliderGui - - local areaSoak = Instance.new("TextButton") - areaSoak.Name = "AreaSoak" - areaSoak.Text = "" - areaSoak.BackgroundTransparency = 1 - areaSoak.Active = false - areaSoak.Size = UDim2.new(1,0,1,0) - areaSoak.Visible = false - areaSoak.ZIndex = 4 - - sliderGui.AncestryChanged:connect(function(child,parent) - if parent == nil then - areaSoak.Parent = nil - else - areaSoak.Parent = getScreenGuiAncestor(sliderGui) - end - end) - - local sliderPosition = Instance.new("IntValue") - sliderPosition.Name = "SliderPosition" - sliderPosition.Value = 0 - sliderPosition.Parent = sliderGui - - local id = math.random(1,100) - - local bar = Instance.new("TextButton") - bar.Text = "" - bar.AutoButtonColor = false - bar.Name = "Bar" - bar.BackgroundColor3 = Color3.new(0,0,0) - if type(width) == "number" then - bar.Size = UDim2.new(0,width,0,5) - else - bar.Size = UDim2.new(0,200,0,5) - end - bar.BorderColor3 = Color3.new(95/255,95/255,95/255) - bar.ZIndex = 2 - bar.Parent = sliderGui - - if position["X"] and position["X"]["Scale"] and position["X"]["Offset"] and position["Y"] and position["Y"]["Scale"] and position["Y"]["Offset"] then - bar.Position = position - end - - local slider = Instance.new("ImageButton") - slider.Name = "Slider" - slider.BackgroundTransparency = 1 - slider.Image = "rbxasset://textures/ui/Slider.png" - slider.Position = UDim2.new(0,0,0.5,-10) - slider.Size = UDim2.new(0,20,0,20) - slider.ZIndex = 3 - slider.Parent = bar - - local areaSoakMouseMoveCon = nil - - areaSoak.MouseLeave:connect(function() - if areaSoak.Visible then - cancelSlide(areaSoak) - end - end) - areaSoak.MouseButton1Up:connect(function() - if areaSoak.Visible then - cancelSlide(areaSoak) - end - end) - - slider.MouseButton1Down:connect(function() - areaSoak.Visible = true - if areaSoakMouseMoveCon then areaSoakMouseMoveCon:disconnect() end - areaSoakMouseMoveCon = areaSoak.MouseMoved:connect(function(x,y) - setSliderPos(x,slider,sliderPosition,bar,steps) - end) - end) - - slider.MouseButton1Up:connect(function() cancelSlide(areaSoak) end) - - sliderPosition.Changed:connect(function(prop) - sliderPosition.Value = math.min(steps, math.max(1,sliderPosition.Value)) - local relativePosX = (sliderPosition.Value - 1) / (steps - 1) - slider.Position = UDim2.new(relativePosX,-slider.AbsoluteSize.X/2,slider.Position.Y.Scale,slider.Position.Y.Offset) - end) - - bar.MouseButton1Down:connect(function(x,y) - setSliderPos(x,slider,sliderPosition,bar,steps) - end) - - return sliderGui, sliderPosition, sliderSteps - -end - - - -t.CreateSliderNew = function(steps,width,position) - local sliderGui = Instance.new("Frame") - sliderGui.Size = UDim2.new(1,0,1,0) - sliderGui.BackgroundTransparency = 1 - sliderGui.Name = "SliderGui" - - local sliderSteps = Instance.new("IntValue") - sliderSteps.Name = "SliderSteps" - sliderSteps.Value = steps - sliderSteps.Parent = sliderGui - - local areaSoak = Instance.new("TextButton") - areaSoak.Name = "AreaSoak" - areaSoak.Text = "" - areaSoak.BackgroundTransparency = 1 - areaSoak.Active = false - areaSoak.Size = UDim2.new(1,0,1,0) - areaSoak.Visible = false - areaSoak.ZIndex = 6 - - sliderGui.AncestryChanged:connect(function(child,parent) - if parent == nil then - areaSoak.Parent = nil - else - areaSoak.Parent = getScreenGuiAncestor(sliderGui) - end - end) - - local sliderPosition = Instance.new("IntValue") - sliderPosition.Name = "SliderPosition" - sliderPosition.Value = 0 - sliderPosition.Parent = sliderGui - - local id = math.random(1,100) - - local sliderBarImgHeight = 7 - local sliderBarCapImgWidth = 4 - - local bar = Instance.new("ImageButton") - bar.BackgroundTransparency = 1 - bar.Image = "rbxasset://textures/ui/Slider-BKG-Center.png" - bar.Name = "Bar" - local displayWidth = 200 - if type(width) == "number" then - bar.Size = UDim2.new(0,width - (sliderBarCapImgWidth * 2),0,sliderBarImgHeight) - displayWidth = width - (sliderBarCapImgWidth * 2) - else - bar.Size = UDim2.new(0,200,0,sliderBarImgHeight) - end - bar.ZIndex = 3 - bar.Parent = sliderGui - if position["X"] and position["X"]["Scale"] and position["X"]["Offset"] and position["Y"] and position["Y"]["Scale"] and position["Y"]["Offset"] then - bar.Position = position - end - - local barLeft = bar:clone() - barLeft.Name = "BarLeft" - barLeft.Image = "rbxasset://textures/ui/Slider-BKG-Left-Cap.png" - barLeft.Size = UDim2.new(0, sliderBarCapImgWidth, 0, sliderBarImgHeight) - barLeft.Position = UDim2.new(position.X.Scale, position.X.Offset - sliderBarCapImgWidth, position.Y.Scale, position.Y.Offset) - barLeft.Parent = sliderGui - barLeft.ZIndex = 3 - - local barRight = barLeft:clone() - barRight.Name = "BarRight" - barRight.Image = "rbxasset://textures/ui/Slider-BKG-Right-Cap.png" - barRight.Position = UDim2.new(position.X.Scale, position.X.Offset + displayWidth, position.Y.Scale, position.Y.Offset) - barRight.Parent = sliderGui - - local fillLeft = barLeft:clone() - fillLeft.Name = "FillLeft" - fillLeft.Image = "rbxasset://textures/ui/Slider-Fill-Left-Cap.png" - fillLeft.Parent = sliderGui - fillLeft.ZIndex = 4 - - local fill = fillLeft:clone() - fill.Name = "Fill" - fill.Image = "rbxasset://textures/ui/Slider-Fill-Center.png" - fill.Parent = bar - fill.ZIndex = 4 - fill.Position = UDim2.new(0, 0, 0, 0) - fill.Size = UDim2.new(0.5, 0, 1, 0) - - --- bar.Visible = false - - local slider = Instance.new("ImageButton") - slider.Name = "Slider" - slider.BackgroundTransparency = 1 - slider.Image = "rbxasset://textures/ui/slider_new_tab.png" - slider.Position = UDim2.new(0,0,0.5,-14) - slider.Size = UDim2.new(0,28,0,28) - slider.ZIndex = 5 - slider.Parent = bar - - local areaSoakMouseMoveCon = nil - - areaSoak.MouseLeave:connect(function() - if areaSoak.Visible then - cancelSlide(areaSoak) - end - end) - areaSoak.MouseButton1Up:connect(function() - if areaSoak.Visible then - cancelSlide(areaSoak) - end - end) - - slider.MouseButton1Down:connect(function() - areaSoak.Visible = true - if areaSoakMouseMoveCon then areaSoakMouseMoveCon:disconnect() end - areaSoakMouseMoveCon = areaSoak.MouseMoved:connect(function(x,y) - setSliderPos(x,slider,sliderPosition,bar,steps) - end) - end) - - slider.MouseButton1Up:connect(function() cancelSlide(areaSoak) end) - - sliderPosition.Changed:connect(function(prop) - sliderPosition.Value = math.min(steps, math.max(1,sliderPosition.Value)) - local relativePosX = (sliderPosition.Value - 1) / (steps - 1) - slider.Position = UDim2.new(relativePosX,-slider.AbsoluteSize.X/2,slider.Position.Y.Scale,slider.Position.Y.Offset) - fill.Size = UDim2.new(relativePosX, 0, 1, 0) - end) - - bar.MouseButton1Down:connect(function(x,y) - setSliderPos(x,slider,sliderPosition,bar,steps) - end) - - return sliderGui, sliderPosition, sliderSteps - -end - - - - - -t.CreateTrueScrollingFrame = function() - local lowY = nil - local highY = nil - - local dragCon = nil - local upCon = nil - - local internalChange = false - - local descendantsChangeConMap = {} - - local scrollingFrame = Instance.new("Frame") - scrollingFrame.Name = "ScrollingFrame" - scrollingFrame.Active = true - scrollingFrame.Size = UDim2.new(1,0,1,0) - scrollingFrame.ClipsDescendants = true - - local controlFrame = Instance.new("Frame") - controlFrame.Name = "ControlFrame" - controlFrame.BackgroundTransparency = 1 - controlFrame.Size = UDim2.new(0,18,1,0) - controlFrame.Position = UDim2.new(1,-20,0,0) - controlFrame.Parent = scrollingFrame - - local scrollBottom = Instance.new("BoolValue") - scrollBottom.Value = false - scrollBottom.Name = "ScrollBottom" - scrollBottom.Parent = controlFrame - - local scrollUp = Instance.new("BoolValue") - scrollUp.Value = false - scrollUp.Name = "scrollUp" - scrollUp.Parent = controlFrame - - local scrollUpButton = Instance.new("TextButton") - scrollUpButton.Name = "ScrollUpButton" - scrollUpButton.Text = "" - scrollUpButton.AutoButtonColor = false - scrollUpButton.BackgroundColor3 = Color3.new(0,0,0) - scrollUpButton.BorderColor3 = Color3.new(1,1,1) - scrollUpButton.BackgroundTransparency = 0.5 - scrollUpButton.Size = UDim2.new(0,18,0,18) - scrollUpButton.ZIndex = 2 - scrollUpButton.Parent = controlFrame - for i = 1, 6 do - local triFrame = Instance.new("Frame") - triFrame.BorderColor3 = Color3.new(1,1,1) - triFrame.Name = "tri" .. tostring(i) - triFrame.ZIndex = 3 - triFrame.BackgroundTransparency = 0.5 - triFrame.Size = UDim2.new(0,12 - ((i -1) * 2),0,0) - triFrame.Position = UDim2.new(0,3 + (i -1),0.5,2 - (i -1)) - triFrame.Parent = scrollUpButton - end - scrollUpButton.MouseEnter:connect(function() - scrollUpButton.BackgroundTransparency = 0.1 - local upChildren = scrollUpButton:GetChildren() - for i = 1, #upChildren do - upChildren[i].BackgroundTransparency = 0.1 - end - end) - scrollUpButton.MouseLeave:connect(function() - scrollUpButton.BackgroundTransparency = 0.5 - local upChildren = scrollUpButton:GetChildren() - for i = 1, #upChildren do - upChildren[i].BackgroundTransparency = 0.5 - end - end) - - local scrollDownButton = scrollUpButton:clone() - scrollDownButton.Name = "ScrollDownButton" - scrollDownButton.Position = UDim2.new(0,0,1,-18) - local downChildren = scrollDownButton:GetChildren() - for i = 1, #downChildren do - downChildren[i].Position = UDim2.new(0,3 + (i -1),0.5,-2 + (i - 1)) - end - scrollDownButton.MouseEnter:connect(function() - scrollDownButton.BackgroundTransparency = 0.1 - local downChildren = scrollDownButton:GetChildren() - for i = 1, #downChildren do - downChildren[i].BackgroundTransparency = 0.1 - end - end) - scrollDownButton.MouseLeave:connect(function() - scrollDownButton.BackgroundTransparency = 0.5 - local downChildren = scrollDownButton:GetChildren() - for i = 1, #downChildren do - downChildren[i].BackgroundTransparency = 0.5 - end - end) - scrollDownButton.Parent = controlFrame - - local scrollTrack = Instance.new("Frame") - scrollTrack.Name = "ScrollTrack" - scrollTrack.BackgroundTransparency = 1 - scrollTrack.Size = UDim2.new(0,18,1,-38) - scrollTrack.Position = UDim2.new(0,0,0,19) - scrollTrack.Parent = controlFrame - - local scrollbar = Instance.new("TextButton") - scrollbar.BackgroundColor3 = Color3.new(0,0,0) - scrollbar.BorderColor3 = Color3.new(1,1,1) - scrollbar.BackgroundTransparency = 0.5 - scrollbar.AutoButtonColor = false - scrollbar.Text = "" - scrollbar.Active = true - scrollbar.Name = "ScrollBar" - scrollbar.ZIndex = 2 - scrollbar.BackgroundTransparency = 0.5 - scrollbar.Size = UDim2.new(0, 18, 0.1, 0) - scrollbar.Position = UDim2.new(0,0,0,0) - scrollbar.Parent = scrollTrack - - local scrollNub = Instance.new("Frame") - scrollNub.Name = "ScrollNub" - scrollNub.BorderColor3 = Color3.new(1,1,1) - scrollNub.Size = UDim2.new(0,10,0,0) - scrollNub.Position = UDim2.new(0.5,-5,0.5,0) - scrollNub.ZIndex = 2 - scrollNub.BackgroundTransparency = 0.5 - scrollNub.Parent = scrollbar - - local newNub = scrollNub:clone() - newNub.Position = UDim2.new(0.5,-5,0.5,-2) - newNub.Parent = scrollbar - - local lastNub = scrollNub:clone() - lastNub.Position = UDim2.new(0.5,-5,0.5,2) - lastNub.Parent = scrollbar - - scrollbar.MouseEnter:connect(function() - scrollbar.BackgroundTransparency = 0.1 - scrollNub.BackgroundTransparency = 0.1 - newNub.BackgroundTransparency = 0.1 - lastNub.BackgroundTransparency = 0.1 - end) - scrollbar.MouseLeave:connect(function() - scrollbar.BackgroundTransparency = 0.5 - scrollNub.BackgroundTransparency = 0.5 - newNub.BackgroundTransparency = 0.5 - lastNub.BackgroundTransparency = 0.5 - end) - - local mouseDrag = Instance.new("ImageButton") - mouseDrag.Active = false - mouseDrag.Size = UDim2.new(1.5, 0, 1.5, 0) - mouseDrag.AutoButtonColor = false - mouseDrag.BackgroundTransparency = 1 - mouseDrag.Name = "mouseDrag" - mouseDrag.Position = UDim2.new(-0.25, 0, -0.25, 0) - mouseDrag.ZIndex = 10 - - local function positionScrollBar(x,y,offset) - local oldPos = scrollbar.Position - - if y < scrollTrack.AbsolutePosition.y then - scrollbar.Position = UDim2.new(scrollbar.Position.X.Scale,scrollbar.Position.X.Offset,0,0) - return (oldPos ~= scrollbar.Position) - end - - local relativeSize = scrollbar.AbsoluteSize.Y/scrollTrack.AbsoluteSize.Y - - if y > (scrollTrack.AbsolutePosition.y + scrollTrack.AbsoluteSize.y) then - scrollbar.Position = UDim2.new(scrollbar.Position.X.Scale,scrollbar.Position.X.Offset,1 - relativeSize,0) - return (oldPos ~= scrollbar.Position) - end - local newScaleYPos = (y - scrollTrack.AbsolutePosition.y - offset)/scrollTrack.AbsoluteSize.y - if newScaleYPos + relativeSize > 1 then - newScaleYPos = 1 - relativeSize - scrollBottom.Value = true - scrollUp.Value = false - elseif newScaleYPos <= 0 then - newScaleYPos = 0 - scrollUp.Value = true - scrollBottom.Value = false - else - scrollUp.Value = false - scrollBottom.Value = false - end - scrollbar.Position = UDim2.new(scrollbar.Position.X.Scale,scrollbar.Position.X.Offset,newScaleYPos,0) - - return (oldPos ~= scrollbar.Position) - end - - local function drillDownSetHighLow(instance) - if not instance or not instance:IsA("GuiObject") then return end - if instance == controlFrame then return end - if instance:IsDescendantOf(controlFrame) then return end - if not instance.Visible then return end - - if lowY and lowY > instance.AbsolutePosition.Y then - lowY = instance.AbsolutePosition.Y - elseif not lowY then - lowY = instance.AbsolutePosition.Y - end - if highY and highY < (instance.AbsolutePosition.Y + instance.AbsoluteSize.Y) then - highY = instance.AbsolutePosition.Y + instance.AbsoluteSize.Y - elseif not highY then - highY = instance.AbsolutePosition.Y + instance.AbsoluteSize.Y - end - local children = instance:GetChildren() - for i = 1, #children do - drillDownSetHighLow(children[i]) - end - end - - local function resetHighLow() - local firstChildren = scrollingFrame:GetChildren() - - for i = 1, #firstChildren do - drillDownSetHighLow(firstChildren[i]) - end - end - - local function recalculate() - internalChange = true - - local percentFrame = 0 - if scrollbar.Position.Y.Scale > 0 then - if scrollbar.Visible then - percentFrame = scrollbar.Position.Y.Scale/((scrollTrack.AbsoluteSize.Y - scrollbar.AbsoluteSize.Y)/scrollTrack.AbsoluteSize.Y) - else - percentFrame = 0 - end - end - if percentFrame > 0.99 then percentFrame = 1 end - - local hiddenYAmount = (scrollingFrame.AbsoluteSize.Y - (highY - lowY)) * percentFrame - - local guiChildren = scrollingFrame:GetChildren() - for i = 1, #guiChildren do - if guiChildren[i] ~= controlFrame then - guiChildren[i].Position = UDim2.new(guiChildren[i].Position.X.Scale,guiChildren[i].Position.X.Offset, - 0, math.ceil(guiChildren[i].AbsolutePosition.Y) - math.ceil(lowY) + hiddenYAmount) - end - end - - lowY = nil - highY = nil - resetHighLow() - internalChange = false - end - - local function setSliderSizeAndPosition() - if not highY or not lowY then return end - - local totalYSpan = math.abs(highY - lowY) - if totalYSpan == 0 then - scrollbar.Visible = false - scrollDownButton.Visible = false - scrollUpButton.Visible = false - - if dragCon then dragCon:disconnect() dragCon = nil end - if upCon then upCon:disconnect() upCon = nil end - return - end - - local percentShown = scrollingFrame.AbsoluteSize.Y/totalYSpan - if percentShown >= 1 then - scrollbar.Visible = false - scrollDownButton.Visible = false - scrollUpButton.Visible = false - recalculate() - else - scrollbar.Visible = true - scrollDownButton.Visible = true - scrollUpButton.Visible = true - - scrollbar.Size = UDim2.new(scrollbar.Size.X.Scale,scrollbar.Size.X.Offset,percentShown,0) - end - - local percentPosition = (scrollingFrame.AbsolutePosition.Y - lowY)/totalYSpan - scrollbar.Position = UDim2.new(scrollbar.Position.X.Scale,scrollbar.Position.X.Offset,percentPosition,-scrollbar.AbsoluteSize.X/2) - - if scrollbar.AbsolutePosition.y < scrollTrack.AbsolutePosition.y then - scrollbar.Position = UDim2.new(scrollbar.Position.X.Scale,scrollbar.Position.X.Offset,0,0) - end - - if (scrollbar.AbsolutePosition.y + scrollbar.AbsoluteSize.Y) > (scrollTrack.AbsolutePosition.y + scrollTrack.AbsoluteSize.y) then - local relativeSize = scrollbar.AbsoluteSize.Y/scrollTrack.AbsoluteSize.Y - scrollbar.Position = UDim2.new(scrollbar.Position.X.Scale,scrollbar.Position.X.Offset,1 - relativeSize,0) - end - end - - local buttonScrollAmountPixels = 7 - local reentrancyGuardScrollUp = false - local function doScrollUp() - if reentrancyGuardScrollUp then return end - - reentrancyGuardScrollUp = true - if positionScrollBar(0,scrollbar.AbsolutePosition.Y - buttonScrollAmountPixels,0) then - recalculate() - end - reentrancyGuardScrollUp = false - end - - local reentrancyGuardScrollDown = false - local function doScrollDown() - if reentrancyGuardScrollDown then return end - - reentrancyGuardScrollDown = true - if positionScrollBar(0,scrollbar.AbsolutePosition.Y + buttonScrollAmountPixels,0) then - recalculate() - end - reentrancyGuardScrollDown = false - end - - local function scrollUp(mouseYPos) - if scrollUpButton.Active then - scrollStamp = tick() - local current = scrollStamp - local upCon - upCon = mouseDrag.MouseButton1Up:connect(function() - scrollStamp = tick() - mouseDrag.Parent = nil - upCon:disconnect() - end) - mouseDrag.Parent = getScreenGuiAncestor(scrollbar) - doScrollUp() - wait(0.2) - local t = tick() - local w = 0.1 - while scrollStamp == current do - doScrollUp() - if mouseYPos and mouseYPos > scrollbar.AbsolutePosition.y then - break - end - if not scrollUpButton.Active then break end - if tick()-t > 5 then - w = 0 - elseif tick()-t > 2 then - w = 0.06 - end - wait(w) - end - end - end - - local function scrollDown(mouseYPos) - if scrollDownButton.Active then - scrollStamp = tick() - local current = scrollStamp - local downCon - downCon = mouseDrag.MouseButton1Up:connect(function() - scrollStamp = tick() - mouseDrag.Parent = nil - downCon:disconnect() - end) - mouseDrag.Parent = getScreenGuiAncestor(scrollbar) - doScrollDown() - wait(0.2) - local t = tick() - local w = 0.1 - while scrollStamp == current do - doScrollDown() - if mouseYPos and mouseYPos < (scrollbar.AbsolutePosition.y + scrollbar.AbsoluteSize.x) then - break - end - if not scrollDownButton.Active then break end - if tick()-t > 5 then - w = 0 - elseif tick()-t > 2 then - w = 0.06 - end - wait(w) - end - end - end - - scrollbar.MouseButton1Down:connect(function(x,y) - if scrollbar.Active then - scrollStamp = tick() - local mouseOffset = y - scrollbar.AbsolutePosition.y - if dragCon then dragCon:disconnect() dragCon = nil end - if upCon then upCon:disconnect() upCon = nil end - local prevY = y - local reentrancyGuardMouseScroll = false - dragCon = mouseDrag.MouseMoved:connect(function(x,y) - if reentrancyGuardMouseScroll then return end - - reentrancyGuardMouseScroll = true - if positionScrollBar(x,y,mouseOffset) then - recalculate() - end - reentrancyGuardMouseScroll = false - - end) - upCon = mouseDrag.MouseButton1Up:connect(function() - scrollStamp = tick() - mouseDrag.Parent = nil - dragCon:disconnect(); dragCon = nil - upCon:disconnect(); drag = nil - end) - mouseDrag.Parent = getScreenGuiAncestor(scrollbar) - end - end) - - local scrollMouseCount = 0 - - scrollUpButton.MouseButton1Down:connect(function() - scrollUp() - end) - scrollUpButton.MouseButton1Up:connect(function() - scrollStamp = tick() - end) - - scrollDownButton.MouseButton1Up:connect(function() - scrollStamp = tick() - end) - scrollDownButton.MouseButton1Down:connect(function() - scrollDown() - end) - - scrollbar.MouseButton1Up:connect(function() - scrollStamp = tick() - end) - - local function heightCheck(instance) - if highY and (instance.AbsolutePosition.Y + instance.AbsoluteSize.Y) > highY then - highY = instance.AbsolutePosition.Y + instance.AbsoluteSize.Y - elseif not highY then - highY = instance.AbsolutePosition.Y + instance.AbsoluteSize.Y - end - setSliderSizeAndPosition() - end - - local function highLowRecheck() - local oldLowY = lowY - local oldHighY = highY - lowY = nil - highY = nil - resetHighLow() - - if (lowY ~= oldLowY) or (highY ~= oldHighY) then - setSliderSizeAndPosition() - end - end - - local function descendantChanged(this, prop) - if internalChange then return end - if not this.Visible then return end - - if prop == "Size" or prop == "Position" then - wait() - highLowRecheck() - end - end - - scrollingFrame.DescendantAdded:connect(function(instance) - if not instance:IsA("GuiObject") then return end - - if instance.Visible then - wait() -- wait a heartbeat for sizes to reconfig - highLowRecheck() - end - - descendantsChangeConMap[instance] = instance.Changed:connect(function(prop) descendantChanged(instance, prop) end) - end) - - scrollingFrame.DescendantRemoving:connect(function(instance) - if not instance:IsA("GuiObject") then return end - if descendantsChangeConMap[instance] then - descendantsChangeConMap[instance]:disconnect() - descendantsChangeConMap[instance] = nil - end - wait() -- wait a heartbeat for sizes to reconfig - highLowRecheck() - end) - - scrollingFrame.Changed:connect(function(prop) - if prop == "AbsoluteSize" then - if not highY or not lowY then return end - - highLowRecheck() - setSliderSizeAndPosition() - end - end) - - return scrollingFrame, controlFrame -end - -t.CreateScrollingFrame = function(orderList,scrollStyle) - local frame = Instance.new("Frame") - frame.Name = "ScrollingFrame" - frame.BackgroundTransparency = 1 - frame.Size = UDim2.new(1,0,1,0) - - local scrollUpButton = Instance.new("ImageButton") - scrollUpButton.Name = "ScrollUpButton" - scrollUpButton.BackgroundTransparency = 1 - scrollUpButton.Image = "rbxasset://textures/ui/scrollbuttonUp.png" - scrollUpButton.Size = UDim2.new(0,17,0,17) - - - local scrollDownButton = Instance.new("ImageButton") - scrollDownButton.Name = "ScrollDownButton" - scrollDownButton.BackgroundTransparency = 1 - scrollDownButton.Image = "rbxasset://textures/ui/scrollbuttonDown.png" - scrollDownButton.Size = UDim2.new(0,17,0,17) - - local scrollbar = Instance.new("ImageButton") - scrollbar.Name = "ScrollBar" - scrollbar.Image = "rbxasset://textures/ui/scrollbar.png" - scrollbar.BackgroundTransparency = 1 - scrollbar.Size = UDim2.new(0, 18, 0, 150) - - local scrollStamp = 0 - - local scrollDrag = Instance.new("ImageButton") - scrollDrag.Image = "http://www.mete0r.xyz/asset/?id=61367186" - scrollDrag.Size = UDim2.new(1, 0, 0, 16) - scrollDrag.BackgroundTransparency = 1 - scrollDrag.Name = "ScrollDrag" - scrollDrag.Active = true - scrollDrag.Parent = scrollbar - - local mouseDrag = Instance.new("ImageButton") - mouseDrag.Active = false - mouseDrag.Size = UDim2.new(1.5, 0, 1.5, 0) - mouseDrag.AutoButtonColor = false - mouseDrag.BackgroundTransparency = 1 - mouseDrag.Name = "mouseDrag" - mouseDrag.Position = UDim2.new(-0.25, 0, -0.25, 0) - mouseDrag.ZIndex = 10 - - local style = "simple" - if scrollStyle and tostring(scrollStyle) then - style = scrollStyle - end - - local scrollPosition = 1 - local rowSize = 0 - local howManyDisplayed = 0 - - local layoutGridScrollBar = function() - howManyDisplayed = 0 - local guiObjects = {} - if orderList then - for i, child in ipairs(orderList) do - if child.Parent == frame then - table.insert(guiObjects, child) - end - end - else - local children = frame:GetChildren() - if children then - for i, child in ipairs(children) do - if child:IsA("GuiObject") then - table.insert(guiObjects, child) - end - end - end - end - if #guiObjects == 0 then - scrollUpButton.Active = false - scrollDownButton.Active = false - scrollDrag.Active = false - scrollPosition = 1 - return - end - - if scrollPosition > #guiObjects then - scrollPosition = #guiObjects - end - - if scrollPosition < 1 then scrollPosition = 1 end - - local totalPixelsY = frame.AbsoluteSize.Y - local pixelsRemainingY = frame.AbsoluteSize.Y - - local totalPixelsX = frame.AbsoluteSize.X - - local xCounter = 0 - local rowSizeCounter = 0 - local setRowSize = true - - local pixelsBelowScrollbar = 0 - local pos = #guiObjects - - local currentRowY = 0 - - pos = scrollPosition - --count up from current scroll position to fill out grid - while pos <= #guiObjects and pixelsBelowScrollbar < totalPixelsY do - xCounter = xCounter + guiObjects[pos].AbsoluteSize.X - --previous pos was the end of a row - if xCounter >= totalPixelsX then - pixelsBelowScrollbar = pixelsBelowScrollbar + currentRowY - currentRowY = 0 - xCounter = guiObjects[pos].AbsoluteSize.X - end - if guiObjects[pos].AbsoluteSize.Y > currentRowY then - currentRowY = guiObjects[pos].AbsoluteSize.Y - end - pos = pos + 1 - end - --Count wherever current row left off - pixelsBelowScrollbar = pixelsBelowScrollbar + currentRowY - currentRowY = 0 - - pos = scrollPosition - 1 - xCounter = 0 - - --objects with varying X,Y dimensions can rarely cause minor errors - --rechecking every new scrollPosition is necessary to avoid 100% of errors - - --count backwards from current scrollPosition to see if we can add more rows - while pixelsBelowScrollbar + currentRowY < totalPixelsY and pos >= 1 do - xCounter = xCounter + guiObjects[pos].AbsoluteSize.X - rowSizeCounter = rowSizeCounter + 1 - if xCounter >= totalPixelsX then - rowSize = rowSizeCounter - 1 - rowSizeCounter = 0 - xCounter = guiObjects[pos].AbsoluteSize.X - if pixelsBelowScrollbar + currentRowY <= totalPixelsY then - --It fits, so back up our scroll position - pixelsBelowScrollbar = pixelsBelowScrollbar + currentRowY - if scrollPosition <= rowSize then - scrollPosition = 1 - break - else - scrollPosition = scrollPosition - rowSize - end - currentRowY = 0 - else - break - end - end - - if guiObjects[pos].AbsoluteSize.Y > currentRowY then - currentRowY = guiObjects[pos].AbsoluteSize.Y - end - - pos = pos - 1 - end - - --Do check last time if pos = 0 - if (pos == 0) and (pixelsBelowScrollbar + currentRowY <= totalPixelsY) then - scrollPosition = 1 - end - - xCounter = 0 - --pos = scrollPosition - rowSizeCounter = 0 - setRowSize = true - local lastChildSize = 0 - - local xOffset,yOffset = 0 - if guiObjects[1] then - yOffset = math.ceil(math.floor(math.fmod(totalPixelsY,guiObjects[1].AbsoluteSize.X))/2) - xOffset = math.ceil(math.floor(math.fmod(totalPixelsX,guiObjects[1].AbsoluteSize.Y))/2) - end - - for i, child in ipairs(guiObjects) do - if i < scrollPosition then - --print("Hiding " .. child.Name) - child.Visible = false - else - if pixelsRemainingY < 0 then - --print("Out of Space " .. child.Name) - child.Visible = false - else - --print("Laying out " .. child.Name) - --GuiObject - if setRowSize then rowSizeCounter = rowSizeCounter + 1 end - if xCounter + child.AbsoluteSize.X >= totalPixelsX then - if setRowSize then - rowSize = rowSizeCounter - 1 - setRowSize = false - end - xCounter = 0 - pixelsRemainingY = pixelsRemainingY - child.AbsoluteSize.Y - end - child.Position = UDim2.new(child.Position.X.Scale,xCounter + xOffset, 0, totalPixelsY - pixelsRemainingY + yOffset) - xCounter = xCounter + child.AbsoluteSize.X - child.Visible = ((pixelsRemainingY - child.AbsoluteSize.Y) >= 0) - if child.Visible then - howManyDisplayed = howManyDisplayed + 1 - end - lastChildSize = child.AbsoluteSize - end - end - end - - scrollUpButton.Active = (scrollPosition > 1) - if lastChildSize == 0 then - scrollDownButton.Active = false - else - scrollDownButton.Active = ((pixelsRemainingY - lastChildSize.Y) < 0) - end - scrollDrag.Active = #guiObjects > howManyDisplayed - scrollDrag.Visible = scrollDrag.Active - end - - - - local layoutSimpleScrollBar = function() - local guiObjects = {} - howManyDisplayed = 0 - - if orderList then - for i, child in ipairs(orderList) do - if child.Parent == frame then - table.insert(guiObjects, child) - end - end - else - local children = frame:GetChildren() - if children then - for i, child in ipairs(children) do - if child:IsA("GuiObject") then - table.insert(guiObjects, child) - end - end - end - end - if #guiObjects == 0 then - scrollUpButton.Active = false - scrollDownButton.Active = false - scrollDrag.Active = false - scrollPosition = 1 - return - end - - if scrollPosition > #guiObjects then - scrollPosition = #guiObjects - end - - local totalPixels = frame.AbsoluteSize.Y - local pixelsRemaining = frame.AbsoluteSize.Y - - local pixelsBelowScrollbar = 0 - local pos = #guiObjects - while pixelsBelowScrollbar < totalPixels and pos >= 1 do - if pos >= scrollPosition then - pixelsBelowScrollbar = pixelsBelowScrollbar + guiObjects[pos].AbsoluteSize.Y - else - if pixelsBelowScrollbar + guiObjects[pos].AbsoluteSize.Y <= totalPixels then - --It fits, so back up our scroll position - pixelsBelowScrollbar = pixelsBelowScrollbar + guiObjects[pos].AbsoluteSize.Y - if scrollPosition <= 1 then - scrollPosition = 1 - break - else - --local ("Backing up ScrollPosition from -- " ..scrollPosition) - scrollPosition = scrollPosition - 1 - end - else - break - end - end - pos = pos - 1 - end - - pos = scrollPosition - for i, child in ipairs(guiObjects) do - if i < scrollPosition then - --print("Hiding " .. child.Name) - child.Visible = false - else - if pixelsRemaining < 0 then - --print("Out of Space " .. child.Name) - child.Visible = false - else - --print("Laying out " .. child.Name) - --GuiObject - child.Position = UDim2.new(child.Position.X.Scale, child.Position.X.Offset, 0, totalPixels - pixelsRemaining) - pixelsRemaining = pixelsRemaining - child.AbsoluteSize.Y - if (pixelsRemaining >= 0) then - child.Visible = true - howManyDisplayed = howManyDisplayed + 1 - else - child.Visible = false - end - end - end - end - scrollUpButton.Active = (scrollPosition > 1) - scrollDownButton.Active = (pixelsRemaining < 0) - scrollDrag.Active = #guiObjects > howManyDisplayed - scrollDrag.Visible = scrollDrag.Active - end - - - local moveDragger = function() - local guiObjects = 0 - local children = frame:GetChildren() - if children then - for i, child in ipairs(children) do - if child:IsA("GuiObject") then - guiObjects = guiObjects + 1 - end - end - end - - if not scrollDrag.Parent then return end - - local dragSizeY = scrollDrag.Parent.AbsoluteSize.y * (1/(guiObjects - howManyDisplayed + 1)) - if dragSizeY < 16 then dragSizeY = 16 end - scrollDrag.Size = UDim2.new(scrollDrag.Size.X.Scale,scrollDrag.Size.X.Offset,scrollDrag.Size.Y.Scale,dragSizeY) - - local relativeYPos = (scrollPosition - 1)/(guiObjects - (howManyDisplayed)) - if relativeYPos > 1 then relativeYPos = 1 - elseif relativeYPos < 0 then relativeYPos = 0 end - local absYPos = 0 - - if relativeYPos ~= 0 then - absYPos = (relativeYPos * scrollbar.AbsoluteSize.y) - (relativeYPos * scrollDrag.AbsoluteSize.y) - end - - scrollDrag.Position = UDim2.new(scrollDrag.Position.X.Scale,scrollDrag.Position.X.Offset,scrollDrag.Position.Y.Scale,absYPos) - end - - local reentrancyGuard = false - local recalculate = function() - if reentrancyGuard then - return - end - reentrancyGuard = true - wait() - local success, err = nil - if style == "grid" then - success, err = pcall(function() layoutGridScrollBar() end) - elseif style == "simple" then - success, err = pcall(function() layoutSimpleScrollBar() end) - end - if not success then print(err) end - moveDragger() - reentrancyGuard = false - end - - local doScrollUp = function() - scrollPosition = (scrollPosition) - rowSize - if scrollPosition < 1 then scrollPosition = 1 end - recalculate(nil) - end - - local doScrollDown = function() - scrollPosition = (scrollPosition) + rowSize - recalculate(nil) - end - - local scrollUp = function(mouseYPos) - if scrollUpButton.Active then - scrollStamp = tick() - local current = scrollStamp - local upCon - upCon = mouseDrag.MouseButton1Up:connect(function() - scrollStamp = tick() - mouseDrag.Parent = nil - upCon:disconnect() - end) - mouseDrag.Parent = getScreenGuiAncestor(scrollbar) - doScrollUp() - wait(0.2) - local t = tick() - local w = 0.1 - while scrollStamp == current do - doScrollUp() - if mouseYPos and mouseYPos > scrollDrag.AbsolutePosition.y then - break - end - if not scrollUpButton.Active then break end - if tick()-t > 5 then - w = 0 - elseif tick()-t > 2 then - w = 0.06 - end - wait(w) - end - end - end - - local scrollDown = function(mouseYPos) - if scrollDownButton.Active then - scrollStamp = tick() - local current = scrollStamp - local downCon - downCon = mouseDrag.MouseButton1Up:connect(function() - scrollStamp = tick() - mouseDrag.Parent = nil - downCon:disconnect() - end) - mouseDrag.Parent = getScreenGuiAncestor(scrollbar) - doScrollDown() - wait(0.2) - local t = tick() - local w = 0.1 - while scrollStamp == current do - doScrollDown() - if mouseYPos and mouseYPos < (scrollDrag.AbsolutePosition.y + scrollDrag.AbsoluteSize.x) then - break - end - if not scrollDownButton.Active then break end - if tick()-t > 5 then - w = 0 - elseif tick()-t > 2 then - w = 0.06 - end - wait(w) - end - end - end - - local y = 0 - scrollDrag.MouseButton1Down:connect(function(x,y) - if scrollDrag.Active then - scrollStamp = tick() - local mouseOffset = y - scrollDrag.AbsolutePosition.y - local dragCon - local upCon - dragCon = mouseDrag.MouseMoved:connect(function(x,y) - local barAbsPos = scrollbar.AbsolutePosition.y - local barAbsSize = scrollbar.AbsoluteSize.y - - local dragAbsSize = scrollDrag.AbsoluteSize.y - local barAbsOne = barAbsPos + barAbsSize - dragAbsSize - y = y - mouseOffset - y = y < barAbsPos and barAbsPos or y > barAbsOne and barAbsOne or y - y = y - barAbsPos - - local guiObjects = 0 - local children = frame:GetChildren() - if children then - for i, child in ipairs(children) do - if child:IsA("GuiObject") then - guiObjects = guiObjects + 1 - end - end - end - - local doublePercent = y/(barAbsSize-dragAbsSize) - local rowDiff = rowSize - local totalScrollCount = guiObjects - (howManyDisplayed - 1) - local newScrollPosition = math.floor((doublePercent * totalScrollCount) + 0.5) + rowDiff - if newScrollPosition < scrollPosition then - rowDiff = -rowDiff - end - - if newScrollPosition < 1 then - newScrollPosition = 1 - end - - scrollPosition = newScrollPosition - recalculate(nil) - end) - upCon = mouseDrag.MouseButton1Up:connect(function() - scrollStamp = tick() - mouseDrag.Parent = nil - dragCon:disconnect(); dragCon = nil - upCon:disconnect(); drag = nil - end) - mouseDrag.Parent = getScreenGuiAncestor(scrollbar) - end - end) - - local scrollMouseCount = 0 - - scrollUpButton.MouseButton1Down:connect( - function() - scrollUp() - end) - scrollUpButton.MouseButton1Up:connect(function() - scrollStamp = tick() - end) - - - scrollDownButton.MouseButton1Up:connect(function() - scrollStamp = tick() - end) - scrollDownButton.MouseButton1Down:connect( - function() - scrollDown() - end) - - scrollbar.MouseButton1Up:connect(function() - scrollStamp = tick() - end) - scrollbar.MouseButton1Down:connect( - function(x,y) - if y > (scrollDrag.AbsoluteSize.y + scrollDrag.AbsolutePosition.y) then - scrollDown(y) - elseif y < (scrollDrag.AbsolutePosition.y) then - scrollUp(y) - end - end) - - - frame.ChildAdded:connect(function() - recalculate(nil) - end) - - frame.ChildRemoved:connect(function() - recalculate(nil) - end) - - frame.Changed:connect( - function(prop) - if prop == "AbsoluteSize" then - --Wait a heartbeat for it to sync in - recalculate(nil) - end - end) - frame.AncestryChanged:connect(function() recalculate(nil) end) - - return frame, scrollUpButton, scrollDownButton, recalculate, scrollbar -end -local function binaryGrow(min, max, fits) - if min > max then - return min - end - local biggestLegal = min - - while min <= max do - local mid = min + math.floor((max - min) / 2) - if fits(mid) and (biggestLegal == nil or biggestLegal < mid) then - biggestLegal = mid - - --Try growing - min = mid + 1 - else - --Doesn't fit, shrink - max = mid - 1 - end - end - return biggestLegal -end - - -local function binaryShrink(min, max, fits) - if min > max then - return min - end - local smallestLegal = max - - while min <= max do - local mid = min + math.floor((max - min) / 2) - if fits(mid) and (smallestLegal == nil or smallestLegal > mid) then - smallestLegal = mid - - --It fits, shrink - max = mid - 1 - else - --Doesn't fit, grow - min = mid + 1 - end - end - return smallestLegal -end - - -local function getGuiOwner(instance) - while instance ~= nil do - if instance:IsA("ScreenGui") or instance:IsA("BillboardGui") then - return instance - end - instance = instance.Parent - end - return nil -end - -t.AutoTruncateTextObject = function(textLabel) - local text = textLabel.Text - - local fullLabel = textLabel:Clone() - fullLabel.Name = "Full" .. textLabel.Name - fullLabel.BorderSizePixel = 0 - fullLabel.BackgroundTransparency = 0 - fullLabel.Text = text - fullLabel.TextXAlignment = Enum.TextXAlignment.Center - fullLabel.Position = UDim2.new(0,-3,0,0) - fullLabel.Size = UDim2.new(0,100,1,0) - fullLabel.Visible = false - fullLabel.Parent = textLabel - - local shortText = nil - local mouseEnterConnection = nil - local mouseLeaveConnection= nil - - local checkForResize = function() - if getGuiOwner(textLabel) == nil then - return - end - textLabel.Text = text - if textLabel.TextFits then - --Tear down the rollover if it is active - if mouseEnterConnection then - mouseEnterConnection:disconnect() - mouseEnterConnection = nil - end - if mouseLeaveConnection then - mouseLeaveConnection:disconnect() - mouseLeaveConnection = nil - end - else - local len = string.len(text) - textLabel.Text = text .. "~" - - --Shrink the text - local textSize = binaryGrow(0, len, - function(pos) - if pos == 0 then - textLabel.Text = "~" - else - textLabel.Text = string.sub(text, 1, pos) .. "~" - end - return textLabel.TextFits - end) - shortText = string.sub(text, 1, textSize) .. "~" - textLabel.Text = shortText - - --Make sure the fullLabel fits - if not fullLabel.TextFits then - --Already too small, grow it really bit to start - fullLabel.Size = UDim2.new(0, 10000, 1, 0) - end - - --Okay, now try to binary shrink it back down - local fullLabelSize = binaryShrink(textLabel.AbsoluteSize.X,fullLabel.AbsoluteSize.X, - function(size) - fullLabel.Size = UDim2.new(0, size, 1, 0) - return fullLabel.TextFits - end) - fullLabel.Size = UDim2.new(0,fullLabelSize+6,1,0) - - --Now setup the rollover effects, if they are currently off - if mouseEnterConnection == nil then - mouseEnterConnection = textLabel.MouseEnter:connect( - function() - fullLabel.ZIndex = textLabel.ZIndex + 1 - fullLabel.Visible = true - --textLabel.Text = "" - end) - end - if mouseLeaveConnection == nil then - mouseLeaveConnection = textLabel.MouseLeave:connect( - function() - fullLabel.Visible = false - --textLabel.Text = shortText - end) - end - end - end - textLabel.AncestryChanged:connect(checkForResize) - textLabel.Changed:connect( - function(prop) - if prop == "AbsoluteSize" then - checkForResize() - end - end) - - checkForResize() - - local function changeText(newText) - text = newText - fullLabel.Text = text - checkForResize() - end - - return textLabel, changeText -end - -local function TransitionTutorialPages(fromPage, toPage, transitionFrame, currentPageValue) - if fromPage then - fromPage.Visible = false - if transitionFrame.Visible == false then - transitionFrame.Size = fromPage.Size - transitionFrame.Position = fromPage.Position - end - else - if transitionFrame.Visible == false then - transitionFrame.Size = UDim2.new(0.0,50,0.0,50) - transitionFrame.Position = UDim2.new(0.5,-25,0.5,-25) - end - end - transitionFrame.Visible = true - currentPageValue.Value = nil - - local newsize, newPosition - if toPage then - --Make it visible so it resizes - toPage.Visible = true - - newSize = toPage.Size - newPosition = toPage.Position - - toPage.Visible = false - else - newSize = UDim2.new(0.0,50,0.0,50) - newPosition = UDim2.new(0.5,-25,0.5,-25) - end - transitionFrame:TweenSizeAndPosition(newSize, newPosition, Enum.EasingDirection.InOut, Enum.EasingStyle.Quad, 0.3, true, - function(state) - if state == Enum.TweenStatus.Completed then - transitionFrame.Visible = false - if toPage then - toPage.Visible = true - currentPageValue.Value = toPage - end - end - end) -end - -t.CreateTutorial = function(name, tutorialKey, createButtons) - local frame = Instance.new("Frame") - frame.Name = "Tutorial-" .. name - frame.BackgroundTransparency = 1 - frame.Size = UDim2.new(0.6, 0, 0.6, 0) - frame.Position = UDim2.new(0.2, 0, 0.2, 0) - - local transitionFrame = Instance.new("Frame") - transitionFrame.Name = "TransitionFrame" - transitionFrame.Style = Enum.FrameStyle.RobloxRound - transitionFrame.Size = UDim2.new(0.6, 0, 0.6, 0) - transitionFrame.Position = UDim2.new(0.2, 0, 0.2, 0) - transitionFrame.Visible = false - transitionFrame.Parent = frame - - local currentPageValue = Instance.new("ObjectValue") - currentPageValue.Name = "CurrentTutorialPage" - currentPageValue.Value = nil - currentPageValue.Parent = frame - - local boolValue = Instance.new("BoolValue") - boolValue.Name = "Buttons" - boolValue.Value = createButtons - boolValue.Parent = frame - - local pages = Instance.new("Frame") - pages.Name = "Pages" - pages.BackgroundTransparency = 1 - pages.Size = UDim2.new(1,0,1,0) - pages.Parent = frame - - local function getVisiblePageAndHideOthers() - local visiblePage = nil - local children = pages:GetChildren() - if children then - for i,child in ipairs(children) do - if child.Visible then - if visiblePage then - child.Visible = false - else - visiblePage = child - end - end - end - end - return visiblePage - end - - local showTutorial = function(alwaysShow) - if alwaysShow or UserSettings().GameSettings:GetTutorialState(tutorialKey) == false then - print("Showing tutorial-",tutorialKey) - local currentTutorialPage = getVisiblePageAndHideOthers() - - local firstPage = pages:FindFirstChild("TutorialPage1") - if firstPage then - TransitionTutorialPages(currentTutorialPage, firstPage, transitionFrame, currentPageValue) - else - error("Could not find TutorialPage1") - end - end - end - - local dismissTutorial = function() - local currentTutorialPage = getVisiblePageAndHideOthers() - - if currentTutorialPage then - TransitionTutorialPages(currentTutorialPage, nil, transitionFrame, currentPageValue) - end - - UserSettings().GameSettings:SetTutorialState(tutorialKey, true) - end - - local gotoPage = function(pageNum) - local page = pages:FindFirstChild("TutorialPage" .. pageNum) - local currentTutorialPage = getVisiblePageAndHideOthers() - TransitionTutorialPages(currentTutorialPage, page, transitionFrame, currentPageValue) - end - - return frame, showTutorial, dismissTutorial, gotoPage -end - -local function CreateBasicTutorialPage(name, handleResize, skipTutorial, giveDoneButton) - local frame = Instance.new("Frame") - frame.Name = "TutorialPage" - frame.Style = Enum.FrameStyle.RobloxRound - frame.Size = UDim2.new(0.6, 0, 0.6, 0) - frame.Position = UDim2.new(0.2, 0, 0.2, 0) - frame.Visible = false - - local frameHeader = Instance.new("TextLabel") - frameHeader.Name = "Header" - frameHeader.Text = name - frameHeader.BackgroundTransparency = 1 - frameHeader.FontSize = Enum.FontSize.Size24 - frameHeader.Font = Enum.Font.ArialBold - frameHeader.TextColor3 = Color3.new(1,1,1) - frameHeader.TextXAlignment = Enum.TextXAlignment.Center - frameHeader.TextWrap = true - frameHeader.Size = UDim2.new(1,-55, 0, 22) - frameHeader.Position = UDim2.new(0,0,0,0) - frameHeader.Parent = frame - - local skipButton = Instance.new("ImageButton") - skipButton.Name = "SkipButton" - skipButton.AutoButtonColor = false - skipButton.BackgroundTransparency = 1 - skipButton.Image = "rbxasset://textures/ui/closeButton.png" - skipButton.MouseButton1Click:connect(function() - skipTutorial() - end) - skipButton.MouseEnter:connect(function() - skipButton.Image = "rbxasset://textures/ui/closeButton_dn.png" - end) - skipButton.MouseLeave:connect(function() - skipButton.Image = "rbxasset://textures/ui/closeButton.png" - end) - skipButton.Size = UDim2.new(0, 25, 0, 25) - skipButton.Position = UDim2.new(1, -25, 0, 0) - skipButton.Parent = frame - - - if giveDoneButton then - local doneButton = Instance.new("TextButton") - doneButton.Name = "DoneButton" - doneButton.Style = Enum.ButtonStyle.RobloxButtonDefault - doneButton.Text = "Done" - doneButton.TextColor3 = Color3.new(1,1,1) - doneButton.Font = Enum.Font.ArialBold - doneButton.FontSize = Enum.FontSize.Size18 - doneButton.Size = UDim2.new(0,100,0,50) - doneButton.Position = UDim2.new(0.5,-50,1,-50) - - if skipTutorial then - doneButton.MouseButton1Click:connect(function() skipTutorial() end) - end - - doneButton.Parent = frame - end - - local innerFrame = Instance.new("Frame") - innerFrame.Name = "ContentFrame" - innerFrame.BackgroundTransparency = 1 - innerFrame.Position = UDim2.new(0,0,0,25) - innerFrame.Parent = frame - - local nextButton = Instance.new("TextButton") - nextButton.Name = "NextButton" - nextButton.Text = "Next" - nextButton.TextColor3 = Color3.new(1,1,1) - nextButton.Font = Enum.Font.Arial - nextButton.FontSize = Enum.FontSize.Size18 - nextButton.Style = Enum.ButtonStyle.RobloxButtonDefault - nextButton.Size = UDim2.new(0,80, 0, 32) - nextButton.Position = UDim2.new(0.5, 5, 1, -32) - nextButton.Active = false - nextButton.Visible = false - nextButton.Parent = frame - - local prevButton = Instance.new("TextButton") - prevButton.Name = "PrevButton" - prevButton.Text = "Previous" - prevButton.TextColor3 = Color3.new(1,1,1) - prevButton.Font = Enum.Font.Arial - prevButton.FontSize = Enum.FontSize.Size18 - prevButton.Style = Enum.ButtonStyle.RobloxButton - prevButton.Size = UDim2.new(0,80, 0, 32) - prevButton.Position = UDim2.new(0.5, -85, 1, -32) - prevButton.Active = false - prevButton.Visible = false - prevButton.Parent = frame - - if giveDoneButton then - innerFrame.Size = UDim2.new(1,0,1,-75) - else - innerFrame.Size = UDim2.new(1,0,1,-22) - end - - local parentConnection = nil - - local function basicHandleResize() - if frame.Visible and frame.Parent then - local maxSize = math.min(frame.Parent.AbsoluteSize.X, frame.Parent.AbsoluteSize.Y) - handleResize(200,maxSize) - end - end - - frame.Changed:connect( - function(prop) - if prop == "Parent" then - if parentConnection ~= nil then - parentConnection:disconnect() - parentConnection = nil - end - if frame.Parent and frame.Parent:IsA("GuiObject") then - parentConnection = frame.Parent.Changed:connect( - function(parentProp) - if parentProp == "AbsoluteSize" then - wait() - basicHandleResize() - end - end) - basicHandleResize() - end - end - - if prop == "Visible" then - basicHandleResize() - end - end) - - return frame, innerFrame -end - -t.CreateTextTutorialPage = function(name, text, skipTutorialFunc) - local frame = nil - local contentFrame = nil - - local textLabel = Instance.new("TextLabel") - textLabel.BackgroundTransparency = 1 - textLabel.TextColor3 = Color3.new(1,1,1) - textLabel.Text = text - textLabel.TextWrap = true - textLabel.TextXAlignment = Enum.TextXAlignment.Left - textLabel.TextYAlignment = Enum.TextYAlignment.Center - textLabel.Font = Enum.Font.Arial - textLabel.FontSize = Enum.FontSize.Size14 - textLabel.Size = UDim2.new(1,0,1,0) - - local function handleResize(minSize, maxSize) - size = binaryShrink(minSize, maxSize, - function(size) - frame.Size = UDim2.new(0, size, 0, size) - return textLabel.TextFits - end) - frame.Size = UDim2.new(0, size, 0, size) - frame.Position = UDim2.new(0.5, -size/2, 0.5, -size/2) - end - - frame, contentFrame = CreateBasicTutorialPage(name, handleResize, skipTutorialFunc) - textLabel.Parent = contentFrame - - return frame -end - -t.CreateImageTutorialPage = function(name, imageAsset, x, y, skipTutorialFunc, giveDoneButton) - local frame = nil - local contentFrame = nil - - local imageLabel = Instance.new("ImageLabel") - imageLabel.BackgroundTransparency = 1 - imageLabel.Image = imageAsset - imageLabel.Size = UDim2.new(0,x,0,y) - imageLabel.Position = UDim2.new(0.5,-x/2,0.5,-y/2) - - local function handleResize(minSize, maxSize) - size = binaryShrink(minSize, maxSize, - function(size) - return size >= x and size >= y - end) - if size >= x and size >= y then - imageLabel.Size = UDim2.new(0,x, 0,y) - imageLabel.Position = UDim2.new(0.5,-x/2, 0.5, -y/2) - else - if x > y then - --X is limiter, so - imageLabel.Size = UDim2.new(1,0,y/x,0) - imageLabel.Position = UDim2.new(0,0, 0.5 - (y/x)/2, 0) - else - --Y is limiter - imageLabel.Size = UDim2.new(x/y,0,1, 0) - imageLabel.Position = UDim2.new(0.5-(x/y)/2, 0, 0, 0) - end - end - size = size + 50 - frame.Size = UDim2.new(0, size, 0, size) - frame.Position = UDim2.new(0.5, -size/2, 0.5, -size/2) - end - - frame, contentFrame = CreateBasicTutorialPage(name, handleResize, skipTutorialFunc, giveDoneButton) - imageLabel.Parent = contentFrame - - return frame -end - -t.AddTutorialPage = function(tutorial, tutorialPage) - local transitionFrame = tutorial.TransitionFrame - local currentPageValue = tutorial.CurrentTutorialPage - - if not tutorial.Buttons.Value then - tutorialPage.NextButton.Parent = nil - tutorialPage.PrevButton.Parent = nil - end - - local children = tutorial.Pages:GetChildren() - if children and #children > 0 then - tutorialPage.Name = "TutorialPage" .. (#children+1) - local previousPage = children[#children] - if not previousPage:IsA("GuiObject") then - error("All elements under Pages must be GuiObjects") - end - - if tutorial.Buttons.Value then - if previousPage.NextButton.Active then - error("NextButton already Active on previousPage, please only add pages with RbxGui.AddTutorialPage function") - end - previousPage.NextButton.MouseButton1Click:connect( - function() - TransitionTutorialPages(previousPage, tutorialPage, transitionFrame, currentPageValue) - end) - previousPage.NextButton.Active = true - previousPage.NextButton.Visible = true - - if tutorialPage.PrevButton.Active then - error("PrevButton already Active on tutorialPage, please only add pages with RbxGui.AddTutorialPage function") - end - tutorialPage.PrevButton.MouseButton1Click:connect( - function() - TransitionTutorialPages(tutorialPage, previousPage, transitionFrame, currentPageValue) - end) - tutorialPage.PrevButton.Active = true - tutorialPage.PrevButton.Visible = true - end - - tutorialPage.Parent = tutorial.Pages - else - --First child - tutorialPage.Name = "TutorialPage1" - tutorialPage.Parent = tutorial.Pages - end -end - -t.CreateSetPanel = function(userIdsForSets, objectSelected, dialogClosed, size, position, showAdminCategories, useAssetVersionId) - - if not userIdsForSets then - error("CreateSetPanel: userIdsForSets (first arg) is nil, should be a table of number ids") - end - if type(userIdsForSets) ~= "table" and type(userIdsForSets) ~= "userdata" then - error("CreateSetPanel: userIdsForSets (first arg) is of type " ..type(userIdsForSets) .. ", should be of type table or userdata") - end - if not objectSelected then - error("CreateSetPanel: objectSelected (second arg) is nil, should be a callback function!") - end - if type(objectSelected) ~= "function" then - error("CreateSetPanel: objectSelected (second arg) is of type " .. type(objectSelected) .. ", should be of type function!") - end - if dialogClosed and type(dialogClosed) ~= "function" then - error("CreateSetPanel: dialogClosed (third arg) is of type " .. type(dialogClosed) .. ", should be of type function!") - end - - if showAdminCategories == nil then -- by default, don't show beta sets - showAdminCategories = false - end - - local arrayPosition = 1 - local insertButtons = {} - local insertButtonCons = {} - local contents = nil - local setGui = nil - - -- used for water selections - local waterForceDirection = "NegX" - local waterForce = "None" - local waterGui, waterTypeChangedEvent = nil - - local Data = {} - Data.CurrentCategory = nil - Data.Category = {} - local SetCache = {} - - local userCategoryButtons = nil - - local buttonWidth = 64 - local buttonHeight = buttonWidth - - local SmallThumbnailUrl = nil - local LargeThumbnailUrl = nil - local BaseUrl = game:GetService("ContentProvider").BaseUrl:lower() - - if useAssetVersionId then - LargeThumbnailUrl = BaseUrl .. "Game/Tools/ThumbnailAsset.ashx?fmt=png&wd=420&ht=420&assetversionid=" - SmallThumbnailUrl = BaseUrl .. "Game/Tools/ThumbnailAsset.ashx?fmt=png&wd=75&ht=75&assetversionid=" - else - LargeThumbnailUrl = BaseUrl .. "Game/Tools/ThumbnailAsset.ashx?fmt=png&wd=420&ht=420&aid=" - SmallThumbnailUrl = BaseUrl .. "Game/Tools/ThumbnailAsset.ashx?fmt=png&wd=75&ht=75&aid=" - end - - local function drillDownSetZIndex(parent, index) - local children = parent:GetChildren() - for i = 1, #children do - if children[i]:IsA("GuiObject") then - children[i].ZIndex = index - end - drillDownSetZIndex(children[i], index) - end - end - - -- for terrain stamping - local currTerrainDropDownFrame = nil - local terrainShapes = {"Block","Vertical Ramp","Corner Wedge","Inverse Corner Wedge","Horizontal Ramp","Auto-Wedge"} - local terrainShapeMap = {} - for i = 1, #terrainShapes do - terrainShapeMap[terrainShapes[i]] = i - 1 - end - terrainShapeMap[terrainShapes[#terrainShapes]] = 6 - - local function createWaterGui() - local waterForceDirections = {"NegX","X","NegY","Y","NegZ","Z"} - local waterForces = {"None", "Small", "Medium", "Strong", "Max"} - - local waterFrame = Instance.new("Frame") - waterFrame.Name = "WaterFrame" - waterFrame.Style = Enum.FrameStyle.RobloxSquare - waterFrame.Size = UDim2.new(0,150,0,110) - waterFrame.Visible = false - - local waterForceLabel = Instance.new("TextLabel") - waterForceLabel.Name = "WaterForceLabel" - waterForceLabel.BackgroundTransparency = 1 - waterForceLabel.Size = UDim2.new(1,0,0,12) - waterForceLabel.Font = Enum.Font.ArialBold - waterForceLabel.FontSize = Enum.FontSize.Size12 - waterForceLabel.TextColor3 = Color3.new(1,1,1) - waterForceLabel.TextXAlignment = Enum.TextXAlignment.Left - waterForceLabel.Text = "Water Force" - waterForceLabel.Parent = waterFrame - - local waterForceDirLabel = waterForceLabel:Clone() - waterForceDirLabel.Name = "WaterForceDirectionLabel" - waterForceDirLabel.Text = "Water Force Direction" - waterForceDirLabel.Position = UDim2.new(0,0,0,50) - waterForceDirLabel.Parent = waterFrame - - local waterTypeChangedEvent = Instance.new("BindableEvent",waterFrame) - waterTypeChangedEvent.Name = "WaterTypeChangedEvent" - - local waterForceDirectionSelectedFunc = function(newForceDirection) - waterForceDirection = newForceDirection - waterTypeChangedEvent:Fire({waterForce, waterForceDirection}) - end - local waterForceSelectedFunc = function(newForce) - waterForce = newForce - waterTypeChangedEvent:Fire({waterForce, waterForceDirection}) - end - - local waterForceDirectionDropDown, forceWaterDirectionSelection = t.CreateDropDownMenu(waterForceDirections, waterForceDirectionSelectedFunc) - waterForceDirectionDropDown.Size = UDim2.new(1,0,0,25) - waterForceDirectionDropDown.Position = UDim2.new(0,0,1,3) - forceWaterDirectionSelection("NegX") - waterForceDirectionDropDown.Parent = waterForceDirLabel - - local waterForceDropDown, forceWaterForceSelection = t.CreateDropDownMenu(waterForces, waterForceSelectedFunc) - forceWaterForceSelection("None") - waterForceDropDown.Size = UDim2.new(1,0,0,25) - waterForceDropDown.Position = UDim2.new(0,0,1,3) - waterForceDropDown.Parent = waterForceLabel - - return waterFrame, waterTypeChangedEvent - end - - -- Helper Function that contructs gui elements - local function createSetGui() - - local setGui = Instance.new("ScreenGui") - setGui.Name = "SetGui" - - local setPanel = Instance.new("Frame") - setPanel.Name = "SetPanel" - setPanel.Active = true - setPanel.BackgroundTransparency = 1 - if position then - setPanel.Position = position - else - setPanel.Position = UDim2.new(0.2, 29, 0.1, 24) - end - if size then - setPanel.Size = size - else - setPanel.Size = UDim2.new(0.6, -58, 0.64, 0) - end - setPanel.Style = Enum.FrameStyle.RobloxRound - setPanel.ZIndex = 6 - setPanel.Parent = setGui - - -- Children of SetPanel - local itemPreview = Instance.new("Frame") - itemPreview.Name = "ItemPreview" - itemPreview.BackgroundTransparency = 1 - itemPreview.Position = UDim2.new(0.8,5,0.085,0) - itemPreview.Size = UDim2.new(0.21,0,0.9,0) - itemPreview.ZIndex = 6 - itemPreview.Parent = setPanel - - -- Children of ItemPreview - local textPanel = Instance.new("Frame") - textPanel.Name = "TextPanel" - textPanel.BackgroundTransparency = 1 - textPanel.Position = UDim2.new(0,0,0.45,0) - textPanel.Size = UDim2.new(1,0,0.55,0) - textPanel.ZIndex = 6 - textPanel.Parent = itemPreview - - -- Children of TextPanel - local rolloverText = Instance.new("TextLabel") - rolloverText.Name = "RolloverText" - rolloverText.BackgroundTransparency = 1 - rolloverText.Size = UDim2.new(1,0,0,48) - rolloverText.ZIndex = 6 - rolloverText.Font = Enum.Font.ArialBold - rolloverText.FontSize = Enum.FontSize.Size24 - rolloverText.Text = "" - rolloverText.TextColor3 = Color3.new(1,1,1) - rolloverText.TextWrap = true - rolloverText.TextXAlignment = Enum.TextXAlignment.Left - rolloverText.TextYAlignment = Enum.TextYAlignment.Top - rolloverText.Parent = textPanel - - local largePreview = Instance.new("ImageLabel") - largePreview.Name = "LargePreview" - largePreview.BackgroundTransparency = 1 - largePreview.Image = "" - largePreview.Size = UDim2.new(1,0,0,170) - largePreview.ZIndex = 6 - largePreview.Parent = itemPreview - - local sets = Instance.new("Frame") - sets.Name = "Sets" - sets.BackgroundTransparency = 1 - sets.Position = UDim2.new(0,0,0,5) - sets.Size = UDim2.new(0.23,0,1,-5) - sets.ZIndex = 6 - sets.Parent = setPanel - - -- Children of Sets - local line = Instance.new("Frame") - line.Name = "Line" - line.BackgroundColor3 = Color3.new(1,1,1) - line.BackgroundTransparency = 0.7 - line.BorderSizePixel = 0 - line.Position = UDim2.new(1,-3,0.06,0) - line.Size = UDim2.new(0,3,0.9,0) - line.ZIndex = 6 - line.Parent = sets - - local setsLists, controlFrame = t.CreateTrueScrollingFrame() - setsLists.Size = UDim2.new(1,-6,0.94,0) - setsLists.Position = UDim2.new(0,0,0.06,0) - setsLists.BackgroundTransparency = 1 - setsLists.Name = "SetsLists" - setsLists.ZIndex = 6 - setsLists.Parent = sets - drillDownSetZIndex(controlFrame, 7) - - local setsHeader = Instance.new("TextLabel") - setsHeader.Name = "SetsHeader" - setsHeader.BackgroundTransparency = 1 - setsHeader.Size = UDim2.new(0,47,0,24) - setsHeader.ZIndex = 6 - setsHeader.Font = Enum.Font.ArialBold - setsHeader.FontSize = Enum.FontSize.Size24 - setsHeader.Text = "Sets" - setsHeader.TextColor3 = Color3.new(1,1,1) - setsHeader.TextXAlignment = Enum.TextXAlignment.Left - setsHeader.TextYAlignment = Enum.TextYAlignment.Top - setsHeader.Parent = sets - - local cancelButton = Instance.new("TextButton") - cancelButton.Name = "CancelButton" - cancelButton.Position = UDim2.new(1,-32,0,-2) - cancelButton.Size = UDim2.new(0,34,0,34) - cancelButton.Style = Enum.ButtonStyle.RobloxButtonDefault - cancelButton.ZIndex = 6 - cancelButton.Text = "" - cancelButton.Modal = true - cancelButton.Parent = setPanel - - -- Children of Cancel Button - local cancelImage = Instance.new("ImageLabel") - cancelImage.Name = "CancelImage" - cancelImage.BackgroundTransparency = 1 - cancelImage.Image = "http://www.mete0r.xyz/asset/?id=54135717" - cancelImage.Position = UDim2.new(0,-2,0,-2) - cancelImage.Size = UDim2.new(0,16,0,16) - cancelImage.ZIndex = 6 - cancelImage.Parent = cancelButton - - return setGui - end - - local function createSetButton(text) - local setButton = Instance.new("TextButton") - - if text then setButton.Text = text - else setButton.Text = "" end - - setButton.AutoButtonColor = false - setButton.BackgroundTransparency = 1 - setButton.BackgroundColor3 = Color3.new(1,1,1) - setButton.BorderSizePixel = 0 - setButton.Size = UDim2.new(1,-5,0,18) - setButton.ZIndex = 6 - setButton.Visible = false - setButton.Font = Enum.Font.Arial - setButton.FontSize = Enum.FontSize.Size18 - setButton.TextColor3 = Color3.new(1,1,1) - setButton.TextXAlignment = Enum.TextXAlignment.Left - - return setButton - end - - local function buildSetButton(name, setId, setImageId, i, count) - local button = createSetButton(name) - button.Text = name - button.Name = "SetButton" - button.Visible = true - - local setValue = Instance.new("IntValue") - setValue.Name = "SetId" - setValue.Value = setId - setValue.Parent = button - - local setName = Instance.new("StringValue") - setName.Name = "SetName" - setName.Value = name - setName.Parent = button - - return button - end - - local function processCategory(sets) - local setButtons = {} - local numSkipped = 0 - for i = 1, #sets do - if not showAdminCategories and sets[i].Name == "Beta" then - numSkipped = numSkipped + 1 - else - setButtons[i - numSkipped] = buildSetButton(sets[i].Name, sets[i].CategoryId, sets[i].ImageAssetId, i - numSkipped, #sets) - end - end - return setButtons - end - - local function handleResize() - wait() -- neccessary to insure heartbeat happened - - local itemPreview = setGui.SetPanel.ItemPreview - - itemPreview.LargePreview.Size = UDim2.new(1,0,0,itemPreview.AbsoluteSize.X) - itemPreview.LargePreview.Position = UDim2.new(0.5,-itemPreview.LargePreview.AbsoluteSize.X/2,0,0) - itemPreview.TextPanel.Position = UDim2.new(0,0,0,itemPreview.LargePreview.AbsoluteSize.Y) - itemPreview.TextPanel.Size = UDim2.new(1,0,0,itemPreview.AbsoluteSize.Y - itemPreview.LargePreview.AbsoluteSize.Y) - end - - local function makeInsertAssetButton() - local insertAssetButtonExample = Instance.new("Frame") - insertAssetButtonExample.Name = "InsertAssetButtonExample" - insertAssetButtonExample.Position = UDim2.new(0,128,0,64) - insertAssetButtonExample.Size = UDim2.new(0,64,0,64) - insertAssetButtonExample.BackgroundTransparency = 1 - insertAssetButtonExample.ZIndex = 6 - insertAssetButtonExample.Visible = false - - local assetId = Instance.new("IntValue") - assetId.Name = "AssetId" - assetId.Value = 0 - assetId.Parent = insertAssetButtonExample - - local assetName = Instance.new("StringValue") - assetName.Name = "AssetName" - assetName.Value = "" - assetName.Parent = insertAssetButtonExample - - local button = Instance.new("TextButton") - button.Name = "Button" - button.Text = "" - button.Style = Enum.ButtonStyle.RobloxButton - button.Position = UDim2.new(0.025,0,0.025,0) - button.Size = UDim2.new(0.95,0,0.95,0) - button.ZIndex = 6 - button.Parent = insertAssetButtonExample - - local buttonImage = Instance.new("ImageLabel") - buttonImage.Name = "ButtonImage" - buttonImage.Image = "" - buttonImage.Position = UDim2.new(0,-7,0,-7) - buttonImage.Size = UDim2.new(1,14,1,14) - buttonImage.BackgroundTransparency = 1 - buttonImage.ZIndex = 7 - buttonImage.Parent = button - - local configIcon = buttonImage:clone() - configIcon.Name = "ConfigIcon" - configIcon.Visible = false - configIcon.Position = UDim2.new(1,-23,1,-24) - configIcon.Size = UDim2.new(0,16,0,16) - configIcon.Image = "" - configIcon.ZIndex = 6 - configIcon.Parent = insertAssetButtonExample - - return insertAssetButtonExample - end - - local function showLargePreview(insertButton) - if insertButton:FindFirstChild("AssetId") then - delay(0,function() - game:GetService("ContentProvider"):Preload(LargeThumbnailUrl .. tostring(insertButton.AssetId.Value)) - setGui.SetPanel.ItemPreview.LargePreview.Image = LargeThumbnailUrl .. tostring(insertButton.AssetId.Value) - end) - end - if insertButton:FindFirstChild("AssetName") then - setGui.SetPanel.ItemPreview.TextPanel.RolloverText.Text = insertButton.AssetName.Value - end - end - - local function selectTerrainShape(shape) - if currTerrainDropDownFrame then - objectSelected(tostring(currTerrainDropDownFrame.AssetName.Value), tonumber(currTerrainDropDownFrame.AssetId.Value), shape) - end - end - - local function createTerrainTypeButton(name, parent) - local dropDownTextButton = Instance.new("TextButton") - dropDownTextButton.Name = name .. "Button" - dropDownTextButton.Font = Enum.Font.ArialBold - dropDownTextButton.FontSize = Enum.FontSize.Size14 - dropDownTextButton.BorderSizePixel = 0 - dropDownTextButton.TextColor3 = Color3.new(1,1,1) - dropDownTextButton.Text = name - dropDownTextButton.TextXAlignment = Enum.TextXAlignment.Left - dropDownTextButton.BackgroundTransparency = 1 - dropDownTextButton.ZIndex = parent.ZIndex + 1 - dropDownTextButton.Size = UDim2.new(0,parent.Size.X.Offset - 2,0,16) - dropDownTextButton.Position = UDim2.new(0,1,0,0) - - dropDownTextButton.MouseEnter:connect(function() - dropDownTextButton.BackgroundTransparency = 0 - dropDownTextButton.TextColor3 = Color3.new(0,0,0) - end) - - dropDownTextButton.MouseLeave:connect(function() - dropDownTextButton.BackgroundTransparency = 1 - dropDownTextButton.TextColor3 = Color3.new(1,1,1) - end) - - dropDownTextButton.MouseButton1Click:connect(function() - dropDownTextButton.BackgroundTransparency = 1 - dropDownTextButton.TextColor3 = Color3.new(1,1,1) - if dropDownTextButton.Parent and dropDownTextButton.Parent:IsA("GuiObject") then - dropDownTextButton.Parent.Visible = false - end - selectTerrainShape(terrainShapeMap[dropDownTextButton.Text]) - end) - - return dropDownTextButton - end - - local function createTerrainDropDownMenu(zIndex) - local dropDown = Instance.new("Frame") - dropDown.Name = "TerrainDropDown" - dropDown.BackgroundColor3 = Color3.new(0,0,0) - dropDown.BorderColor3 = Color3.new(1,0,0) - dropDown.Size = UDim2.new(0,200,0,0) - dropDown.Visible = false - dropDown.ZIndex = zIndex - dropDown.Parent = setGui - - for i = 1, #terrainShapes do - local shapeButton = createTerrainTypeButton(terrainShapes[i],dropDown) - shapeButton.Position = UDim2.new(0,1,0,(i - 1) * (shapeButton.Size.Y.Offset)) - shapeButton.Parent = dropDown - dropDown.Size = UDim2.new(0,200,0,dropDown.Size.Y.Offset + (shapeButton.Size.Y.Offset)) - end - - dropDown.MouseLeave:connect(function() - dropDown.Visible = false - end) - end - - - local function createDropDownMenuButton(parent) - local dropDownButton = Instance.new("ImageButton") - dropDownButton.Name = "DropDownButton" - dropDownButton.Image = "http://www.mete0r.xyz/asset/?id=67581509" - dropDownButton.BackgroundTransparency = 1 - dropDownButton.Size = UDim2.new(0,16,0,16) - dropDownButton.Position = UDim2.new(1,-24,0,6) - dropDownButton.ZIndex = parent.ZIndex + 2 - dropDownButton.Parent = parent - - if not setGui:FindFirstChild("TerrainDropDown") then - createTerrainDropDownMenu(8) - end - - dropDownButton.MouseButton1Click:connect(function() - setGui.TerrainDropDown.Visible = true - setGui.TerrainDropDown.Position = UDim2.new(0,parent.AbsolutePosition.X,0,parent.AbsolutePosition.Y) - currTerrainDropDownFrame = parent - end) - end - - local function buildInsertButton() - local insertButton = makeInsertAssetButton() - insertButton.Name = "InsertAssetButton" - insertButton.Visible = true - - if Data.Category[Data.CurrentCategory].SetName == "High Scalability" then - createDropDownMenuButton(insertButton) - end - - local lastEnter = nil - local mouseEnterCon = insertButton.MouseEnter:connect(function() - lastEnter = insertButton - delay(0.1,function() - if lastEnter == insertButton then - showLargePreview(insertButton) - end - end) - end) - return insertButton, mouseEnterCon - end - - local function realignButtonGrid(columns) - local x = 0 - local y = 0 - for i = 1, #insertButtons do - insertButtons[i].Position = UDim2.new(0, buttonWidth * x, 0, buttonHeight * y) - x = x + 1 - if x >= columns then - x = 0 - y = y + 1 - end - end - end - - local function setInsertButtonImageBehavior(insertFrame, visible, name, assetId) - if visible then - insertFrame.AssetName.Value = name - insertFrame.AssetId.Value = assetId - local newImageUrl = SmallThumbnailUrl .. assetId - if newImageUrl ~= insertFrame.Button.ButtonImage.Image then - delay(0,function() - game:GetService("ContentProvider"):Preload(SmallThumbnailUrl .. assetId) - if insertFrame:findFirstChild("Button") then - insertFrame.Button.ButtonImage.Image = SmallThumbnailUrl .. assetId - end - end) - end - table.insert(insertButtonCons, - insertFrame.Button.MouseButton1Click:connect(function() - -- special case for water, show water selection gui - local isWaterSelected = (name == "Water") and (Data.Category[Data.CurrentCategory].SetName == "High Scalability") - waterGui.Visible = isWaterSelected - if isWaterSelected then - objectSelected(name, tonumber(assetId), nil) - else - objectSelected(name, tonumber(assetId)) - end - end) - ) - insertFrame.Visible = true - else - insertFrame.Visible = false - end - end - - local function loadSectionOfItems(setGui, rows, columns) - local pageSize = rows * columns - - if arrayPosition > #contents then return end - - local origArrayPos = arrayPosition - - local yCopy = 0 - for i = 1, pageSize + 1 do - if arrayPosition >= #contents + 1 then - break - end - - local buttonCon - insertButtons[arrayPosition], buttonCon = buildInsertButton() - table.insert(insertButtonCons,buttonCon) - insertButtons[arrayPosition].Parent = setGui.SetPanel.ItemsFrame - arrayPosition = arrayPosition + 1 - end - realignButtonGrid(columns) - - local indexCopy = origArrayPos - for index = origArrayPos, arrayPosition do - if insertButtons[index] then - if contents[index] then - - -- we don't want water to have a drop down button - if contents[index].Name == "Water" then - if Data.Category[Data.CurrentCategory].SetName == "High Scalability" then - insertButtons[index]:FindFirstChild("DropDownButton",true):Destroy() - end - end - - local assetId - if useAssetVersionId then - assetId = contents[index].AssetVersionId - else - assetId = contents[index].AssetId - end - setInsertButtonImageBehavior(insertButtons[index], true, contents[index].Name, assetId) - else - break - end - else - break - end - indexCopy = index - end - end - - local function setSetIndex() - Data.Category[Data.CurrentCategory].Index = 0 - - rows = 7 - columns = math.floor(setGui.SetPanel.ItemsFrame.AbsoluteSize.X/buttonWidth) - - contents = Data.Category[Data.CurrentCategory].Contents - if contents then - -- remove our buttons and their connections - for i = 1, #insertButtons do - insertButtons[i]:remove() - end - for i = 1, #insertButtonCons do - if insertButtonCons[i] then insertButtonCons[i]:disconnect() end - end - insertButtonCons = {} - insertButtons = {} - - arrayPosition = 1 - loadSectionOfItems(setGui, rows, columns) - end - end - - local function selectSet(button, setName, setId, setIndex) - if button and Data.Category[Data.CurrentCategory] ~= nil then - if button ~= Data.Category[Data.CurrentCategory].Button then - Data.Category[Data.CurrentCategory].Button = button - - if SetCache[setId] == nil then - SetCache[setId] = game:GetService("InsertService"):GetCollection(setId) - end - Data.Category[Data.CurrentCategory].Contents = SetCache[setId] - - Data.Category[Data.CurrentCategory].SetName = setName - Data.Category[Data.CurrentCategory].SetId = setId - end - setSetIndex() - end - end - - local function selectCategoryPage(buttons, page) - if buttons ~= Data.CurrentCategory then - if Data.CurrentCategory then - for key, button in pairs(Data.CurrentCategory) do - button.Visible = false - end - end - - Data.CurrentCategory = buttons - if Data.Category[Data.CurrentCategory] == nil then - Data.Category[Data.CurrentCategory] = {} - if #buttons > 0 then - selectSet(buttons[1], buttons[1].SetName.Value, buttons[1].SetId.Value, 0) - end - else - Data.Category[Data.CurrentCategory].Button = nil - selectSet(Data.Category[Data.CurrentCategory].ButtonFrame, Data.Category[Data.CurrentCategory].SetName, Data.Category[Data.CurrentCategory].SetId, Data.Category[Data.CurrentCategory].Index) - end - end - end - - local function selectCategory(category) - selectCategoryPage(category, 0) - end - - local function resetAllSetButtonSelection() - local setButtons = setGui.SetPanel.Sets.SetsLists:GetChildren() - for i = 1, #setButtons do - if setButtons[i]:IsA("TextButton") then - setButtons[i].Selected = false - setButtons[i].BackgroundTransparency = 1 - setButtons[i].TextColor3 = Color3.new(1,1,1) - setButtons[i].BackgroundColor3 = Color3.new(1,1,1) - end - end - end - - local function populateSetsFrame() - local currRow = 0 - for i = 1, #userCategoryButtons do - local button = userCategoryButtons[i] - button.Visible = true - button.Position = UDim2.new(0,5,0,currRow * button.Size.Y.Offset) - button.Parent = setGui.SetPanel.Sets.SetsLists - - if i == 1 then -- we will have this selected by default, so show it - button.Selected = true - button.BackgroundColor3 = Color3.new(0,204/255,0) - button.TextColor3 = Color3.new(0,0,0) - button.BackgroundTransparency = 0 - end - - button.MouseEnter:connect(function() - if not button.Selected then - button.BackgroundTransparency = 0 - button.TextColor3 = Color3.new(0,0,0) - end - end) - button.MouseLeave:connect(function() - if not button.Selected then - button.BackgroundTransparency = 1 - button.TextColor3 = Color3.new(1,1,1) - end - end) - button.MouseButton1Click:connect(function() - resetAllSetButtonSelection() - button.Selected = not button.Selected - button.BackgroundColor3 = Color3.new(0,204/255,0) - button.TextColor3 = Color3.new(0,0,0) - button.BackgroundTransparency = 0 - selectSet(button, button.Text, userCategoryButtons[i].SetId.Value, 0) - end) - - currRow = currRow + 1 - end - - local buttons = setGui.SetPanel.Sets.SetsLists:GetChildren() - - -- set first category as loaded for default - if buttons then - for i = 1, #buttons do - if buttons[i]:IsA("TextButton") then - selectSet(buttons[i], buttons[i].Text, userCategoryButtons[i].SetId.Value, 0) - selectCategory(userCategoryButtons) - break - end - end - end - end - - setGui = createSetGui() - waterGui, waterTypeChangedEvent = createWaterGui() - waterGui.Position = UDim2.new(0,55,0,0) - waterGui.Parent = setGui - setGui.Changed:connect(function(prop) -- this resizes the preview image to always be the right size - if prop == "AbsoluteSize" then - handleResize() - setSetIndex() - end - end) - - local scrollFrame, controlFrame = t.CreateTrueScrollingFrame() - scrollFrame.Size = UDim2.new(0.54,0,0.85,0) - scrollFrame.Position = UDim2.new(0.24,0,0.085,0) - scrollFrame.Name = "ItemsFrame" - scrollFrame.ZIndex = 6 - scrollFrame.Parent = setGui.SetPanel - scrollFrame.BackgroundTransparency = 1 - - drillDownSetZIndex(controlFrame,7) - - controlFrame.Parent = setGui.SetPanel - controlFrame.Position = UDim2.new(0.76, 5, 0, 0) - - local debounce = false - controlFrame.ScrollBottom.Changed:connect(function(prop) - if controlFrame.ScrollBottom.Value == true then - if debounce then return end - debounce = true - loadSectionOfItems(setGui, rows, columns) - debounce = false - end - end) - - local userData = {} - for id = 1, #userIdsForSets do - local newUserData = game:GetService("InsertService"):GetUserSets(userIdsForSets[id]) - if newUserData and #newUserData > 2 then - -- start at #3 to skip over My Decals and My Models for each account - for category = 3, #newUserData do - if newUserData[category].Name == "High Scalability" then -- we want high scalability parts to show first - table.insert(userData,1,newUserData[category]) - else - table.insert(userData, newUserData[category]) - end - end - end - - end - if userData then - userCategoryButtons = processCategory(userData) - end - - rows = math.floor(setGui.SetPanel.ItemsFrame.AbsoluteSize.Y/buttonHeight) - columns = math.floor(setGui.SetPanel.ItemsFrame.AbsoluteSize.X/buttonWidth) - - populateSetsFrame() - - insertPanelCloseCon = setGui.SetPanel.CancelButton.MouseButton1Click:connect(function() - setGui.SetPanel.Visible = false - if dialogClosed then dialogClosed() end - end) - - local setVisibilityFunction = function(visible) - if visible then - setGui.SetPanel.Visible = true - else - setGui.SetPanel.Visible = false - end - end - - local getVisibilityFunction = function() - if setGui then - if setGui:FindFirstChild("SetPanel") then - return setGui.SetPanel.Visible - end - end - - return false - end - - return setGui, setVisibilityFunction, getVisibilityFunction, waterTypeChangedEvent -end - -t.CreateTerrainMaterialSelector = function(size,position) - local terrainMaterialSelectionChanged = Instance.new("BindableEvent") - terrainMaterialSelectionChanged.Name = "TerrainMaterialSelectionChanged" - - local selectedButton = nil - - local frame = Instance.new("Frame") - frame.Name = "TerrainMaterialSelector" - if size then - frame.Size = size - else - frame.Size = UDim2.new(0, 245, 0, 230) - end - if position then - frame.Position = position - end - frame.BorderSizePixel = 0 - frame.BackgroundColor3 = Color3.new(0,0,0) - frame.Active = true - - terrainMaterialSelectionChanged.Parent = frame - - local waterEnabled = true -- todo: turn this on when water is ready - - local materialToImageMap = {} - local materialNames = {"Grass", "Sand", "Brick", "Granite", "Asphalt", "Iron", "Aluminum", "Gold", "Plank", "Log", "Gravel", "Cinder Block", "Stone Wall", "Concrete", "Plastic (red)", "Plastic (blue)"} - if waterEnabled then - table.insert(materialNames,"Water") - end - local currentMaterial = 1 - - function getEnumFromName(choice) - if choice == "Grass" then return 1 end - if choice == "Sand" then return 2 end - if choice == "Erase" then return 0 end - if choice == "Brick" then return 3 end - if choice == "Granite" then return 4 end - if choice == "Asphalt" then return 5 end - if choice == "Iron" then return 6 end - if choice == "Aluminum" then return 7 end - if choice == "Gold" then return 8 end - if choice == "Plank" then return 9 end - if choice == "Log" then return 10 end - if choice == "Gravel" then return 11 end - if choice == "Cinder Block" then return 12 end - if choice == "Stone Wall" then return 13 end - if choice == "Concrete" then return 14 end - if choice == "Plastic (red)" then return 15 end - if choice == "Plastic (blue)" then return 16 end - if choice == "Water" then return 17 end - end - - function getNameFromEnum(choice) - if choice == Enum.CellMaterial.Grass or choice == 1 then return "Grass"end - if choice == Enum.CellMaterial.Sand or choice == 2 then return "Sand" end - if choice == Enum.CellMaterial.Empty or choice == 0 then return "Erase" end - if choice == Enum.CellMaterial.Brick or choice == 3 then return "Brick" end - if choice == Enum.CellMaterial.Granite or choice == 4 then return "Granite" end - if choice == Enum.CellMaterial.Asphalt or choice == 5 then return "Asphalt" end - if choice == Enum.CellMaterial.Iron or choice == 6 then return "Iron" end - if choice == Enum.CellMaterial.Aluminum or choice == 7 then return "Aluminum" end - if choice == Enum.CellMaterial.Gold or choice == 8 then return "Gold" end - if choice == Enum.CellMaterial.WoodPlank or choice == 9 then return "Plank" end - if choice == Enum.CellMaterial.WoodLog or choice == 10 then return "Log" end - if choice == Enum.CellMaterial.Gravel or choice == 11 then return "Gravel" end - if choice == Enum.CellMaterial.CinderBlock or choice == 12 then return "Cinder Block" end - if choice == Enum.CellMaterial.MossyStone or choice == 13 then return "Stone Wall" end - if choice == Enum.CellMaterial.Cement or choice == 14 then return "Concrete" end - if choice == Enum.CellMaterial.RedPlastic or choice == 15 then return "Plastic (red)" end - if choice == Enum.CellMaterial.BluePlastic or choice == 16 then return "Plastic (blue)" end - - if waterEnabled then - if choice == Enum.CellMaterial.Water or choice == 17 then return "Water" end - end - end - - - local function updateMaterialChoice(choice) - currentMaterial = getEnumFromName(choice) - terrainMaterialSelectionChanged:Fire(currentMaterial) - end - - -- we so need a better way to do this - for i,v in pairs(materialNames) do - materialToImageMap[v] = {} - if v == "Grass" then materialToImageMap[v].Regular = "http://www.mete0r.xyz/asset/?id=56563112" - elseif v == "Sand" then materialToImageMap[v].Regular = "http://www.mete0r.xyz/asset/?id=62356652" - elseif v == "Brick" then materialToImageMap[v].Regular = "http://www.mete0r.xyz/asset/?id=65961537" - elseif v == "Granite" then materialToImageMap[v].Regular = "http://www.mete0r.xyz/asset/?id=67532153" - elseif v == "Asphalt" then materialToImageMap[v].Regular = "http://www.mete0r.xyz/asset/?id=67532038" - elseif v == "Iron" then materialToImageMap[v].Regular = "http://www.mete0r.xyz/asset/?id=67532093" - elseif v == "Aluminum" then materialToImageMap[v].Regular = "http://www.mete0r.xyz/asset/?id=67531995" - elseif v == "Gold" then materialToImageMap[v].Regular = "http://www.mete0r.xyz/asset/?id=67532118" - elseif v == "Plastic (red)" then materialToImageMap[v].Regular = "http://www.mete0r.xyz/asset/?id=67531848" - elseif v == "Plastic (blue)" then materialToImageMap[v].Regular = "http://www.mete0r.xyz/asset/?id=67531924" - elseif v == "Plank" then materialToImageMap[v].Regular = "http://www.mete0r.xyz/asset/?id=67532015" - elseif v == "Log" then materialToImageMap[v].Regular = "http://www.mete0r.xyz/asset/?id=67532051" - elseif v == "Gravel" then materialToImageMap[v].Regular = "http://www.mete0r.xyz/asset/?id=67532206" - elseif v == "Cinder Block" then materialToImageMap[v].Regular = "http://www.mete0r.xyz/asset/?id=67532103" - elseif v == "Stone Wall" then materialToImageMap[v].Regular = "http://www.mete0r.xyz/asset/?id=67531804" - elseif v == "Concrete" then materialToImageMap[v].Regular = "http://www.mete0r.xyz/asset/?id=67532059" - elseif v == "Water" then materialToImageMap[v].Regular = "http://www.mete0r.xyz/asset/?id=81407474" - else materialToImageMap[v].Regular = "http://www.mete0r.xyz/asset/?id=66887593" -- fill in the rest here!! - end - end - - local scrollFrame, scrollUp, scrollDown, recalculateScroll = t.CreateScrollingFrame(nil,"grid") - scrollFrame.Size = UDim2.new(0.85,0,1,0) - scrollFrame.Position = UDim2.new(0,0,0,0) - scrollFrame.Parent = frame - - scrollUp.Parent = frame - scrollUp.Visible = true - scrollUp.Position = UDim2.new(1,-19,0,0) - - scrollDown.Parent = frame - scrollDown.Visible = true - scrollDown.Position = UDim2.new(1,-19,1,-17) - - local function goToNewMaterial(buttonWrap, materialName) - updateMaterialChoice(materialName) - buttonWrap.BackgroundTransparency = 0 - selectedButton.BackgroundTransparency = 1 - selectedButton = buttonWrap - end - - local function createMaterialButton(name) - local buttonWrap = Instance.new("TextButton") - buttonWrap.Text = "" - buttonWrap.Size = UDim2.new(0,32,0,32) - buttonWrap.BackgroundColor3 = Color3.new(1,1,1) - buttonWrap.BorderSizePixel = 0 - buttonWrap.BackgroundTransparency = 1 - buttonWrap.AutoButtonColor = false - buttonWrap.Name = tostring(name) - - local imageButton = Instance.new("ImageButton") - imageButton.AutoButtonColor = false - imageButton.BackgroundTransparency = 1 - imageButton.Size = UDim2.new(0,30,0,30) - imageButton.Position = UDim2.new(0,1,0,1) - imageButton.Name = tostring(name) - imageButton.Parent = buttonWrap - imageButton.Image = materialToImageMap[name].Regular - - local enumType = Instance.new("NumberValue") - enumType.Name = "EnumType" - enumType.Parent = buttonWrap - enumType.Value = 0 - - imageButton.MouseEnter:connect(function() - buttonWrap.BackgroundTransparency = 0 - end) - imageButton.MouseLeave:connect(function() - if selectedButton ~= buttonWrap then - buttonWrap.BackgroundTransparency = 1 - end - end) - imageButton.MouseButton1Click:connect(function() - if selectedButton ~= buttonWrap then - goToNewMaterial(buttonWrap, tostring(name)) - end - end) - - return buttonWrap - end - - for i = 1, #materialNames do - local imageButton = createMaterialButton(materialNames[i]) - - if materialNames[i] == "Grass" then -- always start with grass as the default - selectedButton = imageButton - imageButton.BackgroundTransparency = 0 - end - - imageButton.Parent = scrollFrame - end - - local forceTerrainMaterialSelection = function(newMaterialType) - if not newMaterialType then return end - if currentMaterial == newMaterialType then return end - - local matName = getNameFromEnum(newMaterialType) - local buttons = scrollFrame:GetChildren() - for i = 1, #buttons do - if buttons[i].Name == "Plastic (blue)" and matName == "Plastic (blue)" then goToNewMaterial(buttons[i],matName) return end - if buttons[i].Name == "Plastic (red)" and matName == "Plastic (red)" then goToNewMaterial(buttons[i],matName) return end - if string.find(buttons[i].Name, matName) then - goToNewMaterial(buttons[i],matName) - return - end - end - end - - frame.Changed:connect(function ( prop ) - if prop == "AbsoluteSize" then - recalculateScroll() - end - end) - - recalculateScroll() - return frame, terrainMaterialSelectionChanged, forceTerrainMaterialSelection -end - -t.CreateLoadingFrame = function(name,size,position) - game:GetService("ContentProvider"):Preload("http://www.mete0r.xyz/asset/?id=35238053") - - local loadingFrame = Instance.new("Frame") - loadingFrame.Name = "LoadingFrame" - loadingFrame.Style = Enum.FrameStyle.RobloxRound - - if size then loadingFrame.Size = size - else loadingFrame.Size = UDim2.new(0,300,0,160) end - if position then loadingFrame.Position = position - else loadingFrame.Position = UDim2.new(0.5, -150, 0.5,-80) end - - local loadingBar = Instance.new("Frame") - loadingBar.Name = "LoadingBar" - loadingBar.BackgroundColor3 = Color3.new(0,0,0) - loadingBar.BorderColor3 = Color3.new(79/255,79/255,79/255) - loadingBar.Position = UDim2.new(0,0,0,41) - loadingBar.Size = UDim2.new(1,0,0,30) - loadingBar.Parent = loadingFrame - - local loadingGreenBar = Instance.new("ImageLabel") - loadingGreenBar.Name = "LoadingGreenBar" - loadingGreenBar.Image = "http://www.mete0r.xyz/asset/?id=35238053" - loadingGreenBar.Position = UDim2.new(0,0,0,0) - loadingGreenBar.Size = UDim2.new(0,0,1,0) - loadingGreenBar.Visible = false - loadingGreenBar.Parent = loadingBar - - local loadingPercent = Instance.new("TextLabel") - loadingPercent.Name = "LoadingPercent" - loadingPercent.BackgroundTransparency = 1 - loadingPercent.Position = UDim2.new(0,0,1,0) - loadingPercent.Size = UDim2.new(1,0,0,14) - loadingPercent.Font = Enum.Font.Arial - loadingPercent.Text = "0%" - loadingPercent.FontSize = Enum.FontSize.Size14 - loadingPercent.TextColor3 = Color3.new(1,1,1) - loadingPercent.Parent = loadingBar - - local cancelButton = Instance.new("TextButton") - cancelButton.Name = "CancelButton" - cancelButton.Position = UDim2.new(0.5,-60,1,-40) - cancelButton.Size = UDim2.new(0,120,0,40) - cancelButton.Font = Enum.Font.Arial - cancelButton.FontSize = Enum.FontSize.Size18 - cancelButton.TextColor3 = Color3.new(1,1,1) - cancelButton.Text = "Cancel" - cancelButton.Style = Enum.ButtonStyle.RobloxButton - cancelButton.Parent = loadingFrame - - local loadingName = Instance.new("TextLabel") - loadingName.Name = "loadingName" - loadingName.BackgroundTransparency = 1 - loadingName.Size = UDim2.new(1,0,0,18) - loadingName.Position = UDim2.new(0,0,0,2) - loadingName.Font = Enum.Font.Arial - loadingName.Text = name - loadingName.TextColor3 = Color3.new(1,1,1) - loadingName.TextStrokeTransparency = 1 - loadingName.FontSize = Enum.FontSize.Size18 - loadingName.Parent = loadingFrame - - local cancelButtonClicked = Instance.new("BindableEvent") - cancelButtonClicked.Name = "CancelButtonClicked" - cancelButtonClicked.Parent = cancelButton - cancelButton.MouseButton1Click:connect(function() - cancelButtonClicked:Fire() - end) - - local updateLoadingGuiPercent = function(percent, tweenAction, tweenLength) - if percent and type(percent) ~= "number" then - error("updateLoadingGuiPercent expects number as argument, got",type(percent),"instead") - end - - local newSize = nil - if percent < 0 then - newSize = UDim2.new(0,0,1,0) - elseif percent > 1 then - newSize = UDim2.new(1,0,1,0) - else - newSize = UDim2.new(percent,0,1,0) - end - - if tweenAction then - if not tweenLength then - error("updateLoadingGuiPercent is set to tween new percentage, but got no tween time length! Please pass this in as third argument") - end - - if (newSize.X.Scale > 0) then - loadingGreenBar.Visible = true - loadingGreenBar:TweenSize( newSize, - Enum.EasingDirection.Out, - Enum.EasingStyle.Quad, - tweenLength, - true) - else - loadingGreenBar:TweenSize( newSize, - Enum.EasingDirection.Out, - Enum.EasingStyle.Quad, - tweenLength, - true, - function() - if (newSize.X.Scale < 0) then - loadingGreenBar.Visible = false - end - end) - end - - else - loadingGreenBar.Size = newSize - loadingGreenBar.Visible = (newSize.X.Scale > 0) - end - end - - loadingGreenBar.Changed:connect(function(prop) - if prop == "Size" then - loadingPercent.Text = tostring( math.ceil(loadingGreenBar.Size.X.Scale * 100) ) .. "%" - end - end) - - return loadingFrame, updateLoadingGuiPercent, cancelButtonClicked -end - -t.CreatePluginFrame = function (name,size,position,scrollable,parent) - function createMenuButton(size,position,text,fontsize,name,parent) - local button = Instance.new("TextButton",parent) - button.AutoButtonColor = false - button.Name = name - button.BackgroundTransparency = 1 - button.Position = position - button.Size = size - button.Font = Enum.Font.ArialBold - button.FontSize = fontsize - button.Text = text - button.TextColor3 = Color3.new(1,1,1) - button.BorderSizePixel = 0 - button.BackgroundColor3 = Color3.new(20/255,20/255,20/255) - - button.MouseEnter:connect(function ( ) - if button.Selected then return end - button.BackgroundTransparency = 0 - end) - button.MouseLeave:connect(function ( ) - if button.Selected then return end - button.BackgroundTransparency = 1 - end) - - return button - - end - - local dragBar = Instance.new("Frame",parent) - dragBar.Name = tostring(name) .. "DragBar" - dragBar.BackgroundColor3 = Color3.new(39/255,39/255,39/255) - dragBar.BorderColor3 = Color3.new(0,0,0) - if size then - dragBar.Size = UDim2.new(size.X.Scale,size.X.Offset,0,20) + UDim2.new(0,20,0,0) - else - dragBar.Size = UDim2.new(0,183,0,20) - end - if position then - dragBar.Position = position - end - dragBar.Active = true - dragBar.Draggable = true - --dragBar.Visible = false - dragBar.MouseEnter:connect(function ( ) - dragBar.BackgroundColor3 = Color3.new(49/255,49/255,49/255) - end) - dragBar.MouseLeave:connect(function ( ) - dragBar.BackgroundColor3 = Color3.new(39/255,39/255,39/255) - end) - - -- plugin name label - local pluginNameLabel = Instance.new("TextLabel",dragBar) - pluginNameLabel.Name = "BarNameLabel" - pluginNameLabel.Text = " " .. tostring(name) - pluginNameLabel.TextColor3 = Color3.new(1,1,1) - pluginNameLabel.TextStrokeTransparency = 0 - pluginNameLabel.Size = UDim2.new(1,0,1,0) - pluginNameLabel.Font = Enum.Font.ArialBold - pluginNameLabel.FontSize = Enum.FontSize.Size18 - pluginNameLabel.TextXAlignment = Enum.TextXAlignment.Left - pluginNameLabel.BackgroundTransparency = 1 - - -- close button - local closeButton = createMenuButton(UDim2.new(0,15,0,17),UDim2.new(1,-16,0.5,-8),"X",Enum.FontSize.Size14,"CloseButton",dragBar) - local closeEvent = Instance.new("BindableEvent") - closeEvent.Name = "CloseEvent" - closeEvent.Parent = closeButton - closeButton.MouseButton1Click:connect(function () - closeEvent:Fire() - closeButton.BackgroundTransparency = 1 - end) - - -- help button - local helpButton = createMenuButton(UDim2.new(0,15,0,17),UDim2.new(1,-51,0.5,-8),"?",Enum.FontSize.Size14,"HelpButton",dragBar) - local helpFrame = Instance.new("Frame",dragBar) - helpFrame.Name = "HelpFrame" - helpFrame.BackgroundColor3 = Color3.new(0,0,0) - helpFrame.Size = UDim2.new(0,300,0,552) - helpFrame.Position = UDim2.new(1,5,0,0) - helpFrame.Active = true - helpFrame.BorderSizePixel = 0 - helpFrame.Visible = false - - helpButton.MouseButton1Click:connect(function( ) - helpFrame.Visible = not helpFrame.Visible - if helpFrame.Visible then - helpButton.Selected = true - helpButton.BackgroundTransparency = 0 - local screenGui = getScreenGuiAncestor(helpFrame) - if screenGui then - if helpFrame.AbsolutePosition.X + helpFrame.AbsoluteSize.X > screenGui.AbsoluteSize.X then --position on left hand side - helpFrame.Position = UDim2.new(0,-5 - helpFrame.AbsoluteSize.X,0,0) - else -- position on right hand side - helpFrame.Position = UDim2.new(1,5,0,0) - end - else - helpFrame.Position = UDim2.new(1,5,0,0) - end - else - helpButton.Selected = false - helpButton.BackgroundTransparency = 1 - end - end) - - local minimizeButton = createMenuButton(UDim2.new(0,16,0,17),UDim2.new(1,-34,0.5,-8),"-",Enum.FontSize.Size14,"MinimizeButton",dragBar) - minimizeButton.TextYAlignment = Enum.TextYAlignment.Top - - local minimizeFrame = Instance.new("Frame",dragBar) - minimizeFrame.Name = "MinimizeFrame" - minimizeFrame.BackgroundColor3 = Color3.new(73/255,73/255,73/255) - minimizeFrame.BorderColor3 = Color3.new(0,0,0) - minimizeFrame.Position = UDim2.new(0,0,1,0) - if size then - minimizeFrame.Size = UDim2.new(size.X.Scale,size.X.Offset,0,50) + UDim2.new(0,20,0,0) - else - minimizeFrame.Size = UDim2.new(0,183,0,50) - end - minimizeFrame.Visible = false - - local minimizeBigButton = Instance.new("TextButton",minimizeFrame) - minimizeBigButton.Position = UDim2.new(0.5,-50,0.5,-20) - minimizeBigButton.Name = "MinimizeButton" - minimizeBigButton.Size = UDim2.new(0,100,0,40) - minimizeBigButton.Style = Enum.ButtonStyle.RobloxButton - minimizeBigButton.Font = Enum.Font.ArialBold - minimizeBigButton.FontSize = Enum.FontSize.Size18 - minimizeBigButton.TextColor3 = Color3.new(1,1,1) - minimizeBigButton.Text = "Show" - - local separatingLine = Instance.new("Frame",dragBar) - separatingLine.Name = "SeparatingLine" - separatingLine.BackgroundColor3 = Color3.new(115/255,115/255,115/255) - separatingLine.BorderSizePixel = 0 - separatingLine.Position = UDim2.new(1,-18,0.5,-7) - separatingLine.Size = UDim2.new(0,1,0,14) - - local otherSeparatingLine = separatingLine:clone() - otherSeparatingLine.Position = UDim2.new(1,-35,0.5,-7) - otherSeparatingLine.Parent = dragBar - - local widgetContainer = Instance.new("Frame",dragBar) - widgetContainer.Name = "WidgetContainer" - widgetContainer.BackgroundTransparency = 1 - widgetContainer.Position = UDim2.new(0,0,1,0) - widgetContainer.BorderColor3 = Color3.new(0,0,0) - if not scrollable then - widgetContainer.BackgroundTransparency = 0 - widgetContainer.BackgroundColor3 = Color3.new(72/255,72/255,72/255) - end - - if size then - if scrollable then - widgetContainer.Size = size - else - widgetContainer.Size = UDim2.new(0,dragBar.AbsoluteSize.X,size.Y.Scale,size.Y.Offset) - end - else - if scrollable then - widgetContainer.Size = UDim2.new(0,163,0,400) - else - widgetContainer.Size = UDim2.new(0,dragBar.AbsoluteSize.X,0,400) - end - end - if position then - widgetContainer.Position = position + UDim2.new(0,0,0,20) - end - - local frame,control,verticalDragger = nil - if scrollable then - --frame for widgets - frame,control = t.CreateTrueScrollingFrame() - frame.Size = UDim2.new(1, 0, 1, 0) - frame.BackgroundColor3 = Color3.new(72/255,72/255,72/255) - frame.BorderColor3 = Color3.new(0,0,0) - frame.Active = true - frame.Parent = widgetContainer - control.Parent = dragBar - control.BackgroundColor3 = Color3.new(72/255,72/255,72/255) - control.BorderSizePixel = 0 - control.BackgroundTransparency = 0 - control.Position = UDim2.new(1,-21,1,1) - if size then - control.Size = UDim2.new(0,21,size.Y.Scale,size.Y.Offset) - else - control.Size = UDim2.new(0,21,0,400) - end - control:FindFirstChild("ScrollDownButton").Position = UDim2.new(0,0,1,-20) - - local fakeLine = Instance.new("Frame",control) - fakeLine.Name = "FakeLine" - fakeLine.BorderSizePixel = 0 - fakeLine.BackgroundColor3 = Color3.new(0,0,0) - fakeLine.Size = UDim2.new(0,1,1,1) - fakeLine.Position = UDim2.new(1,0,0,0) - - verticalDragger = Instance.new("TextButton",widgetContainer) - verticalDragger.ZIndex = 2 - verticalDragger.AutoButtonColor = false - verticalDragger.Name = "VerticalDragger" - verticalDragger.BackgroundColor3 = Color3.new(50/255,50/255,50/255) - verticalDragger.BorderColor3 = Color3.new(0,0,0) - verticalDragger.Size = UDim2.new(1,20,0,20) - verticalDragger.Position = UDim2.new(0,0,1,0) - verticalDragger.Active = true - verticalDragger.Text = "" - - local scrubFrame = Instance.new("Frame",verticalDragger) - scrubFrame.Name = "ScrubFrame" - scrubFrame.BackgroundColor3 = Color3.new(1,1,1) - scrubFrame.BorderSizePixel = 0 - scrubFrame.Position = UDim2.new(0.5,-5,0.5,0) - scrubFrame.Size = UDim2.new(0,10,0,1) - scrubFrame.ZIndex = 5 - local scrubTwo = scrubFrame:clone() - scrubTwo.Position = UDim2.new(0.5,-5,0.5,-2) - scrubTwo.Parent = verticalDragger - local scrubThree = scrubFrame:clone() - scrubThree.Position = UDim2.new(0.5,-5,0.5,2) - scrubThree.Parent = verticalDragger - - local areaSoak = Instance.new("TextButton",getScreenGuiAncestor(parent)) - areaSoak.Name = "AreaSoak" - areaSoak.Size = UDim2.new(1,0,1,0) - areaSoak.BackgroundTransparency = 1 - areaSoak.BorderSizePixel = 0 - areaSoak.Text = "" - areaSoak.ZIndex = 10 - areaSoak.Visible = false - areaSoak.Active = true - - local draggingVertical = false - local startYPos = nil - verticalDragger.MouseEnter:connect(function () - verticalDragger.BackgroundColor3 = Color3.new(60/255,60/255,60/255) - end) - verticalDragger.MouseLeave:connect(function () - verticalDragger.BackgroundColor3 = Color3.new(50/255,50/255,50/255) - end) - verticalDragger.MouseButton1Down:connect(function(x,y) - draggingVertical = true - areaSoak.Visible = true - startYPos = y - end) - areaSoak.MouseButton1Up:connect(function ( ) - draggingVertical = false - areaSoak.Visible = false - end) - areaSoak.MouseMoved:connect(function(x,y) - if not draggingVertical then return end - - local yDelta = y - startYPos - if not control.ScrollDownButton.Visible and yDelta > 0 then - return - end - - if (widgetContainer.Size.Y.Offset + yDelta) < 150 then - widgetContainer.Size = UDim2.new(widgetContainer.Size.X.Scale, widgetContainer.Size.X.Offset,widgetContainer.Size.Y.Scale,150) - control.Size = UDim2.new (0,21,0,150) - return - end - - startYPos = y - - if widgetContainer.Size.Y.Offset + yDelta >= 0 then - widgetContainer.Size = UDim2.new(widgetContainer.Size.X.Scale, widgetContainer.Size.X.Offset,widgetContainer.Size.Y.Scale,widgetContainer.Size.Y.Offset + yDelta) - control.Size = UDim2.new(0,21,0,control.Size.Y.Offset + yDelta ) - end - end) - end - - local function switchMinimize() - minimizeFrame.Visible = not minimizeFrame.Visible - if scrollable then - frame.Visible = not frame.Visible - verticalDragger.Visible = not verticalDragger.Visible - control.Visible = not control.Visible - else - widgetContainer.Visible = not widgetContainer.Visible - end - - if minimizeFrame.Visible then - minimizeButton.Text = "+" - else - minimizeButton.Text = "-" - end - end - - minimizeBigButton.MouseButton1Click:connect(function ( ) - switchMinimize() - end) - - minimizeButton.MouseButton1Click:connect(function( ) - switchMinimize() - end) - - if scrollable then - return dragBar, frame, helpFrame, closeEvent - else - return dragBar, widgetContainer, helpFrame, closeEvent - end -end - -t.Help = - function(funcNameOrFunc) - --input argument can be a string or a function. Should return a description (of arguments and expected side effects) - if funcNameOrFunc == "CreatePropertyDropDownMenu" or funcNameOrFunc == t.CreatePropertyDropDownMenu then - return "Function CreatePropertyDropDownMenu. " .. - "Arguments: (instance, propertyName, enumType). " .. - "Side effect: returns a container with a drop-down-box that is linked to the 'property' field of 'instance' which is of type 'enumType'" - end - if funcNameOrFunc == "CreateDropDownMenu" or funcNameOrFunc == t.CreateDropDownMenu then - return "Function CreateDropDownMenu. " .. - "Arguments: (items, onItemSelected). " .. - "Side effect: Returns 2 results, a container to the gui object and a 'updateSelection' function for external updating. The container is a drop-down-box created around a list of items" - end - if funcNameOrFunc == "CreateMessageDialog" or funcNameOrFunc == t.CreateMessageDialog then - return "Function CreateMessageDialog. " .. - "Arguments: (title, message, buttons). " .. - "Side effect: Returns a gui object of a message box with 'title' and 'message' as passed in. 'buttons' input is an array of Tables contains a 'Text' and 'Function' field for the text/callback of each button" - end - if funcNameOrFunc == "CreateStyledMessageDialog" or funcNameOrFunc == t.CreateStyledMessageDialog then - return "Function CreateStyledMessageDialog. " .. - "Arguments: (title, message, style, buttons). " .. - "Side effect: Returns a gui object of a message box with 'title' and 'message' as passed in. 'buttons' input is an array of Tables contains a 'Text' and 'Function' field for the text/callback of each button, 'style' is a string, either Error, Notify or Confirm" - end - if funcNameOrFunc == "GetFontHeight" or funcNameOrFunc == t.GetFontHeight then - return "Function GetFontHeight. " .. - "Arguments: (font, fontSize). " .. - "Side effect: returns the size in pixels of the given font + fontSize" - end - if funcNameOrFunc == "LayoutGuiObjects" or funcNameOrFunc == t.LayoutGuiObjects then - - end - if funcNameOrFunc == "CreateScrollingFrame" or funcNameOrFunc == t.CreateScrollingFrame then - return "Function CreateScrollingFrame. " .. - "Arguments: (orderList, style) " .. - "Side effect: returns 4 objects, (scrollFrame, scrollUpButton, scrollDownButton, recalculateFunction). 'scrollFrame' can be filled with GuiObjects. It will lay them out and allow scrollUpButton/scrollDownButton to interact with them. Orderlist is optional (and specifies the order to layout the children. Without orderlist, it uses the children order. style is also optional, and allows for a 'grid' styling if style is passed 'grid' as a string. recalculateFunction can be called when a relayout is needed (when orderList changes)" - end - if funcNameOrFunc == "CreateTrueScrollingFrame" or funcNameOrFunc == t.CreateTrueScrollingFrame then - return "Function CreateTrueScrollingFrame. " .. - "Arguments: (nil) " .. - "Side effect: returns 2 objects, (scrollFrame, controlFrame). 'scrollFrame' can be filled with GuiObjects, and they will be clipped if not inside the frame's bounds. controlFrame has children scrollup and scrolldown, as well as a slider. controlFrame can be parented to any guiobject and it will readjust itself to fit." - end - if funcNameOrFunc == "AutoTruncateTextObject" or funcNameOrFunc == t.AutoTruncateTextObject then - return "Function AutoTruncateTextObject. " .. - "Arguments: (textLabel) " .. - "Side effect: returns 2 objects, (textLabel, changeText). The 'textLabel' input is modified to automatically truncate text (with ellipsis), if it gets too small to fit. 'changeText' is a function that can be used to change the text, it takes 1 string as an argument" - end - if funcNameOrFunc == "CreateSlider" or funcNameOrFunc == t.CreateSlider then - return "Function CreateSlider. " .. - "Arguments: (steps, width, position) " .. - "Side effect: returns 2 objects, (sliderGui, sliderPosition). The 'steps' argument specifies how many different positions the slider can hold along the bar. 'width' specifies in pixels how wide the bar should be (modifiable afterwards if desired). 'position' argument should be a UDim2 for slider positioning. 'sliderPosition' is an IntValue whose current .Value specifies the specific step the slider is currently on." - end - if funcNameOrFunc == "CreateSliderNew" or funcNameOrFunc == t.CreateSliderNew then - return "Function CreateSliderNew. " .. - "Arguments: (steps, width, position) " .. - "Side effect: returns 2 objects, (sliderGui, sliderPosition). The 'steps' argument specifies how many different positions the slider can hold along the bar. 'width' specifies in pixels how wide the bar should be (modifiable afterwards if desired). 'position' argument should be a UDim2 for slider positioning. 'sliderPosition' is an IntValue whose current .Value specifies the specific step the slider is currently on." - end - if funcNameOrFunc == "CreateLoadingFrame" or funcNameOrFunc == t.CreateLoadingFrame then - return "Function CreateLoadingFrame. " .. - "Arguments: (name, size, position) " .. - "Side effect: Creates a gui that can be manipulated to show progress for a particular action. Name appears above the loading bar, and size and position are udim2 values (both size and position are optional arguments). Returns 3 arguments, the first being the gui created. The second being updateLoadingGuiPercent, which is a bindable function. This function takes one argument (two optionally), which should be a number between 0 and 1, representing the percentage the loading gui should be at. The second argument to this function is a boolean value that if set to true will tween the current percentage value to the new percentage value, therefore our third argument is how long this tween should take. Our third returned argument is a BindableEvent, that when fired means that someone clicked the cancel button on the dialog." - end - if funcNameOrFunc == "CreateTerrainMaterialSelector" or funcNameOrFunc == t.CreateTerrainMaterialSelector then - return "Function CreateTerrainMaterialSelector. " .. - "Arguments: (size, position) " .. - "Side effect: Size and position are UDim2 values that specifies the selector's size and position. Both size and position are optional arguments. This method returns 3 objects (terrainSelectorGui, terrainSelected, forceTerrainSelection). terrainSelectorGui is just the gui object that we generate with this function, parent it as you like. TerrainSelected is a BindableEvent that is fired whenever a new terrain type is selected in the gui. ForceTerrainSelection is a function that takes an argument of Enum.CellMaterial and will force the gui to show that material as currently selected." - end - end - -return t diff --git a/assets/ugc/875 b/assets/ugc/875 deleted file mode 100644 index f009b25..0000000 --- a/assets/ugc/875 +++ /dev/null @@ -1,24 +0,0 @@ ---rbxassetid%875% -local t = {} - -t.Foo = - function() - print("foo") - end - -t.Bar = - function() - print("bar") - end - -t.Help = - function(funcNameOrFunc) - --input argument can be a string or a function. Should return a description (of arguments and expected side effects) - if funcNameOrFunc == "Foo" or funcNameOrFunc == t.Foo then - return "Function Foo. Arguments: None. Side effect: prints foo" - elseif funcNameOrFunc == "Bar" or funcNameOrFunc == t.Bar then - return "Function Bar. Arguments: None. Side effect: prints bar" - end - end - -return t \ No newline at end of file diff --git a/assets/ugc/876 b/assets/ugc/876 deleted file mode 100644 index df73023..0000000 --- a/assets/ugc/876 +++ /dev/null @@ -1,1116 +0,0 @@ ---rbxassetid%876% -local t = {} - - - ------------------------------------------------------------------------------------------------------------------------- ------------------------------------------------------------------------------------------------------------------------- ------------------------------------------------------------------------------------------------------------------------- -------------------------------------------------JSON Functions Begin---------------------------------------------------- ------------------------------------------------------------------------------------------------------------------------- ------------------------------------------------------------------------------------------------------------------------- ------------------------------------------------------------------------------------------------------------------------- - - --JSON Encoder and Parser for Lua 5.1 - -- - --Copyright 2007 Shaun Brown (http://www.chipmunkav.com) - --All Rights Reserved. - - --Permission is hereby granted, free of charge, to any person - --obtaining a copy of this software to deal in the Software without - --restriction, including without limitation the rights to use, - --copy, modify, merge, publish, distribute, sublicense, and/or - --sell copies of the Software, and to permit persons to whom the - --Software is furnished to do so, subject to the following conditions: - - --The above copyright notice and this permission notice shall be - --included in all copies or substantial portions of the Software. - --If you find this software useful please give www.chipmunkav.com a mention. - - --THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, - --EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES - --OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. - --IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR - --ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF - --CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN - --CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. - -local string = string -local math = math -local table = table -local error = error -local tonumber = tonumber -local tostring = tostring -local type = type -local setmetatable = setmetatable -local pairs = pairs -local ipairs = ipairs -local assert = assert -local Chipmunk = Chipmunk - - -local StringBuilder = { - buffer = {} -} - -function StringBuilder:New() - local o = {} - setmetatable(o, self) - self.__index = self - o.buffer = {} - return o -end - -function StringBuilder:Append(s) - self.buffer[#self.buffer+1] = s -end - -function StringBuilder:ToString() - return table.concat(self.buffer) -end - -local JsonWriter = { - backslashes = { - ['\b'] = "\\b", - ['\t'] = "\\t", - ['\n'] = "\\n", - ['\f'] = "\\f", - ['\r'] = "\\r", - ['"'] = "\\\"", - ['\\'] = "\\\\", - ['/'] = "\\/" - } -} - -function JsonWriter:New() - local o = {} - o.writer = StringBuilder:New() - setmetatable(o, self) - self.__index = self - return o -end - -function JsonWriter:Append(s) - self.writer:Append(s) -end - -function JsonWriter:ToString() - return self.writer:ToString() -end - -function JsonWriter:Write(o) - local t = type(o) - if t == "nil" then - self:WriteNil() - elseif t == "boolean" then - self:WriteString(o) - elseif t == "number" then - self:WriteString(o) - elseif t == "string" then - self:ParseString(o) - elseif t == "table" then - self:WriteTable(o) - elseif t == "function" then - self:WriteFunction(o) - elseif t == "thread" then - self:WriteError(o) - elseif t == "userdata" then - self:WriteError(o) - end -end - -function JsonWriter:WriteNil() - self:Append("null") -end - -function JsonWriter:WriteString(o) - self:Append(tostring(o)) -end - -function JsonWriter:ParseString(s) - self:Append('"') - self:Append(string.gsub(s, "[%z%c\\\"/]", function(n) - local c = self.backslashes[n] - if c then return c end - return string.format("\\u%.4X", string.byte(n)) - end)) - self:Append('"') -end - -function JsonWriter:IsArray(t) - local count = 0 - local isindex = function(k) - if type(k) == "number" and k > 0 then - if math.floor(k) == k then - return true - end - end - return false - end - for k,v in pairs(t) do - if not isindex(k) then - return false, '{', '}' - else - count = math.max(count, k) - end - end - return true, '[', ']', count -end - -function JsonWriter:WriteTable(t) - local ba, st, et, n = self:IsArray(t) - self:Append(st) - if ba then - for i = 1, n do - self:Write(t[i]) - if i < n then - self:Append(',') - end - end - else - local first = true; - for k, v in pairs(t) do - if not first then - self:Append(',') - end - first = false; - self:ParseString(k) - self:Append(':') - self:Write(v) - end - end - self:Append(et) -end - -function JsonWriter:WriteError(o) - error(string.format( - "Encoding of %s unsupported", - tostring(o))) -end - -function JsonWriter:WriteFunction(o) - if o == Null then - self:WriteNil() - else - self:WriteError(o) - end -end - -local StringReader = { - s = "", - i = 0 -} - -function StringReader:New(s) - local o = {} - setmetatable(o, self) - self.__index = self - o.s = s or o.s - return o -end - -function StringReader:Peek() - local i = self.i + 1 - if i <= #self.s then - return string.sub(self.s, i, i) - end - return nil -end - -function StringReader:Next() - self.i = self.i+1 - if self.i <= #self.s then - return string.sub(self.s, self.i, self.i) - end - return nil -end - -function StringReader:All() - return self.s -end - -local JsonReader = { - escapes = { - ['t'] = '\t', - ['n'] = '\n', - ['f'] = '\f', - ['r'] = '\r', - ['b'] = '\b', - } -} - -function JsonReader:New(s) - local o = {} - o.reader = StringReader:New(s) - setmetatable(o, self) - self.__index = self - return o; -end - -function JsonReader:Read() - self:SkipWhiteSpace() - local peek = self:Peek() - if peek == nil then - error(string.format( - "Nil string: '%s'", - self:All())) - elseif peek == '{' then - return self:ReadObject() - elseif peek == '[' then - return self:ReadArray() - elseif peek == '"' then - return self:ReadString() - elseif string.find(peek, "[%+%-%d]") then - return self:ReadNumber() - elseif peek == 't' then - return self:ReadTrue() - elseif peek == 'f' then - return self:ReadFalse() - elseif peek == 'n' then - return self:ReadNull() - elseif peek == '/' then - self:ReadComment() - return self:Read() - else - return nil - end -end - -function JsonReader:ReadTrue() - self:TestReservedWord{'t','r','u','e'} - return true -end - -function JsonReader:ReadFalse() - self:TestReservedWord{'f','a','l','s','e'} - return false -end - -function JsonReader:ReadNull() - self:TestReservedWord{'n','u','l','l'} - return nil -end - -function JsonReader:TestReservedWord(t) - for i, v in ipairs(t) do - if self:Next() ~= v then - error(string.format( - "Error reading '%s': %s", - table.concat(t), - self:All())) - end - end -end - -function JsonReader:ReadNumber() - local result = self:Next() - local peek = self:Peek() - while peek ~= nil and string.find( - peek, - "[%+%-%d%.eE]") do - result = result .. self:Next() - peek = self:Peek() - end - result = tonumber(result) - if result == nil then - error(string.format( - "Invalid number: '%s'", - result)) - else - return result - end -end - -function JsonReader:ReadString() - local result = "" - assert(self:Next() == '"') - while self:Peek() ~= '"' do - local ch = self:Next() - if ch == '\\' then - ch = self:Next() - if self.escapes[ch] then - ch = self.escapes[ch] - end - end - result = result .. ch - end - assert(self:Next() == '"') - local fromunicode = function(m) - return string.char(tonumber(m, 16)) - end - return string.gsub( - result, - "u%x%x(%x%x)", - fromunicode) -end - -function JsonReader:ReadComment() - assert(self:Next() == '/') - local second = self:Next() - if second == '/' then - self:ReadSingleLineComment() - elseif second == '*' then - self:ReadBlockComment() - else - error(string.format( - "Invalid comment: %s", - self:All())) - end -end - -function JsonReader:ReadBlockComment() - local done = false - while not done do - local ch = self:Next() - if ch == '*' and self:Peek() == '/' then - done = true - end - if not done and - ch == '/' and - self:Peek() == "*" then - error(string.format( - "Invalid comment: %s, '/*' illegal.", - self:All())) - end - end - self:Next() -end - -function JsonReader:ReadSingleLineComment() - local ch = self:Next() - while ch ~= '\r' and ch ~= '\n' do - ch = self:Next() - end -end - -function JsonReader:ReadArray() - local result = {} - assert(self:Next() == '[') - local done = false - if self:Peek() == ']' then - done = true; - end - while not done do - local item = self:Read() - result[#result+1] = item - self:SkipWhiteSpace() - if self:Peek() == ']' then - done = true - end - if not done then - local ch = self:Next() - if ch ~= ',' then - error(string.format( - "Invalid array: '%s' due to: '%s'", - self:All(), ch)) - end - end - end - assert(']' == self:Next()) - return result -end - -function JsonReader:ReadObject() - local result = {} - assert(self:Next() == '{') - local done = false - if self:Peek() == '}' then - done = true - end - while not done do - local key = self:Read() - if type(key) ~= "string" then - error(string.format( - "Invalid non-string object key: %s", - key)) - end - self:SkipWhiteSpace() - local ch = self:Next() - if ch ~= ':' then - error(string.format( - "Invalid object: '%s' due to: '%s'", - self:All(), - ch)) - end - self:SkipWhiteSpace() - local val = self:Read() - result[key] = val - self:SkipWhiteSpace() - if self:Peek() == '}' then - done = true - end - if not done then - ch = self:Next() - if ch ~= ',' then - error(string.format( - "Invalid array: '%s' near: '%s'", - self:All(), - ch)) - end - end - end - assert(self:Next() == "}") - return result -end - -function JsonReader:SkipWhiteSpace() - local p = self:Peek() - while p ~= nil and string.find(p, "[%s/]") do - if p == '/' then - self:ReadComment() - else - self:Next() - end - p = self:Peek() - end -end - -function JsonReader:Peek() - return self.reader:Peek() -end - -function JsonReader:Next() - return self.reader:Next() -end - -function JsonReader:All() - return self.reader:All() -end - -function Encode(o) - local writer = JsonWriter:New() - writer:Write(o) - return writer:ToString() -end - -function Decode(s) - local reader = JsonReader:New(s) - return reader:Read() -end - -function Null() - return Null -end --------------------- End JSON Parser ------------------------ - - -t.DecodeJSON = function(jsonString) - if type(jsonString) == "string" then - return Decode(jsonString) - end - print("RbxUtil.DecodeJSON expects string argument!") - return nil -end - -t.EncodeJSON = function(jsonTable) - return Encode(jsonTable) -end - - - - - - - - ------------------------------------------------------------------------------------------------------------------------- ------------------------------------------------------------------------------------------------------------------------- ------------------------------------------------------------------------------------------------------------------------- ---------------------------------------------Terrain Utilities Begin----------------------------------------------------- ------------------------------------------------------------------------------------------------------------------------- ------------------------------------------------------------------------------------------------------------------------- ------------------------------------------------------------------------------------------------------------------------- ---makes a wedge at location x, y, z ---sets cell x, y, z to default material if parameter is provided, if not sets cell x, y, z to be whatever material it previously w ---returns true if made a wedge, false if the cell remains a block -t.MakeWedge = function(x, y, z, defaultmaterial) - return game:GetService("Terrain"):AutoWedgeCell(x,y,z) -end - -t.SelectTerrainRegion = function(regionToSelect, color, selectEmptyCells, selectionParent) - local terrain = game.Workspace:FindFirstChild("Terrain") - if not terrain then return end - - assert(regionToSelect) - assert(color) - - if not type(regionToSelect) == "Region3" then - error("regionToSelect (first arg), should be of type Region3, but is type",type(regionToSelect)) - end - if not type(color) == "BrickColor" then - error("color (second arg), should be of type BrickColor, but is type",type(color)) - end - - -- frequently used terrain calls (speeds up call, no lookup necessary) - local GetCell = terrain.GetCell - local WorldToCellPreferSolid = terrain.WorldToCellPreferSolid - local CellCenterToWorld = terrain.CellCenterToWorld - local emptyMaterial = Enum.CellMaterial.Empty - - -- container for all adornments, passed back to user - local selectionContainer = Instance.new("Model") - selectionContainer.Name = "SelectionContainer" - selectionContainer.Archivable = false - if selectionParent then - selectionContainer.Parent = selectionParent - else - selectionContainer.Parent = game.Workspace - end - - local updateSelection = nil -- function we return to allow user to update selection - local currentKeepAliveTag = nil -- a tag that determines whether adorns should be destroyed - local aliveCounter = 0 -- helper for currentKeepAliveTag - local lastRegion = nil -- used to stop updates that do nothing - local adornments = {} -- contains all adornments - local reusableAdorns = {} - - local selectionPart = Instance.new("Part") - selectionPart.Name = "SelectionPart" - selectionPart.Transparency = 1 - selectionPart.Anchored = true - selectionPart.Locked = true - selectionPart.CanCollide = false - selectionPart.FormFactor = Enum.FormFactor.Custom - selectionPart.Size = Vector3.new(4.2,4.2,4.2) - - local selectionBox = Instance.new("SelectionBox") - - -- srs translation from region3 to region3int16 - function Region3ToRegion3int16(region3) - local theLowVec = region3.CFrame.p - (region3.Size/2) + Vector3.new(2,2,2) - local lowCell = WorldToCellPreferSolid(terrain,theLowVec) - - local theHighVec = region3.CFrame.p + (region3.Size/2) - Vector3.new(2,2,2) - local highCell = WorldToCellPreferSolid(terrain, theHighVec) - - local highIntVec = Vector3int16.new(highCell.x,highCell.y,highCell.z) - local lowIntVec = Vector3int16.new(lowCell.x,lowCell.y,lowCell.z) - - return Region3int16.new(lowIntVec,highIntVec) - end - - -- helper function that creates the basis for a selection box - function createAdornment(theColor) - local selectionPartClone = nil - local selectionBoxClone = nil - - if #reusableAdorns > 0 then - selectionPartClone = reusableAdorns[1]["part"] - selectionBoxClone = reusableAdorns[1]["box"] - table.remove(reusableAdorns,1) - - selectionBoxClone.Visible = true - else - selectionPartClone = selectionPart:Clone() - selectionPartClone.Archivable = false - - selectionBoxClone = selectionBox:Clone() - selectionBoxClone.Archivable = false - - selectionBoxClone.Adornee = selectionPartClone - selectionBoxClone.Parent = selectionContainer - - selectionBoxClone.Adornee = selectionPartClone - - selectionBoxClone.Parent = selectionContainer - end - - if theColor then - selectionBoxClone.Color = theColor - end - - return selectionPartClone, selectionBoxClone - end - - -- iterates through all current adornments and deletes any that don't have latest tag - function cleanUpAdornments() - for cellPos, adornTable in pairs(adornments) do - - if adornTable.KeepAlive ~= currentKeepAliveTag then -- old news, we should get rid of this - adornTable.SelectionBox.Visible = false - table.insert(reusableAdorns,{part = adornTable.SelectionPart, box = adornTable.SelectionBox}) - adornments[cellPos] = nil - end - end - end - - -- helper function to update tag - function incrementAliveCounter() - aliveCounter = aliveCounter + 1 - if aliveCounter > 1000000 then - aliveCounter = 0 - end - return aliveCounter - end - - -- finds full cells in region and adorns each cell with a box, with the argument color - function adornFullCellsInRegion(region, color) - local regionBegin = region.CFrame.p - (region.Size/2) + Vector3.new(2,2,2) - local regionEnd = region.CFrame.p + (region.Size/2) - Vector3.new(2,2,2) - - local cellPosBegin = WorldToCellPreferSolid(terrain, regionBegin) - local cellPosEnd = WorldToCellPreferSolid(terrain, regionEnd) - - currentKeepAliveTag = incrementAliveCounter() - for y = cellPosBegin.y, cellPosEnd.y do - for z = cellPosBegin.z, cellPosEnd.z do - for x = cellPosBegin.x, cellPosEnd.x do - local cellMaterial = GetCell(terrain, x, y, z) - - if cellMaterial ~= emptyMaterial then - local cframePos = CellCenterToWorld(terrain, x, y, z) - local cellPos = Vector3int16.new(x,y,z) - - local updated = false - for cellPosAdorn, adornTable in pairs(adornments) do - if cellPosAdorn == cellPos then - adornTable.KeepAlive = currentKeepAliveTag - if color then - adornTable.SelectionBox.Color = color - end - updated = true - break - end - end - - if not updated then - local selectionPart, selectionBox = createAdornment(color) - selectionPart.Size = Vector3.new(4,4,4) - selectionPart.CFrame = CFrame.new(cframePos) - local adornTable = {SelectionPart = selectionPart, SelectionBox = selectionBox, KeepAlive = currentKeepAliveTag} - adornments[cellPos] = adornTable - end - end - end - end - end - cleanUpAdornments() - end - - - ------------------------------------- setup code ------------------------------ - lastRegion = regionToSelect - - if selectEmptyCells then -- use one big selection to represent the area selected - local selectionPart, selectionBox = createAdornment(color) - - selectionPart.Size = regionToSelect.Size - selectionPart.CFrame = regionToSelect.CFrame - - adornments.SelectionPart = selectionPart - adornments.SelectionBox = selectionBox - - updateSelection = - function (newRegion, color) - if newRegion and newRegion ~= lastRegion then - lastRegion = newRegion - selectionPart.Size = newRegion.Size - selectionPart.CFrame = newRegion.CFrame - end - if color then - selectionBox.Color = color - end - end - else -- use individual cell adorns to represent the area selected - adornFullCellsInRegion(regionToSelect, color) - updateSelection = - function (newRegion, color) - if newRegion and newRegion ~= lastRegion then - lastRegion = newRegion - adornFullCellsInRegion(newRegion, color) - end - end - - end - - local destroyFunc = function() - updateSelection = nil - if selectionContainer then selectionContainer:Destroy() end - adornments = nil - end - - return updateSelection, destroyFunc -end - ------------------------------Terrain Utilities End----------------------------- - - - - - - - ------------------------------------------------------------------------------------------------------------------------- ------------------------------------------------------------------------------------------------------------------------- ------------------------------------------------------------------------------------------------------------------------- -------------------------------------------------Signal class begin------------------------------------------------------ ------------------------------------------------------------------------------------------------------------------------- ------------------------------------------------------------------------------------------------------------------------- ------------------------------------------------------------------------------------------------------------------------- ---[[ -A 'Signal' object identical to the internal RBXScriptSignal object in it's public API and semantics. This function -can be used to create "custom events" for user-made code. -API: -Method :connect( function handler ) - Arguments: The function to connect to. - Returns: A new connection object which can be used to disconnect the connection - Description: Connects this signal to the function specified by |handler|. That is, when |fire( ... )| is called for - the signal the |handler| will be called with the arguments given to |fire( ... )|. Note, the functions - connected to a signal are called in NO PARTICULAR ORDER, so connecting one function after another does - NOT mean that the first will be called before the second as a result of a call to |fire|. - -Method :disconnect() - Arguments: None - Returns: None - Description: Disconnects all of the functions connected to this signal. - -Method :fire( ... ) - Arguments: Any arguments are accepted - Returns: None - Description: Calls all of the currently connected functions with the given arguments. - -Method :wait() - Arguments: None - Returns: The arguments given to fire - Description: This call blocks until -]] - -function t.CreateSignal() - local this = {} - - local mBindableEvent = Instance.new('BindableEvent') - local mAllCns = {} --all connection objects returned by mBindableEvent::connect - - --main functions - function this:connect(func) - if self ~= this then error("connect must be called with `:`, not `.`", 2) end - if type(func) ~= 'function' then - error("Argument #1 of connect must be a function, got a "..type(func), 2) - end - local cn = mBindableEvent.Event:connect(func) - mAllCns[cn] = true - local pubCn = {} - function pubCn:disconnect() - cn:disconnect() - mAllCns[cn] = nil - end - return pubCn - end - function this:disconnect() - if self ~= this then error("disconnect must be called with `:`, not `.`", 2) end - for cn, _ in pairs(mAllCns) do - cn:disconnect() - mAllCns[cn] = nil - end - end - function this:wait() - if self ~= this then error("wait must be called with `:`, not `.`", 2) end - return mBindableEvent.Event:wait() - end - function this:fire(...) - if self ~= this then error("fire must be called with `:`, not `.`", 2) end - mBindableEvent:Fire(...) - end - - return this -end - -------------------------------------------------- Sigal class End ------------------------------------------------------ - - - - ------------------------------------------------------------------------------------------------------------------------- ------------------------------------------------------------------------------------------------------------------------- ------------------------------------------------------------------------------------------------------------------------- ------------------------------------------------Create Function Begins--------------------------------------------------- ------------------------------------------------------------------------------------------------------------------------- ------------------------------------------------------------------------------------------------------------------------- ------------------------------------------------------------------------------------------------------------------------- ---[[ -A "Create" function for easy creation of Roblox instances. The function accepts a string which is the classname of -the object to be created. The function then returns another function which either accepts accepts no arguments, in -which case it simply creates an object of the given type, or a table argument that may contain several types of data, -in which case it mutates the object in varying ways depending on the nature of the aggregate data. These are the -type of data and what operation each will perform: -1) A string key mapping to some value: - Key-Value pairs in this form will be treated as properties of the object, and will be assigned in NO PARTICULAR - ORDER. If the order in which properties is assigned matter, then they must be assigned somewhere else than the - |Create| call's body. - -2) An integral key mapping to another Instance: - Normal numeric keys mapping to Instances will be treated as children if the object being created, and will be - parented to it. This allows nice recursive calls to Create to create a whole hierarchy of objects without a - need for temporary variables to store references to those objects. - -3) A key which is a value returned from Create.Event( eventname ), and a value which is a function function - The Create.E( string ) function provides a limited way to connect to signals inside of a Create hierarchy - for those who really want such a functionality. The name of the event whose name is passed to - Create.E( string ) - -4) A key which is the Create function itself, and a value which is a function - The function will be run with the argument of the object itself after all other initialization of the object is - done by create. This provides a way to do arbitrary things involving the object from withing the create - hierarchy. - Note: This function is called SYNCHRONOUSLY, that means that you should only so initialization in - it, not stuff which requires waiting, as the Create call will block until it returns. While waiting in the - constructor callback function is possible, it is probably not a good design choice. - Note: Since the constructor function is called after all other initialization, a Create block cannot have two - constructor functions, as it would not be possible to call both of them last, also, this would be unnecessary. - - -Some example usages: - -A simple example which uses the Create function to create a model object and assign two of it's properties. -local model = Create'Model'{ - Name = 'A New model', - Parent = game.Workspace, -} - - -An example where a larger hierarchy of object is made. After the call the hierarchy will look like this: -Model_Container - |-ObjectValue - | | - | `-BoolValueChild - `-IntValue - -local model = Create'Model'{ - Name = 'Model_Container', - Create'ObjectValue'{ - Create'BoolValue'{ - Name = 'BoolValueChild', - }, - }, - Create'IntValue'{}, -} - - -An example using the event syntax: - -local part = Create'Part'{ - [Create.E'Touched'] = function(part) - print("I was touched by "..part.Name) - end, -} - - -An example using the general constructor syntax: - -local model = Create'Part'{ - [Create] = function(this) - print("Constructor running!") - this.Name = GetGlobalFoosAndBars(this) - end, -} - - -Note: It is also perfectly legal to save a reference to the function returned by a call Create, this will not cause - any unexpected behavior. EG: - local partCreatingFunction = Create'Part' - local part = partCreatingFunction() -]] - ---the Create function need to be created as a functor, not a function, in order to support the Create.E syntax, so it ---will be created in several steps rather than as a single function declaration. -local function Create_PrivImpl(objectType) - if type(objectType) ~= 'string' then - error("Argument of Create must be a string", 2) - end - --return the proxy function that gives us the nice Create'string'{data} syntax - --The first function call is a function call using Lua's single-string-argument syntax - --The second function call is using Lua's single-table-argument syntax - --Both can be chained together for the nice effect. - return function(dat) - --default to nothing, to handle the no argument given case - dat = dat or {} - - --make the object to mutate - local obj = Instance.new(objectType) - - --stored constructor function to be called after other initialization - local ctor = nil - - for k, v in pairs(dat) do - --add property - if type(k) == 'string' then - obj[k] = v - - - --add child - elseif type(k) == 'number' then - if type(v) ~= 'userdata' then - error("Bad entry in Create body: Numeric keys must be paired with children, got a: "..type(v), 2) - end - v.Parent = obj - - - --event connect - elseif type(k) == 'table' and k.__eventname then - if type(v) ~= 'function' then - error("Bad entry in Create body: Key `[Create.E\'"..k.__eventname.."\']` must have a function value\ - got: "..tostring(v), 2) - end - obj[k.__eventname]:connect(v) - - - --define constructor function - elseif k == t.Create then - if type(v) ~= 'function' then - error("Bad entry in Create body: Key `[Create]` should be paired with a constructor function, \ - got: "..tostring(v), 2) - elseif ctor then - --ctor already exists, only one allowed - error("Bad entry in Create body: Only one constructor function is allowed", 2) - end - ctor = v - - - else - error("Bad entry ("..tostring(k).." => "..tostring(v)..") in Create body", 2) - end - end - - --apply constructor function if it exists - if ctor then - ctor(obj) - end - - --return the completed object - return obj - end -end - ---now, create the functor: -t.Create = setmetatable({}, {__call = function(tb, ...) return Create_PrivImpl(...) end}) - ---and create the "Event.E" syntax stub. Really it's just a stub to construct a table which our Create ---function can recognize as special. -t.Create.E = function(eventName) - return {__eventname = eventName} -end - --------------------------------------------------Create function End---------------------------------------------------- - - - - ------------------------------------------------------------------------------------------------------------------------- ------------------------------------------------------------------------------------------------------------------------- ------------------------------------------------------------------------------------------------------------------------- -------------------------------------------------Documentation Begin----------------------------------------------------- ------------------------------------------------------------------------------------------------------------------------- ------------------------------------------------------------------------------------------------------------------------- ------------------------------------------------------------------------------------------------------------------------- - -t.Help = - function(funcNameOrFunc) - --input argument can be a string or a function. Should return a description (of arguments and expected side effects) - if funcNameOrFunc == "DecodeJSON" or funcNameOrFunc == t.DecodeJSON then - return "Function DecodeJSON. " .. - "Arguments: (string). " .. - "Side effect: returns a table with all parsed JSON values" - end - if funcNameOrFunc == "EncodeJSON" or funcNameOrFunc == t.EncodeJSON then - return "Function EncodeJSON. " .. - "Arguments: (table). " .. - "Side effect: returns a string composed of argument table in JSON data format" - end - if funcNameOrFunc == "MakeWedge" or funcNameOrFunc == t.MakeWedge then - return "Function MakeWedge. " .. - "Arguments: (x, y, z, [default material]). " .. - "Description: Makes a wedge at location x, y, z. Sets cell x, y, z to default material if ".. - "parameter is provided, if not sets cell x, y, z to be whatever material it previously was. ".. - "Returns true if made a wedge, false if the cell remains a block " - end - if funcNameOrFunc == "SelectTerrainRegion" or funcNameOrFunc == t.SelectTerrainRegion then - return "Function SelectTerrainRegion. " .. - "Arguments: (regionToSelect, color, selectEmptyCells, selectionParent). " .. - "Description: Selects all terrain via a series of selection boxes within the regionToSelect " .. - "(this should be a region3 value). The selection box color is detemined by the color argument " .. - "(should be a brickcolor value). SelectionParent is the parent that the selection model gets placed to (optional)." .. - "SelectEmptyCells is bool, when true will select all cells in the " .. - "region, otherwise we only select non-empty cells. Returns a function that can update the selection," .. - "arguments to said function are a new region3 to select, and the adornment color (color arg is optional). " .. - "Also returns a second function that takes no arguments and destroys the selection" - end - if funcNameOrFunc == "CreateSignal" or funcNameOrFunc == t.CreateSignal then - return "Function CreateSignal. ".. - "Arguments: None. ".. - "Returns: The newly created Signal object. This object is identical to the RBXScriptSignal class ".. - "used for events in Objects, but is a Lua-side object so it can be used to create custom events in".. - "Lua code. ".. - "Methods of the Signal object: :connect, :wait, :fire, :disconnect. ".. - "For more info you can pass the method name to the Help function, or view the wiki page ".. - "for this library. EG: Help('Signal:connect')." - end - if funcNameOrFunc == "Signal:connect" then - return "Method Signal:connect. ".. - "Arguments: (function handler). ".. - "Return: A connection object which can be used to disconnect the connection to this handler. ".. - "Description: Connectes a handler function to this Signal, so that when |fire| is called the ".. - "handler function will be called with the arguments passed to |fire|." - end - if funcNameOrFunc == "Signal:wait" then - return "Method Signal:wait. ".. - "Arguments: None. ".. - "Returns: The arguments passed to the next call to |fire|. ".. - "Description: This call does not return until the next call to |fire| is made, at which point it ".. - "will return the values which were passed as arguments to that |fire| call." - end - if funcNameOrFunc == "Signal:fire" then - return "Method Signal:fire. ".. - "Arguments: Any number of arguments of any type. ".. - "Returns: None. ".. - "Description: This call will invoke any connected handler functions, and notify any waiting code ".. - "attached to this Signal to continue, with the arguments passed to this function. Note: The calls ".. - "to handlers are made asynchronously, so this call will return immediately regardless of how long ".. - "it takes the connected handler functions to complete." - end - if funcNameOrFunc == "Signal:disconnect" then - return "Method Signal:disconnect. ".. - "Arguments: None. ".. - "Returns: None. ".. - "Description: This call disconnects all handlers attacched to this function, note however, it ".. - "does NOT make waiting code continue, as is the behavior of normal Roblox events. This method ".. - "can also be called on the connection object which is returned from Signal:connect to only ".. - "disconnect a single handler, as opposed to this method, which will disconnect all handlers." - end - if funcNameOrFunc == "Create" then - return "Function Create. ".. - "Arguments: A table containing information about how to construct a collection of objects. ".. - "Returns: The constructed objects. ".. - "Descrition: Create is a very powerfull function, whose description is too long to fit here, and ".. - "is best described via example, please see the wiki page for a description of how to use it." - end - end - ---------------------------------------------Documentation Ends---------------------------------------------------------- - -return t - - - - - - - - - - - - - - - - - - - - - - - - - - diff --git a/assets/ugc/877 b/assets/ugc/877 deleted file mode 100644 index 1fca15b..0000000 --- a/assets/ugc/877 +++ /dev/null @@ -1,2208 +0,0 @@ ---rbxassetid%877% -local t = {} - -function waitForChild(instance, name) - while not instance:FindFirstChild(name) do - instance.ChildAdded:wait() - end -end - --- Do a line/plane intersection. The line starts at the camera. The plane is at y == 0, normal(0, 1, 0) --- --- vectorPos - End point of the line. --- --- Return: --- cellPos - The terrain cell intersection point if there is one, vectorPos if there isn't. --- hit - Whether there was a plane intersection. Value is true if there was, false if not. -function PlaneIntersection(vectorPos) - local hit = false - local currCamera = game.Workspace.CurrentCamera - local startPos = Vector3.new(currCamera.CoordinateFrame.p.X, currCamera.CoordinateFrame.p.Y, currCamera.CoordinateFrame.p.Z) - local endPos = Vector3.new(vectorPos.X, vectorPos.Y, vectorPos.Z) - local normal = Vector3.new(0, 1, 0) - local p3 = Vector3.new(0, 0, 0) - local startEndDot = normal:Dot(endPos - startPos) - local cellPos = vectorPos - if startEndDot ~= 0 then - local t = normal:Dot(p3 - startPos) / startEndDot - if(t >=0 and t <=1) then - local intersection = ((endPos - startPos) * t) + startPos - cellPos = game.Workspace.Terrain:WorldToCell(intersection) - hit = true - end - end - - return cellPos, hit -end - - --- Purpose: --- Checks for terrain touched by the mouse hit. --- Will do a plane intersection if no terrain is touched. --- --- mouse - Mouse to check the .hit for. --- --- Return: --- cellPos - Cell position hit. Nil if none. -function GetTerrainForMouse(mouse) - -- There was no target, so all it could be is a plane intersection. - -- Check for a plane intersection. If there isn't one then nothing will get hit. - local cell = game.Workspace.Terrain:WorldToCellPreferSolid(Vector3.new(mouse.hit.x, mouse.hit.y, mouse.hit.z)) - local planeLoc = nil - -- If nothing was hit, do the plane intersection. - if 0 == game.Workspace.Terrain:GetCell(cell.X, cell.Y, cell.Z).Value then - cell = nil - planeLoc, hit = PlaneIntersection(Vector3.new(mouse.hit.x, mouse.hit.y, mouse.hit.z)) - if hit then - cell = planeLoc - end - end - return cell -end - --- setup helper functions -local insertBoundingBoxOverlapVector = Vector3.new(.3, .3, .3) -- we can still stamp if our character extrudes into the target stamping space by .3 or fewer units - --- rotates a model by yAngle radians about the global y-axis -local function rotatePartAndChildren(part, rotCF, offsetFromOrigin) - -- rotate this thing, if it's a part - if part:IsA("BasePart") then - part.CFrame = (rotCF * (part.CFrame - offsetFromOrigin)) + offsetFromOrigin - end - - -- recursively do the same to all children - local partChildren = part:GetChildren() - for c = 1, #partChildren do rotatePartAndChildren(partChildren[c], rotCF, offsetFromOrigin) end -end - -local function modelRotate(model, yAngle) - local rotCF = CFrame.Angles(0, yAngle, 0) - local offsetFromOrigin = model:GetModelCFrame().p - - rotatePartAndChildren(model, rotCF, offsetFromOrigin) -end - - -local function collectParts(object, baseParts, scripts, decals) - if object:IsA("BasePart") then - baseParts[#baseParts+1] = object - elseif object:IsA("Script") then - scripts[#scripts+1] = object - elseif object:IsA("Decal") then - decals[#decals+1] = object - end - - for index,child in pairs(object:GetChildren()) do - collectParts(child, baseParts, scripts, decals) - end -end - -local function clusterPartsInRegion(startVector, endVector) - local cluster = game.Workspace:FindFirstChild("Terrain") - - local startCell = cluster:WorldToCell(startVector) - local endCell = cluster:WorldToCell(endVector) - - local startX = startCell.X - local startY = startCell.Y - local startZ = startCell.Z - - local endX = endCell.X - local endY = endCell.Y - local endZ = endCell.Z - - if startX < cluster.MaxExtents.Min.X then startX = cluster.MaxExtents.Min.X end - if startY < cluster.MaxExtents.Min.Y then startY = cluster.MaxExtents.Min.Y end - if startZ < cluster.MaxExtents.Min.Z then startZ = cluster.MaxExtents.Min.Z end - - if endX > cluster.MaxExtents.Max.X then endX = cluster.MaxExtents.Max.X end - if endY > cluster.MaxExtents.Max.Y then endY = cluster.MaxExtents.Max.Y end - if endZ > cluster.MaxExtents.Max.Z then endZ = cluster.MaxExtents.Max.Z end - - for x = startX, endX do - for y = startY, endY do - for z = startZ, endZ do - if (cluster:GetCell(x, y, z).Value) > 0 then return true end - end - end - end - - return false -end - -local function findSeatsInModel(parent, seatTable) - if not parent then return end - - if parent.className == "Seat" or parent.className == "VehicleSeat" then - table.insert(seatTable, parent) - end - local myChildren = parent:GetChildren() - for j = 1, #myChildren do - findSeatsInModel(myChildren[j], seatTable) - end -end - -local function setSeatEnabledStatus(model, isEnabled) - local seatList = {} - findSeatsInModel(model, seatList) - - if isEnabled then - -- remove any welds called "SeatWeld" in seats - for i = 1, #seatList do - local nextSeat = seatList[i]:FindFirstChild("SeatWeld") - while nextSeat do nextSeat:Remove() nextSeat = seatList[i]:FindFirstChild("SeatWeld") end - end - else - -- put a weld called "SeatWeld" in every seat - -- this tricks it into thinking there's already someone sitting there, and it won't make you sit XD - for i = 1, #seatList do - local fakeWeld = Instance.new("Weld") - fakeWeld.Name = "SeatWeld" - fakeWeld.Parent = seatList[i] - end - end -end - -local function autoAlignToFace(parts) - local aatf = parts:FindFirstChild("AutoAlignToFace") - if aatf then return aatf.Value else return false end -end - -local function getClosestAlignedWorldDirection(aVector3InWorld) - local xDir = Vector3.new(1,0,0) - local yDir = Vector3.new(0,1,0) - local zDir = Vector3.new(0,0,1) - local xDot = aVector3InWorld.x * xDir.x + aVector3InWorld.y * xDir.y + aVector3InWorld.z * xDir.z - local yDot = aVector3InWorld.x * yDir.x + aVector3InWorld.y * yDir.y + aVector3InWorld.z * yDir.z - local zDot = aVector3InWorld.x * zDir.x + aVector3InWorld.y * zDir.y + aVector3InWorld.z * zDir.z - - if math.abs(xDot) > math.abs(yDot) and math.abs(xDot) > math.abs(zDot) then - if xDot > 0 then - return 0 - else - return 3 - end - elseif math.abs(yDot) > math.abs(xDot) and math.abs(yDot) > math.abs(zDot) then - if yDot > 0 then - return 1 - else - return 4 - end - else - if zDot > 0 then - return 2 - else - return 5 - end - end -end - -local function positionPartsAtCFrame3(aCFrame, currentParts) - local insertCFrame = nil - if not currentParts then return currentParts end - if currentParts and (currentParts:IsA("Model") or currentParts:IsA("Tool")) then - insertCFrame = currentParts:GetModelCFrame() - currentParts:TranslateBy(aCFrame.p - insertCFrame.p) - else - currentParts.CFrame = aCFrame - end - return currentParts -end - -local function calcRayHitTime(rayStart, raySlope, intersectionPlane) - if math.abs(raySlope) < .01 then return 0 end -- 0 slope --> we just say intersection time is 0, and sidestep this dimension - return (intersectionPlane - rayStart) / raySlope -end - -local function modelTargetSurface(partOrModel, rayStart, rayEnd) - if not partOrModel then - return 0 - end - - local modelCFrame = nil - local modelSize = nil - if partOrModel:IsA("Model") then - modelCFrame = partOrModel:GetModelCFrame() - modelSize = partOrModel:GetModelSize() - else - modelCFrame = partOrModel.CFrame - modelSize = partOrModel.Size - end - - local mouseRayStart = modelCFrame:pointToObjectSpace(rayStart) - local mouseRayEnd = modelCFrame:pointToObjectSpace(rayEnd) - local mouseSlope = mouseRayEnd - mouseRayStart - - local xPositive = 1 - local yPositive = 1 - local zPositive = 1 - if mouseSlope.X > 0 then xPositive = -1 end - if mouseSlope.Y > 0 then yPositive = -1 end - if mouseSlope.Z > 0 then zPositive = -1 end - - -- find which surface the transformed mouse ray hits (using modelSize): - local xHitTime = calcRayHitTime(mouseRayStart.X, mouseSlope.X, modelSize.X/2 * xPositive) - local yHitTime = calcRayHitTime(mouseRayStart.Y, mouseSlope.Y, modelSize.Y/2 * yPositive) - local zHitTime = calcRayHitTime(mouseRayStart.Z, mouseSlope.Z, modelSize.Z/2 * zPositive) - - local hitFace = 0 - - --if xHitTime >= 0 and yHitTime >= 0 and zHitTime >= 0 then - if xHitTime > yHitTime then - if xHitTime > zHitTime then - -- xFace is hit - hitFace = 1*xPositive - else - -- zFace is hit - hitFace = 3*zPositive - end - else - if yHitTime > zHitTime then - -- yFace is hit - hitFace = 2*yPositive - else - -- zFace is hit - hitFace = 3*zPositive - end - end - - return hitFace -end - -local function getBoundingBox2(partOrModel) - - -- for models, the bounding box is defined as the minimum and maximum individual part bounding boxes - -- relative to the first part's coordinate frame. - local minVec = Vector3.new(math.huge, math.huge, math.huge) - local maxVec = Vector3.new(-math.huge, -math.huge, -math.huge) - - if partOrModel:IsA("Terrain") then - minVec = Vector3.new(-2, -2, -2) - maxVec = Vector3.new(2, 2, 2) - elseif partOrModel:IsA("BasePart") then - minVec = -0.5 * partOrModel.Size - maxVec = -minVec - else - maxVec = partOrModel:GetModelSize()*0.5 - minVec = -maxVec - end - - -- Adjust bounding box to reflect what the model or part author wants in terms of justification - local justifyValue = partOrModel:FindFirstChild("Justification") - if justifyValue ~= nil then - -- find the multiple of 4 that contains the model - justify = justifyValue.Value - two = Vector3.new(2, 2, 2) - actualBox = maxVec - minVec - Vector3.new(0.01, 0.01, 0.01) - containingGridBox = Vector3.new(4 * math.ceil(actualBox.x/4), 4 * math.ceil(actualBox.y/4), 4 * math.ceil(actualBox.z/4)) - adjustment = containingGridBox - actualBox - minVec = minVec - 0.5 * adjustment * justify - maxVec = maxVec + 0.5 * adjustment * (two - justify) - end - - return minVec, maxVec -end - -local function getBoundingBoxInWorldCoordinates(partOrModel) - local minVec = Vector3.new(math.huge, math.huge, math.huge) - local maxVec = Vector3.new(-math.huge, -math.huge, -math.huge) - - if partOrModel:IsA("BasePart") and not partOrModel:IsA("Terrain") then - vec1 = partOrModel.CFrame:pointToWorldSpace(-0.5 * partOrModel.Size) - vec2 = partOrModel.CFrame:pointToWorldSpace(0.5 * partOrModel.Size) - minVec = Vector3.new(math.min(vec1.X, vec2.X), math.min(vec1.Y, vec2.Y), math.min(vec1.Z, vec2.Z)) - maxVec = Vector3.new(math.max(vec1.X, vec2.X), math.max(vec1.Y, vec2.Y), math.max(vec1.Z, vec2.Z)) - elseif partOrModel:IsA("Terrain") then - -- we shouldn't have to deal with this case - --minVec = Vector3.new(-2, -2, -2) - --maxVec = Vector3.new(2, 2, 2) - else - vec1 = partOrModel:GetModelCFrame():pointToWorldSpace(-0.5 * partOrModel:GetModelSize()) - vec2 = partOrModel:GetModelCFrame():pointToWorldSpace(0.5 * partOrModel:GetModelSize()) - minVec = Vector3.new(math.min(vec1.X, vec2.X), math.min(vec1.Y, vec2.Y), math.min(vec1.Z, vec2.Z)) - maxVec = Vector3.new(math.max(vec1.X, vec2.X), math.max(vec1.Y, vec2.Y), math.max(vec1.Z, vec2.Z)) - end - - return minVec, maxVec -end - -local function getTargetPartBoundingBox(targetPart) - if targetPart.Parent:FindFirstChild("RobloxModel") ~= nil then - return getBoundingBox2(targetPart.Parent) - else - return getBoundingBox2(targetPart) - end -end - -local function getMouseTargetCFrame(targetPart) - if targetPart.Parent:FindFirstChild("RobloxModel") ~= nil then - if targetPart.Parent:IsA("Tool") then return targetPart.Parent.Handle.CFrame - else return targetPart.Parent:GetModelCFrame() end - else - return targetPart.CFrame - end -end - -local function isBlocker(part) -- returns whether or not we want to cancel the stamp because we're blocked by this part - if not part then return false end - if not part.Parent then return false end - if part:FindFirstChild("Humanoid") then return false end - if part:FindFirstChild("RobloxStamper") or part:FindFirstChild("RobloxModel") then return true end - if part:IsA("Part") and not part.CanCollide then return false end - if part == game.Lighting then return false end - return isBlocker(part.Parent) -end - --- helper function to determine if a character can be pushed upwards by a certain amount --- character is 5 studs tall, we'll check a 1.5 x 1.5 x 4.5 box around char, with center .5 studs below torsocenter -local function spaceAboveCharacter(charTorso, newTorsoY, stampData) - local partsAboveChar = game.Workspace:FindPartsInRegion3( - Region3.new(Vector3.new(charTorso.Position.X, newTorsoY, charTorso.Position.Z) - Vector3.new(.75, 2.75, .75), - Vector3.new(charTorso.Position.X, newTorsoY, charTorso.Position.Z) + Vector3.new(.75, 1.75, .75)), - charTorso.Parent, - 100) - - for j = 1, #partsAboveChar do - if partsAboveChar[j].CanCollide and not partsAboveChar[j]:IsDescendantOf(stampData.CurrentParts) then return false end - end - - if clusterPartsInRegion(Vector3.new(charTorso.Position.X, newTorsoY, charTorso.Position.Z) - Vector3.new(.75, 2.75, .75), - Vector3.new(charTorso.Position.X, newTorsoY, charTorso.Position.Z) + Vector3.new(.75, 1.75, .75)) then - return false - end - - return true -end - - -local function findConfigAtMouseTarget(Mouse, stampData) - -- *Critical Assumption* : - -- This function assumes the target CF axes are orthogonal with the target bounding box faces - -- And, it assumes the insert CF axes are orthongonal with the insert bounding box faces - -- Therefore, insertion will not work with angled faces on wedges or other "non-block" parts, nor - -- will it work for parts in a model that are not orthogonally aligned with the model's CF. - - if not Mouse then return nil end -- This can happen sometimes, return if so - if not stampData then error("findConfigAtMouseTarget: stampData is nil") return nil end - if not stampData["CurrentParts"] then return nil end - - local grid = 4.0 - local admissibleConfig = false - local targetConfig = CFrame.new(0,0,0) - - local minBB, maxBB = getBoundingBox2(stampData.CurrentParts) - local diagBB = maxBB - minBB - - local insertCFrame - if stampData.CurrentParts:IsA("Model") or stampData.CurrentParts:IsA("Tool") then - insertCFrame = stampData.CurrentParts:GetModelCFrame() - else - insertCFrame = stampData.CurrentParts.CFrame - end - - if Mouse then - if stampData.CurrentParts:IsA("Tool") then - Mouse.TargetFilter = stampData.CurrentParts.Handle - else - Mouse.TargetFilter = stampData.CurrentParts - end - end - - local hitPlane = false - local targetPart = nil - local success = pcall(function() targetPart = Mouse.Target end) - - if not success then-- or targetPart == nil then - return admissibleConfig, targetConfig - end - - local mouseHitInWorld = Vector3.new(0, 0, 0) - if Mouse then - mouseHitInWorld = Vector3.new(Mouse.Hit.x, Mouse.Hit.y, Mouse.Hit.z) - end - - local cellPos = nil - - -- Nothing was hit, so check for the default plane. - if nil == targetPart then - cellPos = GetTerrainForMouse(Mouse) - if nil == cellPos then - hitPlane = false - return admissibleConfig, targetConfig - else - targetPart = game.Workspace.Terrain - hitPlane = true - -- Take into account error that will occur. - cellPos = Vector3.new(cellPos.X - 1, cellPos.Y, cellPos.Z) - mouseHitInWorld = game.Workspace.Terrain:CellCenterToWorld(cellPos.x, cellPos.y, cellPos.z) - end - end - - -- test mouse hit location - local minBBTarget, maxBBTarget = getTargetPartBoundingBox(targetPart) - local diagBBTarget = maxBBTarget - minBBTarget - local targetCFrame = getMouseTargetCFrame(targetPart) - - if targetPart:IsA("Terrain") then - if not cluster then cluster = game.Workspace:FindFirstChild("Terrain") end - local cellID = cluster:WorldToCellPreferSolid(mouseHitInWorld) - if hitPlane then - cellID = cellPos - end - - targetCFrame = CFrame.new(game.Workspace.Terrain:CellCenterToWorld(cellID.x, cellID.y, cellID.z)) - end - - local mouseHitInTarget = targetCFrame:pointToObjectSpace(mouseHitInWorld) - local targetVectorInWorld = Vector3.new(0,0,0) - if Mouse then - -- DON'T WANT THIS IN TERMS OF THE MODEL CFRAME! (.TargetSurface is in terms of the part CFrame, so this would break, right? [HotThoth]) - -- (ideally, we would want to make the Mouse.TargetSurface a model-targetsurface instead, but for testing will be using the converse) - --targetVectorInWorld = targetCFrame:vectorToWorldSpace(Vector3.FromNormalId(Mouse.TargetSurface)) - targetVectorInWorld = targetPart.CFrame:vectorToWorldSpace(Vector3.FromNormalId(Mouse.TargetSurface)) -- better, but model cframe would be best - --[[if targetPart.Parent:IsA("Model") then - local hitFace = modelTargetSurface(targetPart.Parent, Mouse.Hit.p, game.Workspace.CurrentCamera.CoordinateFrame.p) -- best, if you get it right - local WORLD_AXES = {Vector3.new(1, 0, 0), Vector3.new(0, 1, 0), Vector3.new(0, 0, 1)} - if hitFace > 0 then - targetVectorInWorld = targetCFrame:vectorToWorldSpace(WORLD_AXES[hitFace]) - elseif hitFace < 0 then - targetVectorInWorld = targetCFrame:vectorToWorldSpace(-WORLD_AXES[-hitFace]) - end - end]] - end - - local targetRefPointInTarget - local clampToSurface - - if getClosestAlignedWorldDirection(targetVectorInWorld) == 0 then - targetRefPointInTarget = targetCFrame:vectorToObjectSpace(Vector3.new(1, -1, 1)) - insertRefPointInInsert = insertCFrame:vectorToObjectSpace(Vector3.new(-1, -1, 1)) - clampToSurface = Vector3.new(0,1,1) - elseif getClosestAlignedWorldDirection(targetVectorInWorld) == 3 then - targetRefPointInTarget = targetCFrame:vectorToObjectSpace(Vector3.new(-1, -1, -1)) - insertRefPointInInsert = insertCFrame:vectorToObjectSpace(Vector3.new(1, -1, -1)) - clampToSurface = Vector3.new(0,1,1) - elseif getClosestAlignedWorldDirection(targetVectorInWorld) == 1 then - targetRefPointInTarget = targetCFrame:vectorToObjectSpace(Vector3.new(-1, 1, 1)) - insertRefPointInInsert = insertCFrame:vectorToObjectSpace(Vector3.new(-1, -1, 1)) - clampToSurface = Vector3.new(1,0,1) - elseif getClosestAlignedWorldDirection(targetVectorInWorld) == 4 then - targetRefPointInTarget = targetCFrame:vectorToObjectSpace(Vector3.new(-1, -1, 1)) - insertRefPointInInsert = insertCFrame:vectorToObjectSpace(Vector3.new(-1, 1, 1)) - clampToSurface = Vector3.new(1,0,1) - elseif getClosestAlignedWorldDirection(targetVectorInWorld) == 2 then - targetRefPointInTarget = targetCFrame:vectorToObjectSpace(Vector3.new(-1, -1, 1)) - insertRefPointInInsert = insertCFrame:vectorToObjectSpace(Vector3.new(-1, -1, -1)) - clampToSurface = Vector3.new(1,1,0) - else - targetRefPointInTarget = targetCFrame:vectorToObjectSpace(Vector3.new(1, -1, -1)) - insertRefPointInInsert = insertCFrame:vectorToObjectSpace(Vector3.new(1, -1, 1)) - clampToSurface = Vector3.new(1,1,0) - end - - targetRefPointInTarget = targetRefPointInTarget * (0.5 * diagBBTarget) + 0.5 * (maxBBTarget + minBBTarget) - insertRefPointInInsert = insertRefPointInInsert * (0.5 * diagBB) + 0.5 * (maxBB + minBB) - - -- To Do: For cases that are not aligned to the world grid, account for the minimal rotation - -- needed to bring the Insert part(s) into alignment with the Target Part - -- Apply the rotation here - - local delta = mouseHitInTarget - targetRefPointInTarget - local deltaClamped = Vector3.new(grid * math.modf(delta.x/grid), grid * math.modf(delta.y/grid), grid * math.modf(delta.z/grid)) - deltaClamped = deltaClamped * clampToSurface - local targetTouchInTarget = deltaClamped + targetRefPointInTarget - - local TargetTouchRelToWorld = targetCFrame:pointToWorldSpace(targetTouchInTarget) - local InsertTouchInWorld = insertCFrame:vectorToWorldSpace(insertRefPointInInsert) - local posInsertOriginInWorld = TargetTouchRelToWorld - InsertTouchInWorld - - local x, y, z, R00, R01, R02, R10, R11, R12, R20, R21, R22 = insertCFrame:components() - targetConfig = CFrame.new(posInsertOriginInWorld.x, posInsertOriginInWorld.y, posInsertOriginInWorld.z, R00, R01, R02, R10, R11, R12, R20, R21, R22) - admissibleConfig = true - - return admissibleConfig, targetConfig, getClosestAlignedWorldDirection(targetVectorInWorld) -end - -local function truncateToCircleEighth(bigValue, littleValue) - local big = math.abs(bigValue) - local little = math.abs(littleValue) - local hypotenuse = math.sqrt(big*big + little*little) - local frac = little / hypotenuse - - local bigSign = 1 - local littleSign = 1 - if bigValue < 0 then bigSign = -1 end - if littleValue < 0 then littleSign = -1 end - - if frac > .382683432 then - -- between 22.5 and 45 degrees, so truncate to 45-degree tilt - return .707106781 * hypotenuse * bigSign, .707106781 * hypotenuse * littleSign - else - -- between 0 and 22.5 degrees, so truncate to 0-degree tilt - return hypotenuse * bigSign, 0 - end -end - - -local function saveTheWelds(object, manualWeldTable, manualWeldParentTable) - if object:IsA("ManualWeld") or object:IsA("Rotate") then - table.insert(manualWeldTable, object) - table.insert(manualWeldParentTable, object.Parent) - else - local children = object:GetChildren() - for i = 1, #children do - saveTheWelds(children[i], manualWeldTable, manualWeldParentTable) - end - end -end - -local function restoreTheWelds(manualWeldTable, manualWeldParentTable) - for i = 1, #manualWeldTable do - manualWeldTable[i].Parent = manualWeldParentTable[i] - end -end - -t.CanEditRegion = function(partOrModel, EditRegion) -- todo: use model and stamper metadata - if not EditRegion then return true, false end - - local minBB, maxBB = getBoundingBoxInWorldCoordinates(partOrModel) - - if minBB.X < EditRegion.CFrame.p.X - EditRegion.Size.X/2 or - minBB.Y < EditRegion.CFrame.p.Y - EditRegion.Size.Y/2 or - minBB.Z < EditRegion.CFrame.p.Z - EditRegion.Size.Z/2 then - return false, false - end - - if maxBB.X > EditRegion.CFrame.p.X + EditRegion.Size.X/2 or - maxBB.Y > EditRegion.CFrame.p.Y + EditRegion.Size.Y/2 or - maxBB.Z > EditRegion.CFrame.p.Z + EditRegion.Size.Z/2 then - return false, false - end - - return true, false -end - -t.GetStampModel = function(assetId, terrainShape, useAssetVersionId) - if assetId == 0 then - return nil, "No Asset" - end - if assetId < 0 then - return nil, "Negative Asset" - end - - local function UnlockInstances(object) - if object:IsA("BasePart") then - object.Locked = false - end - for index,child in pairs(object:GetChildren()) do - UnlockInstances(child) - end - end - - local function getClosestColorToTerrainMaterial(terrainValue) - if terrainValue == 1 then - return BrickColor.new("Bright green") - elseif terrainValue == 2 then - return BrickColor.new("Bright yellow") - elseif terrainValue == 3 then - return BrickColor.new("Bright red") - elseif terrainValue == 4 then - return BrickColor.new("Sand red") - elseif terrainValue == 5 then - return BrickColor.new("Black") - elseif terrainValue == 6 then - return BrickColor.new("Dark stone grey") - elseif terrainValue == 7 then - return BrickColor.new("Sand blue") - elseif terrainValue == 8 then - return BrickColor.new("Deep orange") - elseif terrainValue == 9 then - return BrickColor.new("Dark orange") - elseif terrainValue == 10 then - return BrickColor.new("Reddish brown") - elseif terrainValue == 11 then - return BrickColor.new("Light orange") - elseif terrainValue == 12 then - return BrickColor.new("Light stone grey") - elseif terrainValue == 13 then - return BrickColor.new("Sand green") - elseif terrainValue == 14 then - return BrickColor.new("Medium stone grey") - elseif terrainValue == 15 then - return BrickColor.new("Really red") - elseif terrainValue == 16 then - return BrickColor.new("Really blue") - elseif terrainValue == 17 then - return BrickColor.new("Bright blue") - else - return BrickColor.new("Bright green") - end - end - - local function setupFakeTerrainPart(cellMat, cellType, cellOrient) - local newTerrainPiece = nil - if (cellType == 1 or cellType == 4) then newTerrainPiece = Instance.new("WedgePart") newTerrainPiece.formFactor = "Custom" - elseif (cellType == 2) then newTerrainPiece = Instance.new("CornerWedgePart") - else newTerrainPiece = Instance.new("Part") newTerrainPiece.formFactor = "Custom" end - newTerrainPiece.Name = "MegaClusterCube" - newTerrainPiece.Size = Vector3.new(4, 4, 4) - newTerrainPiece.BottomSurface = "Smooth" - newTerrainPiece.TopSurface = "Smooth" - - -- can add decals or textures here if feeling particularly adventurous... for now, can make a table of look-up colors - newTerrainPiece.BrickColor = getClosestColorToTerrainMaterial(cellMat) - - local sideways = 0 - local flipped = math.pi - if cellType == 4 then sideways = -math.pi/2 end - if cellType == 2 or cellType == 3 then flipped = 0 end - newTerrainPiece.CFrame = CFrame.Angles(0, math.pi/2*cellOrient + flipped, sideways) - - if cellType == 3 then - local inverseCornerWedgeMesh = Instance.new("SpecialMesh") - inverseCornerWedgeMesh.MeshType = "FileMesh" - inverseCornerWedgeMesh.MeshId = "http://www.mete0r.xyz/asset?id=66832495" - inverseCornerWedgeMesh.Scale = Vector3.new(2, 2, 2) - inverseCornerWedgeMesh.Parent = newTerrainPiece - end - - local materialTag = Instance.new("Vector3Value") - materialTag.Value = Vector3.new(cellMat, cellType, cellOrient) - materialTag.Name = "ClusterMaterial" - materialTag.Parent = newTerrainPiece - - return newTerrainPiece - end - - -- This call will cause a "wait" until the data comes back - -- below we wait a max of 8 seconds before deciding to bail out on loading - local root - local loader - loading = true - if useAssetVersionId then - loader = coroutine.create(function() - root = game:GetService("InsertService"):LoadAssetVersion(assetId) - loading = false - end) - coroutine.resume(loader) - else - loader = coroutine.create(function() - root = game:GetService("InsertService"):LoadAsset(assetId) - loading = false - end) - coroutine.resume(loader) - end - - local lastGameTime = 0 - local totalTime = 0 - local maxWait = 8 - while loading and totalTime < maxWait do - lastGameTime = tick() - wait(1) - totalTime = totalTime + tick() - lastGameTime - end - loading = false - - if totalTime >= maxWait then - return nil, "Load Time Fail" - end - - - if root == nil then - return nil, "Load Asset Fail" - end - - if not root:IsA("Model") then - return nil, "Load Type Fail" - end - - local instances = root:GetChildren() - if #instances == 0 then - return nil, "Empty Model Fail" - end - - --Unlock all parts that are inserted, to make sure they are editable - UnlockInstances(root) - - --Continue the insert process - root = root:GetChildren()[1] - - --Examine the contents and decide what it looks like - for pos, instance in pairs(instances) do - if instance:IsA("Team") then - instance.Parent = game:GetService("Teams") - elseif instance:IsA("Sky") then - local lightingService = game:GetService("Lighting") - for index,child in pairs(lightingService:GetChildren()) do - if child:IsA("Sky") then - child:Remove(); - end - end - instance.Parent = lightingService - return - end - end - - -- ...and tag all inserted models for subsequent origin identification - -- if no RobloxModel tag already exists, then add it. - if root:FindFirstChild("RobloxModel") == nil then - local stringTag = Instance.new("BoolValue", root) - stringTag.Name = "RobloxModel" - - if root:FindFirstChild("RobloxStamper") == nil then - local stringTag2 = Instance.new("BoolValue", root) - stringTag2.Name = "RobloxStamper" - end - end - - if terrainShape then - if root.Name == "MegaClusterCube" then - if (terrainShape == 6) then -- insert an autowedging tag - local autowedgeTag = Instance.new("BoolValue") - autowedgeTag.Name = "AutoWedge" - autowedgeTag.Parent = root - else - local clusterTag = root:FindFirstChild("ClusterMaterial") - if clusterTag then - if clusterTag:IsA("Vector3Value") then - root = setupFakeTerrainPart(clusterTag.Value.X, terrainShape, clusterTag.Value.Z) - else - root = setupFakeTerrainPart(clusterTag.Value, terrainShape, 0) - end - else - root = setupFakeTerrainPart(1, terrainShape, 0) - end - end - end - end - - return root -end - - - -t.SetupStamperDragger = function(modelToStamp, Mouse, StampInModel, AllowedStampRegion, StampFailedFunc) - if not modelToStamp then - error("SetupStamperDragger: modelToStamp (first arg) is nil! Should be a stamper model") - return nil - end - if not modelToStamp:IsA("Model") and not modelToStamp:IsA("BasePart") then - error("SetupStamperDragger: modelToStamp (first arg) is neither a Model or Part!") - return nil - end - if not Mouse then - error("SetupStamperDragger: Mouse (second arg) is nil! Should be a mouse object") - return nil - end - if not Mouse:IsA("Mouse") then - error("SetupStamperDragger: Mouse (second arg) is not of type Mouse!") - return nil - end - - local stampInModel = nil - local allowedStampRegion = nil - local stampFailedFunc = nil - if StampInModel then - if not StampInModel:IsA("Model") then - error("SetupStamperDragger: StampInModel (optional third arg) is not of type 'Model'") - return nil - end - if not AllowedStampRegion then - error("SetupStamperDragger: AllowedStampRegion (optional fourth arg) is nil when StampInModel (optional third arg) is defined") - return nil - end - stampFailedFunc = StampFailedFunc - stampInModel = StampInModel - allowedStampRegion = AllowedStampRegion - end - - -- Init all state variables - local gInitial90DegreeRotations = 0 - local stampData = nil - local mouseTarget = nil - - local errorBox = Instance.new("SelectionBox") - errorBox.Color = BrickColor.new("Bright red") - errorBox.Transparency = 0 - errorBox.Archivable = false - - -- for megacluster MEGA STAMPING - local adornPart = Instance.new("Part") - adornPart.Parent = nil - adornPart.formFactor = "Custom" - adornPart.Size = Vector3.new(4, 4, 4) - adornPart.CFrame = CFrame.new() - adornPart.Archivable = false - - local adorn = Instance.new("SelectionBox") - adorn.Color = BrickColor.new("Toothpaste") - adorn.Adornee = adornPart - adorn.Visible = true - adorn.Transparency = 0 - adorn.Name = "HighScalabilityStamperLine" - adorn.Archivable = false - - local HighScalabilityLine = {} - HighScalabilityLine.Start = nil - HighScalabilityLine.End = nil - HighScalabilityLine.Adorn = adorn - HighScalabilityLine.AdornPart = adornPart - HighScalabilityLine.InternalLine = nil - HighScalabilityLine.NewHint = true - - HighScalabilityLine.MorePoints = {nil, nil} - HighScalabilityLine.MoreLines = {nil, nil} - HighScalabilityLine.Dimensions = 1 - - local control = {} - local movingLock = false - local stampUpLock = false - local unstampableSurface = false - local mouseCons = {} - local keyCon = nil - - local stamped = Instance.new("BoolValue") - stamped.Archivable = false - stamped.Value = false - - local lastTarget = {} - lastTarget.TerrainOrientation = 0 - lastTarget.CFrame = 0 - - local cellInfo = {} - cellInfo.Material = 1 - cellInfo.clusterType = 0 - cellInfo.clusterOrientation = 0 - - local function isMegaClusterPart() - if not stampData then return false end - if not stampData.CurrentParts then return false end - - return ( stampData.CurrentParts:FindFirstChild("ClusterMaterial",true) or (stampData.CurrentParts.Name == "MegaClusterCube") ) - end - - local function DoHighScalabilityRegionSelect() - local megaCube = stampData.CurrentParts:FindFirstChild("MegaClusterCube") - if not megaCube then - if not stampData.CurrentParts.Name == "MegaClusterCube" then - return - else - megaCube = stampData.CurrentParts - end - end - - HighScalabilityLine.End = megaCube.CFrame.p - local line = nil - local line2 = Vector3.new(0, 0, 0) - local line3 = Vector3.new(0, 0, 0) - - if HighScalabilityLine.Dimensions == 1 then - -- extract the line from these positions and limit to a 2D plane made from 2 of the world axes - -- then use dominating axis to limit line to be at 45-degree intervals - -- will use this internal representation of the line for the actual stamping - line = (HighScalabilityLine.End - HighScalabilityLine.Start) - - if math.abs(line.X) < math.abs(line.Y) then - if math.abs(line.X) < math.abs(line.Z) then - -- limit to Y/Z plane, domination unknown - local newY, newZ - if (math.abs(line.Y) > math.abs(line.Z)) then - newY, newZ = truncateToCircleEighth(line.Y, line.Z) - else - newZ, newY = truncateToCircleEighth(line.Z, line.Y) - end - line = Vector3.new(0, newY, newZ) - else - -- limit to X/Y plane, with Y dominating - local newY, newX = truncateToCircleEighth(line.Y, line.X) - line = Vector3.new(newX, newY, 0) - end - else - if math.abs(line.Y) < math.abs(line.Z) then - -- limit to X/Z plane, domination unknown - local newX, newZ - if math.abs(line.X) > math.abs(line.Z) then - newX, newZ = truncateToCircleEighth(line.X, line.Z) - else - newZ, newX = truncateToCircleEighth(line.Z, line.X) - end - line = Vector3.new(newX, 0, newZ) - else - -- limit to X/Y plane, with X dominating - local newX, newY = truncateToCircleEighth(line.X, line.Y) - line = Vector3.new(newX, newY, 0) - end - end - HighScalabilityLine.InternalLine = line - - elseif HighScalabilityLine.Dimensions == 2 then - line = HighScalabilityLine.MoreLines[1] - line2 = HighScalabilityLine.End - HighScalabilityLine.MorePoints[1] - - -- take out any component of line2 along line1, so you get perpendicular to line1 component - line2 = line2 - line.unit*line.unit:Dot(line2) - - tempCFrame = CFrame.new(HighScalabilityLine.Start, HighScalabilityLine.Start + line) - - -- then zero out whichever is the smaller component - local yAxis = tempCFrame:vectorToWorldSpace(Vector3.new(0, 1, 0)) - local xAxis = tempCFrame:vectorToWorldSpace(Vector3.new(1, 0, 0)) - - local xComp = xAxis:Dot(line2) - local yComp = yAxis:Dot(line2) - - if math.abs(yComp) > math.abs(xComp) then - line2 = line2 - xAxis * xComp - else - line2 = line2 - yAxis * yComp - end - - HighScalabilityLine.InternalLine = line2 - - elseif HighScalabilityLine.Dimensions == 3 then - line = HighScalabilityLine.MoreLines[1] - line2 = HighScalabilityLine.MoreLines[2] - line3 = HighScalabilityLine.End - HighScalabilityLine.MorePoints[2] - - -- zero out all components of previous lines - line3 = line3 - line.unit * line.unit:Dot(line3) - line3 = line3 - line2.unit * line2.unit:Dot(line3) - - HighScalabilityLine.InternalLine = line3 - end - - -- resize the "line" graphic to be the correct size and orientation - tempCFrame = CFrame.new(HighScalabilityLine.Start, HighScalabilityLine.Start + line) - - if HighScalabilityLine.Dimensions == 1 then -- faster calculation for line - HighScalabilityLine.AdornPart.Size = Vector3.new(4, 4, line.magnitude + 4) - HighScalabilityLine.AdornPart.CFrame = tempCFrame + tempCFrame:vectorToWorldSpace(Vector3.new(2, 2, 2) - HighScalabilityLine.AdornPart.Size/2) - else - local boxSize = tempCFrame:vectorToObjectSpace(line + line2 + line3) - HighScalabilityLine.AdornPart.Size = Vector3.new(4, 4, 4) + Vector3.new(math.abs(boxSize.X), math.abs(boxSize.Y), math.abs(boxSize.Z)) - HighScalabilityLine.AdornPart.CFrame = tempCFrame + tempCFrame:vectorToWorldSpace(boxSize/2) - end - - -- make player able to see this ish - - local gui = nil - if game.Players["LocalPlayer"] then - gui = game.Players.LocalPlayer:FindFirstChild("PlayerGui") - if gui and gui:IsA("PlayerGui") then - if HighScalabilityLine.Dimensions == 1 and line.magnitude > 3 then -- don't show if mouse hasn't moved enough - HighScalabilityLine.Adorn.Parent = gui - elseif HighScalabilityLine.Dimensions > 1 then - HighScalabilityLine.Adorn.Parent = gui - end - end - end - - if gui == nil then -- we are in studio - gui = game:GetService("CoreGui") - if HighScalabilityLine.Dimensions == 1 and line.magnitude > 3 then -- don't show if mouse hasn't moved enough - HighScalabilityLine.Adorn.Parent = gui - elseif HighScalabilityLine.Dimensions > 1 then - HighScalabilityLine.Adorn.Parent = gui - end - end - end - - - local function DoStamperMouseMove(Mouse) - if not Mouse then - error("Error: RbxStamper.DoStamperMouseMove: Mouse is nil") - return - end - if not Mouse:IsA("Mouse") then - error("Error: RbxStamper.DoStamperMouseMove: Mouse is of type", Mouse.className,"should be of type Mouse") - return - end - - -- There wasn't a target (no part or terrain), so check for plane intersection. - if not Mouse.Target then - local cellPos = GetTerrainForMouse(Mouse) - if nil == cellPos then - return - end - end - - if not stampData then - return - end - - -- don't move with dragger - will move in one step on mouse down - -- draw ghost at acceptable positions - configFound, targetCFrame, targetSurface = findConfigAtMouseTarget(Mouse, stampData) - if not configFound then - error("RbxStamper.DoStamperMouseMove No configFound, returning") - return - end - - local numRotations = 0 -- update this according to how many rotations you need to get it to target surface - if autoAlignToFace(stampData.CurrentParts) and targetSurface ~= 1 and targetSurface ~= 4 then -- pre-rotate the flag or portrait so it's aligned correctly - if targetSurface == 3 then numRotations = 0 - gInitial90DegreeRotations + autoAlignToFace(stampData.CurrentParts) - elseif targetSurface == 0 then numRotations = 2 - gInitial90DegreeRotations + autoAlignToFace(stampData.CurrentParts) - elseif targetSurface == 5 then numRotations = 3 - gInitial90DegreeRotations + autoAlignToFace(stampData.CurrentParts) - elseif targetSurface == 2 then numRotations = 1 - gInitial90DegreeRotations + autoAlignToFace(stampData.CurrentParts) - end - end - - local ry = math.pi/2 - gInitial90DegreeRotations = gInitial90DegreeRotations + numRotations - if stampData.CurrentParts:IsA("Model") or stampData.CurrentParts:IsA("Tool") then - --stampData.CurrentParts:Rotate(0, ry*numRotations, 0) - modelRotate(stampData.CurrentParts, ry*numRotations) - else - stampData.CurrentParts.CFrame = CFrame.fromEulerAnglesXYZ(0, ry*numRotations, 0) * stampData.CurrentParts.CFrame - end - - -- CODE TO CHECK FOR DRAGGING GHOST PART INTO A COLLIDING STATE - local minBB, maxBB = getBoundingBoxInWorldCoordinates(stampData.CurrentParts) - - -- need to offset by distance to be dragged - local currModelCFrame = nil - if stampData.CurrentParts:IsA("Model") then - currModelCFrame = stampData.CurrentParts:GetModelCFrame() - else - currModelCFrame = stampData.CurrentParts.CFrame - end - - minBB = minBB + targetCFrame.p - currModelCFrame.p - maxBB = maxBB + targetCFrame.p - currModelCFrame.p - - -- don't drag into terrain - if clusterPartsInRegion(minBB + insertBoundingBoxOverlapVector, maxBB - insertBoundingBoxOverlapVector) then - if lastTarget.CFrame then - if (stampData.CurrentParts:FindFirstChild("ClusterMaterial", true)) then - local theClusterMaterial = stampData.CurrentParts:FindFirstChild("ClusterMaterial", true) - if theClusterMaterial:IsA("Vector3Value") then - local stampClusterMaterial = stampData.CurrentParts:FindFirstChild("ClusterMaterial", true) - if stampClusterMaterial then - stampClusterMaterial = clusterMat - end - end - end - end - return - end - - -- if we are stamping a terrain part, make sure it goes on the grid! Otherwise preview block could be placed off grid, but stamped on grid - if isMegaClusterPart() then - local cellToStamp = game.Workspace.Terrain:WorldToCell(targetCFrame.p) - local newCFramePosition = game.Workspace.Terrain:CellCenterToWorld(cellToStamp.X, cellToStamp.Y, cellToStamp.Z) - local x, y, z, R00, R01, R02, R10, R11, R12, R20, R21, R22 = targetCFrame:components() - targetCFrame = CFrame.new(newCFramePosition.X,newCFramePosition.Y,newCFramePosition.Z,R00, R01, R02, R10, R11, R12, R20, R21, R22) - end - - positionPartsAtCFrame3(targetCFrame, stampData.CurrentParts) - lastTarget.CFrame = targetCFrame -- successful positioning, so update 'dat cframe - if stampData.CurrentParts:FindFirstChild("ClusterMaterial", true) then - local clusterMat = stampData.CurrentParts:FindFirstChild("ClusterMaterial", true) - if clusterMat:IsA("Vector3Value") then - lastTarget.TerrainOrientation = clusterMat.Value.Z - end - end - - - -- auto break joints code - if Mouse and Mouse.Target and Mouse.Target.Parent then - local modelInfo = Mouse.Target:FindFirstChild("RobloxModel") - if not modelInfo then modelInfo = Mouse.Target.Parent:FindFirstChild("RobloxModel") end - - local myModelInfo = stampData.CurrentParts:FindFirstChild("UnstampableFaces") - - --if (modelInfo and modelInfo.Parent:FindFirstChild("UnstampableFaces")) or (modelInfo and myModelInfo) then -- need better targetSurface calcs - if (true) then - local breakingFaces = "" - local myBreakingFaces = "" - if modelInfo and modelInfo.Parent:FindFirstChild("UnstampableFaces") then breakingFaces = modelInfo.Parent.UnstampableFaces.Value end - if myModelInfo then myBreakingFaces = myModelInfo.Value end - local hitFace = 0 - - if modelInfo then hitFace = modelTargetSurface(modelInfo.Parent, game.Workspace.CurrentCamera.CoordinateFrame.p, Mouse.Hit.p) end - - -- are we stamping TO an unstampable surface? - for bf in string.gmatch(breakingFaces, "[^,]+") do - if hitFace == tonumber(bf) then - -- return before we hit the JointsService code below! - unstampableSurface = true - game.JointsService:ClearJoinAfterMoveJoints() -- clear the JointsService cache - return - end - end - - -- now we have to cast the ray back in the other direction to find the surface we're stamping FROM - hitFace = modelTargetSurface(stampData.CurrentParts, Mouse.Hit.p, game.Workspace.CurrentCamera.CoordinateFrame.p) - - -- are we stamping WITH an unstampable surface? - for bf in string.gmatch(myBreakingFaces, "[^,]+") do - if hitFace == tonumber(bf) then - unstampableSurface = true - game.JointsService:ClearJoinAfterMoveJoints() -- clear the JointsService cache - return - end - end - - -- just need to match breakingFace against targetSurface using rotation supplied by modelCFrame - -- targetSurface: 1 is top, 4 is bottom, - end - end - - -- to show joints during the mouse move - unstampableSurface = false - game.JointsService:SetJoinAfterMoveInstance(stampData.CurrentParts) - - -- most common mouse inactive error occurs here, so check mouse active one more time in a pcall - if not pcall(function() - if Mouse and Mouse.Target and Mouse.Target.Parent:FindFirstChild("RobloxModel") == nil then - return - else - return - end - end) - then - error("Error: RbxStamper.DoStamperMouseMove Mouse is nil on second check") - game.JointsService:ClearJoinAfterMoveJoints() - Mouse = nil - return - end - - if Mouse and Mouse.Target and Mouse.Target.Parent:FindFirstChild("RobloxModel") == nil then - game.JointsService:SetJoinAfterMoveTarget(Mouse.Target) - else - game.JointsService:SetJoinAfterMoveTarget(nil) - end - game.JointsService:ShowPermissibleJoints() - - -- here we allow for a line of high-scalability parts - if isMegaClusterPart() and HighScalabilityLine and HighScalabilityLine.Start then - DoHighScalabilityRegionSelect() - end - end - - local function setupKeyListener(key, Mouse) - if control and control["Paused"] then return end -- don't do this if we have no stamp - - key = string.lower(key) - if key == 'r' and not autoAlignToFace(stampData.CurrentParts) then -- rotate the model - gInitial90DegreeRotations = gInitial90DegreeRotations + 1 - - -- Update orientation value if this is a fake terrain part - local clusterValues = stampData.CurrentParts:FindFirstChild("ClusterMaterial", true) - if clusterValues and clusterValues:IsA("Vector3Value") then - clusterValues.Value = Vector3.new(clusterValues.Value.X, clusterValues.Value.Y, (clusterValues.Value.Z + 1) % 4) - end - - -- Rotate the parts or all the parts in the model - local ry = math.pi/2 - if stampData.CurrentParts:IsA("Model") or stampData.CurrentParts:IsA("Tool") then - --stampData.CurrentParts:Rotate(0, ry, 0) - modelRotate(stampData.CurrentParts, ry) - else - stampData.CurrentParts.CFrame = CFrame.fromEulerAnglesXYZ(0, ry, 0) * stampData.CurrentParts.CFrame - end - - -- After rotating, update the position - configFound, targetCFrame = findConfigAtMouseTarget(Mouse, stampData) - if configFound then - positionPartsAtCFrame3(targetCFrame, stampData.CurrentParts) - - -- update everything else in MouseMove - DoStamperMouseMove(Mouse) - end - elseif key == 'c' then -- try to expand our high scalability dragger dimension - if HighScalabilityLine.InternalLine and HighScalabilityLine.InternalLine.magnitude > 0 and HighScalabilityLine.Dimensions < 3 then - HighScalabilityLine.MorePoints[HighScalabilityLine.Dimensions] = HighScalabilityLine.End - HighScalabilityLine.MoreLines[HighScalabilityLine.Dimensions] = HighScalabilityLine.InternalLine - HighScalabilityLine.Dimensions = HighScalabilityLine.Dimensions + 1 - HighScalabilityLine.NewHint = true - end - end - end - - keyCon = Mouse.KeyDown:connect(function(key) -- init key connection (keeping code close to func) - setupKeyListener(key, Mouse) - end) - - local function resetHighScalabilityLine() - if HighScalabilityLine then - HighScalabilityLine.Start = nil - HighScalabilityLine.End = nil - HighScalabilityLine.InternalLine = nil - HighScalabilityLine.NewHint = true - end - end - - local function flashRedBox() - local gui = game.CoreGui - if game:FindFirstChild("Players") then - if game.Players["LocalPlayer"] then - if game.Players.LocalPlayer:FindFirstChild("PlayerGui") then - gui = game.Players.LocalPlayer.PlayerGui - end - end - end - if not stampData["ErrorBox"] then return end - - stampData.ErrorBox.Parent = gui - if stampData.CurrentParts:IsA("Tool") then - stampData.ErrorBox.Adornee = stampData.CurrentParts.Handle - else - stampData.ErrorBox.Adornee = stampData.CurrentParts - end - - delay(0,function() - for i = 1, 3 do - if stampData["ErrorBox"] then stampData.ErrorBox.Visible = true end - wait(0.13) - if stampData["ErrorBox"] then stampData.ErrorBox.Visible = false end - wait(0.13) - end - if stampData["ErrorBox"] then - stampData.ErrorBox.Adornee = nil - stampData.ErrorBox.Parent = Tool - end - end) - end - - local function DoStamperMouseDown(Mouse) - if not Mouse then - error("Error: RbxStamper.DoStamperMouseDown: Mouse is nil") - return - end - if not Mouse:IsA("Mouse") then - error("Error: RbxStamper.DoStamperMouseDown: Mouse is of type", Mouse.className,"should be of type Mouse") - return - end - if not stampData then - return - end - - if isMegaClusterPart() then - if Mouse and HighScalabilityLine then - local megaCube = stampData.CurrentParts:FindFirstChild("MegaClusterCube", true) - local terrain = game.Workspace.Terrain - if megaCube then - HighScalabilityLine.Dimensions = 1 - local tempCell = terrain:WorldToCell(megaCube.CFrame.p) - HighScalabilityLine.Start = terrain:CellCenterToWorld(tempCell.X, tempCell.Y, tempCell.Z) - return - else - HighScalabilityLine.Dimensions = 1 - local tempCell = terrain:WorldToCell(stampData.CurrentParts.CFrame.p) - HighScalabilityLine.Start = terrain:CellCenterToWorld(tempCell.X, tempCell.Y, tempCell.Z) - return - end - end - end - end - - local function loadSurfaceTypes(part, surfaces) - part.TopSurface = surfaces[1] - part.BottomSurface = surfaces[2] - part.LeftSurface = surfaces[3] - part.RightSurface = surfaces[4] - part.FrontSurface = surfaces[5] - part.BackSurface = surfaces[6] - end - - local function saveSurfaceTypes(part, myTable) - local tempTable = {} - tempTable[1] = part.TopSurface - tempTable[2] = part.BottomSurface - tempTable[3] = part.LeftSurface - tempTable[4] = part.RightSurface - tempTable[5] = part.FrontSurface - tempTable[6] = part.BackSurface - - myTable[part] = tempTable - end - - local function makeSurfaceUnjoinable(part, surface) - -- TODO: FILL OUT! - end - - local function prepareModel(model) - if not model then return nil end - - local gDesiredTrans = 0.7 - local gStaticTrans = 1 - - local clone = model:Clone() - local scripts = {} - local parts = {} - local decals = {} - - stampData = {} - stampData.DisabledScripts = {} - stampData.TransparencyTable = {} - stampData.MaterialTable = {} - stampData.CanCollideTable = {} - stampData.AnchoredTable = {} - stampData.ArchivableTable = {} - stampData.DecalTransparencyTable = {} - stampData.SurfaceTypeTable = {} - - collectParts(clone, parts, scripts, decals) - - if #parts <= 0 then return nil, "no parts found in modelToStamp" end - - for index,script in pairs(scripts) do - if not(script.Disabled) then - script.Disabled = true - stampData.DisabledScripts[#stampData.DisabledScripts + 1] = script - end - end - for index, part in pairs(parts) do - stampData.TransparencyTable[part] = part.Transparency - part.Transparency = gStaticTrans + (1 - gStaticTrans) * part.Transparency - stampData.MaterialTable[part] = part.Material - part.Material = Enum.Material.Plastic - stampData.CanCollideTable[part] = part.CanCollide - part.CanCollide = false - stampData.AnchoredTable[part] = part.Anchored - part.Anchored = true - stampData.ArchivableTable[part] = part.Archivable - part.Archivable = false - - saveSurfaceTypes(part, stampData.SurfaceTypeTable) - - local fadeInDelayTime = 0.5 - local transFadeInTime = 0.5 - delay(0,function() - wait(fadeInDelayTime) -- give it some time to be completely transparent - - local begTime = tick() - local currTime = begTime - while (currTime - begTime) < transFadeInTime and part and part:IsA("BasePart") and part.Transparency > gDesiredTrans do - local newTrans = 1 - (((currTime - begTime)/transFadeInTime) * (gStaticTrans - gDesiredTrans)) - if stampData["TransparencyTable"] and stampData.TransparencyTable[part] then - part.Transparency = newTrans + (1 - newTrans) * stampData.TransparencyTable[part] - end - wait(0.03) - currTime = tick() - end - if part and part:IsA("BasePart") then - if stampData["TransparencyTable"] and stampData.TransparencyTable[part] then - part.Transparency = gDesiredTrans + (1 - gDesiredTrans) * stampData.TransparencyTable[part] - end - end - end) - end - - for index, decal in pairs(decals) do - stampData.DecalTransparencyTable[decal] = decal.Transparency - decal.Transparency = gDesiredTrans + (1 - gDesiredTrans) * decal.Transparency - end - - -- disable all seats - setSeatEnabledStatus(clone, true) - setSeatEnabledStatus(clone, false) - - stampData.CurrentParts = clone - - -- if auto-alignable, we enforce a pre-rotation to the canonical "0-frame" - if autoAlignToFace(clone) then - stampData.CurrentParts:ResetOrientationToIdentity() - gInitial90DegreeRotations = 0 - else -- pre-rotate if necessary - local ry = gInitial90DegreeRotations * math.pi/2 - if stampData.CurrentParts:IsA("Model") or stampData.CurrentParts:IsA("Tool") then - --stampData.CurrentParts:Rotate(0, ry, 0) - modelRotate(stampData.CurrentParts, ry) - else - stampData.CurrentParts.CFrame = CFrame.fromEulerAnglesXYZ(0, ry, 0) * stampData.CurrentParts.CFrame - end - end - - -- since we're cloning the old model instead of the new one, we will need to update the orientation based on the original value AND how many more - -- rotations we expect since then [either that or we need to store the just-stamped clusterMaterial.Value.Z somewhere]. This should fix the terrain rotation - -- issue (fingers crossed) [HotThoth] - - local clusterMaterial = stampData.CurrentParts:FindFirstChild("ClusterMaterial", true) - if clusterMaterial and clusterMaterial:IsA("Vector3Value") then - clusterMaterial.Value = Vector3.new(clusterMaterial.Value.X, clusterMaterial.Value.Y, (clusterMaterial.Value.Z + gInitial90DegreeRotations) % 4) - end - - -- After rotating, update the position - local configFound, targetCFrame = findConfigAtMouseTarget(Mouse, stampData) - if configFound then - stampData.CurrentParts = positionPartsAtCFrame3(targetCFrame, stampData.CurrentParts) - end - - -- to show joints during the mouse move - game.JointsService:SetJoinAfterMoveInstance(stampData.CurrentParts) - - return clone, parts - end - - local function checkTerrainBlockCollisions(cellPos, checkHighScalabilityStamp) - local cellCenterToWorld = game.Workspace.Terrain.CellCenterToWorld - local cellCenter = cellCenterToWorld(game.Workspace.Terrain, cellPos.X, cellPos.Y, cellPos.Z) - local cellBlockingParts = game.Workspace:FindPartsInRegion3(Region3.new(cellCenter - Vector3.new(2, 2, 2) + insertBoundingBoxOverlapVector, cellCenter + Vector3.new(2, 2, 2) - insertBoundingBoxOverlapVector), stampData.CurrentParts, 100) - - local skipThisCell = false - - for b = 1, #cellBlockingParts do - if isBlocker(cellBlockingParts[b]) then skipThisCell = true break end - end - - if not skipThisCell then - -- pop players up above any set cells - local alreadyPushedUp = {} - -- if no blocking model below, then see if stamping on top of a character - for b = 1, #cellBlockingParts do - if cellBlockingParts[b].Parent and - not alreadyPushedUp[cellBlockingParts[b].Parent] and - cellBlockingParts[b].Parent:FindFirstChild("Humanoid") and - cellBlockingParts[b].Parent:FindFirstChild("Humanoid"):IsA("Humanoid") then - ----------------------------------------------------------------------------------- - local blockingPersonTorso = cellBlockingParts[b].Parent:FindFirstChild("Torso") - alreadyPushedUp[cellBlockingParts[b].Parent] = true - - if blockingPersonTorso then - -- if so, let's push the person upwards so they pop on top of the stamped model/part (but only if there's space above them) - local newY = cellCenter.Y + 5 - if spaceAboveCharacter(blockingPersonTorso, newY, stampData) then - blockingPersonTorso.CFrame = blockingPersonTorso.CFrame + Vector3.new(0, newY - blockingPersonTorso.CFrame.p.Y, 0) - else - -- if no space, we just skip this one - skipThisCell = true - break - end - end - ----------------------------------------------------------------------------------- - end - end - end - - if not skipThisCell then -- if we STILL aren't skipping... then we're good to go! - local canSetCell = true - - if checkHighScalabilityStamp then -- check to see if cell is in region, if not we'll skip set - if allowedStampRegion then - local cellPos = cellCenterToWorld(game.Workspace.Terrain, cellPos.X, cellPos.Y, cellPos.Z) - if cellPos.X + 2 > allowedStampRegion.CFrame.p.X + allowedStampRegion.Size.X/2 then - canSetCell = false - elseif cellPos.X - 2 < allowedStampRegion.CFrame.p.X - allowedStampRegion.Size.X/2 then - canSetCell = false - elseif cellPos.Y + 2 > allowedStampRegion.CFrame.p.Y + allowedStampRegion.Size.Y/2 then - canSetCell = false - elseif cellPos.Y - 2 < allowedStampRegion.CFrame.p.Y - allowedStampRegion.Size.Y/2 then - canSetCell = false - elseif cellPos.Z + 2 > allowedStampRegion.CFrame.p.Z + allowedStampRegion.Size.Z/2 then - canSetCell = false - elseif cellPos.Z - 2 < allowedStampRegion.CFrame.p.Z - allowedStampRegion.Size.Z/2 then - canSetCell = false - end - end - end - - return canSetCell - end - return false - end - - - local function ResolveMegaClusterStamp(checkHighScalabilityStamp) - local cellSet = false - - local cluser = game.Workspace.Terrain - - local line = HighScalabilityLine.InternalLine - local cMax = game.Workspace.Terrain.MaxExtents.Max - local cMin = game.Workspace.Terrain.MaxExtents.Min - - local clusterMaterial = 1 -- default is grass - local clusterType = 0 -- default is brick - local clusterOrientation = 0 -- default is 0 rotation - - local autoWedgeClusterParts = false - if stampData.CurrentParts:FindFirstChild("AutoWedge") then autoWedgeClusterParts = true end - - if stampData.CurrentParts:FindFirstChild("ClusterMaterial", true) then - clusterMaterial = stampData.CurrentParts:FindFirstChild("ClusterMaterial", true) - if clusterMaterial:IsA("Vector3Value") then - clusterType = clusterMaterial.Value.Y - clusterOrientation = clusterMaterial.Value.Z - clusterMaterial = clusterMaterial.Value.X - elseif clusterMaterial:IsA("IntValue") then - clusterMaterial = clusterMaterial.Value - end - end - - if HighScalabilityLine.Adorn.Parent and HighScalabilityLine.Start and ((HighScalabilityLine.Dimensions > 1) or (line and line.magnitude > 0)) then - local startCell = game.Workspace.Terrain:WorldToCell(HighScalabilityLine.Start) - local xInc = {0,0,0} - local yInc = {0,0,0} - local zInc = {0,0,0} - - local cluster = game.Workspace.Terrain - - local incrementVect = {nil, nil, nil} - local stepVect = {Vector3.new(0, 0, 0), Vector3.new(0, 0, 0), Vector3.new(0, 0, 0)} - - local worldAxes = {Vector3.new(1, 0, 0), Vector3.new(0, 1, 0), Vector3.new(0, 0, 1)} - - local lines = {} - if HighScalabilityLine.Dimensions > 1 then table.insert(lines, HighScalabilityLine.MoreLines[1]) end - if line and line.magnitude > 0 then table.insert(lines, line) end - if HighScalabilityLine.Dimensions > 2 then table.insert(lines, HighScalabilityLine.MoreLines[2]) end - - for i = 1, #lines do - lines[i] = Vector3.new(math.floor(lines[i].X+.5), math.floor(lines[i].Y+.5), math.floor(lines[i].Z+.5)) -- round to integers - - if lines[i].X > 0 then xInc[i] = 1 elseif lines[i].X < 0 then xInc[i] = -1 end - if lines[i].Y > 0 then yInc[i] = 1 elseif lines[i].Y < 0 then yInc[i] = -1 end - if lines[i].Z > 0 then zInc[i] = 1 elseif lines[i].Z < 0 then zInc[i] = -1 end - - incrementVect[i] = Vector3.new(xInc[i], yInc[i], zInc[i]) - if incrementVect[i].magnitude < .9 then incrementVect[i] = nil end - end - - - if not lines[2] then lines[2] = Vector3.new(0, 0, 0) end - if not lines[3] then lines[3] = Vector3.new(0, 0, 0) end - - local waterForceTag = stampData.CurrentParts:FindFirstChild("WaterForceTag", true) - local waterForceDirectionTag = stampData.CurrentParts:FindFirstChild("WaterForceDirectionTag", true) - - while (stepVect[3].magnitude*4 <= lines[3].magnitude) do - local outerStepVectIndex = 1 - while outerStepVectIndex < 4 do - stepVect[2] = Vector3.new(0, 0, 0) - while (stepVect[2].magnitude*4 <= lines[2].magnitude) do - local innerStepVectIndex = 1 - while innerStepVectIndex < 4 do - stepVect[1] = Vector3.new(0, 0, 0) - while (stepVect[1].magnitude*4 <= lines[1].magnitude) do - local stepVectSum = stepVect[1] + stepVect[2] + stepVect[3] - local cellPos = Vector3int16.new(startCell.X + stepVectSum.X, startCell.Y + stepVectSum.Y, startCell.Z + stepVectSum.Z) - if cellPos.X >= cMin.X and cellPos.Y >= cMin.Y and cellPos.Z >= cMin.Z and cellPos.X < cMax.X and cellPos.Y < cMax.Y and cellPos.Z < cMax.Z then - -- check if overlaps player or part - local okToStampTerrainBlock = checkTerrainBlockCollisions(cellPos, checkHighScalabilityStamp) - - if okToStampTerrainBlock then - if waterForceTag then - cluster:SetWaterCell(cellPos.X, cellPos.Y, cellPos.Z, Enum.WaterForce[waterForceTag.Value], Enum.WaterDirection[waterForceDirectionTag.Value]) - else - cluster:SetCell(cellPos.X, cellPos.Y, cellPos.Z, clusterMaterial, clusterType, clusterOrientation) - end - cellSet = true - - -- auto-wedge it? - if (autoWedgeClusterParts) then - game.Workspace.Terrain:AutowedgeCells(Region3int16.new(Vector3int16.new(cellPos.x - 1, cellPos.y - 1, cellPos.z - 1), - Vector3int16.new(cellPos.x + 1, cellPos.y + 1, cellPos.z + 1))) - end - end - end - stepVect[1] = stepVect[1] + incrementVect[1] - end - if incrementVect[2] then - while innerStepVectIndex < 4 and worldAxes[innerStepVectIndex]:Dot(incrementVect[2]) == 0 do - innerStepVectIndex = innerStepVectIndex + 1 - end - if innerStepVectIndex < 4 then - stepVect[2] = stepVect[2] + worldAxes[innerStepVectIndex] * worldAxes[innerStepVectIndex]:Dot(incrementVect[2]) - end - innerStepVectIndex = innerStepVectIndex + 1 - else - stepVect[2] = Vector3.new(1, 0, 0) - innerStepVectIndex = 4 -- skip all remaining loops - end - if (stepVect[2].magnitude*4 > lines[2].magnitude) then innerStepVectIndex = 4 end - end - end - if incrementVect[3] then - while outerStepVectIndex < 4 and worldAxes[outerStepVectIndex]:Dot(incrementVect[3]) == 0 do - outerStepVectIndex = outerStepVectIndex + 1 - end - if outerStepVectIndex < 4 then - stepVect[3] = stepVect[3] + worldAxes[outerStepVectIndex] * worldAxes[outerStepVectIndex]:Dot(incrementVect[3]) - end - outerStepVectIndex = outerStepVectIndex + 1 - else -- skip all remaining loops - stepVect[3] = Vector3.new(1, 0, 0) outerStepVectIndex = 4 - end - if (stepVect[3].magnitude*4 > lines[3].magnitude) then outerStepVectIndex = 4 end - end - end - end - - -- and also get rid of any HighScalabilityLine stuff if it's there - HighScalabilityLine.Start = nil - HighScalabilityLine.Adorn.Parent = nil - - -- Mark for undo. - if cellSet then - stampData.CurrentParts.Parent = nil - pcall(function() game:GetService("ChangeHistoryService"): SetWaypoint("StamperMulti") end) - end - - return cellSet - end - - local function DoStamperMouseUp(Mouse) - if not Mouse then - error("Error: RbxStamper.DoStamperMouseUp: Mouse is nil") - return false - end - if not Mouse:IsA("Mouse") then - error("Error: RbxStamper.DoStamperMouseUp: Mouse is of type", Mouse.className,"should be of type Mouse") - return false - end - - if not stampData.Dragger then - error("Error: RbxStamper.DoStamperMouseUp: stampData.Dragger is nil") - return false - end - - if not HighScalabilityLine then - return false - end - - local checkHighScalabilityStamp = nil - if stampInModel then - local canStamp = nil - local isHSLPart = isMegaClusterPart() - - if isHSLPart and - HighScalabilityLine and - HighScalabilityLine.Start and - HighScalabilityLine.InternalLine and - HighScalabilityLine.InternalLine.magnitude > 0 then -- we have an HSL line, test later - canStamp = true - checkHighScalabilityStamp = true - else - canStamp, checkHighScalabilityStamp = t.CanEditRegion(stampData.CurrentParts, allowedStampRegion) - end - - if not canStamp then - if stampFailedFunc then - stampFailedFunc() - end - return false - end - end - - -- if unstampable face, then don't let us stamp there! - if unstampableSurface then - flashRedBox() - return false - end - - -- recheck if we can stamp, as we just moved part - canStamp, checkHighScalabilityStamp = t.CanEditRegion(stampData.CurrentParts, allowedStampRegion) - if not canStamp then - if stampFailedFunc then - stampFailedFunc() - end - return false - end - - -- Prevent part from being stamped on top of a player - - local minBB, maxBB = getBoundingBoxInWorldCoordinates(stampData.CurrentParts) - - -- HotThoth's note: Now that above CurrentParts positioning has been commented out, to be truly correct, we would need to use the - -- value of configFound from the previous onStamperMouseMove call which moved the CurrentParts - -- Shouldn't this be true when lastTargetCFrame has been set and false otherwise? - configFound, targetCFrame = findConfigAtMouseTarget(Mouse, stampData) - - if configFound and not HighScalabilityLine.Adorn.Parent then - if clusterPartsInRegion(minBB + insertBoundingBoxOverlapVector, maxBB - insertBoundingBoxOverlapVector) then - flashRedBox() - return false - end - - local blockingParts = game.Workspace:FindPartsInRegion3(Region3.new(minBB + insertBoundingBoxOverlapVector, - maxBB - insertBoundingBoxOverlapVector), - stampData.CurrentParts, - 100) - - - for b = 1, #blockingParts do - if isBlocker(blockingParts[b]) then - flashRedBox() - return false - end - end - - local alreadyPushedUp = {} - -- if no blocking model below, then see if stamping on top of a character - for b = 1, #blockingParts do - if blockingParts[b].Parent and - not alreadyPushedUp[blockingParts[b].Parent] and - blockingParts[b].Parent:FindFirstChild("Humanoid") and - blockingParts[b].Parent:FindFirstChild("Humanoid"):IsA("Humanoid") then - --------------------------------------------------------------------------- - local blockingPersonTorso = blockingParts[b].Parent:FindFirstChild("Torso") - alreadyPushedUp[blockingParts[b].Parent] = true - - if blockingPersonTorso then - -- if so, let's push the person upwards so they pop on top of the stamped model/part (but only if there's space above them) - local newY = maxBB.Y + 3 - if spaceAboveCharacter(blockingPersonTorso, newY, stampData) then - blockingPersonTorso.CFrame = blockingPersonTorso.CFrame + Vector3.new(0, newY - blockingPersonTorso.CFrame.p.Y, 0) - else - -- if no space, we just error - flashRedBox() - return false - end - end - --------------------------------------------------------------------------- - end - end - - elseif (not configFound) and not (HighScalabilityLine.Start and HighScalabilityLine.Adorn.Parent) then -- if no config then only stamp if it's a real HSL! - resetHighScalabilityLine() - return false - end - - -- something will be stamped! so set the "StampedSomething" toggle to true - if game:FindFirstChild("Players") then - if game.Players["LocalPlayer"] then - if game.Players.LocalPlayer["Character"] then - local localChar = game.Players.LocalPlayer.Character - local stampTracker = localChar:FindFirstChild("StampTracker") - if stampTracker and not stampTracker.Value then - stampTracker.Value = true - end - end - end - end - - -- if we drew a line of mega parts, stamp them out - if HighScalabilityLine.Start and HighScalabilityLine.Adorn.Parent and isMegaClusterPart() then - if ResolveMegaClusterStamp(checkHighScalabilityStamp) or checkHighScalabilityStamp then - -- kill the ghost part - stampData.CurrentParts.Parent = nil - return true - end - end - - -- not High-Scalability-Line-Based, so behave normally [and get rid of any HSL stuff] - HighScalabilityLine.Start = nil - HighScalabilityLine.Adorn.Parent = nil - - local cluster = game.Workspace.Terrain - - -- if target point is in cluster, just use cluster:SetCell - if isMegaClusterPart() then - -- if targetCFrame is inside cluster, just set that cell to 1 and return - --local cellPos = cluster:WorldToCell(targetCFrame.p) - - local cellPos - if stampData.CurrentParts:IsA("Model") then cellPos = cluster:WorldToCell(stampData.CurrentParts:GetModelCFrame().p) - else cellPos = cluster:WorldToCell(stampData.CurrentParts.CFrame.p) end - - local cMax = game.Workspace.Terrain.MaxExtents.Max - local cMin = game.Workspace.Terrain.MaxExtents.Min - - if checkTerrainBlockCollisions(cellPos, false) then - - local clusterValues = stampData.CurrentParts:FindFirstChild("ClusterMaterial", true) - local waterForceTag = stampData.CurrentParts:FindFirstChild("WaterForceTag", true) - local waterForceDirectionTag = stampData.CurrentParts:FindFirstChild("WaterForceDirectionTag", true) - - if cellPos.X >= cMin.X and cellPos.Y >= cMin.Y and cellPos.Z >= cMin.Z and cellPos.X < cMax.X and cellPos.Y < cMax.Y and cellPos.Z < cMax.Z then - - if waterForceTag then - cluster:SetWaterCell(cellPos.X, cellPos.Y, cellPos.Z, Enum.WaterForce[waterForceTag.Value], Enum.WaterDirection[waterForceDirectionTag.Value]) - elseif not clusterValues then - cluster:SetCell(cellPos.X, cellPos.Y, cellPos.Z, cellInfo.Material, cellInfo.clusterType, gInitial90DegreeRotations % 4) - elseif clusterValues:IsA("Vector3Value") then - cluster:SetCell(cellPos.X, cellPos.Y, cellPos.Z, clusterValues.Value.X, clusterValues.Value.Y, clusterValues.Value.Z) - else - cluster:SetCell(cellPos.X, cellPos.Y, cellPos.Z, clusterValues.Value, 0, 0) - end - - local autoWedgeClusterParts = false - if stampData.CurrentParts:FindFirstChild("AutoWedge") then autoWedgeClusterParts = true end - - -- auto-wedge it - if (autoWedgeClusterParts) then - game.Workspace.Terrain:AutowedgeCells( - Region3int16.new( - Vector3int16.new(cellPos.x - 1, cellPos.y - 1, cellPos.z - 1), - Vector3int16.new(cellPos.x + 1, cellPos.y + 1, cellPos.z + 1) - ) - ) - end - - -- kill the ghost part - stampData.CurrentParts.Parent = nil - - -- Mark for undo. It has to happen here or the selection display will come back also. - pcall(function() game:GetService("ChangeHistoryService"):SetWaypoint("StamperSingle") end) - return true - end - else - -- you tried to stamp a HSL-single part where one does not belong! - flashRedBox() - return false - end - end - - local function getPlayer() - if game:FindFirstChild("Players") then - if game.Players["LocalPlayer"] then - return game.Players.LocalPlayer - end - end - return nil - end - - - -- Post process: after positioning the part or model, restore transparency, material, anchored and collide states and create joints - if stampData.CurrentParts:IsA("Model") or stampData.CurrentParts:IsA("Tool") then - if stampData.CurrentParts:IsA("Model") then - -- Tyler's magical hack-code for allowing/preserving clones of both Surface and Manual Welds... just don't ask X< - local manualWeldTable = {} - local manualWeldParentTable = {} - saveTheWelds(stampData.CurrentParts, manualWeldTable, manualWeldParentTable) - stampData.CurrentParts:BreakJoints() - stampData.CurrentParts:MakeJoints() - restoreTheWelds(manualWeldTable, manualWeldParentTable) - end - - -- if it's a model, we also want to fill in the playerID and playerName tags, if it has those (e.g. for the friend-only door) - playerIdTag = stampData.CurrentParts:FindFirstChild("PlayerIdTag") - playerNameTag = stampData.CurrentParts:FindFirstChild("PlayerNameTag") - if playerIdTag ~= nil then - tempPlayerValue = getPlayer() - if tempPlayerValue ~= nil then playerIdTag.Value = tempPlayerValue.userId end - end - if playerNameTag ~= nil then - if game:FindFirstChild("Players") and game.Players["LocalPlayer"] then - tempPlayerValue = game.Players.LocalPlayer - if tempPlayerValue ~= nil then playerNameTag.Value = tempPlayerValue.Name end - end - end - -- ...and tag all inserted models for subsequent origin identification - -- if no RobloxModel tag already exists, then add it. - if stampData.CurrentParts:FindFirstChild("RobloxModel") == nil then - local stringTag = Instance.new("BoolValue", stampData.CurrentParts) - stringTag.Name = "RobloxModel" - - if stampData.CurrentParts:FindFirstChild("RobloxStamper") == nil then - local stringTag2 = Instance.new("BoolValue", stampData.CurrentParts) - stringTag2.Name = "RobloxStamper" - end - end - - else - stampData.CurrentParts:BreakJoints() - if stampData.CurrentParts:FindFirstChild("RobloxStamper") == nil then - local stringTag2 = Instance.new("BoolValue", stampData.CurrentParts) - stringTag2.Name = "RobloxStamper" - end - end - - -- make sure all the joints are activated before restoring anchor states - if not createJoints then game.JointsService:CreateJoinAfterMoveJoints() end - - -- Restore the original properties for all parts being stamped - for part, transparency in pairs(stampData.TransparencyTable) do - part.Transparency = transparency - end - for part, archivable in pairs(stampData.ArchivableTable) do - part.Archivable = archivable - end - for part, material in pairs(stampData.MaterialTable) do - part.Material = material - end - for part, collide in pairs(stampData.CanCollideTable) do - part.CanCollide = collide - end - for part, anchored in pairs(stampData.AnchoredTable) do - part.Anchored = anchored - end - for decal, transparency in pairs(stampData.DecalTransparencyTable) do - decal.Transparency = transparency - end - - for part, surfaces in pairs(stampData.SurfaceTypeTable) do - loadSurfaceTypes(part, surfaces) - end - - if isMegaClusterPart() then - stampData.CurrentParts.Transparency = 0 - end - - -- re-enable all seats - setSeatEnabledStatus(stampData.CurrentParts, true) - - stampData.TransparencyTable = nil - stampData.ArchivableTable = nil - stampData.MaterialTable = nil - stampData.CanCollideTable = nil - stampData.AnchoredTable = nil - stampData.SurfaceTypeTable = nil - - -- ...and tag all inserted models for subsequent origin identification - -- if no RobloxModel tag already exists, then add it. - if stampData.CurrentParts:FindFirstChild("RobloxModel") == nil then - local stringTag = Instance.new("BoolValue", stampData.CurrentParts) - stringTag.Name = "RobloxModel" - end - - -- and make sure we don't delete it, now that it's not a ghost part - if ghostRemovalScript then ghostRemovalScript.Parent = nil end - - --Re-enable the scripts - for index,script in pairs(stampData.DisabledScripts) do - script.Disabled = false - end - - --Now that they are all marked enabled, reinsert them into the world so they start running - for index,script in pairs(stampData.DisabledScripts) do - local oldParent = script.Parent - script.Parent = nil - script:Clone().Parent = oldParent - end - - -- clear out more data - stampData.DisabledScripts = nil - stampData.Dragger = nil - stampData.CurrentParts = nil - - pcall(function() game:GetService("ChangeHistoryService"): SetWaypoint("StampedObject") end) - return true - end - - local function pauseStamper() - for i = 1, #mouseCons do -- stop the mouse from doing anything - mouseCons[i]:disconnect() - mouseCons[i] = nil - end - mouseCons = {} - - if stampData and stampData.CurrentParts then -- remove our ghost part - stampData.CurrentParts.Parent = nil - stampData.CurrentParts:Remove() - end - - resetHighScalabilityLine() - - game.JointsService:ClearJoinAfterMoveJoints() - end - - - local function prepareUnjoinableSurfaces(modelCFrame, parts, whichSurface) - local AXIS_VECTORS = {Vector3.new(1, 0, 0), Vector3.new(0, 1, 0), Vector3.new(0, 0, 1)} -- maybe last one is negative? TODO: check this! - local isPositive = 1 - if whichSurface < 0 then isPositive = isPositive * -1 whichSurface = whichSurface*-1 end - local surfaceNormal = isPositive * modelCFrame:vectorToWorldSpace(AXIS_VECTORS[whichSurface]) - - for i = 1, #parts do - local currPart = parts[i] - - -- now just need to find which surface of currPart most closely match surfaceNormal and then set that to Unjoinable - local surfaceNormalInLocalCoords = currPart.CFrame:vectorToObjectSpace(surfaceNormal) - if math.abs(surfaceNormalInLocalCoords.X) > math.abs(surfaceNormalInLocalCoords.Y) then - if math.abs(surfaceNormalInLocalCoords.X) > math.abs(surfaceNormalInLocalCoords.Z) then - if surfaceNormalInLocalCoords.X > 0 then currPart.RightSurface = "Unjoinable" else currPart.LeftSurface = "Unjoinable" end - else - if surfaceNormalInLocalCoords.Z > 0 then currPart.BackSurface = "Unjoinable" else currPart.FrontSurface = "Unjoinable" end - end - else - if math.abs(surfaceNormalInLocalCoords.Y) > math.abs(surfaceNormalInLocalCoords.Z) then - if surfaceNormalInLocalCoords.Y > 0 then currPart.TopSurface = "Unjoinable" else currPart.BottomSurface = "Unjoinable" end - else - if surfaceNormalInLocalCoords.Z > 0 then currPart.BackSurface = "Unjoinable" else currPart.FrontSurface = "Unjoinable" end - end - end - end - end - - local function resumeStamper() - clone, parts = prepareModel(modelToStamp) - - if not clone or not parts then - return - end - - -- if we have unjoinable faces, then we want to change those surfaces to be Unjoinable - local unjoinableTag = clone:FindFirstChild("UnjoinableFaces", true) - if unjoinableTag then - for unjoinableSurface in string.gmatch(unjoinableTag.Value, "[^,]*") do - if tonumber(unjoinableSurface) then - if clone:IsA("Model") then - prepareUnjoinableSurfaces(clone:GetModelCFrame(), parts, tonumber(unjoinableSurface)) - else - prepareUnjoinableSurfaces(clone.CFrame, parts, tonumber(unjoinableSurface)) - end - end - end - end - - stampData.ErrorBox = errorBox - if stampInModel then - clone.Parent = stampInModel - else - clone.Parent = game.Workspace - end - - if clone:FindFirstChild("ClusterMaterial", true) then -- extract all info from vector - clusterMaterial = clone:FindFirstChild("ClusterMaterial", true) - if (clusterMaterial:IsA("Vector3Value")) then - cellInfo.Material = clusterMaterial.Value.X - cellInfo.clusterType = clusterMaterial.Value.Y - cellInfo.clusterOrientation = clusterMaterial.Value.Z - elseif clusterMaterial:IsA("IntValue") then - cellInfo.Material = clusterMaterial.Value - end - end - - pcall(function() mouseTarget = Mouse.Target end) - - if mouseTarget and mouseTarget.Parent:FindFirstChild("RobloxModel") == nil then - game.JointsService:SetJoinAfterMoveTarget(mouseTarget) - else - game.JointsService:SetJoinAfterMoveTarget(nil) - end - game.JointsService:ShowPermissibleJoints() - - for index, object in pairs(stampData.DisabledScripts) do - if object.Name == "GhostRemovalScript" then - object.Parent = stampData.CurrentParts - end - end - - stampData.Dragger = Instance.new("Dragger") - - --Begin a movement by faking a MouseDown signal - stampData.Dragger:MouseDown(parts[1], Vector3.new(0,0,0), parts) - stampData.Dragger:MouseUp() - - DoStamperMouseMove(Mouse) - - table.insert(mouseCons,Mouse.Move:connect(function() - if movingLock or stampUpLock then return end - movingLock = true - DoStamperMouseMove(Mouse) - movingLock = false - end)) - - table.insert(mouseCons,Mouse.Button1Down:connect(function() - DoStamperMouseDown(Mouse) - end)) - - table.insert(mouseCons,Mouse.Button1Up:connect(function() - stampUpLock = true - while movingLock do wait() end - stamped.Value = DoStamperMouseUp(Mouse) - resetHighScalabilityLine() - stampUpLock = false - end)) - - stamped.Value = false - end - - local function resetStamperState(newModelToStamp) - - -- if we have a new model, swap it out - if newModelToStamp then - if not newModelToStamp:IsA("Model") and not newModelToStamp:IsA("BasePart") then - error("resetStamperState: newModelToStamp (first arg) is not nil, but not a model or part!") - end - modelToStamp = newModelToStamp - end - - -- first clear our state - pauseStamper() - -- now lets load in the new model - resumeStamper() - - end - - -- load the model initially - resetStamperState() - - - -- setup the control table we pass back to the user - control.Stamped = stamped -- BoolValue that fires when user stamps - control.Paused = false - - control.LoadNewModel = function(newStampModel) -- allows us to specify a new stamper model to be used with this stamper - if newStampModel and not newStampModel:IsA("Model") and not newStampModel:IsA("BasePart") then - error("Control.LoadNewModel: newStampModel (first arg) is not a Model or Part!") - return nil - end - resetStamperState(newStampModel) - end - - control.ReloadModel = function() -- will automatically set stamper to get a new model of current model and start stamping with new model - resetStamperState() - end - - control.Pause = function() -- temporarily stops stamping, use resume to start up again - if not control.Paused then - pauseStamper() - control.Paused = true - else - print("RbxStamper Warning: Tried to call Control.Pause() when already paused") - end - end - - control.Resume = function() -- resumes stamping, if currently paused - if control.Paused then - resumeStamper() - control.Paused = false - else - print("RbxStamper Warning: Tried to call Control.Resume() without Pausing First") - end - end - - control.ResetRotation = function() -- resets the model rotation so new models are at default orientation - -- gInitial90DegreeRotations = 0 - -- Note: This function will not always work quite the way we want it to; we will have to build this out further so it works with - -- High-Scalability and with the new model orientation setting methods (model:ResetOrientationToIdentity()) [HotThoth] - end - - control.Destroy = function() -- Stops current Stamp operation and destroys control construct - for i = 1, #mouseCons do - mouseCons[i]:disconnect() - mouseCons[i] = nil - end - - if keyCon then - keyCon:disconnect() - end - - game.JointsService:ClearJoinAfterMoveJoints() - - if adorn then adorn:Destroy() end - if adornPart then adornPart:Destroy() end - if errorBox then errorBox:Destroy() end - if stampData then - if stampData["Dragger"] then - stampData.Dragger:Destroy() - end - if stampData.CurrentParts then - stampData.CurrentParts:Destroy() - end - end - if control and control["Stamped"] then - control.Stamped:Destroy() - end - control = nil - end - - return control -end - -t.Help = - function(funcNameOrFunc) - --input argument can be a string or a function. Should return a description (of arguments and expected side effects) - if funcNameOrFunc == "GetStampModel" or funcNameOrFunc == t.GetStampModel then - return "Function GetStampModel. Arguments: assetId, useAssetVersionId. assetId is the asset to load in, define useAssetVersionId as true if assetId is a version id instead of a relative assetId. Side effect: returns a model of the assetId, or a string with error message if something fails" - end - if funcNameOrFunc == "SetupStamperDragger" or funcNameOrFunc == t.SetupStamperDragger then - return "Function SetupStamperDragger. Side Effect: Creates 4x4 stamping mechanism for building out parts quickly. Arguments: ModelToStamp, Mouse, LegalStampCheckFunction. ModelToStamp should be a Model or Part, preferrably loaded from RbxStamper.GetStampModel and should have extents that are multiples of 4. Mouse should be a mouse object (obtained from things such as Tool.OnEquipped), used to drag parts around 'stamp' them out. LegalStampCheckFunction is optional, used as a callback with a table argument (table is full of instances about to be stamped). Function should return either true or false, false stopping the stamp action." - end - end - -return t diff --git a/assets/ugc/asset-0.png b/assets/ugc/asset-0.png deleted file mode 100644 index df5e55d8e310d3ddb47ec7f2ce6ef9b23247ec67..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 24887 zcmd>lg;$hcv^J7MNjCyRmw-r1cXvyNf^-jE0}LgdA`Q}|bPpX8ihzK0cX!;E-~H}i z@v#=n;$82F{p`J;9p_A>x~d#D1~~=-0s^*zytF0)!i)IlUl1zrB&d^b6!<`PlT^?K z0Y82qD;NR-4T6HSgf=AWpxwVhSjlJUqS9M%>&n&is_LrBw9Zpfk_(v@xlUX%ic4WO z)&+`uAG!*{<@T%zwXnD+XP5cnTiveN7Ei)=kD@4kj3d8}^B#o9K!bvUi;T#K-m6Oa z@qqbryVs0w;KvUw)Q{U`Ro}|8%c>4{vUdcxZj63@%{VOE%{+Uzbu)IR`6nEf%N&)@ zZ28y77ZLazcF0G}2OcO(qDX5H%49$>V8FlJ=tQ_O8idyPtTfN>&})km%4j4jlmtBw zO;UdWys5#M_y5m83$Fuo=3$jnIjq>jGde5c^vHZ8Y$=|{BXNyvoaiK2wRH&^fHkZ=?s`0ed%!Zr|GvbBcK9G)5LYH6ik=w$M)Dhx zm1&6ua~ukQcm^g1xh^}bE$GMkE1cL@Y;iAuhoyaC)vo4jmn|q}B?PhJ;vlYR6c>wp z=Ef*MRmu$b_!cW{Ti(tuY}3&s5%`epIR%VmGAN#B3rXIi2`ur*2Hh|ULpQW#P^6o! ze_$wSe1i4pRY9WA6?&u#>I3yuMvx0p%v$av-gNbg9zNFSTCg-m`p`sahDN{ZGr&we z%M}-o@mFaNYQiNhDga=3wisT46Rz#4e6bIvvU#i=j8!aZ`4otw9~KZjWeg|)tKshT z4Y$ha=9=u2oMzXvv=f%-=DQu>j1ynsOYC=8dm1db>Kwv7zI z)%}vdAk$0)7+g^}{nHAGo4duNHx1#27=%|hN4n9xBHUdf&vkzLs5(Cx;$+Ft6&Ydr zD8~ntLB{nMc)u6<<5EAG!}`}8>+7opeF1;43v71KVSe>$FWFz}@7WwGv8rLAIN;d-$S>OZRFltQLWjruab7n>VOvffaxv zu`kodvTHOTaM%~`AN-{StwjZ-iGl7l8BYU7v{MO4rI3w32GFH^Tjvg3Z&u%~QzBm8 zOE+i2n}&-fpUV%W$Cbtw6g}Y$Zb^uAE#FR~mcgt25b(X$r5KJxLAqCj%hw<@QiTaV z*D)9>xTp?%yyJ;4TA?qGJJ(vh<4LVp zU<9zh|NeJ2;zFG79rf_))eA5i4NcHo6+R}#-NK~?M_1ZOiwg0-&utXBUY`gzrk{Cc z4DCJKaVau_AR+eQtxGh<9Vt=wkJo$@b^J+nGHs6jpeD3mIv*08el2YhPYA;RMQ>Fw zQ(BIAHnysYH@q`ztslRvoi{Y!q581q#$Z)m2STkRz&m}P(ezMbgrfVD9h7rJRoScQ zh$J1 zd+l;sGnwL<*@ILCj7}Hqh4B6!_|+}gznesuI0%~c92qosdcA!)%>AWm4#UyTi@L?t zyuuL_8v8S2ps_+T`MrdjR}|uP-M@qEugN=nWbd;HO>i991-es_H7 zjq}^7nDhvaNnA%ei%s;eILbljos0n+U|Fk@TJKCcMoi9-h49Wq7Y>m9XEFLKAL1LG zo$@_s#7SCQ5%W*jHc|nj%H|WRrCSjB7>)Wj%8jZ6-XDeLM#M+4JmqPE+6C85u<4}& zO&mpR@M*ixx7g7dH#2C9Cx26^^N75V9qnfty(8N8M3Zh>4^zp!+7nTxC6#7ua?$R& zg4gx@Kp?-yCMMd@ok;$A`okqfdu+}5kFMi|x3gIM_2Twd%oQc~GZQ(2S4pfj3(aCz z)ul1ajln)N!@oBMy#B39bX*a!{oH7*IIvV&zkGEPH+HO*vnGE^WyP;%-$M!W5U(-M zd)*;bonP^a2zO(r&SizoYYC^dgYH<^K0o9mQx@b00&D{J%}TDgw1rwB3C1b7yg&BP zT@g?Ug#?PUcV?SYOFi{NY(Y#QcGnWlzlbup+&9!pUv;nQxc&}D!^g}Jb)xZL0lYW+ zO+qxomAQ!d!YW3y!yt1ugmxQ*V6*FefuQLqslB$BOq8O9DZ=}bxY-IWTgoGpR5Hyk zo`D+bXY9MH(P7kBj7F2ht3`CRp#5ctQ%FL{#@NpPtGM;VahYG6heG#j5i@^~t~rZZ z+!g=SmLQ*FgmID&wIk=Hm5$lBmn!r5wpnIBl;!PBdPQ%MeTAVaElNc1120W=$TX(o zo*}dReiGNDoVF!s=+0Tu*u8+BYdgvF6_!;2LtX@3N&1}R2IPUS#IeH4C+h*$27*fR zw}|p8MYt{~Y29(}g4n)Wc1uY8H~PR(l>C0!br$Fbe~~6q^^sBYKAVQGcF_j#StP(3 z)uM44pa-JL>0k84joKZe14<#w!8`)ImHz5aHso7jxg-gyJk0u-tJ8t!R3HiyC-$NR zAaxr44NuvFL)3c1stjqG2G|FgCe)C5uqS@lP{3u090DR$4CQ1U*{WSd^w5<^7dxsVJgga6s_RYMQUS%cYxz-O3XLd%o9r! z3NO4t$PL`-L=X`UdKvN9EJ8U!75DY}eyWoKLMHuHAJ-56-$7!2>nUqv5C-g&P~hE{ zu0C2~d=A>G%JZ0|#~0fWf{z?(#&@RuLUC5jCbigI^2iQHgzgNF=~} z86ouqfk3*-^{Q{T^r}rR2B@j1Zf7ETUJR_&271OdIG9&BHw}2U_Bl580DnJx556fq zLP6MX?DBf#FO+E?X4Sv}@*h}_uHblRV~)?)$BU1TqzJh;J4avnY-O4eGK;mS-hFJH zb$O(_niC0fq1Cj%a|k?L*kK#C0E}@MK`?JQ1g|m26}z-LJUxZ?Ib%V|f*j8r3YK(b zZU>i$GdBYH#A$j){VnU3e{x%RqWBbqf|YAHQ{#n3GGb9Zb*=ikq+y%N&*r9oBpt^n zI(XJ8z|4xlSyy<}TUl!g@|L9}`4vO}#nf^uU6<(!d=ie&++!Jj{TzwNRz0W^A<1pn zJ6Rdd1vo^+)|JnL!{<<-Zpjz@e~hABF@Xnh2?p%WrMIk?l7;cpMkTq-cF%bq@~6bD zt~SgkMSs904d?*PTUruJQTP)2t zZYJ+UtC;PifaPfw%SY2#|5TEx0VZ1yNFz-Ap}M0C-S`jVtkSA_>x6ncuC)WOdkjmP z6*GrNI^wvw*UH+=|CzT2DZ`PJ;ZyhgG?%PAq4mMDkimZ|DhZ=p(cQg71F}bEaTvyQ zwEvr!nV3acXV^h`$cuT{@;L;v*YAlHHr&rPyA68tN*AW+50?S4$nopn9=&@H+p}Ks zYRi}sn?c29UO;dZ>uS2Rr{#zKE`l9P6j>P=0|Ef5*WY2hKP%6cw~8T@yhQq}`2VXA zQj@2Zx!&=jtiIVjr8BZm-qV7BLF$jJxLcwQh|m?2nT1}VWgMDq(hwNEwk%rmR} zS}&^%7mmNKKc^y1sV|6AcrL`x$5n}FcPJAT#m&@erzWmZ z<{gNXj*W14k5oNI&e3S*JZOWXWAxKuIr5ipSvic^P8^s4dy#)ia1@p6@}zl22>jRn z?-}u|ebCWOSedy}G^$cwCBqrMVQ|p`27pp5Zbabz-Q$;La|f(rCec5Uk!Si@*9Zt? z%U2J|^#Z*EpXR?tN5SemfiN@QEs%iQONWd9NGb6z^zoWM6eOe1#}p9F(8)Ex4{eKkhB<^%XKaE#Oadbvha|&7Zv&`{HMzAYHtO zp{J1w0N;$4K9B&R))a+aMA}z+@ZG;VRqIx`%8XQ5nr2bq+J%6EZjJ&8tWZzB%ej3|dz zF4r5WOaj?&Wj^*(v@76Z$rt$0>IFneGl8paSmzKL73fM77K!>Ul4~>tivrev-_Ry2 zO}JqQI60fFp|Cz1m8L*6CSrbBIkUpp9CXMX1DV+^(qJeO`YFQI0hrI@v;*^JvZOZ3 z35};PjL#r2EEsG3AUp z_*=K>yYY}$>r{&I%5pY8lFk)RKL`!gYrjrT0cdIgwIQUGgHNmO7oye1CxKN%1 z`<=?K`1O{I4~CINMtDTH)?vrTI(|kFC;H%8`rW1RTOH0+{y#_vwxc znK7|e4^o`WOI10o`9=UaSa0;+-~?cKC#=YRW#-v$KkF7rgw1xx-+wOI-!+orxX^P^ zp9Vru9Y^9Z5&S-)sn&u)nO%~zhheNz{`g*=^72#)Wn6x2@Z*hKS+=KyH2znuWK5uz ztccO<2z?dpM4$3~d+a)i|EYK06{m3Ay9UW`LiA(enBlqEwH%DB++QcsSEiZ$8N*0| zjgt<&u3VzeZK!EnM+EB?FGnzyTbj5ABbtKOFwr^J)U@8LnSofMifQvJfWDTsi2O?V z?D{ke?ZrQnEl>={l{jLs8PoNiS&%^aPm#=JxFuOCA()6Dn+d23t3m-WXrad`cyJw^ zjdt;)z~1+%vzGql%n65Q)TLM5jbdaBq$nyC=G%&y_Ig#p!0VEVzGfS9G&f~b7)WoN zpiG0!(z9>dM$6*ph9YrH;CqHAhuz9+7Ig_Fvj0UT1GK+=p+pw62D*w%mw$AH8@r`x z7K->=O0_8u@vBHMm${cPUd~qK#=k*tFu5jln&eO2F_x4i@w9h(B{7|&}n{T%yigDSi*B}VZ-{; zR3X1_%ofOxZ2{9yi68Nh4q4SL8VHeGAzkQq(=hXa3*&W2_ed}%&fzUj#j$X17kO);EbpOWXS0scR zA{xDI`IwD`6L;Dg$i)H0Y1PSKCl(G$h--i^gEC+ z$~DrWFU_X+tXo4p0glDNefp{U8Z+@bAxvI73BnC>VBdPuimzw9$x4ZMyItNq1#^id zt`jw-BOjumaP}yT)Upo^su>4UspQSd0ttrFGoa8s4{9Vh{)RxvJ=*=ra>wQad3==& z4Ua!VYE4s((^myYz4YVSM(!8%CyDdS!$m+CtO{*9tMbj659XHy9pGBz1l=MxccwVF zJH?9@TFZb-dMzwnW}p_9{@{^z=^CyO`r&Kynv<~&VdpD8T#p3v)CM_@N z#xa^lPWjwyPy+bTD1G*h88oo`vMt+r#4}*tAaF5zmx3u8JwkG*w?SnA+92?jIsT6HK zdBJ~S)m7Wc7;!y}p8m(4`D0Hr#^IB{W)`ja&fW2Pvq;iVAXFr*5%ayv1>i}~qQ@Jt zXtsG-5DxV-!p?iLC$u~j;hMm$+tFa!$ zj%~S8U&`=3y|8eAzw+uHe_P%63i}is;w)eNt7clj)&FZe9(Lm^p>ND?fNt31Fir7j z7zdMn65M#pa$HTmKVUW(gR3th+zEr!s@&8^UtE^74~?a+(I8A2beBNV|)dAWi3 z3?LX}+E>l6e%7AwvHu<9a~PBX{%4N2=>!-G#6oa1(7BqXG@lmiqRNpbnNX~*OIp}d`;m^@VSI4)jZ8Bt5U^Zh z=31Zxk@8MG56;38uQtUbXXuTL21TNepCqoMF3wC8*v;Ph{n#nc4ja|BNiG6XqEsey zQ}FlSRr~(E7I?li`|ejlhMnCacxh-SD?p1Ed_eM9Oh>fjF@Pq@l@5>uGZ9lMh5N-y zvpOk!#)LFoW9x*83mjQigJ@2}he{AP8;u?ww*hj+^q@aMKm*&Gr@jmIRH~-_>Mkc7)6iI)CN#IFl1DX z&rioNfn!TF#7O#FbkG?2VE;p8_gG8vISy~A{$r?v3qHmEw!vf8N^Mpw^>@SEgb9)q4y$oZxoT5Mhe`a`kU*UBCI59p z&)#Qp4)0Ey-DeZ%a|r64L(Rb2>N`Hsr|!_8gNPkY(i6lEWx=izC>2yT!*YQ##uZS& zSt7Lh6aP_3)0)|o6vq3Lq<=T=)D>p+-aMZ;S;vmdZYO=267IC>#?pW$pq>0`DYIK$ z>m_pXH^~(f>V1#H_q;f~eH+d9G8X5?zFsd!Yw)RO&}CaPjcMBt5h}Wqee(wV<%QDs zs%i7tp+G0hug%HEdC$}9bN&_lX5v^T`VN7z0y_LX?f#is*A;aY6@*R}$PjEv&qATcEm@UUr z)>5eaF^qrPub2GX)TU~t#G}Mi;pglwGQ-NjIiXUuF|l+>tYa|BQY>N0 z7k;jUyq#Cr5KmX*#Z=)p((<#IQR8T2jzH_ypOVdX+~hp+B7luxx38E&smaVSpH9Hb zF6sCzZT=HOY8^7LQrMt_DSR=}KKh0~aLarU6V$GUS14-lTZ+hb!RjZ5FiLj%Fb zeB*S^C;ajDDW$ajlJ{Ur>c8^E0G3&)2(cLvmD>pw7lz0WzuL%8TIXm3M0F8}e)Tgd zLYaJy{4j}orwW=dk;-9kWk6_64y<}Z*rV6O$o&~NVLghA;lw0N46J8S>zr!k-pr&C z<+AY&E*;&=hfYT%H3v7b=XcbX$v`ni%Qu3x$UuKJdPh;U;gMi;)%@AoX`lFq;DSQj zsn|peed>hE>lvOjH+WFj6I&JAv0})H;947?w&BxypX6R=BfeeAIfh$|3j^7`Bij|eELUepwfLfq>`p8fR{xx)fF!eM9(R}^ z(vHZ9chL+^f865nP3C%^`zIM`AVfAlvk2WAJu)@=Pb3tpT!cg${0JKIMkQtM)FNq| z@nDTIEK5(JDj~>V1DM3p$J}7ni2oFDBR?I9I`-YadT^5iq7^mQ5}Jn#?T~5Ocqb$4 zQGys9(Ezz-Tkz+9fJ?!4wUR~&4wf|<)BK7J#cRL}= zvKfn0aq*8lTa6@mCG;k_S&xOKg1EEg(v!9fbGTj|N7?`ce$v1NVF{moV$JSZ-ny&) zOL%#LhCBen1;vo0VK6D0CBG3n3!t&AE|)AAeKzIT1qVB{%H$>X1e&y?&1E~WRS)Wb zQGIpElatl1Z)y+Meie@yPP4OO5!kIXZw=dL ziD_=Q{Yv;+2-g$u4SiobITQawf7FTJY4>y0i|1MDw%LK#2VOKK$QZfWl)PvtCw5 z%XiC>=RYluLNAV(@a)q@j_&Y^`@X`RZRLf(h}%e~(WO)5kh$4}SKh+b<$iiH>O}gL z*?nWK2b#Ow37PM3QeCn^>X(u&imaBgflbR?TqoynF?q-RV?oO>nWE?= zFQ-k#Y&1HpfMqy~OhydA7(8{05p+3g+f-8M?uv`vadd>S%YK|xqnS+EXt%=hPePCK zE`BQMYR8!vTf~eRUe@nr1WAAhL3y;5SYz418R_`mE}=c{+@F&{5DfOr4y&{14zg2H zRc8jBVaXLR%A?rveUr13Lq2 zE2X0*dPXt%ZUtPcBNE{pTJNxd%4<{74M0sc@Pz97VvpQj1pc;(JY1IWhZ0JUS3y&G zpo0!uLazQ`{$tup)4uDRY#`6@p-~k1d#t0pnIy(W zG5TBLW)|R5BGBee)(8W3$N5|B|K(fADaw)3$>vMnVhHJO{`#$d&d&IBC zu!#EGSKc>pNd#%X2ehl#aL=0zmHHmZYO+6t)8Eyx0sjD`<5AR=7y4+1?e}jkE}%pd z+BbHQ`U@G%>cs(xYeF0`mBxr@Cg}D+sg}QOiku=0ko~S}hG!NNSgC*u)ny8jl zz1e!cEsf4lBLFVO}<+pBSXs2-GTt$ldPD-x)RDAS5O zF@Qe9C{Pq@Mv!)_ZlSecR);#xz#H#oDOL`pU7JPk34LDGZmoWnHH9b<;$w`f zD4NOfCufcn zFdkaVEONf!My1!{r}5OYD%|io{u1W330C$EKV&;XYS;O60kvYQL5m|gk+c>XQNO+e z?|pBYxncSQ=p$t4ySy~llcy)hyIVs;og)@-5-tuunY9i!U%chU+LW=@EiUPe-rOUm zu%=lW2^j04oV{N!d^rpn@%?&70$eKKf{v7wwxt6F(+hHM z&bZO!T;W1{uf8e2lZ2$-+MTDEB#O&`%lAK0Al-OSMCaD!8i9y#ip@^qUocF#E#jx~$4Wm9%&5 zkTlGp=_BqYn=^jYa21 zet_85`>H4|l`4<4Zv=fOVfSi2_Nkh};h>oO#bzO|x1f^3US%CgX5p+uB z0%3C;Z?w1q4z_uH?nN(O|GF6*y3XxWHeIp9_TSf!6zfTF`=!XfK?%Tsft(OO2Qp92 zbJpR?x?sOQsgYs{UNkMBW@=M6^R+|^g@>LDjQsn<<+YAaC_r9nTnBr!R*+TF)ZJPDH5pc!vTXd1%e0JRZf_U1= zWIzznj7nu{f0CQLmPIwhV9+>!+E(%xQ}>FHFi^O!hpZZbL{QF%jzZI6dL4l)axx0z ze@m!ba#zxI_M&L>bo3Re5b4z{Ym}bsdpQX2;~d;p;c|(3hygKa`?8V@qye?iwDFV! zI0b|y)De9sqFVW<@V%M|;JH+=)yN(_src(()ZY;aVNnF=dDK^wnv?Mdp3Jnsaq})& zA4A*F%+Y8B3xqvC@3TlYqTS!0&q>5HPl9=e5Ipw`w``9Yo8xsj7KnUN+F_t+!%O*D zK?{evY&nw~&<`hNtNUfN9;bU-->A7_Fnd7US&ddp zioyqiKDh7#(Y^i-(~vji=>wKr=Kd&Rmr?ur>r;elp85{ zT6!A41Nr@w=fotuz_!#!I?9l5o-pv7PpXq6@E`s)bhAuFDQ4tyllXyk7#DC~#mRi= zQVN0P9EAZv7Uj8o789PqfxdQnhMZ~LeDr`by3>8Y;7N%&ACl3^r2KqFa+R0>zYfj@ z7O?5zW1VZ!tAngg!q_jQAIP_R;*?%NC=OGCC>8{A;9eWps`NQ5?MZpmf!uFN56i$9 zvDYj>#484j$z7R?+Bhxd8<;sFS>DURSBRd#nKT;VX7=v0&9Y=DjhR0XlN=zOU81M0(Ole40_ydNb(Z^)+>3pQSeW@0s zWJ!9hw=cB!TF)grG=6KMXfOh6>aS@yjlt?;+cApKy3qlPq>|Y-h6c!b&SP)3)4yiM zhi&_}NYxY;!6WcEQh3U12BAB&ns!GzB+0-*vNGWd0)y+k~_;G?O5zP-on^>5(TVZL#e@d;9XRjCmXuQTc&Fb!+(RM5 zEA)2y{q{~i{A$CidV%T@MXmKjv;~CQcQ&5C}H{ERyMoaDMU@y zWj2gB6c#WdPS@TLx7Q!YA8G!PA`1l!eU-^{!s!NeP?y$DklRkkA`Z;gb+QMEDG`x* zSmn~=A}w-4I)UA_NVoD-7gG1hefL+i;7(KhtHoDwjYWDaZXziC+YUliMYu)+JTm$KW3BmWCod|}1TWT%MJZ1(exRS)Uv=s9 zXNa?M9*57{bc#W5T7>-hWmmc*>J@*nlE6zoG0OD1Y_!NT9Hyl3f+&g7n7&umFul63 zk#+#zD!$$g7AAfiOg%m&Gvi)DcU@ttJL+Cy;%vPNF+hiFRD4XQLoc{h#e%^rm$bk; z6nAU;lY0{8W53!$71`PNBtYfMu799)h2!o-AR4W2YRFx)fs8shMZ`q$6kAUIIeBXS zy9~#t-d|5ou5+x#DQPGBWL9P;m!h4l)#F>yjHIa?WT{6CTN7)LCQN-ItG z>GWK+*}WtrTSWD2a|$bdrM+JG>-4jlHJ4J0W~$JlhA3{5-QWel5QEsk`nZ;wM%EZE;6fPp8xNp(UpV6V>Ou&cK!Xc(iWTsya!$3kE3h z=+%KMc!&@c%cm}Z))eTavh7C_EixIq2D|3G-{vdOTg_KfdgJ&S_HeoaMFy@F<162z z6<5SPZTVt9NOhj@2Ab`6{*~+Ow-BvG!$16iNvcb3H_IQ8iUWRXVF*pVINKBmh@-Jx z#GPmm$NV^T<00ilcPzBOms&zy0LGY~m%}_gdhz2yaCfQEfnW7Ee&%$2(yfNj%a*m* zFMvBj*GAAArg3{JmH7wdtZy_1yH?-0r^njIM4Xhbn9*T&IP;IKj~QR@NUp^EK4T0g z$%(|*pUIg*S6^Iro|1!CRyD{vc2#klR>nl)f2|%)u?0QBsr{3-BooJmD2!*)R#7M0 zLhMjyRxBBRH*x4nZ`vE))n=uw&bLmocqE9<-gvPxs^JsG*PnK$9^a$X{M(!-eY;4J z5I^-I1n&ddSGj~&j2JDx-yQq{<-@;_L88XPNcQHStoV8sVgJHv3-(5$agsiqFwhzp zGD%qwWT}Zp>EI*@R$H9XYrHTZ>pYbTUwmA*>pC0m3u16uFEGViVnP-C*CFzeW(^#2 zRlD6A{toxm6T1)Ar2cAiuk(NjnlDkLC97+P|03p4>8|u&T%vtqW(XZ62V)S%Fr6%l zmC8L@_3wGpyIY=WS|)mfTG;p&PNZbe6in&ix7BqQA{>IdlKH?=YnA4cCtt;;-0%Y@ z^}JbWYusW7>$U<5Lic9(tFWQA_;lCSA?Rwn4HPrv(z^~f+L={); z*PUpP01p{+`fNHS+UY}C2*<1Rw{oBkyS7E}lH zU3ysd{?Qe0a|#==jrTvmZjS6I{ZbVYnU9UfGVBz85Pke5K+l7a3e8FCgmhAHx9qDC zQR=(J7UXv~mo6weGgSm_)0a;645{TEQRNjaQ5<|6VMHdc!KLf0dZr#TTLa{~WlalP zDP={4tn6NXB^Vtd@FZ%q^4G z-FU7p9Ab_tjCSHNmd%AkPX8B$GuW3RvgWw^?gWmhxf<2v6_9IIF&Za8^`W%d$W5m9 z_9pZA?*lnDhfo#|3GsC1EqLl(v!J#($4|A6-0G)({(eljpm`-(i~0^d+?D~crya|a zqiQN@p7yjS);r-s4av5YREkkl9T!DSfY!i|EQC zI*V`8fx5r{^J_7Nq)KOX0E4B(+v=P7>n{z*Kfm}Q-S@^{B|u&t=VfKZL&G%loaIR{ zZwcp=+!PWndrsF>KL#+AUa)iYU@gkW_%M}Aqga`L7W-iHbiyB$Ry~A0hL>0-N@SPW zd=ds3?&Pd^h@XGU85$O=`C^2^T9SvKe+hyO<4RgL1g=@>Hj_x{ByQ;lc)cuj;;Wzh zYs|=9z>i;GQAe&Vp1LmPS3nR)Uc4^&sW&43qc=^h(ooW}Q{54Y`EaDfL>1RoM_?&6 za1&}#u$t~}jRjrtfE4qh6`S~2R)BoBh1D>u9yzDAAOO5vnAO)CNRZFt$Dm`%py1j= zCk?vl!dObG?Ale8`C|a|zSnN-kW;ko$qA_l#{X_rMMdAX7p!7@gW#~6coS*cT-=$- z`0AruV(EO~eZ3-WuA_fCde`b*d&BE+Wgqwh&aJlc0DGv3Iq|hff!$5%S)`EW^}aRQ zC3y-6RSQs^Ez-&$x)9%77m$9(n7x(wJ9*3#`JuN6f2f=r^Oi9RPCUgpFZ z=x$vk$LbMogwZi#Lwu(h_`L@C9oIb0=7c&E6%$c>kp_+xdk!yD?8FlYT}2|%O*y^Q z{sy9=-1mtPVhMpkrg=9h#g%M- z`4~9Rk!WUIM9z#Z%I}H9N&R-fvBWz5)?wVEuat|ZIm8*z3BIr8M|bK>adKw?4_%Pm z6PWum6LjE*D+ot!TX7f>HLl41IHR`$E5x|(+R-=1c7)Lr!naCkZzr?{T2eO>S-Xoz zw=kd9Y&SC$Mw2N7HIBR~GY{X+XlJwhp1{?`2CP~wKubcvqBy){bC)jl@Iyb%-)lva z;C%)86;{Oj*YkHLiB21J)~cI?5Xp`lX3FDi8CJwzlW!0CHu^pm^fS0PSL56fKil^2 z$E&A=W--{WoD0f=*h4YoBd@SlDjN@2Pe=78D76$_zFpo7M_e3W#+$jqo$gNs9~trT zF{EDka=CoJPB@Rg110^eSM$&HQ7hnax;ggVoE`DlypMt78I89$rDrOe`dxP=ZbeL2 z`)8ErYM@WzrgrTNV6CVHR1m~bt?B8-n!Cb2t$RS7c8eMkBUW0J7C~K-;Qd^ybhmy! zBVRnem&p0&22CV*jVt6i5Ox=&9lt}LqBm%_3(Wc3rc5afqnMEz0aLjs3@48G|fInR1 zYK>TI929f6ghE*I;mRaqXQgOI0B`7i)d0pYj-%4}8tY1&Cx%ySH@NL1=xOpDlz%A` zS4fDdf;Vp*HzjaFIE(Nq2}_8-Kav;(rgtiA_8#*kmg!N_c+ZGTkInd*;f8UC(lw1r zNLNTye#)gR_WfLH;7XuCo!2NuGqbhRdLHmK9JxCLxJdgHQbrEbUa;Ry1a|wQhZCYx zAiL1oBUe9!+`Oi9s$rUH0wtA1G7t04F+UU2p_@oC;0-7YUJ>Mu&^AuqYuG(*;n}t{Hk9(r1 z_Kjh(T5ZvojDLgiR?2Pevw~xp$sV%uJ`bpgpon=YFynKglSz$_4N^%heq?^wE^EUf zC%0~o$?!N_sE9h;IB@rD#8$Eswtt>zy1bY92!(R5L{TTrKN@8rnX>EC*-W0eN$Fi+J0`UlDHwmY z2uSC5jltjcd`Y2?gPe(E5b_O718|0yD5~H7E8k`O{2FQ4r)3}UfPf6<*g&UK^IZ3I zdw~*CY}ch3B}sfE{w!pMgAIk-@sz!sr<=`cfhkXVJwi&!uRZGXV{YxpzVqricLEKf z!Bv9s*53Dsr#ETPxK6sPCiN=Ip-+`8frZGu7FwtD^gY=ox`UzW0$+vHV_2XXMDy(fo`f zn+sTdz5F%qdqEmVFt)v4S>Y1H@(axmhQYb@&k?fe_o;{bkQqK+uZLOqkD?nUNrHL> zV%(@47T|9F*u_6)|JZ8?H#~z7)!B45?MM9vq7s%n0yWvwI_38bWW@}2di&J;I|nJ13F;xi5r_ToHE*YP3w2(34I`Zb#> z0N3LF(QU^e9wN|7g<;Pv!uMDZ1{KkIVsGa5tB6@jXrkyyV}}Yp$pm~)PcBsb_k(Zi zWne$AWGcGtD^=sewFyM*o2B2_XQJ9-sVjUay&Hm}j_seLlh;+7`tzx9!Y$cX_tdrP z!bRSuRBRmS)V^``aeH1&vZ2@R^T&2GL@B9Fx>ZokMDwPURnt{4j|o_ z%~#R}p5#y1#5PAW%*R!CxE?XY1yjd4aqw=(BBQq4aR{%!NQOciBagy3E`Op+ue=>R zk_mh5CgakCT}?ND1+LU;3eKna5Xyyi+WG_Pg*VMfb3_K8@k4}ceI+9Ep4o~zh+r3b z@?{~Nk}x+z6LK+Uj8?R~_GGAKuGY(4*AZ&`5$i6BH@dylayxL}L>WcoY$Crm=tT1; z9L%1Lq>*agj(BPy1-W~@Y$s}tqs)6c7|8Im-Zach<8Oxr<;QimJPH@K#2A5OX(qm3 zkJEJ~@^x&nRb}FLQ7oKOAT^GkddS{Vw!eI%w$?>iM?&@bnNZP-Bf zWBi?)i98~h0vCBv=Ttb#ZEQ5IGesnIbnmqLuReTMVLl^9MWTiSGim{XC&)9UV^)jY z@}>L`-YUF@AAiMf9CBaT$Vy)Qv$YG7NB$?kOjL(TF%OZ=D~o%eXoaB~43X$Q$#go6 z^pf~$s?oxsfcCFhUZgC*p6Gy0u9-Qs{1=iAa|}{pQ5$eCymh&YH=jb@MQh@y3lrP? z^^j0m4Zz1w*968@YqTk<1spZb_0!2WvuQ|yUH4!7Sp0}6PBjf)H>2(c(F@gHsh^_K zC%|(2TL=F|4h;K`Ejt)sl*<(L64e)ch`#SQfSz<7lYCA$dZVur7Trs*?QnfG-i|{Q zztPkYnlfPP{J*D&ThY8Q8M}Ndud5~?!s1cWT z+-bCV4x@`XyBogp_ksa=m%Qf9jZ27+kJZyytmJA#CH)cCEE@9M;R2pCQIe@VFXv&F zgncm~B*MZGOpx4h}8_f-6%z456({Lv+P^wQQ(5l^$hZFd~UC)K6Je|G_ZMT76| zwtJxqeMO0L(GArO(WkT2No9Y+PwBivzt#@bZ6lP-xyQd6#fbcpHr3C^9EBCO8sFL= zJTxluM`^~_UfWNdBX#Lv{t)9eX9CF^8@1A_Nhiw?XNHzK$`K!$Bc~SRn*mY23FlAg zpF+^SM{)f@T!bxaKxO&YRHWIa32;IhUmKOriVD41cRBXP^5z`MtMH<0C1;pq$&MNy zFXfBgAmHfx<&D?*xJJq_5zGZGx~*j&0m0@2*8izlv@x4W=hTPQ6DwzKZJv(3@8V2L z+F2mILR&qXTv_1v9D0YKOp0om-50ONbw6~5t@MQj^$hpJg2-02YKB)cmD^v1tBr@^ z3#6`J-U;idn)@@-N1*|Nn>gnFfZfhJ`39b5as8RSjC-S;@#f({TP)bC$hhI$kf4Xq@u*>&*k;)-)oxGSv^U9XpWvU(tdTzlKrjjc`2h zO}?L~vyQlhkq>E1#-% z+i~2#GR>e+asr}(>Z94zPL-#B8qdATch-%4=sAr%~!?VeK$~+ z=a>wTu?+nAKDYC($U;eh9k=uI93$GATP+De7FSp-L3{jp>*b~}ng&g~Ims3+HW|pO zZ`?~h3%c1XSNbrKuC>3sEUK?(X@8yR2Az59R3Y8+YaBjp7?Vh?v{x2!qcD-Oo3sc|*v1Hf@D0(E}oO5H8 zWC85Q8mVRBvXnb9&{6*9p3lr)lnV)!XJTHY@d@-3b>CzAUn%OMO8uB8w}6m`uYi69x`wYV%cv06hd*qHS2)Cva#+j$YxlVk>zOn*v~|~Z zA+5Xn?)>4^!eOl?!&Fn|GT%IQ@4kiOFa2s74gwN891Dp=bsl8sI>NcQjeH$>g7xB) zP9WzU`9t|@&aNQmj_1C5%Wr3)6A#DviSU%Vya-RA2jMIDu$3mzFUKeWXdeJ2!rMuP zwL(a$1S>ulJ(F-M?v@t-3fqh{a_4y-OZz5k;=Dw7c1%z)FX9sDrznI4cn4iqpkIz^ z0r{oxPrVOf4@po&A?g3B322Cw`!@b@cV~rU5A5%{oJn&UXXsZW3{%ElqOG3-0fTvf z&;W|J^fi{%)JaU2}dL!I8xCMv}7m^mZBVfM+o;~l59bVbQ%ZOjtCBs@*3{%y# zz5C=_c=g5nK3QBys=Wr@EcbCFgCCDwY9q~4m>X}Id zuwY1wkLjwfS_HWd_xr)aSE?VEp-Mo0_76nf2ZVJNl4(nN)UXxuM?3I(B5}m z$ZiL`cpW%Cbk$t$*JcS}SlZYxAyApN&%X98eDuXHo&D{-TV*c)S!TCkuMr96ZN%*c zOLl{?^DPshD~d;Ypg4yLuV-!atJ5Rpk^Xh_-bc*xd65HKflla5hC63l2kStTeG^~( zJKZYvQQ!D8-{Ld+)1S|stTMFyH%m&6Cvz-KM0_h>y>gfQN$2P5G@V#565DEz$DT~R zcsLdk5fEVP9SH3f?)?tD%o8yiZ)3EC_c9C$$f?bTtOmnZNCkxqOL8SbVt*T&7HE%N zL{9c`fA8}n&tG;za(LAx+aI+za(>$vU-u?{?eF-lPTU_|V$`E=-l33q6O;6n`o$Ey z4Y^_3NEVLt=TZ_FirR_ShWy#&mMewq7q=1Z&yW3tUc)>Xy8|zR{D=GX2v(s(!&jH2 zC?Nm)cbCg{YXl`ot|RqM5+Ug=7TKkytq*6NPById%!jq^-tdbP+XkbBWMy*G859ZDCUfD~&}aOIBAS4ZNf9gDv{av>J(N$|5UUmIe zQ6YtK0<}onaK5j7{hRpk7rrEV72|{?BzL?@NB~rA;hq`4u3fl)R(8IXtls-r1@ncp zs39C%>JsR%B0{F$0osX&6B6YzWCi3e{+q+z$5e4CiAgFX(q4K$f*IIx%|iu zc=>uKB!^c%(SA$b$Rcgi&-TXGzlksX?JwoSJSZD|m)xc(%v=%}+1ubf!!hcFV|Y`= zS^?t&l*X&wioW*L6wdK1YWSXSeTI5hY>0V8q+dYTfO#O)|4z9zAWle>%ODEKpa0jV zhpuYZh!n*nD-u#9)@vDD3lUT3x zI=Vk$ll*vx47L}Nfw>oL@^FQgAA*Eq^0l72XVHlVFmD*@d=WV|o%hj_UHjp_SF+i< zNQSNfxg4T^^lLuOdC+)43C=?j68l@zxM$~$9KDd---k)|hmSgMq&Z&M8=25{;gHr_ z-|!}W<>zfqMEa&)B_!PPMjpw)xAnl&px{*YXH;4ZU)`?Yb(P4T&%0_j#rOVm&xE6M zg`v#!LwW;9oroOmep;tfw{8593CaErxO?Wk5$BOyJ-I!m z?egOE&ZpkM-*X~jDG7;meozG5`GO}v@gw;-d7maLQWUj`&Q10_MmJg~|ITkOiHBoO z5y7ajTDye_Ux98m8xYzcgr(uD%acu_fBH|8`KjMyXiT-$=-dcWK^gK&dLePYD0~58 zoEtfvx@}NgSnI`WzFOxgEq9-t>tr;2qnkG0O|I`}*fWP}UKNP)=;6UMh;Gqa) z$14a+a6+1!C>)8;BF?o$@q9d;8xxT~@H=XRgENFF-t5Pvm$6PR~0bxw~VD_B(q&61Na> zh+Fb7&J&zZeB&GVrJwU5EeH1u;&ambT5m&QXtCgsw=>u-7%mm2{_Vg;Na}b4eBWsC zaG2@2jNDiQMp$3qiQd#&scAS&_#^S4P{j&(h+(mrGBB15L+aw_QkZ*!AE2rp_Dr;?Jf+;@-v&i9v5;p#NZ7 z(enV3Dy=y^j}dLAVoc?)LoN1i2n77WPd`WX@34p+$UdFN!0)Kt|LWBEe|v)sT5A1! zW&>0|E=%=pyuCN#gap7A{vS0k`0*nnIyH&(Bq2W_CLLBl=xB2zjn9o7kHB*l)_VDR zC?v-RyW?+(C5$+(FF3;WzxLO^fnWGpmK!N}9i>oCR%n=@5Fl1h_4WRl>q^(jk)BUm z5B{jmvAt91tmfptt|rL<`2J5nNB{1uaFiQ#jvq$Bt6}?JIS<5aH=sk)dx#s@FOpCX z5m_39(G z5V3^&y0b2Wzr^*w{?~Wj$j|?c4+q0nfq@phjigNhvYv!=oun=J$CFg8bfL;))0&^n znfd_(;0HeQTsV8Kh|D#H9Y^qLn#L#4yZnd2Znp=~vH#WQ;-MwHmu0koI9!t5*`=vl zn+zq>b2*SWXOe5%FF-s}xQhL70FEz!7c8vx{H0B@M+*^)tk2-jbN#g4ulo(1ko?X6 z@58|%irz-4P0)1sLxsY@`b-tAfs+&bm8BrmN;a)0mdg1Enn79ySsKZ!LM z{JF26AM+dkfj97T|L=!`yZO4eSs`(@zQ!<1<5qlJ(Id(XS|f_L#t;3jl6W}QBqD6A z)~-P3`43~zoEjezC3M@kL&I0s;4A@gxFkEk%Iv5vv^A7WudU9KLR@h>V}B_Pow^D3 z>qZWpNAlujmmj&i1Mb}#5?8Hdg`|`pxprCZnI6WNF~8|IcHYR}`0F3`r$r%Q4#A*- z?!SbvmZLn0aGsKI1fnz0Hooq-6W66qI5=j8>Z+MVq-pyFgxv~s1GC-YbZYu#U=wJW!zxH9?z>g3T-k$dvGV*cz+6&YO+b!_J-}b`3nrg(;5YnVE z<`R(;yM?ViwA=0R)rT%WNeHVjH#1yP8OLk_;^@5*ry#JABWKv*A31Ru@>0f%NgU$p zl5PYdf+6aJq_LG+2kVWzd}+g4cfig*TxiRc{T>gQpTg~X7*odlP5)pgCV%y>RtQOU zsL-&BUX9qTzEW#Ulk)j>D9exh3ooK0=Nj>u`U7YEh)#A3_kRB?V{m_ekLJrC`H&Xu z-#XL-xdyWf2oRS18g&22ZU@br7>Jcx8BrPXHY70-OM(Fa1ZrBC_6QT?MwpPeEm595 zXJIY7ZT!QlLVo1-J&Y;se)Dg3UJ2p<{+TZq+lKpOQLkn7!cp(l#2(DhHHu@B`0}Ep z!oeByB_`MZOc4PKMNHt(u={@iFlK|hyJu+Iwhv+TE6|NrU|oYn1jNBhe)~Q9Nfwf9 zSPS(@^^%wr^Cfmt)DTQdFij*RFJE?Ht@~%)28}$d)q5ll_Kt`#BMkYNt9~6 zm0{}cM=~cr`t2_<&7-)ch)f)V?SDm9DR%oknx+l@4Y>!RT%L;v2p}if-GeY(wUrHh zp-v>mt?# z{i<}M9>_Jhn1DEvB)hXg#(%q%av*apE)3cg+H9=D)SOP(v@J}-y^#mDx7Izd-2u;c zouJ(D{k0y1g@_}+<I-`X~P}FDC!fUzRs<43LDQ z1Z7_54~f?r*RjmM_ieA)F~$z^xJ4vhK)Bg#aew~|$J4L$$DDAe2XZ~GA|Q^~8zK9< z8wwFX@OqEu)LMv($3JKw4b0b|?i+Llj*|65L=UtNh&L-RAvfubdRyP=aI=>yN zyqkaOxB5!1c+5ZlzkV6Oh{QV$i%j0jk%pEV)_nBu`^;C{A&4ti;iS@XROY*latYuoXN5Zyg zVNPt_$iqXoCCZEET^MV-1D@@Ce&pa1?GIg|9qhwC8gaPH9DmzC@w(XZzx_)eCdWeI zm|*xzp2xsg-}}#J#3F}^NXM!3J{ot<7~Jje(6()`3cdG0pe4N5;_3q8$d&v$Z={8{ zO@p}*40|VWE+kj(%h!!`zqg&kgrS~n*hl%1 zTM>u(JdE+z#^9L0^ILofjJN%>f00#vMMKogGTX+U__uzCENJmOs<<@~0nQK-`TE2+ zP=tXoTio40L(@{X1_a&%G3fqQmFut?0deF?etCE+=WXOXjv?h1x;uCDoy>#{ll0m?~s{>$1R^)?0t z1r;GI)QSn&u^Z5_#inhrIoZt_A0BL2%WjEscL!{@z~+S&l4!Tz!vjFp&w4E4aN#8U z#oCT4f*3pY8GWuMA~-Xo6$+8N|A*VYeYe|Ve|L}O)mMVs{A_d=-m9}p0dYtrzj1g= zs@ghdq2W-KRyqcuHKy}Q=!CXyv27X{o@95`TF;&X`(3xM)^_JBwhphXN8<7$HzE$J zU&Odz+bLs@@m!|Nr|WbD5t*q!0GwK!8bZ@{;VYO8_IGzMn+=+#+X=f5VL?5RYqM$r z0c3Ba$Nf#Z-(5;Qg&~h)IB_1G7snuwF|ZWS^9XpkIORZVO>H-2%e4C7e#DFob2)1GzS<7ZAr# z$uEFjP^79YDIYSJTt`MsgfZGaoMpWcG-zAGwy|NYLmbw!YezO)VE-)iNFMHd*>7{2 z*O<@U?wZN^HFzzf+m8_Zsq^Wtb9*Av+IxVw@YQy^!`=NohzN({(XT)U`tn_^z`7nc zBOt(V$#4IQ1-WW#Qa&W|JhCA!I}IX2yD`|bz{Ye*_D$O*+0BtB*#6_M4o?>gO_h;;Y=aJ7yG+uaWP{T&_}!mC%W{1uE{12T1r$}HTJ zfH+Dezf!)0$nUjP<8_ph>s*wwRa&hNX^|liHC=9`ZLmEuZ{(E~lIJh%+L29{VBaz! z2^JzA&?VYStlj93X@^RqsUlM7bUPx_QlCKYhS*@gzr$v`1)Wa#>Q}@2fan6k>vNL= z;;1S4<>wj-!%xNghM+7a!&O>5q=h8OzB%zE`vG{#HfS^(n;+Tw{K&%{u(M&UU?HN! zEr`S1246*_(CIcr%KHXJ&$H9m zY1(c9q3yTXZgF>a2cquop#b`E)B{-uH!mQLF-dk_wPl!4#9}Zdxo(7Wyh^KU*WGu7 z+5xFkD2*Fd-*3C;RMW0@er`+^kxZvEJc?!e1_^Xyu;1^o z+3wIDnqENIXu1Yu1w1MNaeU^_Co$?mc!{0@m?m@0SP$YCs5Xb7}1Xj`_Dom!h@ z?}Ws-J0Nmz?PiNFB6`_3!b-E|LsTiw$^HY#JvcdxakL`CH3iiq95q`QGscl+A? z-92Co+O|b&?=0m$s&1mV4j!d|0A+6^mt=Py3IW0Dc4={<6soGK)IwLK)g5D%TE^J5 zBVCex$E&s6J=vc<2k!O&Z8}fnZezENkGzp=ex&k`|FMXTib$!`x z`#ZEPp=k-n<54THR>-3j5Jyt-i+oNb_D~ucUUWDmClXd_`6{gq8EiI$mKwC}D{Pw+ zw#TDSvcGs4CfSYYJdwL?7v9=ME835TZXseo?H~ULv3V4$;7440Y}+-q?>enVM4GnC zf7k@acDKiFe}`k!plKU?@rz&dy-oCYtXz#pFCdOj=l0dYfS|x{t3XKClkg<`U``}D zzUjS>&KqeBVME<=5F$d`9?>){_NODvF$!xvvq|=?jl%`&NA_K4>%hu>gZ#)N5s|AV z>qoX-WBabtDn#Vuws41mF&pgmdu(@Gyn1y)b82urp2St?%5`}%0s>_A)rtkh_?$?# zYRh(sy^};tq;qcAL`*tw#8qjzEm1ah5#sKY32WUy>ja~<$`fqV=t5h2AwRN!h+HG= zr6O`(`>xZ~MdaAnyAK-l;VWY{XxbJ>y9ZYPo2wqkYIsrt;wY8;_GARbeG95t3o>+0 zuGHdHT24d&q7xdMWZ&|;Aii)(_B(*=Kj)6^ueHDPrN2pjWNzboC67f#r|XHx zsqGgK!mj_=-`$}lLff=B9FG0a1n6ySSHzPP5a7HdyKCpFwyN_U(K$K%WkXspEWBm^ zaHvJw9(MNCCUdM-FiPG>A||bzVBZ+n zBzw0(rD(IPh>B6Z4eqauQF2KrV+q+fw<^B=oC zw!0m^`q2@mromS~`bb;@qFkRRFCakZjr0dA1SLL3gnaogQ1(6~0WxIY`%u+`foB>Jr}x2Koj>OGMS0krADT20$x*PO8Dx6^gGk-K|fN5JvaEk@kh{7AocB+8EzH)^yWT18}@ zwo8vawa+C)ge@R6rn~>gZhwcSY0)%IpFr=wv#AHNDpWu+RF(V=9Ltse=ENiy;tIVI zxBZFFiI59z*|1jAbk$lrCnV3GcVVq(_cm;0JKV7wS@A^s;lbudq=kqa6_MH6+G$i9 z>zfb}41cDky9YXK{$sn_W4qnq)x!y=Q-j0d5L95P2eK|yKn5t5{8k(TJH|I{oFpc} zaSAH6`uqq1WVeiOng;vhu?uS*4#44gw*ZkR+4tKn#1*U`xwE0I2cI9wZPchDGGE)V z;i=V&$nfVOdjlzgf!S`c-|t~I8ypVZ@9*JwgsZ@E(^n5#Ggs3LNmwo}?q z?Q@QZ6#5-)`K~brX0yd^XY(ITw}9|;YP<(RUOcpfcO9sJj36ob1^Xss*e^Im$E0?s z@iOW{Tz*e2n^@m;JDha;Y8ksAs|mweeUjaJBW@-8J zw}|u!bc25V$9|8tC7jv@r{f9kMpC`UZZv$gCR9L15|sQp51olZ4?iZgW1dM|{yRoY z!b&Z4)mlW|hP})qX$gH;Yjtjo-qA`Vqn}W6IT00h!307Lr1e0002WNkl9#R(({jJx>Vd3_{~zXDyvX&TX(s>x002ovPDHLk FV1g!eySM-V diff --git a/assets/ugc/asset-1.png b/assets/ugc/asset-1.png deleted file mode 100644 index 87bf06c405df3d08a6272a54f54d9bf26b3ec713..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 16951 zcmaKU1yoeg*Y8j=gfKMH14E|@5|YCJLr6(UihzK0cMn}dE8Qxc(x9{;HA+Ydf^?@+ z@A7}&_pSBbTkE-SvDW3DbN1PLpB=xw&yChpSGrF~M+gFe?kgh^+8_`X`tCpY9`Gc% z>&Z9Z7p@yzSqBXK^9Nf-fj}%EWrUoLclK_MPXohbzylscZuU2r^@{jo@swVR zS~>=LoO}Jluu%rTsDQy*MyDATXM1Y4=zv;AdJ9j~cmfLYv>$g47u;|0?cqyYu!CY7 zgoQ7T8g&Ab>Nx+Qy70HCwbiag*Q30(tgYBM_tISAM-)qS!D5$F~>cQjJ$l|Ef zk4)-c|E}i=K9W&RXg=(xmv<^V&&?RNQp*-2qu^9WbeIl=;NS~AdKAiA)m&J;M-PP= z#Wj#}p`4}aSR5vXAAj=hZOPCc`V$6$*A-@;5@b^`^EP-> z_95~%zrR=Iwt7XQgat)e#t(;RsvUh95nY=9R!pxkF7^j8x8pz ze?P>BgTH3#7@B(w=bRAUJ)V3+1&`9%XU0Q8lG(#|@Uab+bH9-+%Do=RoTN+?E&!IV zi@26;9o+d@Z&jjgt120~$1QJwLRV}W%AnP=1;@U@ z8}RnmE6Hnj4FYHmr!Z==a!T(-UU}BcO48}}_T;4!_$z6xD+^`n*;`Sk+zK5Y@D|rw zPofIbW@{As3ZqA!BcHeNIOyg|^AJf-2!_J!wC%ztpLr#FId+`tz4)jD`7tcX%f*U9 z^L?#&;3OE4pIr0uOK7Qg@q(66Twuo%3O$gpwR%jO!8@+Q;Tef(j)k?hAupG#YXcW3l<}S#wTZ z9o$SlADeTa73~XxaO9zK2bG@aG1tPY!M7si{x*n%TTY zdm`>Qnw)Too`?DS9eOk+5B%n43vUQaA|KlABK1RkdlVQD2D5IxPc zh3zywE%FW7{Vp05dM` zBAXSgJ3;>(pI|@=Y8K;4+;P!UshjKHn!e*AW7O8{k$(pYy^_4?y!WI-J7gj7a#x!( zB)7QdWqJ;=-`WiY{76B`m8FAKKtU}Zr>}JYczOI3=9|=8619T0x-U%*_YJEeLelzB z&~S_sK#LX3jm&-g>c_G~1>F>sdqUicCa@U+l_w(PWm(8aN{#1G9%d3i|3+dLesySC z(3^Q!6XQJs9Fynjv;M+7l;7R37m%k*S@PieKrql`_aC6g=05vYoA4;RD?;JXMqln2=kij zgA#4!bQN~u`}fVeQ3SMfblttt6c5e2aRI|w`}bnF>uNanxi0+QyGNiIfnw8YuS?(A zS2tIGk9O+E)H{;5bg-ocSOxSe3_^0AdOfM0=u}^Kt<>wexDYFw#NnEOwqr5bbUEL2nf4Z~KHtkyo!Db{o z+}rjSJ8~wMeHf?sOOxZ)&bR+F36<<&ktu zWrZWRufv+va>+@dQU5N z)1;xc$xTcfIhN;p3kF?*9gm!rO-NKKBExHg)4c($Q|GM?@evQ}^;=o9Hb;{M2=-i))3mGEt{CLA?|u&Ut4xlw{iVe7 z&hw6sT~FZ1)(eI~+xI!twEbJ*>LD&Rq9KdBe#yN748DWVepSH^N^T~X%g_%ARz#7< z$BzMjnv|5(obe1;O{L@@ur?M3A)@9(^8eB4y;92BPcd$BWsiuAJoSolW?6LA`kQ!t zdHxusfRxiDMAFG;onZUWpoMCYE7EsF=$7l*dfdcr%j$UJ6>ERIV8&%zm;+Yr0=^pyiZVe-iXvmv0p zgEVtmT1G|(LNIWy`#w*{O)DF^p&EFx7wBXks$zZpKF>V&$)U%tx}!Ah(iu~QQ)`0! zsMDP*<(CPqu>D?o+H}fZ%z_|9W|R5)aj&MG}Y_AJJ7rL;v|s#x#iv!ZPNNN-33 zW~|^Lk1j2*Q$cCPV3xO~M^KaFLX5-QC+-CVB_N*n!80pg0F&0o`XdB%ouwvdNO}TH z1T5})x-~hnp5w~0h}&9!I;lWo@*{}(37k;HGTr}Z^=lzB9?XdZM)b-4XXx_s@~3Y7 zMJq=9m1p^LdtsH;U~X!|k&2ipPD{X(I!xXi{~6)cA*z7w{XU&G%Q!P;=AkK2CC6W( zOjIesxHGS3yQ$w^YeS1aBO+>oPYf->lQ=U{USmsXR90rUpUv8hsE0k-HMZ8qU-=dU zfyacWHzNIPQrbCx9UCm;C-nwYn01+U9u4st_QWG5s&LGYve7GrYqFr;H>2Ayru7`az1D%_^dKKuP ziyr3L(SVr^7-rXME?|cB73b)KPS)bLHUlNu0q`TH&^H-{V5G5Lg#pyeZ&w7g6(hr~ zWzM&L*s;v}M+VF-P)kmKJ7J-771?fSU`5b*-v+76lJOb2`+MxjyI}3y!YsrEavrO zneI`%=ptAx+j>(rd${ZhA6nep`-uWDkLt$1X`p{|y|9#5q!)d+`Qs83all>#yM^?f z*q^8LQ75426|Gjly2tbtD#Vgc#sNpFna`wE$8n*RO4f6QEFIaDk;4dfIJ_A3>P+b} zgPfJ8@rQsNiRO8I4*^j^;J)!Q%I;YWDVtg+suYVX$=_0H9p;{ZCY1Mt!Q^Ds-T<8z zmX^5B->Z)dRFlAwuUr8anTg+_@4fZ${p#LA8{2|hCawtS*&msie=+Dq7MJ%4fWeiT zq?0Cv*0vKO$Gna5Cq=Dl3-;~fW*D1f4znYY)HAR`C7K#a?T*Pew@&$3f{awOP8^F z@?ArJG-GksStt4UkBC22h7xmt4&XaMUlKmI%?q4$oH0G8>Rf4PM4ga0h(q#^D{JjB z)TNSlq}2vodX_j_CS7WF;FlT4x*c)Bk^AFkgHgN04&;%rs@FisI4fe+gbUkfgpnoY z-CnI@c>la;PRKuJ`S7u({;vSE*vn=v#8QFmh{I>4sq4COzR`{bbbj^wi7kQhk4y4Z zSw%%f=S83O!)NTpkw^tu455XVFkf5SqEn8UpkEz=heg&PftRWJrGcj9JU*x+;-${uS(M^mMtr z_*`dAcIO@BKT{olpOw#YXXQ)F7}uYLxiCNV+B>PV9{6E(-=7@)lPd zJ%EFEy!VLbeb#dd2$S&d&W`8q>>80tAAy+_H|ESoH=YL!?U3J+n&8yPF{!lwromsnO9*Sz5s6 zG;Pjka_s6D&joqi<1uF~_@XiO?2AUiJ07fG%lq>QY@CU!a5aJEU!gP8WIyG8#k3><%XXn~c&n@;dB9I%dL)ni*#GkL7JpTjQZ{eP_upYTSUlPW*59r;Fmj0r+Zhacjfo zyH7&N*)gtl01&w2k&-2auc95y4vX`$jCfo)txzf*@HXy}iK#Mhn<4Jc*OK27@Sz*9Ui z(2d2k5CyBc^!^oszq+wuQ#=fIWz7j)kwXTN|1`Pyi+B4ho%rQ2^UmwmPu|AZ`DPuF zbk@1B``If=)6@pQ0{=2J@sGY`ccCdFhGsrlh@S0KzPx?gJ4ow%o~g>;G~rIig#SwL zoSTP}d^%v>YbjvpYvIw4e>`fE#i>Uv>$yFc5><0rAU40}ya(iz_TWt@wi`=V%i7o) z>dT{>W(S%G`maa8?)Dlp8hgJ?f%liBsYyS(vhMy-;7N;dGSLZbPZ5Br-5ui9$77OV zjds&;Fcx5vQJ;Y%hy(xLJxzfO7r^XmtAV-2RPc|=>2GyN?x!7&?gh+eJwlLzC~Lqzx5_2B^`dB7f4s#`Hu%=XI!EE5!Xlz zAlW$axw?2b90=hL#nA&*0g2f{I{j5%X8?yKNaC>Aet%xru99u8&$s-5#PAx4;-)o~ zwmNlPf4UlR3Jhyn^d*wD!|=?7%mn2m4loB9lMoaCV!l~s=7OOpi8F9~F3O@^ZEE6@ zaEfMR-rQGp-5%P3;k3{t+MVCToSa-u6qKCenw! z6eH@1>W4KskwYQg%wb_+Vt?LRaB-k0gJ1JjL6jaiMBKC(j)FQkv51(tdguIBXF6{lCq{I}>&SXvk zz(>StRoh-ndzw~ZQuI;4{+On9k_aAsjeu(yPv!2hpY1nL(r9dl$ z4rc&I+PbD`Jmb9tv4b%;`}d=yyBtI*%tF>N4mA12l0B{=4#mBF49j?um?>% zv5@oySCu~I+Y6vWFFhY{ zzF^|?X`7NH?Q*8ZJk0;-D`%R8n|LDGKnRL`;{IKRE3|+Q#rr&@Xia-~llKkYqRQH(RV!s@KRX{h-qw zs>8A5P>N{sM9w^aZGjhcup?S6QWN0#@6XiYJoVhM*={5QuuMX1%u@0M>)(Lp*P}xR zZ0{v8j;Y>~XEPQ@YZ+!!5()LwEp8?TycH~W7QNPDfW-ed{Zc+)_dv~fFwX_VVU5kL zwDD6fT_wYp3ef}dq*5?ZhuPu)2F7!;KeFw6VLfdW+6>s7se}Uyy%~=%;>i+ZPQ1Kn z-go9lo6|oP=1#SCm-LPGibL__8M_H9v$$v+F>TD#WBQTt7`1eqH-`r8-nHr8Vu>Gl zS>;H2x1~G(O;!Ut)@FINDl2v`J?~_H;C@q80#$bmTuJiJSe{^HWMpHNhLRWvApv=h z-kEKTjdp_*Mv?IlV{Q_A-nu7eQCHocryhvkh#COE+0~huw`Yx;;HU(g+Udz{j~#$T z*10|$ccSP?!b!p+)#Oig-z$X?m;-x!t|7&)Uuj6SEs-3hl#27S)&l?1AEK@KihUyM zRR5P5&oe_9qvQlHL$H}7Q_z)5i+N9k!E_PfbA`sFQ?{-291M%QJI8X!+GuwchJHl2?0eIC#|srD$-twO zyg?v8?CZQ|vaA{YA(VW*r>E!Qeb7J77=YqZ1`!fH;pG*4Kc^6FnnVw7`yW@);5|NMdQ3>9B1~n{602LZXVAb6H z`IeLbX&{g`gz}MCVD8yQHZW8Pu%JrFNj?iQ)xRD|25{;LT^NChf;bw0Y*(0X51F}{ zfON!x*a|*hOod4vQkZ^+-PlJ3P*mb^(I=Hqb?tvH z3(d9ldp7s&Y11fNS`z_Czu|fcX4|?=Nm_k5)8xbq@EIfD%P@r6NNPwR&J*K_6YgW< zldGyXU6Tdyq4zS^wg3mD5H-Qgf5hH<_i{R#JYZ}kgtIg4exomBgSZ?s%N>8DfXBpI z@bNjxFZRo8k!q>CPf#T}AHH>){_|O?p2VnR0=rzVymkzj2>Ex8`3j3inIwW05*{2G`2p#gv=&vyj{b#L1x{qPYRE@v2Ax?Wh)k_2zc#kJzz!w-I( z(E6w$|3pAj@D)TS=o9m&%%@&e8j`c`L}3p2uD?EqAOH{fRi?keM_b44^UDWf#~+wm zo@|j?z(u0_d0BU3@AMNuvu%%C`9iZJy|T*G3`kb%^RD>-<&=uS0@2L#^nKyczdhZNl`y1dEqhzR0(G;GhPQ=$ERAW7s+aQnxNtQ=Fo_G1(gks=&F=qv+Vd>T}v|q ztOp_#UuLqC*wa!cq8CqsRYrX0+xE2cmnAKGqQ^sEeZ(}0!DZ*!&zER?R-5ao%Z_MV zZX_~>*B%Y6J<8f8$8h3$!rE;@DCf?9HHOrsy_7kP+Wum$rVaP_jccqfZxMD|L(rqI zd#0$;0{wj0C5iRy3fI@jE zB^C}Q0eh_m4AK~7aQ>eyvMrCtxp*+kxDnW13wp& z?f8xVmP;?2x+&Yvmv?vs&}cl=ik76#t7YRUAOB5NvqEPG90dCof^PWwN!?LY&QYfG zYEAIDB#@$!ugPvm*U1LGthh@frcBB9^U7Kr=C1~(JI_Q2@u9s+I}qwVHr{Sm=NNZw6tx1&W0;8yZ$+6gO!*?zQ6oh|6 z)>TR3)XRANq0f;eFe8k5wz3Ame&w@`@j=-x{SWRUX8Q&Pa9@$Z25b=PSJu)MM|c<{ znYQwEJ0;p53d%lh?9z66E2ACsf)Ko*Bt2ev z8irV{s2{!Cv358KY`vF?WW5f84WL>icXJXHV8hQRq*i|XldG&8l{z;D|LKn*Z*ZBYA6>TBY7t$%V zmktij#}#U!q~UeiWXC26M3#|IR*W!M8g7B~*rg zUT8|6SZh61UuZBuQy5ny;}a$v_a&l+_%ql2ZlQZDDq-F?OI=78C~hzsb6t|{{!M4p zB$dLK+uvjUtJm<>h0vQxGGu-30ap$gWbH8l*jyM-K^V8s`6}QhN$~XBr9u>mI}3~= zQ=q7h`E-_+<@<*#yjF41qEwEp#;^~+^E*mgM!4>;gypqs(Uo9DmAcj5bRKNzbMqB* z76hYzi0!SmS?&HZ{qe>^XdD0X4U=iTX~>IeknXv!d8*3^XH~``L#!6v=h(y?6?15K zKTS7wu=0Rf(joaI>5E6_#$S>qWcSb0 zdqdo31Mbwr1RyG2Zm9T~!yIgCSH%e7x+?3hFwcw9dLxz!rDZqLT}LYk?~LnY1pPb@X+h$Aujmmb z&DWCxfrN<5k1ak5TZXr*P}H1cykEZ!LlQoF0Qw|zr0?48w-}o--4P;s(~RGCu2<_t zDTH`X`Xa318Cc#h$zUa^%kbbLWj_rf+wo+P@Y$qp!N*>g5&?AA&EM zkfLq=gkTAjYYoa5kR1xgD72sM2l1=Q2Sw=GnGR&lott|HFH0KY47QQk1vUG`61{ ze!sxuaDaZ2K9Xy39kHAFbPS3heLE8by4Z~1u7U@W$^8~LvK6H4X z&_cR{ZS~Bbz@I-#8S26bEes$eM7Fy{D=twyofkn_b^W96>V-X7qtR~gnt(z7-|YYQ-RqtZf@Wd{6kJ1QV{|8usz?Of(*}!?Mq~WUlXDT zJc*jTEsfp<9HfXEhGOAB?x7$b^x1qvtkwNq)&2RozrH1Z9CGVnW%e;iq(6gdrDABR z*|g*cLAyp^aMmm8c6x)pVyU{ix7uL`?=6yBs1R0!;TcjzQ1x%Eqti7caT##%he|KD zAe5aFTNe7Ns(cmrsNfgXvMM8{zr-y^>X&%uBUcAg+Pjm_A$ph3Xz+L|$fr(!MHoe4p2|3CiJgACH5YKnbpEt9(oHljM6rG0!FI-oj5ZjI z)X+~_{O6Ast)%ytR4X6mB106B(KvRk=_3eGf&Xynn}5eSrlLUaXQZJOa~uXexm5fx zQz&KsTEQOwmBo<6OQP^?oW(h4rSqW;?ghCRy5>)tQozoZ|0D~Op3LRKqPJTcN?Vh4 z76Mcyyb~QF8+MERJ_=*;=1OMdMN6|BqO?DWA)kKSD-)iWpW6DeI9vY#5v>%#>BuM6 zIb)Je8KdZ15wNE+-4VC1*_wz#R6Zg6p=cgO4yZ=sh#a&2)jx(nJ>S$-Y*u2VZL531 z-;YjjqV2)NgiF>i14#*As-Zr00wRT?$6|PEgA}ox9HkXK6$$xz3#2`?y%TxO>a+6S zAOBr6f{~d26vh#*VwygiO{eE}4V5yMoUeu|gH_+3|J7pd`jlpaDZOsBK7C9XFX^%x zeOtz8IV6B$r&7gQW5C-1HuW&(;1S0Xk;a@`p{Vws&Q8lu2FQsrwJeU}pS)VEW2~(H zEm_WoHPe=tDGxUSKSov{ySJ>X2KTct>lG$PMSuL<5b|mm_C9%E607^G;t82TcP0^E z#wUd@EwX0i>+yvTFP8%m_@#d4)~w{czDZNVE<-><6~Wwi5CX%@52$EZz@zG zJCRy+-2fA(hB8t)UjD5f`(rJ<-jIW%MRqjTQ@gPvk9qTN?im>YMdFm<=_kD%gD0k$ zJx<|qgXK^E?E&K!-O$Y@1TfQ5n-hMe?2GFSQnhZ5_7JNE>B6n?ayNmCw61qUV-D)d zBOzj1!V;(UA#)x`rJ!U1RKxsZFb5>DDxap#_wVNL#TuJI(<)Eo(+NmQ6)WRoE0X06 z4P!xW*k2e0{tC>~j*R>1l#1%Em@yuMQCM#gSrGsb<}cS^+*m-)C!9_;PaMPi3ce0& zm<H1rCey#-JMl3+6+&S1AB1YiJR;GRMW9?@H=7@7JEu0~Pf`cii$VX6W zJ?L*!#sQH6`EOTFPJcnAy<&Fw>8#kde_~sW(e5yDRyX`Y_$_KQc{fP!Dn%NP+C5uK zNita+-CR!^2-vG9q$ih4rr!ifzs5O3m4`z%T1cIIpu{tb6!92{o|H)ZQnD7;Z^d&(PXd*)JW&j^_f)b5x&nwbgJrlyR6;IagiB|)>_~)|s z0>947_WcoCnP?`DBuc6j8I=}{5v1q~qkPAve&HB}D9)1A z&q(W>?B;sGhMjTm=f4{HRW(_RBVD;OTSy^UO`@|CMW-tz1k=S3*zHAisw9eAJc<4$ zbdN3p1y2?choCF|Jr~Q|P>hLq6R+6@Bu7`6C>oG0bCQ!<_uo$V+{lr({jR;$iUGBAX*Lyky z7&#R>A*Q4^K&cJ|`|+0v`=Pys=k^OHwGmG;CJai0A>_=eNbNTvR8ZNyk*UW}m1m-_ zXmJdVpAst5#)K52CQo!Nf4UC+9sJd77^!!+Zf^?{9LX@%iS+wH-+s$Z$_GUQCV zReP$kWv(1wvz&?R^E~&0g4(|Wop%8y8IuHs^4gWSt(xG_H(nm9eCKruIJW$ARzSZ+ z^nm$**&pTR_erwn5)h9lRWMFBElP{-WJE@TFV5aby=3>19 z^1W>JADE!9R3Wlx{rUku{%xUcU1YrqnHD-U*j-i_T}^)S9;Hhx7fdFNS|338Kpy#>F6^Sxt<7g zaEA%zE=>w6Af}{_`_7ryc6gua5^+{yYMV+u?7NDB4kz|ne^(U+u!>D`dNb{|q~gD% zw=OVCHcoQsb>;n|Bn`o2ZbGCi5l_5Svi)QiQ{PrT2F|%p7VwPTEK?o8d4}!%ZCh=& z+cr}0#-fbs7B_4R;%Q$rd)Yph#YPm_IrjL(XR9Q*F~0S@Ok{guPB+ z&(Ak%`x2s>l3;Gitn?8`K_x7Jg#BNOa5!5|Ei4Xn(GXv~E6`73&ICmF&*J2RLWST4^2$gIRVE z4obkj36s1tin|K`F#FX3*Q~%ReksoToRlJQ(aA~Fz(8suFJqrpMk;`mwLNC+U#l7YxdFiUsPY zh{#^%{mjPluP~{04hdB&5g_Z(Fc1f<7J|3UQDebz3OYhpEbOvTOLKyX5_=e|9<4a| zP8<9@JR=I3-!_j#dmGE&p@BBfKr~%mtu(5#6~+IcQXH&`>u??Ag^0yQ+@~Zt6dxq$ zK222w-Mj&24v1LfE6hwW5HSW9N6SmQ20|5jf!>@)IixWDCNh1o!n5b+Dqb|U;^`iD z#oBcJ^fA|Epx3D|IV9wsUVE0!)-1 z;AGW8A;Z{NKT$+KB{9E2+KQcnCpPrn4mEObv3{UJK}6D{8uCbMBP44LUn_GH39@qE zU$1JCXnvXAO{Vj?Yr}FOx%>kc3QfE5CIltC9V`qjiIz`zm+42QwI&mcz{b2Q_ICaV z>n8IQuvYIiEChPV+uQ5>KUJHKj|5#by^YsQM|q83uqN4ydBsoGCKTxMe01&|$Cf)} zLE#<`5q3p2M?IuyODz@o5iR_1vuB-3Tj3yBVVS??4l?87BU4T$ zP3lyzHN2LGSvo4fxcu>O36Tj4iW{%v-FQ;Ae%yygNmp0ArSNM`VJQZ5;pHn#WLJtR z89_Ic#a8&sq~N^Ea#Zj$PXed|6ekb2!sCRj_86+Ya*an$#-=T-P5c~MldAZZM`Zb+ z>GR!IR_c8EvT08h8#s`**zwtemoom2P(&|t_t3aQaTaaj^L5VQXyBmIrbqQwZ1+ge zJpm-ydnxlHfQ(=`2=pnqw<=}Mg`Vv4{oWJQ_B$F9T{ze_a)kE}Va|cBaNVI$mgDL* zv&8#tR`LjTmNO5fWW~2-$KA_@y9U2lqETq!nRZu4OB3?c+bEtqYcg)5jGx}SXIA$X zV-B!grWBpjwVUwwe=l?|{{$NFzbyHSGGKuxz%{W|BINOeW>_N(Q3Ig}3388+UyXzk z%VInHBO^bE;m9W&%@7CJI5}z3oHT1LtQDntPg3K0gD|=<+jE95&bih_!)=jA>0A!{ zHI#)cn#9a!ir`YCCpyYM28q--5vzhdgW8(C$gJvV><|5pA&1vl9uN5>NR;NZR@7FT zyo*k~r=dX>&pT9)-f*8PFa_>F#2O*!dTl-wzd^xJ8#4#{5`RgN53Ggy+6k3Ew`7)= ztjmF+K5$(@f@$iBxB)M9L?HkOk#)V|Pe3CL;4A(BlR0Zlkn?}q%Gw?5vVtM(Y7(zi zyzCy^!iQSFhpZYPyY+3d%hzN{p5AB=0o~wi_NL-X4(xEUgxfF`1EYA%OFtTFxaEb) z&>s+5(V4xYLW2~4M3?eJ82gA4Fw_pT3-HVJO14of!W7h)uPw}t!^l@cvq3fJCUI1 zYaw&o$%&+bl3&l8hrM)=lBC>e<@=^?Nq_7B^wizkV-l!gA*ec!;vg%tmMxGX;V9*t z%;z0R=V(lB!n8fH6)RObLFG0z)Q)v@hKISe+_%WDvM|mq?TETx-HZ&5%+O4vB{7em z{NOlCl&bwL68Db`gAeHp#mh#x!I_{Zm)%dDW7rFE@&S>?n~zmLd_5;Oi7kL4ZtPsR zcUk@)XI0i$V7~Q0>~7jYNoI^I(`Z*`AWO`6Vo>?{_)sHO238&#R{~!Osudl6i#uAA ze!9NcNb|<@F%(s-55< zUPdzqhMDuhkzN3suoERexK5Z?)>e3Ux)ce6iX>Ane0BbkJ~g&lmuf$?y(&;^=rM8$ z+#Dbyzwm%+^UXi~39Y`I&Z~BD0HExLRe#z{MKN3Sn&G;pteSQ#nxUweF0_50F=%0V(3MgZkXS>O?X{GM}Ei9h6L%Wh%O$SbU?rjXfs31ucMNWgOe2jZH1pBAa&=055{H$l@>TwY zXNn2;w)5oS2u0&)CD^=?4dwz6?GhVZeVV4t*R8Prp1zc$nFN6Lv(Td`fgc`*s`3>i z5ib4LZhvI#*Ubr{J7$?XvEeBjn{CM#aB@ECPR-PAlM6E??PUO_-?15CE_`dHi!0Kn zZ4q9lBBT-~cG4Vcq3b=89a&zb6Il(~h4~UzAzXw%8W%x`<26(NZBP=ykq@1pMe?>g z_Fm85%FoBH!Q(Lbft)>xW~5$$Vq*SQ;%M)G#bQx^0?C&7yV_(cfMLJ1rfol7TbaEE z?y6t{;63_s>WJ37hFn4b1)i1fQnmHXeY&Nqa6yRiWQh)}cu%{if^O4vJdbFASDM+) zjfrZ+{*?gA6al6$9u5>i7bU)3N;Z>xQrZzwkuUg*PW1Opa_9I~@;=ZZyt?@K0muo= zoAd=)m-4uMQc;Y@y;V*Ma2{yM!=ad;LnIN4&U!C9HVqvj>movrq4EEo|J%|YtJ{Z} zE1w|bay*Yo%$K>EO+TbQT2(7xO9D>KsFnxEiC}AxXj_j&-HUnhByC$R7UmT*_8gfV zoNj&cTHnF}x#={-s$h2L@?$+YIx=>q?n4_F@nc}s>;s@{r<LrQTcI2E|3S)Cyck4U~D&W*$K=BVB= zKkvRGcIw5e@1<6vk5ARXUm5j|jKmnCY&@P&-eVyKDjHMt@gCUNXP^3gX+bcQRs@6{ zpd0T+^^^5WkfmFv8-eY0BVI4lXh%{?#5XRK$0q0Nm2aEc<&Oj&$S&Ai-)CbythrTb z_KyS!+{U1%ZxH*fz_ps=s9*lR2Eai@8c;dd{xaczSkol25FzM~r++~>$P(QN1cz_{ zT=>(9mCUEyM5g4$+)2H20@!h*dvYshwi;*R1L=V~JH(b9~&J7B9c`}@mNh3af9ZF1E?j1U=r zb}JQZOqDn2b4io3IXE8%V$-(vIA$_EjG`t3gwIQ#zPM4vm{ye8Tt^pE1Wv_YvT#Tn zxrK=O;~@y5B0iKrnV!hw>+Ol7a3cr^I5`aH@}<(m+@Lv3-0t_dqdCI=A+!5r?dRtoA$)1m73|{ z>We+%aJ3JoU;&`w8P58F^|?4%(2GsTeS-6)&ksx(%Ny}vyZ%bF+A8y>m;3papgb8% zy(?<{kN_EmZFj>Cz#b&Lxa}6{Ua$dw@i4N<6B|gtJpGX(>ONV=YKVyOZo zbKIOPm@^W|8ybtOB68N8tIaQBAljBwGC>~Rj2u0dZ21J$9V6-=c)Rrtp%v<}N)+5s z_JciwvUqd;sw?>nO(@Vc953^5&(INJdoSWf$7GbEA46cKj1WUV8*YO!fdKY!su8@! zym>UwTG5yGW*kwS-9WAgbp4}EUoITWkf>6YyLhlROm9Y32ScznO974HUyu3&dvPO_ zE;U!w)~EZN$6tTX?gF?CC)L-wUQM{+$CzuA(K)XB+Xrz$2!@~?V;;+?+B{r zoF#4fBSm@v=fU)Pf&6_GQmK-8aldlyDc$$Edo-?T=LAU8UW-{tJ9|EPgAt#s-xhcc z&E#cM`U!r2I@pPU2*fufcn=!Gw1HXXxT+%qtRDl(DpBOJBNmT@~O8%iRdC4vq-EIyQgo@=Q@ar6FuMgm%=uxvVcu z@$&VVBq!%VLi*#_U3VZZ}QHMn&#LqA!BSLz=C+L0?I-g5S2R%5i?h-oP zh5>i%pue_1F2eG03SM7qp=heqgVawN#DhBL!e_Wr{y>|)me3UjMUH`D zEdF@KVkHjg!W5hL4$^u`d3)KoI;StnYiuTcBWM8jn*bG;K(3tS>kxw5pZcXD25nnT z?iYkyF~P#U^3BFkrjevp%nv}M_RWy#T;;o&tysG+F%SKtJBAL0`TX%H5wgbS6|b3a zYy67wp9meaZ*asPc|6YAW=El`DE`g0PS}ng^3}Yxn^5p zyQ2vXY0oRH9_2tVv0zkdV!kwsHsG_Wlw#Rfx)%g{yZzjRO&hE;wmZKHQA3NHoE5A> z<%OO5%8D%>EN<0Pjnww&%ZA`u8nVT)(+MEN998Uugn~#_XksqC2Zr5&@O5!{kRpgB z$Bp&A`bB+kvU-W;x4bnHIPqEdZ(5LumF1fetSn>l#Z*{%P0j0}^?kMDXL z5gT^tXY)HK`Yh9L>d`xOK-aFMa04nmbGAcYb0dJ{N#(IIG4lbcT6@&*L-UOpZ9mWv zAIqkG)mhFCAdWY&t@(_7hvAilhY2B$Vxns!0U+5Dx^Z_=1<4fr-w8`**;|Le@pjud z#nR#&%Q@>IJe^tQt@gf1*%0q_kBYP{g);im`5eEvQylEV=Y1bv=?$%8Jdo>4^F)Ip z)&?V9y9cKAI~Tx51E%i23owa8F9=UB;9bu#Yd(7QO)8NU;0Pg^d~@4@lB>>`PJm3d zwGH851Womr$;BIQAcuMr`D?Z1&Du^$#>)vjO2DXhim#ydhw?X*+L7TsU@q`FG<+q= z4qv;{4-cl=?zQOK=_a;)4D_S4&5U@72=^|5dGn))DM|fuuvWhZfIi3NDQk&Vezcy; z3w)Ar35iz-@tZP<*<{$ufh2pm^MfVXGA>_38^jL7%hRfQHl=0t-uoX<48 zQ(^zOGMxqsm&_u5E)_%pZHqB&3G}|xW{7Ww!ONE;uuNhnHP+L_J zlrN(Ce6;0&2u=sI%D+g&7gczsKp)5!fW1Os(y|CKSE30~mG-=^-X-_v(W(-7Q-q1!DhI4$EhYU59Bd?cbAAp&=D)^nY&{+9 zz^Q$AgQmogjsC+x<b318>N{ZHBSCTU|4owE ihl0#Cco)5|g2Lt_?tfkSG6#GK0;H^>~wLgBI=UwKVCG$=ulMq5kCLtsNLNZwi2xK9I#Q-4*h&w|vfk={xlY~W< z1O%$qTXDIzqOGW0t6mq}(Y8X>TB}}5t!=GZMQeL|du<)8RZFe&{hW8Q5Qx3^cmMvK z}GrT41>R5s!%|W!9i2OZx8GR@MoXoyDr7SntU7?*I$fSATr;hNNThFdo-3-xZG8-N}2RS7k5nh0bj)loo|bhy^@ ziBC6FT{ToeKhwRqQ~j#pP*uZ69>)YK#+{%1K97r50!i2Hl&C9It?H?ICV2{y={qh} z)w4meJc%+cNur4dlBm)8fQyxmLZsnhh&naATEz;tZLJSST8FFf?pnt6La+} z&Ukf)YDe@=(;mjp2SzR~hUf$vUVXS0G%u>_Xyw*pZjEUT^?=nHoW~Sg44+B^ubkI{ zU{@#-Bo%xbRNf}~R=Sj&3yVl0E{4zTT>1oD3pNBJ!PdS|#A2=nqJ!@;MwEqw$>!i; z9e)Cd*&%*$vd)gyjdh{EP-|Z}LSB%iWXruX$XjBgsPejZ-<&rLm%}iO?D!j}G!?YN z#f|!$cw%W-5bo?mDyZhzI%+vq9mn#9rOo0^xVta3rLSf@y15n|i=7`ALo|_V>c+Jo z9NyRw>OCW;ITppY79k=-AxHE;~|p{P$k3cMp1E)ct!|kNXEz zHK42O)cin(svcL>LEYP}s?)R3|5Uv~r{$`eF&Evg0oPSY)Uzc!h^e2TnE&`r76DeG(DE>F}wwOnoD=7 zjuh2VpX%zaeMfydTb=7osrITD%%w{ktvhZ9)&{A#7@~F$Ub#`~LhB+Oy~A3w%#y4+ ze7*@6Lrk#Hv;L?HwFWzBB3f$7Ur3sumb5h?!Bhn4Ds+tU!JfG!U(0wS6csc4GEpwyuBu+6F7Sx@2vd&L8cCq! za@U7DAw5G{V_(UX14q{EWb6Wbw-gscOmN@hve!qTWYD7oIg^x3N_^9x6R*2okq)n` za$SnleU|Fr&Yp#fA?i)WD@*GlkTwQ;&+LRH<8<2;pmRrLlAd7O*lv4bzC|%sF;4(C zE5b#ga95}=vURv2@-5u4=8GGTwb0_ezMeCZjs=vb<_JdEc~g*A2X*LuYvQXmlLXa=k|mt`!?JK2nyW+sIn*v-eWvKw$@G!XB{?(5W>Sir$~w2s z)Gya?;EqQp~F2S*VNZtvu}6yA1{%r!{y5{mRB_Hl+%~yxLfM#(=yzJs#=nrRwpac)U@d(xzqjW z>7e(~NmoN!2JV*Xi`(m48kS$;U+42LZ&<#(W%=?(g+9G(d1KS^w$;m*ulewWJKNn$ zv+GM*A|)-mOIn^OX?fz~Z2xWRT+7!@uSoZ$=Xi6nJr!x$B|cY$D;*Ej@>F(NSsejBQ|D;l;Wv2mv?x5-n zxyB7+lU!Ff$5*$sZt+r?y#{4n?Ou%6hB}}0>VWhHya!yg`vU1|tMjQ#L6Y#AtgNf| zey8qG-J8cBtglb=d8XIZwX9v;?oP``2fu*3U8bi9R#+ZRmvnOK{GLDivpsWia;682 zY`BXk@ex_(cF(DI$dr_n8?xu-7=~-v}akq*uUFP}! zj8>WCoj{pti>3otrKPI4oOF$}1!UiG?9m=exNv`?U z-K2OHT&{#tN=PJIkKpvoQWAEQ;p@U|rUY{(x$y)a(%~VkoHRRg!^_nH;Y6}I$s>J+ zu(6A(KPnPcg}qw6nsf&WdKqd&@RjWQYwNF-B_;g;}4 z4L|o{lvYf(Ue71RLGYdF_X4gUKJ@A>)=<==rjg7gaa>@$1%J>1E=*+-vq0*o16|{w z6X=;d(D&{*6%aDrMzWacl67?C!x)Q@`gM~13PC$u!X*}# z^KVDH2h0Ves0XZEriwHOi-Mf=lgu{r9P*eKSrsoThA`g6GU1SqGe?p$UCfdv$<5{a z7Q`$Yz8!A6$xKQ4n)K)q1;qsB1TDa=mFbyBUd`gB-JFU#AB{7%fs)KsqMS)1xV=;+ znfy^Mt_WRFBM7`jMSVAPz1s2Oemy4WnMaOAXox zc=d+QaM{V>rE;$c$4=~Ik)`Q^Ze*Xp1E*e|B=HX$J;08+xK+p{EG`Q4!)i(v^=M(^ zYRZGcDjjNhNi&jK#H^2wNS)1Qd&rIaXN%PlVpuV9->{y0Czv- z7OBqXbV!s^I&L{80zS!0;J8qMs^^h1kvSlmg=iuLh*>hI!t*p7lSxV8oJ5uoV3bDA zFNH|r#DqA9&|8%`grcFH@R8wH)nig5I+)-IA>Lz36+$+Fgo;7vOQgA(5n>_fwWLia zk!lr-Uc_jK#Ql;!C)(@8J)1&F` zDTa8+g|{+wEk7;tExwSnKM@AQ9{ukcP13j})!sy*DfFI(ls)QCHJYsmsOL<9($d3J zjX}B#u_USMe-bp6VeAKPEy~$blZoB4onaPKrv_HWN7+7)qH1wc*xf zdNFI!Oeo*WffRQDo=N;-P70J0bsO|68^$`uQ77ctjxo~l$!@rE_-dIY^a0YZO95x) zUu@8|s4CrMCg9tH+-Echznzier4lH)TYZD*br(z#J>U};rO*Vfh3>eNAS<}zD2&^@ zCf%U9EQYAPM89H=;q&P-WeVfL=giE`BxnbTTwouxhdeCPJM#H)DjORk+2MeaS>@Cm zx$$)GBpz_UnrX0+c2f7b!E5CRD;Apq&fv`|-(v}2vJJ`Evxdu^nU;*+0Jfcjvf&GJ z9tmqS)TyW^n9>8aW*!rE^cpE=kqkg9le&}D0EEcpVI1yQE{(G@(0+J}#U{%VsiB5; z)?S%Lu8o^%w)r(1C0s>j5*5lOmZzE`>G;sFT4ueu({7Ejyy;WelFT>PP@C&jG7zlG zzS}{~F7Z(sK5tQW5nVM?L|DPv{Zn+;@?5_IDoVvj`1u61lSnrG(seKc4M0aSs4Jc3 zOhq)(wa2Db5IBQQcVDL0?F%3^&1{j05GI{|M)Y5q0f%%f$q_3}*a--!>qbI-9c3gZ zRR*9;zAk+74x-ywF)3+vXyE;zMDsLdi5x*IpvcH?7+c9>Jenh0EC(qQ8b;+NY~;L! z)vXVaPZ+PnIiag?7K8!?BKJI0?l(+Q6n+|I_E}KZHNeKmPa&0pgknjdf#}D z-~USYCDICJt}t^%4n4zpdSo7pm#CL245Fp#Edjt+SIG^+yo0X7ZLHV*zT}*h2Q=+z z5zjW^Va-S-u}u;CC8eB^r}+bI$cyfS_lqQ|%?@81-gC{v2yRL{OCcoUhrU>Bh0!U+ zZ=B)-r-Zde_1|^ED65%lBcYgt#y4;WxeFnt341-)r3FbMl(Yy@J+i?I+slRnt}6Hj z<*J^`71p87(O=bB zosRh5H!EmPh3Gs7`dQ58Jje;rc}#_KqFpA3SO-t@Y}P^X+(mYs)L#oFmuxUf$n5_M z-^`z@!{eiKJnrpN>FFG5Hc&Eg?M3puH034M&@kTo$v5rfZaU#=@*uKnMYd9OgNMQJ zEvOn7L(G|nSB@g`aI~YfGqkX)qYtwekaNVWv(#Uw(*9>0`&Idk* z1<_=V3BV@+1qb{WV@l)9icGgk2cu&R|Cuc6orzaw+-M{K!Q$RNfdT^5?^q-pF<>%= zsE;|%(dto>X2c#4(i|c>;j@V9f#QoNLoo$r%3@ekxDVlmMl_wEaAwk#2!5yte%t{q zfFUx`mv~Lob#lUmei|KDnL>lP*%=KDzRN1O&KxmhPBDCfK}3AQ4dK90sGH{*Io7ro z5yAVO&tUWxAl%NlfEetXBOKAn=X+vudNG3U7Z z^GlAUzVNwG_r&v0d}r=--v@v{V@Y>=I1-<1 zZH$CBb)aR2xTIBDT*?AE*NGwOVW~;L6(=4WtkmLx?N{*iEklwJqcS|HOb`n8(VeJI ztSr&HNO<6;qvJwi9%g?C>JHVz2w*?PsBrWZf}0LY38xWCWKtmpez|blZMo3xaM_`# zPUieU%8Cr>JC>HVDI={Q-oOP;6;U*V1IrKs z`=#{AI=S41aV{>zOYtn_{qQ1kDPiqJF1X8J@}*ZzKeT!a?0Tc*JLV)un>m)u5Ou*T zM*roy4b21&bFR+f97{h7CPP%?S?(lU%(GA=&Oa9&KW(ad@i_dR1qzGbajG$5tTk8! zEcYz&3}3+Ui$`{wyTThoRzE(W&7O+-g)Wi$n{U5)5m$p}8{iCE5Y=bn-D;xlU=P}X zLCj~gu}#kts#a0LtsRJOkD1uj;&JLmpuEHMfEWf-Lq!Sqceg>`2wF2)>BP{{OUZ+i zD0!xXu0>C2L%15;j+!OXQzm80T>r87-0PhONA3=}+qpn~qzKz@LDYoX2+IbJa{6bK zC);8Tvt?wmN##3^} z>#|};_E#+1jeuDuh6y%yFz!a*6B^tPlk8DDS5S3D0 zI;J0Wj7Gp28|}wrr0zx#!i~U`0pA18lkTEp#-G#FIj&qI+u=5nsU}xljXB=x61Uft zNdB}O(5DvBpwEj5NRM7yNuMByXs|{+aH8<;S9IV0FYe3u<%@T}u*QyVvt4(&b;O!+ z=|(PIJ%%gZ;@7OOT#3xw6aJk(8q|Wu%X7@QB`PQ8`>+Y0V#F%<0H_|>m z%`&uXzt})BL?>3`mF2s+50*9*8CfR~?{U3gIfHtL+lXa}=X)5U2{m|SJ2*rMWj$=(fblKdMJtW+aRC6 zA7MkK`o2Lml19m!G-`Z7?Ut4s!gU@ttbf(nVp<&PkF*C{L&N5*QF-fCwVTU=?mSY3 zPmD!)vN~uSJ?>h>?H?A76c#cC&rWi4F+`2Uc;!CR5(;(=`z$Boc8E*C3W*`=U4mEk z3R<9gd%|bU6#6ZOj-Bb|uFM`$ODGZvc61L3f^svLVrrF*Ip9BxJ`pZ7%AoxENv@w-(zBMvhOG7NR5#naW!7dEU&YJCCzDg8h*% zp*uS84(%v?6S&JCbiiP#IoUENofBqm49orJ%5pr#tGA`EAG7I*2-3kM_7)uT18coZ z;0Ma6`doo0Zk?76th+fwea5FZ+0qTO{D-XD*-Es8!<`sYOB#F^Pixxi;?6E=+{7&h zi0LcwYE?4Q-`i_Vz^sVtx^INh2jEBlo0L@=*;3KXB~A3m3kfp?piwfFbI`6+pyY~3 z%%Nr^qQ9)UX!G1s66c&9t&XvyU&GLQ_7ema(oMf3^9ooRd z56d0PMvA4a1@OFljt06qEUX5`z%6noJg7H+iHXKNRQ7b)Gj%y%*r?IE;gtWP5IxOZ z1`xw6K)kU>*Bbp74SWk|h)<@3R}KE~U><^F&HfzIe#K!V z$i%)xq40a1Im_E^9+y12{;sl0qHsK5?Gh`MJ|1G?As%y)9GwSJL8e}f@Xi3OgmI*~ z$@oY$_tM+$G7h3(W?QVxkXtxp?K7W)_`!)l_=U3)<_cN~u|iCfC$D5#0!6cOrOeek zT`qT>>QZy`J^G-2L)nI$%j#tQ@to|rQo0?kY_voDxAZi3yEMwE(eR_oDsN9s6PC#QZ^=#=R+OKUfkBiJ%m&m7;US%4^~Oa z04BVl1lUgNuOb8qtI2Ds96ADiQK#xQkc;Ovy%B<%rt8ux{g6!Q&fiZDcnmnUpp(8d zTBa9BM+*H%s>6_OeC&}azR9%Pt2#jBlBFVQug8qDG(2<5GB5=+=#X{lTm(M9?|zgJ zu5S z{c(Y%VAT%Q(0?Y9vOSb^vq1>kg^cX>U+YQlJcRHA55Yee76p3 z<*>BjHYfR-px>Z$4)2tW7b!8Bo+6vva*ix;t1h1_d+EV#w7xkNtUaQVXYdeffP)5> zp1E|$M7m#5-&C^Q@;SxJqwggux&^}NCoqlfb$bkl$LPe!#I6Qv<#*ZzJ)%M!vGDU} zO;WywVr18PjM~qym8A}uYG6*y^SZJQEt;0`_GMhV#-uNH5M=(Nr0qUQ>C#MmZ))mpDLz+~LWGJg1IN@tncgV_g}U0PXC7HW*FHL&|P1E~~683zW_( z#sjUPOH0aUm(3o!FD))EnN>ix#G1qO(2}}&<+DmkDg&j5$*vX9L&cS4vq}Piii!q9 z==gy0L`HAExW1z=)KwVl?b%Ww20&0=Qe1HlCGKbRvdXgA6DCDqlW6f`tW~R^l#~i`Orl3B*ng?%=|L=L z12q5-6XR1W61`M?d4EUG`Lq-td6KCSYoVL0>{;WE`k&0tk?h%ypT7E;OUt1aOt4rG z#dsnfS*XF%(@h}=2{6zfEfFqV#npcLb+H+HbdSZqgXIyVQm_O9q| z3HL~=kr_V`7ekbFua(%s?%=x4P+L5|9DJC~-vgpajKUuA!YzG>9rdngZ%0eB-5UWe z67CwQ8#mi9OMf?J_K1Pfeo9kf#BWL5zAAdyXj**#R&3*lCUsXvSgRry8fCZFz9jPR{Q42P7bhgz6 z`+}T0j|sSG8KMf~Lc5Z+j?L;~jKk@z=8OTyIVnb|4Q&c_T60FRSP^@3;0ti`@V<5k zH)=34%cX_vZ{m@4cc{15nz|W7HhvcUo$EtqXTjWCHIzj)=b%!!VMW~sS94b=3-;j zu43&5IIH)K70fv9kj7)dtR3D)z^t8t56W>d{2igT(}dWAhvuG+?nRy9b)g}Z;6o^! zRRfcbRaH#NSy?g-v0)6B(y6!@qA5Ji;o4hG%^hOA#bHeL3w-x;Tny3k;Cxuky}()q z?4e&iae38GY5M$A-@X1Bd^Px;w2Q0$ZWC4F-|m^e`rf}h^Z9d)RdmsB5~>DTkI#4i zcJ@(5I=bT0s_1#A=D(M^s_H+VzUCRn;Ait`?s2v1wlChApI6`Md=?qmQ>xVWK@0c@(Zf|_~M~wDx9y) z-v@|&a&*U`+pe6P@TXSiUOdmP@TN_9^wYsh+;{HYvv2R-pG=BAy!FX-Pd(FlSvFUa zJ3%fkhEENyB&(wZFiVkObN{-_uuCBcBGHH|&P*Ny@^G5rQ;i8&o5cxQw)TX$tBr~a zC!K?fA)3tCtj_8?uFw z{_6Wz3|{|@t{+@}{l9WW%cpo!C*}Ob$S6G3#})m)@!^AA!Iyh>UiQYPoaWeA!Em`3 zhk|X0$8Cg_5dcP0Hh$GU%%B^KXf7iP1U`J=X%CH6*Nx5{v1>ta)X96`c z-%5rV3-`=|Q;5998Cx6d4e{t5gX|@39L*SI6?d0mDLsWST|C~%y@UtB7F(sFYE~H; zZ@3Ynf^k{ySx+HVJK~}A{`*fn@qTXZtFPwX@cY2`o47>NfU*u3L(F8Nk&0Pue)^`E zL@H>scE>OwH{eXB0-SO(A@|7@h(se0^%b=#1x7nAhQIk(M3QkW3vRJ|2y0MU*AZWJ zt?q^hTq&ri8vIBfWe9Vx$}&q_UQS|cc~9SslZc^jqqQ$*xWL)KXNV@T#Enq0mvPqa z8>ShnB-ke!p|O<2IGb;njQbC}84OWu**J}i72?>vH%!1L>Ka@OF@=*H-saW z6w=y87DcO_xye2oW&vg{;+?G);X=qnu&YMhiDfsevfsgKozn?fK>i6~?FeD4d6eO7 z-##DCjn~mxot1NIjtAi^GrA@Tn>B9aSq}WG$d<>@H;CDz>2Rn2$8b8X^x?%W8qVQeJm`X6e`ZTC+}$FJ`akewRN(cm1p{o*;EUgO|l zOi|+>lXw!oFzU;0hd~btOhh424%2I>*sTPNxUb6178^=9YB7L~)R=@V7Njs~?4?m2 zd_}WGuj4twAz3M5|zxv371FN3;A~sO9_N|hq1)W#< zz?&scpNb6}r7!VPv47`N^oD!32|dgM0QBdCQ-|_f;hBng5irYP0p= z{l$!@VXquU`R3V3@o33wGoGe5=08R1v6Lgr+;1M)OvggMoAmTQK=`VB6Pv*XbAC4o zvqck*+(gH#-kSF>M`ZPVN9vpZ<;VaX`|-cYr^58`mJ3toAeW;@zHQz_yE-pOeVUGa zSQ(~c9#_Ww&;H}H`+uQk6a>U!Tde!Y@4x)40PmIJaFw54KmYy5=DzrEW#>}yd!7j? zl$HB}2WjK}$b}ca|Cq0Vjve)VcTd?18IPAeaO<8z+F!M1&-W|-ob>o(=-Klz6)sK; zRy91br|jC?#~=IK4SOE*(6Ph6zkk*m=i_Cm+g3d3pa|Lpz`MC`R|F%{|d`+YuaJM#J6h&kZJFa19E#|lm+aIkX2tPTFbgGBy=gMLyy zoWc|XVs_;}KA|ta_}ibbx+B3_(d5jGWs(y^LQI&=jhS(fTKtCx%yoE>qme7^P^VBtyYvNQxvZ77vjGGMS!>7(lqTY?X8hoY%E1B zp8Meso_YDjA3QN!3wzBi0G*0TZ^LzRx#RR_5TZvC>1um6da$ z6w&roRC55J)7-KHWy7gA&fU9rVBnw_+>O@Rg_k$DZqO-oh;P0SSMI^zm3#K=9@sUw zd)MH=udJn(h+F1U!WWK#`sGA__(T2j6ZGyEU%pH47UiWUPfpG&@=$Ezmee(sTh>&j z?$1AN>_2Ygucc#yYmW`m=jorP*EcoQUv<^mwUwSqPd=?8Kr1M6mm?d6n0ft{u&5 zd_B3aGuVsuF&%wd$2D(kCH^|3l}9aaJ(Mel$kiQeO40J~WTIi$HkL84dSy4{Y^#V! zKzHB&V3ybp{xiz)trE|upKZ*n{7yGYYm#7tw1@~;mIs0a z+4(s=p>gdn8?UonhlWu5|5V-a8)bxW{MwH1b1>1^%KqPcj?>Z^x2`;zy$TmY3>#A7 zrgLaOFjnNaG0&EsWkF06V@{quBg+R1nU{&+sGvgqQyrUQKrDeX81X9EEnUFTviL@8 z6Gt5Eq804x8}vJ~L##GCtN=u9V|;RC$k{wwpqfJMyo7`|F!KJz(|xM(Ww(jfK)h}+|JAUDyKAih5zHOdY`OC( zGFV-W^Sv06-paf$;xu)aK>QaA_mMJ4th zqmAK55tk14b1MkS^|u0{7DFu-O&i5$CEGHDU(I0!6$|*zh?|Z}=m+jN8FB1%Tzqcu zB|{l~6we5|g@@y(DAu=mEEC&28bkdmig*xpJPOt_dwH-1I6j=m*^yL>2Y6{4ji~+@ z6weI>q+^0fxu~NN)x(K9aV7&+H4nvwLA^F}dsv&0F@P;Eh^=DAK5-`&DmX9;$>vXK z9K4ctU2^sBie4ykt4pw79+36_eb>cgTbgf7%MaRbiXlqUS!3}`Rq`&qBv#Z^Z+l5W=RY75E^w?~reihsvs}t1;k{m>nIoVVKD?<(a*xv_SM1^;lJX%fwr5sY2yR zd2opMaOQ*0lQ#L4iIiCi%mizhclyj*Zn;h%M|mB0fG0D3FJl?xc9B`e(djm8k#+Jy zc2x^_S+&bz_CeQL&D^1FN*p{uzCo+jde*MplgPhomu)DwJIq>{l5sxvs&GQsNt4-t zT@Bu2DdaCj*e>1xFPS%EUH1@zJ6*$UCdx6=sL$E&($Lw45zrKlyt1-YL&OItsOir; ztH85)`X*#ym|I+Lh&`J4i4%9RUiCVGZ659!DnB(Fdo*-yH>!!Jd7}+d3+BBzEN415 z2-}6#@GVb^eaE(2!Ecsu^Bf&d19-Kb=34Ku*o@H>$4+c{kQ%E+#J84UF0dEEWjoH! z{8$rnQKtT6xlQR_W}LK;BGB3kD6$;80Kb6r_QAW&Y+ zv#^QRVKTO~v^0R}*+lGAS$JJZSw%^4Wnk7GJQq+FyrIO~%PUJOit%58bZ;*%K@JtO zN-H0sq)SUm%S+4NA)hSZnd?OJ5gd7PIfqjt>$W_v)M8$^@6XD?-XdOhR@l?Mo-3M# zueai2h*>OS1$L$(Ja@Fgm*DFg7#r}ZHHpTowW2aEOq{UjBqSmn=NZr`@j^i>G0YVL zn-rXsc#)tcSQIH6$U9(-Y;B_nkDVT5A!U}2%zfe>_Md@^oq>mt^$}Dpg5cbv~>`(2C&c?Vo)Ee$?!}&^M3ZIlY5MMe9hPy{gR|tZ6LrI)eI0=^X z4OozU>6Wfe6=B;TvDw})sFVBv@L`mi1?FsO_5_BhJ%d;ge@J#ts#Dti;2~y{7JB9HTD(sG7r-5%q(X3L~tmVJKpe2_UVPa z5ug7M7sJT}#`NIgu;uy)&t+QdDs}DLhE_hM4GiqS|9cNFx_%J=V*~uV>7@AJk;OMH z24Lt1LD{)|76o<=3@G%+_f{^vej$M9YxsB5e}B+ae^WiciU(g+NpIeJ?)B#ac+Cm@ zx0_CUa9_hs4FIA)W9n|WLC@pz0Y3I}5qTPZw1{KmcK}V1h@7D{y`!A%0KpG%G5poZ zNwDD8h9g+KKUBkQ+qUi8h6UFTKm71r4`Ye4n^ryY$YXauCTP|6?b~;5$5$&?uDoky z{Hvy>rn{T45wnuk++6V^mT zuu^e-C_vQ>nA9ku#wFc-k#I73oC|3!rh6cesB8{ZFUBsJ3Dh$rpcCjI3nMS>2t_db zTezhs+zY8*PiQu7*GM)wP(a*pZP?Fh!o?7CaRFIDFGu<#n+WQ{o4a|wF2yINpH{X1 z1tkxa$D!m_YsSS8vpNOqfH8Smqq1>G^MQDFgO4Fy)iVwqx(A)a#Spc! zjSc%Zx9-@nV<+u|57$SJE}~o7QRDp52i>%=%tr^(>EOVQ?b~;38=wK8v{CylrMKKN zix2`?c%baSt?Aq&+);QSmYg`~$11g+a~@EwzG8ai6guIczY!Hb`aNE=^Wza&T4EIn zoWO3AxF)oA{BZaPiDiz;66@)#A>>c6>U3z$hqc$^Y{@IY_p64mtK)))MVG@HL#(rr zR*X!=p3$_dwf;0j8^yVQajE4FWg8gSzH{gH9TpdQuxabR=@vM+a47Rj_qu6iSq2>_ zL(pv|9ozxDZNM8Cm_v=FH?`k#3j%J8cLn3U-+tggDl;v?BXE2Is_LM_Nwgn6)t19_ zBF;7kc8^$`OLBaIeHm>5Zu>@yb5l^L6+=ag*|~_88A1^kgmLl`FQ~R=gHGcg^A3v9 zf|#|=hW-#DBfhvNUa$na%eJr*N;$zQ$jvVna2`A|^5bHNCh~mdh=O2McE%ZBOu^L{ogHLd zJwm}O7<w$9c)QOAF^&0jaMmz@gg&3mNR2-#)vFT#_VQn5pf-RPXSFZG4&^pECtBk{QDgO=1dW4Cd84`!<|Gr|yNwFb!jI z@fo59KRIy4X)ax}tYHL^YsFk+h~mhTxc*+;(X%+jF)Xf$mEibzOZ&Te8pE4I5p~Z{ z#^d9`YmetWlJD51E1WOudf+v8A|hSWy}mP~?rn?bJ+{dhcZ9**WWy(?eKmL4PyZ@T zjb9L^Skc$&I@*K#Kxgen|dV>xfIM$?jQ_Njr}7Q{UMKN#M5N4 z9rl}|ZpLC6uj%g#$G0h1z5;iwc%mhEA68*eC!>3Cjd~_St_3`0Ea_#bN*hQb*f1yw z02hmuV5#*4*C~lp_-DQiJ2#`WD}l`y!$}X*j^ot8cX{~Xi4!Mkur7~1hI6#w%k12_ za^=R28#Q#crl!u$PMD1yJMO*r+u#1S^>Y9H2M-?P!m$eD0y3P!p%!21yr4`t0F+7m zKpNFZ!yGxwX#rNe{wz78or3Yt@KuHp=i_EMKLBDA8Ig6PWhDf&45J=v;cG`5Mm}Zb z#TAtpd6lJ+8l{rrSwI*8E+!8=1uM1xxy`uqSL0%cjj+WcZbC?Uczq+{ zbE9p=tmG;%#53f+HA2Id%i0v4FiJ8N2!)IfIOXCpCgQS4#(2DAWP;TYD=&s9jv0!x z35V7NJL9e;*S-!PFJlbA#}gQ7r1P=_VfLyu)EO6eW{agwFb#?Q>g^lC*nU~+q+`W! zNoaxfXs!GizqDigo?$nwk-Lv2{r?N1VGnJTC>O*$9u8$gzT~FW@uC0S2$*)?8*b?#Y1!-F&PV$<&uF(88}9Z);#hEqI>7i zAj)*;5NN+Zqljaj3$6kS`KUXEVsnZ43l=AaQ-YtydQpffyWMWaWGl(+WQYlVI?d>y zkf$m0%kbqwt7D)~IvLf2Ydljj86$Cyk4;{L@O&!F6^?kANRt=isg))Vv{KT}5}J&( zupcyGay{PL@P01#E8^Y4O>KY~;W2gt7czi+uEfOY}|IwSLbW{EX^=7QxQsqMHJ zVp#wGmFDNPfYmf$u~lX``RRR+>XSy53@31cN!l$KVOF2@$@MBJ2@ zvFwZ=daU^gy<3H?8i);6AVgS!tsLLZ%zK;6f!U>jS+iyp+eFF=oU|FR;Vhd1nruEq z-f(fCG*D79gPt+>iL@1ErDY}iMDnF&fwI{pj|g9*b;FG3UR*uYq9?7>YR9pTi92;Z z#wZb7O#Fd$+!70%o^cFEk0JEA11BRP=8bd0-?O$`Ti<<9K=M46$NJGu$E|z<7sF^P zk66Z0Yx>YA4fnoxEDE-!%>MDM=>wxAtWb9jk;Gg~@|D)~G;w+vcwIxBi29j|m6{b} zW}|Z+B7z%m5_hn5Lq|7`I$n=m5E%7!TiaBf(`h9i6wzryF|$ox*5BFJ0iQR>vFK)u zEqXU3@u)^KneBBaxLeX}NEotq;b~#!dK{g#Ql0 zJBC})%GAIoBe4~5!D7Ug0feb@XuGvnH!0Chz8B-Si*TC}zg>mfALF)-vbQ59?YkoW z@qB!o7r(s@w^%OBONai2e0NxTGczwm?n2DM;d-$t*|EcERD&4}C1+^sW*T~gEtpjp zBl_7gQZIyB;;*?YvMjN@<`Hjj0Nz55srbU({; zK+ir+L9#2l3l~ESN5TJdx8TesxC!_;xXyz2nV9?0uyas4uoFHM&PRYbE2S3jcuIA( zb!5YoD;n&4qFKTF-}3V8AsD4k863pME3@j^IpWa!kFWXwlf>(7QooSDrK zb#b;M#O%siqmKsOiN(k~glCPx5LFnN4X?HD#WKf?!=G}Q8KT(l9(Utvy4H2TJ9O>D zVRge7V~-tyGB)R08(~Gs8@bd0JTl@~|Ctf(xE5eZ$VNU8K;3;Tj>k>R)`lTEf$^9J z*08d9Lq~hxrST=v>?DljWC@h;p+i+{TI=YkT zHI8^S2fN#_CN+Y6pB`S1)Y);x75LR3Fa3;pH*!MED%RLh&4bUZZMjy`@pQT1?|>cm zt-+Uozf}71%F;Ge;q{(1gh z>z4rvu`mrCcp?H>9G4A6@XdO}1PdG86zDB%z|q19q}9-0l6#q^XU=)Sjy`PCv-X1K zXOEe)%APipc6AN;V^>i)?v3H(%8X@LP>Pe1f4baq%h(t5&$}40|9>TKUJ>0scE=)XQzwQqRXYn35Z+O4=0m{x^ zkVmU5wQCp0da)5HWbr(>{_AKGScf@_Mt++qKl`+k*`|_q4rPZn^^<)8Is3@75ROC% zwmpaYI@*`foXdQ9XhRrNcGl5PCk0K-Tbw~!hQOJ1CeA7K zVShRfZFc-am>WoQoR32tnCAM;!ALj!(#0KEaq<><@^Cm|0ikzy_hEU&5n;n2iZ#NU zw?sOjS{C8>TGGy?J^j6*2(QF@QYe=z#!tkIyj3XTJj&YK^^D@&u0$zstn0i>K?O?J z_jmXu7J!Q6MJQV_H6oixcmbJD;=GL|Rsnw*!QQp4@z|7q-aK;ZBBcpMokLSMcOlI8 zk~Ce4=KKvM{78`t$+nu-#iQX9=psnP=B`449%Rg-a6HOY3G1Il+H4ATS<~lz!mO7f zWmzWivE9^_-2jbEtFXGobR(tE2&`6X4f1lR8-wVCdmQ;(nWu}xDBfVmh@(j0v~Q-ULEdi z4R&|5`WHs}dwAj#cnh&Oc*EuW!Ho^r;aAhz(dKW$+*$SxhhyeUO&s>K(w^f7gg(*} z=Ut&DRN4{?T{g^Tp2SZzAbU7E2mtVo`TT6_#Kztlh;>`&Ml9IW^$vT~nO%VM{5BL~ zL1T zD&Mp3_G3WU?XcUQwfA7pB>#MjkgkQ4FhNOLTtL-%Al`*Z1(~R=C1n%&?1{9$aCo`` z-sdk!6iH7YN9Gq-Orsm;G(!jQ@rvikw)}UJkou`iEdC*x zQE5!J2gHrb!sxzBptRm1bu+15WSgnbF-oW=;WJ*V4XqD$&%w9d2z9@V^Fk?eS}CcQ z!hs02m13Fb-ITi4(TgJYzpUs-9G=3v#FYMCnDj$3uY3JYQhzT!`GZ3Jg>-F`iP;H8 zUiP%_Lw$K1ZH%Ewi4kF-s+CO%qdIf+49Tv4#8Vvy7#(t1h$ zL8+$|Wr zZy{GvVL4X*isf2!JNjB=fWk#UEh@PVuHq^oUnS>Bswylky#iy5d8AxJrX53wL#l!( z;AhU_d7CP}E3{->KgC|0$q_oQqr3N{oG|Zw z5tuhG5a3~pQb%P_qV;sJx2KTD-B{7_n$uQIYLn7o-wbn`4_^IUO)USuhMigt9K1A# zl)nh$0)<+%ec8)HoBbfUKymKjnZ|F5kb%B+Cdv)s>##(^0@A7BY z;#kZSEEj|#82vT7>}iKIoFuIMO4H8QYWp^H^xm2%TQ&T+n|M;-cYJ*FGy@0wN{?ZF zT}w#baI?8`4$ejGS*hCK25m)uz?s8#G0{#>Ich?Y{Je+A7y28znt@~KMVT;5MbgEV zV>C&a#o|@*8JR`GPs@xd%vBYOca^`99XO5wmzt|2`t63e--E;0vpU)rIZQ=KlIv`V zeHXf``KOwaJtE(>GP@RsiPadM>_)Y?FS!2KS}7XjXNH1fRi}`CrG{{`#L^4@^$K0? zR6~j8jW|o|a>d-M*p;)w~De#$L@Vb$OI; z+V$Pu&y>R9xqO7!XonNe4E35VRn6g zqytLGKhH_ub$c!@m(ld`qoCG|pS1w9e0FhpNl9r*adrWIC$cHH>4)Y(6AFeSR~ArO zc5(Rv`Y1kq-s^A1uH$g$0-EHlTtG*83xc2L4I;rBO7~XO&`&YF)&cwHM>pBH8)&69 zw6b~QR)5P%4}P;PEh#Xc9_sJz-U>s69n3qCeqeSr{d5tmV6PtmOH4%6fNWL`-M%>3 z)3epTINVi5X;VsO57HnK?c0i^-ClE$CMknrMNOo2!w!*|6sQspHT1V4qh-L^ffUOA zfd%plc=0M+;g$UmT{z`E^)wMlEfAN(x$W~W>E4zQfaRa!HW$;x5=3~vK_4{*H+H}x zW0MSwW29M0^OwwCA(D1%)~BuuZgN-i2xh?~3`st*l@_++e3zz0wfUvx1^(j7V!Q-O zFH1}6b!pyZ&nAl!a?hc)C8ebWemFPz6_ty;YjHL&Y|<4eL3lE~`K^g5O}HuWBQ}YF z1x%ca5(}?aWnnUokfxdx2R?lPMwM1T%-+Ks9%N361j_yVvL5;2nhf6PlM@ zSa>n1uaVJ(;G_7s z;PE*s#4##ey z$E7Gpn^n`+_KMH`IXsRs(k|s=v^Q1IBu8noxgOMCka;Uj*0D4FR+@<8)bTcfTE$r( zI-K7T_P1OWh;BDcP=6_@&Sl$>p#It;d};PKJj!=$rFjK;&q-RU*&h@B{AtCCGfQTc zTuF=RYw6~dm3N0m^O<8ic zLwiz(1ZY{#1tmBJ3}Jvo-SML={8YoVtQFn(eT;idEkz`>k!SfYjr2|!)(<^qRFpe@ zg>@5xW9BO9|0cw{Lcd!WmkQ-PKDtr=In01+&hdKH-BX;Kv&1XO>i(4MylIP7wx(0P z>NV2bpVB~es$$@%NFi3FsE^b7!j^D<>xOMM2zOvZN8k6nE8G2ee_7^i=-4t*eMga% zPW=budeE7;=v!I+7~x|&qwAW?lzjMBcT00%f=_u=82>@yH3gfx#m`AUB|JTEdbHQF zs8UPpie(v7vwP=Y18rAN-$z;3HzGE&0cVfoub)6a(Vb6Bn^drhluGh1Y4f`&KUoF^ ztrcmGJEZ)ZaA*5?)#(kw{-7d`rm_I-u;~y;_jeU}g@WVg&3{uAareY?9rl?s3rWOW zvO_h`H>ngISEcu-;o}BAqTS!WzH{rVHs`q{UZ+bI@{F{iOrG{#GGC>DNR?QwFD`8e z1viEE(iA0MI9C&X8cs0>gfv$Qr}3O7j$#%GMN{h?f5krvmXPhX9c|^lzwtm zk@>VR&2CC9Eh$0fxU-vg2?u|Yuu_<#%e%*$xbE#~gS{=`n%34(&*Ky5^%QZ=l-=isuu{G)R0wgexjq@cCPRl) zOh4v^*Z48oPEs$T0Crg1GS$48Y^k;L$aG9m9rLDWrY=s=+5&%XIJmKXN(DwrTkv~H z*c^c0S@|jXE}p9AcC;U#uGJXotC~1u(^}KSD-dWh4%pNJaujRyOHBqyS&*r%6AGgF z*U>WZJ(8blHg}SIR8cF0#1F3AT$Gsq3PBC_WZ1mDD{$aDxpsM!36myFTOrKJLb$&{ zbf++1a|jjASP9v_bjW2Q(|-FzL%(hk&b}1pHm^KZTu=^=yu4s$NqI%SutV3K7Z5M` z@hc`0%{sHeE2^^asW?&CSlHOn*J>-CT>Jz!aeF;;eq<9G2clI|(|KVr-IQXi$4~l@eH$5X=b$#?=iZ6_A5(2%VP7~( zp8U^JRQTr?XUiS?p!>Y2}PpT*~9*zHJJEdfMkn=G$00@Rqc<&1u<;llbqVl>AGRp}e*4<_l(l_k^N8vR0we@qb{`)H#q?U+|Q)1kbdD|4Nf_wr77IQruHV)UHy z8TlPWHq}3E`m@rp6+hghn0Mj_G%}RH%#ImZN_IisZM3fzdkh&lIQnEg_!FF;g(z zv_{yg$}39#CercCoTPoIYo!i4foUX4bYvx!6t3t_m??5+y03NA6&4mwyLjTmef>C| zaNagN?TB~;4o0}J_~NTnHMPQf-ZiDZyy<$;%$b+?C;05QmZ~o)avk|gF8;OfZa$w@ z@G|)dp|3?f3TBq7({|&nxO`fH|3;bV4=4z4VxWFNpvR>R%q%P}m^nLeG5n)%I%$pc z&z#vN)P`yDMN+0?>|f@a84w!$nPxY}NLWN9*Uj?g&!yUuiwpb?>{PqB-iu8~REN`Y zyPKxq=m3FW?t2sHLIoX8cotN;U6therj7oC1ZVG5>5hc! z*N6Ig{XLP;rlncQt&@xPW8B>v4t4cy$jGW$7i{x)_&okf`hV=b2Y6J~xNC+*-qz6c5LhpnoC?W(1f&zg6QV)b8BBG#TM~Wh1144i#vT%?3=JR8g3u zYv6nB@p%Fg?Q5-y?$k%-DW#5C2-sJ4OHwzKNo(y9!>mwhE8Ei}3x|{CY_^!F(bFWm zM}wuMcpD;YLfRmtFFKtDCS8f8K-!?(4V2kxQ10`A zY($1U81Rm%ORZ$lC`3$?2hidUealP7A@1bet(&B#2Wojyn;1k;NQksmR|`?HFIiF({{Qi4p<3Q97ep+Cf&T zbw_|pAcLe)k~&dVVPO*Z#yYnh0azi+n^E0n;9z*LkINwy*~4#e$$`T1IU#pOyj>NJ zc^2wp5yw1wcLV_b!RJlGq%T$!i>ZlFsl+h>3|dkLca0X^y0!2o!5$!~wQ*1>!8FXA z(yjnG=bTD1S&&%f`GB7L>%}Orz>~-1A=y+4S@LPr;8_zVPtO1KG6OQ__#A7oZn?&0 z^$D#NSvruljnvN|eMf7u7LkOh7*3@ka#>oF1z$HYSMGGBk=m06J0Kb8hIB-oiCQ}B zsfu!cnzBo(hN|wAB1KYPYB_XDfb{+lY<_Lg20#R@$h~%PK)P-q?YKlzuP*J|j~D@G z(bpW7o*KRGuy?cEoYoW5G^s4@;r0O#;q7ciwNrC^MYI6iR4^tW+XZ zlsHC?%(u_6x?Q1&8d0_7D&n=#f%L2l$Haq04H|qh<`f1Tpe?3cUp8ju`0?T++9n@$%^z>teH1=hNEP`xumHKc2)s{1W-4jX@L|lTD4#wy%X!k`=^jIl zWb#ZJ+*%(9?MfTie!$lQ29o+B;Qb6rR|gBv_`#jrcag6fGL@us((a*NV@fLu3&?qa zda=JvUuy`A;WlC&YPW`_5OFP67jE&s_z6 zv6q!M6%^Ng8Z>N9aSz$1Qf{Zhj9W<`4a2(|6l!8?Yqt-j=)$Qa4a!8Hzjskh zGiytaGoJ>gLyFe!4t;78&LN12+jv4r?K0bq(BzXe6{HwSr}f0UlRV&yH6&l8avR7m z`)f8Qj?aDBvNZu|4o8MdRUDG)&2HC|Vsueq05?CQ)e8!zOq>KU?)Xj$=F&=2bjVl4 zQyg>1>JNajOT}7XKV)Y*?3HP7Zj*zg*YPRoA7bKTpCh$!PS*TU;DS%WhRh`)D1-6(Xk#6puJ}Cm_VSrcEU0LCPp9%z9OH0GEqJhvMKy z^31s1>z&ck>q$-W3Pq7?E$};=mjk{qH8Xt_SX`+<=Ju-BI$DNUo_ID=K>*~|gc!(b z8d;A?Z~OQ1VlrNmH$!_^hJ|mpfvj&!F)KoY>kHIQU$`M-m!ImMw7xcVy@VZ{TuMk) z0=ip)Xm6I2HiNQ~;z^snO?1}RA@p_j?WAqTQA2u_u#nbS-yvGI%uKskL{y8o%$*`3 zbC<9M1G%}oMTBjI>Zrk;S`nvtgkFaL;tt0zwodjtlz>OxBi-LX>Sky6r4jZM*Dvi^(BW(0C!fxBDi!tT&(K^6=9SR*8n zacIzZxln2~uHbu6%iz3q>p*F4Ce@$|B z1QMu57oFCXp9p#oqit$)YMY)K63(6kL2%%+6nTd$6JXGZtV2kyr-TV^VF$@1l3e}? zin!BmpU`0lti-ym6yDUK9D-2WMBJ9ak}0ZHk5=BYXPOq{931yy zFIwo4VYCoUFEusIL##eqJE9Nbp#RhRCHTer)OjM(B<+`)PMr%2TXnnCRC70PJ8}G@ zq)uweN{5{>;!UAF1zH}_24Wpbk77DPiRBev$7`LX4#{e|eZq4-;cvA@p&nV31e+F* z)`LL8E9vnxKVE+&zJ=P0yk&+6z|dgrAS9D?b@fNKy1k2fmC$PAsjX0cCVMZT1r-Ew zcV{)TEr$&rA$6?sB{C&Q?b&!%R?w~{Agm$&RG_`Lu9lizB59ibG;k?w0B|(q3T-Qi zYT}r`3FN+-#Pf(wP1;zwn)NOC*V@6_?!UEKNW}ZUsohzz&oW##tmmRP;`$wl5Bz=PP^)Kn+;sYu$MzJ=yQeT^;KK02mGcYp-dPabYrm(k^OA+ZM;6Z8FP_-97uLn` zNI^=EREFmxR45_1ou9^3260i1gtgcn$z)AveiOaRy9~khdV;aVA2)pw-_I!KB|ZOJ z%K?bIX+veW=h}_?AI(~b>R^lz!c`%1A78F781IfxB`;s~LxQ*~jl@r*eEk458r$a1 zfkFJ-xpNm)B1zD;Lv;gaJBJRN%2%_GTuYA}zkhZu@s+?zzYE)@vP8aGFc)TJa2B4* z&(;TjrbcR4bsZ{^>mOK&i+Po+@I-n}4`Dj}iGU^mXx1ho@6_IM%dCYyy@LR01sp6&nq<-i|aM$%4u%Vaj| zNW#nJ4}O{3y7kwV6~1CPVtF+L+u#QTb>{$b8jtLZwCDRkjxGIHrtm+GnJFk zOy^er)+B&u`Lb~Y4PYA~a53N+JeDC;JOke8gK$v&rs*+tEY@-GtT0s))6phJFrNWU z;N%F3_2fZq51A0e^FwK3uj!LOOv3u)0V*Cmqim`{-%2PkW=)yy!fRbjV~rWBsF=Oq z%V@=~b|Ymp^NK>LKPYga)zQ^3$O>fKM3K(Zv>wF%3}aI1WVk##y^i)Y^|Grz26pFf zI)Lt?7^Z>aAd=n6CilSMkTus2fty-c#gOuG_^cM8LFMJ+I}4Z@Oq@KWY))T#%rp;R z-FgL(D@-G4Gy-Pf__iUrE0~gxXp|Y+U;Xuj6h~zY4oV@Nl_-Y|3MRi&_qb2 z8gS8_SHfuoB8SLEn#uAlqdndLS2d$73aIQ3+72_O39}#sht%n1Y4qwpM1%&zU}+8n z&E??qW?(0FnEpkO*_kxE1>_~VHTtSq+S^GXmWc3+~1Tymcw zDkdGNnxWOx=zS6m1WA|PfIKz5$$kTeZc&p+w*fsYlvRJw1zA*aT(U>amkMQb5>PB+ zB;`=I5)2%t<|iTpu)14X!Owg~up@%t6H*58S5BkLX-N|-*KmXyOLy}VIZI~>v6!qd zQ+$)U4Z?xEg{&a?p^QA`0|Z~u3PGnmMh4&re3cM)OHjaYADuL@q;%ZV5>s*2*z&0} z$~tP)L!Rt6ar$(u$>2G#OP`$CPl(+TM$(?ZdI}9GopNJSZKG+DJ#0c**`(827EHU5 zjX0UEr9ra(58AUyZz(H>P99SM&ZZPQDU||Hz!IPwA=<5h4`p==Up367};qD2sF zphYh`et?nUjJ{8b7wr1y$V+Sp?Q_rp1or!p!M`c~ga-O*Y}v=khR$puGGKhq(mA&& zA@EaEtZGG%(&>Ex&fQfSWv5!LxCAo{*i529(6o%5F;v5Tm{e{sP9FyIk4e)vS>Q2m zPb578eyR&;%w;RlwG=shfgQmJ>;S%U>JwsRVL87gkoIRKKofq2LVoO^j~u$2l3}c1 zd(=j!g;=3D29gU>YY!kYOO#^LXUr@+=xn4(<+CSFXFC<_S*Y<~r{)5|GoMFP zR+u|>1PAL!8)f=FaRO=4X=wxu7fVVfl~y^6p_ZRftgSZ9i{=1(>=k-6MS&?UEuT6T z#!t~2-7nQ=6w4Q?rA85DsuK{}l`8uowc4B><%5p7sgjC&mRC&w(P7T@GP$8=>0|^} zXA`ZLB=wR*2E&&G=_tDOEv>j78RjF%j_rc=uOYS3M(EyQ8Vyw&tfs(gzT(0FCVp%I zkW&@aL&`Jddi)OyizfEYU?=Mu^mxI_>cs%G(6jnEYxF{<;153)sO`N%go#f!XXa&~S z4_Z`sEPSR0gszIu^q&zdEmM0$m7p7l9FeTo54mi{HVjIf=5q~s!tfa%8gCf`SQ0q}!Vx%Kq&9WG=GD&`NTBU> z=Tb@6nUg2aVY==HfzZ`h7XE9rFi8Z=PgjU7KJJ(_yxga;ZH1_?cwk`*DMF;vEmfk0QqRVX%XJs47BF^NafoHZ++66ejst@-oK zTaA@AUFk>_(>B7wX$2g-md}3wnd=_O?ld)RNY}29Q}lJ?21QVGUR(NBHRd^7{+6-5 zJN5tI_|u`o-wx?|yP2srbW_)^zvxu?{dY9KYuBzlF86m-hPQjlGbv^+`EFm^UhL|m zbzOUR?O8)9!%?c&)}Hw6o36%geURE_q%Why7>AT-XGZ2E0Hau|=ck1fb8rcYD6T-z6*00fQoT4lE@h4Cf#Z z=>G5Jxdd>h`FGyJR}8I)3h`?+OcmOzmj%F2&3*JFD8S$Qoru^+k>yi|Y$ zY$$@6yOL1h|7n|#CD5Y$fAsP}{hFGT zPbSdE^6T8YPHb%_(Gj$QAPYFz@QRJ4llTFv3lEI}v1mTC@H+xJ7jR&hgeC<20|HSa zBCid-Y)A0O7V|Bg6$RFkkV!C&0UlPs&0Z>y&En{k%Sk-Qe#lU`363ZSkr!%(SLqm{ zt^5Gvf;a;GQC=m1yuhQm9cd7VLKS2wAhVg-Rm?yy5-kau3y}R#`^sjVeF82*_~fx< zkT!zE1n$I0v6JZyxr}Ax5(zRusa7%HE8RR0UJ=ZQn;+p4n*o!KDkKK`Ghf0xSA#fS zQU?XL_^5lF$xAFY+lhqeULe4Nz`UAsCgM#w0op+Ap!iV!M}bd~!d0vn2jDwIv5+Q! zJl2C0i<^C*=f~Gc$7m>wU>nhiW~r)%l<}9-=mNYt(n1SL#6t1sqPr|u1gs7MZ3z0KF5-n2h^A^jP|^rC>9Up^jTMgxsEc6LCp&}769}L$ zR`J9seQ=9Js@Wu<61@WaVrJWN7o-u~7X)t8A;_`^%)sc#hyqgv4bm;dqDP1zOpt&B zKwGn$;N8sWgMbE54QwLP1a}kNm?I>%t_kO`R4|vR4S|K1eMolYJs=>5^pZ^CRl^W& zqWk#EC3Xn<1T!SiE4Ehdz=P)5O@h3TLqsr`MexSviG(p*7UMl=y)=;I=zuvi6`LHZ zflF{WTo2nu0Udz1zK7PJO5r^MLue2_k30TGI)JQtS?_4DV>Xhyv*Z zmIy20#@5C`H<2VdW8zzJ4M}vhC)Wuy$Bu&7P59lG+_5~cCKTeX!0;E5P|aV^Z{dE_ z<@@#wiqwGVuv-8$s2hk5Nud=u%t>ku_bN!HWd-S1Q)}E9k3GK${m|!&Ex44*5rQ9) zo&+QVb3N=bx1MP7myNzegp}sKFjRSXo1+QXI`cI)5aTgyied0_H6@J@JroU|J@aV@c1O3cs# z2;=O9Ifw>;63#T>AC!k_ z6Zm4ReG<{sNbx6d0(0dFbXVtM}M@fW}X6L2rD zBl?JU2+npOA_ykY7T`pU7wqEqSHdaAn<2^^DZmjk0Gn{!0irRZ>BM0(B%*2w%cfj> z`yl?cQL)gw;isezbx6$dE!^p(e_=BTrc~;wi65+V#0nf>ZLrb~3&(x<+)7A7iOq`A zIOnWDyEgHth7HZc1@H?{NBMayp`yK^;e+#fq0>ilc7RKI{#ry)x z_Mg86BSR1cJV(hi)5I^!7*FB4pHKx!GI`zfL^ z+=te5kmN_CJqV?-gv?W1&%~psdiq^~2DwCE%$4@9Hq*fjYl9_1AUc0-d1m?#n>qD9E8@{9@LsuTcDN!gl&4GtH$ zio^cFZw3lZ1IJTykG7g<7Djs)6KOCLqivWF26`+FT~Fe5KKQMm9<}X^2*q|nq#51> zNnEkSat6tQ`GQ9vpg6{aHPFc@FinV3o(2WrijB@kLPy4Cd`h7Ng0i4X0Q;s04a1d6xf~+mcde9JZ$3Bv4WNgktLOzkra-BMI6GW z5wf4eDFyVV^hEp)bJL+JAywoU9?XykVi!*#?83=JQ@Fc8Hj0(ug$HR;SGa_$5s({R zy&n!BmP{B@D`Y5GDHFUUO;iA)Q2xum5W&_4ApJ9-jn7F;8deB11Szn~2E_{|K+J$z z7;BIDz-3Q*oAgnb%AawTLPE+E1TeM)*hBe>-U7KqvZWT)A>N8fG7P~|2_P>By!pTf zVl^oUSa2eEvfMA^eZ1<}o_elOuuS@X&D^?|KRVI`r`YYLYA3S|N1e(wZtLAnHI^G= zX;&`K3IR*K?4*lM>TJRb03wO|A@K_K?d7eA9rAy115*fYi+-xt|5tV}1W9|qSMY)H zK444Gy&j$(;N@HONI04bpDy-$lxP8P5C#J>PFH4ca3El%aS3l|oTe>JsyT_oA}K2?$`u9I z=Y)BrErlTPt&3RI`iCnD}5& zLj$Oh+A!1ulH?XecIQe#gljenqifD?A zq2oTn+ubA(j4-0rZa4=0Y7)uO7>MA*X)-rr1x=e|M#2h_Sjv4@F`8KfewDE-)WaVO z%o{WCIMuP}PVOk1+A$m~G!Fng10R9zJDB*Q#S$1DSW-O3wTM0Ft+ZGbIu^^J(fbLy z0~r%d+5poxj>K%nY;Xts4XU(xe*meDd?Z`}DcVQsDiT;|kRv{+zm1gSm;Vma^bw$) zQ8cZD_>V<<5S`QHUnNA&6x_vm{6`7V?>Vi0t>@q0|JP>Va@0W=FVx#usENNW6xets z@32sRm#gzNx{soQwv#u@E z4_#XU-!|TP|E%nP^?VE)wf%CIFmO;_VW9F8)V?tK#c7`4 z2vOu^;rtMa1ZAxIg{29&x&n}2zb8p-Y@H!hwZZ~oERwodywXYmRh5wNT(lYzWNRcG zKdm=en9@n2NU4wqmfaxRaV|&7Jm!LIrkDw*Hi({m7DK9#L4gtgKL$PtBE}FSop>6; z|^4x|;v$2Y+}fEQTIGzW60qT*=w zLYGwR2nf(IN~zFiP%&;a(UV0#xk-S9)i>Zu(o|@>MNp;AD#ihM0BXeD)8aMA4VB;I z)3<8Jb=t-vo=owDm9|^y4XgOsDn8XR(6uvmS#QO==$uD2NLlJJBqb4CIUr$GLaJP4 zQO_YNFq1-F3#??M)d6}4(&!}q>P+dVSm;;5HV!6+Cb3J|PQ|1RJ#vwq`ruuVUE3`x zLO9Rm04bocWGiM)K{E5~&~m^EyCE3o$kZ?3Ez~{{oSA|ppmB&EZpIge zh;cc;MrsDb6LcaH{RBLiGE0XQy!Rk-4do&VyfPJQf&dYWD+dc0!H2NX*&3MQvy=#A zIyz?o2@Hn(I*BwVC@A5bhp%+H6>-PRnfE~uk2_YXXFFPF5(EaM4pBk*gS)_kk3HlT z+9eSC0+McI5(irjk8d=l_mPnTh%K84!gUk;W55vNotgS>aw|`eUZAPa%CKC=1T2g4 zpazH+U@OgQC1RaLp0_|w0-%>KV^H7&G{vN)?Ge{-RUXR|Oh5y+;rC$&lxm%PSQq_n zQ&u&fkWU)wFk#~grdc4Q)gZ*gd#NtP0+b*jq#Z`7xG_N<;`@(7Nc#l7h3g1nC4%)J zM62cr@WI27<+K_tb#R1mJx}(a_Z0Oj-u2A;0U&St{WlJatK}rFv9VIMu%Oq@{N7P3 z98hpEQ@Kv+_aoAVq_y&d(BL9&5-ELTqm_IS%1%{jbclDnE~LSU;tU;l+|+uDhljD4 zFS;v00DuG>8Y(9PfI4gl>nmWd9(!{7*mQB0CKQWFhTTa zrr4`>L>0*+LcGpz3xs5EZ*qoJLb;dkKWf?E=U^SZZS~Cz*7Jy5*th_6R;S@(nB-A zoSq>pseE4?^{S^?DF#PL1sgXHps7OG3lzrE(*DfO0QJGyOT?O@2q;O>EO2m{$y-9` zjm5zh?_mm3QQ>4R3227MMj9lsB;e$*m0H1cljTy35=N^&pTjW116jdYB%>jhobgywCu5p~sk`zHmh-8YR*Bn^onnie;7x#VK}& zXs%k#BdIwi#g#*DFW1@OkIQ;Rj5<(13S_xJ)0=8=b%PH$f==J<6$3PCmqd3Z(fl-7 zZ57=TZ4kqyl6*IUo^MJwIYc{BJ|Y3}OAL>M1`&=fG?5~P@fQSu+SBN(3#Sf7fnBQ2 z2datpNQlYq!c@0}c#CmF8!qjz4d$7Zqj@K~dOG31E{8bejV_5;HJzJ?N0TVGg~0N> z>SVzLByrVN1#1cY&W$cw)It=&dY!1EB?Bzx1_EoGPuG*|-I683c;zM%SOYUoHQqv# zG4u>62iZQG?q(pTEd)_>44-0f>cr<_!5Zy*InW#*yc!FefOu(($Iu|P_F!ePFCh|L zFSWHT@l+uAn4}P7m|8MRtsp4%YjLtd15yCgq?!Hb19%D+yKq65r-bzA| z13X&!8cPj$d2oVZjPEc`21K)}AHo3usmATguBLd#ZHiG)qYr^m%nl}ze2+!W5U*}IG|8ZjxWSO%$>#VP#Nsi`P>f{I8KHpndATy zzwBeGgb~eWq|TJ$M!_?GOrUeX=y(gr7*a04v-AljJf^Zl1!^~OEk70AcnPq7v7ROB zYo_~9If;)L25>7?4&kq^;yFcm0y0^aXefRu#t3?rJA=F=csxK(hhK^iFEOGSAim^# z3gJ9mN%9V!FJL&uDAD!^>2lyiW-bW z7p?lENM7-PlV0}dC1l0C!Gu4Orx@W?wn2Yb-5jNS$k)UI@}In@(6msyo>oWE3iJ{( zHig`N#&v6?SQ9PRCPivqEUdaE8tX?*qgiN-bJ$eRTt~MtMg~q{%_O9HV!I#0S-Bg) zn}TLuGFK6#=WC>W9Szz|wF$4hWD4IqlDyhn!%<0C0s35_)?Sg~ks%MZ9yU-Mv1>&4 zD`3osxVb8UTY+Tbah#Ct=4c6;q6ecI8Xkil^V-Ld+Jh%OQBzmO0KxJmT@*u!gmV$M zp`gb2r97l+z|l{)(xx+M!Bp9U{5s6sd42)Cnt*;xeG*!(PGX(;=w5_sD0JRJuvr)V z1+T|JNw>yQFF&n`#5_o^fU*QLhz*3QKsI8_f=Z;D1kesdoJtUZfMXdE`OL!(_251v zq}X$dP0i@{vAn<_XyUzm-aO2w5uMYl2eBQ^*o3GPucUwqY63a}B5~R&L=&L^A^er- zMp9-IaGrllA296-D( zsH9s->)x7Tc)Ut0o(!oN0{ zQbP2eE(@Qo@UNzvFq+^0XYAa+pa1J;;19V*Is*v)fxT@7;`f<;7ElWOe|U*XiUEp3 zg=M?d)K*`{E7;8M)d8I+DBu7T>{C#sIMx7+Z##7%zoCdII7SMpM23d{We{CmJoNPG zp(^bdI&^6JrbmVjJ>7ojgd z;y~{U1ckrv7)b-sLGZ!hsmnazFD`U+Sq!Vy>N2bb0wzoz8SZXN+`DErg@dP099TVo zf^DY#Z^u7*NzNVdJ;R@Qz^XWrOKiYPmK&V zTlW5eTh@M1R5_~gKw_s*nBJ)#8D22`_8gG6;jTv~eUiD!Uz7D=TuPn=;^C|So zyi^ibfS7>@a+4!yBZoB56pipw>Q-v zpU`zDu8OW*+-0YMWSsN{>N)F5?6?8-jK$~|pq};^m>Z*i45MGsn;KG9tQ{E~L5UsD zx1w;_OO*#spxd3$?HkbT#iJUFT6YQsX%PzTj!fK37~35fTQVI43t@dp`~Dw zB6eRjGWg`}#k*d_B;jAsKm69}8r)0%A$?b>2z_*9Q#RVu!{g5xd%-S*N1(9}&{%g= zbT=wmhQ{LIOt()oK2c(^ST(4i8Y1b~*dD=ItBhdPQ!94NUS)*e!S#>lM`U%o7|g2O z)Ywru-y%r4H8HuLj_naHL&4z}AI~0-?@v$=yDVJQ_~x#U<%gK+rXz9sf*7{pfD63R zxX?x+{0`$pg!oD`Pqk+3&p9n{Ud>razHb0#n-u_9;2Sjuho(VEf37~klsC>vHQD?D zg43W7kZ6&QqK<=<>rH{<)gv$8W-k_~?cwAD3dFn>3myoR6Wt;tWG3b<*61}OwKsoS zklem9f(p|1@0~>mrGSjQ>U&g4_hkz$Y>BhW_2Y}i!6pLr)}4n*nta>>%?so?YO zvrp9{H~K*N%ya2`XreO&my_Q|*lZKdx5IA8Q_82P?{3}7iSH8O_K9LNJJ`t>w5 z4V$A?`U&6HW<|bpoyqeVLeM3X?=!RCvFC@Gh0P1!MO1bXqk^a?mSTgMWXH63MpR|A zF(0oW3O9!SSq?WWvJ~(*%9{dnU>~fgQx(jfJTKH8Fi@Z<a?8{gFF_ zXIvJSSMjCqi(wS^>2uQe=}Uym=mtgD!EXBaP4yuKp*CRl#80eXr80zid16AscXmGM z&q45qV%>yZXt761n4`E2zX62phnKtG4_ZFb-Hd#Gkdh#lniJDf7Md!hVfZBo>PXm5 zfj;zrK{5PpP>HE{)k32UKVEkCM}iqY%K0U(-4Z|D$m`dZ48slj)ilgb1;Yq5 zJ25et3SJ5x!4@+=`R4w(0l18v6AhUO_85N5Hw(Ay+qM}64ipvPJ__K+<;A#8Q>Bf! z$0QrSJ|}P8N-CH(dph1VKXEhE=si{#qJm%UUw}8wPuv~g^c~v|km9%I<*hqQaZ}65 zhkv*suCd57njLG_!@|!~`nFA`xc!Ro;UC{Pz`cx%0l?!Q-)PQbiF@Hb;ln?^fkETO zi>E|1{*gg?tV7R&X#23mSKrI3Zg=|XzakU_LSmb^;k@lCyr<59NjUm7LD1tn>gS4l z&H4-9s|d}Gt@P@3=AC`_3t!Xa=AEWn%sVYkb9i~4g>M+fM55FBhs)?c-6RE!&+vE| zKTiJITQ9MHFBgvf&Y_@f6E+tNQ8-M!IS2Z7r`Ol&Q^mIrRbe;oGpqLP%T(i<^b^te zmldRh`D)y=7&QKIUr#-+#=V6h;~(9r$TWwZ;BsV~*>PlovCF?jLHbVD zYx-BnEzm?vrH1aa!s^n&Zh5^%2iZ6&q%K`r1hED@E|VcI=uCrueCv~}hT9xeAwnEP zrZa^cv%lYAuqdOHzQ+4c+$S966nbI_zlgVdcx%Kjc9ZcPM-Aa@iwhSp$?I)f>;w&Ao0_Xg9uht0L68=)Eit@mIA0-OuwZ5DvNhZbNZ4 zL{s0J`saqvjXJRJwK?IvJK{RvJ9q%sKf+z}_HfLeykX9QHqItv!VloM~E#PEf5hDVyiO6XyyAdB~7%BF23+A}xI?9rM11zD5Ff{Pbcn{*DZB9-$ zi{DlkOY(qGz!=`gm;iHxGX&y#514b0v6`j=Cm3$O?BFU!-(@ow`oNlnPn;fiKzIy; z48urqMaph2`pSvkpb7XX8`9kbUL7RrA@!w!=!M&W?5GQk1}@`(`gqNqCxEL$2(XPr z^sWrts3K8n_AA6ODZnCg*Xr4hIz#$_npnIuflpoeDA6h&I86YBz=|(`9U1}`?vY1` zUPf>=f;f`j2Rrg|{4ha9t4Q5EUA2WivgrLRfZ9ba?4Gxma z5FNl>0kIE6_~~>Vi|h0aq7aee9UBBfapO#-BSLux!bJ`TL>~)C;YedaoX3BjnP&Y7 z0Ru%TQ-uPh3)Cb}h`~@Rq9?%Ks=|nxHYt%tHyxQJAiD8LuViUTlJ0RMg-f~c$j>B} zCDOecnqM7(eG$fh;5mdSa6smhRk;q8lNgTR+KL#liC&lmd%B2s*?O!QeLmq1CVwJ_TYwWEVhw5t^bRsjxhtAy6%w zBT}v^T|yLV+5pG{H9)TT3*a;o5(qH>-VYEYnOcQJ3{=Caz&0z=ZRagtY8XjTMikb& znObbPlOl#{)JuEIZMfo$1SKxk6KBMY5s~g!NtO_emM7irC`%I=FB1}^RNR|258w>+ zA9AI%aQowvq!Ewr7V!yI{3jC(YeI_zXeqbKhE(acA|vXqzb*`Zw0U0siDw%2C2yFX zf2na{_>(a!YMX6s*f%A-EFaIqad9ySW#w`=aWrr4A4OxOfzV`*GvtY>QhjjohnN#0 zq@JKbVi5i3ZDzLw#4Jv1l1~VLfc$xpP=a|i?7A3(j##4N{Z0HHkKZ3FA<;aq-)~u8 zaC~!g?dfUj>yDmX7``_Bl}^b6zN#t3_p!6rHf``#hD)#8Ul)-xDesMW`wLo}Ul^`f zxV6)ckKfImfp1&~ui;E&0gaR}gz6Wx zw3VKKx z$D{Ln@g%ZaaIuJ3cOOcq?1OE=A05GWb0$oF(TW!x3xKZ87a`k5#h%v}uo4C@Hc6<& zw)F7F97ZgWZfFYJ&N10oOL_|6s=JfM?VQW9WjMZ%R{?kp5uw}}yMB3oS^AOm8M}Zd zg0G6o>|P%&+x9)aTVrDa-+^wxu*@GBD0VEt6HcZ9D3p${FzJSW8hIn#t;n}+KMfA! z{hioL7ZZHJ{gklHD!d6s3VG4JJbfLq(;gO)1R;5{1=N%%Nk{WJc@T;UdZjs>x$q-| zmUsRr^c)y^#>mLX7QI#A*Fi+HkS|F(yw=BwZdYlE6&TIqucPfC+M<#?a0Ra z{Iq3TW1-T3%U!4C`@2ry-^r{k+YVDnQk2`{f5T3HRbjy^dh$wZ=QWCee;_v4Fsj76 z>HOX>3gOip^ClH2?iedDb|f|tK+^9^0vZWh=u5r{yMB4ELQi_2Tj+vW{t-;qg~o+X zda$CtZ;>Pj!bQ*;C}>c^g=9qj0-^9V7^~hCgR|5lZzs#2$a)VKffzL1?{8(!l^1y? zRmcJ2I&t?0K>zr!c)0N2lIi&lW#KLfxcY+ zL?=)J2O)Zn1(AVM+NF>+(4yOQmsvgh*af`Df=k(rU;C}^cnyXUI_xAd0Qe4||8d{8 zG=V>v99Mc_DvmCW5y9J*$@Kmz{;p0U+LVIF5eCm3FYS7_JJ43!N5z%R`2F&OC z@(i~!+E3VlMIi@lVgc^hF(7|(wd-i(ksYqhwXARo9&pe zonws)nu|=RKgh5Y%>z>(0gx&`vz=tI6CNbBc--ju~{R(;v zK;uI(A745|1b^Wrx(iA!c9}q|9FP220ag#75XD|Iv1>;zMt%qjtIx%AJN`fes+lqA- zG|A3Z)-5Q2GVzhCEfF4r@H%j#l4zuE`AUqb}FK1+Ne7xHN@~jOhxwyZF zLKyI_Oty%EWWi(EBI^qyf5}q|U z@45{&{FM0ZT>r`7K~%C5HCLyO-mN^%`y{W?H{-N5-0dk*xA>dk;hw>zb?*aAGUoNp z3w|>^n16D7!DFY(DXJl9;10De@1!++>D%GKpHSqhwu|fDih5)BX8-7duW_&Nq%}w% zJk?Np^doC{?#1Cji`u9>`Obp6&po%-{5YtzU>fed_faw}y*pt))fJtxhDV&BhUmI) z7uBV-ORL!wIi_GR>gjw6^=v+aX{q|9HvjA4;bWH;*IC6^C*B>O7x;R3aO?K6f~U?@ z;8?p)cpJpc=>1ys{!aA%ZuGuH*7u#=I}ew^73e(p;5FoH5S>w>V`F1&IVucfFRA-b z|1eZDJnw2$IOOiKf+2O(Q9nW6^Rx~HBhYdO6ny>C;x%;S2pVpIa!;Y*r`OQkSM5>i zR%0SwoQb@Y52N?nuRXiFS?1`1L+JgQnexfITVZ@3qr{yUpR7d*S8`g-!x-NRlsJ2W zx?swKhm^rVOm_jkYcSQ}Ly7>?$7}nE;_wCMsl`F8nqpmoMa#vah3BcBV5%W@MbU9~ zK%-Bs>N1;colP{eiF8{%WHJ5^N9A?^@Jt-2HK>qKzWrutZg%}QIeTCDdDleL0EQHx zv>QcCkiuhtlqUzKd{-c<4TawQVAO6T3|#z1DI&s~02O-m@XtArAH$yjptGrA)b4hu zVE<>|Ow=-7d9&0*CBYY~xCFo{|MY8^_ySCPGS+2S=o!Qb{3+Bs4_Cpjw~B&SzZqUm ze%n9|`LNW9+Hn9?0e~t9pbFDK%{Ecn1`x^z2nFX}1gLPy6NHkh0W$@FnIK>WH&HMQ z7zqMK@&O|i!f!%@cOY6XLhGB+`XE5VX#nbI!18>w-|s0=P`OV49Qv7qCy@O`k{ z#o0@$wGUqbIP^x9ziepCpZOa&bV9j0Ec_;v`-=$Rhg#-!+r=ByaC9__C&z$fqwMdMeV;{QfHsHvculk25V(_YWeMX>%U!6uz$y@ zyzepQGjmsVz)}~W#2&^TcwU30u8Hygy3{}(sG(+Lav+OgEPqr)1R+w;H?SD|2dhFE_SCY_ECY^sZ)=Ir*)h zJv~=IqUbN7@7~J!^6kWo^vClXEDdnuc{}IAgNGCvB2Z`=ct4#e>szzOc@q? zb)jgK!O^%pez@=M+UNV`zBPLXdc150HC1!J!hyARYvl<#)lAJjx~()Af5^l6j>^cndU zc*hhq_dH(GM?Gj2r_$BjoVruFNqbK1erFnP=pTv4{goeyq&sduL8}wg-1nOE7VGU- zl-GO3vOO=}xFFA@xE@GaQun+X>R?;E=VfXT!xNX(Esrv4-Z&eV*B|%RswLE7Y-Qba zHPEids$^{9%+Zx~Ph9mx&9Rur^M>|VwI`Bgaf<@qeYqG4h`_X^bwF9ozgS%7su^F? zYu=c={?nH3`JuT%@6jWNzg<$-9w0aH>s!S3M*(Sr09`}MZ+BP{!u@cXG*l`LiPMExM&nxA(1Er6>PbB3XohiRk z&{-%pYNk8d0%x`tmF04 z55v1_MNAO#=jWn-XPu~8bdfEDG|x*hslPoi?XuN`KP#D#$^@ z(F6IGIv9N1|KW(HEB2UuhSeWjC8WewNi}rmUSoDChznLxyu=P<hEFFk%5XNp#WeF40m>arErFpFG63e+aUPGZ`NarFq$0D3Sgm^9%uXy!M6c1fb ziXk6FLhPA}0-K$nbUp_IJRYw4Hp{^Dn?U&l$xRcyS+|cBjUKFSdUQ-ImHs_WF$SG}1aR>4z*GPJfl-HXD zT#c*NQPBKU=phw32|y?#k7?$&KP>!HfTlpUkpZ=wh5#G^CcNo0qybXYC4ftk-%3Eu zVDu+KY0dIpbd#cczzRr$3;sw$i=q=7Q_1ekqQZ$EFv6jE@f$L_zHA{F>8`+gg5Jy# zg{DdH&2}R;_WN8qnkyX|-9RE_N{o*JR^3gS%wriTY8mLKi)s$IuM6NmJ2)Ym_g%QD z2)tuAA-xf^5x%V~aXTVyN6 zbZM88r3AJt9dR3!#ttkh@r&GKRdm>e|qgSZu2ceQ$}{)Vz5 z!S7al`U7%of}AOD)u+qGlor$$y65d#^qA(mG}fkW&w`xc&S>D5``8ETQzn|RFJBLnpA3)wF11Rwneypi@DYj}0Zo7Yq z6Oa?KAQ&Xw!y9Sk4;X1dQ zUMhXO?i(M8MJeZ_EGUxLp-+9MT>vcc{4v8aX zd?USur&L*01*?k0eHnkH;>xN(?y3%n`?iC=rVZMq1GC-T^19*Olpo%^rdfUElHz<^ zh36aR@(o%|>rvwSjUQz}I%s?039t(blPOd)@i0F$=&7Q;SzQm`-q9!t*T1zq?*sC7 z_s|7Tu=cIxHDlVnl0`T7Q?ne;Tk{nVLPPqL7vMXH;Ki$hSM@2cdr$tDC5jG)udbP$ zzx?6FSy$D}o=Ww7{`yqyllz)i_s91O0#uyCa;d2D{;2#Ebn=VhSEJ}ikXFygYlU7W zEvc_H`2@S=(t*V&lZ=}U#jk?K{B+ffnj8wXG)p{=#7376-2B7wJlJ;x@Qp#B7~Z`i z`V8TD5oDkJ1*BXoN-}FrLv2MB$@!mR5~hXwtfBgbKZ_DiFWs1*u|ZUx!|%dNOACOG7d>|$pr_A*B_0|b9G|wR_KOch zCE5snc-#4WJRk6=qqcddzVCot*U-SOt(VuPBkon9faWlO$pCJGz@VQf!8FwhV2nYc ze%;nvYZo1sJ0HULKCylNtLtk=e3p{^r&rf6guxH2DXX?#-K5~frOkIfeRY$4;=K3X z)2C{FJW!Xl9p6lx8kB_gw?FT!Yk~#@0=xjK@}3FoXlEv)`&sQbhx$VisE7-#5Q0iqub9ku6UKqdTn5YlbS1f7c_w z6{M8SDC2cmp9w->xVzv(3fUI^ zBk9kytQ&r2e%4uh?;q3ryi$aQYB8bHXzJfCQfNPLlX**aZ7R}Q z)CUKCc}IRx>LWXQe|g6_aU>X7)3RXWCy!@)YFgIed>sfu(m;aTPZ>y_TJwwE9;HLz z3F^xe1XJ`V>CciTz?Kq?P9J&b<(&^`Rg@CBW7MISv+-S}NnLEGscm+?8-ZhSYMXVw zBf)P^AJ4MrqUzk~w2e7~q2DLuD2^JxfRi`5zH&}PP7s=xGh=9HDqs}2Q@?>M@b;FPy< z>I>D^{I%CEn)*U1ZU6Mcs!Uwv)PGp@ngzqv$4EDwWWFz(#wr|tY%L^fvMor!JdSIy zhV`WL#QW7s2BTg@J0?+dK!#DHH~#>0ygIfU-qEF!|{ttkftnfO2oK z(=0opm!ON{K09sh>7m!@HsF_h;FoO7!A>9*^rVCBp&)Qd9dHWnmR19i z7AY`$H~IijM?O%;D^N8AfjjbnJJ4pR2pHpg>)9Y9j35w3Ef9v;7hs9nKVpeEbG3jR zAmb6Xo_aPSQ$J|cUjkdR%qHg~f^dUgNWkd?42~Tkj1oYNQP3u*_Y&8%1X-q(bx8Ch z$|LCJB)7j;JU9xtErI#4(*e=o2)AqBe)F?^ZcXu?*|@o(p`qyXsnW3iHa zz))Hg*PvGhcQl5x>Tmfpv$`={9TG!>N68)Bk86DM3A>oYVBY+dyBgD<*ipYes|jO+ z&{r*@n{$G*$LLEN_eGbxD~{Wk9tCFpGM!k;PN9GGIG87OdEeL7_c z>=s}8$g(*ohNhg(*#Br}^!6?E_B;3d&G_cto-h^>`jqm*N0xym)I{Y|iUu#J41+zIZZ@aB9$BF;xQ@f| z$!ToZukVDCey0aM49aT~B36g~JhUzMBazzY;PWcmd;NcD&f1S35q73b=*bensODHQ zCTMXh)oxpgf2L2>D%(#_Wuk{c%w~n-x$s0St~xs0amNi>T&@;sieE*Vh|uIo<4k4H z)v_|h2t4$dyJh9(T&+tB{Dd6}99Mq%v>8~kp+VN<%x1f<$2vNj#iU|GBu(sGr`t>;Ss>IUR4~kOq?^vJm6y+TBFGl2} z>qVY8L&_(lpAc@*#td5Z4m}s%S+sm}_e-N&;d?vf;1|M9wW83<=L=F>F+rsMnKg}; zDh^?%4@M-sh1BC2@mTUglhjm(5rCYxaX=Z!d6^BLtv(1H}L9145NW+7`;35fPjwC}; zdmyX6cjhg9&J|j>L0=jp>i^Q~%Ozic=4j9^EjD0SL7(Fyg(};jB%VPV1O_#Pt1x~s zjS0xdq;!Z1-J6sSap>SLv;|Af_A#FsU$~A0R~~g@r{>ANv zy|83Ngs<(rH25h!U9|k!me+fDmfMwCG*8PTZ09qKmQ!A#M0`r`b24G5j!VCe=lqki1jYlBbQeC`TnioLI3S1hruT~V=%0(LAAN^*lG!S1^D zUDq!5uGn=gyr0SL_xC&J{rf$y=a{*}%$+;)%*@l~d7kM!nm3Pvk)B{Os5cG$s;Ozo zpCDwX3FBDBaJIk9O`w$(i~e;1d6qF*)oI7Zr}-`YvmKkC<{x=_Yn;*5>uLtsCMbm+ z#Sbs_(UGgNYQL2@`oKoyWX%3wmJOGeokEJdao+Ov39ID5C-R!w^(gl!orCifxPFC1F_oD~TRC>+Qu zmzamdhV~(g%|r5_A~!d2S$06XWok#v@;E}1Y|z@Vgn3SNH?Y8y<5eDx5gc0r@G1O_ zyz%lfLy3op0EvV-E|iVvVjCDR0G&Ub0uf(Sk6N%M8#llPi}^nlf%ybg#HU>beHW>OqWu?+k;Pz;5cA`Xut?|7s43J!MtTZTu zO@Vd{QPxONb6mC;6XM$pG}b|q6$+8?5VdoNhhzI=(!m$zZ8+A1N`h8bQj0|l%Rybt zWwK3-N@ikXiEjv$UY@**(6Z$+#n476gsh*hr!;IBwLoC@F)|Yn>W&aO>(P{)GQi-e zx}}$IB_mg;nJ{1WXd|~!mkYBW?wlvQXu__bZlj>lw8OZRJ{0CsL1Y#D#{9|mAUUfI zq8LR0hcd$AoC@n>2v1gqu>w)-RAgMQy^3o$ROk0J zuZ49xSZ(f=^!QSrCZ%7eIue!*(M$iC>S%bm&k+*-*JoS$vnvlk*i9>CFNI-72&QR9 z?=7-Y1?-#!m5vV01Iu%&hv;843v~ab_*ux^1mw7BQg|R#`#Q*IjBRP!w~AZp_@vEl zy^`J^ksHGSfZ>0u^vM7Ke1zV!dr@gjy{-B=$3G?x9PqKiTgFs}220%xkr@4^0F1s6 zqc>d5O`KAEyyA!Qd&L2azB5K$^oK=jLYj9aq(%tlUfz^o7urcOhyJu^XhMHV&rk<} zl}6I&(O7+-%K=x3a+l&8SQX>rO93&!fd$fU2~ZKisu@S)5EK&Vk?X)egKpUd^>k-d z=f1CTXF~_{kdv*(k>A$Xx5{qYfTo(FInIvP(O9XT3446W2RE}aAspHP%JPPk;awdx z68#Pu&^S@hvg^S&lX@ks1dwe2@>xb~y@7P^B>;I>P!1QN2|mP_9NV5=I>oAtCK$t} z8K2+3M3)g}v;Y9w6ZWxUQ%iNy%bz`yJ_3sM0mTY)ciUJ%vB4(xJ$nz8J`Bv$6>j~Q zcyz+YinL8^_G!~*eP004SjhYAU4_mJ+qf;U)ptilZqWCN{QzPY0B`8q8Tye(j~4O< z#B8j?tvgSs8uidD1d1Y{cJ+HrrK+*HP);?ZWSUf?FvG2B^de%yztAD)4UOXw=_JY*T$er7Wi+$6bF1(e$O$6FBZg@#y(q`U7z(n?f z3>kQ>Pl?TkGYi6sAEJpA8~sT3gEjUS?Mq*ffQ+9Xyt&=8o{ZxqJ7Sk~M2*L;y;*;8 z$Nw4_Fy+EL0EZ{&LH%;t!p}!*?2-=!fC8=*&tnzjZ@vcXyJo!z;i!qv z-!Ahdxg|&jI^o4aIRFgxLCk1j`b@|VaXO-We_FHi=NxiqiD~`EHQ@ifK8zyO(BusF z`74hGSWjr^bJ|Pgg1aP2srFw7D{lq%Z`{n zo3xb%YQB@r!bS3Xb^iub1!kW^&)Y?qoh;>_k}XffEyiW@Kv-rVEwAnlXK-)fBU4Iv@6a2zC-C zl|q0E@d)wNK&n@yn4z#XUJuAG0WmYB%+YpAj{p1a!T1GixEX_M^);@W3Jeucb_}Jc z{>)OBnO`qzjl#z-%z5>QlT6%Z;mDJ?htp#b)N|*bko!5N5!}bdFQrDqgd4_OWOjbsPAhZ&b4fU6PD zmV&$u`rlW*h14&B^+ImWEO4*OoUXnf+wO5q@b#iWhyLVn zYizf^1(wcM<58Ou>g6Q3B`KMLkf{60PYB+0mLg;ccO(g>10+s zOd7~ErdG*T#w+BqCv%U1{_>~G>O2N_8ZkU@i27U}a|l>i$o8cQu^g%uBCWun(FbZ$ zY$q^-@CB2}!$)~cBkC#+H>jmV_KuE^k5O)@TS#a z`-tz=W65irFfn2WivllFA^^)J94BCI3z*6D9)U!n6~Zq7CV&@>Z>+_-bh$wL)LLvi zNGuO)EY?(SfptNR#nu;ZfADcMU^-h-sza(pk+uN?T?LAIRWmo;dKqPrLI>gfrjbVq z!KFG8qSC7DH%EP|XC3W!^45!V6!$WAj1W5h3KVLP8q<*PLY9{A6SC^!^oy0$)V$Kud%1wib)fH&Xb&3E|!#vi@cS2MqfdKnX=gvMu~^E61I zWGL~)t=&7;607dgj&;!9e?*N14TMH*4_1Se*62+ZmTy`C zZJkjvDtkt`tY<1|iZ>mwouy+Mi!tF14XnZ_Y8%)qoXkaC4eDxA36mj{8<)x8=h6X~ z)UgI0AjS%cKzlH6Xl(abULrN=70c?8n%lBBu-(8;dgreom3)m+vdoW*5NI5~Excj) z0U{e)+i9pL&=}9ecvT$XYsM#7Zl7NdW&29*)L-i_rBp_YX=*2ArQZB&Qv+W>HuA&v z{25NdR^G(VpTomRT&j4WWuarlm5kzj5WR&jYmsm24uPDBAI<8f#T2UQ}LIc zDOMVa#8m*5bWY60;7FX8pjp`J*V&wdd z2BN43KFWtOUD)5UG-!2UNI{J$`sI+YyuuvftH(Be%v4K9H<_Nu-E0uv!x zy*-h9G26dy++OkSz5v3IOvp-W{G?yhjyR^3{Vy+#dUoes5B7*-K+QRj*Hl z80BeD3WH6fYGNKl2A7;k6U!V9vw5?HgIe!@N6zd2g+R zF*DrfDc>T%mF#&NJC=lMCdpyjVl1qV1;l9pa`O^y|L^OE%90%?pR^7qp(`%Q!M%Dv zYmM?H+(woT5#i!wxx552g{KtvY13k&z3!mF2#rwpblnM;~;s z39YpT``Wm3LQ4awO1^_@LAigxrxx;_j6*D*REMSoc|q-;!sOF@2*vFtn^VBn<( zacfTpOk^$k8RxL7gY=(foZHQpIRL(Kc#Wb(%I#94{+WV*Q6$d5#(ON)@yQC?Y5%1* zKT%0eZVujEq1%$1GmfF}kUYNZ1fN!yQnh?0Q>EbUM%!|EO7WKJxqOwen?_FN7_+ui z>q(UYF`33f=0Z;=LLWmvb%*#SCv$tJjpD~UE=|m+d-^GyQUGGf3bH457k^G0OYJ=}unILrgX*!47eb*WYN@Rj0W{0R?b#asdQ*78- zYH%aNy-oWty~%E}V2Nv?(srr9y!$ki;675W>#{{ zY_c6t9O_121G>^Z1eZvFLA-qeu)TlB|Ex6D?{pfAm%IQ}e~K_M^w5K|Ycus6?dp4k zu7s69xN$>$YU$!Vz}%2CZoaeHL*>!tQ7kX?^bX38Z*B8PPs|Pfv*x7rs>Q5gw7zCZ zMdB-P?(d?r46p?>j$2xhXku0jNzSr=cZ}3yiMp1^A;t@2N4AlbX0Yid?kM;6iFdLi zGHPa`$kejpt-(&lor#@kV4Oxw{wc2n@{q-{g)I%w(znkk{kNK%y7Apkedk$PSKPAK z)ZDbav){r=*EG40OCyGrP26NYZSWuKGwhw8o6NVpn+&7X(Nzx{jnEGBn)2cu_r_zJ z#I2K)`bJe}UIy!2YCHCKo%{S`$IXg*m3(hG9jmIMo}tFE6o!&6L_n8$JEreFp2j%Z zY_;DJYK)J&)JtREilrv^#JfU`<81FMb|H$f4&%9Pqt|rfD-Qg<(=XXXDkI`;$OLOf*gSdo`RT*K2i@ad-Wm zt*E7HIC<17f$E{f{~nWE)N6pjU5?%YMN+hvL|qfdgR>T^hUH#)rEo3#s$_jLF=pG3 zsbay>$_>AXaep~j(+y}=fHo1gZfiU6(oLGTe5e=D%Lm_U$19Z5{>am-{Dhu z#XgP7k#U%g*SBMMLe^)%fvw5h{og*5dXBrGAcr@|Nro|Qd`rWEjf?!yl2_*8kPz-j zP7@El%KdKd91{8zQangm)ZN~O*q{)Ol+IGy(k~8~>yhl3o;YG6>%ExHwV?3`eV;b! zokFZE^#EezUaUR^LVrr5sHI$Ox=k0&8ny*ytQikyG__dErD;cWkLLZtOT|z2)=x7q8sH#84;S=@Mqo=J9#@@!$ENWx9?{o- zi3n&{y1BN^cwj;eNKZYA9GF3Jnfx=t{mg78tdFPTj>3f zQt)!;HXTFeYsZqX0o(ACDFv3#lam3)9N86J8NLzA^Fjy0#%;&XsiP=eBqutf`WT9E zR^16*AAbp)$C8)Ly@jEp9@4(ud3leankJBNd59F=bxa14Md2uG4Uu1jNu-o4d$_x_ zrY5ApW>ApRXB!`_m}y*>DTK_t0@=ggJ$K`T+Xw!oSn-g!nxZT|g`_n`K?42)v8i?l zl^g0N45M;G2-s~OGR!3<*`YIqY9BjbESZW~*ol?yCr=m$PeT@QD&P@`2bYnNlrk-S zF-fygO-F6wakT&y<{;ST@~EG?x9lj7;w*1^au0E$l1{DgzvhqfB=m3PkyN}L#W!ul zIOL?(#w52@RnfHGr%?pNHz?&TJ2 zmP;45B!ZTtP7;o@RT9{^(GYJWTPKTXAtlg?4o>1f(J>qK3?FXFZ(1}^HlB@BQ8E)( zzf&3es0$jvk1jjX`esMEkpH((&{+tP7}fls-{1{{Oyincpu`4D2w+YHY;Qo?#Wmu& z8d3tm!coF1pUCbZh8$)OKI(_D3SAAynT=pmiA2l?B8Sk9gCrby{M#(c2t_S~FcU_B zJN+gzRqWvk`G|ehA1y;U%j{x>XNVwFSZQXZ3Ua5$qW#A+*h6FbrRxZ*f+%-;2D^~~ z4nA_#54Ba$n1wVNulZE7NBgzG_|h1saYkV+8;Fs03Q`}XLm?fuf=LiS?*o_MHZNly zM~&|Rg=J`ABJ^~Sq^tQxMPZ_K)b`aeQUVd%c(J{gH8w?+)$>PBV#?c|tBFc6&FCr8 zC`eB!j12u4QXN9{sOUYojo}zX&esK>><=-~Z??3v--XEes`h6CALWEK53y~p@hrJa zOpG%UMj+MRi9{Mt&6Ui^GbkqQMH4CGdZ=vS8bEep)#YRF8!#soaRtbdWMV^PX8uUTsh)IQ^ zQdyA7hO8szL!ixN31>x}F~ghaRH!4W|N1LMymQ9d;!)>AdtX~QiYMT-Nl5lk!(M^! zJo&pSob$j}z8=&lKJQ>(i37a44P7R;WkiXij94S|RSZ@IVCj$GE>1Lk6(D#Aj^hSE zQwh-Q184%#_RB$S?1u%L)t52ay8YYOAB!}`mz(M`Rdur4*&ku3wdJ4fH4M(1e>8>N zifK;PYAurd2VcuaG0qY5MK*NYG3d`1SP7l!fQ_|5CNNlU)`YP_F~h6P6dSQ_c3$(` z8@w>Z8^uM1iAIJhezzKn3lp_f$N!A(2Q%X(EcrsW1a&l)O23O(A9}zUL(__<{xkksF_>O%2u&>5?K^FV`M!%!jfQ&lG(@JHnfXK&DcP zlz~zgP_t|{0oQ6#*I6Z?1iF+!_E2iTgO=_WvCGBge>?slVyH1z*sRI-2v#Vpaf0zm%TwGBU=j;NidB@$e{H=r(oZM zCMLVub&)LwFJMGHT3~3b9}z%ri-!DMgbT<4IAJF34D?&y{@0nVj2rY1Up=L`pUhI) zVuJmzoQ9<(EhZ=ei|>pZuH70GnIIZJe6*0=(30#LlliSiRNlP5)sLu-k);EL-l=l3 z!+3@))sFrtD)$vh<Aj=Oc`p*;{XK(YtzHfZ8(7tpY#U67IeaG!$+ zH>7|Mz$-!ITvQEQquWTh$pKt^1`mJ(n*9&$!Vm(gGoVoX%AR{Q2fgwZV$vaDh?hl=&aJZug(yPua;_&~0$Qv`Ghq^M8eIKeEV;4^iB~HgMti|0*EZ^+;8iz>%wSaL##j~T?)CsGDV!1WNvRwa=wHV%v<)%* zjm$k*%Ix6400F(k?hIC&n7$6i2k;UiPB~dm9bu>h=S63Nz7Acq+;`1R#w>+Po#KO! zH;4*z!w+!);-n?&zT26{LpK7HqZ*{-S z9uupJsxl%}ih`7R4`_7v$Li=JqUu+D{YJF%4uQ0rXGF%PMVX?MDKTC_J4r3?tDEfa z0NqzBqy8&eSsxVM0S-AbIczp$2E>9M(*b@7)V-U+<}3qWx+tc`TP9-90tLXJ!Y1SV zJ>e=?3!~A=_K9TdbT`>%QcKne#v7@mX1+;LORDG~sqrV(DeLUQj_d3vfV*X1)y95u zjq&t{zYNRd8b=T0cPywbIgT^b|1Hoh5?K!{EM%+eT=-%(Ji&iT=1zZ88-t}9U^=TI z1S#^4`u0@`1Pwc22;GU8(5xL#?u-eI!U+yf0Q0}cvk<48bBlNB73NlDGmw6Eclu84 zY`Au@r`j7SG_a7nC}T=xFL3`j3PT^L7zUGH&?un>LER>P#DqjOX)Mq^S)(f?!GXgV83=~QzIOp%1w=tiE6aY%7g;_3@k+2xRgYUV052wpsm zW7(X(YB`9woLGMJmf9Qg&gg$`J2TS*T))r1>V9dpcyU6{vK&zJPN3w0+x-olks@zA z>zO{a=U@7^71PHgfJa*xCpCf87tjfh<%uv~u9-dr z;GlpTC23L9Mc7SWfiahgh#FzMrhI zn-8KWqDvCldy%*7lN-GRm1>H0fFSK=A50+qlt0f~C@Y33dm5XBx2Oo|=i|WN{uGNS zpsAjduIO=$Kb#`rq30&K$e8Vd;}CUS=)d%3P2mZsIn8f^V?(%dK)#Ln21gW|qm7I0Gna1i!E)O2paz`!? z;wOyes3ShZuOq`i{~Lo2^G5fWA5+PfZI(&!b|PByk?j;xqD<9z{h>mWvUihlwB=zU z@W*!Xh4SjGK2V8ygZHMBOkyc_;PVk7D4#=@@e%w#Xw$z-Rtrl(aJ*9xgoAc1ySjF>jh5P9)3or^Ko%wJG4h*wSgg1z+M%vN`7Mk zn}azZigm0zkt^0}yx7ee9|aK#YuYD$Gn)njI}(9&d80{pcWa>SX)T#+EOSAA!zfdlW62 zJTdV|I+qnr&J5(TjFToNHX+2hF`NuMdbw4Tt|D-fZe%W=@djCp6LZrw=S9ctE2kQ_ zJvGxf#m@-c*<54~=iOPOL}l0K0(&_Rx4$zJ966i^k=b)VPNJs}$u!1;MlVZ+FP53) zwbPidw^MK}9;-NztIE4aqjt$oXg| zfpW(;l8M(XXr_MUT)bY0*DaK(nO@HfwOoRQbPgxu2R$vsOBV3-II=O0)STolOg>rW zUh7K7)s_C|ybn0~UQze8<`%Ysmook4?1JX;C%HWnPL^f*+leC;Rl-qa<)TgasE^|g zNmk?KS-ErZax7jhgBk^gS@>YQI@2GA?06#`{{4kS^2o^J0D@1=)fv1`mCUGP zCYG&Rw=OZ0O#o?kQC4pR?|zgA6y&`n77kw& zw(-G=-~b*tdAdgtrgdurl8!56P*V;8m`o!)a3&u0@Zob zx?()zFEHzENjx)%@C-wH+=Pe_Rt>sJ#43al5jA*sX-g4-3#CSu7kC8i$j$4&368^C z9Su+$RNgLXHw>G3N;@=ERhNuULQ99bY#YLc5hf9l4GFIC04`*)K!3W#q28_+JcwsA zEJylf++#xS5kYr)IKU63_QEQ&BRFG`5V9OlH$Z`2Tv;fKAim<2VCX5nKjbFaAvBZY zr~4Zl?ffDar4b~U30{^9UyXX2O-`aL4uA9}CL~Axr@E_WHf92gE;d6JV`rJ+q(jcq zfW~s)?IcBr6@oFT#XJEW2GjRErju<#@{u|JM_b4G4FM4}PL>K8m!PYl7GB9l{JoO0 zIec$pTN>R-MljLiz@=^?p}xLbpfe}B5Z^3J0%-RH6z3CJL*P@?d`skb!Bvop0Al!P zBlk4$>cp(rD(cDO+j;-T8X6zS@>7%$B|;f~y-LN*e3pha+)vo6REnDt$p$tNl3`3{ zBX}{#eH{#i4t_DQz}wXxfM|*82vb%r^8iPuRY4k6cW>Yr` zZ<3+H%aLCn4&=)NtC^Opf(@kh^b?48Lj}6ta2}m26AZb1tL8BW%9&%AF*)wSL}*aV za|HZpu!9hiy#hffF+s)TP@Ti_0`O4G2e$|!;wM6QSKp5Zg}h&dB%bz?s>L%9*Xt|- zZPIHkL>mayI!u}yX)I(AB2z8o%Z<$h{O0u14Y_eLQH~ z-mwcVd!6JES9}%Jvlbb@}6CtSXtNr3g zUo0jX#PcH@K{*-o%99@?A7S=uY(RACzt=KEK(S_$ zJC=lyxe~=JFF^ogc4}g6Uo6y<0>L971LHU6XK`37R4;@$3E?8SHuSf56LBqCr$42Oz*(*8mY*LRm2K43wJ-e*yL8$I*o@yB__&@&13DR+A}n$cgUs zL_%REE0@UH<@~?Du$PJWwK#QJux?<~C#!E%@R+rg#wXi0aXadL(r(ur0I@l=ERwHlRA`Eka;M;(d%4(h0;{Wud& zGNvN)xM|e4oJ(fo{rkS$%LsER(*C6Q(Bbjr+x6yzwTH*Q$SF3GN#n)Z1|_Ww-kwAm zDuY#_s(wkUR8lQ5>t&i|nPNcgdT6<5^b!Mzx3PTl6Z(-~M=YUXr3P$#VpHA;DJRn( z`B>MN!zNUfwWAon8O3<6mYmvFY@4^i$BJ!WHqPJLLSL)lQ0s4NTEIZr67o+G_wLaU z?WTW>kS&Vunt%A>#3w}M zFVvkaFdg8DDJ!IQq|t8b)fdQbX-&o~2~U$eZW|z>`1bA8F@!5-H{YSio1vOHw?GjwUUtjF$8WfJ3|9?k0*7- zEdu{ISB@o0@5y+s<~e>;uGHUqSVu=@8$Fd{Ry3?=vBg<@Ynhr_ypCScF!3(L6J%%4 z{zaL%F&)%r!>gi$qd-_C!+(S9ebH>Z+Gwc3TJc&ZXf$*A_Vn}`qH;Z!+&sNZ zeg42NN>Y*=N=#i;5~USRmnFGTiKQuv)I0INZlO+jlpcjtI#yON_TN@2ZK)O1>h*2) zIj-!4QrD#V+)HXAUTJ*vq>{V&sGEM%Ap0KTtS=hs*8$eK|B%>c$D%44 zuPhjs(6y9~`uVXO@NW~5J2kb%KGJG=pQ7H5h801?R8e!SG=_xrLV&T^JMmn9(yAhS z^H%5ahR!3W>UMM$N*oUa$|Z$L+(hzf?%czSYB7DDT{U;E`cbn4rQ52bW@B;kP{ZDtJ+xbr zH!vmFDhs)*mY&whm4%ta4Ea_uyJptT7}ps(_#N<{)5jwKYC)btL0)W+SKhcNVpRN@ zJw!~{O+3D1r_StA+GsCsX;zTQ+3w2V#obwz`2Et2BrIsLm?`=8ZmGJ_+(ad**mjgr z%{b(Kl=+C~sKkxD)#|1AA2;roqfDAHB`BGjOVppbNA0K7I^S$02Zv?vH>_@y%K%iq zWoAZ|xVn*;G24)N`~BsCqnM5`hsy9i*;~K#plS+Z`9AiveZc~6PC52;7F*53{l(ZS zKBqqF2Bz%PHa__g-aQtpe+}1az)owCe~p=}R-o67{%#(3LCl!ebz6}zp7>l8GjEys zcrF_-F^=>ay)LdWGIBl4Av{CyyO%!C_Vo-YTl}*{++$Fk^`oceMkmec~s((5K7Z&hBbmw0avn@I|MV2*nE)=I70wM?|P zD$sWN?n-OIs=!RbF5_GHon>6k?HJq9=)3;J(qg<9H`Oy&H@5dhu$k+KW!TN``mg-P zx}~?eBlkvgQtw;+i_NG#iDGo9?$g>_T~DbsW;wU1HEOeKh~+5y*z`z%?p4fCf3m8> z(`yAwUGhx^{~37r_#{hxg%6H!aTCQ5_AvrDaXcLT+i{qSe$T7{(#YO}G3IF5_vcHtI}G zG_P#2$Y_wp=kUcUaj?V4`Z=KQv#d{yy0`<;8&Z0(EZRl)S*bzGNe5D1_thIWYE%&62} zs?F4^8=>CVal~{v@SbfhQ6;XlZ2oT%L7K#ePxqbBh8WZPPI!WjKL9122CQ`F$!hCZ zCNPX$^=7D_uH^Y@?Jv;N4|4;1Qu*$RUU+h>uHD-!_lR|gvV~ni3^0&^`KV zVK}iqDE6}-xL#meTI>flfOvT6gTK^hk%p6Eu5tf_I$vt6Md|4S^4aIC3Fvy?E0@{> zN&r_cq59dFLqhPM@5NRS)#{W!8khbl>Ay{qZpNi`+426wgro#OaY1Vp2<`nzm2vJj z+ly2$Zu#w(gn8g`&h=Y<>JhQ;<1&b)qR|pts~bbL2{B7Lv3cSyzj4CTL##X*6Mi|*79R~1lK+7 z4>i(F%p8_{Tev;$!=?4a)H61`#N93IBc3zkb~%{Xdj7prjml=m5iMqu*K@AY#^fK<9%AOK6TnLZJmzA4H-+)eziWf_c80y{ji3h z#VswVhN@{fx+F{LGuRN%4zXRHnPUqXA2OfPCRIwP8P+wxLoU=vQrF<1<$Fi5GD@wl zfWT^WUhF6rs~V{Fa`BwdOC3vZ94QSz0W>!gp}h1xJU5aUO(!a_ zIbljwX)LqGbG?!ZtaGjL*Cbx|Y|uI^!5NOux+{(2ZE4QV|AFH`9liHKY~llTRx(y` zfv>IV@M>$feBbGeYRJ=8CcY|b^k5iO-E`?*Txj93cx_iVwJCD(9=ZxC_4xB=Zv(6S zXg&M0_a0)M{W)7#zw1Y>=0i5P-Pe1T7$URQ>JIIJsvy?KwKev(pFM0xYHR-D zTk0HYXz&_$O*f;WVFs~gdrYv8J9f=B)_nrL@-=O~VQlT~y2EMnk#oK}$n|Tz-RAe= z;2Ol%VG3$T%{Qb^nW%fx0Hs}W&v9KIOtf{~bPjrWNFx>O6vORa+sY5JQ`!*gyXT{9 zYo8WqVqcD$z*rQCwG7sdYjkRTE$r^L9WLA7om*r3(Ec)Lq};yIaJ9o7-D3`CMwal+ zO}W8i?%0m3Zkj=OQ`yyauxtmxvi;`pTzgAz;(WodDIK1O>mTMEH^N<2_!@T;iX04F zE1}3+T?8iReLtr*U*MT@04&fnut4{41rB1?j2d&eSVQpyR05a)ev-rzDT}jtZU0eT zA&vV&%1$2c&0V+t&{Q7oZ6-jE_8rT(sg^X|p3rh>iLUIKX2;mC)|l1iG#|)6s%T|1 zxtJ1z3@VH{Q?{bY@8>k%_tJ>gmf43o*+yMHSI+;Z(=69=d;htG{r5}1TR(qZ?q+H9 zAz0Vr=?xfx&E{Es`t(yGT;L-5UMI(3h+cx%no?Y4ohr`b#wwqpT3*pO-%z0R%^ zZ%9RduGRLpU%YI$mDKWgXW1i+WqUxrA!4PQ{!HzBaNp`rZSC7HxpDK~w~c@zk+t;S zTBPlE-mKMZE{YIZFaL6e+j-e+z3|H!;IWO7I}P)H{i+L%*g3@AvQn^Xm<>5Sb)LSRt{@K>as1-VsJ3LlTXAI&7 zwOe6}95rYxaf;tIH)vn+^()^rwJwj(uNVeeEr%6153x=!*;L!aIwIGt(c0%94ue5(G&$PxPIv!=$7 zaisC83fs*$c|6s~Q?22&x$kwY7>FigPPVoOoUg#^mV!$Q4O@2pu8Y33FoJBCjPkd$ zpMSUY9C3`v?86+lzTO}R1|=FAum!;|HwxO4Im3noa6O}rTiX)LWxK<$qw!?jAiE=$ z6gL|(#NK4h6x-!NLt+W*%_~08w>1}B?P+V!uk}7sZVW%!N8j|3r*6&3_nu%Mb}A3+ zHy&D~d#pN)y&qQOYY5F>WLsF|+l#DZNx}IAwmz2bh_KSC469Xnskr-aGRM)kl(iQN z7TyOt=p8$*zL0K6u0PNw*S3gy*9RsIU8vB(sG$$->wbTS<4Zw2D(m* zM@nZ-9l1*1(2yc#EV~EB=@NG@;7St0cCzeqQKfNnd$U2F6|L{r!Q7Zw(%;Aphr2~{ zvUhN(V!Uubf5Y?_f@&u!;7VnPye{y)P0 zmIun-C+EDi!Ox`}3#qR5Z`%P1rQf_1*gI|aTg^SMDjn^KEkA8kpuXqAmD+bBpNI;! zJ$ub<-nY`a?3vALrGmWKv%va$+sY%1YQJ&YWoU~!R<A8?QR zcC==Rq1SVXsu^Sx(vqt(ZkT9EGhgE&Xcy}1Kf z)sh7_!(CKqoBN-ObV}2kc=tb7dKLG$qWWTdQxekWiUkv+W-Sx{IHaGOa!FTu=Fl^e ze_&U4d-IW(Y(BddvFuycG9hoc&Nj@qY+~MUA!9lIZHzj5xUX7=l!X(FrJz#*cUI9( zce+CXkbR3sEe+o3?QFFlw7lrj2009+Mckk_p1Mh;(A=!@I@yOCcgxfEXA&>pp&%a< z__kJ6x&)$nkaH}8C~H^gevsJ?_nc!~!)g2!exC`L0uz82CHKPYO0mQkyXgo5@t@PJh z{?SMi1~bkVQ}-6xZu;*<8Yjor?-waKPUqMi19AjB68Mkv^!!{4auc#PKw1ZbIIi z?-mwI?%-jLm@=Mziv1Pt9)}J`C5nD+S|-8&x^Bl8vlRAYC#=waoWA8(Ms;Fq5_HO& zW^U2!=9@b0NGiwq?0Qn5SSmAIC-wEamvrWrXnm5n;iCH7WX~igLva6tx_*X!PSc;- zwhc1&lY*bSU+S;9|Frhlky|T`L?0OxH*>FLVsK=|eOpM`q~OTpI#3;E5Bu=xz%%?o zvGO-&0;?f!|m^ef3wN!gf}ECiesLv($`Hb)XJZ&0{%FC^@E<{6Uw)-w`W-5nObbdh4xJ8bl%zl>;Rw-b6j{T4PV0Sbuka1 zM#&dq47U<}^-Isi>?0-Jhx}sytCuf#e9$i$a1OxdmM+&7{NbkiC1?3PQgCSCVf}{_ zZnnq$z6qHsY;NngOntqvMY`q_GZDZd_vdT9$ABVRO3iDGsSR;XVV1=|znWh*m01S) z#934mTY{{*ye2lDF3IGSahC7X_OmKxp#Oe0Y-q-QcJ_wyd+|fJ)Ul+J;@7X1mT&F( zNW1pZ(&_9`wMjXi6tVC6?oVrl_)* zo-Qd!okeVs@=Y3JTDmqY;VT=a!tYx*CGg9_#9#>zV{M za=C-6JLR#h^AblOkL}1<4nA0JSa9U5F8{%D%ysZ$mOFCstc{%u%E5>j%Vqx<&hWN} z_OXAAA1OY&$Z7jf)x+wy*m;kKXaX%xO}7>HW&~j`zN{35h2ZHOiTonBpH|MWk^LJz zlsndq;j5-kUV4y(?O1n^n17wTRBa7SQV!v<8;G;_ilo>oK}^E2>?GI$IN{oqfGh%D z2}&_58;Irpny&i1QOk4-*LBTiEO7>he)oW7wjBo8CQzB7?`}!_izC*u0lOtK)^ejJ ztOPmr?V2zdJ4ZpD=I=eQ^a*5_&MlTeCA{p(Ml!ogizVvPz>~3U5S`hNZFrB0P$Zow z@^*pP;SoNfAXhV63S)4q*#D%fVl2lslM-x7d4aCKn@T8s+22i>SAOC%JI8S^_XhW& zCOl5)?A2NnGrLkyGO%{U{zPJx-yUV3St*D|YM_^a?6mkNyo+fvxgD< zcI}XNDx_d6HK#?ft#1iS&afUL)|!w(?9FcpDy8V?b(zNT{EHyr8anQp(f6{rhsUfPaI58`wxe}ZzpIVE zdTJcW`>1hDVRqB{UnYdy2MeV7E+W9J4YtYU2}04r=rp@k4oV zetJnxH@A2VhEsyx?26IETToMrKuPaqUq2UHc6%?@6+||*Wx;-bH0<{O=-<>f@~hf0 zT~0?cY3?WGhn)T;KT_P{%TXf%HO9S2h(}7{iohqH8QQ%iLAy4V?A}(P{0d|CSLo_* zqaVk=L|0v-ai)K%6MNyQpd`6l&;c=TSK^s$?%Y#BeBzm+y3WX?mHQtr++k^*ydVbC z>V18Z{q@2fDx^ZzV)PNmE^aC;seb4OIb-gkWA^Dyh4DzS9G+f!6Vnd%JZbE^jjZ#% zdzG!NpCTTqt`~ut$8u-pwwO;%BqdF+>_Y9!EzR7ACX#rh;R3p6KDYZ2Q^WX{y#C`u zI5{EOc+>im@r_4{==pGB)mduwJH3C=v;IXjwNLXH>yqz5cJuT8aY(UDk4+4Ut?U_4 zGNeO2l$}YgYd?sX3rJy~1kV}Ev)Iis4Rf7EKL&0_`GPTvIg;y)LkctI|4f4m_TP}i z#@!Z{_%!Oqw=zKrF7~!C9x1wBRnsq~VSGf%-y3mZj&-Vdjy)niA|7c2T<>{$=!uxO zU41RX#-G?vPf80`nQeo+`l{S^e!*QquorQ9u0O2u@At7RVEtjsC&m(9)2swpbyQ8W zIYRcGFpXqM8W4us_TYv*DfDg)XI?lzIM4kagqiNtc!|T*)K*luog>T za;^$F-vI8UQUVJwT+Q*-9fuN@XP?^|&W-lhU;NzmyU5zkH^%nmSAS0VsnHYmtu*++ zR83CLX#0g*Q_-T?c<<^~>$aZJhVqA7wbFNC2!mbeX#T^${Ev&x4HiYM^`va)K%Esi z`{cp8^_1Z^4Lrv6DHZE34>&fQu{`R3N*sEnAG$zaHF2)) zsbT@R_P*=ab8lzOwOwAf9;)*!#x(kNOe29SBBo101U?Dew)=z_L!;4abpyxeOG?VK zWcJgW*V>*R4&ysCRCr2A@ zcI8=TPF6|a4rSR}>x{nH{`I;b|1&sbugs3H|8s7=t#x+9G2&&Ev6YS_|Il(%!`6oD z>QFGu7jFkzk+c7P7hy~asE<^ev?~Y9w;PI8@5S@#c!bTyW64wTywYWp{EEn~DxA+= zunLM^NUE9LRZ)ra7q%!JjsJsoMiiYOA&TdSuK18t%N*;Q`DuTjKiklS{}Hi??OVfbaU;rk*zGfbSn+Lg=0&*yL$? zQS)uPn59YmdjD6MU1>HhVQblEYHPIZ*#zGbV_*I!{pM3O)>FKTo^XzbL6&9Bki{B( zO00e2^u_gg7IT-4)>bL82J^s;^?BpS@L^(QyZPTFs`NHF10-SX=IfYMo!jK7@0$~q z>_BPfWiuT`O&fWb;_sgyhqgp^3% zGM6VliaUlJ`P$EETN~B!0IMpr1!0L4H0b!And9hS4YCj3`v0)^-EU0=U!QZ6(0fr( z5g|x#xunw)5JW)`5fv2?Y@k>Gd!-{H3RbWqqGBZ>$t|b^d+&lBv3CV4VqwqayZi3D z`^)|V`|yyN$>f%4XU?4SIp;LlSvSe5w{H{|UE_=6_H8UOte4$-Z!1kW%_rZzO)}l> zz(UgK>EyRq<8Xx6iQkUI@Vr>#Xp}Wm^p>(;GhJi&&GgyGT;Z8+cUpI5uErAjcIb?1 z;%2wIv}sEN> zlZCQ+we|k1O^<_jkl((a}1(d2bWi4!{9mR*( zIW}bizxZGts|^DJ**YzQ8W{FlT%MHVrHDB9T=XvDCV61NMSaWex}V**I*dc#x!uqvAF?1;~OdiSeN2byuy-CuN3r80wmkNWRl z0n<0l{vT196b7dd^N88-xil$kG}gf?2%k+|S^ST1K+B#iAswF$0DYtCl_kuRbx$GR zf%Sf6Ne2WhCDE$WVMLux(IA9>l*d4Qo=wp+lxHuGp_cs$BjPZ{rIX%t*P#cZ*(bf3 zC0UgylOC&kNW>I1nI+@Y~Ina9R@pq|liv=W_`z(VD9UKyg@at!6 zp#E?;633l}Vz&MN7#QFJ9bYC_4O z`vbQeb-1-ZnTxqMJ1HUsx|W(OBA-5s04WN-;}cx$Xbvn`JErh@OvM|ylc=isv?eD$ z90JG5ZkKUpVshE``0$e;tI%#+#}V_Moz@_E;&}4z)oQTemNh>0;K^k!SF44vZTmdE zO8r|lo_v8R&h|>8SSgN@ER$$^SVaeACq&mK8B=K=t7EWC>mNtSdzvYK5I%7=4_=`~ zJ%xj1>6P&4w_$aan4-MMmmWMbM3Nom*&i;p?^q^^pY25@evbh8eyY@%w^&c}@w!XH zE{hF*d~c3RJ9z(q6Vw_4GE?sje37pKuv?JG3xCjXGTgUIPjmIgI|om%W1O zwfm~r;`dA!R6nf$0ijRL9x`KVH{j~mvT)PP1tTn(BbW{cW;!})IVra3tM91F5)R(& zw*@{&Rl4s2NX0k5EdujhUOdz^#+^LB#Q86bV(Og)jJITo^BZQc%ctF;lD0#C?n&|h ziS91|j`de^yb*84gkL+*7fgFl!Jz|odBA`e<&l}&gvR)_={vFqn;VZfvIAJfe$KW|H) zyPv!TlP7<2_4v-5C`~ySAX2IHy?k&S8M-k`!2q=`rtcMG>~#0%fH#8k0jqnVKqNOe zCfy-u8(c9AfiP6hBar;CF%%ZTcFU?=2v=?leTwo{SX5DurUjBG!8uO%i25tbgAZ)& z9^p3()lax$URRSH><;OXK9h>JSCij^m)hg^eceX_x-WPr&~eJgon}3$eufk?1t%z8 zmXTzHLOmN?M8q$dCi?jL1L<&Kpa%nnN>;ujO4xC05S~!$R%67Q&W;1h#nR%l-85UF z4&9f&B__3ghCZvf%sAGyX7X7EmrJN;OWq!{!}Sw9NA&3NbwFGZSg@9;Uh&ot-+c9; zgAQJ_;zuOPT6Fm!d7=`$Gb;Pp=z(lv@7P0XD_OHT$UflOGU( zh@Kfw?!H$M1w&Z-+!!CtWV1y3J?RGVs2J>2W#?=69F**1q5I~*6SVsg4uzu#JyM#Z zOjoRe9PYISC_(>0;E@=A=?VD`>}ZG!eJ!zqL=P{!lEue;`XjDzXNnFUdK|X+b|l+z zmzvefjYKm?z98BQM%azWkxgb_cgGx?@|!u(g<{rq(sqMtQ%qO3!0Mf@1Mg^Wy0R6`otvgZ*QBl7#cr~GdR$u zd?*Sb9c-IfUd!PvKkLK6aOs^~4#r(}_K;DA*PUEJ(=Q$e1B8xrl1el2*LKPE$*Lu6 z9zO=e_j1Z=6eR1k$W^ynBAxb-&BmRl0N;Smoc<6XlGie$0TPQ0uqJJz5NVD)jgsye z2TgC1EgB{z4nK{e&0?febS(h5m2ND=A5;h^yAwtUvvm& z0B)WGGoTy1mS(w_=Lj~xv)YIh12Ruj?JLEE^~Z*x0Q##^<_jDiVd9y6%)$3`G=P%0 zsbPM;qN8fN)UW|;-stX4=3sUg&m@e4u!If-{UjPV< zJ9JKJ-$wB@8AOEicRC-0v#J>bi8(|B{cPsIE!cX%WkvI=>l8aqSm4qV_z4RxlPz~Y zfva0*J+1@jL3Q}26L?YTclGj5w$@E^yQit3Aeh%ZjSm9%EMQ7*A9^bsGBJt@QoPMV zO&fmW1f#~#`-?NsDiHoAyjvrr%ROluv{v&#c;k?LC2^_TQ>yZ;6q&DJqcbdJ*qAr! zh$~Uj>>Y1B^{V~m@`%A#qUf4=HyzBuQQcRg{d;nSACtW3poZL@Gk$m-aMOUC2l(pL7mT!a`^dlwbd%y99X?V#~C|a){NlCngpo%wT-;m*MQFrMz(MC25 zVRCz+upG`_!JHxhhQ-`pL+pl=7yfFEGYCoA*p{ML>m2DhV@vS=rbvBhCrYr+p&PpF zz$9E-i7BU>W(hk>Jm|?mSi9x72@6Fp&|4kxwb1&!uc=MIU(B@K9znW<-K4m{axQ;`{qgRyftArvfKcT5gT zSGbM?UsTCZ2e7*?VQ$i0hV39A$dQ$g-7V^S%iZ7Lc}=dUDM^imiAlQ4s1-UyRpD106YgDHBMn+?(pVA3c_ofxU{k{T`Co`I^%Hq90S7eqUr--HNx_BO&81l(0c z0L!c16TVjHW$I0rjW=S~qq!ACkg2y6GbUq8YzAp_aGXkMbl!fhdbJ4y?^?N;m=?s7?p(jQ7|>xK?(GPMnH*ELm1;oG9*5RwR{e7KFZt!(@NBI$ zV$H+Yi&!BNm+5>wl#S2lnC7c3v|ZvHHM2I|yDMo^%^~=N2qu$G`0or!I9Ppp%yE0VA?Rzz@1^tUSZd71134) zYly@erj(WbZB5K75C0_iAMzzcV)6uK4uSsCE%G#Bw}Synj%?N(Qj`i`N!Z8MA)eO0 zFvt*wK=yAyx^VbNUwV36dIQ=sW5iBk{77Hv*@Om!3KeH&EvErq+5S4&=gPS}1(3-J> z)lnQLP#-PsS0OskJxU-ru<{wk%EFW=lto(>_g6334`O+u+p|c-N$?g#&7B1#)2{@l z*e(d`16j5ccmN8Pe)K-Dv{q-QXhSV8VCEeMejw^N( zc;5~-XS-q5p4H{ll!A7ZXZ1__>dt2>jfiaLtDgZ*2YRC*_!qTZ-$wmbpS2Jvr)+pA z^ayYe@cxlg*tzJ#u-ioR{UYGfb}s%5pVwN7Hlo}ci$7E2V{Z`vAk?2h>vZp;+%BS`*)UHv%VpDF+MP?+b?bhj1 zv3?^6({=hj$`WcdxgubMXe6~duLtVBf@e;5b*v_`AVq}FdvB_PTPoW64q)XhEToMeo^I)8sd-Yn=1AQr_cVvkEz(h zW)`es^*@C)SYgISaf)QOYweJ2?I(6uOB_WYC{^ssPQ|hRFKX=^?_Pv z!uW9&-%IO!OE2X^L!+>yxx^?$hKj!cuDGPRb|LU>ZTVk_Glp7ln6GS#(5h>q)~H$| zv}@Sa+q2e+V~4EaZ_i@8Iv`FcQXDWBCpaV%Z8_#7BbkmkOpUfq7Hy3<{GUncx~ebz zF1k<+X*9MmAEt|CN}-@z%gP-1=MIs^_sGWZu;sgNV!UFZM?R-bJ7oE8YToxd1Ukqw z;RWgMi@WC1z_H#S7CMUpt-h223=jsJSyu60yR8JlH%f6;9}Fk(a22sSaZAs7uZaK0^8Jj)`Ph zeUZki$z&nWlt)j+_ihylU)_KDim|0i61bAF|MEcuv5RvBR`{jAkk8YGbFNTFVq62v zl~?O^=$NZ6>R0tT(HK#UH4E=;auL*G&G2Sf*SCo~?>|>By1oq_wEnJv`og{Ef(=g$ zU_w@4%FFd!NrDAS1?e0_3|z2Z!+nJDeHZN4vJ@5@hf~*TI#rOC!dvsa=LpM7JNcWu z=KxeZjjaqh=_I{nT1?m;cXGp&_p45m*FUcmJ+3)@2Mb4^Ta3<{;F9XqxC!U1NeAXp zy;>mb4Q4(+T#R^J2gyfMJalUbV@=`cAnB1M3AUC9dUpqoHc^It`a%`=5vb>W`U0DI zRAPwe+X=oPCNbnX3jmEuZ_Oskuz!<~uh|5Qe2IBCx!{&obIQCMOgfSWP=b;Pg-bbj z^`%Jo{4%c4fSt>~7)iCCXcWLY5gc^}q~K@K_9M+&k?6? zx-ER}Hs?52J?Dfqb#C8n&GZw2Lm6$~s6j_1X%o&9D+e7dKus%lEu$v+ofjEbEtBYR zFfB_tE7DNvf6;QlXkhJ~#B|LTL1(dF*9}|Zi`la!kdF&H_DtetW=DBT% z#<&eB@WJGA52ut0j)nz*r#EF}>uyQ;`w^Pf+q;ir_5W0EZeJZ;<@UCMCD2hb00_?;vjT%jxR?@F47 zRew}E(eE2{DO<%BeXuP)sVx+(rjz{+5=A1w8Y{MhI;tD|4vKu!2Rt{<)1ujGY?0pVVi<)BB@yvYDwo(Kn}0f?H|4C2Zxcy7THA9rx;X)}5clQNEuuSiSuBJzq%8 zkrT2_^_1VQH{}`Iv?JRJcmL_T)(XbM|C;t7BP$lmSlO1ogYr?o6l-5^3}q?vo}CdH zP{+vHa_}#`8#-ls=Xx@(Zd(L~uT7IcpdiJOZNBJ~)-_E+S6go&5xEP)@K2HEncxVF z1g7<0)oMXI{M)YyhAtZuZb% zx*%TdXWfO2#phYPhFZDJf<*WJn2CmXr%Lj(J`?4plU^z)~_2<5Pw)#uI+gI&L6X(#OZ7tRl3>c1`RBwxI_ zsYW{f>qVP2d*I5Zoh^S^_`iC{=fu{uh!1~XC-R0valhrEqN0143Q`$%5-@6RP~yjr zT<0!itkeM_A#XZjcn}gVef0rw?GlL?r)cYpO^ zXHk4>+V+p{6&+)U-rBtdT#d)@Z_!xxyMAve*(}{?%ne+k zG0w3WH(rbvFsID&6~_qoF}5TNe>|4R!sG^HY^6u^vZBWl)TejHYIVWE8W(=-1b$ip z9>DGKFZrKqT{ql@PFR~@t?oTmXaCW?vjhzbtp%|o#_BW`6bAD@biJ&HRAq(Lk9B+M z_p$4xUxM4yxi-*zKD4ch^IuKG%#mp{W26T;Lic8ivUH`%*Xbc(sn^`amla`cXv2%BViO|mPS;fyV9U8!~PPXt9CATz6! zLG|M|t?DReWDL<$&$57%fdvFpg;_F}&F+q6qF^Y6#Vh!u)7dIW`|38Kri+K5#9wTF z$rI#0;0o6bo5}cpG=Z(o^9f6{`A8JTmdDq;(tt0L^2VqH)-J90^jDgz$5@(HaPy(N?9->F)FX|KedhFp;7t|RG8t%XFYff9i$wJN1as2)LY;|$>=6djby4hAY_jYqV z5y6k=!%i6V^OfjP!B&;`pI2~PIl3=QP-C{8Kk!o6M-EIY)6B#jztzuNBVm8P1V%v^ zp5PDp+~S`>@Q-1FNfjVq_{WVjN29~?OqijAVlIXarv`o29Hh6^rv^pzQRbAMQ!40fev;C2 zohHC5D7N0+M1A1T*C_68Vsy$g68)sF+cSmJ6a4@=bl5Jo$NU{_z;&A^G8>MWWu6D}xSKo4800yp8k z49J&X%I!jPWZ4ySta0j#CqugrZ$3)B8E!zL%*9=Ve|S}dm6DXxJ#h3-A&VQatf@El zQ@aj6vDQ_LR)MDZ?{CqY`f;I1DYM2WOR3zy#BSbia~7X*AIx}=hM8xnRE0W#!OD?( zNIAMq-jy>{5uzi04wWc<6pxSTl8IqL@z`2jri-W4+ekx(3dt;m%>*nLwLSTv z9OigrI}6X@_i+G<>v*I`k&@)wN8Qx(h{cC+g7>CFM2~Aq)mpfH7LoQ8VPT)EzxiJSwN9JNbgVjB>0J& zmVf)tL5Js7tmzvWPzPxws$Zf^=g;;J@P#y82ZGI2tB0A>2~>=jKkRbf`oj;MrPq25 zC%qp!w<0*mG0OwGK&%|%Y)4P-3=lUCw9{qP^DX*FPmBsAbIkhyk6bmYQ%0Lql&ScSUtbZO;B!k)(=uQEK|2&C0{Sa z{U3%qH9zWwc#z-3hT~HI=11xZs6(IA2as*6+h$<+?=6fxV*2Vf5gPy~TL|jch5;kl z3i~B@gmtt){J2jubF8?jNLpOwm7T6LorwiNs@eVJJ+pir~G}fZ{vk zm+hYY8S^>N#QnS(;EzvRBzki*Ajd}eMx09Xb8-nEajF#t;rbM2b@`-oZ=N`PZ~hS0 zIaxNck)9gBBUk?G4Pzr1X02KIVp1KXK%9oIGZZYiG07LwPd%cL_7lG;YnwVz{fXZj zQFT-ZAvu^)N4%3mEwIKbb{o>uHZ2jQ?KUhx`|qzLB!=Uc5+y64YR8x78VTCkmzgMbh7Vk z7U(>83o5p3#zfJFZn`h4%+>qm90cx3#g3n)3_I0Jf6wt_QJiW!X2#y z$VwhZJ{IdP*+n``GKGfR@so?TRlF2mu^aV(4UMjrP;(^D>(-D<8y-oCCT@!WyLMab z(g@2}(HImBB8N&Ee7fY<&ww$sQ9u#Vfy2LaEgq$+*is<4$%Z&?)wBy z3M+j>gwAlp@ZNfs8Hi^;V5*A&@)jUypbvGi;Wg@Z)5^oyC$4VPue<~ zd=SR%g|Q~-DQa3GsUOQYqL`M*Fz6TgZ4YS(M~C3w_7K5SYk(K=Fp=)d^r~{`b85C=za(SEZP@X4mL3xSKDvn#>ivWL1F9dK z96;wzx+U6vasUXN@>teVQNPT+zyW(ETiQrd&4!Y#7Ngmj zv6_1R$Ee`BY}{xu|7dUCr>NjmW|BrP<_iX^>-orT;S-{si_Rf@)2zt`ES`c3j)muH zC%a76{9CwEPx)kXKGo3tUA!nW6;5*n8B0lTs*b#J>ad5-I*1u?S40-lKS_-HvUwSs zw~YGf1AP+R+>72mKpcZ9?v1yiOY&!kyT@6jL8C4C#!|mKGe`|yCdHm0WvIO;Z8~_J zSlu7yr84})UrBn#I&$Z+zmuTDYZvYDn?0)(+$wB+;V1;yLQkOstAf(}NqhWI>Xsv_ zBq_?h;(~C{Eo)w6fVQg=-XWSec>CQ_6GHq52 zM1g8_KhUq;;Ms zRg2RV5(rSvz206d9^rJQ=k71B^cKu8HBzC;e@By9vdBXQ@r&4{M-yMO;vjbcNBQWlZ zyHo6PmqPxR)Xf)Y`tsX)WZ;KWWW*i4Qdkh?2^_KQhg0I#1kPa?pLhL|R2F9977jjD zc$Nkro0(Wt29KX1JS(`_H%WyyU)e$)?V|e z7mn-b%?E_kz+lB^KU|l|cVPXc3g4+vh0gA}uKYIYQU=75wCTskF??S0jSTofN2~=u zj6Mm6hEXYGD9=s?Rh`)qM*rMeD<&$(xPwMw8Zlg| zc~?s&Xod$Nz_}@ORyokqvSx|1iyfFXIcRM!soRZNWX&2zXzbKgCY!IzIdmS1ulKB6M{7z(0cciBf!Qarxfz-*o&qSRKo7-1lsRz zsLHV=`hXjqS)`fZ3F0;3gcJjiQphnQL3Kc9J@VTgqu%m;v_EKN4wXFH#pZ4OK6)Ip zzBiRT6FOJNsF6HcUBCaB3Ba)WBmwEbYmb>Uz(b;v1_=B^)%B?Q*(;UK=;n!V2R}3z zB&kryhBX|F1`AEwUcF^2i4+lC-SAViK1CD*HZAunB!^u(iMRJEm_@3)%Z<#uJSPX^ z-fhETdA!SWyitaB>67Es(w{Sc?B&SZQ#Mo9WwAorl+DZ}n)3pezPUA0GwlT)1lQ}o z+N^x?NoNe=nXlh$ZWSwQ`=le;&dQy*ezTw5)6I+l(3*d(RKkN-n#zBz{ow{PO*Tms zEiZ-XCYxXoVLLk()F>8r-w@7=Y;*u+>(|{eWP;vJ&DF(% zR2+U2g3Q)S#@R_*Uxkvh#{!@~W60KC{O~ZF1JLWg99{Aad4t1jE<&$=b#zf5+S)76 zT-h}H8Ci@4i62gR_7&|B-L#QPErUqG^}RZog#IB_`7}U{;mutQO)SUq)X4@g1FfuqDoN+PCuriEi6WP&q8MhU*{a zDYPuSDHrnXXh=exK=5Uh3b~CeP$lS%Wx@H|@wU*D#l5F{n*9ZBo-Fhm%qdWzgtPsW z;z}jLEv{Aq*&I``X&eK+3%;&ef>fq)4z5%M+;qo_rmz31qzSq=P>ngY$I4J?%nl+q-Jp$WbV2_<6wl|#X9f@dPgx-**g0)&{Qb& zP-RZ`Y4zz*4t(_Cf*xsp;SucZ@eiwE?`SyxD3+D=@If_Y{6P=&KUe>Ssaz)2)L;7- z28~&$7cOv|RO1KfIC%Z;LH=Z=-D3Y%Y_9mA7=L;PcRz^=OHol5CGJ0=B|lG7g?U zD!!;k98w}0NB^u*lIVP%gd892#Nt|y0VT9!F!(O{f-aA$rkpQJNHnmLPmt?VOnDI; z3m`!&amUcLTUzlK^oZM;|z<3p`7IO#(g9XamEuh>J+Q zmV9u4FjDmoILR~3`57qJNcoR?xu}Q)rXrplKob{3#TQrsjJQRS+FQCoJcxWc&BiDf z2?AB*sYn;-)+W0wc=@cME@BF?=M(k-R36mgR_Kj?-3o>=(|%X+toO>cf*0%9neDpz_pCsbUr%a!R@A>URy zI4zW1;Aaa^M&RF@%Tj1Bt*dxhSqdDVP9M>eYD8|N`w=~m<0bFx<+uH)Igne^m$N48 z2ZTE~NmjZX5ukvvdBnSx_dqnf z_w@k~@Ya_1Rm{ZD+t-KcJ1LJqzij)Fjo)kF2h$!fsBEwAHO$QFzW<4uC+kO|SF{`X z{qX0_#(2U@Q0L$ePJ_HJYt_7B>QQ<>IPwnp7fug2Rv@16H@p?qi+Co|`i=r}gO5oo znsoP~kkr1eH^)80z;6$4@@sxizaAQd(RBkwB>GYJgD4d~1Bx49*#h?-AbiHOPG!+T z6`TGfP{n;`l1eEG^Te~_ht2ljR;4ttvew29qg>2f82Mg^K5gq1D%KCtPX&OVb5Vck zrv;(pio&tx8F?f3ss5~4XbXJWzp4qsPdePcYbNM+pm$IZjoYU}fPNej1?CR;qd8gz{dhDoiB_$;N+RsMgq$1V4!!;JYX#H? zhPVS7nEkba3j8I3FlNWT&n7-&JQbu|edV(4OEuecc>E>XmwrY%)d*#qu}qloXrbWF z9LzG;BZy;hb2@o#&)Yuu3jHq7Da1oIt6sN@@)$G&7%79LQ>ld?i^+{A!Wpr`hcO=1 zN0aN~y%wM+fUp2c=Tq*~l6P?;=_z-xIU9T7EZOTp9I@-dS@60Hr$4jK$K>6bQ6fp_ zW2jymbc&4KI*K?R1TF+vb1~&J18>UODOU8uz&i@<@qKufOtg$87CekXnKwVikl*M( z^$6F!`5D#}kN)Egn*r~}X9~FwZvfqCv@J!Ac__?{wq-a-;s7mqboQa9^Z>Z|%0>6I zN%c5NSdQ@f$Fmc4c#xmU28wX?c(!2F)ueh9@0(6iB`hoM^Fn(A+^58&5`fW?LMwX9 zx^$58L^P4fbz3?39`6xnG2H%W7Ay+X+iL_p;b0SqinkJc%aO-)VrBEU+G#2=N2`$! zb(mpaXj_R8RYhuI&ABtK!Ml|h$50vKeFOq9!j3G|&FaCh02|oTH4mjKDa`4?x z_CU|<8mY_ljC{^|iskx<>{Z>lCV^fzI7(c;CM-!ga3>}esiVlbI{=TIizXesLQa`> zVH})4SEK`vk~#T8Buaj`Je^*2&)4D>u=eC#A8PCIF`_GXL3mc3evwQ&G=}()4#LV8 zL3%_^TCc|}ha$x~9pD2U(tC9qW-Y5LAzg#?U_GTu_R%#jR*8)y`y4>bvuK;O)FHft zys@PSh$Lrp8QHvgBCOS7&jfhw_a)$-Hcz|2BY{p(moZ47tv-|oJz69Ow`ff_N-mI= zwWEnXt1pO|_f}k*PsmfJ!-2Ex)@MfRCZ7(4FR0?yXY${L`21fDx zf=sS4@En@_cPch$HM^hqUhm$ogtTrVYSL(py`hM!w8lpmvD~si8~(;Edw@tDI6R}8 zgR2)nzQe$E?hJKUxD6jw8SNlP>Kz4{XpZbvm5d=`x<^}4R=-^`x^2ylR;0M@;7Q%k z#EPCfc$R@7Q(pKPa{As_;zIZtkOhN?{0GmM%HI$xGQ@%MS10D5A=P=YL`^;@e0H)G z`-X|>hV9_MD@x1=R4%<4Amy3GlT%->Gqi93<*xr91!cNLD$!e1I}9mK#6J+(ZW~C= z|E@iaz_^x|*JrZEvd127AY=LgE3+*}X5%;Mz}B1tc#T_DsgWYQQtI098C z&f!Z3&w4?IBu(nC^!Id?_{H>+q)(46W96cOeIFBcK@+$bj>pXhy4x8z;S@uq1hMm} zUImW{6n@>5mzU=5)fa!Hw{@zO9P<8ZgWPL+TLn?)LU=$orp}Pie-CdJ4VfWf_N-2y zCP|uj8?nNtiD7ogZGPm!V%is=dl(dTqZS*6Nwpo`qFT)FlW2U44 zKIby|4s4>NKyYjVpNC50c;skwxPpx*h5vw=^rQElQOuU4yz_!WMgS4_`7w{2GSwc= z5Sm`kA$GyfDfZjJo69om=hUpg`TAh{x@~Z$=4u#_t1`a#Ix1@04zXl?F+f6<4!1-@f>X)!cgPI1TgF0*hCU(n`{W%1`tH7f z*)we+{{{Qux_~Y{_XPNn>_Q`+$&RfUo=L3s1RX16vnCU(1?JbJTd`^#ttb62b*<<| zW3q*E*TfL%?DR4sZDI&xKsM#pFXGY(iy;`kW8!Y;oZP$Jy5Qm_=yMtM(eMcYo-~yu zLk-DmZ%I-j7ybnI+qG@vPu+jwefDd?N39+<8TJG);l9bjL_IErBQeHX%&|wC$(O75 z4#aT9RmOnwVaZ-I26lho${p&%$IT=%{_)gj;c=c#^_05R~YHFG?Yq!t1dSbNnPe7M6F=4Tv#AX%sSjfXy+sADak9hDZ2O9Uma8DS=YVa4;EATw#d3eW9kk;IyqGDW0 z+k^8d3}0#n91w5*-N|vx+qdt0L{WGkmLXbm)g6AP_-p zBQj(3R!xrFD2>@^t6PNilB)Jb(%yQBalQU;Oq@{6k|gJD5Tcx)yP~P-%lc|!IJk30 zd>_nmBY54Ed6dP&t#i=Mf@o@qTlHt15bbdG1kl;tW@#I`{hErSPC200_AFhI&XZiZaD)mr?U<{VU@Y{q-i5j#;I zpuA%=Uo|&iVxfQih<@2fe&dHG#Q|kB{fwqo47rpFG29Pthrnm$%;QZyF^_jZFW`#- z0GNmeWV>bmjYvKZZo;%nTNO>E1~P_cQ@lY@x1PD^M-D&c+wMyE4I<$2)r?67H3C{|fE^t~O8_;QAvh zTnWZo4x^{bHNyqd;XB`W-wo`W+P+qhYWW#VU3CG5)cV+e-uJ_f zXgW9LEp+94-%oZJE?Y2*=}@nLPim$)ZMI#K%8g*1Baf(_EjCy*{gGbXJ zB*Cv*fU!0|&DiY*ylrVk@}<{fdTLc`+a(Vlc0%pvjf_Ru_SQ~l@R~gVJ+-daK1iB) z5C;$U_Z<(l@A+?`RueeBr#49TTXKBp2RQs?Rb^q0yNB_?zjOQ1|Mb=3Ie#VV%^>_I z?)%Ue_<1)W7&i{Cv2x9R1Qr2g9ohM?elP(gpu|E~LyVrGGAyP>Eg37j<~xi{45 zeFT}MnMa4DC>x?fg~%e`!qM1aK<-JSPFZnGACd0aqVCTArGqLB|w;rD*RDdar^j8g_!*FqsDRgPs zxnVuE8oS?;+EYNf@IEi$Fpp0^19>^?`xL0f1RTZiW2J(>ao0t@$4dDC7kgvmpoSu` zz{nwh#d@K~Yg>8v8W^SRC_3cHlB2ejpii{`ZVoU&DdP_bvdxFZ>GI;$!y4Ff8KysM zqfUYA9QJy_-XK?T_p9^&;-L;FF zx^_$`l51z{tYUt#yoVB3TCM`3nu8Yo>7+)>4};)V>n#MyG%ll~;0|or6>)%IF;pVG zQSJ>*GkypI*ocFab0!CC;2ZxB>fo_hQ}?(Z8ua4UFUnw_f_cRhaIO*Y6W7WZc&n~vBz~tIwbVpFk_s=!c_}@u6R!vpsG$aR-uq3ReSliv(bo1qASCH3=Fzdcz5}%l zLCdDk4P(hSi@!=1S$3E#8ZuG1Z3P5PfdA+49WX;$v~O(()jux;7Rm;XppD3p&gpsn zNvk0KeyBptxu2;~)M8i%NeZx#bS%~|4>+@1%V#jm|z*NB2cqR){w9Txu1v9NzQx+2>M)=gvG;BkrbelrsC$dX`+z=05thPZx&;;EdRd*cPf&Y-Qx%*Fsm*Cc^pe>o}x1WDp|s zFl`e3)enJ(Yf;ksta4x|G7o-C!pddI_&~v&EsROGWu7%?_#Kcbum`*;ll2|rZ}N0O zFg1zi#aj36$_I@ZRIp5pnzTt7W}54hqojsaW@W&n_tDQFu1$`j+YB;%8F%=~*XxIB zekKi-Zf+O~g0W{;hY~-MhSG^QppvJ(WVRo+1>lqYUcpqM33yTsk)xgn#uDqGAas z(G#L!kpTioSvJvKvk^SLel2weHPd9rbYcT|e4XW#4t36%y)|nG4wLeBLQF-Xs6B;% z5@vy2d9~2uL58QG#UYDo zf&7R}PHFxFl`0+>pmBH;C9R49F>}35@<;+obo!)`k?0wM_D}Kd)QtMOh7J(T(pTQV zvV~BP$_Hix5(1u_JJe0nb~{3PcdlD6wEtpz0s$qu1?*3hdu@U=rM)AiAtAurX^if~ z5m2I&TjH1?E<;cFX!u1#q~BhG0XVU{b~phg`pm)M&=22du{BY#QPMZtU||xTb5n`P z*eLqSJW$#xccNn&bDiyyA)I3%yv#n-1k4#_RtHIy78O^!H#{$hp!qszET?JU^4+`XYR zG>nFDx|K*VjXOmYc--B8TG&iSlq>rZ5++3!TOMN}+M}=Mg3)?5*&1wwWsY}} z2q@COnv>=-K_IJ_RJm)6lZQxeUp8QC&aIk2K!JX+8W?;l87NGtA)HO@SQ+%2Fb{*6 z&mhaImz7;TrimT9o$|T~H&~f=LI?#(|Cu$+-q&s>o19%PToHoPUneXkkdi;Mz zy-NO1)T^7AnYqZK{J#QQEd%|^{|;h%>%l~H&c$mYX%*Fr%eYBnl>Nx}= zCU9a-y*?5EZGw=hex{5yK)aKHfq@>&zyQK7|L)Fiyr7z(wN^h4HdjAx>Za@3)KYKT=;GdimiS+Q`CoXP6Hv=v_rmUt8PJ^ zLBveqXw>BVysr?7+D!d5z?*QQoZ$tB!3)sn##MMnE&SZ7v5@e9voiYL-Q6g_ z0M2hVF0zGxv%}uoIZ8d7}Y?h~rrI zfp&8f69Wqa19YK#fZLO9Ef^l;XoEfs(B6F&A=CS~3E-CPCQz0Mp3ULI4_PQ8!dyFX z$4LInMI&WCCywFZ3Hcvqg&h>NLA|yC>(az>&_xi+&956d2>5JyR_JtZP>w=Lor2_9 z!=`)p1Ua{{`4@?Vpz?@Bwg3-+BT*ut$4$C}S!ndB3EG`DMkmILx*KQuHXM(%7y=;0#C#eGScIef}*0L!a^M;=qd*B%=3pZJ1**n9107~ zkz-MzK61#*;{w(n9E>wzS#`jyCD#ybf=6Wo2q7mgnu$CZ0@++G=r{@spD^Jrd+S?a zy2i+S^)}R&mzNKJd3o7+c{w?-oU98V40*l*N-ijX_s+LK4*7YeOfXDv*JqyJA3-E! z^L!`xw%~tI^*#Vml==Vo`0LtV+k)i@ay6^(Q& zD$XMqVCkql-HMNG#^rW#xh3D+F0ZJ#oQgZCxO3~clP<6JiYrR4R`ZGy<@*}$`}^}9 z*k^a1d1mJM^Zx&SKhNVJe`{-Ni_+5Cs>qm&2y?VgnW}BJ`l6z=G&i@jH2a!S89G32 z1;vyviPn+g!`oV0n}K{OtsjQcb!^9Sm zF=cX};_J1}NNK4h1N5vcVjQ}_H%{2MmBz6vZnF>XZE3F7jNyWBI?)&jO@AjzX;plm zVaeLYMy0X2c{-DPzNY3*mfh;hVoGzf(%jfcjor+mY|P%hOPgvVA*^d!yYQ;D!yKrhZ@?$#DxQxm36 zp%-4_X`L?H*OG_XJv?UsE^{bCLdz6Amqqk3550)qq2(OomSWu2%$#_>7>yOp>&BZGT%(`8(Mt6#^y@S4Pa|*{Fjbi zG$@UYKt2HF=LUD9($d&6htH;#cx(cWwhBCz@L+SEP+v8iP~5V8@(1z>Ji21HhHCz_0#n`f~EZQI(v#iul8 z8hKIMafAdSxDh^NW*;-5d-Q)pf9w9+Lu{cAvqR!X81@C$S#%mc9m060@ zdNwHyZ^UEyQtd2G_lWkjMg~o6QCbhg3(6Ed8%v-uBdyfW15R#=r}jkpWjwX&gqCh5 zwkW{_(iwAniXRy_5_?;prD(et^G2c7&IF}KFZz@X8kJG5>1nl&ZGqbP5YaEtl5gW_ zK5++(+J4YqbE&>+jtyc$RbooZQjId1OR-n=R*svaqq#(TwJe5C{!JpA%IJ6^o6hJl zj_$x#>IOmi6^I8Rs!J>MOKk^u(i>8%UV45YRG=GRYS{s!iLt#^6 z(-eLih>)T*jm41@MkA$hn_dFhY5G1HUkyzl7}hxQn#AV&>*KPUnn0^o8-%tMJgSr| zv`$GBz}1A-hzYfHf_B`ar$VM*MwCYMD90YugKh#CSvu(|8E7dzlE7mZE1zx>C4Ry5 zH)@SDvN@Af`cRy44$*3D7-+UdcmNC`h3Je0bdSv<+NW(g=4?~imYKxXro&p#0BTu0 zd3|lZ)~2@BB8&pDrzoWfod`aB6A`HOe}BJZWRXNCXt9?-_|OheP{DVDMQm&OF%i37 zbL)tdK@pi1}gEifxn*kSxlpoKCNzSwnkndG3#7}Ww^NC zVOtkPsb=hF8e64OBT$^TXbt6Wj>B)A8-Ppn5Vl(MwX`Y!;+&wIi}YAT7t|dN2NV%} zvXw2d3T>O22FjZm>m&){M9T?{oq;3b!D5rvN8iOcTbo+j6WK~erHr{b?Uflk#p{H& zdv%spY;$ysb3&@olTp^1JFx)!Op^jUHjx#bMzkP-Za0vfEUhc88kNZ8^sn(46QOC2 zHQ|5>?Wf%wm0|01J-wo*+cjeQ6`kkkI~^Gl8QzLEfd#y8p_qjhF!~f7XaO|09+@IE zgF@YqPL4Qo#m(~h?!;=?P#<{OW|APyw7~?>vQEcRv3r97fTqbkULE&a2Ifw`orJrc zHugU@;el2j-9mXhjTt}{gqBT}C-IVCmEpk-na12O0_Xy8tJ_U92U~TMHYOOk zRPsVGgaTajeyMf0`B218pXtf*ax+kv|Dc7Y#{Z z?-Q3p>{rCVaZEfa2J*tzOeI)JpW=kpmy(TEGMfN}pD@rVp&3}(rwuaqKIzbqc+z8` zqpwLfN@jqyZWig|$*_mRb1^RL0?;#ojv5G?!Q&nqCf#bUjpOpQFJnBo#?LrbKyhHz zN6GNBILP0qgV4nD^P8HRPA52(rsmUANlN6WK-_#y695wFq@KK(dZDKcJXP_8u|66{ z%Tx99HFj-CZ9^W~(Ix0pr_n6U-}m3AvMfH^*P1yUg-oa!zT$zYnD>hw#0|RNO^Sj8 zMA1YnA+95jK3ikdnqYdXO=z*|bJ|)nHHJ6e9Hw}Dr<#93X7(pNekPh%l3urv7zC(= znOX)rrtPr~H9%;dp=WFOdmu+OLt7BBXE?S_(y`5YeF{O@Wiv4-Z7tONkloyfTA|w} z=?9072SrU7O+eRSUO$((MQ4J@g_AtGf&B(B6bG5&II$T9OWP_lkl5MgYdf#wRMOcJ z8A!?IME*fy7Oiz`*Cc8#rWs9*?Q!g?4#nBW9ABXkd5v1xiK%h=|CY5(BFbt_BBmP% zGOPw8Ndz)QkXa$d->Z>t!pN`Eq%d9P~=wdE*Cq7E7l9CpI>MenK0mG-v}1s&kff=&vxxj_C;@4(B+Uqg7Lv zssnVg!$vR>4dO3iP3d$<7A=VR!E3PrBwi>o6Y6Ur-A&9iZSrjxr+DoWAk(lwBRCKs zXn#Cp=BCERLy$ee08{mJ564Hx3MT8eWRjd$CI|{B3Is%7n@L0ET%Ygb z9B5kfSE41!+n@tL+lnXd)nvfKbhd?Y8;QADO52-eKn7b2#ARe>Tn?ZG^DA03nuF(a z+pu&p`km9=FiGQch`@d@Ji~|;ndGftq!n6WJXSE=pnVxAJPCB%vpoG305&;twQ)dm zw7^_N29#OC_G!pWB^tH?>zNP%uWKTO2z}Pn{J|`(-;3h$k}7IO?kW<@=kbOmdDW?HE=fo`3F z?Fs;Ph%?b(SDa+tmr_7ff$G2@ZiCj0c=LRSX&Z<;GRgF3l0mO!FGzi$i<#Y&!cArT z5(Zw@JkJp9T%No2S!xG%eBifey9HQf2{TmnU);Q^c0W%0zBm zq7HSbPGpbigw~TeRA{g?x98FoE2<2sYe3LA(gRQA(9RrZV{_AHGae!|*lhH49=)kC zKq$4o=CgXSx#b(9)}{Z8r?>Kj))QHjENX+eSueEQlS6BX^%z*Qg&x$?-P1MUrN&H; z*ysweB4RJ2(Bpu8Q0_E9k=AbZ8zY@FP=Ntl6dX_oQv9uzeM#(gjJQD)Vissx7mDVS zs86iW5Z&zOQrS);pT(J90M*9h>KI#`%%Eb#5w$Ry%F#>O${p+m3vNsUH@F#=k(PNx z&n43*aq(D=gVWq>(83)_f& zn#24SUBx8G-lj#@;n7?j(HGM=fpjCFB%l~GHRpVz$MuCnb({`d~?U?Pr>J#V;0q$ z!-?tmB+hUrflP8D^P}qakAwx_>Tl zKQ+>wMo7ixQRAdRHxGP-E!ERGJ^ObYe@7w(6X<@UCaj)F&|%PCj)QKfpH18?7ELU{ zz$B2_L!I28G@7C3vg25894(2HTJFF9ekoJ9KQa|4$9`%|QGPjHXmh9WLMjs&&0sT{ zTex^`DWgw}SaCtePZDszBAx^WkX1qkQ?ZQ7>w6g#YG6Y;NT5-|@? zO0u>KG}sX+={y*+{t?F?wQ7RYNFU*AmJZA9}K>$k8Oi!^;| z?Ia}WCUs88N>FS;)yfLkBb-SfK0s8=Q;5(RQgfqnzmzOA$0a9WF@z&#O%bag^f6tS zq$+qAOeKK5Uu#W?J4+Z4K8K8XM3TnAQK6CoMq*z&eg$ zEbf5%XJxu7I*KA#A5|FS{fsHu{WSaufCbHq!NWOA{UKR$)c z*J+jx3<>51NlnYO)csrt&9vO(6s5!p`w~{r~4F`kwndk^Lu;Z8mYw zBywq_iF_s#!65-10}Lad^dKr56PY0iLV%{hE}T@cKoCH;S3(Ffao{eXI*9n~7mh-mKG`g>t_F&y`=y9u=K9{`#>nAE@ zcDA*)^(>%Vk^M7SXuAP49~C_|i!PdJt`1=2^eHX73H_n+ZqI1N6biKrC01a*5q|9x6%DX z!?0EWaeqPCZH>3U^pXO-PiWn}mb%huosGkMBh+{Qq&@A>q?LM---UkLBiAQCk}KF2TI3waG=ku zlDON6J&L^}7&7Vi+HQDs3W65FYM}K9o+g5NaWI={tPWU$P>4KOni%>=Bc|xYmdPRU zNq|3XcsdD2CH5;u9dHjUz}iQg)Y976*i*ueVwiQ*X{CC%Awk=mg|351n5bVv@;Gy0 zMiTp98IXPGG9l2M{=tN{naunb{{O}I2g!9C`)V~Hb<|0?>G&Q`E^+2ZSMHruD4exH<6v~+1vPSW>S2Fzv?i;Ryp zD&hXh!MvW0136pY_$s$EVb!Ap9~X67)|qTh>D|g-uX%ZUd%r(1=&AqigRr7x8prBv zl2!Q892C|iXAce+pGr75I)C5Mx5ny5XYu(9mhD?LZRYhgYto9NvU_PlXRfDm?{>?& zhq^!iQGYF5_~^lQujl!sb;{BD`ce}9{Q0F*3-hkO_tK{yyqrC?qUFfPe}3cn#k=ZS z9(^j<`NF9;`Xg_hdiIF-2#kV)s>bTZib_2--g_IAd#fu-3n(C#ie9hvAh+~Dz1CJ9 zZIu=m*rr&_Nr?$K5|hl9DVer4Woy=~&X_Ldqh6_N!>6ctfaRrQldBw}N5x!K4Tv_bj+20pDyHsET|CaJ(ty@pzT3D>0{ zGG~zAW(x*YBsK>L!E_1|E=Vd7sl{MiHgz?Axg6ZpL$N5xDkgNeT+yH!lfWCHhPglkP$VjMliMG23eF0xcVgsnDzYp)@sa(K zB54kKS#Ec=yJSTI^pzrCMF$1&3HJxpJ6X((Uwxf@onbZD+uPNJGq)s34tyk!(~T{2 zCXAA_v0!6?CJor#h&gUSINQRz;d?(dqQCX=e-{|%j} z$dI~57=$Dh#&oGqS16MVKfMZ=ajJ-@W}>VrI=DfvH!r8zW{Ix9m=uk=TrSBKjY^VB zib_tm-w87C&9mEQ*zJ0XO)Sa7VYjEIWM-xf583nhOq^xfGi{l+)C^ljUm%a?^YTPKZ*VY= z@9X1velWAIug`85?df(g-EOxd3pshX)R)=EzcVl}7=33n^3Th$!GY-b5BM7$zx>1a z<#9gL)6)|U5AuH-_{#?$T)upH?4$F8=Zy)MFY|+geKEc-5)nn7?+B=B=kQQSRfjv& z(equS9cstuD9+U2a0iZ&fm5BGodf+{ok6v?v!g@pI^QwcF?1fsKzHw{u-bKM^62X7 z?C$F5=o}sG7#!=tA{p~2yfQ=#5S z7 zjs6%D1Ve@)LonJB64KI;|4&^kOO5$e)gOE1rS5QdFo=mT9UZ6v>hbfY`ntNh>dMMW z!COaSol8)ZszVgZ_R9NZxvENr*yZ&SAjheAN%fMqsj5jO*-2hm-oF`u>hyYLMGpSK z5KBZsStLaa28Ccy{B~8=DpC9v_lnMPFlmZkl7Zwrttq-Me4e zonEzibyil^>cYa?3KJ)!`y?8mlau`awEyfkJ5J}vDSjD$L~?{;tE*m-n-r{R2uh_) z#8ov_RmD~PysD~cqDoO#uSP>ptLn+qVKuCJWZARxu-{)b7sSoEbLY<5xaH~rRgzRW z7z`?!{7_lqc9&FE78HOE>eaBvC{krG8jXthL=_>3#Y!hwH0rncZPB0*4jYZgpAwfG z;m5|tqWFv%M|jv4e&EK&48w-uF@A*OMn{paxrr})VK(da`U`)#kWQ|brar^S_DT}P zgfE`?;u-eLGfzJDaO=-!?Z(F*_a8iXumK~!vHs660ym}ZQpi};z=9}YX})9M{*LO(M5)9Qn1X{NOL zG)Oh^MlveFevV6vP+FQJG9HOsuJly8JwH#0O>w*1+XDfR6`S8L2u@WH6jiAgiiG-L zFj{1U3}J+q?_#-7UnF=H$aG4hqGX9dMFlYnhbxu-{{G7T%1XIU4GyT@uxgC<1y99# zsZ^|vMTOp2FcvFSVlkDZnct>N9!fw^m6#$cs*4n4Iu)9TowHNyZt%XTQz`4StgvMK z^Q!4DU6}R{b;ZM3J8ko?yLR*AA1%3WEw;V9X~y60U^ADe6ePW?f(|K4*yssGa>qQL zT;(@!J=o}Nxb+$LpMT%|EJ+0%Lami8S_Zg}P<-`(3cNOLpmR#$nwV$fUUG)iMe z1<0rv$MB~pQYcbXl-p;xGb<}@k(f2Y=*=%MLM3D3NSP>>F$&%yW@X`qy1F?CLp3aQ z&6!i=5_4UyIWAYx*qpJ9qB%uVL7eA|&6yLzwG7cChH~fhGrE);j-Kg%^2sN`8#?>X zoEh!v@4S4b|J!fB1<$*T4ix9$8B4S9{H*!&OH1qOM(v}FF7B-x1s>b$=FEA1-@fM) zl0N@@D%i#f`{)Wg{2=y`(vpC^vu?DnZ$(8#-)Kc&uAM4!F@SP9@cv$RC1?du!Bt$hQ1eT{qj?2V0mxut#ffs&HD<6}Cx zMp4R?ni~5+#R~h1(em8UG5`|#58az&|76s0aVw=B2BZV!}>lmUF=}6d$Dx)h?0tO*;5C+) z^96XGowqkN)cZPoKJaa@QacE#qI5-?d?ik1og>Ka+O@vqLd0sE2{5R z8t(PhcuI?)>8Oeb^+qWhDXr)Xpq6jYMNkI(4a`DNx7|MA!YlFeXx~sp1zL$#^~E5{ zjEt0&1WHS4O6_(z;6bbGRw}m+6_s~%p#BOzlw}hfr4C1pr@p2nI>(zo1tlqtUqeaCfWgFcdxyFlEf?7dVb_>eb+fm`F01D{FU7gCoEn7gQYrHQ%^|cz5rgIXF zi%Xxe#&|_hz3v0*c(304ye|FH)bZ&_=}FX^kR639DCHCaR5-Hq#L=DLcKy-lP&^s4 zNep1Z5Udq(Fj|H%YkW54uc^*5YG~OCWmJ0Fi%+J&A(3AhEeFskn4wDhauIO~*0J*L$~bo@LyNgRrh2`S9j0b z{dFJ#CK_X1Z`IYk`0SJQCH@-ElCECKPD3Tv)zvLrUgqucDE`n)Euy%;uB;2&J>-gY z=l~N<#nfV3k%x@8kfRP-$5hh-N_*-h%I{K-(?VO_&2<#NmW&5U==(e&Hq)s({lTC= zR8!-@5s3hB{oudtp}9~zs$?1IVY3`1zaTs%tF3t?GEZkOF|>p^ReJ96+3 zj6zI!_&B>rJzdYZ-I1{|AY1_I!W-;T2595pV~t)<=^{s}{_DTI-rWiL%-_-d`g`H_ zSa@g%I$w&3>*I15DJ4E%P7cqvCu4y@qcINTI41|HeNIjkpI8h@z0cRjIcY*@M**HM z85^TmeT<^TV`B{s#k~y;+Z(513K7f=C=$TGe*&-bSZG5a9Fq9w=uIO8NPm&F$SM{U_37ND zrA3uRj6f-3W1a%1vk3Ra;$mq^ps2H(+^odV)R*!RO4|;PRHMBoKk;O^7}P| zK%9ThTE(-@VNf>BlLQ4iu3#mI*a#9z;Y(;NiNXp=lHz)=Kj%yNsgd*V$-l~u9hCd! zqJu^MjU_^{2OK@JBM^{>_i`Cg20w#NkV{jRgGh=HqhiQe$YQAN$PkW^{;?h;{SZaj z<=%mT;bCMB4-5|=dEXGr^Sb@cFcQBPi7V9J?(u+BdfGiOx3wRvb5*-sKou#s$T0+H zQiq1dhCIQ0nB3FT?(kUa%!-w_kD07Iue~5+++eU+Ae~wa76X!_Yy;XuDonM|!Gm4g za;*=ubdtZv+A}pl=@|-*^!E%6;a;wLcyO?{7et|Vuy+uN^boH|pg^i5inz|JZb5+E zMO9@%7LY`P?s%rSy^?~(54~`3^CbogXNQ{7QW+g=4G2^?<0 z3+-PJ@JL%t%w{VsMP{k3)P_U}2CY^xc-|Uxz<%Izl-fKMb~zOkgFpa7W#B?To& z?72AX1=b=Y1zPpf=FggynTgEIS(&qtM4w?wR2IZwRF+XWW^{UCWy2W3(&k0-JDm}M zYf+50ERPssFnLKNONvQ}0{=)kz~=V!oM*{manK2+QVDzg!Qbg`3M$=o7pyUTr?1oJ z@APeiep|V*x~vvSwN}k_d$(_|s6b}L_KNLD>S}S+RX0>3(F(8wTX*fc>n>#8wd<~3 zNHVxsro&|`H6pP&kd#2wE-J#17uk#KNFolo7V=nKZ9}yWNrM(iu&d?3fqnasx$nTf z14tYok~%rk5%Tw{9id*3gV2}JUEZ5`e^F7v81yZn=3`522K1}CjYul1k=#|Wb?e@} z(6#n%-MbYD1~=B@_xJc~{52*qo@zrvjXE#h84|_$Q#_&+J6MT`Z>lxKj4_7@Xmxn~ zF`!vZO<7qe1P(8FIaTosy}(b++NgZY#9X+cv*#@S(3CR=^pmzElahKDjJwbR#~Bu` zU=&^K2kCD2D}j0>iZ+l(4z#o!I)uzaEr(i=G{TA-4j=B={di5Aej?ke)OtH=YdgG; zr>0RlB_^htbS93+s@rM2Ej4W-olGXHiAPo%bPqlq=C3R(^dp2Or$(Y)ArhhB+fOP= za|L%u-H&e@@ThjBhrmIIo-)Ve4#fKe?tw_ zACLgSTiqTo*|67&4LJ>pkv9n@kc2>>rlxqHz@&g7B=?(4_A%aSRg|vE`s!*}q!g1W z^D-v5*i0r&Nkvw`chF?IoS6anhO8uac2-w6C{~J$BWi`Wrr98AcXg(t=uo>W;uJ}C z$Cf9>GKpfvfR>S-{-Dht?DzYl{f?skTx)3!KhhrRhcXBoJaVJ$cE9bq^p_#Xg-rJL zA^V6O@n_K_dMpra7`zU>A;BM(N|(A9m?L6P6h)9F8eSUNJG3iiuw**6ZrSc!SW&)o z#i}*ys&l)mBeP;oLy^UmS?pNqlom?TzV3|by8fYR``+$IY}fX!TPiG>hVpd|=bBY3 zmM&hH(VY`<#O4_0TNY+6b`(38E?l~JY4yGic}2%?Nk&P>zI_=P8Ti25b>2~4D;C)S z^|5e$DNN={G$_hmw-W>s+GQjhtXE29n-p~hp~kx*jeAi-5{tew#Bxw`r&}qCg(2Td zYN@SWl%v65RB*bzMMcI~G#sw?mwIjPs1$U1oq|;KsV-(vi-s1LdHo9koOylcyK^#Q zl#!-zv8jV)!`_&GyqoJYoKJ|EDA|ylki1kdBrIMy-|O%0J3lLLPK*G`+<)#!%Mg;i zm;Kbu_ZiQdV#zc#Bq~-D^+#*V9p{T06!+5dEo&Cean3JVxTb8Kd&`!}IW;v3yoH7Y zQ*y^aZ%|Bgv8~$*) zQGi5zY0bW&eM3W)^2Yw5qN4tRGOkV*Y54r$KzBz+UsrcVa&lUx-5!f+l8eze6buek zR}T#VeW|7<5`o2!6cPMM8gh9Z#j?vgg?jvW;Jd9-l z*~9o|M%N7dFS%W3eb`rr>Z002RUSKXSw$@cTR4A9^TVdt=OWDl3y9UwNEGMY4p}naaxCn)3yY767~y z2t4{|z#j-43_kT#`>8}BkczFC{at}T;HjqqA-JqEGp9|<%*f2NZ{?)qr=0nQr2R4<$CwVjmj0wA)@8Awcb(-=a!)!%Woz+VZHr= z3Kdm>TSOG4<}o9>g#Q=Jd?CI0L@T$;ohWAh0BzC7aC`l9S^`M=!wCB3yu#CTVnZbUZoP zpuhIxHA9@i5XUZz{tbB-%zytFdq>es+AylWaAkBhNx12Xm15K09WY)%R+G}TC9lh|H z`PKK{8GSW0dK4!Y&R@8ajOv99uf8{mt0)ZPZ?Zo5wbznIlX2q(V-G4Lyw?5bZ+k{t z_8octjyvwyf6pEJ_up~f?%nX8?%%z8_qJ`@st~pw({J9iN&Y{a&nk`T4I(lamF=^-T3iW)-bjB#?pyyGamWia5)GzzPHx+{j2YikectYBSf@OZ*TY6>Ge-IlDY6NmP&7 zr$#`ZMH1EU{Q2|q3g+kK6%-WY<;^e1Eh;W3D!|v`+yZ+h1eF5%T3#WW4?pGJpWL2x ze8#8Q)aRfL`y%tm!GyG3iKrKXE1Xk3H;vvZeFMhkx#S zxclgn50WlPp{Owe^)`y`&>04YhsVcbvDo8|PDOeKdx!oQZ0~xz%lG-SYG|_CQ5tv*4FZL(Ro*$@zauqm{GQg zr4DC(jy)$WEjJAY!5n+8byl(oX@T8tP0PtemNm^Dlwz?U@LrZ<_=vZ#i-nrQT&3yP z(jDu|itUAkVnKbLedd&c_3LNm;lHeGr9EZQ%CeQkGgjKI>kA5tiV6#7#%E`zX4~H{ zcz1nDOn#fcm=rE6EXyw_o4ImjSy`DqC`*24OqPqwii^wE19=R{U0=K&Nf`>RFIYdb zY-Yhs`1M&q+4`BtoQeP9nZ@gi0m#@Gpm^rWB`XW@IOG@P7Z(>7l&vf)E-Ng+X+c3* z!TN$YQi`{%-%wt#W#&%$wr%ASyrH;w=Ip|q#alL(ZP~JA)4pvR_w6bx`|0e0nfrD% z*4FO4ciYZ_g6#!c%Bsq?m6ermSzo^XryI(5?kZckWc|wRoAB_0?Pax(-g|H3lkGdJ z8h38PW41q9@aWE-_uqf_m9Czy7xCld3-7-F+MgxylR^lFVySb7~bl zi?SpyGn=cbUed?n%wDs3bael#ufF=g1EZ;_sj~dQ-FM&pA{OZ`lcBnJ>T9IWYHF%K zb48})UHnx9qVPUNDM$~e-;Hlfe=pc@Wq$rSS-$)3vNE~sn{TXE;qjMW9=PF#`2+dp zMWB7(c+KDJKV0=qO^w<0c#Z6jIbaBS)GXXzUR&!sc+0KR%7f+K7Zw&yOw^Wl;a9M> zaH6Zcw)|M(nTgc$@5>95j&=3c)&_%<-pEbIj%`|$wW(>*rbXhSbNNjZ6Z!e&`Q_)T z<%#{D?BD;%A{^(=?XRvrcMe@*nwU6u?p*n~!nt!5<@D*fg>ws=n&!@(TX?MSSPTEH zs|jw&88gtP8Rw48*o0#bo_}o9CguHOSI(VFJ$Fv0J9qA#cOHv>r-{G$!FO^?s+)Ew zj{Dhehgafr6n!qqX?eg&TS&OORS9>q)Esm^_ek57H) z!JGFe%46?mX&i8#7oJeMRP1e79rTuZN=pO2h|A|Gb(KZ}r9OAN&u!})bHlCCy{fNI z?mL>hsyp{+OrAE)dh+DS>*qSle`1@KnSbO+Z|}<|XP@lt-SqwU9A)1NUqFfv>^V|f zi#3G5|NeW$>=lv(cteU!6q}xpqsz?l*M9fi+8e8+n@cvVt=O`5V%f1QbJO}J^X_jR z&ssJi2ypgb4k6vXcI}!qYuD;%!Vadf`uggdZdp{iY4swQ0yo`OezU~ZIp!7?&YO$X z`){qdbyMN3nj3jjD$xXg?BvO3k9~78J>8z3buv9G>)5d@{4j!oJs3XmdPwWgi*)|Jc5BNly&|8iC3?QiGu@v{^WpuzX3qt7NtXX!)taO@4OB*-Z$0PPMhds@5 z*>X8DGUB)luUp1=+N^=JQ79~=EEte;<=k8X(UvI} zE0x`$M3r!~DVkMM0&Tx10`I%~7zKFgW86N{jm4l*4HdcAUVUNp3 zCVFDt+!)RW*0v*tIIdch~lHi}NhwgWWKh431m!7O&erT|>to zEvc#Lqp9iX=`XzupAb67bj}<1=H<&D#eHPGtOl#8AG5m$Vf#~4X*s?k28y3b|CA&t z8Xe)HTr?Wx4rWgV^-mZ^ilwo!;t_lmM>Q>`Sc*v{n9(A2sQx}i&aOZg+JU*XS$@Cg z3y<-YMDHt!!I2S#6cw^SzAe1J-zNIQQ9)8A=)!)l%~<0(c<>k{95ylVq-Dr99Nj%B z%TGhKWg@7W#`Yq2wB9K>Bhd(=sGyAvMTe|5YiA%fBHF1e_a0KiVL_;`cOXEZzke;F zZdEm*psb`U*x7NgV{{}s2ypc{T+aH2k&&0q9Q1TDnqS{<($OUYEPkLGaLJg`ZC0`_ zcDWY1U@qTZEV+tZaDbYzYS4`Se#Fj39f&<;&OAZ5Ba;E<`F>MTeVuC5o>Vm7sMeL0 z{gIKoACUSN`0Ppj1TUpeRD{kpYZKKzT{!S<;^vngNL={sz~%>Ds-{QkJjJ9yw^M$v zb;Tu1Pme0NObbm5;aBSGTfJ)4>eZ_ZQ@3<=-CbtL0SgoproG^YIv9yUs}U^lsD^?n zc_X&c`ud0}X$E4**kf*^t0vIj?+QoV^^$Ns#d1o$GM33%9r2oFghJTvTRlB1Jqw20 z4f8hK>8-1-yKd*M4_~#v8a$Dg_rL?6e?DWzNiEI{rtREhV0Z5Dhe*1g=IFBipa1yx zKR*2M;zgbpghb(uml6eS#$8G3%+@Ec5=!b!%u-dJn7hE7U{3e~le2S9c7ZG1dTTL9 zV&_Xp#u4Fg5p?-f_`3A?%Q0K8aenOZ;cxQ4DKIXosc{(>g$q*0tYcQ*1LtX9Uux>2 zMX}i1aLPK(uIE%`HE+BH8YqYTjs}^_c31y0*G1xu- z!@ZaWlPpHTXf%3#X%~5LYjAAy$&+UD$^4)HJU{>EH!&K6F=EZl%{N2*f^!Ojd{Bd1 z6g>?U5_}Qd?Y{f&J9FktVqzlX08EomXX`{I+@%wR`e$_r>-diQ?uLFa!^MJiDAKOD zoDmgqJTyU7N>$Cu6&V?tA^G6t%LgwXJXi{|S+Ku&{&pOl#*o95mlw>diiYy4f>Dzr zFYg~*%pu6Xz@aFKN@C*E&*YYud;30D8`ns`1zcRw+w=*>&kw@K7a>$tN;5=+gDS2V zlDNC^g-eDT;F=ZA6-y)oed%saH8iI-&upFvHM|)>ovBawzvfa*{A6;L!o-2e zaI5~$W?8{ckOY>Pr0Xi zf9N~2sKL~|bn)R^42z}i+axx@osTPS=&cQw{H6Qs;NgaD^L-OL?pr)a-J4D~@Nt_q zEk3dMmecI`nZKOw-Dv1;IGf&m<|CWyqZ`jooIbz%@|lvr#NkcH&vf5+#&9P4^zPFW z4S~~}KRY~Z@K2oOYz?*DG#s>*oN0Lbj8w#(ow(_inuas6^s|SLpKU<0*mmMHm7Pgn zoZb*ObauD#>{&W~I(Yf`*|R5zJB7&%^@4g_?X?{*K69F_HvP8!bY|i{_qp3^ z&-BjPf8xceGgZQi5ALtse`fRkGs{ja<2Tus?GOK~>deIc!m861_G%|6j%o{}c=1M0cJ=_XqsOpOJ>%}Wou)qomkb_VQ=YtE=AiW`=N zDuP0XS`k#_g64%zo2;I`({^2Ke|J%XTq8~J6VIAS;MEe<`` z>aH*^URq^ts5sNF;(=MbC|8^aonCtSC!5Zk4%tTT3vE(Q$gc1<)MDxS z(`N&7Ik{?CW1!L28@0jYjUyarI29ncN1M9vJJ=8ioC*f$;ZqIwoeskV5NN3CIUKNl zq-C?#lJmAW{XZwp&D1ZL`q@X*=Z+W`yl$}^8?)%AzHaHBJ$3qLHfQ&O zx2KwIv-KxDy$kf4zI9qAzLBKYkHejetsV6gXe!?bU8DNzdiJ7f20&+63C_k-qT zp;!l|-~DmjW1&2`?e$U1(5?QE^toYa^4oQ-zw420HHFD{?FPgjJlQ=x7(E%PGESVe ztqvbNeA*WLS^BwAQz-bOkTV_)t9Oj452ntPBh}Ns*>CBbDV!RtOiry3#L(kvas$He zLc$l8vGte4V!`|Z_d@73r7Q%$UdY5gDt;jps$3fKzwmkk7Ya3;Zg@Nt^3zAVVZRR{ zLz21Opkq>5@g6%DQbVUJLXR}ap~odcuDrzjxGI;?1b(ZbAv3;0%Zk-6CU{w;s)~xA zK&g~N=2fatwzPbegvW%03UCUu!2cwKz%yQ6EQfe`37#Y`5tfDoo)4ANvNOC;vCPId zELrxz&8oXhR?B#G*-t|1G8vEmN!b~RU$FdvP(#Dnvkjrsq1T;D<#4Yw#LZf|cvEO> zah|PdNiXH6gchHFfljAb?%hAsaA(8vfq^?A1T7DG2O)wC!k18WtAKeGRg28Q!gmeZ zGydfq3J&evyLbDI;X_vq+YL2CQ|8WnX3C~{^UCaQ_m2B#*6mK-Q&u+RhWpn}+2g){ z&)j>PZB@2|#dC^_*AzREYF|i8C43fKUs_r`cW%HRi}`Z{f&br3lFr?w>u#J^|1d~@ zeA}LSMQLbjI8fhEzw3@WZr`(O&mFh#-nrX^`H6e>95?{$1(pR+8lLDZESqsLG2{7t zM{$(n`0l&%qerLP%a7X2?RL-f;w&9BwO%I}`NhJUZrUH-kN>Vm74a=myuY*XKfC@@ zNT0V2w0%x1R&;(ad*0Tq^JafQ*ehxRt4>UGA*J^AHOJ&FufM)UKDI_$#$_#nyz#pq za#02syYNS8>;4dko=iwe5 zPe1)MR#s>oWtp9r!3)W7^2iekiwuZ>fk={F_{8M8I#YLLYS&rC047`vEY~K@ zU|vzm6Ie|MuO4^;e~87!Ef!Lcv1_1kS2;p&mXa{ASG%!o!!CM)c6|V2-^L-l$UM1Y{&CenC;CPCqOhETc)Q1 z7wr7hbl;vOryp+e>3&SR{oxhyhpY>9KXY#Q^(`d)YH}L)#VO*S9vRDFYb_P8zxjv$ zfwO;k<5YR^a{0`B>o4->%qw!;xO8iO!P{CT3{P8f_-o%^y2L&=%pmKvWo#Z)V5~+k zK@(rcYbCN{asQ^TVn48i)M<&a3yBFyI^F2>uVP~`z}&l9T_KMrSPsq;p(5N*bK@Zzc#rbnK6b%8)$x|=ccI`TKaci=$E4L zhp$Xj^4XQdj721x&O9m5;$*tVAZYWn^>ioD!hl24(MmJjWR@`X7*1OtlGyvXixkU^ zoBs92*Gbo3PhMC2m+zuCmJqw?zdbuWbs?kMw0>NLxwE9L|3&eWlbY@EpIQ3m(RDlN zPuuCYWO=fb{?F1ne2Mn#-v#K#wN&_L2qS&h;{TsZp2^2fjAT5aYAes!=MK<@DGBI! zZ4Her!bDP3n{>w(zei;m|S#$Ew+LYOeiTdVy;V}H+2X^(h0vk8P z^w$JxU?2cjuU(tav1=epjLVzu9>*7#K0OB^_Ew3mFm5RfmB7)fKX6#GK*#B>{7BBySeyT0nz?GerR#tjv!yCP*^$Y4z$=FN)_Z!eTMi$ zy(+Z4Sj9{S$QShQd@heShl~>lEYuftA&`qxR>YnUi!vSt^h6RY;0gEwXBa+@vba0( z;Lq&_*bxEzVzKlFT@@h3PJX8oZvk%hg<1$_xLoWHap%?X7c7{UVyvrqX5{l+cs%a2 zA;>(3j0c8zJR@%>Z;*F@#~Zbs>%?{K7&T-ROd%x~H=PO9^QlL-&sX0ptEb_?CWR=YtoDCt-dak>$is!Ex>Ac$2zybhNTO zkPyX3HmEHC-XSgxgXjRFQ)Fa0YQ?X^T#hPuUBb%yjte>)l1<@EC?xXc`J% zIzPY2@>)tipg>{+iDjgX9tC4?gFS#9SwoWC!FugHC8VyFIXy~xoj;nhhGB@!1T;w| z`J0$@zAlRt!|z#02Su2x&`Ky8r%p(~%6!U{qW00jddfMt~I7rB13dkh1FkO}Qb@Hd!CjL3KQRy=hS=b{wFb6;@)495pz z>)=R&elSPO^I-)Ao)E)PAZ{Ewm2j_$Ovj$)KvdBFkY} z&%lisfJuiPgV^D|&mQv+;=%zuj$k9Jc!-*DY8EGgp?1*e4CjR}bs<*R?h=JDWWs;d zJw3rANvH$9yl!`H8Ta_W+`Pak=nX=C>y$EE}W zU21+|CeKzo20#0!+1xa2ZTBZf8fYH*r|EC9tUmB+Bj(|Mj+U0xnoVXCq2{U}62=+% z1CJQ%NL7vm1|uB$s1HRF_Yrg7$n(F*({xr+pC9X>v{`uyB3$Y#sdN7w+nV3VKJThCGhp8By(nQ66+{5O( zb9)z12s2p?GR-wpp~yVeY>Rp_yO@b-WY}bMwIb$mPmscDbRmx`CJ)V>{N1E~f;mzc zY2Ai}iwhr~gl{O7&aPyPSn>D)--SmcE=uPvG5MR&Wrq0;YoSUgF+X@;Y5fBI!T0h~ z)jpHoWuFLhx!KpeTGcNo>xeMF=+OM$!2yqm6&)6Q4t8{o>odvsZv(?>WMudShyFDH zJnv_8c$i#z-?@Jh=X*i9Pnr2!{`G1aVCFsdzfuiMdt3V5)k@9!bpiI8>wBl(yn5xW z>y*3ps)qV~_tsuCzHpQ#=1mHG$uK|8wE&KJpL2f}j?MV5@iUWe#n;wG67DrFr-t0v z%a&!=D&7pB{BlAGA3{qG#~uwQ0G%5{{npvMr9pL?XVFDtqxs*x!lPUlq1hywJIY=_ zUg?-Wg-;!&0<+L;Z`VPF%pw^_&T#;vL(K|n4@yLt*3^?T-b_bhovlO%_V5_TF`3Ph zz2q-jSA{Kgv@wr!Q#qnj`o6FR@A?Ac4;@qF^0Taek<$bUG%m`qGjm3bIB;w!daBIc zT4;72%O@zPoa5;1fE&!VT<$aAl9)`9CTjqb3W=k@^ukGE;@P>FFocL4SAgP$&g$}H z)D$ky7L$wh0glg*{k83!A<4)AQF#?On_$tyJ(P@C^Q$jZr^HuZ>wWNTusPI>iNJdJ ziD{UefBl)~#8su+ckJ+*@cP7arO*B{dOhF1Gu&+U8@oj_HaKK)$d=z-f^(0%EDjm_ z`|o32G>ac`Y&jb_+Z0$Tt1J(=W+ymKF21C%i-7=jYr1ar^xFlV?w!KY9La``7J4;XC2)1S|?zyDD7# z!p6qU;9sgK^`n}AD*;#D@^fJw1ZS|%QMm>FE5SMX2;{^;#l;iVIz>*}H>l!ni`O{ur?v2~@_>Dt(v zhE=N!H)Cs0d(k78Y%b9?Yl7_iy6tJn_FdJ!ep60<-S!J(<2YsHm0CF~?0W!yMEQPX zM22Q#ATs+66pjvK&Y|2f40H_1CSWCsO&U^*fau~x>2D0r0PGG04FMn|cHW{;<_Kpo zgd__6SOB4~GaxI@cs9M_p)XhOTuus+jA2ozkzct0B8Z7pdIH1iH^Lu7u*fGnAjtuU z8@d_OJCaz+8AbSqC7jvbxETcNq;u&}VR4xFVuq5X*7$Cd|X91x=*P2Io*a5%$9z&)ge`io>tTU}-y$S+3 zZXhA!2+GI0)9Zw80i(c5jT2R-a#Z0f5c5gD58WCTh1f<>WnaLwBF@4HP9%q@8yzWnAMN@Y7n*Di z@%cwGIplzvcHi{Tz$6;aYPp~PzE7YG@(_S6En7tUO=#KAKmQvzWKJ-l%T~pM7(q%> zUuju3a+X19$Us};{WVlWDPrDn6Nnf+b^`1+Eb@Lco?r_qF?zl;pKniis3Z}g;0rwY@NXyYSa9)hax@{USwG^9 zV;ui=mR91}Ri`hMU;DkisWkXL+;-V+M; z+W|EK=&aR7)R}_xkA?j8UiUph=n?Z@&sGi$mj@0Ew6$f1xn|kSc|9n+R&3+iMZ1ov zDETu}707X_E#N(N3Yyb>$m7o$JsI6!`PRw{+N-PUVxXJeoO~EKB08Ivy?t`wvki1(An1fRF)fO(DJb_z3dSkfdAr1hX|i7t0od4GayH2 zdW8Th+V^|uJS~$$O+%GBlDP&gT{X@^MZSbF7#pO3q-NqzEQ99Hpxzd2WXu7Kg8fB> z&WudkVCM73G(zbYUGz^2WFX&<;eDe&1p(p5$&pQyRtL zc(D$%I1mB|@^z@#n!FM=DU`lTAxI9dfpj6PF^D(?Tja>Dq!k7!FU822|5J>-1Y+a` z5F>}Rl7=K?GMZSSE03dAa8bpSz3o-m&#+7)VL@YffL41sc=2G6=YE@7z#gbRo_7i4 z$YzD}S0P0&){33~{Fy$Bmw)ey04H4E+V8PukE3@(kd?DFktz6O&nDb&AgZA^{l zE#h4pNJ81EU8o4^#HVLDoG&dj00dx*7)_4Z7H&?5MfT4+g2f2k%LQt_;oC&K03y6w>O#@v5QNd#b^bwoFd4QR1;I+k*ntQbN9(_pL zTt(E2J(r=yGm-Wta^@?#P)^rwryJ?9>U@F)mB`iNCyLBLa7S@%3GXi3<5_qr_((%2 zghyD3UT2%poDUG-fDI@ycNuy#`?(r%K z?|wmVAIm~;3QAM>WD0E)zDne7_Qa!m7j{0uPTNE5yu;4aVdofThCv5+Ul$Rjm6Wz} zdDevW8vlorh%kp?%*((qU}LtS>)GItdeLdqFCFm>A^u$t($S&`>}sSmlQ?pY5%D2Q zfE`QEkaCZ3q^JN~b`x!3+7xhfVlXK)EYSA`3kp4Sop#T}Kj-+}zU`Ou^D*-Zn_06~ zeYM{H$&-&?zn*`4%abEC)wr=~)nk%GiX4%%$Wl^4LCpzKh4vLv?b; z*Cn-0L-uDS9(x^Ys~z?}9QIXW`O!Q=lt)=TNC7LWPz&=DK((6RVF99|o2PBWv zNx9=$i^`;HExL{m7+yHLO)O@lKq&o=@E&)xlDQKLF2=dfc7+R3rf1;PlKYJp!{YYG zHTFk&W(GDc4{nr&xdvam<$0|&IJ4$puV+-*++b^26kOzj8~a5y!8L(3HBrmM$gO*_ z%(*Zu>xJL>wP3gqI+e_Y5o1)Cu`#%{cW!W?)ABH*XU#$Qz+TI2aq@J%7lu2c;0FlL z!nmnn!S`TvagTwn_1}Z5-o3E?sFr*8T7svF$W+(N{%bX&#uC@y{=nt^rrxTlCH*o4 z9}f<@=R;(o8wJ>047{;?ZZKI66gVH^iGg54l~9#Vq81c>nP9dne^U%zoF}cOO!zj2 ze!z$`>j!T`yMS@WNOb=z&R!~2c$=y%t4&@TuIlPO=3Lw6+}1`_Z7Nk84Q~S*Kt>9& zekPm{675MYVBEvta0lnHj{{xJc~!MK%og(G#prn*wKEt|00T_1lo&7OUmz;m1RD~5 zCYaK|K=8ug^+<&$;RO)hn=C14#y7LyXM4d$O1Ho6z&aXLv%xfIH@~j-Vf^)l-z&Tp z4XyNA^VN#^zDMW#dEI?@)T{PrM7*EMGDHQg^RVuRoR4mFgBA`9ho5KK$jG(DpH94S z<62tU^8?SXJ$LuKmU(MxNoq-NZ)(ZZ4Szb82hACXRg}-!68+He&s{Tqe*J8aqI`?u z>p8DiFPii7mIbWCY3NdkuZqgE$zm~es{=1!2bNY|$0e$2m5@y)Jh0FXB)D#os!O#S z!Bc?e$&fI|t5mVTu~ev3hH3@U*43#zJnE{Kkb5dsorg-HGT?$r<$+Z%KfuS%tW6`#gKa!7TkPIbuRP_;+8s@q;MADPr4+e3#u z3gwt`Mc2}sT{o95U3jGHo!iv`(OpZcyB2nJy+ZnhOL6|@Wn8=5wFrMp zyO3%0(lNw!=^_DXtbS+dysj=%wdDB{IP$=@vVWP$1ktBy$#awG`ST^e4gR)c^5mhR zmC)MT92xr4#>Qqn{%uy?S!i?Q$jVBELb0;_rp*z}P`k&F%{v~=%|#Xmv*x$nddtdc z6MlKTZ@>N43JMy0geLr$m>Gd^=)?XQ{{H@IfB%l>yytIW3xkc05tDkvWM%c%Te#)h z!NG689rZjZ>9?Ib)xSL-e2&lHCDnM^Uf znCGSw&_r1gUp&c*G!Eh|Ofk=6OjUzkWWbrn!|lKQW*Qtc0oSerw>s z;A(*G_*Wor(|%+-Vlp*1A9&pS1s<35{P~G5M*J&&AK{HSliZOnMn(ol2ETxhuD``m zK;{pj0(fMs_nLnf0T}>kpEsX)o@9Ewzj<)5+28*_g%c}~%Eo^ez=>^m&lNU4JP_qf zzL*P8PcC;Gg+4ftkIMT37Os;!)Kyk*twa6YxREqiHF)F3TVHdb812DY=QVjvq3qX=yP3o<|8kL|e$?7sRDAYM5eBuC~ ze)!@AeevSiSFlk*G>R7k*leDN^_YAYCA#j10}$XmdtuF@4$)3WX~t+dn~j*#nrD2D zzg(j+yXuD> zfIM=(4;4V3@e5vzwL7@YGA^B;=HUDY0A%Uh0^(PnzTtGwC%?pP#VOLWy2b|Jo~80{jDL z*Le%mhmOd3&K4BD(A-8+&T206#Dmt!jnQ62LK2H1W5I)G6X7I64oZ>vHB1u!G|>?g zV_3U$(1Wbl>?o{Zs{rg!*gd4Oa!KfG7G8v85Uv~XGrvGD zV#QTHcCd6f2fmse3kh8H5G!Fkk!jG7;Fb4EeK3La#raSZc<534Kq&bk;j06;L?#D@ ztPbCj9BDVo4qq&@Z$jqIn5BL$jw!8(jI5}LRPWbxb#B|{4#5n2fDJhSSsEe;fq}z= zi8KaN32vdVmNs%^rcra}Lc(F(vnRl&pIf}|z-OPHZ)-ar80fm9{K^XI|A=I2H2(fw z_y9csgBDe9MR?ak--B|l3?yOSzM6f^SW`43cha|E6Mep|?1Y-lznVinbv`^&HliL; zn=ZnzWAbZfd{BAz_5Gt-%LtTRpjkW-{&?1dH}3y#vJnq)?XhxkQhK!^Y*VLt{a^jye^n92s>KsbfA|6V*yVU2c%FBbFpVpV^?O4UEZmgd^3 zMj+`KuB@zb*hmepE_@6w5L<(Vw{0Pls4MAG@(vwt-F&GE?5^AOu zPq zas{b~B9RwhwShAw7wCms7jSgpKdvl}yl^4v0t5~Mte@aB?++nHKcDQYh};L$!F?6v z%$a@ru-&&0(8M^C38xE$AmWj1J{N5OJ~oy$FOO(ZTGsvlyQQ|9bnU2W1e2P>bF%@t zBQ2x;rQMU&_`oyX7`(hjb#Vc0upSkbMY-GKuU!-Ma%k77teca=JcB3=$_gLXudJmP zyW6tl-C3%OG)56Jpi(#mgwsLQ0<_>qP8M;$bpXl*w!#XFh0m!EQ~HFcX*MpKZfYvR;no^2*t zc1zW70-ooMRjby1@%7h7_dfeN-DOerz^eFod0*!duhRji)4yI-Wd3^XqP45O*z5Ap z$z&>P6&c$yO>(~LTw;B(|E$_W`u%LNc++3Nl zEU@EN)wPznjj0nooq~Fo8yA#JE*Y#z1FH8_wuT$2H(ICPNS)eyYr#)I153TQ z+!NkDnJrUI$Ba{_mMu4x^#f+AYHG{HUXjr_HJAn&=Xw?x$CRc1v^>|CYBY|CxwZV_ zU~1g0vPY>-smoi8)1!<|PR52bV}ELu@rILec}bbmHYcaDRFg5R25yEWy;IYsPuv#j z)Y5WlTjQ9}Q0tD+<;!mvtJ21#-HMr>ns&=+?wEru3S-%F(S9S~3V#~&Q)&l52&Z2} zFCH`Tk>}itr^YOw?&_3Q<`e39ud2!^b6aZJ)NQ71K?|ZfrY~Qvx@EjqX3V-}3`)aN z)5*9%u}u*^)u@np8h@gx!3%CFRLd{Y>0?w*sRc&5+-$x@U0pHj$|?KL!q}#+7sIoT z(V!qzTW!{M5P{k@s>+gQsoKKByH&LV-L+Y3lVdjQV8-<)%mOk&D`gvug@;FCZm7~^>|W)Qp-2tPn%S>zm$VkIIIVlzg$1<3K< z8Tp$DSGfgZVE{{5Od&s()^h$tf>)KfVjdGfI4ScdLbN@`67eri>Q7lHvNEzC+D}5i z0HeX>07wVYq|wZ{1u_sJgjwLEJ(+5a^9Gx)z+_Ue23&xp@|& zK|858cn1?8XIDXp56&JEe0yvIq-A7_W$Vlhkor(N>DM?HPwY@h7I8gG8bbaHR#KEC!2(Y1NhRUm^TTiF5u}T;j^q63C6mecMvAuUh2(EBN_@R~3;cD6yE6+Caxa+@M3XC^c+}XwJX18%X;K57Y2Mc9)oZPr>P-$`B_AU4!Y*Tv$Gk z@PV;o7Fm|10A^K4F=0;uD@5oYSPWy5Kse7uoKjXGFdB@1wut=@sLGn_4M`c~MU2Tx zv8X=YAW*)OHLS8ZhgqZH8l``OSeu~2A#lO5fCqUyv=S2uT|l_Wto=ljnBYmk{X3Pq zB8(j>jaj2XV1>J@S(Z4(qi?W{y>tS6A<$fL;7*W@%?^aXaAWs)N`DYIV9OU)k?PSU?e22wh3U>d3~ASi_+8 zHDY54{I-Q0v80vpq0?m+ClE=@Z3e|D|=q2GZtM9IBW3mY+Z#e@fsl-i*6LP4~G5ajW~}4 z;DfLOvwVivZP&SzDPXqRj-N^Re@T#{nLl1Sep zEE*sOxBX0n2#(~zE}QKnx7m1rO~GWTj%Q}$)0uC?3nK#|7m6>wm!&(7VW~M%IbV&S zWc-UnT4~YNm~HvK7Gd%vx`M{Dx+g2F$W= zI(9q(N(DTGn@y;t_AnYbpRuG?Fi@u`9OB2|>0)LifwM`<>;jU6opgun=GSlq5tBF< zUZY|z2Xqm7B-lFYNMc0xNNa*o8Z26vpT7jAh2iaWm zItfM$p`7e_Oc+PTk#V^o|EyrBU})O1Q5)!BZ?eM3vN0aBEp`}F37LyyM>eXUW#C%G zdyKwXNEZShWkY{xX&WgOu&(CG3*usucpba$f)v6>H~x*qd}KYpj&R=LNiPVzaPbZz zib)?Mn_wzcKo|>f8S)jg8W&s^k@GOtBAm^lf5*&=#pSV5E&z-;WFmwPh0>pd+gLy> zSR_F_kHKJ3ap9^9^bgo9qIp&%mQYaP59FvazK0w`Olav1wAhuLlBu@je#yk(qq))S zhIcR!kO_I!iV;lM{b1rjyFDEX6A(rMEWz&WU}H(oF!C$7B!MJDgs^om;;@7bCdq_m zTIw39k;wKJnuwtYc0fKQB0oDn(&jRi~ zgFyO>=fLy^y$09V=)gR~N`gMkC(IoIp^%9bh9nR*pzEUKQeR>%e2pa+VH)PY#?)Cj zcoT2O&Pk)->+>!VQ5_qqE_f4Evh;13Y$E@uL_C8dMrYta+nvqkVd*+DAJ5}hDx3$> z3oe7iSOOkRLYzk`#&R72+gM^Q5B&|zfES{e7%-Y}yA@9eqQ&&}%PsZg$!E_&GyM9$ zHUrm-avTXimkE7XH^nb9T1sIt!vV=feL-^aDk}{H)ClkRpS90o-(fKvxc^!2 z7Mk$?yx!>!N}AOC+;`<$a()>r>W z?bAn$;{K1?=i9L{Dr2h7|G)PCFFOAJ>)PKhJqJ%I&^OK%Hlp(W&q>@N!AlZH{?3K9 zGpL;4z$nP%Ao-{Ov&Xr^C==&T3-^T~!KN$=HS(hvrQn;%Jf{2vH9!{tM?~g{gk#x^ z%o)e#56;_!P9~5{SdC-U57uYAUS_@yvV;M~1|GV$yBH!t&<{*qd=N~KO{Q~Z69uDN z(Uuu_GO_uHNL3smiiX*hGlvm9{z6tVyy6%>45?VZy2Lik(#s^4mu;DecowF}kHZJu z{E1O|NKQchkZKfvHe*8&CY>pBh-*+0-~9KAcu4=Z6(P!FOdqR=9P(cRu(felgSQ~#XK%^M%Z&_;%gxQq z$j`~=5uWyzPaBTefCy&D7=Q=H=w%7v>ifDLySC7{AEEkpwLXQ8>I;(+F=fQHCSHwPP40gmkq!GHPAShPZ^J zA?aActVO15C!10RBbUCWe)fSh<*G3&a*?jV3^SN)%rNl?2 zYCejHUzZ)5nwXv*o2rRewOiiP`g)e56@CfByWBK3cM5$w%|&XD`&v z%}xxBNY{nN>e5pI<*+P&-Qx7QVe!i%)}^LrFJ71*8kU+Jn>cq}#Iki^>mowK7Dt4o z2g8LaeR1~uRNb;=vDtGI7e?f-3k_Qq77-e{aM|Ly3+FCgmzav1L(>x@bouMDmo3Jr zWpfvXB1J^ly1k_T{a8(EY`iu;Hf-74#EA6N#fuj%oV#pp=tmmO5?~H5iC72}wz>1e zmdr;%=gwaiic;e{cj3WW{6WxLTwGh6o13fEYUAUzwZ&z*i3g+BMXigEDl9aa?sRnA zX#`*!zwF_|hd(r)t@`1IAI_d_Y^A+;#aaPaUBcx{0FiOSCY&{%c$2mG1} z&)#XQGMOI!aJI2ZL9(h$g@uJi(?dDgnOuvEbAPBZ&SRWF2=e~nY!nd&6SuR;VA@;= z?1*3`8<<;*TZt+rY6lUxz$(7*VPoSDXRE4yFcktwq48{E8u5L2_J>J?bB4&OPLmG` ztMF{NYML5jN@PE@67f35g^(JHMJcp8pa-SI7cbyU2FcEyTA)kf17z8qkD8$7y#RkD z*b}RWx1Aa~I*}+S$j8geM}Zd;NZ~6yN#QP^G-;B%yFwwC<2Z;C8p}-%3JSu()JbH( z#(k1P?hZ^vMG(M@6p(;UorKM#skkA?hsdYGQO=ialq;rA5>1k0A+rdv#Smu1J)S_L z5%Huzh6I>IZzR>Ul=@%;XN&f_niOce9NBwhdoZ{QdUq?%nSm-MtHA%}0;E`|j3v!EXkC82sj}H?hU{O&sCC0a^>TofSOm!w=uY z4$k9&aEpEUz{fmO?z-IVx$9EaVTu_b=x(30hb!Y|)neQiE z)m?vdRUfa$7T;=6Z|JW$e{}tUbH}@m|M5pPcB-q(a{O=|PqHQ@(1qmWtX;b{2c3h< z&M?OK;hUhdpg$aRL`Nc9BqXY}Yeg1gOb{JpDAC8tsCXpkI1MiH!%?x<8~hYtf~BDQgk%X z3U=m{R2`~nYC3uNPV>&nW0m`JTbfUuI(P0|QtgG7yu4EEH-Ckn>*qEn<>i4qRpJmA zaj7!**v|ber;=)$&z(A#m{glnSX`c1n^RK0Q(vGf0F(}H zQ}5h~j*UYwv^aI7Iyzbt9sMESmNS~~tyX(si2yhC$0GISEh+J9*T&<2%jUHy@tZee zAK=1FN$8_iN5&E3Eaf@pB(=pvpMs4bMx_*mRNjFsMXDfzxn1c;^kawu4!&A zx!$~|WP3qrNn_%FIen(p-`l7qd2UZ%WGb>({e<&u+=`_dR4W_v5K$E{&<8j-uK^g4gG^t23?f;hJSLWX#98Ne@%%`k|G zaw$@he8wZ$3V2l33279caf5c9a-#IYMd?R2_R>exUfIKPhtrRpvIsv8=V2?}j-~6% z)a?+-I_^L&QrgaNENqoLmU1-v*$ZVQ=X5#F+9+q@gw;2|z2IR1YUN56X*8OnEKv&k zdBA?8_@Po7WN$CL14S=KD7Qbov+$Y3ELAAVB38A zc=Nq;@-#-;$&;PO>+0${D?5*O>dHFz=vq53-l*C8$<!`9uO_P1caGq5?AWm#$2KKU(zL0jcq`PF2nkm#2i;EI z{E1GeyHl)I>rfc`JAVwzrR9{GKqL0$#Bf`dy{6_x{Y3A(YWc zDwz@zArA?e0cToCO0QCS|30}tES=@(GG)TdSyN_CnFZ9Y(76*x>wV&PfB3#cs+0`% z0V&O9sBS1?h6{2FadDg=kvgVGC4Q0z%9N1cslDJE-G|J>!&351@e~(FWHBXV;i_ee z-kCXV*8KNZu6%#~tZ7rGh^HvUAt7qDa+uUfB)|(>#?}RL37?qUQS)`ZDIqDy-Nku= zo5EfqlsYOsJd}=7VMsuLi!vfYIposYtL*J{L6L|5_@>x{xK0U4BR(^xL=~9sVKO0-;lo5WRK>;! zt&t85DWyYFsYLQM0BrB~-tQgd2;?_krKih;2{Rm(jxHgSX(nFZPwApmK4e9AH9tW1 zE9fxC!DW<}i;L$s#VB8$5(Bl8#q*vYB}GMHJX)!S>&8REARvK~y53&+zkE+ttJU|_ z!}sTqsN&BniUH@wgfsFen2Nsv`6vxWCc#sulh?i}cAzTt{nc!KbFHfzN7nWBep7s( z9J2}>R)13rITOzJ;(bUMS&W;8F#%&R6KA_uu2b^9skQZbE5_}0NI3zy=-PT6MFzbx zwKjMPCxfO*h+BDilH2U-t*s5#BqcA;biK79?@bYnAtaFS91t+Ugv5E*ua}qSWh71~ z;dzPI8&Wh<;;J#p$=^*4d5L=n-OSc?-1USmC*w4cE^IL;YlSb-X*?EkI6bjTv^dd+ zH#amiG#>*C$00Rn^zypAjEqDL*achi2K?hKrOVFSo|lLJL}Y*-qJ!suBGy4yS*}WO zm;zT#tb+J!)ar6UVf*FFz?-{#S>^b#TCFWEKA}wz_)POw1hN$onL`GL)EdnbzFJdK zRK%w3-T2I&KYRAPcjg4mo;7nuF4ka$`CGDbb28GCv`I-Hr)-Q*N{n4!QdCmJlkj+A zA)oTN=HXF_QKOt49pt0zr8Xs#r%j$5FvZ_@vY+?sOI9vfvSQiNkR|UgTBwdztJi8G z!qsb5eds>H-QCM$yvp58=~8m&_@P5hM-SH>s^42#R8(jvEG*UQatiY^v=4_KK77*m zN6*6tckh%GT>{wc_0G#@FSVaOS>iRt%gfJuf}59zQXzH}i|wTnu2^UuTAQ+VZDMTn znzfo$D@#h|Et@y*{YCR<&BJiJ-go`_gS$7|uXmn4UV5~&w0^H4zf_-*@>#6bhAva9 zQ4!$yT&azkI%^`R_#--CBi6)xzVpFVyRH|p~1oe!!S7E!Aj|tD;BaT-u{qALP4Ut6iU7q(i>Q zA;u4dsoK43cTp|w&}f}~*9WcFtyzO2`8uyjXHQ?_t1VsQhnFZ-^k_A{8b4=^#oVO-xYwnxgciqynHJ)+H5bOMBiXak#GW^YzUkPgj?g2Ko91`Ql7zY5V$~p7uLI z&dxzW>wAKneSPsBcZPb91m}8sN}X}s<2$5tc6P=aqwd!D2KdfO_nnzOt0<%>Bz#SH zG%G}Dk2BJiR+gSFHE45kDk^hIOH&ec_4$d~_^-bPO*zYKd_-%l9Y3VR5zZ8j!}teZ zPP&*w8~K3^YCe1+!^mv2j7lCnxM`pd3^zXtj+*|F$Mj&S)Z_krJZ0d<@%(5AUZjtu zFL_5XqPvxBPP}?Dsv$A4q#>`NBr30@yhN=|z;JJo`AX-I$q)hAnhE+}^ZonHynazB zJYACCAodWyNI$f2NWokk#2J+FQOcxoFHg->C#fTeEpGv5-)60Lvvzab=1p<%hdZp* zb{y__Or&nmEJMTkcP6(2k04SJLviwf28=J4U9BwZnR`P^i{6BZWgsyJ>RC)$(g85tSS&b|uWi#?e$sA@n^s1 zQwI&&3oYk5PVN8rJ54~`xky7%j^PoKt4*#nLv^jGZv3fAwb zfU_w2?%gNo70SC{&af_P{q+~K@afa1a?G*vk8E9SBs(0S65uJHybb1!fA>je=Yt_w zUsoDH7xQy6^ajH&Cy4cx2DCz&_VD3+TuSDk5!edbTWeTNc#<#@ti^2q3+6ZUz`)wB z^6~(Yz@N9KvbOSOR~ImX;8}FF>!uqCsZ?K8tHmU^Qmrk`*+TB+=c9Qt^7HHQIevUC zaXos}meViE$T(`q&p+;^a&A{StGuwqZ%T?@uMfr|rnY60;<0CKZC7UV#ZzamcC=pj z=F+LwbC)`fcGP`o*c+V^ouVskKb}*sHKgccGc+KAdj09sSX2QTl}||w@iiEtQ7ah| zC`*WnK&LydPgo=Amjd_L(dM22-`gAN@wK^!U4dSI>sG$ui2(eu75;7UZ-)ihWgrU! zD|_s?{S6KKo2yPCnt&yKcgLx7`!T;F&;WW`!~Xp{tF#E;egCINHwHUy+_?V};*E0# zO+O*j$WJ$JJVGoA!~wt2)M0C9XZwoPXn~cLovlD%HE#4++gET3F|bBsV=J(FBDnF> zPdDy&JUZ9W@zafS=Q>P}V6BK#2o?7Tn;Yjk4xjtKkwos`Aa}NL5!=`}$i-rt@h&R4 zGfvsqIJ;mY7u!4&Gbfb4@V^ZzUgntMMm~`4r)(?h-dVL%+i`B^DGVgMFQ05jEbl5* z!KwYTIVFf^e(F^7xrPpeTr#^MWO)PL4Qt#}TB!`Yu2gwRcDd)~X-?B{pQzqSDOFa= zlu~`pq0^jtQQvUNO?_pPB&R3(vP*Qzs%RG%m&-S0Jxb-O_m!xW_uhALS@q5sM+dj@ z6FpN_)xRINswqcbdGo?)tKOS^BF?ZI6A;N{`&ueP-73J(H zy501}g_@%5+{}c}Gny~#%c=Q%Pf=z~(fOv&KfhhGr+V+++NLI)uWfEGD%Ney$u7yx z%&g1KNeIthBOmZcNZ66LVZ-NJ55(?hQzysfXKlEa8hhc(9a|GJ4;_=01AVt#WBHIC*3r$TB3vSD**>=0B=>m4Lvf`Vvu$NWS7n=+`iCs`}X|t@}{N4z9wS) zz`UJ1YnpayckXPeYyNz1&A#IH+LG#`obwm)M9f*K*h!8624 zPS+XCZbMY;>Ct)9?D^XL`xzekzP-w$!qbkO=DSkh$BQwUc+kg*p(spjEMyvWhE9nT z+>f*CtA?!94Hvd1@7Q|a%dK0t<|S;{a6qk&t-F?A*ICzgTOBpt)008acixn$)%kVN zoi{sez%$hmYkM2P6T{KdknJZWL4yi-vHZ?jrwJtxp z6AW;ow)5r;xtXN=rcTP)tIq-HQ^&@tA7TC~r?ztaT@s?Mi_NcFXb)Bx9FUotn0UJB z^!1#krs(?EXzVsME#cUj?QWgF@cE-Vx7#l?@A|y)JX(8qY18NJ7j}K2-Bmuxm%~xojRpUK6OZUNY@lzS?Pnn zkMWt@(sH`#Xj4m5izqxiDm+RZo+JyUL^T=i20o!tpq^5*M`S?r_wS!d6H1KVRKm!8MR}v5~KQt-{G5Mla zCW*qL!dgQ`N%ukn!kk*&<_Cs5$!^I)t-}LFZY6>4V?+P%an)7sJ96(Q5V zGlzZm-FLkQ>&*vCM42ZM*zI5m8mFYBz9jQrYUWd?PfF_V-IG6cl3SmY$URH$S-U$~ z7x!8t1YB_@OP89G>iJ1(Nxjo|PjQ&)nNq7y*^86-)f+HvqO2Gdtxn@k@>Ue=%=6ZKK=C5zP?ZUD6tus znv>I)m6em3jh`G0+3f7hks)j{`OKo@Nn{_nn%@Vwq6qv&Mz%+k*O!;qH`X_1V~gbV z&CQL?^g>OXI4V&>gVjZKZB=+e^C#^}aUJ@&Al{rm5>9M12U`q2meqnsy_ z0wJ!E*I3@y$L%F;>FMAx(tCUH?G-!vHkLO+By2@W9z1yR;KAn)8XqixRXvG|h`?b) z{cVX)M8q$AQWAj|iD#xMu*JmG;!mR>l;+uaduW!bSHQ$M7KG@tG(HwCw z`yeD7^h$X-P<_jhr2YzSsE4i-OHn||$m97WFuS?F++sTwh>O3V6c)j4Tts}tmF)8J zETW2th@;~pA~75!WOYR3nl+JYC<%*L6A`gy&1>ZG==Ahby?!S|xh2{(trjeVez#r^ zX;Vh}#@yK0l{t;>fHRq1JNx=JZrqr! z&jElzNyWzacpSwSQj&#;boqLHetrr^t53=)D#}R$D^_0K4&&}T4p=v{q@W;wD_F0} zI$dR~L8q&$)Wz1-K}vr1tUc_GekM}5;H<9w^3qRzo86f!Ds+JClv4h0&mOz0s3+&_ zr>J(GO($E!br=__)#gD?jQYD2$t)1KYCHze=go$%@I z4Oz)J*qyz*c6WC6?rnSa?9PjET)b)1)~%Zm{NV&@ZR@7bgv95w&rWO}A9nS-J|N{k zCx~{mE}=^z&$jTmOS2R3XE99~Cki3E<1#bjGNbVklY7z8^_{zQmB%x1cryk57*M&r z5~VJE5?e=mny#PC5uep0%B6R7*LB}_I^KKH_{Z6t^QWcP{;Vl@bwaoX%7@dCD!>$J zh1EU8b+T8QZ$5l@`LeDw$qvpWy3*22L%jhVy*@v`slK!{|ASG1+J>EJ@cG)4cdQ~I ztzX&HRN9o^bhL7BDHf%NkLvXX{oeYzdK}c9JbfC}9Ug;qb=tl@t+r3wcgy}-Q@!4< z&#p=9;MLON#Uz4uURpb?76-A>nv}#?C0JRwu)8T0LW>GUa5hEn?LFZ&Z-h~S+oGXc zMpQwr8Fg<})_PCy^o|9KF6O&K`WYUrErqO9r&ecV#b#g@$;!G+2l!{yCyLLUIH4}a zw)jMG_?hD39k2icu3NuAU3>zEXTpomVCTe+;xkC4_93n()bFyzj%jngqv7UFLq^|m zNCiD4juJ;~9X)RL;hf<(rS0v?88dV`ND_6leMY-(22C^=^ba1G?`GUAEv>BYyL`Fw zW=7x5%F>(l*sHu*-&dJoPE5RO)_ciq9JJadZj%UmDj1i^YH7HIHuiQossw^r+<|W z5y09vtq2%)u2bly#VG3Uo|VK;tD7)?c$#8HL)1X*KJx+;v5jO zb6UK(eHh6rhhGQqgpC6$9$OGAOOIo;yBR9==60%_p=_r*CB=)*Fq?Jkgbt=dA}2`O zMs))3QRhGsb(i_$=R|A~k~j@ZGDFEHL2O~&P2zg65XTSEI*b8jgvVxL_h-kSY9)Bx>JZwCI(CA`)&ed!#)EnLbCgPNDMUp1dc)rOqsQA%ciz1F zpl`^IjDqYu3=|!UB#U1roZUgOVB+Q~Rdx}TREdFriP4%gS_8F|Bb2d#iag@8KBYiN zyyHKHKE#`cX;3WvJCQ@fz-(AyPzs{|Sdi0{(}a?sh$x;OUF`bt>viz;v^!a+uRDJI z0iWO0M8VN@;#+6>DIwt>>!OYxtv*^^Er2P;Oy6<#qS*lx#@LAL$NA0-m~BOzM#xz2 znStIeGrh-R<2}|zKwL{NgDi7142g#H<4YsrLPDcI(4?elmI?qe=Rv+f48qi@d^fEEV6+ zuFk99w=YF!D62PU_8Eq>I_~a@i(58%XCFAaExTe${=Qqck~If4*>x8y4y11NJ~(tR zSCf#fSL-#o>c?uwO&My9T7T=aq0gE#_U%j9s%cJBdv9`tI590>ze&9*LcK|?8Oqp{ zruI)Uq^Y;2;U4c~gn`!RQ#W~^RyW7!J<{}!`DxxBnlvy^$?9fxzDBRkPRmcr zKxDCGjpl?VcasJeaW+?J5 ztx48+;H&nyW!$7r)M(!wZVMTwhp)5cuG#)?XqFqpBv zkRm^38jW1HHP@e#xvopr5=%xl&JHe_nQLZdthq+yCTk|o_nvnDzuo8me?HIWc@&tL zGw0=gx$f(}Ucc9Ah~?oGWow=d5AP_u|Jm@HYr|g@caJvca;(!7|+QyQFe3i(4b}TK%3ibCb_}f%Pd5$@R<9^)++n$CsSfY3 zfTC`$S^L)MaEs*?(Q^8&vb7DbJvRz$8oJ1{b#INs z>$bSJtlzNSRZ+bbZryRhz{qtQDyz5P+YR`wt*YMQUgyF$m1{ve)fElZo}25|Z`iP9 z8X0g4kuI*UbX8YXSJYOnTU%MV;Yph1T({xhbETT9F6uT{Se{?;9K!P=p0jM&;8@#i zx36}TIUQvU&px}hYQ^()&)3$jtwR02$hB)XJ^y^g2K%$mj`@8?+2aW8v%6d`lr>zj z`tmb*d|#&Z@Zrq-gfG8*Gc&&~|FF-O|7N}~-}mL0`EP2eGe19w>g@AHkMKdqXnl

r23PofIu&%AXBsanXtsE$u13tSE_L6Kxy$S$I593_?4&w_Tal;Q{MGCVI zZvYRCBe)9?j)&38<)pJ(f6v;C94{JBxJDX}xxzUBDdxb_`1QF9NGK!9C-w~4t>nW4 zcw)ssh}#ETZTz}9$S`210c(syV<`hC03>4AZ5;Li?bvPf0rf0{?0_*g`p61=FP+tQ zf@mQ?gN+gc&^0n{WPF7^u7of`R(CgAfo8jLHJ&((tB`X~@8bgBF^V?sVNF1N#-q`t z0;Y4jcL<0lhqlQ>Ppu>%I{pO7R_xnuV;*mh6~|Thhkx z{UotvEZ(}1_YZR%EwBiNctW0c0_@74`dEyf3G5w#&7+VdBz(@GgjyR!dO?J2KuBN) zoI33x`WbZVqeM>!qrYwnxg6sB10)(TKt-^V0yDuG&7DI+J!36A=zk(@=0Pf|u~+U2 z#_2vwiJZ_+VH^a6h+PFTCC4O(Tju|3!k@!!eIKy!RwML$(3|xwKynJS33=`GJgPGJ zvP6_{`9MUEB`O8!kk$AW9`msvT2vfao~%-|@m?OK0=&p%pZih>9aT}kh?$WSR;Vdo z1SJ5hN~R$=CaDVW?7XL@#cG`zR2GI3kbrZSYOUM7AbgXmQvh7J&5Q5nP zfUNAKJoIxISm}J?UsVa4`SPF(6m3QH%{D%*QBSERXS{Z*_5~_&yHCC5uI&l|kqNK0_M&Kxo#c~;L$GF3eNA$}O*_sOLNr*UufpX{(m0_vX z`k{*Ts_6uv&cqBX&X)zciUos`H@{(Ip_`FL<5HjR%#5n48HjoP<(aTEXToNjsS5jL z*o?3uk05SK3+H6SL5YU!6URR%p?RS;1Bu(w_ZQ^(^Bo{5wK&fzS5|dn1HG!8Gvv zPgqos5Qarq06Lus;>F8al+(jYI5h|JRFHClU@ZWmt8=*e#&bl~27X}j|4I>k6G@BJ zNDD=TPgLSR(?q|ZX<;iV@euzRwGvl1O&iMWNtj)vwwWi;9VaI!rTjbcX1tuz|5 zL+M*FJ2TsuZS-YZjg;LN0#00cFtm!-Ismr@noo8f(Lv41VGMWnGsaP5$D7PdqY;(T zV>ZHgq*}ePh8u-zYNA%JezsM^&*F9CR}@{kp4jJ<;x;NIBEG3+DkZI* z3f}glfz-!?T=hywz-U~x3RbUY*H~8r`X)ElQW=ItYmKH1t93Qj>^sCZv1GUL-B22V zDhhze4Ej8;1;afn*h07a1$QHFjP8XO5Ww-G>xGT3h6We@y|B^!YS>Dnd#QEF(j~7l zX64*eJkHsW>Q51}?+7P6EPG*g~>j^t0oWwtz#U2N`ggZEHZ=?Fu9uO zuoUhg&c(7fu89-@8-ufMgHbV|j%P`Q$i^$t82y{T{^e+JJR??AMYCM@8=v4j9+P8; zV(D6J5}aK=qhW^`YvWTT$nJOqwE&wER3A;nu-Q@62S|Rq4=qVY&R7g?`>A%6?_~@L zrMumSc}x-A9ge*bo?zL%En4=C59hN#F$`RjUJ>-Xi#(tRo2wcDMFu|VfT{=?!9+ta zR2DgbSmf~(_C^@0X@Z6E6DA??if=ILpYy@Vy^4Qbe1np&u8P4Z(AQz&`$WIzj~aKC znkA}c62b?c<#7Qh=Au3z>3%acI$A8Il^~hl{N^`TPsbpHCAClu`derap`Tbf7!9W7(2np|LZZ{$UAg^JC=sDD)HvSZ1y>?NRyVdPR zUO)s7y+g*a+9=>nNF{p!JL0LIQ-KldC$k#-ltR#@B_SgA+$c8EjTGhOJo#2)Pje~o z+lUs(HkmvWs?}haVlZTwre$SKnv`xdnWmcN(=rr;n6lkHO_i4kv8|tC|0|cik1RlsQ44F?r&YV!F#*Obhh5W+KvVUITFftXKGm2W?wLNLgMVt1DCb^X()QMz4!DTnH^ z3vGFt38$V$O%2ox@qLJyhuA&b&R~YerV-6!USyq{PQ(D)Frga4CYJ=06Q~CH;bPP> zun8XTqKl5?9OiNyl>#Y>q7dtX&q#dd*B4*~{xjAk>ScrxTY^U;qh6pWDS*tp1lz$OTJ`F9QQfNUIITw&X$x82+3WU>hBEgd(D?x=~=E zGt6e6RTEAQ&1|cCMrJIPz!v0oXTC4X1uVjnwm88ifN} z*mNd7$At4FKzai`{8|%>QW5N;6l*=I8R5%k0pC5wd-V6{QAqrrd-N3&g5+qHul_rA8X__#L|XC^@)k0ndikGK7j(B7On~z8j7= z{t=--ADno9=lh5d-txz7TeqIrdi=x(JzL*<@58NIH*W7~et-M+ojZ`v^I`Ljo!h&& zZvDkCy1Tj>8{cbu@4e=idyrZ1_>TA9+qwmBy1U=+-m+!WFFH3j;-&Gi#_qRq-g}Kb zJ?_n0|MRey~d*sYu?`1evpBbCXrSvyr=@qa`fIxc{zfIeHH zcSpp#lY{Aq0Tugzb6nqeNFVN#9~_K`@vVra$G|7a2Qm9OrX%Z<5!8Nnt`*91QW(@{ zY`ZLRjQ9}WXKAAzn>9TYcF}$RN!!D<@jrakzT>Fn<7*V_zeXt^pS(s({@YH|xx!uegqu zUlV)#kDgjAopw3?y5PI+m&^N)E;e3D=zgmG)OU-=BRs+NZ&3+ehaJmF!j^vXePq@1VIMNZXfB6X3)JEh`9#eYvKaVI56x(*o*6rDC9=>hHHjD!ST z!ZuyJ=24yQt8MaE^3kNP5>j=Mk+NLFuZ^MfwQckEmj1_gS!0I9xq8f+6b;nc8un__E z)~e_fqp<|gzLv+Ap)aAQW7F57o8c7V`!-W&JYwO=sA)cK{@3TZx+?EG&d|h&{xExSYyM(e`n$k zOg3gR`VsV+1~vP)tTb~t6E-%)1wetY4nrm|4#N^5yO&L3X(YUz$XC!CBtZ%Q<^lEv z1U%#3kH^!dxG;p*xQE+9lZTC`ST3)c_Y&U+9{!iR-wo^9u=PLO{qBFc`^mvKgk1GD zz5z{#lYSwEbE@Q4u~mG(k1G7FJ^Q1--$QgH6x;;DH#iK!#PL-M`#ywkR9i#kQ;hPA zQ>PjWB4hxg@RkJ~?xY?iy&KAoheCjS!T9|1?oU&Xb|YeT48Qy?niHve>n(_kb&vrg zK?Iz+ObutoaMa6XVWas;acq4k6-BV)z+k`|?)Iiv!9A)l?5Q=XCmfPK^1H zFyS|08Ai7=i(eZrPC_IB0T`tn!tir29fbEk_uNYy+M51gq<+S-1Tl`(Xb@brScyKX zEFfZ?PuhhDRuUB&8Ag?mgGNWYF~5*Q(Rq{!f!i|^MVhdf!OCNjMevXXKo1P(-G)Ah zzrRhRUVfXOfIhgiay^XAMYcRq9upvQqMj-8;a$8+jOJH+ zC1~gaE*FIDkrZvmjTiFgV%UO66L1^jx}e+m-#|V>=zT4v@cD(*$JWWr&81NG2a$z9 zhT>VaxIRJ$>4(X_v`qRyiwq_Xf_2wV;2(_klj3vh9v2NBV=iDpCV7=lv!cpF>jsPe3$>=nvB*JbvHQyI^J&2aw(Zixm`6ywpQwN{TgZ9YI~3Nd6O) zaxsQr4t*Mqmpr~4r9RXRBB7Z>ibV!pt{LAB&o?YxX1<+4Q!>mJgW3FJ%2J!O>+xNl zm-BkpEZuIXl%yiFWPZvl*`AXuFH6}{sJXN}Ctx&(1}b}Bel(}o+-sJqCRT+iPnDKh z%#s**sputhZ?81fys)=uSK!frd6M}NskgaT3Y=|i6az~obHLnO9tcQgv-s$asR2nc zZ^h3vX?KfR3YY`G2(W<3Yz{O@W+`X7vbo%BUS^gaH}fyexXSilJ02CK(_78EHmCj9 zX7l#c?Y-vgfLWTltGE2mW@GaL^Oj#oEdgoz&dpm|q?g|SB4ag_7A)i`m?(E)STm)CWRwjbz*P%uMs$k~yo^{B3zzuX)?@ z9oA)md!|b`dRnUU^-9W*=CoZK%%Nv7dVSNUn5Ew0-rD!1it)XvCX8*_pF2LCvU*8` zVOd~BM&;^{1694|XY_xZvD4SvTaIT>>kTLsfBCJXH^1|z-h;h8eV^KT1D(&9d%Mct z?(JP(_a}$r&Agi4$^8{)dZpfFhfn4#m3r$A_w%s#{x=Rg%>2z=PN&0s`61`!#5c@$ zAwb?v^ z#>Ad!Qa#J8Pv+5aKW1BT8^XZI=*`roUyV7?~ei~I28um)k?52>?JIgYL|Fpc< zdfJ@5eD^QgcA3o+_q>Ye-(UV?#dvY|u06ujZKr$F{p=NSdY`)2J6$sG_KOv-RJ2u3 zH&1(YT3hdU^DAcaE3ZtOW`25F+n#Fko-^rfWizH{FMp|!yPtVGp zHZ42b+?OGu!M$xcc{!7(MMUVQ&k*mX8+DMb7%Q9^LtZ# z)5^`|Hq5vA9}$_;?)FSyI$?NA_Ajz;o1ZjK!_jP|+^nDVJ{mKvT*1e`eULqJx*{zt zeYX7WS;<-BmnYhKi;8lV<=mY%ZSoY`^0%vgK6)Svv-@~yPPRF}vRBp8YcXXlo?>2D z)SI2Qc=wbjgOq6wm~_2+S{lvINYeDT>kQS)moKZEYA(y^&F(GNuju{QY`(8F^|lpw z#a46gvqrPo^Gvh789#OSJtTnd4@4g}oA=b!l`pTWbJktH(qHFvI1e8_{N>^P#Duzs z>S`V7!hqyBT<3VhdHKu3b^TZB`s)rKb|xZ?>!BoIao@FP`3kf1^5Hk$sKs@-g`+N& zIumi$U3GPihwAFyxQAw~a3215Pb>S=Xi7%T2aLnxXzK#nnIp6&%lDldovhPoxcx`e zLW}vi+@PZ54}F*J2cxbszL@t~dHW@aZfURV_xn5BeK&5zceZbB??UKoOMCf}@{JqY zTeS3fT6wwt;K9RJeO)KIPn_5i+~%g9IN?J{P5=@!xK;gr!Q+Pw32b)3SkF^%t0Gn= z=vGDgHCy06(|_XHlnx9|=E2e)4srtQZUt4n1do?YrhsA!_-+2huK{}9(%Nh(HT2wW zX~rLq)h|r;xAfe}Jei5#JEZ`EzhlFtRttdmEx`Zw-U^i7rq-5QWVqFG(l>dsGTCBl z3HVx+R_n=@Qk!=&`A(J^ZU-zLlhtqa2>x=9zome_UEX3VHJ!W#^HXWyj<Ko5J=TEVmuXTw-b@cX zW_SF8Rj>lg*%Jtue7-D9*?^k7fTb5q{_=90$s`DV|8DQ@0Q{D}XKMgV>h*eePo{x5 zQ@P+b*-SP81td*^KM>e$!;9aah4)C1mIAxI064LFaKu;cmmZ*KFN#gt%1z}q+}4EW zA-dBpnM_vPbT?2+%garstR0+c0LTujyvHPXN#}<|L`O(x!tqY>>=uM_lizO(cwSL- zCSg5gdQCP6>RlA=@1$HmX7?Eq%p?c)<62uME;K=clb|#T@PGUL{r`i2G9Y?w7#$+N z*NZmbTEP#|aT2AT2KENqypgEukzJT)4mV znxt}}-0SgrLwL0jj8y<*g@$>(e%xs##tbvF`>zL+%gaX!Vl{W5z^6;U!hqdRXGz3l;b4{*7iUipTT+&#~*VHv2L&t(hvywJA2+ zW+*0iQH!t?+MUO5ix9q3dGN+hKpD5;7d8z)X!(M=%IdTDEUj>o>pb*3K)*`{TwcM2 zWT<>qyn-Koj;b;s5kEnO+kXG6YB+Z>?=wLG3VdwJb;*GRu2``yA@o7s52X^&09N-) z^f_L9R)z4j;!*q`QHdWPJpL13J)R;}O|6eZOV)0eQkNaR%!Msa(0IFBQU|krC zmMDJoz`7l-5RX@Cm0Eo`frZW|0aDw#`_8H^0~Pi z5kc{lGCUqXJUU?bG2btluw=5;R_yWWo0MBUor-e% zw#TOU1^n1-`mMKe*Z^##iY*O;=Ru2X1Ol|qCSeBavVmLzHmmI*#x@Hb6Hags@IZ)3 z5frbYc)cFKSMmC>#s#o~g>*AQc@3+lz-}+NdZqtJe^P&c()@mB($S=Xr2YbUV2}3q z!vmWH5A6J@$Y1Zzr250_3zPx`z|}LdGuY4!9P9gLe7NAu8%gBLHN6>(_A+^O^pzMUsud~MBx%7b&~&b0_~f!{wTa^1f>g74Pk z!$2P?`xkQu$}~>lkdWI@PaFY zP{M32e;fI~(1a`S9-i*_)^~ZJL?TdyW9bZwY59z?t0>hQv`WA+1N9{egVW-H_FgSS4u)74;k!;eF5bw6u5zm^dj|^$=~CPh(q4SeyhF`6~dzh050ID6l3d zd-6&6siR4LCnxBq_Wv>zV?uX_!rOSi$K-)w6{`zO7H#2P>V*bHNwt;`dx-a~DOfW@ zRy2V*@_^8DyHn{@{GC{3oh8kF#WRAwNKf~r`z#ip2g^=5Rz|w?^lT}ky2Bccayg|N@* z+eD9&l|E6?TyQu)BP7xE;d%YbFT0_@K`MQzLteWih{~B;_tbYgq{xl zcBG>aS-*+vwsrXWS$^_FbN=r?%T1|Srb>`K`$=Nf{WoEB35=-TA9LcD%7|Om5 zLrjB+G9kFfH9kbFf(^(XPnBoxYe#q2S|j&c*Ly9RTeEAr5eswY%88jNCp`hSQt@21 z-s(B~FON0=KDb-A0JK1UCwKUQF2EPyx77TPQ``T4a%#u;(_&dNHo@<>0Vs^#4VV2{ zq(K1C3?2*x4+ozdO)d&I!0<~})h3{yB4VZf-LLKEe(hwx&lVignS^x< zX8%r9=+BU#=0|y9JQyy?H({|NIvNIhN$y_!>%zB})b!|Ha9R*3rNjvDgGQT4-g}DY z+R&m1?(4*A6g6~f!yAb3fNlw zd-I6AqJX*i2^#|+e4Tok`m9#2YI8XROede!5(e*HQ>THx^%6c*u@o;cJuN*YtimS%fA+1Z&1l-JSWF)bAU z8CI=qRTO9Ky76r38bw*NZjBbZxzfPcFCfaZksgp%o3tPk`$GPBO3s;sn)MjWpYxUQ zZA7-BTwh$GkMZP(ojjA-O8v*qZa!adOevAQMf0f?T%vrhXPQbkzZSzio#ZwZ0D-WZ z4%PIPmny52RWp~AU~jLg$j{GDN{!dllpkB1iR?_Y#LSjobIpfby&*Y$xJt`X%u4T4;Qb)__+{uH$->pY6G9>2$7m}^X@=$bds zr*%jO+8$GnrvrHLcw<=zT|`Ywg3mgjcxn`79WFVJT`rXh)~)lbU*`>B;PZEr8u21) zaD8J8wR_gpD7YA+7B=Am>Xxn<7V*fRl17hm{KAFl)OKMV?tb9{9u9pgkHmL*6ywU{ z{>F6|)~&x3ok@!S4 zd@L`fY+vv3ti%5rgqY;)hIIh2%gvSs; zqk%v$0l}c)Y=$VL?Q+Her~MrsLiGRav|seUIqhZZ*CE_%-@6zMrJb5+C65o@zdZNK z|J`#>r@&;nX9ict$07|yKryjrR zFOkB6UjERr)uV%z9&XcNHM$4tridVZv%(?)fsP*iLQhPW4$=SJUkq2LeLp z_vvHKYWvOyT)w29+ea>6>%34i@O`!2*0g!wk@HmmoVb=YbI$q1L}(Lr*%Q|IZJSo* z&a>_OL`)4t13lcNP{H<_rwE zT!sDJatW~0hiYi?{PcpVi(6;9lCmV1pj^+-_lw^d1MQ0xWxw@Kr**f`98j#4J?Fcs z+bMs<3F$Ze{QHn>Jk%g!aIROYODRp)+%+a#Q7n3)Pj>6^sDLP^_LY zF?m+FERG`{9P9!lxi^mOkBi|S9@JuYiCUhd)mar&jO_m@5a3-XmLBB^Z8W@%^dy`G zgh&7Zwh@R1<&omXI9e5HfQ?juqmK-*XKafVpSl}bjbJKKeLM1d>z)VK>yKTlKC}L6 z@r{J;*6+8Met-JR$p=es>?zG!fBGo2!@lE?&Q!GB;~}L-$s#La0jeO=s0tKMm#3>Q z2K+ZeElFUKpw?hGfX*vC6s%7?8P0F`gQ28lvSd%!lBkuO+bK$1HJ8tnS7Plj{0KIL z8hnx*?SDC0cr+A!)s69=C43`{Q6N^Mcp7|lw(*RblZRvdp7yR)eYZFDSEj6)yI32S zUFkVj>lsM#ud3B{)#mmM3~}&+oMO5c8`j=@zS92{A`mw?ckb5I<|{Qdrw0eyI**=i zt6bE7LK#?6v&8Q&T{3XE`};lmnPaL7_BbQww0y5#bGfayPhYSn(t4}4Hb(DkiyRjo z#q7Zl0S5gCiw4nJxu~?~cMBnbI2wv&!Qg-lNOeDh&?qfn10y9x1G5#iYW- z)|`}x0@?7?@}T5IvW*kJ8wQyQRXXLMlnYiHxqiJ+B_t+AQj(AunJ-954=V9{6HAK{ zmB`4MxUf?aX6m#T76B14w<%M|Ov6PFO7mwPTt6fTO@|W^&qEgkAs>N9(m`Rdpfn%I zS1fUR+vYX*J($!P|6q}2^NF6K+y^s@P88`}NjizkWQighZDoZStmU#y&n=keh6> zCHSwSqc|l65EVklgl;4(Pbe<#EG{k{Gp2Y9M=_Y1nmVSjF}0%*e^LuOItmLr=3mE4 zM^k4>XXnP^G2Kg2#^C%${4XxP-q?5rKOI*(3h|25uON@PWAJ%$;5vL?Jg6qejgI1u z!H(^NQKakW0EWT#jt-F)6eE*qI|2&^Sun6*a2n+f77h-crUipIyCjM7@H!Yq&cWg( zOE7y&fLl-k+=9lElGfIel8%y&#xY}B`zg?f*D;Onyn~;25Nd4bXzYL&6rm*78RZsU z@3?+1y-``YWJzNq1lqnLi&MZ)uz5a;6~^So zDwa~b5F%`GEUz941tfWJ@C~Zyn9$fb0V8i{yk0B|$%84USQ8%Daib99V&djDKwwS( zSFl2M*v!hUNYVW_Y=Y*01uKlLBDO|I`#utSk+eg-{smz&xs@1`O`e=AeAI^g% z%7*sg#giWSlGSSST4D7&30Y!H1iKucVygnIfX!B|;!LY>@=^Vw7^n%S!*N#}_@D5G zkv0=-zpy6H&d#2539ki(g$p(PTKTq$GIMfrkN|+|U=G#&lA3C@IOaQX5pOs*D5S6#gyQ5g`uE@#TJVjh7F zi0>}J2npTg%UQfO252thvZ5edVF8@sjL9;>oET_Ere3S!@+eJq#kEOsxqf6>9%WMs zm*9n(6ll%#VsLYXCmm82f__2t{@de(r-@R4L`(EK(cPG2k7p6og;~&WybosN!l0?c zuA0G%25^c;)WpA6M?o`22UEQe!TF!nQP4b*d*}tkO2Fz0>Jp@eU?q_pPN4{v$01%C zg?f0nLa2q7Vklg$c-#*x|Nk{`LfC9Xd)Oi)Mo~&2_B%L6kCgS@9OmvfSxGJ*QaJ|%@bIpGkVHS79!7)i6@L$xs%czKX$ME$ zMG06mKa4dA(YDw`sbT^|jtq~*@{haeXK}fHYinyIOpTPGl$W=vbKzkrm-(LFWTU3? zrtGG2Tf+$95l|o^A+dUGneee?+SFJ@wx%YV?LSl6qh`cK z(eya1A~Yk4U>$ik4l&GWJgI%Sr!%lVzc9zvCROMSmV~`c?M?b4uDPwQvp&tfW7WBO z<+w#}sVdS}-iYf9)89~1Epc{fsH7rws8Cb9YNp1bS*7p3=$&(X^MSZ-i@k3swF)Y% zCTa1i1DfOALrp^!dkfAg8mmS>q`!8uZ^$*fV5q|0G&GcB(f1V`-!~Me&yUm0*}6$n z&{Uud6%5@N>Kv-5kcKMa^qPcuO_S}Gia3kXW3gz4EIC8Us`UQ#aeYd`nu@lrK95k5 zdu*@9A`MwI@^MYNtKj^d)Hy{1dfSlxqM`X@k77HnSE?=y=wp;-OQ+MONzmsMX*7~P zU1_aIJ#5*ltiP;p>$arJjc2no1%qEKRRT$TmM~$=ZDEh<-=`Fo;H@ zu~z;!*5ix{-|X*^`K{3mAP1p!C|5V6*+(@s zyx62Yx96BfP6!MQX<7|gy4HCzPS6eD#(J1LdkT>HU%a>o_b5>^yDgRk*XI0!iXt4% zy=c)`^cCwZTzt{P_N%cqq0fe)RD7v#>Q1Y%Y}Q+D+bsP}H5yB5{ytat&@qdCu&CyS zzTmP(uUxk5?e4au?yay4*)A`(=ryuN$%jcR?YK{e{V$M*%vac#(NUy1| z?6W8pSsG2QMN@G^GjO}2IZhEIy+yNF1JB~c!qPPN3!hNftoDefWE@e7B?idW1jaND6lm5 z*kg|GJ2E77UhGynwVSd^7H3seXuAxBl9W)eDlY%BU7ye_&nxO{KO(P6y#~|(i|c%# zr?2yJ!X~-9N8f$rb}%j!5~f>jygfny&R}F)`N)tB#x>D!N=+l+&4d zqx+(E=y=?LxS?Y?7xyORUe%nPu)V2Jk4E~c;wBUpq*&Vb4_GExB0Gx~rli^xi)7Ik z?rZIL7Nj=YnhP~Un^xWE?{6}+_t|c{EZt4EzJ&Jvc`mEIJ@;}=|N7K+y4_sSbar2V z*3cZo@j1Iw*B5DyT-rAvrFX8cvG|H4{aO9qi$(d}xviVet=C-b&fnK2?xH*>8%cTc=)@zlwds3U@+RAV5^-jKMKj2MC7--U$-u6iqP?wI(>rB*~ zjkB!+u?}f2YV=#@X!c?)6wYhjTa1$KX`Pl$6&rH{bLY*q?41jen~O=ZSXNa4gS19( zS=AXAcdbyLl%CqEX^+dYC-vD#7uQ@cklIzSekfJe7_Py4bHmy$taWv#z5IRBK zBa~b3sJAEcXuo;5(3wIp^)t|-iNR1zLVz#z$W zQ=rhWwx7&NUKq(G0MD#|zj;g4*O^oA9 zroF@yUPShLetUc|*?@t!iQJJf#KUVd5SZ2|s%MB((f5ep2nt6yN`RrxSwASs$OB{J z1o}qQ)j46nMgWK%BKj{GdsECqG!rB>wwS>IAUqH>!LCD5M0mAu_eP4!gIOD1N%%|Q z6zQO_VoCJ_!efPyACP*e0=k~7j+af0Af3y(NA;4czRp#LW6mgk4FpFcs8z%)IB{MY zWrAkz`oK;^R!`(AT_%r}jrA^?zqF{_+Y(1z7Z92yZ z8^Q@;eJx|KDQV<*Uabo&3}1+Ht)B70A4ztH z%Yp7Y9d8mlLd?nKVu;O=Fls?IckDq)I4Qb5mj@gps+!#*l`Krf>c3Z`z0Om*!lEXj zMUz935GWM{)q`A8jpEM=i~64N7&cNPg;Nk8VZ5>@TC|AcVDaN{o7Hom0n7#ZB?c>d zsS<;J?jYs?J<19&a}CY}l1w~J7xsR{?1oWRhzKL>EmDu*&$%n69;WQIVM0@|dC`(; zE`^@ML^?70(1h5_qBI^@zP$7x)E5wQMnglxM4r0F5ZDZDkA2P`iZQ@ChzQn39FvUl zD%@2o+y#7>K5p|aGky3HGxHoXdX_D;->=ZE0QuqdR##65)x9P8ywhug6pO(N_Ks( zr4Iz!E=27?qT2?FLsU)^q$0WLl6%S z&RYL`5S@TWPUQ0}AzF=T5^5QTR1KQ%dK! z4D48#Y+uA^I*Xc(nr*nj7N)Cr{$66RJ~$lt0{ss4Dv3Ud2D=f;1O$hKa77w?0gCi| zRkUk0ighBMAe=r3MSq86+1?RBrvP%u_ZkqVl!0zwr36BRs&F_-&`uDR>>8tvZYXDH zxLp4vSLWF}q0x>nA~{vYAjbz`?kcuSP1Y!ysihm?$#r!uG?k(Hw2FsTK7%$z3jc_p z5>QQ@9qef%rZ$pN>KvI`U0q!kQV;Isw0>_Sodc{ITLEt!Li#3O zx-6dm9arxf9gd{hTzf+UW%2X@p5t>H7!T31>n1W3n5HO}TcvbNxQCLR4atl>A5I?R zgK+*RVml29>g>3`mscHBB~nv;Z7pN~a=Fg&=gReEB3;u8DZ%N;;;A?6YghtdosXl> zP{}9g4FB_6Hgd{_ zK}N#boeHa3uu-yOKPq|%Xenr{`feoF8wAlb!9@NFq3zPO%C+k;TNZNzuY3 z?2HuaIvho9*gTzo0Dev+4<)P;b1~obKg6*q3|n%E%LUQERT_;AgJFz7o4+U4E-rxR zRqLE9@cpkeobKT!SpxsWfaObYhVy4*yBQHC*RPkc_E`;=AOsNV5t$wnRDS^?jexX% zN)tlCQ$Xw(XNeH(L$d@eVqO$M0NBD}ffT-l;f}B?vN@at!ePF9jnqH&ZyE`C6pFI& zkU5NS24Y%rxkZ7Bg9gqA!310lPqXNTSG636;X#!+o!bn84^84e(*8BAouh02#!SfzS{1bUv?5hXffx=0XG*3OPwqv@{9z zi@9XOp$E#*SdriV{0N;L0*A1OTed(+F<8HZ+&g6s!`5&}vv?0YKAJ}g~Rsl*Opn5b){><~gg2RbKO6^H%Cwr7iREnYXVyu zM4GJP>rITIOe_{KubXPv3v~{`l1A^I4j?@sH)A_kN%}H*wO%+wk zR8c5yt%>763!}M+@}e5;SDOST6IBXSE>N|A?~?co%n3f=s=)e5IKU1&AwqeX;4#Qchov+!RcnBLYzG`iO&bBs^Ucx?V6_{^9b3oDU?|y+3}7njv(PwIC}(H zZ2S>Xt1x$JCcEBFqDwr=Z>5+ogkI;{fhOv6?0U!08l1KSAK`AJ75tkB0VKSVfpUen zAP&cbvyVgQmY_zrK|P>R__iu|Oc{+~SXW?H$dZ&@3std>KMG`5BL$6ja|Eu(<$0mJ zp!R2@>4UrSoMd;#gD&FL!Ydq91M3eCdFUgUG03UtzL1BcJ-(`#E!abvs*Se)7Z>1R z-sKFBrKym@$8L(j$#hnThT1wiT2La=J4v#0waA=_>J1@;#r6olgPOeuI%b@|;J!fF z2}k^oTCU4d$JADxV~4bq$|Wcfp;x%eUl21nnp&7J9vPJ(7y+8kL!=}K0iQ}yX)IW( zn_g8fb2tgJG6!Rph|=M7NewlDMLRP`V>C1{FB`%*Ho#oI>(TKsoR(*W$c}v>fXxZg;wzKPIZ)P?J$)cT*S`Tu|D;R>bGi7tAv=YoeWVM$uX=D`V8Jq9lp8 z^MWY88qB-94QVHYJsgA!KzIe12wNS&mJq{U-@|XCDMiSdF2mK(ppOvZM9#KmP^#ce7+MX zm(uDT0A|8!iuzeFLSs@?1BGx&Y9=RdEzJ%ZilMZXGMb?ZJI13_A5a|&k_(0epHv)a z>I#$ga5*$8ouph|y>X1Bv(rR1ztbG}6)=<}A&hl_B!n|9R#8`IG^LB!tXNP06D7c! z@`W~yL=achOp*o&>c3-c4dh)8%m3V3iT2u|G65XBe$DDHg1b|pnCEn?Ts2b#o`><+ z1K=a)8oOha^Erk^#qUVQH4giOg1jb^-Rp2xKbuCetF17(tf{F1+CToTUJH<eWv4>Lp5Ev!;+rRy*x$oNF$H?SXKx7R^}WShGh64F-;| zs9`}%k4RjvtK-^q6s<>1;5eG4hJ>9_Ur#j>EsvFHR`gH%Dr*Zxd-*a0;bH%`ATr2y zLZDgT6pR_MjjA}UhpL3+pvDEDAly}wZ7(CKQs#(SZ}R~NZ{omGMrQ-ng)`8=6hZhR zEb1?UsB7RErRf?mkLZL(SeL*=UW%F1Oe*l3uygU!IYRbG!4U#F0Byr_#5cb$llVD5 z#6(?!+JmDL_;W+)Tqs>iqQ(%_1w?0uv+vXpgN2>^yYcFv2Su9WY9MD^kXue^psjS5 z_~B`MO}Ta#)hw3f`U4YaU8>IIs7)<^!N;*-(n!*UvgZY3y>o*mmClb=U}1U~+chh| z{@`@&N&!3(bp!(>r>Dw}Zj3;gxtYL11hRV_6Kg3h3BaE1M>=+cC29Qyra- zjdo3vSa+h_0BPyiSayR8g!En*P`yx7R|0`;ir}<~Ci&uNW0b*B-!PA}MyArNR#8)u4t+ng^`01MyMi!7BwWY z7x}Kki4A8X^?ri}HV{avuDT5yK1`rrYr)V!KU%sKB3g(&2>CLC{;HC`l-MN}Iw!cl z9uoK#i(tv$W25CZF9Ab_hQhKDgBW%aI^n70G$4FQ*b?a=KZl#V_yYaATI!9(tgG(? zNn8MH{%=*(KfT@MI318(9R)3T5+@SjYWS`R0#_#O9jLZCs9$P?%_isUd7v2;?&Lu@De8AH5)9 zLxJGyzY7Q%Q35PpQ-i`|FcV+|uE%+3;N#@u)(~95z<=&b*4Z~a6H3=7&^b1{&auJ1 zR0cnGRA^#h3IywCMWF;GZ9*u-JI-R1NL*=fI%*$_5Ru%qf~y+pUkU8l2I$vb=4`O@i^I8Ym#Qceui6%K)|GpcnET* zg8Tx+vz*gDu>I&g0ZUWR1u5*mh?bC4PRy(2gNPG=Sr^WiESe|_L8N%-GAzYew=9Cr zYw4v)xQpt8a2gm*A5PF5g{^NA9Umo3rojFd+p12p`%#IeCvIjFED&n zF@jhZA~Q*6uedjjo*fzDC*e;)8{)nEZ|GPO{J}Sqcn2hi+k!g=-6buTghh5mE3D(T zF+#05STGUU3Tq~`Cw>M84ut51he2nsjz>z|M zuvh<5PP(HGZ7fdaK?^XAeGB|LsHoF~ji7x_cPKuG0TbSXYL}{WIAan<*q4X!K^i?0 zu#m}idvdIBhuGwxsWqCnR~QKtw&3;*b_l2tP$b?&!raO6R=5EZG7Jlv-zD}KPe=q~ z!F6IKe;(!!XT|;pv_PK_!NX&7>9UrVX@$;k@DwN!LJZ${=zJtM)&DzN!RT>k_@7kJ zbQX^#6~Kg1Uu6tEF`Yh)le$Ti0eSQ6MUgE1#u zLg|X5OL9uRb22!$OxLoK8=TQx-=s0Yse3Dmu1pY*=w#Ra8SLv6nxD*0K#)(S*T+(T zz*bnr4BBd<%E{1EG8^jcsl?_I>yKf;b!b>*lIu#jp3TO^BRf~N!l z-xK>JhUzEDj$?D_qxdQpd`+k*nwNulZ%L(7vg|l+qQ5fMn+%9j`beg+nXsS=0BQ=S z7{@cg-EK8kyfE(~RzLaFovX?aFx0@M;9C`4PNmZ$>C`wHH4c`j=!RcRM5Ge2 zsbm~Ss~(}UDKsyU{IR((QM*RQvyTMYInDsD!8`ZT(HM60UR`|yh@=~My-+Dc*cu!*9801^l+hsM#d zL{^)~J{>1J4^Kvybxt_x=tr!zY4nLeyAo+0P?_fBuz476Y>=?@givxry+PDD8y*$^ zFSgzXuBm$eAAg^1z#Ib(h&XY=0THJzoPauU$q`AG5iUg`B|RG96x3;?%g~NSwv2Rj zNx`_WiknniUFA(~dE<1i)yiory+viZn`pa9*Mp%>1wP(x@1P`=+qfY9^LceBZUT?&QSQs&KF+Tx^~Ij?7On(E?K*^ZprwS z3(Q$r<^?M^J@LdQ@`C(o`(?wrp$IAz_+aQi-*oQJi~au7!+U3FPBiS=yn2S_cxlz; zyxjwDY`YP4;`T3!y!wckfj6QfZb!!zDl2@6+Rn(vueFzbmv8ib{n3jh-~8RPP3bam z`@it=>Z;c|JY4^b&D~+O&dus}Z(G->Hwcaz>$1s5>r`32bvpK(s>gpeB$8KjbM!0P zi%+D4YZqnp1iCBFvFZNOPPd@(aRDz&J9AsKy|w#2?eBi@;%kSiCU;l(yo7h=cF+Zj z?6o^w4Q`in9aoaxOTuHfuU^HisCaPcVq3|5_gagJmTcazdGppH>%I4t*cLB+uwn(b zYW2geXI;-O8A)9%EGz`L+`|t)JpMWcBoZm<^#;V&8B(782PJ+(1i}!WX9<4rLE2;@ zEW>+(T+qXD9)WNIYoa-pumbULf&iJ>B(On_!2!Yu9(l%Og2dqwXpZI>!DJ&r4^ITv z!I<2%jW#)K4(yZf$Cv~MPiR^o4%WuuDv#S{aySBRuNd%pY24jp3lf$iD39A45WQ|O z;J_I{8yyrp49D`kfI@m`hkTC18wiMQ(S)LVP-2r{k5g4t}uD+WczpbHw@4jusaB93S|A8ikyPwYXPm*p5oAZQas zQ4mF*XXGh`4o8u%7=e+ijsh`^m`?B`@lb}fOXqI^K<#0Ggl2iv0!_0L$ z9Ktlhh>nf&fS}frw*;HuHJQwUAOJ8M>wz}oNoF)kGU-!`4jMHnFZX&oJ2~1Buz4N0 zrN>O(VQr`{9w-RGyO8e(EhaED?{EhlIs;<}5{3~1C>_fQG+GTj9!n9lCWl}R*sOxh zc^a*i>l9-1)1QEsIbEOO}-^D=k^(;W?H;Z&4<+ke`~y+Jse9oQFzJ3V5io zCJz-UQHyL=ht>2ZMKgaV6!OFZc*^N`m4Yk-(UcBjUCW!)WURrFz2Bv5AV7q%FQMjw z$)qF<%g$2r0=gR=&i;%;W z!Xhk#A4v*uIXi}sbVA*Qc@_d5(5UB0&foTym>Tv!HgT>x7iHm0&Z!- z%WQ_cvyIx!yNM8ll0}Il@kldoV{K@GAa4Vm+jvkW3WMU|ZL?XQB?79!VsyK0cyK&P zH=E00>!NUx)e3|K%8F;AT<#zaqm)+oa8ap9b6p+(DL+d$#xkatGY8s{o3N9fElU@~ z*-1#b-EMR8pFPd!IUV3rXbUN)2|<%UKme5!x^iu0Wo1Pf|yN`O0pYeVxz_&)Z~VdcrgPzGqf36Y?EGQ^m(4UfFm^@=f#thSp1%`|a(~OMF zDaoenWPP%UWiyjA**tcB0h^bXmDQ6J*@Kk2J^e`u$%!N>GAWEYYs00Lm8JbJnyaf7 z|}T5O}9XvvKCbtus9jYqb|+h?C4A>L>2z4ya=&&{54m6|y5?GLX~LsO3&S-EoMk!POy_L-Uc zEHgo*=`^MkgckCF_`y6}y^^>nZA#MD5W9#nLqTzVmh32v~qt67-M8lU_#>TOj=sA`})wDGr(~1i0tSGD~ z#D-=)8ob)tjK&2K*P?iv4;(Py3t&KM^re11UZwtYtS6s9Mj8#6HNmkozCfVV2Y?~! zt+h;P=~R-S&w>MLIJm>prqLMN+IS;x923ccH3uHWdKaJ1U+OQ_JBegA26&Cn=F{uj z0y66>)%$&ZzmJsqN{u| z!dpb>?t0=jmFgXUCUF>_iL|-Z4wL&cVluYDDw5A=+F%X;-?1OGLX0(aLw+!s+zx-K z&tydGtV!<<5JqF;jSQnx$QPs%TuGhMh)RL;zyek7OA=GuCXY}^SWzqJinrD5XV*az zAlzQfM%F`2TtnG#e91~t9kN-?CUZu&;2<2TXy6I!6=I-*l~kgKZJj_kDHCMFN#^?DdnyP@5Hv$D;3 z*}-5?r?Us$2tGH0!x>9UWpIJ)JeJMK05nA&K4z@%$=22B5>>i>Rb77_|4rzd(78}3 zfUi)<^NkP^Lm{;Z{1yL(Le2PK!MQObBR4k`a;QQ)cKGlCGoaInII-Jlx4T?kIu!2q zCWhKod|tvYS+j~}S0=9cx<6Wf*PMkVW9gcyrTVJG+ML2ARa;%n^Bm=WCXNhUKdQ!l zNcx^LW$VAQKDg<*&8cm7Ss&ifeDupFCXcc2eR{{j)Xsr1xeM1l{pz}R8nW{;zzxjV zyiTX;^q2Ol-2H4_9mC|At)aYZlUV6&e7!9vFtKROGlxF=*^@uT*)E>3bpq9JDknPPzyLWpSn)Bv)m~05q*@fBW?7YmSvA&c(w<^V4a(_wgPy)PN#C~`dM=)F$8H( zP;i(aslCG0P_m4#FYb*JM_X%Z3M&nTR)k+$tu+vR3t7I0uditeup-wK;+kwt81o&` zqC8N$xz6J6^`f<1v~kCx`cet!c0(HXifWh5BkDL#w6)tpHeua5o@H2Ew=2DU5$0e| z&;*&GREaGI50Oj5F$`+V&W-gjIu0TyFLF#Ku`wLvNCSjxc5x)l%p$a5Ho|F?Bo8JK z(x>5|u$ZB~xJ}ltJtiJ^An*Ppy!fJ>B6J}>4VZuxW=M|#v$|egZ!+U;58!|cvtNqZ zqvbe|p}8T@_B!mN5D;Ug01mDE@qF!6!84E-I0W0PajauWpQb#ntA1| zC?dS_R*>!NggkMgqa%Wtj`BKGtaK{H3mt?JLaZ>81cNNZO178pC7tcZ6&i(y(eu0= z@1`cm0H5mixqvOkk#g2$j?`UhHWd|w1;J)Accy$AP2q4%YpH-o`Bm%bApvKs98q9 z4u&(Ai#mrFWXlBw4!WoZA~tO^Sk(b{kn?aflRF<F3@seCBB2A$eGJTQRn^l$Y~tbF(7Lf zR9%`@b9F3j;%ULbK|{qelh8jfo$sV+&Jb{`t$=fDb_YC!vC#tO<)MxS9U_ZzI9Ndp zGK2{b&S7pxE$V8yI$OY_w$Z%RpbqFD0;)mn9IgAFK zO2t9Bbzro*xoTw}4N)c6%32h4LORCsrv`?t1^Y|Dn7%uf%o7hgkck6R! zq$`pYinEGjyeBCX%-B(?vvfG5CAW}9Ao=V`;iy;P^?IiUzSirBZ`9f3l#EG61>~hS zClU1+;ye2nh2qn%&XMGhn${BCxCvy;37)9$BZij1bXeb}lgwnpdx&QG?hu*Ze(LP8 zTB5$6jJS{dh82f`knXkHoAeAouB*LX zyS^!;&pmcoZO@e_CHfe49XgBqN2%4TNZ&fknW!^SnVA#RXQDpLwj5F)pZ42tzeW8c z>aKr8J$Ki=_>P)q#oSc9pm6TpGw;ew9UZL3ht~dpD!b;vaJ#_b3#wnBKeiQC>!t{ixy?Yle9%yaO6aiel7Ov zEA;1LTRK}}v&?2()mB;A)02>$Z2^n3(F&}dvt(#xHOHY=^Q<^Yz}GIGwek>-1d(T8 z@xkb)iG-~K!+sJWEWJy>mhV!Dqai^_Jk1aSqXWybL~=~p#S#IO4Xu&|BVch2eN{zm zO%z8+j6;}2+i-uRpmwl$+i(rTZqky+5^14^m{_o;L;=PWVHYphY!E%l3C-S17~~=u ziTT0C*qBFS0s;y!Y0@N&H1#A$CJ9VpXm%2VrABxpoe<^VZ78)Md`N=yF2^JZqskhv zn#^oI7%oQF127H)$zRPg>bZCr?y6=4{KsOv>=F`(EyZ=C$lAGZnh*sEqG1R=sF|8q zPr5?hb6{m4E8$Ko@{cJLB%FNqEQsg=Hpr)r9~~Vh4z-`ib82UWwSRHG-+%FIu|m*=ajdtuH?p_?oJyV8o0zQb?d``B zt=_O+@1+PE4tMe&0VqBKQwPt2GDP#66)bBgoUTv0MZ? zb*H)sYNi7pm&e)U#B*a@u9n)CT33^^v9YcW`wg&ISnx4rm<=aKiAs|xGcPmGWH3*L z{)pY>l`2I%qf{`mH%nxAo)>6=<_Te#U=aV&HXCA}LIgUrPw&&)$|2*~ZTQ&va%Z`k z2zGm2XO5cBdUxq8yHGRoki@PWzTE>(=4e zEAh0hN6C^zRU!_@YPE_aMH1AW$jF2Q=sP`7=>zzj3!Uu&5RVvn?%d_CFMoZm=j=~E zee(_W7eXC3%~nmb<`#A&{=s6IpFKa@QkZ)vk!k4UM@?&JX!w;%4gP_|2D>}k+uPmv zvFCjx7R<(AoWaj2mJhfCa!I{jSGTL%>kc%*gn?s!N}$a< zG_1{1Y{B7(!orfglDxuV%Yp@S=0L%-VhGJmSY<0Lx0c&5>f`1wo4?FvEnl!;=~5gD zRtAHDAh_`nL{HFzPErU$s43JW1U=o|D3l-|I!K~9F2iijFc+JPA9wT;$kb*+JjBED ze7Do%@w}yo6?D+t`h#J=uRrKdr^Hxyx!c`Y&YMiU8w1DPiC%*C#g-clrL1udv=){X zgeX*r@U(}fS=s~niRZmSfkGq#*ijh68Wyw4;@pN~W2N!xo`EDydQVnfdXi=!t0z4# zDQiG8ke;PU>e1w7r4QuwBx&$TAIKW$(Inxtyj6{b zFVxpJIQ6sH(Yi#V!D=YBj5QjI?<-}?ba5PKH-m?Xx-zp_6a#Tz+VX=z(d}V8wCzi` zo2G;L`8*jM2Xh(}pGsxlN2nc*hol$g<@#A4j zbJln)dwSKn-N5zQvMzhh<_%Wcx~kPHmMzWeEl^u^C7Fw|m(E#ct+1_Fx?bLP{!ycsF!nUk}!>$IK(L3d8y&qQX>nL0y?A>DxaaD^Jt z2B{DoNvZ)G#BXb%<;9rX2A*@E%VA}-SGMHV^aoiE+M^e&zYIYlQDSCL%~%~a(2a*P z=;>m!%Wf@qI$^Q))-wTUoJ_gTv{{-3v{;3((Lj%71k9t zZYj5nTYz`(g>!ZA@>weK=G#DDeO!n{R`9^(VuC=1c zmmgrh3{>xPI}>ZFM{eD>Pq%gAR_E;M!jXw1KifL8yP6#tVD@drMNiTYZ5fW^1gF4; zw-F&sS8P~XkTSq$G;N{CwP`zcAeOLX#j=u;^77JBo6YAl7&h$Qy`jDRjW=F-rLl3x zj-y9qAiodxpWpw%`47&A_U~;tANl~>4-UI`@jEc7jpF(5zwh*Q`rOclUU$_M7S^3S zd9tvw65G1EI;{T076H>I6@+=?4VPMs_V6x<)J;t;_rcx!_w3(;uRZ(m)#Oq_HD0~C zs;cr=U14QaRShiE+RdA5Va49EdGnT<+M2rWzdwH-Q_0z$bLY?Zpa#*u{LxKuZy}c8w_5(O(LxXu3$XOHQJRSX7%m$1gc!EI>BQR`1!JIiP%UaFsoH;OG^=q@U z;oC4}WoKu>P-J-j{deDm^mDx9=)3QB$cNu}qphQ@?X@@Fc&($YqXl2DL7VPqX?yLp z7K&Vt-oL-GrLpnF{rg{RX>4gQ!c=207|c4Dh%czFMQgQc9oE^y!l+a0#EcBR9{p*e z8NL49I1xE}XqAf4SoWe)g|V(P7zr^9)_ZMOrBE2hqVN}cdqd$+2rbkThK*;O4A!b> z8o{DIj7`OwOwh#?r2+$|BL&9Av2(RAKhXF6m~vHMgh5~|sNR;v!+tHwMnjR(>oaJEHX(=hW;C?j>Dav4Ns)gc#NEkbG3t(8 zPTuMIW`sDF=iQD5w;LV<-cei2gOk=a)HncYP}}Hf2Xey&Wv=(EIke7x~?R zixuSBBm4I4oV|FTcAs^hn~8Hv?j?9s{=N|1wa5LK5GS>!O76&g5%jacH4;cF7@S{f zx%b|O?yHz_U!k>Z{=N6zUwL1{KZpQB!|I@|nC(7v!s z$#gd)#5!y`#7mlj7vlROiOE3vRgqZZph3U|EqK&$T((YN>3}-0Vw4yoidvu6C#sRY zqq`f29F=trM}>o{N2k`si_wm9-od*n9Tl9Tt{$#o2XO+yfDU*)r|TktvDPN)5Kiop5k z7(s50g~`F&>27y>+XZ(gc&CxqVt6|(7~0*10b`=6Sgk%*xd?#~keN1CE(@@PhKMdk zI$q|y>I@S+@l5nC!ZEHjy` z9{0;Hdo4{(jX|Vrem_QxYNYARo?y?qb-{HQzTP_jI=*e)SumgkmSI}~rEMxOF>K1W zmZpILv)8Qa>|{)=jdSQ4y&xWP_N?I5vkpk%P6(K`-|Hqqxipy!HnR;N7B+*!wju^j z{uq;^$+;y)oC{R|dO?fJ*;H58*ogluc37%{Y!4Y2Xd?SxJGj@?*z^j`27y4(sp>d> z+}+-CyxraA22?<0eOt?0ub`xDhYucX>%gzWZ=suiRf(})@SdiYHp`4$8JK8>CEH}N z6yO(-cjgyd(RwTp)8`jjA&vBp;~;s$UIZCh!Sn6q?d7}&$W~A!uzwzPXQH~Qwqott z?bUTlt1InWtJYSpuYYJm`I6eI?R9G_mR3Kswz{4Ky}S18+VSF!Ee(d%+=|sJxN>xk zB#o-%7A>-s+e&OD#p%j1Q_`o588c-}dV16-WbaEKGc`ReJ~1PcuOM$SLGQ|$3u{_8 zn{yn?Y2vkcRSrj2*R^L_R>D53YVG{C#@X6QUo#r6&QxVA_qAABvmDED6Szk+W&~^L zmW5q$3yob}T`lS9Q*+Yrq_YbTT?l^u>=$v*d`TZWwsK8eFxaw?{+2F1cHwh+z&)T;yZ+vU>nVh#jgqta5;hrp<8QPKVO)0 zY+>uzh4@?UJ~s9ko%Z&gn{S8T*1IpiaWf`u?AWorR~WZuY=Qo!JMCug&E8&p+S~51 z-W@J@yZ6kQn6YoC9kW<&hSS0~-EW621-%7n`kVURV`*cv3eq$;^;y7q(OWbzX}vLT z-wf+D;Q~uRf&Pp|W5JP_FSBAa7tV|w``OJi$9j)x#_H4bS??XYdPb9#bu%0;z{_HZ z3F|H4abI1&d?(Hu%%4ivQD^%;PpNpSp`qf<#4(Z09kXVH!^of#KBi-WJgnf3RMsZ7 zw(mBUPpKdMKowUKhsJD%j+I(Ab|)MUaqOAAy!rZ^o;(C32G-_v zcvyCR9?e?joArd9Kc5Z!d1T*Y)};?HM9*?A@5Z1_kLkOTnPeIr?4R%M&zRqFtT4!h z1xGs5(VzD<#QgZYlw^j@98Phjw0Gp6+m9=6y7Kk;CCC&?F>J&Rejo zAR8EO_Rq9En>TOrwtI~=W}U7{G$m$;zEHa_$hC7^C{b|IAp{*bb%{LO3mCMHmc$(W ztXV&#jJ$R(J~{ou&F+7Gdp*T|(bE!%h#N-mk7Ue{EbxNI5ih6NJj-bO>tDx=kuq~~ ziob{oz|oHsy_w~PxYR|9{-T|i3g`0p5$WS)eJGO*>@9@U4A*dGCPO#$X1;#r%$c=o z*Z%dde+8=mHJ~-%uTD5e#NPhMvk)AvUIj{iFbyyG;B7(JbId#+GzYPT5Nb9T8w?O+ z1i_#(U|Z~Ts#O2St`nh9WMrgH7m5sF3#h=z$p2%P#R8#65h;fu7mbAJ7K=au@duMO zB94BMWk6u6L;ay(GSpR2Q1Sj7L{2N=JQ-t6oJa9hJoR zTzx}^L!HZ1xGJp`ZfkCX+sL>Y>Yrb#W3v1ulH{tT~CqvAL~_7n?7h^ZCnRBrYE9+q$h}~&&6SL3l==Rxy9-H8S0!R3ujpYS| z%@GIBIyg~ushe0<9S}WDYK%j*)#G5TFjWhJu&Qj${YCfRziL&)&FG8YUc49)(ZRw# z<^S@_FY)EoYNt(|I#s9DXr<_w=r+2dC>dVTzyG?=aS00HDeEs#_ zZ@#`7@$NUUG?XWE9Ab+0?BQZ#_r#jHJ!Ts7x*?Z!7%Iyh2ay6Jc3|MW5u!R-hc!}6 z?7@Ro*|AmGT0nwU=q<%FMy86Rv$IP|c5U8VUthmxPu(6YAlkM2@db|9SZDF-+=ATs zx$_O_xtX~X;U?$KNuQ5E0U;Cn0g;_4N0O}`BN|Iel9O|DlS^|;b3?hwiKT34g?2?^ zi8fKQqBPOabM9<^FUjHFc(0k=?byA0x0@Y<*OU3p@4b<;DaH0P%km3<(oAFX-BEJb z>AzfXsNqGkUJmjFmOEn|iHQlAS7CV|5g$UkGw`_W-CN_{`^UF;xVvH9jn)(M8k5Irt&hOsnsygtL1(Q&xN($@LDx4zW1x;E6gw??b+xfc{R)fnx0?(m6< zu*+y}irtpjlvrC;vAa}!xRS8M=HLa+6AZ@wrc|rJL|j&E)$O5ByWQT7b-z!HAZ=r1 z4P&UNvD?nHVR%On9;AUco{RAhBe4^|-7J|Xw8El3z47V1|_ zjN(a;B^bgo!X9Vv>^SnVp5~QUTqnah03T+Nmk%<+Q-~W&)Fx^-K8e3p0e?>t{0SZb zL(c#Wv-?Zoh;SFxml%9f5+7iZBk+6?E?0dFITH9UUF_u=AdJYAR9Qh>pVJ{-uP5JJy7- zlKrD1vE&eo5wPw~nkKUhjw{{D8%4?nbdQNEV;mi7|? ze>YnHM4&g^k8TO}hWGEEKfkxPxcEW5v}As9ac{4Ntgb&%U--ru1>(KE-lv}8xRR0` zI}RT{e?AH?L?rCkQBrdFFtp03^XKo}*}c1=0gi;;2B`MUco~f}d2LA5(NR|iGsZc@ z=|>XXJc^8oLEU2^qFWW&fc}jE#Nxdw)xD~FJ-~K8t+?mzyYIRCo|!vOMo(Z$TmL;~ zLiEXVCHJ19>OE4m`n~sLhnF;B`SOz|V`4CnT#?p{zm()fZe!lis@}-J zO8FsWXvsOvpOb^-^XK0ix)<9}Fp@MN>J9U6kjJne)6jsBtA=w)+KLY6fUa{+X678c z{M`u4oHNHMY}umP^68c>-QQ58DDIn)6QMRy-#SlkIN@@|#GH6<(qCJfz1o?g!pk3n zOXH7?dm0;$ZSn?#UKN(@6KRh3E$>?i&|?*H-3 zk3awTNx{)JadhVsxmtLxA)M&!~O$eW?IYtEUv2$3r&5Yl^{gY23|9=>b!;p;I zeure#B_xo9gajS7$mjc&?Q~$Y12DJ1 zvz(Mj&$F#XY!@b9mMwecIU%)6l2}t0KaTAp%h@j0Ews9t*e>Trsfd+|1PPwWqOLtf zMb+<+BB{ujZ#pdsQc=nCqt~x5B1NrJd4BmuXSGmdENWeUNP2WTom#f>ow90M79P5a zvxu!Xm$$B$j&d6xE0S)KnP1Y5o6^M8){PsFKG`_+@pWBOH(ub_){S;{y<}TIKyqh3 zS#1)gw;p|PtLVsI52xR7+$X<#_3DLXvL&yqY@vH$(`x*`dUa*(?%nnH)Yh)vy_+p& z%lGc5$-U&klh2XoD^G?c=Spl0+>=IY5tn3nsx}Lu&6n$9z`11AiezwR` zUfa4-$S?CqX+^ZuwSG!b*KFE2d%<)`@^n>8vq^PVm}|Z1$!*PVb@(i3Tnj7Y&rGj` z6Ni;N)#24$M~YaEDlG0mfIm&jI5Bg(Xx2)lxj=m`eKWxat&R!r>t(h-LZJ} zntKo3zxdJBt2aJ)@5V#xiymW|KW8Kx3ysxsu$Oi`c3CVTDPg>2fmWwmP^}wpN?uUi z1wu8Nj8>$(ws_Fv77u7TA)z{d51`BMI@S;hJJLVhCXJ>N}9>}YA!{+B%Yvn4<-)fn@0Mjrs}mf7?3l}a|>lpj7+ zw*1xgUHOO5mYa>`Wo&*KDLX?XjFKeX&7()jL|S6= zr{v$1P@d``xZ9`9{_^JB>Mm)HL}nZF1xX?|kuq0cyCm`yxmjj&EVW71qw>k9{F@6c zQvSlOaLvN-QF!xhwg=yt>alMv!z5mv1>g?t#8*9qM6{A>p{#5F?DdDHOzDbSx4xRK zo-!)xP}$Ze9^U%!!z;Hwy!F8ci!dupm!}5n^rE_Z?pct{O|)8#nCngQS7oKu`oL_H z6_MFi6K5J48a*_2=+m)7c>Qf?=+mLo>eEA`M-PoYeR}9p-L$%s^L9M_!nP;oZQHh> zZO6*DUwgZ3<(dPQw~xGZVBU_04lKRro@vuu+bjOZdZHG{t8~W0sba)sydHe;a&vQW z@#W^?%TTo*Eso2;v<2{;_|`Ym1sEAKtZV zO7oP*ryLGG*8cCw!O4&PyZX=7aQ5U*o{Y>yYu2opGG$6jdP~dbX-{7!W47gN8$&KX z?Z4~m)33gI`s=%q=z9nWrAOja!Z;vHb8Jw0M1_0ja{(;@I;+9bkg zDn-ItN?-;LzcRY~eo{r6NwdG%Z;2eA;cqsR#H!(ytjQDpodX=}r^p1HUZULpjM_=EK_Ag13aj1XWqB(qNnTh%=in*XigBq!SU{OSFf>4s z$oL^Bj;VwhBE?u1C$C5WVg*BxQ68oNXp!-r%d!BcI7=v?kRYANLq;;~p@$wykcE!e zB~)B2r9n|VUa8XqQHbdOEph;ew*!4wf$P*aFfgAi2Hw)0JHzF~ zP)_x;O8JrvbB6}+3_eZb#%V^Tk}~C(1ZkPvg0oO{HQbM~jD&vD+LW~PBB2n2INaS* z{OVe`K5XriC^ZsKSrN%Yj_3&e45S=AS@eSpIFd_r*M`HXR+A)P->sZ0gF1~V1O`gE z97;7}IvMdOnM^eA5!E45baFEJWjKmT-5{51rWo-$uz<=RlDY_y1~kQ|4rv~_F>eK7 zzj^9DB$YweGks4*%HOs=kbf8$?s1WGuZ6GOdNR^>8*9m~-$ORvxfSjUhx;Prpb^qP zmGD>ZD5F1GylUgCkp+o!mOX~mr3>VzJxO2v11#47C;*wQ8x9;vBg!P%`Jw`Nk=z{Q z>bT*fMnVcm9H7M^T1Oa2yfnPFmppJpwyWq#{MAf()h8KV1W#;N$q{mOm;4BI{1N3a z6~kquB9Xw2pk-QtkR7>2M)in@fPY{FB<>hZ+ZsQ4;{?eeO%E<2{{@_+0?G`|X355% z04?C}z#?EZBSR|1|9*t|{0j}~S7xIr)bXm3s*YRIw}S(}3|vo>mt{-R@r34iG5Gau zvf@n{&?8=16NB0*PpFaxfCR50Qxmc?df1`*!S~W~!K%hw&dPTmcByI0Ir8v8?%P_E7x1p)g8n_|u?HR$| zn#(`z*#GJQH#6mrJO1TteE!Ggt3Q8#;KoZo{qX~yzd7{iJ@d;~K3`>?q3v2%c=7r# zrX5}U<;z2rtJ*HESM;-2hpykNiJ!Hi)OPRMmFstHtF3l^a-OjKI3{`fH@`*sSD3Ef z`~j=nD_8L^#m0^aC;~5{Tk8;G{up~ z-s`_y`xR3BZ^>6ZJy9_~C4R;Rf4X=n_)B<{FE`<+`GR!eyfiLXsvs=krFF`_oXM*6 zfq|bc{b$srxg&=r4_s38j6OIqO*Q$a{|uy$x-@#=((~Va_~G`b^Fk;z;k)m`Z<{8B zznK1z_Tu>4yKjH>Rmtt~CyV5^y0Nwy$wiy1hG7^sr&80`4Iq&+NF}juc%Y6*yHTA& zQU*SV(PrsnCQ8Sn+Y?p|V`5oTV=IUicbOP>UJ)C&oJ_>XC&;b^9%c~!xq00eU%Zt3 zDVct0-6j1$*Cnq@p1v+Q+51KEldK`n|3(t#>lY1I)P28Qyma8-$@))| zKb?K?(ytdky?!x#@zy2%Z#Vk%*Do0^UD93B>i@L)%Ju$R;TyWUw0i9gZQLdOwM!|N z^eJ)IujrHF^hw$)`YTti-@NkM)oAUNq-#k(>wng1<5INOw3p&ie!YHOtL@kR9H&i6 zijIqpy?$MP{mK=6T&zAWIxa5uN;HfbdhCk59(xZQU01GL)&ClM1OLTdxw7yI4qnmg z&Bd#5p*}XYKq)G6asVxq<3EK-^I+AfoKvSXWKq>Ye{|wNhR%^w-BT50U=3ma6>zW}=$_CIs{%2d3p_ zBIP(IC{`=!W;D28iJqjm@#tF>nS@C?jb!A&@*25Tm(xs6p_6``pp2Fo8bAK3kdgjMqSD5V8oFl~>El~@i-fk|J{b4$C)H%yN&iWTc%`cS2M(Y#h%>)}dXnz<$5K?+@QQsg!tc+)MLDFo3Ovq_wrS33E+Ps3 zJSx$@QifKr;f~GCm#MUz9IPt`zFbc8Yz37`rsL$XM4L~@Lm2#@2XyR#xup<$_l#}!Nh>s!qfT2~*IrHW2jiWWni!$WweTo<4HRtpv zn+V$hle!!Z2P7bPY%9Pkqp(N3ogklqsXk1-fJtz>pLjfR9#6A))&usfAO%Zva;lJ( zdn$gLuSMpNs+^bc*s3ZZ_aIYIX;o0U3S+|4*YJNIguHcgBo-7ZTGjl+)Nv z*Pz)N@+EGb$zyU%W})lDp)KaXKwEX&EHV zi8VL-bCTskE=;S+p+;iT1e}xN?ijKu1}F=1Lfr_66STh~Hlev-qyh{M5(Vg@DhGEv z38Ywgjz;A$fx-qOQy#22x$+~(b27*e`6LECO$ubmM$u2nC-6Cn%Q13&v?#`kSc%4X zTDb7Y!Xw|x*$}_Y+v!tB^@%f|ycnhS?aUMVhRr>5ikf?i661^J#8(y-%}E5Ke2l9w%4ol7bwClnm@X{By%d=gf!%N`rurlOusN zC8>&35|%Ve&HV}%T&1}L!{8382}~UstrFv(k)ga46J#*Lhky!7J*HH=LXq1tk_2|; zQ0Ir~qMZCM7?Q)(XBrgs{}?dCa3eJ$MS*VD*zHsmu~$jb8b#)4-VPZ?iaXe>Ni#_b zvNVC5REVmBH>DBKT@N;^q&xT?lISXbtf(YXc*IcD;K75<2c?K+a?Spq<)cM%hpZwm zOXOimI!j)vlH$$Y8@K-hodfJm+6tmupTMYZJxF$jn@LD&em|-r&3%vzO0cF%2d!ye zk5Jvli3cUAMIu$x;}|LCUkh>3%WZ&9$z(!oJ#pqD6q#nXlo?+m&IBc-1Rxjm3b?ku0e6JAgf z^kC^2cNli{QPA5iUY|8hB`MOPHTR9E8RD%`JU!eXeWPJ{B!XW z{C#Ch`=sam%l`gcp%^a}EiGGm{&DHY!ZN4S+&r@H@%hr<_GC0ulATo9!FDC&X#|M@ z*kcWKKjo?NufZNL#G#Kz6XdqsOiYq}D2mu1Ig+98#%%ftmrzkum=>e8C_afnqNz3Z z9BByI$0hXYAa13&Fj5>*CGBs%QzcdAR1H;T=SVq2gH<3;sWPM}$f;_|E*)iim<;Ch zZ-jEw1OihLu35@%rkWTM7-}L?bGE-qy3yR^XYQi?DkVpnMM@G{6&|Vo=M3)@2K1M_!G{@@%2RAdks_)P5`fmNX zOB;hf{qQgA58q$9aA8)@ziM`!cf9xB#d}Yo(^3}I*Dp*-S@eMIFAK;0V*B^Fs$cZS zLZSL9{i0KA{)GGN=rtkD2)Ve*@6W5kuP4eFAUb+HM1=6w3a2lNN;9%ieU ztO9qHn<@CZ>g$@6%ms}#jVTLGuQUC%+#6bOs@pNeJ8IA;eZBVERj;|8xHI>GPC8$OQ{^Ko)N(_)rK=1rrBM z=!jvUdZY!1qBd;nz}f?_b!gR?2{0{CV~5WiL!b&Oeus_)ve7Wcm?~A4zaiC8Q)FRJ z(M#ydy+qWL!c}^B-!B5LRC)LJ6^p*F`-ar5c&(mHuFpJ7?3#`t@}H5E zNHGcj2_lqj!GReayKWD21U$WKsBk&QLLRwU4mS5R`<=MV};y}tk` zn4(ZpG;{>yAbC#4{7ssM&r!*8f#P@IFW3;uNX#&js*G}E8OD_wIjlaw>Hq-1T{5gK zsETYrpAic1@-kd>DFMhlrPw0Zocuv{@+pk6ZcRQUlt+G=GF?7VMW)KwQLtt}mW`W6 zRA>-lC)5_XOn^g;ev?E!DT@cnyX11qni8I*m(j~`^#*`?MLsP{75FDoQA^2__+9|L z%YqCUi&)bCdMeytk!$7YHu`t%eugZ3K>*YkWVA+7H{5R=MU4h7zYJ7_=R}Mh26DWM zXeJTmf?+huF(eB3hh;KcB1iz@7CLzZUXF*o|@3R2#26#Nh4nln)mpTd~ z{F)qMLgoP`Z5Y5E1qW6j2o5v7ico;i#3f%1i-Z}3{48IE-d4cAHdSs%+zl-@R=I>w z_sgeJtlWu8v^wY-0Dha~oiaH?q-+D2hz!>Sa*{>n7m0cp8t^Y4p8_gwGxhSRmrud! zu|OUSxaTk^pi73+FZl9hN;#1vtXV@;fS(+GVr=eLIcqXV+RILy|F~V?D zV`QcLrHVRU@xUOidlD%BPkuLe3+Bzf!CSwZH*dkbIoQ{ScUc5>_w_;KSu7`4)@}fU zdHkW5z9VrniEOONj@=@&hnOl7nW2h&T@^EdP`!${dQ}A6;&^hTRYo=#5xrlowo(y+ zxd*`Q6j14KY{hUNCPgSJBLPxFI+fJjGWUVzhjB$POsyDo;6rGH++o8Jph|y+@FfpM z40((TrG9w-c==I^`-pO}3_ni6N``*{E1QX&6Mzz+8f5MQqN3Il>Rov>$Oxi<5krGy z5@|IapxQ=}1u*}D6Ab4BVC3@3*D7CDfKAAu%qTo{MMe&bSVtmYNrt^Rp2T6SDPT{@ zBo!3M5V+Ybgyf+Q>*D8#5z$M@hy|$9Sh+fz zlW!COemQEo7=6NBU+>}vI`{0>z35HsuY0ZFm!8YP9-U*$0>Y!ty;Se0QT6h?M(!an z%cG5Cg$+Dpn8R`k@J4=^#l0)fkV@!QV}Or|@?zYf+rZi&{h-xfR*T^1&Nbr&=@`#zF_)b2o980M#%8DSE9kwx#V!9kC+)Mlc@wDD(|^-?#~tXhh!*_c!8KfaI*4N=z7rO#tjB6sRSKKs%Eso#9X*1@b~r z)CV1#NeuyRq7tnFL$;PE0beyvo*t=TK+6%-8UiLD4-K@2j!^JK!Hm9GuFGmbFFyXj zq&V3buLHqi&_l7XMcY7f@acT$h0ihy4I*@*PnW$aX$Z z4MYxkBFCf-N=AF4+2csmQbG;)7*u@_sWP4!P2!z6G)!?gU$yu#+K~WAvv$SxEwO&|_&SQ1pai2@-PY4eFpCUeQ+v@{%kNFH_Io9HFb#59P#XUN>NG$PED zyGXHw*kHDDtnF62skLdi+1j;~s0O~LDxD~1DXGWFTrq8}ut+Wp)g=#KMXg+H_E(Df zbsSO6CG%kn_!U%qSQe(h&_Gj+<5%$iZ3L?2;xtMiX@8(l3(!B*>P(PfziI%D99EGB zsQX`~UN{0y`QhV}Wp77>mW);+wFk&5>UZCU0$z^?slQMU{SD7hGylWu5zqfduBq0b z4TONDQ1@}7Zk2Y+=L2K<)8tGrpaeD2xDUI$7C`1e!$$u<_TB`(%If(4pYtqt$-T*Q zFJTwR!oDXg0t%8KARxPdsE7mz5Df%E5K)jt6i}hK7E}~)`MRRC+G5>6#kvb$wZ*ky z)w-aCS|b+p{@!y!SQKj)`~UrauUGF2a-aKb=bSln=FEI%&K!22Vf34F#YclaFvwGq z5j2)ef2LlpO=im~^&%Fm<07eJgC(L-Q~_c?cu3j@s0L}DD3IyK`$+zc$am`^I$lQt zXQRB#B8vzW(_H0-Z15x(31bHsqu^xYT7K+1)0hR4@%g*sB-tP$e~tEQbl|}^=ML?c zIB8M$%Qwl&#ec2nevR4Ea%)DS@f|YGjC|EB95zCoQ;AP~=yunBon7SxNxc3HYVf!{ zvS0+e(S{ZvC=N)$0}Dud2aPWb$%uPzmVzCqNav$94wnLBwskE|lP0lwITzdGb&M3ynOuxuKU8UPX={8WOZH_0cR6iZqRvntn?$y(HMlkU-vZ zgV|qmx{N`Bi?eCd^fx=nYbdB27G18 zjObsId(tx6bZ_+6_y2N2cHW5GCeQBvoa+QQH>=$6{NG;Q)}f;!!Z!pEf$#0+Hlr#s z{Tuk~Ou;S#92W#vT5fRfkf&aMj>)U=qNdl&-iDX%-tmsC&qGaacGe$?i<`Dz{z1L3 zTDH9Ct(-T88R^=4|HZO-Pm===?#_9u`Ree==yQ>tvZvL7^G9s{@WEBxFYLZ=)8qXA5d{8J205F7Z#ZA#ak-OmBy_4sF&$(zHDJe z8s>(At$WUr$>!{@!>Nw#oCTvs?LK$>Do@#I ztM6@7F{6G>J@o!=PAnAA%D>CQtR3)s~x#x$(vllvdaM<+r3^mv#&4 zzjbP24?YBBo)_`!NcIa$Hp@gag1JrxBO}GUmcxLQGc+-Cfye`+a#b?*eHdCh(z_ThtwY? z_X?Yl1)Oyg7&J+zbz%<_A-a=1xM0hcOV-~d1w{)cY!F<6YkMtNx6VAZ-Ys}=!Pu%(Y;3Y(Q0jbaQ%k$Bi9vOvX-=N>tP&qjrAV+K;DBB zJ7yO>wQ$3dYutH74?ehl!`aX``7N3Yqsb-;ip2Fw^cVCmA{V|$O%F5!n^|i~ztPns8zyfr*mhM>_SyvFJh5~8nzh;6Z=Ycd@fcJXE;xjfXZC>c9T|-*{-%s*ejd zZd@g+euIo3$AwCNy42hImUeB>MFr;uDg|M z*kVkZ!?I*=j?CEF?Tn(5VP|}UZJ6A)ZryX+pSykgbK7@rTeo$~tFP|dxoP^&9XofD zDRbveGLpV_x9YYNo_&@gUZZ}m4bFQ}x}Jr@<0*BONHfp9R0Y1=pgXN0_VyC4EJdq3 zKeuL0o~)Vzyz*jR-nLbFt6oHH*gmF%Jy^cUj1)RC^*L-3C}V8JK5aMegy&LlaK3YByL1gPEGAqb^i09C7C9 zJ}4nGw%UDxzV5tb&t*mHBhGRAaVm`QabC!j>3oWEDv1V8Z529C1r2cx8H6)uzy9f^S+8_?_F_|cV5Al@t3b`*38>mbl%G^ z``@}|Ox@{s-}&yh?g4N5&I9kwlP*kdQ7Dm6W1(DaWSJXLLyR5(GZ`8Mu<^F2-iA#P z#@~fnme}XY!X0~d?D%lUo_#?)zp_Jz%G%?QKtPj;I_FjZD13flKj8bw9yS})B;aP< zx;pFD)%$b3HA|F!1IqI{O`Ig%CrxBiKRwZTPgL5;*ser~ov>Dul|O5@WQ)~t9F2ip}d;wUWcxmrjpS0`>z zuR;jD3xnpeuH&RXoVILO-#ldg1?RZe)F_~{p24i5s8iG$hgNcr1~D{>o-DjS(nI51 zy1V1`idRQQ?Av$q+XU*%M+TLWefkgsI=S3nH!iv6%5?`o!Vm02uH|D2%SA(`R+Hqzbl#a4jgd4{TA)yIAuOmcj}exq`rx-{M)yl7fxHh@9X0T zwC9jEbo};`khByz)xoxb>@z19~Fp;@t5K5bO^F;&Yq;jka382(J`FliEL$ZuYI^V+T_ z^*)J}=p{4fbnDdVl`%dHC!I6p>h!+MIP2_w4C7gi^TN1xjx6&1jval!xWtiyj-5Mp zMyy%)>BNrh&z$z!(-@m~F1>SUTn3JNar3i|ENtJtW5+ICy0j-|ejhRO7<}#?9et^q zw?6;k&!4}Q{iAQb?B-?R@Url-+D{228*>-ZL zTOc)lp`JJ2c;FUn?Y=lTqET}T*rG|Tj`qiB@njAOYbMA9H{TS;ieoX?_uc$(=hQ2& zk6AgvOn7d>1habo>tpuUz2>QFimth4O=?Y-HERsEU(Boy^Of>r(Nv5GJ-_o6S1e!t z>Tf)mt-WT<3;LC%NcB-pRy;Q`jWZ0VS87%-UU(hb2P!MZuS$&0 zx~lHNR93$pm0A0;k~JfRIXy;aZ%$M`wz#rlhk2}Jxw-4S%2ky)J6m>Lmi%kw z{gsum{goRlpRF9Xt8(SKmAyIM9h*_Na!=U1ZC%&Of>ij4!q^{kjx%rXsN5aiz3Z{( zGAnm)%6amFaBN4Sa`A4nFjySx6^m`^wQKS6*zTN5dhTDGiY0f&#_il0BtL&UxGcG) z@y`9R*n_XDA2?OKdFAG8%&47`y_N)y3l?n7UYkv(#?9H=whd)=U7OuE7K;s@5ex6S zXI|x=8A~gZdvX%V?8jm`MN9XuO$1v$kFAKsDr1#1E7$F*tPBRP7@Si%^2))xV{c_v zZvH%0IrxjpPxs}_sQi5K3oF)LmYMT;qU*xOC+A%7U}e|J!ivhhd6g?#w~3uonK?Kw zQkmSjAmV*q8D6}NTv2FRU2OAr&{3x@saz@dN%!N58XGSV3von|Oz3M8nu;jhX<96n} zn7MiBw)HtVb36~xxpZ%2dH(vH-ohuxJ;^lr=9Bri<&Iy!_O|KCwO8ctysgKa$ZeH9 zcFy@_N7y{>`L6SU!K~$)br+Vn|^1@?Q&Jl7psQuN)#qe+)^+u zm6x5|yt9XwQ~B4OYZos3Q+A^CwVchLf0Oh6xa~!;Jq4Tc-hO&fK`if<`8VB?*qlA) z>vOhWHfPhW9zAy!CbH(`?ASMAPjb<&9otJD7#^v)YkSuAUAw;CR(JSA$hckW)Z zcTcR{p7mJKD+}jNPuw!M>z2ga!d=On`Q68?FqKPVyEe}|?zWv>hA-NlQ@LfS`;N&> zPVZ5$BbEs7TDYa_Zg+n{Y+Qb7o!R`>{xy=5+_JD` zPGP;Gg+*IS%*W5=;1M3TC+FeqTQ=r=SyZ_0s;?I=G{bThnq4Co?i!XqBe}&~v48&; zU*&yz(NP}UvE;cZxtvccK6l*FYV6np16z$f(2CIJj}D+1B_A-7z2{L5SUR{T_UH*6 z-U@yEm#g21d~DjhEJRt^kKEC1=tFK!{)M}ni@IpdLt#$Nd0b36RW0R=vLuTx@}QHT)brX%9y2?VC`l0P4PhDhQ2+P}Hxj7trB&=>1i{YAQ!{Mg-YTk+e z&YP8tc2z~fv{1yxG>!zFr6EUPH(a=%=LGNh+4|#ve5U$x zP}@lzsJ?ix5=Vb|LC_#AeMX~nd@F1Q7MiCN_dG4XswIkn?P{WP-)C+U!=88wNTX?b zB2$}z*K?sMdpl}48gFidSBazMQtEQDIfpTjAH8;}GePkh+JT3lN_oL@=fL@k@3a3{ zEwzA5_poQpe_l0M=2pGxrhoWV{;z%9m9o`9SS3>Ry0=|&PYr*62p?*!emKCEr$T3h zR(!XqI%jW|cNIoEIXF{V2HpAZ$X&rcsRN(X;n+(r1oOo%5gh#dc7ukvBRL;*k{rHM zi-KkKobWp)_%`H9_YfV++5W*~RssIYZ#+2M8pu0|pfc1#`jWZ@U7HVIMu$xuxa0g1 zdrDH7I&5%;u<7N@in6Igr_7mIGNGt+XnEQ6;_`};;+Z&OWaucO!YT`eVN`Ivo6q<>oZ{IBd)z0NHo>O?Qg~{ z==su%15YBr5%Zr>n<=5^T03LY7+W5{)sKdAsGYQ5(6crj+>ZZk`Olq{Im-D`UwVzH zWpL^gzVzaYJr)>ui;cQ`TH;pBJmG&TX}_^G&BAPtdXE#VFYZ9&3^f58QwQhaz=Ta3 z0lC!&frJ0E#ksT#<{wp}kT%YlN7no>DSmGnW=bn|WoKim!_^PoseSmCLq|O@!T2bf zVA06rnN_TFSi1HpEt*+TGNGhmj(0H$8~>A^Mk=rWlLh=g{O);&`w5U(imUs{)!`iB zf8X+w2^A$})4X~AVH!5d>i8cn;Xm3~P)v-&zsyAcq5A*-=Cw20 z<3^T5R+^Cp!D-e@s&!-Wq+wwKijppB@R45l8~BCYg+zhCzKvEy=j9TxBPckyE>Vmf z)Yd|u@d>oa)x8~q3#ARAif!WsV(zn;t$mI2iuRKW5K9yuPZPR=|FD^cAGmq8G!nWH z^YAU`r-m7^ML1p-Y&Gv@ys+x!m%aq<*kCVw^LPWSM_h0-_BR02s7*kwYLD;;F`QH! z8w1~tj2EJQ^jb)tF@x15h?9s&G?%{_y1*k+M+~k);J&$`Ug(L$(GlXK!IrRB4TBy> zMNrTTFEa$-+@Mwpp>B8^{6Zlh2-pv66jRBagX>o$+s@VKf#{St52!qapQ#~~YBnTn zOHjHHp6=%<>Ey(L<0<8ygY?px)TFqKEAYs)9O7135_?3QQhXweTzgKEUyv z#YCEFxD!!M&h6?Hpi>0D7Txrc8j;$eapR$bUt;JuEHD=%i8c{RMAT0=?N%js3w`Ne z_KJ-bi+7n4lHXB}K7t$>8i~jD$5GC0A|@TkKKO&2pZ0UTX;<167)?08y31_O^L@xz zwfH!dIx#jU#2x8`WyED_*qp5WD8IuPw-(xdAlNK@g&Xd5(7Fy0!QfW)C`E>Bce;zj zhi`suW0W`|Lh2jiUN^1-dl?6etkbYRhC1AweStt&!6grVRuhX%jeAmGKd|T_{;0)2o(YE?72VIMBD9R_q)|M0HbxI_B?_KR{ zc$&)yzn0=N0_ZvHWo~Gv+tCv~$H0QWbv*U4{FpC(ZQb3RPBn33dP)SR)ifQVgv03o zpzYK3e%6Y?9HFM#73K`B+I;hxn!msGZ7_*r{$iY68V}?VQOK}i98=s0j(q75jH$J1 zsDFt=p;1HubKvyVRz)y?;_RKBufD(tLDj)v@gsFL;44yJZ;Ol;^PaByXFT~Q+J#<@ zn)|*vMJo^&n4W5$XR!66&aEm5xD(GD7iW3b>Q}@WVuQm!wqxT7VaVj+i3Rt*I*o=M%9ybQ&*omum1jq-8mr)*oth)b4T+1T3={WVr{10=A)C7sj*O zXg3RbGqM`k(N&9M2Pcz0Zyr_o2T9mNH=xsD8J=rHKoh*_luIxMk&ELv__f?dp}|~p zr@l9|jo?uupJ>bnHmmN+8z+n%L?$iBA&d(1JdxuwP7zKpNlo7X87#sJdwtxaqLOEx$hSyofX7zIt`AhU_}@pMFE23RF#NS z&LHwJy*Xf@QN}JkCbt0PMG3{?OdW}zuhGC>Grc4;#LKbwSdZk`&=nF~B%`z3QW>o+ zNOhD)m17!7tB5{SCkooD%P@yN&sFPfm&R~N&OhzVK++U>w4QlNhSqVH;DIIGoM z>(0H~eOj`O8DPK)%}aKSex&r4+ll%y4k4cSC98zOdLtO#wqoXVF--^@vVy0p%5bQq zT|+ONprn$fcK9*_5zUQ+V09?rt_Z5igcIlu8q_~sWed=n>3wh#Lbhnx1GaTtG-n)_NMZ?+B%lGaN>+t?l*fb#2`5@y$IM%GtJT=O0 z4(U|KAcDTM@Zpe?6HyhXruy+!6CnbTV?xSC%WOi}DW{3^IV<7pxq%kptmRKas7V3i z*&hMQ7}nMyL~Y;Kl}C&`ZM2kXc?fd_BP89=l~7ADbl_6lhyoC)XK4MEc23_Vk|UW4 z0Hdqm?VhULLHALEn(`~h5XSeh1jkEFgi{zfj&{*oyM>{NqNOM*eQS&4J(8`*>fi5c zSqWOS(D34H-+9;M`95M1=1b7Y35p;_G|FFOd696@&yhTu_8FMEGQCbgC|EZ)lyg)^ z%GTusrodvu%?+|s)hLAG&m?B&Tk_;NEyP(^$1D`-K$<|iv%6*3r1J|vbYAX|9L5<+ zV1UE0Fk3CRo{ewTwiC$4CO5Iavk%oaT!28m5?zr){$irMdz2h7h^6JSvkVPrL& zc?Q+XJSgT@&5IXs_aUR!TRqmvuI3j_!8!$dJ zW4TR(Q5Ub-K&JyN!rTP7?^f}tx!UL)^eX{o<)-$gtMNb#M@bs2 zdm-ieGj*U0mUo31y%3SGrml(;W$`pi!o`lf#tB#-;BZ`SJ! zsI1c7JA}BaWwGBRbZY=p8k2@Gm0^W3Gce|Kh{=^P$U+y_rE_BiQtfFMkXbW9*K_;1C(w)(YXn=gqbB6Ch@d{5}RR& zoTCUvqSMTgCv_abU#cN>K=RpKw_}i|Rb~jnxGfPff!rKOzl34`@TR)D3awu2zTfIV&o)GM zz(CGawPj?e+6YAMsz4c_{iCAZYR=Bp;u6=7tfA&8H6`MGqrD8>umhw?LLSc~2Hbrl zF!wXkU#Q7CJ@cH+{V-eA9%q>CWh%t*huNBwpN3f^sp5kMoSB5xv0>CCgJhTMU)d<~ zo@G}o8Gf?VBqyQk=Q#eR2J5E6C+V!j)KU7>Qy^cQb5fu^#=dBUj935RtS*XjloS;cv*JoY+U&O&&(;Rt) z?lyuXfrPhMd*?obQ6yCE5c@r*tvAPO*9V84%H=ZiEIFVPeLH3fJ_@wnYDA`0gFo?R zoTYP*0)P5Xn?9?8q3~Y>NTu&j_-WrBnRHC5ZvH+F{qw_JhMjl}chkV)Nk>BCm#G7t zk)4DS=<)AXyFu2x?1YoG2(9*eS3~hG8OeFBay_dM#((d6^}9|C+I0SP)*QD^^@$_C zE5F}@RH_i6^Szp+ew+2;^GPSG;Fwi8u46nS+40Bgk_u(5K4wKy$H4S$J)it;yXFS3 zk5R+th*ogefU`%R`R9IpYXSHl?Tr_+6Gy){|F}-{LZ=^Zc~vjmc+AEhvln_;q}~qx z7Jr|Us(|_*t^0pD={rpGpW&pV`9pubk@eE%?=WWr7}zY?!yr3JRErAhkQLT@hNwOeHgyP&h&Oaj6{3jHq**5x z3hE)xIjjng3A23N4bUU#_49*UNI=+*|M^lkIO7Lz#R^i_1h!0*?|CNBP0@%^DAA5k z1JYd={k+h6CIIhHSuk2q7OOoIsLA{UgI9$LLxjH|9fS2YRbtK&|3Xc&pq>lTQn=^X zJFv9S&rsBC8O}nrE5XB@D$hkr`y%VPFwG3F#)>(H=Yp!-tC}c?!$0o1aNlr9=)iIb zToxM0vq&|6=NDS(Dx^W(7A^+YNjmk#-uJ-ORPk;t>2}?|hrQ9tT7Bh~Na&BK?N~y& z2MulBV#e79Y*DB|{>R#2mOTCtwK_2LDAMghypx51@@(0VEyJQc?JRp$<3ZNvjf{U^Lq% z78^Cd_Wno+e=<$9erkcV)7OoRUa$S-Un>5!ilA^RT;;Uz$+g-UND1HwB@|2`ct_5U zuhu*MpdJf_;JQnmC#*XTS34}aYwp&LA?X`-R*-dG`B~65aSc%hO#lJ8)|KI5#s0v< z`h?Mtd0|L8sV?i}D2+fBYJ};mVfs)3F9;)tpgGqq_mQi_2hZksjK~VL>9`6Wq)?7k z<<&!dDPtBm%zJ$DK*y;$px6qHD0=3d9?0>t8CN zUY6yn3j#%Q2iW?Dv&DNtJlF!XwyQp=XxQoqRmXgGSPKpNUnF77NZyEzhqaQU4m~wk z&ayTR;5e0FC_sc0bw!6dL%<>O)CvIs4>z&q2>lCB*i~1~HOj==42=G})%9i`SDRCZ z8a5=X$=mQLa03t*L%6N274{bqU}@skv@lSv2wcG%=n@&YETxfkqHw;@_RnMqGqz~6Cy_IC&u|jY za7>Y6&em#1KF}XdIOm`<%Z)>eizM1gWUc0}0OaHP%aW$ZX4p+hG)G&Z;8893iM+%{ zX1o4QBU@Y##|;C_A{ZPXplTp8Lut71noINy4S00}o0qPTJ6>a@wI zVL`?Mlh)HFvxAKxVJiupsFg7B`3LtD4+_-e=q{WzxAGm1Y!ms! zA+A*YhRJ~C>IZ!@=cKLoXcZ<+Ial0-|6YwG5wh^eu^crt6?qTV!YKNlm*$-G6&Aw0 zN8K}|$wB;JqDy@{Y?@2#bMR>gEE|)csYyn1<2j5wB2&P!(r{r%U-BmMIWLn0e3`-Ub|Ps)e26Tw&Z| zk!;`xr7+d!tomcjh3Qpv@?=Q{RZ>u5Hn6W=ui>5!RGKcoNGIAh!z?o3DF8x-bjH*O zs1s`CXip6wP4h6m2g~4tew91|$73wrbdW51^B9Fpz4H>hSguMi4@jj^*~}pPnL&;U z6B?5k0t+vV6|Oig7*cva^92VsC6r=1{lp+{2P#aWGAM4x9Pa)Z;`C9jb-K8URgX~L zm<#AiCE@sU6@3NML!$YJx#eO$QLL|qPPn*BTI(orZWJNH)jDP~9i(V4DlX1Q3-dt7 zK{j;#%+PfT!~+CJ9~NhXVr6Eh7Q?`*a$KjJprJYFO*vU^FwQd$Kn(nKA~YI!(5Dh| zF4j~_)jpNexKuBA+0WrS2@{`c9;*%3FK33B0dk2Vlf=VBr%3QTJb#XrP7uFP z9NKKbO{NZN8$yN?JZvNA^Lyhz;X!oZ4syK_Hp`*@EsP&jx?1=Oc}Oc7CU)A!{W{Xx z^l)f6C+j&|9Jz_)sUF2mScsx|W7f)=6)SgvDS ziQn`%f3;iR*#a{*a4t9)avyH*DUJSuK8>L+=6*%_dD-0Hc%#`OBzQrNKMK5mEC^!9 z(+Ar179uH?ngQCGnGv9dnvH?EGB7_2(_GY`5@f6T45$(N}+P0 z=GN(kl5k2g!fZ@mx3>L0zGlK{*j##v+nsJ?jEh-rr`Lzbqo^Ir@FD1dncko=fEv=& z`)WEldIGMWXZ3{|^4-ulk6K3fUt?g_HejkrqyY{>oqlN86-k_Ycm|}e#mEr? z6u>0MUuGsOAD)7h^7VzTU3luF$DC}C&%nV(W z=YhXE3|Q5qXe$(64E*lOdM!wWCBhHgY8CQYXL)sxaEwZi+Jzd*T+i&^MI1X&qco0@ zkNTEa{sDbqI@t<-6sgp zDvl!wkdhwpeU^ju- zdCr{Tm{zrrZ&ljT?zK|mT zi2s7t-$5OI^yk?YjW!3-gde?KZ}@faNYi88_~bFb-y_f?^kaE{41f5fP#x8nq4UZn zoL4*%X8R5Rd#nQfjdO{lab*GJ@nN|Rywr=a{ryz|gNiDO%S(z%Yy77x^l!A~#~&S9 z2Qf9<7?*TEh#>}1MDgf4Szc?q?rQrG*EQ}(NYj?)@Pf8woOR8Xun!E9=^BYzXKilK zo_$1@iaVWYQT5&FIKI*U049>oFqII93SBLjZD({mSIozVClnorOo0{Re$H%Q#N;A| zNuY)OSzCNk7BD?wY!Cz2K~WPFPO8~0`hkSeb?P*`Bu{L$yKV zPwV=^)M}LioldaMQNTFg5TyY%5zR|akD@tK#b6m%nL*>ML`N`>mzo4XstmW{4B=~9 z$pQkeJjZxmaUx=~b*Qs_j%uiwQ>IMip7(ogS}Hx^T#-z;Y)aG8q!e69rJj$}sHGO_ zp@y9qybjfBLF05LZx!^lFmv>VEE$s?CE4n5tvAzz!YJTY7RhOhPnRB0V|YV)(zDy% zgwdFIte^Rdq>rmkHkE7o(b~W~Zxkqa!eo45m>TI%CRHeDKGYe~X`?;Pyb`j;MUK~7 zUnCJ$PTHzABLX*8PTYgzH-I0+vmW8Kq@#_bS`s4wW!w<1vY2L7!04F)?%XZQb<1ZK`H~_LsFKv`%J_ z8(?X22xD9y`^J?D&w1IEF5dU3H#+p=)T`Fvhsz7cN2crGka_yIYK>>gIL~QFt^{oi z$IG<~LncQ{cd@G+hdtihU$jdoX&-AxF2*WMO~RLmgGSRtc>=2o)B;jtAZzcU6`YnK zHqu8a*-{c7W`9+*U$;gldM-AmTW-lW+zvWu20i#|QG{G`Z63vkt8{F_t7~ALDTUB| zV`?q3q1zjRG|wP#_01)k@+9+HJo zV&iW!f>|^bhkWc-eZdOpX`Bwmtw^FLn%1tHsqCP9bh;sh5O)lhnYOW4NH7D%pjgDN zA9iGfF6fielTd$xt5FZg8u_zuEpMsys8@QbcmAm{0i@2Kt<8i`nQwB82l#wnlaQ@_ zNKo^!GXN?>ST>#lVV47!fZl)(`j9{R2c?)dO*d8uVTHr`C};3DS}}FBj3yn${8_bP ztqyf>rC`@l`uz12QYkE*OgEwQr{dMD5R6KMEFWC?p zbqbKulAS0hC_ql}OeBkGr%qPhK`Grod#DWkNII~2w=3Q9B-@579DMPzA>_c3JHs_H z^U%MZ3AYalqesc<2rv}#saif0UtWVUlX(|exob_N#fQXgA{!%;FeWQ+H#u)xVB;@Z zr?TLej%JEGsy$~lNQ_UX)g95mK~j)=ZB1+&9GEAG1j;IEcw2pyS0@36 ztm9+4hMI8Xo4(=z0*{(3x+ZgouWhm zLroN{k+eD%#_p*D9u(dIDw$x9vz0FCk%9W9&J_9#<2<|?SeVo^HWTeq)G($ zX!S@A##!Tdp`55gIX%}wXLoWHQ;^2SoMpm0l}kr&FUEsvapVL^6rMn6?dQzRUwJc~ z;tuh`c8!d!;sp*Y`yBeCgV-b+AxZ-Vac04uyalL}_M;kQ20FlTYhC+$o9ee7{|6UM zEygAt!t%w6i1gVLWpa}dv&I+aLrm#2ZF0%9VzM!mmDiOqr<9hBFPy%4QdrKPG=h|CQ5K-5pqbesSpwvL^n3NL%lr z(~FBLrWBX=E}L5XOD9odCmT3SEi0>-lHIEmT|IkH*~H?~+C(SDTMS5ivoK{ghy-tj^5!Xq1 zdg;l<(`Zg#S30}F{pn8dmRuLPQ~a0Y0fd|MDw=R!$+XE|c@s~cQc_Vo{<@6*y^3ZQ zzY`A@IkxRz$)JHHlc!8d;%&{6c4k=L(z3FNAEm>66HhKJn>8_gycA616<<5ajD{IQ z%cm7hMAz&&WMJ=R>6#(+5TpFi!Cdj$Khd|Oy!f;V*rB+5UXI>*S}?=Y@A1K_k*eS0 z?QcE)`=3waO-DnDZuzGdm5v@IlSY{pqZQ;SQb3JX05FU~f3<;0G`!iBqHkLU4=CPdH`gC-=KxQ z-}rm=O_AT|a7(YJ&Y28;b_eBndr*BE+d?MWzX^5LP+E=P1nPOJ0zHtBELRdO z6|zb=@sq82k4&IqXNliS=>13)Iv=#gT|{Dm&U(?CqqT`Hw5mF-=M3Ic9;z$;SqD$@ zQ|aNIV2J^N(((8JF&>K?-rsDIN76!-6kZ7CL$iTgcyqjkZGBhE+btx$iW>2u7WT}O z;A^A^w2V{j1lqNd{}O?%zfb=7t48kxn)B|&Ce{0+gy`3b_Y?2?uSeG5p9}U@z5ZZ> zXbt^D0rY-kj3G#uPEMzjlhWW|AJ0bG*hb7gW*K%9ZF9j zAfp^3Ef+3adJ4f6U2l65{m!TCT&D{y{6nBz$ zg=9blYP4LRrKXe?e_W~QM|cb1uM*XpBDkC&BKO2$V|xG(YvVz&=~?Yb9!ig2V6VdM zFjQTMaKl35c=`4>f2*FfBS8mQ~ew>kEeXNu2iH0XYs?T>mY?_>1} zvHfr`A+xBHUtoI<+U7EZ*c*jYtdwAo*O&NIHD!H5G5Cp6YkN-}?v!?jovA>yNU*hN zHvR5n$3gp6bc)>uD@PdJY5uNRb>da*%`&@<`F_&(iy{MpyGT~Fk}Qy`q-`*nLXRM9@MJ`5m*ZU#Pro%SxI0=m zXcBdU6(rWVj6^)sCDnmal&e|SVIRCdXy-i^taPDguvuGZKg)v_abIRU zQ-i$lAXp@IyVtU>_wI>09oecxq&z1m>YHjD>~+79mctf~XYwCkS~RitAEnD5&lprz zQC7|nsegPu>HVG=BIjfmPn$UN1P0vi9K#$jSDFRW=(y2vj()>Q^2z)8Bg&?)F?d6j z9qR=jndY)Pnw))RCe&nCFmp?3(X43`(4F$Ze0au1TV67?WaiA0(&FBvcR!i`g`{}z z)z@BbAKE4UMQ{wOZCO=wyk)fZ!3CxnEA#64HB4FoHX;T?8PdWH|H=e!nsbAjt6uHD zD(FRCa3xD;Q|7c@MdjtCSNVV|d3~l$93tkOeGp8=Sr5oR=hxg8d>9SuQwua-7cZusPiFyj!PzA?Ey7mrXypxTF*nD^rH_E}n268IFm4VZMVKt586e5$wd)12MDs99HYWdbJ)R4r}zX)C;lP-D&u_CzDkbBYd6s$y+ z1@lZgSA8Y{*e3EBp^Yjm>B@AS2)wsCAj%kQI?24QAVFl7)kps1I4i+Kr3M>Th3h(T z-2G@tk^hnKi4wht4TeL1O-}DAUCT;~%N#V*hOAWaW@-)DEeYWY;Y{oz;3CKMdWetb zpSd#nhQ?ng;F`{eMdL!mW^7TZPOU@D9ae4y4};v~O8#j@({_*{T!LxFKp1bcqt(@^ z>={+Q+p>%!(hqLJTg-&eUcCElk&!h{_-zO0559O!G9O~A@Ik;q{K^GPtPhH5hv^&^ zqC}sNNN?TX+IvXznR5_j`fe-U1->@pWDVrdg9{0Ha498*C9?a<$$|8WS!;o<02M?MoQmYgW7Fz#>z7XA><=)co_$Jr*{o?3Nx@n#GDQJR;6&aU&vSGVVloSAhtp*u;Rt@@H+}##Ccia)D2{r` zq@`J|Jk|zL4cx%#5@(WQ#t+C*WfNeb!a~%R-Xf*woTzVT-ig5tVK36vff{nA@krd; z8Y>kU?(3Y#eS_i)lzUVjb!N&cj&C->Hk{@Cl(Qn;^}#rgH&A+N1({<6)g({6wN?{Z zYO3CIowrGw!YgV8t4uwwz(lUKoncFfdee0li{DAlTb<g^e-Vz>3DvZg&donVZ zB4@|EZ-e<*kIY}G`N4JR?Sk!0Rr7?J5I+RpD+G^bZl35(=XgM*9QS<<4WQ{EOd zacXe6%#Np-&<$2HHPJyYrA<0xL?`apczr8Qx)VN`YwvY;nV<|0HSYVRC&;%wg5PIY zT30mht;YWE5`Bjw_&(Ja#)3tb178m{Gu~gc@C=3zFU9(y*jn<53D5QcIMWGC48qcg z`6xZK-9GB|Q{^YqBf%O>bi6e7PO{GglW0?Sc&Y`IE0bR&P3OVEGN*0OUoxsxLZlQs zXBM1RQd)LKdnDHkZ_hdT!^I`e`ZFwQmW7kXfbQ;aIE!;?BT^l zh*=zrJ*bP>3r#}B!3C0fJos56bzLyqZR;$ach2N#L(66o7R4a66n`c#?Dl!+MT^6! zQNhKB-@=8W;FD;>;3lwztwG3b8068VC!s;5+6Cv^{?w-re_Z)RGv?&7NtY}NYG(Mb zT@t?0!OlH9<;ym1qrb>$9zGc_!;1kf2Gsj!Qh-qsbn=aEfI%KlR2EIaU|6u7uwq@z%7~anqKB zgm$X+Ch4v*+`$?|&eJ~^nW2ZD3s}D%@D!GY61m}_$431mk2Q+D+?ELN`9sU5Pbe#& zHo&x%*?Z49g)D_L`xB~NDn9+e{0O)c;PD7EA2rvmqRPz0O@^W@N#9w~d_+{&zo18D zd$pg8R&=!E^3pXNQ*1re;~Tak0m$mHJvr?u7L4=eeO( za*JZ276M%vZWjzU$%0Z3i^-CTjR;vv4=<1Q;rU|19G? z!{T1;j)varH}dU!XSs1SK6|o9e2OiXIkU>9<%S(HIyQD_QANd^DBbE}Tb$_JDWQG0 zSZiWvN%4e~AJP=D?d10O%HHG$9id2T`*oQ$lc?y`Kx`ovLRoq7MBWRYFerVUDyNru zX@(=LZuxEZpY*h1bWamA|36OdWRhrkkBw@cN8hDatm!6lfH@qCB6?z+fe6?uF@1XKrI5s z;(p#2&r_27?JK5C!gcYw8zZO(?yd_k{ZOqZs-Wh+B<3p)uv(o@S+}iv+7rQICv{0M z%egM-;hcgaJT_hf*m*JeYvQpib?ABoCDzdcnsXep6_3>lree|bv~$$d*b^#QV!?fg zfQ^@x8qu-Vm*w}G9zdRVW8=e6%RZV)-4z}dXCT&#eh}duHPJ5X5j79IP?Of27+#>G zG!+l_S?P9Hu*puNnkg!%K@%SENYVR(oZ?||(fj`5Oy<-!=ryX~M!o%+Ri!iue(g36 zF7RUBy)JQ8G&mCcMyH5~yj0)o;&PYC?=@@Y=RG;PE2vdF9Q>}<3DL<4pf(}HP9nI& znBW;irZt5>^lDLQ;N#RGZcH3Ov{jPbFHbH#?BQPB0C7vy?H5X>&;WWgEzWd z9VSCkcW0_ca|%skRa=4zDFQKxg|9LyI`6C!r3j^nTq^gwK`-`z|Nr9iYS3VE)1Ykf zkrMlDD_j0k68m4A9~w!mvhdU8$oe3@>6nzcE%=~zs!@n7DlZM$GDIprVWFY^)q)?v1=XOv}A%Fd`&sKeSyPLq@f#(m zB5Y)n8A?@VmUWaFR>>S#{9&q4b&fwjaOQfcvoilS)~ioLnia^74V0pUz_afUS*;21u;hoN|2%v~{jg^>l6~xpISdoYA3JZ9h%rB(@HJ!4pPt z-yhrq>J|=y;|R7+)l-lD<=9=k;N)PuGhGi3ekLR@em$Od@x>Q^sH+(~W|pKDG|O2o z&b@lHFmbUfc^AvYK7cS}0AD94x}~D}4x#ApX!O4WtVEpI&vX+%+Cyjx4_-`c2ulAE zWfiAA+1~zaB)?8`A4+o;YW8*G+!d1rG2j<45TF;}3cTAc^QK1b?yGu1N13LfC&55x z46bg(|5&b$%9?+!)Nen3em;pG9qga#wCJ{Ny2b=MiPY!!1P5BHk4-mHTd3>m>5$+K z=fPkF3p@{|KSwJus(W$E$H6Ekj~%LYb|>?iX42OT>2*N|d-2^nxXn5Awj;u1*Lu^3 z>)rUH<2OX>tcHa;u0G5{!ItPko<2zSc3CQsvH5nLofkkJH_J_3GRJ&vgP-sTNzo=iX5~cS9A=b^5={bDe%to+ClSf12mQ zH$(xS`RL@KI}%h+9;w5VhvFaK&x<{6h(0zia=p1n<}ey2{5D~A8T{fFP0N~N{!*fEv$cZ)vq_J95O zvf#-v<-w(xgvX}AKlhxozX7|Kn?LBbJ{0yniHnE3I!M(@) zeKt8N1^0j1ZqyNxC(Oq;71l&219?1vSKqGzDxuo7;BdW%76(vYqANSUgL=*=cHQ}5vk zJ=m_%=T1K{z3j?1f?URe7usZK!)zc5Wx%|w0|cT+5htVs@QyXW5mp{(o@UpstI!OV zgYp5`mxhVm$a2G9y3`HqBm7s%hh6oe)d^ zGa|U{@(coX9t_KG!ekKVNnfx8iIUA$TJc+Jt+B2U)W$@6HbthvYx#^4%Oj{2-;~XX z!C$OfC2nUCSG&YKViSni^cF+|k-Xb<7VutdClpdme?o8BtB0QTcx`(%B1y+*dZZDw z>)6~DPKI_T#l=SH8h>gQ31>^_QgOzqM?7?b)|V9rfLc{4Er>Iq@&w&tPwBFZB?@w( z?ea$Hg|`O$NMnv=i>_d#(hiktA?a9kUF}+Lo6>?%WiA;~bPz2~K$ZTJ+&8Zp5Axnc$?&0XHjiUHoks%%FwOw#HSHbO#P z7U$A#F1dMjT{h0yrgnvYwk}zb(OR7*a)W+#4TeZ}zAsN(Y;@`ABN8PKO?CDPXOA(f zTud~KFxaQeTgmG}H_}qlx2n*qG>V#vJD7Jz-&7Aui)T(+{E z31HG#oC%io5Cjcuk5CG+^DrNlQrNIZ+MzyhWgR?{2Ds28Ey1A_$-Mo1ObGwV3bw09_yvNUuLf`N_cL3#+k{<}xz>#M*y^kn z<8w*g;lKNTFTn+_=A|saI+Wmog*1OJ!9^=6BuX@@=*Yt>c+S-ZXHNdncQGi}|w?#?J}mBbs=C zqyd^N9$q^^@H@dfa26Ae+e)H{jU)10aEz4I%CFKD`#MD1=&BCH7K78j#tMuPIxGMb zbbQj-bA)vsOs@!a0CdfBF)4}Ms-f3vYIXv~EtF%>J66=xB*xTC)8P?@Z7)?K`3~de zM4cHB+5A2`#1c(lJe%XjCod4v_ihzA@{qW8SqM>n$B`karwOv{Hi`L!(!_XIrgY=^ zzCj(_rw3Qpw3G{c_lk%PCPV?%VIJEPrr+f8kc`n8kud{!#I(sG9VyXm!RhnZ;3!hD z>V85Q=E+S;PF3C0;$CIUhA8V~;#b-@4W4{b zoNw%ehg_gT5Z25i%olm~y}5QG{!;hFW`ah1D_jGsoFqE>Iy+RK=pe)geWKNzYJC1e zcwU9PxL2He#3fA>S_O-rC=PF$gAD1V^FyqUM39Yh?1KJ{+8ZiW?@%3vn--BcBUct_ z>WO^XNqlW%;}jYsbC|pX3pKX_juIpqvuYZvv5I7DW#M&AQxd*X%aY};2ERkT@IsZ?@=N`Z zCi`@Fg_xt|cY31G8>51mquTN)3-QT6KsVqmuCMoH5V@Q|o+hXj4CWWvwb4U@z7k^c zr;1gnG~{I0A*pX49Ct?AiMhv-<+)+<2-IsJ$7x}*$mJ?>7%pcH)h>S4b?z`pznx=H z@j!sdtPy@+dyep=8i2o?$QPjLBazpMvNR^wr-vR((>Ksdu-c9o%S%n&xN02r^(SJ2 z@#Z7aArnL-vYG%n=uypl2xOQwj7Ee8Ia($d^aF|o&P`1w)K=IUyB4!Q9;_Rkgi|jg z;gkmn=YmWnIB(@mxmwQ}sE1TiXE@&%cHV^MC}A*y(_P{Cr1O!R=@*K(*>#yyM>0G* zIKLJ-zqRyA$gOseOi$=c^lk@3-M-2&k9Ks45g_k9dY8%c*tL=%Eln~_p}CGc(b&}2 zWE|RZ^ktI2P$CO1`D;~(g#UVTdQr&O@lmG#X@Imd_=#((PnNM|o-pA8tvdNA zoA9c+)O5&Mu}HHU^Dc6{n8Dh^a;4qgprvjHLY){-!uIC;tyi0b9jwt*j>j;d@9_N& zR+dAh=O-PJ-c}c;lDLCxB+fiB9bD7LxTTJJnojYCCat0eRoGF{1pRFuH0J#fyAdc8 zbS8zAE~9o>m-et@3LJUPkztPWSCMV1JxDHUfv$m}ifY!JZ!3ocMX)uo`VO@(H_A!# zEqTzkZxYp;`m0FM`2oH332Op`rB=uQKiSq${UKKFbXSS%w|6`ex(uU-8$d6|In_~? z8Kt`bWrsq=sx*?pL%tAmrxtL82OxDhnKGg;s6=TxRP>{O;d%=Cetzd8k%0fE$~ZO( z@V&FYPNGF0;fwp;4gbc8cMkX14j3tMCQ^&f5fE=##i(M|-Lai0gFHAZA{5cn1cs@11P&1#E9PPY);k)-A_3*KNTvT^{Q9JCQBOjEkWuF}m zo2p7)aKy9EPr3Q#*B<`m&D5b>>oDc$Iy`^mtB!c=A2__LeZPm7bUF5oA5VGr-6x-F z`!1z^t)*Ukv_JdMLm&Us#b4h3^l>xV9eTl02Om#azWl4~-z=xpWi8qI_)fL|#h*WwLuUMue!Cy4 zOQKQdA8FLTN!p!)N@T~0X4SNFr!{Vyl{5N-bT^OrU1bka}ZnLGRNsDBL$N7YBa^NDHtrL$^>3O7*K;rAU7bx!q#oXz3Wqz*_)FcxS9D!JUeLS6>A1brl3b z6czpuFeDZJnCy4xZfE*n4RuWTwTNM)BH-p;mg4nM1LXH-ZCzVutD3tGJ}n$^)ASkq zU0g7cYzYWI=7fPFZ4ag-4H+_n_m}wR-~diHU~$%Qf2*&o8T2$AfIgg0G}WWCQQzeL zuW_CgR+!f1hEAkg8zygy*{xNIZ`6k-u2TE@=9`_| zno9k=wv!b#(I|Px`Q6;?^yQDfLwji^{+SO#LNb)MBJyFxM8j&`&+)+;bcs&ma2_T; zFyZQ`lNQdzXf{#0OF@~03`he3!8n$|QKAMFq3kR*_zgI&aegKkg{j}gu;z~BKs1WH zSsn<58>0s?(|s(g&y8smBWI4{G5y4a0RTG)oPW{C?hyN9;q8DbTI@e0T;{$rW=Y zVS{l~Eb@vN>jiXqi=0BO)Jx_q76D>BSCIo66gJliAg3Xh*fIqV7ziMfy0j524wuzE z3Q@ZEX_>NAJ)iO#v{65bGBX$ts7zM{T!4bXC^b7146eHq0!#qEH3CsG(m`?@Fj9aO zf`*d*#oPx?z0OTn-n#w3mo{tHy-sMqqJpuI^}V(a#`*dD zJl<4hFh*FltDVrq1m9ZFcr6KgjK4{<%>_x*OeQ4!0oqt!7%EF#)~Y3frlbaOWTIic zpnBl`4|{I{UR8PR|F3uNeZ~xDpUgoZCt;o>kO+u^JAep^8gN$7gG0nQ4k&1nv(HID ztyJSsB}i$sDrg;Ws8bzct5$2Ys93etYwFa&35V8dt@(Y{4o)4s_x^8x&+mEu&vhVS zpMCazhc&P7TJKsqSrlm{sa!}3Q`^u%w6 zI6Kue(>EAKqFAC;*AQyhp5q-M?}w}#HF6b`ABU+W&^*i;@+<=hyP=CC8XUeStdPd& zSRKlU{9TRZibVi&|KQ#ete@)jji6+&=cmcvBF_26G!0OeDVAB9b<~q$W7abSqT`G= zG1c0`{D+NPFa+4Hp!85_id?q_s%UdmEQeSp>N8FL!C~`Kh>Al!+l>n%r-!Y2arV^p z)W~anAO#oNZThK8dH;OMBejRoyoArA?u-=tNt3ZKCR|*=-t&y%icm&)F_Jt-(^F6l z>QIPm9LS-CZ2vylusE(c>JWwt}Aels-Q8L^G-lAi+2FTNT zP(|FFT*wq{PRBc0`OKgck3)2lTIb;$2!Y-^gMsJY|^qo*{~By<{&$4bhtdno5v@ zZDi4rpc1{!CRPglBTHnVq%2)EGNJ2-4Ma}e&lvX^6Of{1CL z@kAyMk|Q<2OElHmRIa^znCHz12Ni2NK0=i@b6dc`{FRlRZ6=dfc*eFm2XRlR)5z6> z$o*QsBWxTaW=wQ)AeCEgT~Z(?+15oWE|IuQzW+5@pl#9)w|e!*^)d-fC9#Kz+&g&# z+b^CYW5qg~UTh)jZ`y}XPU3XBe+Aoa-Ke`bS$F*d zM;`j(aM~#p60+>N#63~SM1OxPO6Z-NE26W44;nPVq?cT){yh()mdY=c^rQJDju6fkv=~hO``+8Ga!wk0?Dh zP=AjWqEpy9-X~kDt!xF^Az2faM}}!OBvAvo>qjKp5XpR(g=H5S0^ayzjcyQAsnOxb zWC?OhA~5GsH4#z`-2I@6spv%_zt=B2#J;IhW7Rf9tlJ~T=`i-g!ojH0GfZEL&~zlQ%Ee z@Th*4fX-Aybr=p4)_cuRV?#lhPHY$Y_c0T_M#;)4a^yx!#)jB3Nr%kNJUj#@MkP9e zqaGH-K-OKeQ&u?GGRZmC;g)$fVjoC8!+ax!cCURr$>buXb%-*^)AAB?Rq=nuU)%Fz zL*~l)3Q3UeQYTj}qiw7>*-$M#gOj0S%d88l^J|ABLo`^>MJ{LKWx7PLT}G%RC@htN zK)oB_WM>8Z0aqPfqZ(w?uw>{@wt2b4nl?<>>%1K?-O-l1m(L*y%2CJiVmac)ej8?= zF-*41i9lw2+$Z@7ni!~QrE+kDBG}B&6Y}ST99(J+AU{-Yo~Y6E(!QeSk{(xPRXFC} zp$aY=0eA;^g4iU5E1}>w$}sJuze0XqYAr;08FLNtb=ZJOo0Q?hnUB4DF!bD1>EpPc zp_ozDmI{>{9N-#KG@3a)q;!i_URt3EIRpZxZAp+q10V2xvfhewkd#r-(?R8EM|p4; zwoqq-c3_K0&M}oAsVdc-&YuA$z&vD`KU6Vl%t{+M(iK3cAPZC%w0;f;b_d4rWP#5x z?JPLC&6v?*a7myf@^QQBFDkwwA~ofvMrd4O4$^FsP-AnNaZcS0#UT}znKYlHT~TB5 z6UaNIUI2;%69qByshB4$`Moh^2BD`L^n>8B&6=bxxpWo6L?3M1* z#(Yf4?fdj`ME8jcvj1sIPd>eQ>1oHDeAG&01f_V=_GL{=GP8qJwHZV)ZarjmfNBY>c_TIv7xUFY#7>gEg0bxpp!(o7z6oQxYMwD>0uiPxm@2ZWm1fbr zkjFO#D@MMWXF=k~DKsNPQ+E_KkLM7yt&M+I9YibsK!lMMx8zB(ZImA9FocdI;%RHY z*qvCldbSpA#JMMEnZCVU;NZ|7a4AFTDxIp-Y47rtHO4?0kF zE_p|5O#nv(Cq+YID4tK@pM&9OVwuS3sL*>2wyrQ8vZFt$$>3O*dD zMjUIjAn1dEAs(MNS32qZQwN@>j;DsHgAYm-)$=cogcF}s594w_qyH6z70=r%G~gS2 zt%lQFTK!)u;oPXe9EcG>F3*b8p=4*7noU?WLki6J>Tm!C!^5=`^8!PGY$U zPXAQ9{%cjE*iDIZi}LbLF>oNjwSp@R`7vvB0C)#Q#oe?Z-~me$YjA32OY~J8tD5Qj zaCwx?j^^`w0pKw8u$|aDVW=T8OVNsuLV}tz{RZ`@ZsIMzG3WasxX^$@@B~uB*FH@>2TI_q?vIE|nac#d-V- zu~GN0#KxEUXuh>Z0X8-Nl)ZzyHq)B&Te%oF>ZLMT_G$0wem4=ahEMLg{q{LQ6ybQ& z@3KIqWQW+b9KWWkko;$id)ANv#MH#=UMY71-Q^{Om>@V!h!J{I@EwKayP(@%ate^AGHMb3R-$FlFoCQ=r{H_n$H3 z-6aDI8N4c+xZ=xd>i&j*!D8DBv&(6-G76~UD8Bi<#H*a}b_D-hvhr(8@&ED}M_Sf+ zyhTPd)|#z;V=%*jCVLZ|i`{QM$ox%n$zjejixbsH^j8T#-#Y8M;Ooc88KeJx>+H3o z2B_~_pZF!q{NpcPvi^Xb{%(NJEgoIGt|Xec;U4W%CRhbG+@q{rUtj-stWC)+L;DBT zuCM=!wb!j%_xG$_|Nn-ylk1KgRJIO1{1s<&VA;UVRQ})QY%6rP{luo|DK{ow+I03; zEfvfQH<{;eip~zsZ~Ky+!7zWbp@QkY$AoYGN*l|R>+wnxUDC$zkNN)}OINMEo(8jD z@bviqk8X~*hNi?tzf*f-H+11%)Jdd7eL+xb-sPWk$np1Jc|$Mk;q zPPymAb9b5U?d-M6ebc8eTeflIk4>>W->~y;t^N1!x^vSB*KNFeq!j%GQ>s{sqeqCn zvkbk9n1PP@-!R@szA@ede*3NC{kY<=TW&vm@zNLPUp#-mTV}ub;_QaMExGn%F75uv zPB)EPdD8B*!K`jrGKmpS94X}&7faEV#q#mELpE~HlBXNaZ`f<&`AcIVkY`0?Y9537E8$#Xp6C+yI_VWxfGnCV$7 zzICSk&RJ)jy>jJ>Vz9ib&|8vaglB%8sU!Ad6IdR;(-?}s( zSNuE^{h)vAMUU+NZtbk+TlRVJ=8Xs3x13AQu6cTqJzJ$v65Z`pLf)?#rVDVEx2&e^9}%74MP zxbkmU@2d1SHvZzPzkPP&Zaum$)%Q-{hj*?yZ)kM9&fyF$=zGG-aU84t+SEId#`zX;R8qA zz4f_!_E>Q%#C^m_iITY~raRxxfda`dN+0oWq1Z9s81S01ZyoT*6>}SVR^E2s!zua2rgLFiBPu%Nk1kD@{TqNQh%vj4&* z|58By?=Qg$Q}W()u7w_!b~pN>MsyoMxK|S;vM@qrNcWTC-?P5V2~wVF8s( ziUpDtK!7xUO76wxb0$(zp&2Q00$@CM zt4<_tc>r#}8=e%zz9KB8PCwtWo-o!?f;&X-%LwUnKvju{f_of!+Hx)qPQ*T1fg)k~ zkpk@O^8(TUFvef3*JFm%LaCu4upzb2>5Rj58nFOhbg4$Qk8`X|8t_VNhf~R1he)ih zVch&iBk=jh2ZJZ}exbz4d+lITYo=ow7E0voG2FOWb`Dzw#(d()QkTpzTb4INXO-t1 zq|s+%foW+r6t%kcu|nE_Yvq6@j2tT94P_|;G$6R)iB;jzeAqurcGW4B$q8|@AIVmm zKAqZNfZZi{8;}zGz>~=lObv+UAUd@IztYn`b(LtcM;?2ChAJenyG*8CVu7G#iFO#Y$XO5&v z#0%(iF7G6_$1^_B(p^R#wyNoz8a5!mLgoTVPWK1-a+=mGKDeOF=lp8afi7& zgj)q3Fq|c`9D)#KYLci--XCrI4BaAHj#F?fp|x7UY;KD47#2SS8j=C{Y^BEJSx8f> zAy*p_LYC!4iBe&W6iLMm5(PLU=WOt@Z6xNy@_>G~!d~a*|2b@yged8T#bnPQb+tR0 zWDfitLn7A#1qH24H?DoPRcs@1DEtPEa+a9A#Bf3sU*azQ;| z6XcH$iN2;S+Z*Ij&KC~O#^CWG=WVcT6iqu2;1^NbC48_+nl%${KRLzhPvS*DU~=`J z83pSDTu8Gig)-1BRZhHWnz7B4ay^TiEGRvWHH5(`^OPyU-jL!9RsaT+P?Mk@w9Nwy+|PqPK4 zUY|gwa}I-%6WL?kyreT%8zg{af>NwyigW`771@`k{3xKhabh*-GiC4X4-YeNmK>TV zvB-%zFx;J*PgRa0R37B}cnXsv(W{x=An$=Kpo5&v85@(~0QQ!b?_{~g+F#km=F6A> zXDIujtVrk}HwVJ5)?^*0L-#*a2uDJw_G=BY$rlM=X3YU}~@rf&5ib~ZSia;yK@IZ_d0aq*@hPIW&ex_f6i@}%Y z$loIJ0oH4v&t^Hl4r8A}uMnda2I_6!OKdS5m9hN`pUMl7*pC#*nz%2fr~XhSFjN(i zC($Nl+Sq>jzG@f|`*7wLU*lyGdaX#wom0IAp7mW>IaEXTeEAE8QWL#cmZ|lz{eAuY zZ%GR{B%mFmR3t}ey);5U-8*rNEaGP-bY4uWBjDylwOPpN9Sillmvj2VV%XD68Kf%l zD|!CP@X&382IM&>CaBrfzdUh-wU}RioS14z*Gy79yj?Q4a#;nl**7GMXp#T;6#gP- za^R9GO-fu?tAVoK<0U%9Dh#7p5TL@zS?g3U^7VuBz-Xnk@}se^ML$fmNh5y?)_-*3 zO3wMI$xC2k30LA!ZzP;bEIGRnenqef9Be_G8W-|Qe``KJ3 z$A9e@$vL`nl*!2U4&)yvowsM&+cPENwsWqKC9~Swa~*TVT~(}y5Fyr3P^Y%%+S^yH zS_O(Fq}!(geTJOIC2n42K+~!pCN;8Ub;qh)ZdFIe>Wb@L&Mac4W-2NT18n*S8nfEEJYnDNoHVaD7ulg$N!;bWEaUBqTehH zPgP()_l7am0u>5cln*qW8d?w(N4#Lm8#brifresjaXSWw&LJso>NxZc70NU?;iBMk z;q(q>SU}(B@tP2C{~53?6Nw(i7<~6lD%*Fr} zI)`%|6#g0p9JW}H-}1H+FttL4U8eLV2jPn82&5T5}L8>Nl)%qv|rPqhI`mD=1C z!yz+iA+EL&&MHpl6JmglLX=qWyatU81bq)N-Qe+p+pvmH3p6?B3G+Z2weu(T1G7I} zDmvC%$&PJQ8ChMfU zAn|hT+049<^&Yl6j+?Nf9&Fo=*<2ef$*j;$ID^%Ls%ZwcD zSm$Xc9y%q-AY(2e*kIh;wPJh@gOSj5u#H+NV_uP>%rQ|Jr}Rq9if%_zg9T@~nblGH zU+D&7lh%p(j*-2Mv_;FRsPBc(P3F1i}2Pc zovRq5tg({*^q7K>Z&I#GW-f|Kha|H(0P37E2fel*u7;uOKP=`$H7@O$M&1CIW#k#- zLG!sHgI@yHKK!C`X25~+8*vH^;iSoglM3e|Bii3r=$bh|dnu~Ee=jIBllW0UfsH(- z-&~SJwDGax4EgImGEs{HzHr$r&W2-JLri3~8J=yw zKxIxc3yBZjF5l-f)#6XW1E9!nSU7-z7{g;7bxG|-eA0s)j*=EkVo4wkf+CDL<+8Iaw8 zsE5rmmn(B|!NB5|Dmlt?F?(gq;aGxVi%?}U+f^)g#AWxqf@8E;(QFW8v-~Y4t70-s z*+L~r9a|2VJr0`CJS0M~%e^r(2G+}CwA$Z}Z_UrQ4k?zlg2o(jU={KW!w_-xeKC9R zmXt9|lm{rbRQ`b6`ST~1>}$&!m1E}GxY@yA`kR>wW4DLf>Ia@;bk+nKkP*0&(`_>e zAG{cT*FuJU3lLwaO#5=v!@cCaIGJexVhUHgE2vv)=4Poha=TewQ2;t z*|=xCz9;WQ^>Gmhyui&oP|PLkXj7D(p$D&{$Eq?NL2Q>3FT`||$nlo?$|qa01z~b< zk%jg+%Aq9CPS_Nj*%dbSF10<7Jx`)k$;?j3@0232I|U2q9N<$%R%-Q-04*E~S~`$y z-?z-@K*Enk9C_kQ4ZH0>PZqV0)M1xJZddMd9#)Pli?NnB>2G!nvY)0mB&?kND0JJY zV5>Hga%6ECHK6Q*X;7QcKAIh|VPKo3KHSLeNqaeZ*vQtfpaa2CBjC=9ng`LvRFLi_ z1xV+cjT+;7i`h@|PzJc^=i9FTbI0B&7V~>K#0&_rSR+_EkqexGU=c;9$T2J&WMmjZ zVzgt!;z@}0UZcZ~S@$JPXGk7NO1tCc&WrNH{5c{oCGDpoR2G_U$6`N5CkbGv+ITV~ zCzPP`)D0Nzs&jBs2~js_4vD}o)>6^6gVYuk4fC@{C)rRp6E0FG`Uq*pbZgDD`tPy9 zm6(oFqtOKlJctsznV%brH^3~cz)=-)dQ7em>jROA!A)l}be)E-)d~#&gc~(fp?im2 z!c(GJJ|f*>qoBF?6IbqcWu=pBJJXtsX*?NbaW3BoV#ePQ_!gIu^%HxL*enpl#gB5ErB?pCJ#Hpi(X%zo z&K&h%JtE8XPMf|hem=Z%Nmy#jt*s&a2{(Mai5#FWjV}ovi8(hTbfK8VCUGkE&)67- z4zDta%Qza12ckdB^)@sZN9Ep*W^sg46>h*(=i`rMT(&(3oy6ygIW8QTh3L3CENfL3 zshEE@scTSK7P=;6&WW0~sEiVGQrJ2pj3|)X;_Nf8nGnB27s{MmE(d9?ih0OpyYVqk zGgp;iwBmiDVR?4VP5A#BxB(-}3_3YE48Vr$@hJYqu`g5C1GhC5^HRA;7EtvUv^R=|yCV0v}< ze#g~fz8lEUQ#Dh?JX;Hi2iSc^-ZAyr zj@%PQMi}AGov`9MUaF?_H1Qc!&?2?%ne6QavU`F2FeWb-m{D-LB=%qt?@BgcG-WDv z(?FPm<}68OAGhi)PNVs=Hh5Z(l7ERBAqBb#Y4W-AGM-PA#o+B@1O43leZ`M46PzpubB z$``yb6%6Nxg)*T4n_ATa8#t`koC0r$lI`o&+=0*JC$u1nyB*UAc9X10SRcB2b&j%^ zT#!e#CLnluB4$l6f(=>Xn7`@rTX$%UBE0NoUv-HGhTpY03$g!`&^wN-56jM_)&+4> zV_CBb%>E&2&C!YB{Ve-}Ats|iU&i`3bgU(JC(Q#Yug~#qwFw z5XLPD4D#_X*#{_~d#lVlgH@~Wl>!?+MWs4ttMW20Rk@jhkd0E`xlD-LEw<&Jk#dMg zHjgO3ObY4gck^MKlA_EfrDi|dkl!db^0(jxc?D3nPK<5bsy)*!sE?PNC3dDP*}h(u6Q9j`hRC)eT(EKSJ)lxeY830Q+tNodV{PkSoxoX9O~ zaV|DSmK*b=BUgpZBc?9nw>T=$1!4HO{z4EL9|X^bgS-cfA_&>_mlVjEt~r67#gr** zBplGvGA_hZlm3%K)jsSKXRzHO=9Q2#&teNFz|HPnWa^DMCN7Uf%wmydscG*( z+#`q}5w}8x_TeE@ULhZ`Cz*RvGCM3+RJ*y8F%hWUz+fLnTWBHwDo4dsTAr;o6M`i& z;1;WiKzg}VY&h;I<7N&lHPi76U?Y7+GW)Y=QLdm`dW=)AdquI0YRU$10R|^cM~dl4 z$ckDKMs%z&9SFf~AI)*v3Byr-L}-?%&xcf#E@QBH->#uzkR`T=LEPnPeH{)52WG?H zR~a{ZpRuw<^3xIWv~5EJpV!Fq74m#UUagUzb8uuN**+&J*II7NP7yU8J-JefJr$W;^pYwSS@g!WpGR>^s; z!e$hOKO*-NV|bMR-?Ne}MJ#JRQXH2_HrTw>q;*Jma4KF2E<@+vDJShfaWL;N>kMX= zbsK%7CDqbW$R8A{n2X1{nR8;&7ITg!`K^NqErUPAyu%hcrUSb*E?1YSqx^6PS!~`f zI1RDWlF7DsVrKE33Hzae{kBIfLv8Y(Y*{hJZJAdnKAm@YA1gTC?YKNv?RTUr<;@Yv z4*2zkn7(R!Toz&KsEksn*e%xcs*=q|wtfCc<(JnCC*;YFmc{^B@#nNUj62o0AF7>a zoG}4=umq=xc~%1tf)mZtzN4BMyPiL76x_$gq%0GytnFy`2{!b}q;|i<7WA)5pN@7` zcvL=Smwj^Zc#;?lrzT=BIfjgvBLm~2YOp*Qm&=WPsWI15+#OQlf81*HbFHnJ>r0AS zpHIrB0@z*cSH`%zg-5Qwz)vNF@Vw6;%WO*>{!AMIjE}-N9Ht>kOwC-Rnz!D1ne01G z%d9+kX)x!2Gc?)im_4I1XQKI!kd-l5L0@FXc98?a_R5I)H4S3OnMBMk5pz+@G*D?v z*&VF|Qff1q;X$y2&AcYAk6WO*BhB4lm|R5yIE8|k2|EAl(Sr1B#S4xS=Y!bVT6lrcCqIoyQ^c7S3}>Vo4RUx~rlV63AUq;!_E+m&o-Ise+Fs3<);!hs>?i~qFDK}t zTd`w}3Fkrk=KNBk6^IFWQ59a1oFh^^+*(KY&)7w9O@St1-c=GvW-nIL*xVAG)Y{rQ zQ++l!3;)s0V%h{Ziv@9WREApSG)t|JI|w-qLA%S-Q3cZ6OfJZ$x}kNMwl)}M_3G8D zR=ux;TTBJ0oziEUpsWm*=c>Wj<(CY+Z+W=Jt;4h#15b*sk$?~MmzpV`j82xTR|O#)>-txhwOi$cPvP?wcM_m0w)wQ z<{U?kaH1EA9GaAIRc0g*BRzX!a$6?*S2Hr#_K@@tLTSylW?Ng>>Ng{^a&4`xqmuS$ zt0-3wyh5(ZpQB%%}iT!IPu}kFfU14e^M0|S%vSdU3%n&;H=9p6BHya z?vla+^JW33IY3cpaI;&Hg*$akG2<9WU+lfj%C_<3mbPpQVf|dDE!XzcG+9gW(K&I;WDP&Oe~kfc2zPvtOolgnVDbiW>#?rCA0gHd_xRZ} zQeJzet-T%PZ;dj|L~rZl?lSq^TzPl8^q0Bq%=hP|s(n5xk%|iW;VARkNWZN;lWS@B zbJaB08Ai`=xod>nj#!zS%C(dlyuMU>%bw$tE%SGAvkT_SQ^O!qzm2GPegz8>txOW` zAzM(J&9xjt^sFuG0(%Y_w)JsDM`E<%}{TO`j`xc<%)g6Ci;wL;fgTDvv=Ks1v@z#Hx<9pbxIJZ* zmYXXyVs0SL-wq;~ZcVhvD#+97gFt-QgE3xC4vgdHb)Va6^kft1A7-{ySdUklS(WB> zTfQ?=_N%PTwdIcEt)t~E_3f=|M6M>>IM{49wSHS}$sjqWl2&iz{^>U%EUu;46Rbj-d(SStG2Aolb44`L%y4<9;ycDC$WY)|GGLy`s(uY{o7Od`5*dKz1P)k z3Qm0Ow@$pY&d>1Qg6r0#C6$si8$PDiqXC#BN)28*-JMRSd!&y){gn9K>1IjG=Gp>r z&kKp`hU92Ixg*^-T(((hNjJJLJa&!njqVg**jR4TG~rV zswdUFxu>sDQr&Ltyma$C=}dXGeW`iPerI#-wr+Q>j7bZDFBiXS2xRT5E&R z?IF%}iU`GmvI6u37)<<791d$Pgo1Hk2%)Q+H(okD&+qYi{2re(G7lCDe+DfD9MR_k z@jUUw57FR54Uk&aoX=~e(c_;UL}9n*!Gn&5PUeX3^#rx)gnd{eYl>d2<>{ZxB+vH` z35Lc;zu@=}At>9(dwuU&z3h7QKOmG9kx@M!HoA5yxm)bpb;|qc7*K$-Ow!{N8}^pdr?H*kDK7{MNRh`L>=jtSHG%1ewGg#Zp3lrbvqIG{ z-(f_Ox99D)f6K(VmxdD!vO~fn8tCDtoF@7THQO-G#wln|F3?zlam9KtP;I=3wT421 z<>LnIJriUkE26bB!Xt=dEfV{14KF|-YRm!U8HX{Il ze7B#*v${kdX-^59O@{kx8$D`%WfyxJ#2ylH{SDxW#o^oUJE7ZnrSFeodzT?Z!y53w zx-aTsd2wP0Vytr5LulG82$>NfA|JXYq$&}9BM4XNUu|+~B-pW8v9QKCjKxcb&A_6> zWomd|uQAm~OCrc&O#XSauVOV{G1bz2khtBpqN`44MN^)a8m_CNFwuxX4#QRa)y&1} z^OctD&XjbgJ(08@3xYl5Q|3#9@B1$9iiIP^>PYRT9%j_d&i8C)tyj}}jNG2rjA1PH z`C{(?z2zj?JYJnp>FFM;Jkxl1%zQV3QLeKq#sUt|w>hzhi;xX&OsBE$0!nr;p_{}4 zNtp?k;DRu&J)IV1SyE@a@VAipTND_qRMq0i@%JTjy|mW{!RAYeH?U0D^&ZLTu#D}) zJyHEgUnC?2`TRy{kUme243G%WAg!{*!`%uD?9dPm{0g?m zT!WP%terJatcM^`=s#qL8?b>mwrtUO6-IV7yb^PJ3iE*QAeIu37zHA7GNU}Dn8*g{ zNn?d3UF2G4XJ=DX(otp43mxsnV42?$rlQZ`c1D5PuwR*jUTKRP+_hwMa!*fBo}wA$ zov<{Ai+ausn~@TF!*1{H^ZdSU&;P(yomd}?pRbH&-9ZokI_!216SwnJvGz8!<)gQqy+YUw$>z?>1h_~(%Z&-2L0<2<NjJMS&jh z9=r!+5)^)t#E%j4Q<*I(@gA2vrB6*-Tj^kLI>dAvlhvRyM3nSjjcqfG(DzcEGOsy3 zuh#8Ooo%w7H=3#Sq`ECTrDlOkZcbnIf!K!_3dyiurXroFpINZ+%)EZx745qZM^xV0VnQA z-`0FDEj`T~`@=wLH^mv9q`h>iZ;dTSiCO_}qbI4xH;Qg;L|F2XFO5AXIh+?1K3-`( z963>9z51IONYe>nR&vZN=*K#e7;?HnyD^ZYL;Vh(hn^zViwbfeKBi3)ftk_34h9%R zNU~DM!m%Fa+G1FTVWrZIWm26^;odzJvgSMTF_{8e1sM7rtB^fy&@i}JW()LsA;;Au zTr9^}0Edrn;4kkLY1EUht9!AK2 z2a<%?*!NvjUocba5ca&Uj}D@kKO_`uJ+FH+T`jrV?H8Aa9ul{ET#4&dW4l^rxs~kx z#6`l-C^xf{#V`tcVoGf1k|dBgzLWC1A)!N~u2hEVJn24C6LvBja*N9E9bH+J9Rt4< zZ!lqI1z77|1$;L^cirdkGInH?RCjxbL6+pq@(}rRZ=A?WrG^|dVXC=AFKwiSAsCuU z3Y4)qK-BD~a#KL9-XiwmU=jYx<8F169vQrkLn*I&cVjNKctjY2i6`YdW%zirdWhgs z)WM}EtkBKcLUy=42dVAIC9&upVh`2>MY%eZtKl?2;;{L|#P<@*)i{}Y_!H%?+EY

JB5F>z_POu1z~&y&S!ndjSE2UVrt1R$Z0xL?VbF1*F& z$GR0KxjpY|WFp_XUQB0!ykN)ow&iGRkpHQ^(v}^F|AwJ?4k-2dq{qLKK=ZpsE=5Nl(TKQAM(^uRZ>A>!%J8>)`4~is^I-(-rTLHt{ z+Iin0a=STP64{`HmR>)1grw6P8H3hEDP;27veN#tU%Ax#W*y+!j=)| z4`I_m&RnclrP4E!8b5xjc$+)7H4+@(tK4fuYF(}CrjNKW-;S$rjo|39K!?T5ahOpR zvG8*ya%Q2&Kj$5gu-?_RMjUMQylLH0>5*o?*6&Ni&E=8WwAX!WmHD|YM5si+&| z5iC4P8kZtNr}Eh1u9zQs#reisz?xN7N1)w z4b4WV!s>r2?^C0PzCy~y5~{UQ{;pU&UY^_iwB>f6UNFg*U0d?axB^9=@J&BoW@?R+ zM8X93Tz|a8gF|-Jmb$(`8lv)wqb5HxmAmJQoTv8B9N+8ihI%4Wy{q2_Av>~b5JzOU zU8(8rzM9;8l_C1sEh9oT-B38o=^vY5k#;KC!efZ7&IF`dmF&9`5#oy*RYz<~YD>C% zOR6W@lj`w$%0`nbHP`UOEg^f9F7TM@RA0H4BOpNyRR~WO*iRSK`0f;C$8m0I$B>K~ zjVFNcv|kAocah=)(3&q@e)EUXR8!MO1av}Hjb;v9_W)9uGQ!(@6((kM7BruKfXr%Y z^3U5@r5n>NL5q5QeXbgt8>&2br|EP$Gm6_pj_f9Vv;&UvWy=AmZLvc0rQY|qr3F)z zxghNjMuY*~MC*f6CO+ZqNL(M)CYq>QR&Q3-u9= zDIc%eEpbyA$_pzzEWu_3!?=jk%63eVVL@3DM>tn+BB^ePhC<8SDKXp-X*Lia4J;`SL2jnCYJ-} zmg=7F*DB1OBD2IyGqow%GEthhz$Ma^LVOp*%m@r7T^=cEGGgQELAzZ5k$!CCHdzW| zLFVsSmtgZ@xTe$Iwc{S*M_pYv?Xt*CLHCTC0DOUC?Qd6;Ftp7zMuH%5a%5N6OkF~a z$vI1cJ2Q|DF~vxr8SYl=q8K$HGb_!tgL-PyeZ(Vb)3vCk6JzgV9I2x1j&??)owfYK z-=fi7^od1sbcs0~Y>bFsB3G0+Yhqb8Dru8?!WvQ6YXB^SWN+JT8W}Qs4wi;;gGE;t zalK388rnag(yWh5O};g_?86Yk!B2Uq1q<@Kx_W!Ndiistucs5rayz+zh|nRx|48tn zL-Ald7OnqOdy?<>zMF7+-z^~hi*lGAek~}O`Xc>voHaUJ$kh76;!%D(JZ682AKyj% z9TO~AI>jXYra<v=$;sU_WKwre_heNyn2D~xEuQLG#KV+zUbSMm<8Qms6% zGLiKELcCQB$)A&rITka6gC&NhJdd*=4vSfhLpvE?w~y7;^V|@G(`k&4rfojN<^LcL z*f`HNa;;c<2;HDrO3QvoMU$h!j|qXR{kF(4CDr4{?+D$b3RKN07Irqb28pDR;Lz0m z;<|kR(Ug=YyIR(3#yLqH2w>MZE%e{hfC_5d!U>n><8Bk;0x>dPCn)zQ^F|iPu)4ZN zYWW0}+sG>1ao<}y`MRbiI?<)->hOASq4M}u-^hcsp;P=~hOTU>WYKLe}6W8W~%Rf4#7- zE-n37HM}=8L)jOPitH1!nq=Nm4lZmInPAJG9d&1>6mms^QYT0DNXRG`I-vk3WR@i^ z?tA;~zP`8n-fkj*6txHu@sPcnE736hK2`_I2P|w~!p^-M?txei+N5EpkrI-NkxB?j z1%7BP4FtQ@QF%mKq;7#M@MS^Ql{01E^1d#=>k!DPuImt3d%=5_HA-U}MP5XcODXS=z_Dre7A&aa zmP0k>R@2qBF(5GWK=6a=VKpd0lVLm(cr>m|3EB6C6u)_-{Z%mxxu!Q0BheDO2cVry z(Li?TAlDmIa%)$e*X7rFDXB}*Q)QP@nNlk2ak{I_AVT}P!Rby^cBdas9n)4hBqh*V9deYU&PItOJx33bn>lb^aI|+kzc0EBm zXgArp8euXLVbHa-!djFBU?`rZRyFI}HcsB05Q;5eaeDlZadt+TXGSDbIE}KjXfjH0 zmdLDK8ht@-M_{W?1a21tyP!xethu$0>ryA3bt!++FgdS$OPWDTs<#fmK>TU4kaco> zUb(;V(w(XFrBJ_d(?iDRI^DEO9LK$IGJV?Qm?=w{uPf;lJDI1sVJ{;)BTC=LGB0J7 z33$(!!;wmLKKY9^M!ttYZaULATUFY1ndH@;=P?fc_gYGq@~2nl&EHYVHP)q>xnfv~ zEXlB>hq-WKS#=#ydM{lk?v7@u3t4v6onL$^yII*(S$WX3TCUtxwk=*)3AHsTQA>-O8@I?+1PzSrKFb9 z{j+~I#Q*Sj4b$FEj2>mtJzs_5p@|%gTT?-c*x$;N#4}Vp?<2!^LLXH0o+WaEwjQo7 z>YXEWRvjcG>RFWS-G{T*uT_q{nb5?|Efi7iX;3^vz!UA6e{_HXaO>WgPM1fGfmg|Q z_Tkh6U0?ZuMA^S{8spC`hFv+efY1AF#uIsNu`^PGVO*$A_4fX9vGv^Id_v)BnjLK= z)|rw?5OLnF@|K=ez{X%hY15CrtQ!=^@K0xTkE(R;*+>4M7WIIsRl|iriLLhT*iOrx z^TY|P#tmUc7+5cZ zYCi;UI0n8Ul-T3YkiudXFE&5LYCI^v;vhBcCTSqjY{|DE@^=p=P=gw>X_@)l;t@(p zKhtfwQOJ09>&9n7$L3>Rv9M-4`~vq8(^+b4kEW_k&mKl_1mi-BOeYcpOZIoqHGeHa zrSiaW8ti{e@1GU@klG(D!7vNv+W_gX7Dh_ya690kP7bd8tAIvW1#mM?Rx7c2TN)czHsA@Elv_MPQ|55G+l9GuL{Tjw`a;|#?!cNnVTt{SBX=Zi{z|AG1^if%9EVw|qjFXU&eroq z7)%BeKBRvo9mlA!y$MP|8Q9x8N7jYXq5sga+nR=N7JH$R5w(&cR|g=UkivrCSTj=d zHGHP0B@K{FzBFm}CUMRphiwnJC03cX7-E{ywi3xQsfw?PW&8Wr%0Y4S)DXFPh^)zL z?nk5aO8+%Ou(Wupq?&r4TbyKm)*Hvc)D4qm*<>2vOz!PPc=z^Bmd_tcKd7C{%{9G~ zC(B>>ulMi)NjR)>?G!V4=8Yx5go7deGa(pUd!lOnqm^I#^pk%j2aDGY$P0Jf@w%j= zdQnw*(^U?Z{a56m)v#w|%f1jB20q&2ArP~kT$IcU*mZ?8<9MW++`Y*UisMtjo6=c*u2uEWQEo zSk>o0l~w;*ZaVPI*JS1=cI}^~_6tX3qO8Ao@fdYOJkjPy@h=4@Cn}1m#@7ra=dJ|# zbnR4fGQta_YSR!$y^!g|*Z2`dcoO#-EEieT>(-rO%c;q5jk%`V+u&`HEm7yGzr2jV z`M};Jn>K9f-sElC;CbFt-J7oK9&jTh5TdoRq5JihyRY-Elc%2YyzUK$N~(JkafPqr z(E3ladR1hWd`)D^2cRaz{;U zo*J^>l%fT%=r_O)s36^Ky{zY3p%O_RjUa6c4O@HkB9$?JCragLWh~x@2{z2C|DA5h zudLdWo10&`w_*LV^&7^^wmAH^4DY6X!v;2S!?I@RZbQ8++k&IBX#Lvy=B7QRc7tp{ zq`p&T%~;s8tX`VdN>lSXZZET?cNm(h`s9;Gsz9`HJs9P;idlDZJP@K)Uz4+`b(3qv zr8H@W$+LoaB5MIU5pXd(tZNku`WmFy3uWOKayImd23xC+)^0PS0NGet%MsSR9P3b2 zPZ)vUZn6GB-ae4uuvXTQvRJsbsYyP6Zt=dK*VbRY_aBiy(%sa%mcB8U@kgP!i&08! z)q#)lq*H-0Yuf>vY_<->Ov<#;jo>1`m3n1b5D*_U90P^A%LU;XVnlGW+DLm>wJxPS zT`TSBtQUf>x@~_{o>>9xu|1brJyFq_EhOqP9qkp8YRw!f*8;xGP+I0^e5`e!m);Uo zUs2Z{wC8bXhXwgifur;~aFAn2zAuH@08#XCfUtc)Nc`#9400;CG=-952|@@$5UZMc zhb(G0u$>CzU@6>Dh$Dg)fVv3A>sF69WzP^xcg znYtgulnprsW}YN3K-xwP?P=SwKZyoTJR7GnZ6wvC7RJJnA!5=dM@Tuyd0{D#-6ZFW zt;Y6ZnY3uOP*s1ONR2+X5}=RxVpBi6znII!D%GS0`)`;76m+hhDj1^5ic)csikKD* z0OKTp`Z(1}VpNf1?>178-rBk^sXj?-H;7grlz|07wEiN}*b2F|oe-|}TfT!-Fb3qYBvi;UebE6?YqgS5=W*kLmghSB5WbS&wJ{*?;E|`mu}jilrQIU5 zrm2$PG(sqxW*E6vA52dckK9l=ox2s>sj=TzcSEiGYRmi@yky!6f%R&;g%>=bEfTt0 zv%r&C!c2BIYfQ!`u<)4?_7HmyFxg~yh@>l3JdtEuwKY7`Zq%SreCPo4qr8(6f;urd zFrxF}wp`$>q_lh;4JorhwFPnA5uD%{ki^Hby^-UD=$D1}t`bLJSz z>}6X!sUi#q2ba<~Mgv5<>WJM|{4oAy5+eW=+vekdMpH7_-zktnXs0Owdy-k%OUGX1 zla>7>!s>gi?X9h!#;iRevN0w{Cuoi^Dd%VRikY_x&Fe8aHX$1$dgcZEbhXA4t$;|) zV-bik44-Gt)#SPrHC6sjcykZQSl@pDLThdPV@&oGbF^}h3XroH!9=n55b1zybN46Y zyUO}#4P|C*)gVO>qIIsfQkmA?sBDTZLU{XGz$nn^2~lZ@nM1&3 zB^9WGtZ2%UcjMJL{|Zx^&9+~uJGPVp1HRK%40Ef>c_tJdZ_$^4q00g>cM#mkw2z0+ z4%7uQ8xY?8(PSo4SU3|#%igI&oth_yit(&OhZVACS@IVXZVMg|HS!6eY=Z|c%i@AF z^dE|BM8w%XL(Z-b1af$FzDKi}%uAMeIv>ket_wPdFn~hZTf8UgV?0t~fz9a>^Q4rv zpJK&emUqSaJjMZ12t#vZUdnGDE>cTj92HsYasUVw5Giay4)$WzP&BVeb!+P+38mw1 zrdF)KSmqXsu9{Fjo1SbxLouIbg@jpoKQHw2pwfnM)QDXg6iEy#kXbg{VFH&uhE^!V z7RetkU)IK>k>po4B$An_Z-g=~AbkRt(wAUQoz+K%p5neE6$EYb@fKjHxSU z*#@3`)V6N40oBN#EMO)4QjsNgpD)SSBt6SGG61$oG$EjWWz&w-j#kKQ%z_RO1s4=X z&=QRrkxv|rG-s6alN4y<`k8&S8mcyzZJkQ0{jN~reEQ3tAfbbmhhqS|sEs#|8&j_< zV7?!+ZgXuY09w9Z<%tY}cSU*}#mAwWzFz+Rwqr&HM^BH|+KhZNI3f>(kWFSASr#K+ z1e!y3JsNiXeZp?0E~3GO^Qak#Vi~#_q}f6cyiwwkGFeJ;4|Ctzko?3!9g>HUBg57` zA&r$p!qu7VfmAP%_ko17En-c8o?CYV9Y4BKUXq$j_9ELnZ0s7o6|qQ-{3RrdBL?Aj zSJ=%R5Rzkp`mQ%i(0d@;%?=R~eMHK!@ht3+?qEmvjaoaF>IRnu2Q~6bfq3YU+_e#n zispVKW?<7N#KcQ7NH??6smW$93V8lIflD969BRZ^;$tEHpKx zlaLslF>rHaDL8BB>m5~{mVtJvPZrw;M(7kOy;_Hu_`8m(mxt_^iS3slN|XLp7!onW z)PX;2Z>nl9E``b&xsCNpgsPxOBR963XD1fnDr!KDwyJ#Z@_Z%Uum-VkZqJaNBj%K_ ztS@sj$5zN0&Sp%3mP|Y9tfgi5utP&-?#V+DvBd+~s-BbC%yZ=lAq-ivIroW5Q_xG47|tv>3DIQe77& zrJ(67Y3-+@Uq#}FpD((6lnIhT1-|6reD2h2n>R5(m zTBu)FOU#WpHHmmwf+qvF8P5&4U&iQb2*Nd!{u7ms3^1MWa{N@gylXrgg`z+x`T#Zg3AnRy$Tb|fc=#QA;!4IoDyNVfKO=>_$##z znqUXT6WHhfPGU$S972Qren|EM?BMc91)Fz!SZD2e-uV>{sgs$2Z}O zK3aNp)f)rD;uSYY8wWrj$8~~kxK(ea3Z3ne_(LbQ=>t3$BVG{PFGq?Vx@=c&5mKk z^)1G{Z`=}1PSq)SyRNM?;54YEzmYmti#sT1#Lev{(wCMclXNA#!%ogdz6QGw1=Su- z!@z+J_TqY4%b#s>i}9@V?x^$CPIYMvcUN|qDreNDi_7XWrF^~Fz+`*&RU<>%H%k|1 z@fmB5&&n@Vcr6q8BI9T5E0StR)>55s%}Ek}v)X9?&zzWfnr=)Zmnlphi5+ZXS&io8 z5gl_&`P;A5e>A76H^DODZej3rmaD4OQ!_Qs3JMi{AgzeE#apt+65J^2yA1xG(#1{m zCJji!8whTo(fw6xudK$arT*!Rl>8IpLix_0svPjrYvOvAThfJKXlQt7`1m?@XLRN$ zr&aLf1Z-4~WzFkt<``p6aok|Jl^k!c$R8s1Sn|G#Z@Ix$?IuOZTWE7HX>Ta*Xv}Jn7p0qZ zDg&R;n_9+gmdK>vE+3)WbAAZ^4G`livQ441k@f9+7e>JluGkzZPGU?37Tmvi2zX`6|_)eruQ zjDewtH3V#wgz;;F+t4u3HB;&$sKP`{b2SL9y+lJ(B?sDPvUwb@f{(vdBX>p3-!mA# z`Q|qDSn=1EepoeR9*suUB+Nkx%Y;6ekQHnKPiVnJQ@|}kNWl_0yhfgC(RdJow{u`; z(dsyLdRPH>B&fhZZJX)_FyA4q)*B^w*WPmTXt-FOi_4QxKE~zXS}lR$fj$0(_Bdod zyDnkw%&NvXGvOSdnytNRZqg0*gML7Zg9@-)mWBr1q)4wb>8N&)wl$WN zik@&sYmUYqRLOqT46*#&OBcTmLHQ1L1$X9GVfF>9x}cugoRw&S&w9N*C6+rDvdgTL^+t zV_L;jYG5rVTAnZlBKBXM+1DxkE=OfbCQiA8X87jQma9ttPqBMJ~6uG3z^6=xW1H z&zeUVq$9Ov(cq#HOb}k}qwY+4(8(ZX43uLCk>cttm|5!jY|GBpo}+bU=m6YkvkUrr zNVT)f$(mn_+&c*aiAFSi(W;;0#^7JFgFurp=Z4uwnWj6)M?s_TFD`RrkEHyUm9L1* z(|Rg-GpWc9m8D!8ETti=sQh~*x<>EIY@8&QCcCx&dze@wbd25VJy~$7-ONEWvT`l4 zWLcnNVcE?e7+lZYw?ZjjYf1`dcF6vcS|+o38Mlv%v!AhVP?5<%)RLKU%&~eGXnA^1 zkIZt=C(TK?5TDD-I^BNs0J+B6Kk2}T^L2|74L-Z;E=1IgE@*@u(`sJx&nf!v7AG4F zq7&HkgYymcU)xCCDOpvyC5lskkjkVPa$`Eq3&i&Kjt*GH*z+7|PP+peqJ|j$9_1x8 z$j$o>>Rb*8NkDV)k7o&%m{)6LQ>{(aAsfhp?3{=QY9`(9|2hnNaEW@iU{%RVV-pO67NQ;;o8s(&{v~|gT z)8tm$$LJ3NjJ99K??f{hJ-}X3DKuyn+6{ zE}y3T{=ZF=pE~Z~Ijx2D0Y?-sX_UKKHRylFF+=s7^R}I2gLpwdc*N9J`DH6s&Fz0` zy1V{{c4>*2w|0{on&j}NLjT}E0GirGA~iF3ICX!XWS9Fz0FhZMWd6b&{5+>{o`Hkt z(QC5(ZEk-{4!vmFFvf#l%97v#ByrcLpyd*?q=}xl$eNY%M_qw654!ez7co|E@4zN* z<}=z&nH>z4FP4)qR}u5Qc6a^PcSYFxfK-Oo2LscWmUP=ztd0(oY4{cWv82TKVI`**YuC*Wrm`!h3n zqqP1}G6?Elp*Yo|{(X{$DnSv;mX*)M)FM5Zm4_5&_J#((Va-J`=aKq!e>EfU=}bCU zX54-}rE41XNw0^7Xl@Q9m4$hLBhOH1(dza;I4RwK-3+4`E$;(Fi8T z^Sx%^E1*Z-E$vp%rWroWlEqw1R>7G8!^4ft&EV?>Sm-1kxd)Tnta|Yh9EO3R{=s)< z+`%d6)9;51V(6r17H;W}t?C1<0Z_TAnD^XzjWQ$O*iH9!I!Bm-A(3=-9(Bx8;s4XzIHIk zza$fZOkir!1TtwfNxhEv5^#7ycOfd%L}w0s1l`t*&(04gTc&Lsg5utC;0Cg?K|1^P zC_8eHEX+|ABTFe5Df9FoZJ{RKx@vmz7zkHaggb)gbJXPeAVk9M8o)@YZ8?<>HYp;H zurvq)00F#hO6v%nROjQ^t|vN7g2Hc|sIV7PdwJ|m)I6qOOx}G^e)EDoB?c|9JBGP9H)cr0@X(E+ zy_+;<&wb1+eMr9enC0G&2xIG0)zd;V*=3SRTIa5OzN4ch-;t-P;`2ISeNv`QzoX|! zncq|H=%BVt+*Q33@{`AMEiEm{FsQQP=Qrm!|5W4)NWQdCp={++s&%PhE6e6-(%nK4 z?B?SnTc&C+OR>CoTFkW%`&BmA}{p_sP9`L6KcC4K4V{hfk4jPe7LOPz?S4fXgO}IZ${Cn z7-=oOxlXi!xlx`cYa(f%Mf_o+<80-Hj4b3)$#URt5c1vNME|D9H-kMZ@bS@jxwka% zHOL_ z2FI4FgkFf!c}jifi|c>7hIPDAMn^}3 zN`6$@5){gb_nB~A^OZSr7xlLEYXmYH_(?JkmZfw$gA#~WNlN!$@%^$fiPa&9#5AjNcLpZljgYR zjm|c*MrY3-4Ms;_)9X`9oM9#4-fJZGw78>T+Y&KBQ+2gFw%SpKOH6yPyhhj=uvWjL z#TMEIK;bASFeE)X#dxo#@vY5shNMT;Zi@HGF2)l-qAXbTWAshoh@Y=PlYU*H{-x^u z#tJIR5ft|JbO&k$ZHg<)%;~jIlsu9wHJ$lN{^iGu8Z?(TEdl|H>(Ugf&7iV_hnwGS1qPNXuq(RJ@Fjz*ai0v?zOnJMN zVToKrv>Rtx$~thQnB82}E#e0fNvpmAS3z(>%RQYT(d5Ol|B<{%AGWbBE2B%IZvOr$ zg&=^0C*V3!?GFyK7iQYu-27P?^O%wEG|0_-0LY)2UOtYU?Uu`~n!8Xm`Rxp$ow+6c zKXVuMHO*brO&@DT^=5&3u1Tb(m}F#2Xz`Cy=>|?EAJ21Ws={HcKv9;9nNVSf*yBW* zN3Wk`$m4Lxe8%K;TXn3;Xp`nEh+Sy4mX7T*Cmz++L0cRq3M3*lm3Q(;q2i2g?s z*2!#;&n4fA=JU^VJadz*!rFPO%B#xdLLkFYx4cS=fSg`!?=~lf)b!^%p3X#M(4h4B z@PkywWqJ>%iQn+1ARc}p7_CfD7teo}i(jeeJXXzP!b;Q+-~ur9&CMJ4OB)9G=kYiL zfJX6B=2Q*=*J8fvL*b6lo0#iQ?7wPNu!?rU_gV-<)2m`O_K0SE49&U>*$hSvyT5AH z_u{h1mB~|Orh<*!kp5sfVHr4Op)wj2d@pL`!EK*~DUGv&An>Fz`u#diy)CIBH%RqN zeYowJji)5mVf<&xn>Rnwh7cWh6GK%l!?@6lvcV$+6R6O7PCmTyv}>O?7R&uY)oS1O z3zdCccO%r)oC}-PE%O;?L(fNfvm~N&UQ}-TvsbP(Pc?I4zevk3c#^Q^?V1|9*xFxe zD>jM`4@XXv`pT(z{9+bU!KbZGtOlLnvl7&|@vJ+g_QC}qP4S!5>qdP6Ne3_3)}XM- z(t1#kKng)2^i(Be#U)GP1`PBLw9SSmT3t)q3SCXA+q@w5Fx<1^#me_(q*9Ms^9qG( zK#}gLOrP0DWCbeMk#kj#Fmgymm$U|Qmd0Ux`z49u=CHvy)hVubU&PE4vsnzCTVDpC zt&(3>>l2{IE)H9)NG3n11r>BMMzFi}V=WO9W2_L@I|F9|AAUk|UQjmVc=xYMmwzXK|rP(-h!wZ${HhKT#^_36UFRc<8_SN-;bnYszmQ!z9=E!TCa>!3^f zdX;WG!E^j$8txC9j>t4>=NRg0nG((TldL=OTPo!OOzWRz?{fK(M;?dZ6fZ9xda|VC z$V`hnQP;?Xmc6Omp#&p!t~a?65Gxl*c}5~rzN`_FUPQ}GmY3{ac>0s|~Wq$2NBA8Y>$MR$^2tbJSHjpfK; zy>E_dcjQnwA_qsjN^qC9BO(tS==i{|+-x$z!OiJ%r`8Q=+o&*ljQM^Mv&8PjG3703 z%@Z!+ij_fdSq|E@(SBQV|6ULf`!YER!<1Ecvd2~R=m5T?FR-ZG#E+5@D$LkW#V=oT z51-jh%AabX+3e{lQ-_lX5{X1UPXi=UTxVa7m{a&J9ASCMk2ro_T0G?Rc{buPe~oRf zzwpBPp86iC58M6fSFGq+QNNHRq{y(tq~ zkQ&eHx%@3W7}I{c*%!7gA1WWy|5( zIC%Io&+z{<7aGa+T-X!W=`W3qtr#1lVT~D!hKF@FYdIaZ4r*Ct8enowKOQRfA zU!NaqnbrPQoKTJ9H@B?d=2s;1D_T~p$gjxnAfx%soB52tV_}9vhmo?&mN8u1F%H{2 zJ@nD?vx(1I>O)UW(cjGvx66GFg&&Xv@fE0YH6ZDW*snPDZzh87d_rerv}dz+J-5&` zmX+3gpl)VYM`4V2%V-RLbGe1eBSHKZ$O^hB^9NeD=MeHB;^K0nJkd`P^vb^NHIC#i zys%79+>0~h$6`7h`;%ze`&R@(CA_V{L@u(wQPaOtdZ=AuS6?j-5bB;@sS3;a50OKw zR8#tX9c3m&4-mTSquC9!w8qRy5bw#W^#*F&?9gGmY<^irbq`%uZfg*H z4mPP8=lj)|$Rvh~;~t2c3p6g0V`@ylX4_|)`WhzB-F*F2{5A3w^5<%I^wsy|xxn)lxENRkI_|CG$*$?aou=mZS-D)=a+^haI9L5SQ6vcBVrSc3+XtC%m9?d%`TJcIBLDEcx=i z(_|twAG?WZqeR%>cc$LvWbmNrNVqwACMGEkH}JDfr&pMS%GL^Lfo+M6gBu0QN(7TM z7-Z}iY9%OaCDF3=&aITBvaC!i-M?FDhZ9;O(}d-|U-2uW(kJ596%Um?r1!R#`93ZKgF~i(ffXmr^%&p;GV5>PjW3ymhBZd!4W$RU}w7 z(e753)=8x{hv_`g>3&Np-q^RMrz@n8ha!q>uJbnf;`d-wgB~X5Kqe2uNSlvK$1!bYZ&bVl+c}NF|*YCijRYlHZ&3vXtA}#!C0K2(&rHN zsQ)vE`e(W{RJa%%G9J-MKFST|zeQTuBDc&;06#sW8xXs}Zb+$CBFWS`scUe{4=s_O zEa?~S0Q8AC?hTxHCsh1ZjEW%d%e z&5=JYcE=9h#UDe`dfNNOfUW$ou@kARb#wgE#dG$g#HZycxOIl_$(Yx%7!!(zMXAK~ zSnx4Uh#&_9+h}o2P{r#BD%v!nL&^A9Cy{_lFiG(t#alH zi!N`a2d$yA+~dvJ-7I!{R>(gX+0xNBnyTM*mOJsT2h^$!NCNIr|5vZpL ze5F+r_zw~NNloDZyYT=tO9X$du&mV(Q!-a&Zw+-IS*-4ENRf>w^KK60?@V&DZRzrx zu6bjjn+Ikj&lc?7md-!ebg5gx1ou#H8stXlW-a@OVmXOZ1^Cia`LlR=KPP5x);;rw zo}AOn+MdtxKc0=+%(>-qoAj0Q1&n;pDQze%-@TfaB8_-|+Gfi=sPhyqN6$Id&4VGH#q09Djk$79dCVA(do0@S3gUI9S||P5d?~N` zl0_!ZYjVpsG_6L%1nyoTo^g}hfsEua(FnuXKXS6uV^Y=HC;0+qyJvzu(CnKAkTpM+ z?+KVsP|LCMpW3`0>1te>7s;aouWj!3#>$1UD?qOv5c5;qAOer8jcIRTpM#9x>g3Pd z$_y!vdDDW{GZ!OXXMSZ8->kSR+Fkc1!iZ}c0y*_e&gS++8vF9DLc8wXjhE6t zUPiCF`K_()srR=Rc-ND>w~y;DS|a|8V%hcS1NGfso7H)y;?%dP)w1$K;^dua8Oohm zPO^{i`OQALeA_LC$@o!jT_K{qV`DhqN?mc&+1HD9}gq(H|x zGd1e3k*{fOLQCoZ(B0Dr0UD+AhOHzz(2wTqq@3LD=Fe`Im04$_W`wsMD7lb|?1Myy z9JZf2h(EU}642Yz94SyLJ+_7dbp5&YFgJgL&-2i{MY-Spbbc8mj&hzViu{U_)k#(Hz;Q`^e00XL8x$Jqi#cSvH~1# z4=ap|AG5DhYh@)++Npq|r6$88J<_1}&RY)3BO%gjJ3~=de1~;a@B_S-U8wsdf!KjIYC_zNZcgSEje&C4bjEiT<^tmI9gUX#vWS8q?#=dL~w&~t1i^2(mLx&l!w?;5Gs8igGb`A}o_)yTWk z?2truT#M@D1MZ~WenP+ACeK;|YtEngqSir34_6+rUhFi75vxvtR=Vpki(Ztb8@1IJxv-hqwNlc#O$4P9v#|A-&c{tXMCO@_CL zBU{pA+YsQ`dd0o8h%sSP*Apmx5{JgAX%}ID8^x|x{z_nUU8Ca-W7OBA30CV3UgzL1=^TTK%YOUu0MJ`jQG}N|jwQ1fN;v~5 z3MvfeO%Lk{p`x_2+?b=a$huwy<0Wv+W$ZJ<RpkuJ z?^)V^k`gyko57 z?&&?b%y+BWjT}A2?b&fIPay|PF-K6IA(l9?e8b+XS%{8OHKv1TBuX;n)+yUiI8!%Y zuFa&5ln&0Z1FMQ3bIi?3MOX7NL@jln)eR)1`l*=P^IP>%Fz z$F^fz=kLH`vXsYbNOhjreZo69GYXz%Rxkq^5Q1l!qpQu1K)_P>51Kn*6}dF3-v0Rz z?wW8B;_0)625$j#cp-~en>z96H{^kTjV=_iI|{nr*15uv>CnzYxBH4(vf;K&D%5a?IddD#YaYhOLK-}1)2f2TOdYvKl+}ymNp-`+DC}N5KCa}! zPMj}8d&}eTk=}`o1I~ikPKfNH&>9Pmz$J!u=}>`XF5@8@gx28BBXv`n<>W=G!p;@v zovH|5zQ)+=$&>5$92`+=&$4z{EaR}pV*7ZDnOg_SV_r3VB)k=NIiglp*OKI=+MZ#d zjVctzhoZ#ja+z-3YWFoLH&+f?LU1gv!j{~Q4Rd==ZjYhQr+$D%ooK`lZPTLJ@l0fQ zJ$8Bo#atB%WU)&9fwsBk$Q69B#0)me?ODkK02u;u-rC*y3F@}i{5jz?S34`6$a-Uu zEgqaepLSOYNdRo%b)Bld2eRzR)(h9l@oUYjMc7g4T9i6qO*M53_&wWki~SUE=UZqA z79~|;^JuoFBngXylC?0Xif(sPb*2(!niYDZ(nn#9I=3+ll?l zslM8=uSHUyG)IuR!*Fq4|!bAI^10?e@7|V7AY-*|k=M zwmY?bt{<0lpS6?$E($iy< zb3}DX%2wlIeeB!2MsYtL-dU+&STrZGI6KH(q3hS5a~yqY!8uTNKq#>l!uDa(x9b( zp+_MzcK@tCEK25KwK_x!W-n<|`j)A%-c08&Vx+!(wOnmYZe@hH?)OA$pEKqhROw=) z&BMQJHW%$7?G5ILuZiDcduOHd{iZdaXBmD|Xxn0i$Zcr$mGVg{yp5$5v&EQaY;&G4 z9)RfQ=tUHYSi+pGS|;aA`Gk2di;pi?gsB)b)qDbdo^hH(t9n}Q#8c>GnB-?-g56CK zWSykKzbU*YVUZqduJz^haU($Y
o#?fm8YBaS+2^~mGWk*<*uX7(e+c;g=}#v2(C|9>sU`*)Dq zwJk`cNNr@Cn7vsZVjHQh5#j42G9K2cvGP^(g;6U1B0OewJUwz_CbBr5Va%ygi=3+H zGRTr8JY^4tySlo1dPcf>y2d{&Q5)$Q8R?-!&FdL?y^7$@9r?DjjdUF^?)cs+D9C_w zz4Aq)-;m54mrtY3-lvfuj8VHFmKec*ic@GA$5ov_-lJd;T6?h`Pn=4u$Rhh+;?yC- zRtjC?d$D;^2w&m_AU5bxZmVm2R?Hng)6DPb*%rRyv7(vX@fu@42w!QeK~qwWrV%Wz zNd_ZB$l$Vh02+qw#uz+?QVg`oU{O0(?|?7u?4 z@8yK^vXJ8-l%4Y5L)pmd`c*>N$263E{Xc}V`^3{--&b~j`$U3RwsS;!*s(5|h*0Vk zI{vDZw$*u^9#6A%_O>{do8`pzBY~_rS@jw&qQ-&Ch+-H1zeKTi4jVvfXCem^#O~fT zG7gl$IHhW)j~6Mo;3Z*f7h!Bj$y$9Nay9<%Fcx~3_bF(qj)a9It=j|H6*U$mOs0DL zYc|L9Y!7BXSN%aS`%N~K()<3uMYEPL>!(w## z!H`o{nM;zsiW}z4 zQ0Rl`xenZ)>YmQjD>O{iTQdrP@E_We?e6igv}e3^dub05^M|E9+ahL}#oh@zj~|rw z{7y@I>?XZ$#~vq_X`-0|z0ST-n`2sJ|=;0Rlj(nA?Gpj=vp+LhSANY17JbJ=oeDk!sr~-MJ|w{5*8jT zfj+<-dy~3m)gOC*5r|8Zrmog|J5BGht)~nuk7kPeTAQ z&CYBUO*1HF7xnPfVM1Ht0pSH;=27lp@sdWlc+niWLS)_tF*MROw?ST>PWuN84veXd z>LQygTeO^vUN1>uAbDxG2hjVA`Hung+5fiydWT%Ibd2=kk&YTMq{#7^H~r5D`cz5h zK0~dS*7Joyw0*BOd)tcdySd)3-mY3%T4uI>0Klh7M9`c&<1Fp!+O#RE>m(Q( z8y_F<9q&D-rbr1y?^y4aEsl7-TLy8}q#GiyEn61qm}xyK$2a!wX1a4@BO|#d_1(83 z#MWISy*Lv+Te^DiA8;vlkWB76!7lu}9Ab^*jZhA;*I2HH+<|mxXzg}|XI$Mi)|JZ< z;UjSbeS|y!JVagm`XxtRFh%a6w|CcFcYR&_O`A526Qgk3y`MOoZ{hbO zl1Z}HM}qGXE%Q=8?imX8JA z5maE&Se&%3%MHbOF`oJy)mkw!>n<+Mm29UX`zknQpINZ(z4zW@P2tN?)e(lPareC` z()=Fl2@SWGKAurX=I}7wwnXn$`d)Ni-ImD!2KY!_ve1==PIxX!0Q?%^=Fu0nKvzpC zlWI}N?ZpTDAn<-Lvn}wB-S7OjM0)C9%~OIP5OijMAfz5Lhm+jQ<^F3U%YnRf?!6kg z2$d!CBUI%ziK!;?hNBOOa&Hp|5j#7(?u}37u(^1qE>Qw656~Dqhg@%=5oLU2Y-AjO ztfBWUP*K>-h$X~4l+hTxErt3k*b)BVA|aEWSZ3&d#Ny_3_Egdj3EVzT2q@oCLck`I z*E>}X)osYjSCpMmk(XURh{iSEe$1>(^^N!96pUQcl_KCa3mVL~rpcE)v{n@gZKjx? zP4i^S0U&YsJ=5fbl)q&}wp^Ea17#&!Mz(Z~@OzhR+0q*7A_~GrE?HRXgnw&Alwa2dPdVqNQ_Qmpe<9vo>>x%BquC9?QFYO4^*&*EA2xOGil6|2c4X38iNAu$`?(9 zQCh{a>Aa1LOVp9~jRy&5qHM%!4ShVb8g=L-JrDDEwQ zAC`OOQiOOSfdb`Y}l{? zZHUM){}eK_M|GVp5ND36qIhOQtIXc80e{Jr)6X3qhQ*;+5U+SHwVp#c)s(71hnn^4 zEyd?G>BpDNE7CX!>_TY|J7)(&yC|b$K%-x21HF|-E)4>DF=1X9O3G^ZjEcczfs;L8 zp(2(f09c9O4!kDh23C#BaWsvViX~i1h((Gewg^S7v$2QK7+8(@%R4{g*YRC-NZpn14T(!*h7RGYd3?#Lre(v9@Po6Hm>Kw=p;GAY2eTefRi1@UQRDJ3RQbVIK&pB}=CTN8#L zlfo;b5&%>Prg2b-7kr(FODQZ|I!p^Nw zDVz(ozFiO$E%_*oV^sSTyCu>v~6qX*0okwqdQK_1SlztBH>Ucq)`*d6nVZct72ca*6rKB`83>ygT zHbZ!ijmFLu^98h`p$yqJM(rQSW@`|kwx>B!U+OmQP=hKGz@ggu;`JtVLUf+|C<=OP zGDZ$mqvD(|^+izh@n{Z7K1-q%mCx>CsW@2ry+F8Ed_IvY1*J}t4T{aw8ycQ*isAht z%Wkk#V4wokTuA`Y$MN$ zJvjsykeSss6WnQNe4nnMr_6OyyT+HJ0YR5?spD}zlobmT-98CNppy+cEPVQkBC7kb^(=Z6}coCxi4Jv*Sqq?DxNWIS%!Ct{I<>w zE;e!mw#zWfe+(aJ7B#dXWh1w&*%TNo$JB?7G2AC<^-TTH-BCkMAFLBiA?H zRMK*EyG9CzVyrgJ%fY8qddV30jMh4_h2oIfCIBEvt1|K^YLmo(NC5Rt(!9o2WSTso zMaL~AYZ8YDgcqQw-cadCA*W-|wC|eiQ1K-(uhmPlL#o2g2p=s}_SK3;p`1R-+{n$_ zzpKO(@-v5Zwl;+6uw{Ti`c6oZZU&p z3+v9Wi^z=;cMu}E4v8~~YwLvFQ`e^`?skJmjk7Y;|KAS5T|91@8oByM_eC`|QFS&B z4V7SZ2sJR%RpASud+a<`=(907E9%@Hi#7wLMq`tu=0vTNf_CBVIwH80rJ+F8R$9y{ zF`dj~jEvW2hQ37KYupq;X1^BVT3H6RlH`dt>sh6ZxjAYwNd~;Z=E{uROY!m?KqMoh1?{cfiL7 zhQDt6I9UKrFlJfQHmB{Aa9l|A(YQUwLYtP_i|QNDn#CrMt8#!6C(?7t?c8m^Lgy+) zBYRt#pGM5nk(74D_llWkXx6dYxh8X%{%oG95(xpF|cv1(JRpZdGtQDEp^OZ#0*x z=ue^RvDO?}W5RrN@>U6N8X(MJB!ZZxvyOZSXIL^Vn z;mEwy$lA#b7l+?z@PeT#n-1(GvhwEA=#1gvU8Uywc({vNMFna>HANgFl&KQ&`lb89W((soZm4TTS&MLP^=uVb>Uo0&`pw;`RBKbZooD!L)-cqzl zb{rhM!lM%(emP)0&TEc}%aJ;*vZTpelFSUgPo0QRK%ndGNL}pqB!i;u7%qKF+YR*z zO2b2Cu|J_UGOiN#pzK*1E)M?G*hdW@jXU&>R&Tg?qYj!$J;JFu-<{Gj{CRPQ57hiL z9|$|5Mhe4&gTos(0C52;?5|Mc&KpWa>jlGKGqZ}tlAb(uI&0{G$$Z5o)*-+x{_s#~ zcxlSrz>@qyL~fACW072O!-oBhd1bO2%!4PTrE_?&*q3w%zhBjjwH_XRP)E={ri8qR zjVy@7zG;=Y`D{F>;o;!*w$9?v22?##!pDfhrpeaVRqhQBU#PV{^0|z>g_hUm61f&8 z^;&l1(OF>s|d z)7*eT2x%W*QnhqsltdgW3cgs=q&hXix&ZOX;nhRkU94@eztZDme#RZRnPS8`nMC=Q zBTvEWMT8!AOV49Z8|0N~vTlb=@cX)4P#WHsBz{W1*yxu2UPq!;o}Z$f2J=k(o;(;azd^05 zCuwd17p40$Dm_ty+3%(PufYxCS(?D@C1xqq?CX!xXf6kz`vbM+G~)(WM`1a;nkV@^ z`wtnrlaZGvWr9UU4$8QL|MKKFERU$%Itx3JLp_|5A#ma0?eTHqZ20d`mFb}|O}NQ@ zak;8Weq9F%BVnL@Fe*5-U>iS0A*VD!B>4Rx%(qLbgZ7l*w{(13qnoz99g|B{+sLeN zXPXN|D)90ulYQnT<)kwC&oevrf zh`m=~eVq9vNS7Sh0JA0>b1^KYEXGfGZif7|B|Wq+g%*GwxYg~-d-qLT8@#9mHa&=A z%j3Lf){a`79^E28*^;6))s>5JkTb$8@R8#31s?%rApWCA`;J{$3ha@L)wJ8LzD=siYNSoLUF3Zvzjl1aPhdE<^E8a@-}CDNB6s@epzLo z2I~QWo4IWegUQ}8b9s$?wgXq_;1;>T$WG02LqdIzw;K%7->+e$vKp4kph$_r08ytq6CT91)G5q$hc`pHP`wOKdblrTD!NaE{4rvl zs&<2?tKH!*R-4byZ7*&3sfqqxZ${c8O9zAX>+=orH$(L5gQ~25*7WgSk-uCPYsC-~ z-EK7ybFyb5PpOsQOv#}-KJ?t8&&^RXWssvALi`JRj~B>jPa^&_(jPaig5zY5sl~A8 zwr3xv7q@p|_Da0kWUK72qq-MkN-O%@!2_%1yR+4gAmiGUR8*CyX0WPOzMDiBe6dPO z)m#IB`dWKwt(+gnm@&h0THHKUCA&dpYUIb&=7ogJ(BdRFsH=5mRHz)h%zvY6u-%;N?ka^#lQrhxItNi=3U=38;cD|&L?v`@|5$4tAS~bs#F=ko z8FeT%=E$ApsDzztV#6V(vLPwU5(H#AyqOwVLHJuOH<955%C0q+8aa!K<&>S9kacs} z#@Bp@j?5&SlK9E;oJ9HePcCkBhxr;pH$-4av%In#341ED$al`zb8xLA@@;h5eB+fn8#C=d z|G*$g9Y|tS=$^#Vh&?1~#vNWnK>6rer#4GxX|PU84gsD!cvxCh;#pxwrJ-!|6Je2i z4W&vl5T=#Cnvpp%OJ&!Nibz_j9qH$J&Z%WDG5GqX@w6IHAr~n+lzB9Iw;Y+@V0X%p zC1$%-wI;lsbzamTjwxAlxvd{yxGrEmqNEQa&B|8d4t)L-XP~Yy(d)zZ`lbD){`FKB z125-!GLqIff`~i)-Z9y@9$ivW?!f&*HG&*HlCtNC{66yWtWz&Aj}RK|mXRM%vomY$ zOn558iq5TD4<`)piv3SE$hg}**v}S2c^AK`rb&L2bxXMpdAnY&aOK-sX=s%9GaUN3 zD^IjbN0a=lwL9o9mHO{MsZFlWdi})|4{%)&v6>;qD!A)^wX3cuHTIDHpOQ zLxWjt_)kt~$HuZ;v~cZ$(CdpR1Vs`VnghZfmI(N>Ol^|)X%h#s4Eirq-o*Za`bmBX z<+yl>8~igXK}(K}VkT$ZfoIy}#i%zp&^F8bO5_PNREONQLRH(2^?i^*7WrEPF4v$1UY#ks+iX9n2)F+t=s7~$|H(<%Yc!oK zbmYKpa|ZEHslUG+eo@7e1Q=l_F-KTSRrz0Zs#$i%%nb+p#FLCHL z2iaC=pmml!hHpLD(EhZ#jolmFfrR4@Jg-z{cu81!%MeraXqzJz3 zLCO@|B!gplGEiPHc2Zk+FgSR4zESz;Vv}%u7vy}Rk946+4xN~o7@goX6-l{K?~W?T zdkcFh()2>)hS*Fj*d_I4xr7>xsw4DYAe+pUY#INVgV{T70v_czBcE{BRAi#U>D~w` z-h>xS_!upAVyZ-?uMqH=JCT$H6BGW+qTY!XyxsbvM7`-;RvmL>Pyg3}{L0)A0EU9* z_VsliAoal%X(dxR=wOYI&DIc{;qmbyr-yUHjP?%dGH=pcICm-A@VT8O3iyvh!wr+4 zT&J;)Oa)qCK8Lj)GlI)NrPguRQ!rNu}fS4 zooT~5M~P(h_G549k$GcIN`7K0*vZ^YH-iEMF}2C}fy9M!cH&Q}x=i!N+C(NM#3^AsbJUE(!c}EG?%~*&H!ni4y3WrJB?R(>AYL9=^rDLiP+sW#cqO zkotTtxMQ?J!3d~{%XZVc>@MYod3+Aw*=HyP4c>=bWVqO`Vhy7|qc4e!hYq1#rcaO= zWmqn>q&=%s`vUiIXYo_?gG+;nf>-fJM@I?ntoWl+@ZV*qcSoPa`$k14t*}_SSvKCN z7yBeP?~lUA(A?}x;cyjQou>Qa-o(TzC1~St0Ca{7&T`5W&=@)IbXn@<{9L$<>ke1P zY_hlBWODWNWQp5-bYg{H@qNnU)=Tv4gp@=TCDl6Jg~BJ4Ohw{TB;#RhxXm18ZS6(YQH>HXSx)(r2L#nZpjujgAI$(91RQBeOA>81*N7^h~2< z@OIM^ShQBXn4wt2MqjW;DZ59HyL?LokS~NW|gX69E!G!Nqm$ILvgX1MPF%h5- z$P@W9#0~CAx}#TXXdz#dY%qEz%=SNKKu0HJUXqzgPuz=!@(G5iuciG|&eF7nTgg`C zMkhu~B0th4;he1S_Ugb7Mkfx_r$~>sMeVwXT<@5BjUR{<&XSDJWtTG06aG96mFz!& zKt?Aj9b}!``MV$a=nmO>iW}Tr=M^T7a*$R#D^(Z`ctW88_KFnChC|)ye5c;oqV8Us zAM6?D=ZuQ?YE_)EJuE!SF_F*2(kv>uw8|iBQ5AepG4s3#-=CO_D{RsgtoA!q2xK8q zUwOOA^Zg5|q5P0%BS5W_bPcb?fUHUfpK%Ca2^6X!YmMD`Tp^maI3=^ zV@>*}DV3EyqzX%%S|%y8i`YJTMKpEG8jZlK!qk6(kd9F|smFLYjBLQ^y4e*k&4;dB zY#gR^zVSWZ^L9?83!l;|I6vSa@#8)#*+OAcmGdjTP2cx}fSg(3IB3kGp(tD}o=TQlM9-FJuB8k2U>ErqXFr@cGG6LFIC|IjJudV8CUcdnWg6e)In zOTty$Ew0O%?O!7ZjFNwl)}MIGaSQJoOptq>+LhP}F=tax1Zboi$aFGFU#o^fw8ekB znq&+)s)Yr~t&#cNGVuup{QRm2ygaN@jCeI=ln?s8=VHixFYqh3TP#}iWQ~rZtnLpO zMVp-u8AZ7weptQFPUCy3utsNSh2wM#E1!T!s9}gYEA>sA@r)F>A5T21_wE(CnVqU8q#(!)&RXp@l07q#p|`=)`^?I~FQ5Iieih?pGw|d0w?6GaXx} z_HuWwb-Zy4N16Ga?_XxH1LkzG+R#M9XDHJj;%0*s}F3ZX2 zXf(zJM)|Xj-Hs+RRA7B=fxkp9qBCi(@Sr|G_$MRBGbp=s1X`X~)!z)@Z8A&FO2|fSOR~)@D_oj#h>M zFT@X|5){QuFy_Y)iV4_;p!j2|U|A3KK}*KGt(k$ee_y!HJ3wZ14FDjyGRC4(>zOz! zVegjcH#JW?gROZmI)#dVO2qX~RMDob9b3(3p0k%E3TWGCZbE`gN+6LcdBX(ih}{33zn(jL81U zOz@prjT(2RrdQ`cGjlaFbUf#E28B_F8Hi^Kg^SdWl?OE)?X+9f`3<2%vtJ8IysYmt zhKJe+D~~9EDW1uu0}{sw-GXN$=GiD(%6K6_j8Tci4Yr%}-4|g3B`X2z2{Ylcu?&SP z@MTpchGJf@5wC)~GPK>hz|CqCxIk7iELsy*e~RzyjDPO#UTq z)Ypq`&&u_6yE)&Lr}6Wx9QelQnmbldkiSx*@^CWS96`{=Yn^>`4bI)IP_$Yf_;@<` zUZ^rpM-|m55S3Ub6O3qgg*EElv1as*$ileKG6-&}c~gSXpn%|4D$UIkfm9YdEG&O- z*YgUpu*Y$IQd_U8(T%&&zU>J*1s_AEfbNZJHVVPR^&S(mW97;~nrGYSO56>n8*k!` zH};j$0`|mpIr+r%Ehu&KC!mUnciAi2X$|BTEZAr3fP#YqGy)(0!lwih8s7;RLY_=!pOqzof6w8f@ z_qj_=E7V48KluY3sXdeS)Tn(yX}jc?lx#$(#9^|wh>VVn@+x3V##YvPu~9m-`=xI* z2x6lW+fd7M$?T{XjDAgv5LgQ4;Y;MJNESvwPJYL0_jhb%*uHN>1~;(ZqM=nGMK0c;yDFp_lcj1ZXzKGv&J zDO5Tlb|aqObiZAjooSK3M%sd5cVeUZB*y_ z@O#e8NE*qqB(HHckL69WWm${uIE!N0ah!!Lj-7>&gjlvDTSS(GBs(#XAlA~BLRbno zO^boDwLmG*Qd&|BZGl3dp$pJLOW+nLx0HrGv`~M~Q9@|%ckk~%wrokWojJ?9zt4N1 zw0Ke$v(}o*Yat-o>^EXUsT+|7AOHu1Ar!L}Q3@bNx!yO6F;^&sNsO8g%EW(R0a~M8 zp+0zXmT$cS#=q6*u?B5IH9-OCd z;!&Y^V)?d!ouU1>^y0iC3UL|DNs%5qoGGA&1w-xCkbs;CIC))l)CK3PgV@65ILlhiR$gR+$N}50odnXHO$xa35^TvUJ zN8u7dVB-h2$vcYJP`*A=Q=wqDhl+ZEJwNTgQxc}dZ=1B~=>jOLn0wQ|Rpke2v}rI< zD+DWW%p5vbJytewbU=JM8U&r39@sxE?37dc2d3KhPqiNl_8!aS_UER&rDdMK3)YI@ z5*onx!LVnTW4(80#Z}W#MhAie19$Eut@pMV9Wzb&r-BfyXw|Cw{rJTXepgK$&G|pn z-GW20e`}Y@5kX#N&TzfL0h$I>i!%&X#Q$S-G3)`YDc%j zqRyV%vua?~s@(LRJyxrA&rfA|cj3h#EPM;)P?*Hi-VVrH2*FbZ!xRDzxK|XtK+TyS z;}L9YZf4r#WS8(_Qa1sEjOK9q3RW=qCoDdKk9h{}9e7)UO%E8T0(zF%T0JOA3I#C$ zi<-k{gsLqg$bz7!aOKby3LuzCkx6-2s404)IujNkhtjam4N=E|sQ#je-!oWNYUTC0C=TcO-*61t1 z9x_n59zM3K`AbIlQrSC#L$S?z9xA6#Jv6MhX>LG>GuB_y4_QFd>T$Ua^=K}4R3n2SvQh+d7@hCT2tig4a{BWf;c&0EdA)$f(VPue6oTSXjA74iL@8yY@ zQI$&x(%AGZoLyEZ)ssydxA2seHxeJW&YF6;42#_wJYB3nx{tNxf&&!-6pIVtyonWS z4hF|C1T)%H07z`OjcQqV77IxHQZu`!wu-bj=UWG0@kuak;OI9Bf>=YrZIX3bhEoUw z(jrw&Yasfa_zH8PlM7!O^i9l$YnYY3&)Ff1C#U7c<`q#}xd@X3DRQ$7IS30=PC_>X zr>1kyNU)>^fgel1t+(ag!HEk+kX=q zOhxhrqtQkWgi#J4*E8mu07oxmq3Nk;F_RGIK3MAw2ElcZ3Lcuqj;ZM_5{CmbD&b3Z zqs^mH@L6Fd0mP#fJWWdFsgDhF^2UqcCq-dvs;aDf4$k~Ms?C>W`Zn^_3fQa6kqhoD zARiTJD~Mvm<1$wJ< zE4fw*X-GAk&UNNvB6P6#psJVfKAQP*;yXdW^R8fs8{li22uK09hf5JUxC^a4|NQ$g z{4#1&0S9nBU?V60GrvqY?R^X@jZh06{Dx$}SqCYoSQ)w$Bqtip<)YD}CLz%X*n2QE zG~$%6FgOs5ui5ML4h#hKR0x0Xz~808Y20{HaLL;Q9-S;fk2plU50g!N=FI~GCNBA= zZ-ajo55lyg!8JTsM+CJjh~-;%I^tj`ScmPWDEk1Q@G5$pTL=7f)nR|mUvU`yv<2zP z63G7K!1E&K2gmbzLGFaf-+%_Xintfc9H|}HgArR$^FKX`6~%OEiAYkLnaR+9Yg2WT zRF}sP_1`xi7MwD;6Se69zr_Q7GpCgOM6&@_gv*3Uy=|5?hi+eGVfU5=Q5t5l2MCJu zdvlYy++=4dMl;tymo``@p~znD@6F|~mJBE*in-hc%WEDF9$hPpSxr`|lWkTrb>*y+ z(2#A@*8`9kR<>^0J3VcEtcU`|o#dZJr5&=@VWI}Xs$mqFM6}~p>-1zWH{j0+ae>xW zf$&g2`TKKjOq;SG7E%AB)l^;X4d&L|md|Iff)U@3EB%dvM}wrrt0CK2{fqJ<%EhIi z2G&Vv#n%u>E5=2EVk)Ae*0bl}pUGHrcvSEeN|&)AhJ^;HABdI)ToZs#y+nZLK3HbU zM3^Q@HBp3tllyb%)(i@Kod>%A-g3Hv9z`u3ZIbXYM~ACDS}*-F!Qo?*p!5mG_T#Ypa{G8wb<=$C`;{nA!>F=eL z)zI*diQxn)X(pP9&Je&&v7D#rY+$>h3#a#@pf8$A+lx`GDoR0`#%?Ehw$kKlR6KxS zc8IpVa)_bU=*^;={{1l7 zq%fPd0x{JDDIw@z_;yt=7o-X=>m9%&ZuOU0gG*t4kgWa->{jwhK|Jb0XbdI>u;K^{ zQjRj=<{&Do<-i(&f&Q!6o`nl1({@4_$R!K{DV&V-4Msm^>`S7o2YSY~u(1ZWT?jI@ zaJV=mCfC3~jTjONS{E@|#Tl$^xmoa3!6(V8as!aZ=9l1Jxvel~P3J0tIxfa9h+0WZ z+nQ@-p4`^{D`#U42y*>6P@wZ%+cPVL(Th%ICg-t%8GzMiW|p(!OmT^I=G!b7&17b- z1r9BS2mNTx{G3_+2WT4WbjFW0ic!rxg9k*P-CjBXRt~2m@M$Ky|Az*3E-*a|wLH1oUdI_fi9 zXCTa8D3(N-;TmBnF2mc$*_&nq{C`&lz%wlG69N|m8p{8BGaIg631!9twHK!pmmKcM zYXyUTuvMG57WP>#B$@tI4;2Zl4qtpq>-_iz@75L6Ii+hwP;KSpH&_kb(n_zlvUYK) z65Tsw8KWA!o!O|nUGRus0`5_`{78PCE03IEsbJi)FmKI7FmRKUY@+FQ9A++^+y^jA z$W==gT5@Cn^FcXy1Edwp*P+XCYLk8d6SEBS2933|J%H#EN{a;7DiQ(bfoxzpRGn#^ zgt0ka@0cM_=Pozod>klM!2j3;X#=W`80+5$d8di#l;Y4dB@DZ|3manOB7A9DPn#s5V4ZVZ^M_ zJGqLoPvRYh>0ut0{w^$lbLbV(o+?W_%~jp3Vg^Q8a5c-B(C&r`2wK*O@Soj6g-0LL z1!lT!1v_sM-MvC+f10qavo|C>t98=6QeGua-$?J8JTo(b@*!>wn(gnlHzMkRKIp;D zPEl*yCkD8f#$a(4C$vgW3KyLPbq?`wt>ydNBv4H4B)tTL$-MeJ$>ExU1`-7SJX{9A zUyBYIkH|T>ar=KTPkyll(;fB)(Yju7@%zlZfEvwr$64$@80n8Jj}%H^4$yh6jw=G?z9NlkUxUm(!E;&Af}Uwh+sf+kS`8rSsHC-V%#Nf3WtIvQ-iNnV6&N>z)20n!TKLZeD=ItK9L;}EU zwp|9F!<)ZW0y&7^M^bGO1`&Kmz?;A^3ZCOb<;8AX<=q#GLIw*}*#Ef3UMkk`9s%BC{I=QYRh3h(QXZ-k$_CUaHuK}=} z&5s`Wswh! zrhh!!f>m)JVc&85{_DDypctT{au{k5&sK!@Pc1s&IRNs#JuTMq$Mh7w`+w7J903oB zA4>Nrvh$mk6J&?}B?vfMx!RZ~EgUkOjF!%riVvJ3-0JVPHy;?uVVZ$#KT5VEaL0&I ze@`&S|BG}NKdZ8mXFs>$d``XxfJ@QR(t>fx2j&%~fK`AYl6U@G$aJzI3W@&=$nT9O3H=D3+#(`#2dpFC6@xX;(gMzhi-Xu(|AlN?yggVbLpc)k zo)??xYX!PCz(<`V_L!(G?PkgqoB?b+0g-c(+#_7^EN09N&mP}|oh+~LZD`K$Uu^{5=-O+ zKd{{}Uq~PN|6~Z3LzQAMN?T4V$Mdm&asHM?>Vg=eVQlCxReD(Czp5$tn`a7M5NZSI z;i-dE=Yd5A2kjLJ!}F|1wh4j7unJ*hdA_jOZf!$hbE2suA+q@d@=ME0f9k~o7@4vX zGEQ*`@CC_Ed<8ta!rlT}&Qrp7Y|e`YfZ#Ze;E@BTV__8sapHmd$=lM>_A0x#B?^@W z(1b1FqcLxkX=W|@dvglqKQpfqn_x0;ZkjYXgO*0Qh=OamYN z3mV%;LAv+n5L!=ey?yI@A$!sVCqK{V>+!Atug;;NNIa4bWn;+%hLEgTfnz~*VFOHF zaJ7O~qK{EHJkJS~-uwl`<^GI!&tq|l?E@w*hhC*+$#^ndhUrapxsH5q0Za`yY6bzL zTJKX&t_bf5g*J}E%vKpu2(Y>2I_~{WLr{!r z@PVx#21=;)#_xRRWeT2g@ROw_6ukW}e+ks&8zYMVkl7M2csPyC_dmJxio0B}A3-Y# z3KMO<=SVy=zJbhhVw)C^jAl}IIy8*9Bg~yIItQ%=4?3~U6o?~1!D;zuER#V$cgNC^ zA<^M5ijtaQCpK||IXFt(L~O?pOpzCtXn7(u7>_`#qJKMd1$J%~$6@;@e<=Ei*2JQb zY-}_FNhud3nhqN1W(Zp_YQnA7DU*FFh&GpyHRuqAv?HRCCwIe9ix$A(3c32kc5J?A z0hR+UJ3Ny8y!rCpy@;L%HQEce%sux&%Z1cLB_%L0U{aq06)YMRm(p+|2w{FZW)YVX z6K+j%Xjde>G1(hRXYoWQH*tIj@2@@idB!G=7u~xqG#Wv;2;_X65F3g|(2Q(0l7>u* zS#@R)`m)4L9UGIo{lurR3~6&RosI12r4Oh(lF6pW@?CvKG7;&e{bG*xk0y6T#0_De zKQ)}kPu;LDl#R$pO}gZgi!Z+P(qJ&Se?MN3nW1TjO`O?||DSjMXArUTla%_B+5S`{ z5(eF)n^*pfXeFr3lU*1WEC|#-1p(2-9Q)!rSQe+QGxP7)$*)Io9p3!FGGOT;&~*68 zF4&;DwSPPPF`N$dD!(21yuFMJ$x<;9Lm*ZlwiCUPgyy&XTebO%oU6c^d= zA&!(nz7Qf9>@+hUcOW|SF0#$Pi{!ZkH!9>0hQxiQyB7dowELOEhjEpud$AA(NQd=N z!?3pD&I45KfQE~o=-6)j-z+|0`)9sG@*{SlSJ8S|;KPe~jcehg0(8j~-X9gFWjKWJ zRHV_A*mdG12J0c504q{{doMrCdc5Bl*^?bhN0J}pZRz2|4=#7xc3(XSFDd9USgXm z6;CXd{pLtKITXuItV)bT(y?qPF%$u%*oWVJczpSb&o{!}^= z3d5j7rY}xu!~qcW^V>0#I7N@w8SA4_%n#hJ+tv295ufkQ^g6V+9RInyUT7#dpP~2QIL0YO`%vNUZ<>fnEIu|@%2@xFD^Adn-y&qY!X~9 zza2A(ONod2oK^lCqpZW%$^2oM1O?*2Q{5n%+nbCfvU&biNK1P2Z^Y%rapEPmV|wvU zw6rgj7#7R{si_xVjHV($Tt`#badP{=8`eJ(3MY4G_`e2a2(5% zQBCn)7&kid=HIiwm=g1F+-dnai?CgBqUfS!9^l!LOU#FvnYaF52YdhbgKxow4vD5? zJEn)lO)wjHXriQQ{D83zR>HbCd&w#{6(WYfDT3A^CXV?xDLX*)-LE z(H;Ny;okr4@P)V*>?8T@n8Snrr#eKeoweX`E5>4ir}U#c#ORLVvk9NO;<0ni38lmM zD4Ho|$LBcv(N<$I?R) zaYp8gNAuvsN--6%z1JjeajLC?n66I`_NQWriTJJ^jW2x>GN!AsFJ zo?PrmE!q-_WqXq8Wh1e8*iqk8LDlundU_>;fmsnx4n{VI;$sjKOZx5fo_dlp*E@}n zSFqM_iBXK0yO89oA)=#C(D{*F8v80c{Vxr%&KAeRyq3K)R~eFe4I1RYfM$;6DMnzbYYC>QKa; zi0pRMcO}CUy%58)a7T~RQ6~-@Ou0uxd+!8K==KKKdr(9=ZXe0>^dOGDo@k|7F$gX2KcPx>K zq_d7%I*Lbj4Ti>XZxC;zOy4)|MsG$ms4bBicJ^-cu*2tUV#bG9k^2!QRWaQ-tLxmn zhe?psk_@8t;?B+PACbw<_{;2kN0ZOxbGqO~IoqiGc~~bEYqxe2BC!*?+2vhB=* z$VJ=o^H9l`bbd;nP$n;i^RWLP%={F>wd8r;aw_g!z>AjmQNbWtfRAVyB(>5vNLI zBPWTBtu(MHg~gb7PllePN_EtNh0&?g|CX^H-MflW-R9YWwNT#`N6**0@YxF$r`Mv# zy6lRNMapQFuZ%+DF_4?=EI4qGUey@~`v>wv3le>ng&+z#bzK_P;uf;CR?t5G6cP2fX&DGh8)CbJ_c*xMT5bI0d3Fe+%n15!5{ zv-d491kj5Im7>5flRuOAGs^p_F$$t7tQy)_Dhz?5KZ`#Or*THtF&>JygMQD~!5&b) zbdaP99UCSo!+IA9*%DNLol>SY(w71n4mBE8n{0I-mIVFDCNtR{-31PO@5GL0q>vj8 zhY3My!(JHT2KDSRI>rNX%J~u<(;~0-EPxgM6RD|IG9j1A~6qBPlnq3iTmr!y>TG)b|+gFsSor(A^u$4#A)tXmGbK zA^ESY@O;E{7=WuQZPFWeahvh$q+Ac2J&<=um*GW2$wUIA#{pUG5vlofwqI{tlt~5d zG`?#ZjfF>qbRF=vfsBS@W0^pUyH!=2n#yU~2rV*i{0VqHrSzLj1Q!ZtjG2+pu84YaxZ&BR}{b_-p<*R#)~ttgu@YP zcI=^>8vLGSobPltRMLu6%-L`rmAD=uTO$g!K(jY2Bz`Ydx*Cxh)BrdX8%FEhylvwI z-;E_=+1P|^9i3Z{%YyxCu}pkG0(ObXSujwa(ZaFJmGX=&tqp^{xXs4ibTXB}=xZaf zQMb0Z+ia|SkFe4T)C-!LPS@5(vXKGuf;a&;pa+w2MC$=l4d2K@L-FKTI5V4uHja!z zAa;pZY!8InPW7(SwT(%vi*Qn1Oz-M4V~Nmc4D1fw*B^;xMq@)7Dl)QdboFx3zmc=Y zLc4nC$mV2xD3rjy<>|2$C{{aN*A+{SgoHe_h+bQ-El4Lc$UAjW0Z-b zNqCR(+clDmn;@sI8j1{#rH7kwwV_xfjh%zBbl6M#&qyYNdnuvL(!~jY;-UkiN`~(u?!6HnT(d&!RZtB zt`r-Mp`YTh@kpja8wDBER?-KB*e}%mu(msv9l>*H;R*CY2U-9D0(pBA?7~D6woa@s z0561AlTyr5;O^^^+K_6s?nWx{4%su54DTzrj$sJ>wU)L`$vKq40JN3~n)n3|42m`EUn+^G8X$MhL57=EA;6pEhUzDti zpCB(pJ3A>i(}u;yy-sI8ljgIjWIPO7n8hr#BeG06um#f-CbOZ)YLnf*tR7-!Uh1}k zW@Wvep?ECy6{}?lnLE3%zIynsjmebPV?S=z>|G&lE+gF|X7d~>S%%1ByYn*0(v1C7 zas;&N$n+=`Z>%GB+)R%lC0F;VkXcWfd>r;w$E@%&ysy}uiy+jeljD(2VRl>;qw-W8mDoFJJyz53Vp7YyU`1|)wybEO;n(x{qnDBv zNh`X#&~TLcglRJKGFhgG1y|zzLNbIY2$mdLL6&clp|QTZhLkhR!OU2C{8LG(q9!e{ z0XjcZG+N-O@As3kl9DN57|HyY3^s^p1rO5(Fp_lSL!G6L$x~k#0se~&4Qyj~WH24u z0QU=H@Xjk|FneU&E2$YWCAoDuZs()dcAwDDPAX{2ZI+~@I_tN1sc@e~`OHY)D&+g+ zi$+7K&B<&e^C$5Drt12&ZsgB1se_Y6O@w6?aE$#9r@dPAAB=^C%MeL-8xg7&ugv@w)Q#UpbG27v`_Z3`Ds28Lgud(Ee7 z+WheA`P&w@FG9xCUs?60)M6wer;}m$AXYtWjriNVK2OU9bki_qWF)a77R?4_R!tYT zwtM})cJIO(8Ui`Y#=6H%3`V)TDR(YJzxsr)-e$e2rL|?DFfaIArBv=m{q^>CNM>a% zrPQ^+v%rflTk)l@6}!sY@XqhWu33=msunERZI%8;^0NkZ9To2_g+rTJdwUEfn3s#m zza^G{BNSB-(D%<5EDQKNo)WqkKEX)9+w6w}d>7rc4s;6IHN>8*ac2}xmnK+RrPV^y zmDlMImd@A72w||+uPf+)D7zXvp}oJO+C~o*6r=1jJZuuudtn#JAPPZmhL28XmRN{7 zg}A#ouZint*(eh}fvv z>p`3ezsoG$E*fVwF1O?$gyi+ZDsJ;2vTKrxQ1mCgI~LB41biqJ`g1C3HPic29NG=O zYQ;@6k>OF$l^aOHk}V}I6Nm~--Qs4XzdOnDQ}`tY-(YD6 zuFEfVRo%&ZROvZ>6{Hooz0#@Jk4xF3R%^p2OhOh@IF`<)jsWkdNLe<=YTsPe0wOn` zKH~1R7~XU&6c5<@1^=}}-TLq1vH(!J3~a>Sm4?#NLjywn>j_QF`BK2XY%G&aj;?}x zXU^t;&`$@TLe8}Z?5|mD$?HkJMDN2n=NszI-CJ8~%eajfz$(3dcOv5`G!LX*S}g1; zDYlPATIbNO3K3g&?KXP|q&ybhv7n#;uC6lyt7w`FVXbJ}4l%7Dhq0S%%H5^ZVCFr_ z0$l1cvN`{1<-2G1!Vefq+-4pUQiB#6QgUFn5EwGXKNN7pij7#RVqrZYs_y|e_-cAp zSX-)jA0o>OWGaBQ9CDpPF(N|Y7E}dRvzQ{r*X{0kVkr;9~ zWY)vgyCx=l+Xv}c=1;!o60Ltc%aBJp8%%u zp{83vR_B1O#Ir=HQdJjn*zy1$3v_%Ns&q@z<&0liOmoUGoYl%_Qb7_@s2$=yKcAH6 zrT%CPUYz+%Hy?2c)CO_~XYQ54(_&n%z(Z8&6h1J}(nVx>Rbgd;eN<|kBPxos?}Cc+ zBG3K0!dAWA-TQ~KfxZYvELB;e{75N+%Y6B&L^S#Syg|shkQ(1G@V{`6W>m+^N@9=D z_l2!3cEZ^94=bWXt(luS;wh^gPO4FM%F>HE%GT<~sL1W1+Erm4H|--n2lxbB{vKoR zQzxjJ`j|moL%I!?lE7Jo=D0xe!n&6y#zuceAMjq-hezN_=#C77C9! zw4uT6ZSld^1()_SvowdZn#x^0RNe$yvzqMw#yyhGLtdZLc{!|h^YR+Dqd;bCcGC-m zfXTYWJ%KB^JkYLvbZOpYl5u!CS*ZsOa;rsph-?mx4WH@7?OflY>PE*_8ak%|yv_L@ z8J;FtBlWjrzCcjX(uOn5J{bDWrcI4*SS{~nvm5lx+H?j}`uLnwEk7IfG*JBUXXchB z%bDR2iYW3T39;Ry9kWa?nC1Rivs4hF_qj4;F0r46-2Pa0p1~ey*&+ACfZ&B)mR;(Q z(!4lbPY{e7M`8`$Z|muD*_uX}Gg{mX*il)!$T1RY@;aLxeRL82yBz6QGm81*5fhb_ zE(4n{@y1z!KNB|@*$p!P6_9Po=WX?TgVY10{)Jb#5T||}bszzWKdf}&#(u2g|1wyf zl32Bxx{GaC6B-ZM5kZu-z;o-M6xfJ8CMZ4GbCw%jMF zvm5V|qzS3nz3^TLL95w?saS&}*6epa<@`0QAE5-CkwSS6Ja0y3w`H1f*1!zEVe*@d zy{1!6n{%tXKOa+q*nwfm&`LZl@j*5KSsB)wc;(Sd;9NTlIpKK3?y^Up(>|8)f45+^ z_&*5IB$Bm;^^JbRp$!I-5r zQDgIyb$ZeH69sqomV{Mf{qRwxDCQ# z_tJ$67mf-}x-5Wq5#pCJSR=A7to0X4j88${ub_8rSFKO<;WBu=zzq{r)Uc5%oac}a zM_y!<>fKGT==WJSJ~^+aa`gg||0u#oZf|tpjty>)*ZDftHaY%@Xoku+(GVxh@WZee zjfKIb3fD5-2pKNnopFqJ7erGOOP035aA|ivA}LnNPC$W9?zVrwTo;7>SAS#zW6&1~ zL!2AY2G<+dN)hWsD-CpqLu9QZ|8TBc2!!rqa5gIl$KDXnj--=!>8&mcwGPG8A7Y(E zbf`99v%jsUHL7yAtllL{-6BWL4`nbnKM1jDwB2d7ms7GUnT244SUyWn33I5aTS~kb z|6=m?q+`qNo`BomPuAtbrKy+*S_lBN!(6Twyl!Z2bs>p$gR{ZmZTzDw|IL7kHOj9_ z_;SheHgICO#0r=-pfc;&M3HiOy?ilzsCxP-P{K{DxzLNw#6z7Xx8ei8g(H_V)V8?Z7j_I7n517wfcxTXM&>CpPS*F^N34Doc-ZQ!Uuq0oh z(*lkrou!&JlUBeptfR^6$s#4nVK&@JnzLywSsSc#rSF;mQiJj@GHT!)f{FBDYAN9@|H_w`PVEMhRogv;`kRm&69Mm>kUvz z{-KizTJd*G{oUAW2U^USEXGU9fqvg!EWNBRc6vyDQIXmem@D;OlODJ`00L$nGXGiU zb^D;3D1YXSgQJhr{x0|mcdd4in>R8# zBGn9z9yB4=MEWxEM=XZp7Ug_S1FWb)LtYi@g8t{ZSEeAzYsm7nq*H=sejx-l^CrmU zgQGH^#63>L;ygi`#}$z@R}%!}r|H@TOoW&i=VwJ&6f4uQ=XD|;WueS}qVwSNMI=YW zF2lI=!fNNU<(arlVd|8ztPk0c%dB`=cVc|rIsb`)(BY^NOrkfuNtKa?=!&5 z5)c;4)3D=SZG3fY1lIRaZCJRb?5;CZkvI^W>buG;^&#Tj3O^$GU_gHqZCbP{gNVx^a0bX`>!aP}%H55+ z<%SaHbrN-$EMGSn+h8{SAyZIKW&!EH-NIXS^6ea;HLQWOK;WQDT8D^7z+Rd3XUihg z>q$w3irFjSt7L~vx`ZxISavD;3nlBeTlIPbKpZl&H|EP1NqVGhERm(_z_W=bYlqtU1KR9`r*+3zIa^JoDl** ziI1L9EHAPm%Y#f&e#k^7Bl7f+y4$qX#)Ep)05L9+7C<m z(L@bo`p6*v&}vm7kzFRSH({`8AzsMJNmnU}j^wK(rARL0-9Ru+F zL4eAn-e%sRiNJRjumLi?r}E3m{Jx5ie#-}_(}g-MAF3(@D9cBx$?~ykvo||t>*4pL z7pdSQ6#(e`1r^`V<%^L9P+&Q(8Z4h6SQqrD1P~pSpd4B_nHvTDAQwdNw#i&bs*9#W-VPRqSoj-hUSat zJtR1Ns@$gy!)iY~7Rxw7x0aWLwvc{Dx#b`$mKL+GrQ&Jq35@@e=!Z%l0!hYVPml@K zasFvSXUPzaDwyR3WK-=T%ehR#1dt>@S$@xK65>?;06xE;nOsHfW7G;yLlE=gS!c6W+k`G@%*quWhfy|u<@w5;qH=;a$ zO5g7TlY}GvoXEz|rrEWF@oP=|%8F2SFdjH}Z`2gSn{D15Z_c9caQfZc&T4#Ky~6Z? zrT}~HJH<4mlXpMP|Oas55%Wa4or)ZxWzBGDo`tq*!$G3mQzRc6kBw0i9l zn*-5KtCuRL3wuCuV3Q~8UM75o7x5}19JcaTxaAV`?VU1(G)b+MGwggs3`XfL@Su?5mu@Hb*J=tA&eK>MCDK9ZZLL3 zo$?vUuw>j%x;rc6awb=xtf;X{3;eQ1buPGQQD->33ND*srn$6uMNrrRmNB^-X{*fA zF&k^zghWrd)xe*ZpmXXE7uJl#E>)|veeX0tB$N_vsv`LTqk_Qnk4-YtMda7Z>2l8| zEdOM>V>X@6D98|K20@88aQP1C5lcAVEMRt|3V!fZO!YOV)!3KAu$|PGstvGb&Cz|8 zm zOvOY<)IA`TlFYv$Gar76N_WC!uSduqGFyJBooe3u(+yK&8$OlF#En7p1GZ zr7iO}G{G5=9_CfezK(^^5eA$t4fbx7!o74oLTC&+c&xuBsSlDNOZ4S(`ts~5m)2Nr z43j)h%sbt83+dM#*3czI@&MzHgO@V4i`Q#`;tuHyoB3ND5$N@H?aLho)Cl()67=_D!dKl|0NHF!(Ek+n7-}&Xmtzp^Ml-e(~lIk(ZJtS%tsZg_q> z-C(?|syd!|h5Uh0<1Xe8z?;~rVMy4{*N&CWMAvo@+)>iI($Nwv z`Y6{7LzW9}+@iTK*+8i~NXn=|@X_jfsBGzLc4-Z}M8v5;nF}mqY*@z}<`q8IxUaSu zNu>z!;!hXWj^pxp9>r(yyC;@zBZqqeu+3^2l?PnJGQ?{EltcUpogP-{gCNwf=wg+= zrUT3Z*Kz)QiQ;FaO%Npa)+yaweyoBG$jXDWU^z6duU9rwsSB?r1Y@3|kY-Z)>#4@H z5VU)uut3qB@}Vs^V!E#TX~i7u8PB*;~I zZy=R)s8zA(-&Y&DigrfaAiFb0uK8S@%$j(y3Zeji%~rv(tm4d{6yF#9>>~1JAD|9H}$-?z_bKt$+c3)9N1igb1c9GIoH?T>}zdx8K`gx z>92x<{u0e`{tPG~E!ML>X12`mItnVGtYZ|ikg(GbH<30p^5Rnd`_kIca1Y~!GzIOY z6G5Rc5C51~)cfr2Cx&tR#Jpsmi$o%Gzb5s{{GM zq0i41C9&j#rda_qsj#~KhVu`M+Z;`Pm;XgQ&?6B=uimfLBz(LI-)m9HoX$KpDs zz#wKJ=^|M@#H9=MEBvl;Kl;PO>?ZH~|523d<{Z)fIrr23xNy|XOqxl$X=wlJR>&A#3y z$O)@3GDM~okv$OT-bCfx&|1_M2zXYKG_GjTz{{|d6_yMgE2Mt%MBRNCuP+MRfwb?1 zMScV|k0M449%C11_Z5oncwI?z2d`G6Kn?te*m`&*=IdZ{y0?bE!OPrD^YR*8PBEO* zSh$jAd69lw!wZ`wGm_DKp4}#cCT(#pL6n-tAa$BSmNytLvY!qx zRJA-hjK4@CmiBY$YA&HX+J~%aY3qX|ceCmx{wJs?e9!=4nSWi;heQsV7x_N#o2-F< z$CYlD1I|ZC8`7xPYN|J|zSC~!K?$BVyF+|<&JoInDf z^&B|G<}-c|vAD^!RmV0l$|;s@DCBz|*_v)AHpS&%AS|w!R7U~4gqF7eB>sJ7{BIL% zsFqTlPAHa7(gwJu$9)fx;WfSbfj~KyK9L&6eJgadU1#`Ie1Q-e+el{tlUvOLB)>36 zP7CsYm;r61ROBOjM%*hWYimX@fW9Vg+uK5am0BdVT54bF_Wdw_iT%_V%|31NA~)!Y z4TeiZJ_K8AQY5BJ=CP|_Pj*=#8R68D==QQUGzpya76GhXLm$~QBU6MJ1(qNbbF_wzc=?uw zt%#mU_$FDsd(W4c)4k{KvcrAOTq-^X4%$uBml%o$9KSz*<7q1Hz`wv zMX1;(J)!Ffh>MG&^Kd}2@y5mYctj@$8|e%YVbGtCy|!|gB4w$f=?6?WTn3H&XUv3K zt%7)8r0=0wOXe6V)B&O&6&vp2P;wmJCQ!j`WGEs*tF%V%G(sx&3>oSy{juT!v=iW*QadYKQN2KG$h(u{yl#su~fkMa^YAcwSs1+4!qE!h{S|1H_@l0PIU909QAQrdyA&`h$7c5X_g zA}Eg}wXR9-oG{QqrORlxEHO&5$t<-QbsnR%yO3`Y77F%!xn-lZRQC~77Y1CVlU(Cobs&?^ zg`CaUw4|$qp$H~o$?`BmfrI(vL;9@5=Q1TNS=^ut-!4!e?x3%8i)xdkE2(7sYa}7K z;N?Nx1=eo|hk=Ko^CboAidg1bhG;AElI1xR>>3D%FR!p&Vv09@xASfdsg zGZ=0wfk4f#sNu&EurZ63VI24bS^Lh{E`ScTOvF>SEmiKD2WnO3F7Y8dxo~t=X}H}d zaju?2W!sPoa6o6VBfub2O>Z&j6`gb@Q+^@y*AVlKOl0N(>xG#r%X$#$n|*nUbQVwT zL`(}5-rdD~-fA7lQx;(Eu_!P}j!IVhO%~EdiI}KXrFs|;*dkF)?2eM3Y@b_ zzJd5x!1|c}Sw(tWBsvm=#y`!0f=#Wf_2;OT&yZaD9AihT7T}3rN3H?!6)1K{*DYFx zP?vOPJif04A#8d(>3(97AF4A}lHn`G(j&E!Lt_Y~C^YA>^7~LNOs?7KIuO_0#^7*P zZkj70Zv`f)?-H$oFNowTn0$E^vM%{|bg%|n2J2MzBZ4+}nvQ{co;kbN_-ljHGxt*t~|B{?KZeVEFgBdp{vmmYA6)*i7lWL zmM7Sp<}8J9;+6P?1z1~i0Cs`6FS>~<6*hgN;Ou;Vr{(>#sPKnp(FSCykYOLmcUYvw zR$ghzgL|pSNZ-EZ11PveShEZ+mP%|+nF=xJm-1-#al{7qugdk zc$Z^076EV5dl-=tGj5d%br-9~ofxW69y4!|JKS#< z4@k;+q&*}J3EW)CQiLOvO=%vhG@Sxwu8oZK!N!t|Pq`vTsD6O?Kgt&08^&xU54oZioZ0xYYT6V< zJI#8t74u32t7uW`G({{U+qsNpBbR7kE?aA{y9#CF20_Sa10U<$#KbHT8!W%BgF3E> zMUlXRg_>X!i-1pXGw{Kdpx2+ejq!$FMFg&6fE{Sd(_~yB%_b&fK>6pkZ0lvL|ff!2}MVq}*w1CMSy+rgp5;_xweus>Zo@Oq<8qf0*_gD2it+I|6qlV&#rfIU)6l4< z+a^*4z(a0QH-U$fB{t*ZwG=fwmi+mFxi=|5<*@f)sxXAr0XK)9NoeD!FfV&NiR`)g znUtB6`xLM>Gzw2wZ^k6I?HK1z=@w4OK049J7P9hzE-sUSl{FSBHV%kAByVg00(HTr zO&F@Zj1N_$U6?Z1xz2=NfnOk7C1jP@&8l?7fe1}S`RF|r)h|^Rq7&o4Y^ZvyXjly9 zl+_%zDyZ8GwzRECO714fB-ejbuze7kpa%5MArYZ3f*}1C7Uvw8HJFXKUGw(0q!Ei! z(!1N*Ci6pa5SA0o1R5U5FpcenTppez*N}Zgk~<%nancqP0t^($1MFh)kGeP`7tMYI z#-)=ej_NFLFgtmPl_!Y>B<`dl%nC7)UP9i2?z*IOGapt^*^tZW<5@~Ze*TqEK?e@s zE%vgqnT`G3nPRRblPGSDFh;oH!mM+&^dfTBDxTUGLy_L$!voD-<^|l$G5>{}aML@m zub&kQYE`TcQE>tCVt2YEAQj(3(rs9Z{4f)Uft)J8M5dj@-&TyW2KmnB>rQ!9ErfYtfdlC-wi z4|WgY>ob`j!0CCaR4wcnXx{U9{k{~&ujrs8R+QbAI~g##$eB4gIR)KNgXu=#mt}jc z#8yOXJ0_#D4e9;M6of}cO?E1Oo)`k9^%UX5-Fl8O57~!jvkM}OP_~`!s`Uh)XHoqh z1?*S}LtwI@{gfp>vit$6`h%486NPJ+>@NyAN*%3`b@fh zR%(7=CyD}5041%0+evUxh77W z4?CmM^RZ4JrXN@*a6SkV0SwGHa2}?VqWf74-I5DDzgp-o=_T1LDamu$dMTyiLnusD zSV(^bh6GNy!!Bd);-!prTQdm@uOM^vy%Ymtm+Ezfyj(-Vlb*EmzePbRbpgN&!0&wR z;)y!Hlmp~3e3tDEwhbbt`pSD*zg&J*BuqdHGe~>NorB+Ka>-pjtbuiWs8mp>}BsH?DT4MP+S*CzPAk zBs5wyxZcIXHDgGUL}#+Z)8^T{fx=aD*c_KgUC95H!g9GW+od~_3Tlw73hec(r7r1K zk6f-9SHL8zK{Ku#mmrE^JvG6jL}{p)K$&+IS5-P{ui8#Pv8cmT$IXu%%idznx;mRPQ8X==KLgC}kRR=Q#M| zF7*;_c;<*YWJOC_XV79&x)|ms?Th5(Inlj0B>3~P^Vd*zFgFv=@MDw{1dLN|AYL+z zFJ^MxD0k=zX3J%4Tb;Y>V>>fw57YKD-B#NlP0S zwm%e0FuO_;}>N;ee~EuxC%_TU&Bb`1F}epj0GR(Yy7=X^%n zb%YVhD_)u-NipQ?F-BT^{&wA7V~N1=lScu-*piaYFfm&|%E{cr5 z>AnfJl}+Sd*cv*BU^s#8(^)AOI*02+)xy?-)QzO6sEXHfHCVq=(`=?h!4 zBO-dLUGggk8_Cv;I_=5GHgj+S5bYvRtnsi5qo@_d4pn@cV0@uDq?Ha=l#Sh}!x5HU zEsVDT91Q4h+SMTeh-UuN&H{n5KxW7r^cRHu!9W>|Z*qna(fc<3sa@Yf@+U~s*(r)m z(RCo<4z6P-r2yz8>YPyxN$9q+$rzU+jL}XPjVE`*;S^(xb6YS_;omkqq9V-vfzk>$ zQ9yD|VM;r5At5!@PMhqu52r^29(2hsIgB=Eua1FqyuvXT*PO-*=QMo-k!B)UX`JJn zZbJZ7{5`X6B;!(Ny{@suk|0kh)*!ZeIyX{X={lmE^0h=|l9G+-I+xdJMzJe~Iz8-X z4}NoErQ>n5P-Zh3`y$P3UbHUTz5KY-)Aj6(*zg!HLzxs)-*=)}q$(!>Zl$Y>qbO^H zCJ)nFRa!BF9W7-s0Zg2Y^h_>Ek?N&3JY2>V`ti~9da-mkRyxOqzZ%#R)qZn%%jZ+% z_iglwjuAN82m_Dt4;pXWhr8SDHtyHmt_Sp#k_U8Q1q!bxN)PJtL%NKD-U69H;Lzc+ zJ*^98w0&#@2pqSxi%A&3EO~U5zo_sP7WRVKC6;WL(j_C={>l0Mzi^XVYIlYZut$;b z+4(se)vle%URWfojYHC$IUC3|6O|Ju(uJO`GZT#+$y{9S(s;MtX0Ej$cRsYWO^JL4 z)rY&mDV;``{n?-M0{Gzjd!D}eG^K#5u#V3hRfV?-%5?@!mrp{HUG^Kwu~ZG#0G}LWjNSB<*v$ItWuxX&b;mjDO4IaVgS;lDEizvJAj7eY&J~ z5P-WhyN-E$pjhmPXJ5N88DXxo+QSxwX?eWco&rea+)FYjiW~0>VI1&BJJ03f!IV+x zt(VWw754*8ukmk)j!t&BT*e}r&q@>@WhUl5)l1hW)LE(;=_qd^24IQv3q9K1vQf;E zjY6h!^m-2h4oGx=G&?_Q$nXb9nG@wmu*gBG^s|imy0e%&9-62JY!L-9vC-aryv1vw zvc3Q2k-<0>-CrXqms5ld<;>?S_dfnMqEh5HgJTQ)MR{RL&n>vp!9tu}mo7afI{|+< z#-(T>J;J2VW%iiOc-VbGbj!alqJ1)?tHnifbX^L?dExhbt}Lr*s94J~CC&_B9M59% zQC-@6#+nndE8ek)X+C9qwy3s<{tx+S)O7BtazTZo2*WIgbg%1PhPz>tUXYARDO$;A zqDWeZ+Z=9dJ{)w1y?N?L$!u&tEmh1}$rd_zzT1A0#=lI{FyZq{{FyjNQq}s{Sb1E>~@H$(hZJZ{r1rt57bB>t9!!6biz$gP~9Dzragkhh*i&vWbO? z9S_DCDK67Uc1f6G8h*^+rpFr75^q9qcIDti;~BQlQH(uhife_!-UJ8n5yw{DLatg^)QzeYNUjIKcS(d<)&&fTu|{RaMifF8 z#7jO0U!WK>i(T{r$&1PLuJu<@g`iRj;G5S85O+`r_pH>;=D=CfgjVLJcnF~M2&G4D$$4B~JGL%CR znLhJ5M>@#wGOgHSJDX&1pn%mLM=ElxW2inqe;Uw>9>)|?Unlp+S0NL4c=l z-p+mCf}`-zyWH3P&Im4*ONejZt&8^7%=dU563>R5hNQpL!aHPl(?TneLwDB5)#Mmx zHf>EWD|}5e?C$uFiWM|o7Y(Xte8|>GB4<7#bcgP~z-xiz0OULMpqDz+gAh6UhO~e0 z5-;wh<$EXRpexHHyZqzcn4Chl^ad>)ZK0ZLCXw`Rg(yr_4wJN-2z9(WIloRfb^|F~ zxQ}lt)q!^f^c_d#*RRB9wk0WC{1=Xwf83jypZro>F z0H9&@|H+lFnLLd2J#Knu@N6)NsKgo-zRAE+^nS#1Zra z`rDegW+a#08sgNqkwjStlkgdop56bvHOmq+r&`#(9V9Jfv=dlQss^2>?Y(M?3F^62 z0I_URYa2kMzWE)wMg48f=z4}4?riic>kxc{=ps|Tfx=sMDD)YrEusqR%+98$xfxD+ z1gS;Kg_6ZOJ$i`bp^-)hBAZu;E}g(5t#0q;f+mQmge}qC(AibRUF}|70O!)uaV1xf zPz3iQH=kc4O0(OVaqpZgqOB0nKoWu*_c0_mnKsx>xXe)A`eL~;C>_1AWdiRX8 zh4b1}Af$=C*kU{iDCTrI!dFZYjgU9Usd0?PmkI$WhTuJ!0V@ZRsWRX2=jXRXUgOv{ zKHhsS)p&i~?H{bR4-i$+z%kdP}voYvv?C9!S9x^~blapn(jq?$tu11oDM|9to@9hp>$%9yRT?ulA zT+Un5SR)IaHwUZ>v(1!Jz1GcuG47*kax#O z(w0)%sfUnaR9xL<&`cb_q53r z;VnUWipfCg-K*;P$c?Wf*QFGIG}9~Bi*uQR4oHqyF{&? z3=UlLj6GM#XL1QN_KYPcVak(uBC0QJM+C*xD4Q`&s|K)21v3iDKh%K^R+jg2EKk$z%=RVOUx4=qr2@%ng(esp8)V}< zrqgLM-yx=(IDBxfEau4z@DM?xcDP8IIOGQEm=2$auUHsL4p{{SmZX)1?aZD-;{9kE zUS~`}U~&!_Xgcw$>ZjG?*t2INlX1C1hmprQOca#d)8^f=0kSO+%4rP8sC*V*0C79B zWBEwAwymo#yxlPX)H(EKn)_~}ZWB~lGw7dQN}n;~%ML|&xu~IPOK?K%WM8W&PRZ*b zfu1rL5thJB6_g zb?VcESrYhXuF(r8>{88m3YO1(lv)xvM#jgKYr7DMneMoTeG-x-(q4)6QDJESj>Rb@ zpU@C*X>p6o_=Iv}1J~~~K80XHdC3CiH~J|lvg{$*_>6K>iu)-!sp2z=U3|VAx%hr3 zFx|#&a%6QkkT0?Blwoi3B!7iJcvqoeV?!`yq=)S90&dsP*V(z;1Sq{}@xLRB073j< zvigu@d?-BLit-NyyFQ7^WWJCd1?(94N2&I!wD4C{NP!Mg&jI+XX`@k0~nIF0Rl{LD4$4s;R}d zVjx1EjmYLI8Ob~Zt^Ds0MO;0*-O}Zo!PIWdCjL&>df3g8T2@aGeL|YvSYT0F`#+Aa z0$Hr2dY^m398&z;zJ!Wq_s@O3fhTkIBI5ss4B9N`RgGW(iWy8Ph@cA}rD@DImRWHC zQXk_PJs~KA=}TlD&ALG$L^-T^f8LboBilNH^K#i2DUH5BaY2mX1AM9v3~^uv#(^DCe8(Xd`4S%gM@)hK7;rwm+fal`4^dLs3VS^ z2?fZrfVFqf^|-H$y-3ZK)0QIWI-g>)x3W)t-pPHv;E_$~YXr$PFVCM_;`=-c1qH`q z&Q8K$-k&2~hy<~9rPaFxVmnJAvznAe+|zbIc>7mPAo(Vi+E#g`EV36d)QB*Tu&@~> zk6Jk7a74|*yXv9Y)73Y}@P^F7WOlbC|8TN>Y@9snuozB>S#u6Ud@x@w%E~E-*yKuT zve=|K`bvpVEIS8z-JwF7xI-CM1&s{FAjjrJ`IE)U{Yx>$K@=jbXmoxN?Ywn`sJ79A zj9(^Vmw#M?6qurnS|Fh8a|!ep0Q7H?-KNf`*ev0r)YRyvm+Z|@%R$^e<9bW33;H3x zDo98mPj@x(+a=MGz`wN{`!Pu?BkgkuBfBG&v&R#S6cp5lk&(ndhVZi*ViYCOK4v6x z-M%pi&j1+iv2uuv7#``^M@AHYWW{dv2yvvrN~B19W32J95KOIRD8)uZG%aJi(gZEj z7{U|P5o9FuNEc4xBc@MNAcv(lC-@5{cOH~dTY5G;;QB`91K{I9&i6+d5rK3_;aA89 zdi$Uh6k36IS1wJ&Jo6#6uuv!qdT7uu>{X-+l13@UVmZnvVu^9)Vi|{0+hnoH>AHg0 zOkrF`QSt#~MOmtXGrWZ2#LLXsOH;L8j?bL*O`11rV*NwP#mLNZPgCkc5S8F2rZCgu zjXP08+04ZKw)D1EAS%Xbq8oTAqJ9m5f@8SGGl)H|t6LeJXY+yr2<}7UqRM2x+lI!= z-+oYPx`CQ>_O72!i#NM^qcnLaG(6zAHk5#JIS^0fB)=iKhe6MA9!GWtlSPJ}Jk>)z2 zB@`Ue=8r-NFRa1yunVc$OJeVXu3@tensC5pb^e&_&Ch?@nxV^A5o5aXCD>i4wWY*& zp9l%tetL?1Ieh>@MI&VL7Ii*75^-YIOghH0%%;XpM2hB8kc1W$nD4}Hg~l#~En9lS z4+?g%Y?}SM5vOlf(#mT))W1V!G7~UHNm?VJ8u$cB zJq(OGsopL=lGT4eEK4??qPVE3afQb97rA!k`{ zGI(hjhbfUYaCR~Pa{w7i%3EpfFc2@LO6uh9ZC={x<_m>#b*UPYE8o2_A$)rYf74@p zB*!W*%0^i?hq4XmkuqCDQc0QZ?qEz>97W`u?U6sE6#aE#5&En$wo?j1v-eAirPEW5kqnSipB}5 z@;pThFPkSqBtnW>0a%=k6Vnqc9E8)u(pT!|#VL!ZFcex$%yw>!idHcjc$Qk7AF|OY zOoAQ{KpOKHZdoLzCiu@ydzkG$O9+OBsOmn9Kr-HqLs~??k3eYsrSgRklM9!ghaH@&v^LEa{a%As}zz7I!qIXQU zbzbi0XXP2E0_gB$QKO|u)6;Rbl^HGyb%sB%YhM+qvT}LIJE>)M=c}-`y zaw2H%<7TI$!(n#C9kliF#1+MzVc%AjzCFz%BfM!-woap^Izc!@3{^x_Bugjz9%jT& zQ&2CH9~jEzSi0TDE>$>)Xn7j{4-h`lQbs1fu`t67m7+FACD5p;;N^WC6E~&P7(NEN zs2x$z0;DM!MWIk&j6EvtRDgtsdq|u&Q91VozKt~u_akP1KJ#WMnfER>p()eZe5a$b z5ykFT`Q;MyF2pQ(NjHN2-t4SfK;V5f7!@vBYJA8f`l(n4@Z}wKvX!B}mSmQh$Eq}? zp2=;K94}L$85&K%&o;9{n{5G5rodc4v?!T7{m|wJnPov)+%OcBF7-GQrj!2mD%O8tzdgax{1BZX1QNRCQO-RD_6vBj@87HdX*41X2|EG# zNn(Ix-XYVatQa$-C_xVkx;Z7Qt@SdIX%7D(M~dK%GV%<&D3>inP{?C_6G*zq5`=1o z(ssC|b0san;|Ffi0OPIX2X6SX2n}_~1tQ6Y5o?lU`$@?R_#Ps~nd1n7b#DI9E^k0x z89rO2KQ4h-dNc0j2@TSomNE-aCwt|9+1Gj68#NXnXoE!l9Skt#=U^o1&>kllf$8U{ zo^zV-RF7Dm_SznxgqggaQX8AManlT6@TPR!f}}1%Kwttwbi1ZX!u~zL>%@0M(3*)e zn0z~zFzi=wX|k->6Dw1xmFr2u@gODoo`VUxB_2zo+);X>5FdQ*3X$|N)rJvM#Mt6( z_b~pc&`KG#O2$N|B92O_m7`}4;i`)kF}_!g?jIrR70c25#d}g#Z|IBpjujsHr)5Ya4RE&IU?Ck8xWY)o3X7if#+lvMQMI%n$El5lTPKd9Va&9{9((M2DU zxVn%aLHB+U3-Ly^N9U}yQU%&O!7kEZhF&Q0WIqMAcKI|h$5{>W(O!HXK8>Y zaNC1L2D*FuNkv5n1QDXyrWU1yF!G7z%vg%c=R>bOjWl%Q{Tb|Yf^#o-#1vuAs3$Qb zb7OpykkhxYcj8S+L-qNnB&o!lRtUtekfP^DFlBVS12Cz5$o+z+>|k9a-NWSb=Fqtg z{-GV=xAd8vt@as*vzS|d-U%gv#-1ZeR5(vVk)jz-4yK+yH6nahoG8%gurdP~`<7)_ z%f^G`GEm<0%pOOvb5{+Atjm`pwNs^0eqTw>Nlu1f;A13Q?p^GM(4_rx0^8$baIv6Oefhf0`fU5Ka=`@6(zH(3NFedGcLN1sC zsvOD8?1HOpVxCe3LAueOeJHO3dV~D)eTx7@I5m-gyu?^0@_~JH(MuXDCAmmZAYXA; zvXSGE=x9J7AVaI4;s6Ym&EW~Q5`$eK(+eYw*DXa*&K}@N;p>fRO9pSdsvORif|TC9 z^m0s_nf^cyONkbbs6Z&8_5e*Y2?Qlcz6)3vQooOvULw)UQhF~?BaG+NNi!A~G_>{J zX(;0r<5JSK6qUsY_65a-hic-X0zFGpv*8V_@qNrO-OghuBWLapt)i9eKiYyzq3NHC zLWK5hWkbJju`m4P&IV}b_7=3L{4K?J$w5*b@kwg^pccS&|4i!dwn6{91X2J)HTH2L zgjVDanfwXkqX;uj=Xe@pIaQ3s(+^-FX`?L%H>1zZ1&|;&<61xJatG#T8HC?MU89Zr>4lRGhVg>E~{^fd_i5vKkEnnE6pgMfD#r>AY`(1ChKZPfSzc#mg@ z?&5M#;ZqQV%Sx-PJUxh#FC;YL>VBvwj8H)zciMTBV2?!F5@|+OEd;7B0*+s&rQH4{ ziI+$^8Xy*C6YaQ2=A7eGK3yLZ#BB%UO}|@+l`{$h|;gM6(L*s@4W783s;+?*GS0I zNS!I3RiLDmaDD_}Lpc>-Uw7q~RciZ8x!J{Fji|YJmP=X&6WoCS#;vK>$F1V~D33Bi zp=(J(+Gb}y-B!&eOY8;fcJs4oVQ&|(_MwhQR!u=ssO90hMu0bm?kG0L#C#bMK?-|u z6rix40@S=)dQ!-nYodd51+;gm9u!kw;Ib87Gxuup_Hn2W~QD;sYQ-==e(*v|^)-5K~$U)YD#$UltRwKaVaV4=QQkWaEi)5c9 zv$KHH<0mR3$dMH4`T;1FwDc65CFHF+@*WTpk6`wOEL?`nejK$X8wNA&%{k87A#5Pc@xy`y;CGJu>Cc+qmFew(8n zWu5vi(;2;Nw;idN+}d$#IchJ+QSnz~b~%q+Hd1=4vaJ&-_%Li7Osufp;@x1XA5nm* zYX=)0gPTvSKv0Cl2gTw7n*A%n*zxZi4vkVOr9{(terfv?!GVF;SjgQXi`^ceY2&m z{fbQQMATa1tuNH5@^>Pa_AYD;xAb+xOQq|cBMrEo#r_1E(%;zA))Gl+fs#n#>ssiZ z=x@kdGib^NDdIlJQkhRbBN=cLd1QzmZX(GPwQ>h>{r2?6_Ma+@*$E;--y_{s zU*#}&c}h`A^9^J^0LhVR?Cf^VBa$&8q8yQxon1gfpme7Ga42#Zl7k=>bRrY0a)%Ps zZQW@~6&{XJ8z)Z105-Fcd!eQ2Pv^V8r1*qw4a?!Agi=V;5DLH_?XG*=-VH@4&AKO+ z(_!GZ@r|-Zb+xr;Ws&y2!;0%6>bytMRy$Z>i}+f^b&EIU{n5aurP{hnb^9_V{p~mK47%gwGC`&gEt!=C!MrP|9+=IXoM;DT z$odA!GI?L>SsiH@x=ofQYsSx-S`D{{-bC3K?mnd&L2h)`&)SgY{nZgb{5n7INC=ot zznc$4dl$D&)G`*g88Mc@NKulE34@0)ezO0>pnM>2u`BF0TJ4f=wet=Ql}FIZ7xhka zu#Z(g*v_Yuf?nxNMOyAiZR`CiF3k)zk>glwTGkjZT#p=3{&Ejrm4jq#N? zng;Nl_=lzqCHVs|G27e0P^dwm38ouKV=T&>{1PE`I0s-VQjU=H8fmAJA8KGw^+hUcEr<>7-AZl8rv17U8YTkPF;x)L;elX9K@HioNNwb^BApy4y47wj1ec1 zZ8}0D6hxdHZ2n7`v1Yh5LO;&VaX^8~VXPHQOe`^$*?9}BryySfA%Cu!|F^O1TS^P&9M|pXGzzUZfQW2Y zixW8sPi%R^4%^;b5a8{idE4@H=(jfCbkLiEA9)cGH5Y$dQ-*O#Ai7(jt1c zxvdoyZb-y0uU+1hA|5XFW1RcN=>>f2Lh^KH1fU0i*w5e5)t+5MOA0t(@fGK%PHP+O zV42bMbUE9WL>Y<7eM3B9&${T^lqinW@Xtev5WYO%q@occVJegr7ATSNCus`wcba;W zoOBXoDV#e8g;jR z$d{|vaXxm4v?MvhW?RRFjYM4lm3n?(29zJDQ%1jRXmTMBaV1~S!P)o@wQv{7_I*y@ z@`(JeIfR{(XjFGwPGK>zM$wXkLUv&=tHNw-{^X>RmgbRX2xV!C+um|J zZyaU@fXq3=rk_gkDVzaJz6X++V1PkY!kErA8(^r@xPuZoRdC*~iX~(_2m4QgOuT(F z%s*AImR^3R|Fpspo^nyLrmhZvtLI-5z&0Lw|DbAS^Yqk4~bd0H;*o_rU?gR;5Hxg4ucU}a~`1hz11hY+`i5Mz=+*I(hFs1 z{o)^{&BTL4O(#s-qEF|aXY*7ab;Yv=lRX+s0AjSYf->7UT>2qSnaJSNhRjYgP|wMb zpZLY6&F1Czu>~i5+P1%I08Kp|!IfF`SR5};FyPY06H4XzP}ygG{T2HUT>c@>4>PXw zeR_KVe>SoEgtjoC_WFA~)jKAEioL#)5BZM1?&{9wYCvJHwOW+^eI;mKW=mr*g-#xa z9zY&W?8nO@Ld(cq(8*DZ0{A!F+TPXJF;m=MA?Avn7B~pNiRjFc>@0I@u&C55G|`8S zD(C<1^@HZ#SKHmx0=KXweQBq_i{oo*Z|R5kE}VNBO_&FUr%=tJp2q&CSyiCGUow&a zPrxk-uUKCX%b>>I;}fK_MC#&}>_Y7^S^!b=scqrtlrpod;#9w5TtW!B$l?E-zloM#7J zpo67lkfjOu9~sL=4&f_=T9_Vb``gKMU!flsJ@X5J_-FM}TA*-cB_B?Bu#7(D7CVIc z8Tgn<7z)uXDW$xqtF!Lk40;(_A)}8;d;zNTXJqVv9Y}deX^B_g$mDa9t1Zw7#+MFe ze^f#klb=3JtVFsO-d9~cJ*%DBh&&Oze}mx(fBoP0`p`;R`a}EzW*b4&iysjNC@YwmgOCa;U~?H$yTJYq!Y90<>ul!3jWK@Mw6RauO2uBM`;z2LUX4h7F^fGyJ)9kjn@6F^Sok2TNJ=r-J ztZV3&3^#^ac`Hvf^AC{>8s;0t4JJBp{}CF1YQ*TNlN%b|1q7AYNa8ORr-#hPRVFd! zCAV!h3wD@!K*%q;Hs8$cQmb+y3h1$L0mqo-w`ED&hf({4b=A^jmDGm4NG9Qw5el@- zZRW{P6ls8((Ym*J8LK^|ucNzFfhC?Yd=x-B@!~#}@0V#em(iy?2_+rpJm~x}X=1Lp zYJEh1?X8uPKy;&4%V^xB$Q)&8a+fOy(PEGD#5w!zf%m;!tgySPm4MBSJnVX0v%k1An7W2*lBi|NMvfLe(m?8Z8e{)nqK z41bv~(*fRG>j0uQfH+Shx>1N87Mb&y#COk-3YHqDgUEfVWG|ks?cT)B8=>?|@%^7> zdC=o}3Kb;jT*&$So@K}icYjd}T8*wh{z`%UooZySyYuq_;#t)BiQVjKzOL`SF7&L> z7-+IEjW@|X1#t1I?P)O_^mZ=&?2KM|QPW} z%mY^JsY*{5SKN)u=~z_D3D+>J4Sm7Jrr!4Da7u%3nFT8=FlUZ!Z#SzZdrooX)0L3u zcztL@K|j3<;-NL?LR9luVt#dm6!J#`@vlz0($DPrkcZVGsG-6u{Lyk}>`nN}2 zNuli?K1Pbkddn3+PUfo#5us?CZWzI=y2iJB&{^IBo0OhYVYP&mk@M!C_zfg&wpk<^%MJ`LHft)C?A0JzO3G^SRyZ#_Abs# zkKGCQ0b zRnTOY`|VPj-OTP7<)D&^m*}| zEWZ!C!k7_Sx{8PobXn?*x(Z&j)oxz0W3gb!w6unLcOUwCd$57jnK21zqPUV z@BAQW<%?mC*bEb?qN35^#@3d2iYk4!nzA3B2IH$>@H5HNd?f$_25M`qjiH-@7WhlfZQ(j^ANz6XRVvv0P zK!lE&(N#MU;HcAxKTRo%UFgKH<>Qic2Dg_=d>d?uxQrqqE40Qqn~T>;wi_AzHRMkO zeXeOLupijP!Vm_@ts|IPN zn_yCVI`7o{W>afj1kO~T5Q36bb|e@lD4}?AF_{MLHjiu%OjwfL)LPJ;n+-=v;O(GG z(A1i&QHWC`@iT}npW~i*pN+OSq|KlulDxSBRZ4-Fd^9;PwvqxmvdVA7N_OzJRYu53 zNT>lam<`x>*hZq@={t!v=G=kWpT3gO)=4!mF76d)d;8i`Rd0APKu*VO?v^G!vT*`L z85|y8i_(q06t2b1sHlN?eHe(6mm@$J7I`*UL7=)No_m{K0+!LiJflEc=x#slyu0B{ z4p=ngV7xhZX!O;2^7RQcXO4VY6ZDEjj3S>M!N2BgzU;1zsAF;@m1)pMP^Bmt*?Sd$ z+O87bfYdF+kZ<#na-l-gIg8oP--u^*1YVgsj4a%3o=cpf$VQm0Pn2pHCaB*Mdy^S& zC@wL)mu?a?uN+;6d_=IbnEpD*vTQAMb|wP|Rl9c=d(YC-Whcv`)}RizJ7)|t<|$F~ zHsqBhzL=ypSdj_N`Dl<>09|43>Q{py$f z=T(dT+p0IS84Z-I(Rwhu zQVruOl8`oleuDw#8334cJdlEYNH7#q@zzPd?+dH_w|&+8)xMst$3`@0Qa=&@@A>sq z6zf#blm<`5!T~onwM1A4KN86qfp3dOkC2_C1Q!D?97qdbl#?Ty9H#XqlGQjj{`=0e zu&aH)?%Zze90~J3?tE-#cOS%|aD?Mae&5W8l`j5uGu7G*OcXj{Ir94jI`{X>@`p=n z9rC|!J9t4(Z2O1HfI1^x^6Mcr>yUWPe>vnIFU0flxDXzcQ57VbQMrk>G}iE?3;QGq z?MT97Vz_V#Bx|v5buM;u`7b*@I(P{p{_h(AZEPr)lEhFf`c+PHJ zw&zpsw_4Wy)?yv*1C^{Z8eER)*7s2GsvTt+*t=b(>EfK5rYRG|SpIW-^}SW4y@!5! zcw^x+g}sLu4UBk_4HS=kf8$Nx!ykYD_}dIR{KT`3rTFXKM{oI0i3!_k z`tJDZ5wpHoSJAa+bLErYt-E6!2)iG4o>Mk{&*nStIk4q#-{bQyiG5|YsjakmZSVk%Ri?rX6lyPj`eLV&Y<#z6IYybkWWJjp^N-S6W-~fOGn`2 z(wTi*58~q`z3=6gtowGF&LZc$K~?pwvn$@9EvvBoM~Q(FtT1reb-9P`NoX&dPu}L# ziBLBGL2_dsE3uD@5(9^@%5tKu#oG_PdpGmr=S0Tv%Snf~e9eot9^3&cRu4lyi}kR2 zym^prq4hW8WY2p2T%6v(&O`5(M|bWxh%Uh-WK-mz6}9p%QqG_zI=6dA@s{lr`9Tkp zYUteroYv?59mRAu-rt--k)PqU3mNk$d~g)u7uG+xC7SHx=xZ8*wM((~LE4IUw_(k9 z#u496-2)?%@yVxHeG7K86(ExLfOQgV!M#JUo6owaVKd%82OE5X*M+mFJ_hf9iS-Y} zZz;YQgh9ciH;8)J2+ynMX3#v~?vT2qFA#x{XU`qv-HNZn@5Ug&4Q!P-+d z-9CNM(vmo|tnq8s-c~7%D~~y6ZK?YzB?k!;S}-tT;Pw$$M^Y93%bKjX%_o&-?xnrv zO|-S=M*LrxNmZf3>kHjfGqmvfn=;X|o(odR)nm)=L~|c;LqhqT+w4`>jxDb|&G8l8 zj6V-vd)5K^dMK5=Uy(tVT`iU0`2$w`5PzJ19sYR6+<3t3AqY|hs453i7FMHw=7Dkh z34eA!FfJRPMbk6)F8}_fl8?q;TweRlO(hr5&FKr?KU6s3;@hv7^ZsbZHb8#2K6Bs^ z$Ic|GdLcSknn3}x4u2eFsV)F2w?2bWNPFs5{f5yQRCVvL*N$oA9RWVuwh=>LJ9g;r z_^69+$(gmk_7_$!U;H*8qHVZFtG zU%P(&>a}ZDuU@@o{rdH5*Q^4sZr!@|8`f^vuy&0^3)ih%w|4DXbPh?hV(r?2fpzOP zpod2{j*LtusrBnOtXscs0!?1Oe%*Q(=||&V88YM**Eg?V*?;(o_JP9rs|Nor?$uknm zZ%6uauX|v@>Io^U2M%uyk1lrsZT&ioOQ`tx@t+)2e9HJQ0ea%}Hd+csPy9rGwtS?_BcdZ$ zo`L_o*6@Ek_PuxByY2Ra)25wt-tMh;)&TGD(%7+|eYO}&_Z8h&baq~L$rV>!b(OXI z?mcmjeqa6e_i+PzS>s#SJwX$Yy~UDDfo-qstj^djqaD$WJjP)>JUfn^Vt>#xW8i&TWegZJU)W#QAqr*GPH`sv|i z*uM+nrLBzC?AnDdy=xb>@V!ssi?=@6&`{HQ5;vcG@)Qif)_7U}_cC(7TL zgrnqV?a+Di`$M0peCFvFpLwS8{S!N+eY9Zl;?~`}cT04P(>LD%qWARfr=MqjYV?fTaw_d3)bqIkm^w9|Eka@6|dL9KTu4WM1FTr;qC z?GSmvz`)uy11pi-&P2ShanQNwG%JCJudkSU_s*iP-G>)1+jMx@TZ?Dm!Zz2N%chwh zeKh0Dn{TFpD{ddy{wN**v1sP#nWGok|Ml{}Ubg?EP<2-pV1Q*syRNzwck(J+yE^<`!Vi~J*=q|oRDIEB-O@#piu<<-gCzwILgUoBj0nYXqiWtdT6BFpea(t4 zYApg1toeK_MXg2Kf4gPwyTL}-{XL(2+KM+eSUdYl;-{c7$bs*^`%Z^AGh@R?_|cg; z;Fbf1+|i>)zyJRGqp!U3!3W>_<0`+2!px@p<>^z(nNIr7*M?~H=Cth4-j{}<1^ zKD6Px@Ag;ENj>HQ`hD;hYt#qYfiM~mF2BcXBBEU_}fkylzjJ z+Bdd?lVY*6A!7-MAtH>y)vaUwb)Y-4EevIwmS$Y0Kd$`OF-)B`vm7*rvx3t<#bVhw z)-E(#YxzBthOrz9TV0(Jra$MV6b(kiXqac#7h8*UW+ANq=TH`E^S=}=|G&a&|NpYH z|1GYzuJNDa(7}`WV?22z3Gt+crf%b{zh7hP3S9Q<6>wNL2p|^v%3BWF!94675fA?pI=3v>hM zPCdV0pTC}0{9)&ReR-^z-z|7q%W>2ePXxykpxyGPhFgaZ|J(+D^^YE$u>|5Ve0T&@ zHX^AO4>fKi`f{A;JpFy<0aIMZZRNE1_tTz0eK`kR$kur(>$M)&IMBU=YiM%G_XY zg(oDJbU-RCx{+1D0lpO%JL&g}{nyXX9}n@@jl^nO*IO4I%kkeP#PCd<0mzYMW(h8r zb-}G=#kW3B1DC{PvkwGw~{V@$S&N2xbezg z&in&wb?X5}QnAG~z-Zx`HERY2*5JMa5{w`ez%jRVWatSXSAr@XhI>~sDn#U7gJLTb zj;!c_qxQeCf~B5;W{tj&`3GnK>EHQ->*M^7`#l%~<5uI?PMW%M z)ymbYAs@VQ@LQtO#2O_xpFXg1VCAY+D_0HxHe`j3@q-{jD`u2wi52@`LDF?_qZ93- zxC;Hrt_I?rg9k!q4AvAVmn-9UTe)7uht{U}&l+$4uT9s|g>+$Y@r4%-ZmW@Qg-St8 zKCu5@&Yv5E2M?w=fJL>UQG7k2c?a(c5|KD%rngHR1%7~@FaV&whr>hJ1@fO+Jc#qf z?|V{WXHz&>;kAukb$T*h54N5D@*|cEri;a@&8?0Zf4XnJL|CbGp0Y-Hq*VqM-9(1eomvyvDznnH2A|^pNtKEZZTiXWk zn{|h*BXKvlmCg@?X{roLF-M zD1^VRXklkP6>FcrT|VoVhR()rYlqhQR?5&?jtXlv>*8Wm>4h;FvC99xjwKf= zzOdFYvDNRbs}g_xcDTXTg|V%%{SU3tivMcxvX*0FD1It7O+nQPbdbqc+fwdf0tj(>wGT>>LDf||M-1__NG4bhJcv;II)^F?lf2?1Q zsZfjeb>^Ko{>N@Sl?|zOE0V-8=y=9bdDpL2Bvp6Sad}_m3CPn zhXtDoxF|k|R}o%N4s(|v>q(F-Xto;v#6ds4U?hD4nI`LdoDkY>@e=ExZFS4KQE5Ow z(Lpk{3=D?|6pCF>(V#5g^;R!kZK(n}X}fjnsv%+qB0)@WCAo|G=mdKu=p)&Hi4#U# zxFnD1>W^Y#2Bl4F0~i&k{fK928vu}P)-)?TnqkmZU!a9n1O7j>eF6vITEVOVBJoxxmi1(y`lN>mUNg+Ox+1_U#g#Ika$uvJ@BT!6uJu-?kb4C~F7 z*A%tI-qOaUw@sVxf1a6PW@Pkzzwh_^u0A~TJkPoNx#ym9?z!h?&3T6CB@*pR6F}x+ z5r%Q{3+0YkST<+oIOv6FGK~@xe}Pramb8{|oS}IO#QJkT&BXK9xHw$Kc6SGQ&A~wi zvWjw3g{eZIhfEdaA=J|ZJrbxYNHcif>;MWa@Bx+-kP)utB;+63B?dc~u=#Omgq>j+$N>_!k=O&7WO057HU(!HhzsYOEWv^5;wg?SMRsxF1{QWOLKqwox^e{W z6tM~;W(l3}yL854m}BvV`HcSkwfc0m8fHl8@R(er(I@M4ktuXJJUvyb)up6p69Dhs zhG{yT5p9_CX({Qtt$y%*m{RM;!_|l9QveR@a znthTWpG4}fO)D3|A5YckQuXjR|BiHhnkF?>txZmON9q%-B}7e0*XzH55xyV|dVtpH z)oF0)l9KiSJ+9GeQq#3*`eNC08VwFb*6Q`@6v8^ws^_(7salOLU7s!$tRcH)1J|>0 zmo_Ci8RwUn(!d3zt2G)%qETqlf8pYAS;ig2y)~)0XyLqk(DVvO`JuogphX#o>?6RX z&dj_It|+fSPluVHrt+om0wrTjbO^R$y87O8j%ERuM>L<826KY(>?~=9NFBKtteWVG zi-R?gVWDgyCjqhZiLxrAoj@@lPjwuuuqn4=;gI4IY*)qHj3d2e6?o}A-F8|7{>F}o zWi!DuGO+h_#}^kB!KTVHUC+9)`ohah3*6^qd*N#hE)F*MF>|ALJfv}Ct!Up7NE36! z9~|d?d{~Ez!<8tG!voC$YUdNs9pyZ>E4Z%DKKm@X!^fZ0b#--E-@-t>liSb;pYB@p zDE7PgQ?Ha1j3DF*MKL%vS5Ngr3M@!+uyz}SzdSN=W=rv+iTQc+uuE`V)bE4PU$ z%3B;Wz*R97q71>s!3L)!UYAItT=4OL7{R~@wg84#;^Nian*}MiNX#1z#l_(_1xMn( zx_Qmhd!0DL+s5@)t2jg&hKqyEmowynWzWz}jC3m^x*gk&?7=G5i$|VE3{gZB`TR&% zd-MjBv&n6)&hl8uRJMpqn2tY;y!Qa{r#kTDsy~;HX^LYdldj5Ap(O!Y`|?6Tg_4w( zXcAPUxiD-|B$fbIR2xZ-#T5KF%(naXWv-tiv5G^cRII6`iZ8Ftrf@4(4Y34f72}8h zl1!Q(hApb*mBjELW-t`2qq*9b@!~RU7gQvhOkJ;Fd-5fI2>*UEg`9@Kho4w(bN>AG zJ?bjPuqXT7NeaKTlfwUo`P`)sIG%7=Y?KRFX-g2oaU&IlJ_^Nk*Ods5KAJW-Go?r1 zf6kn~78f)-{`?Kwd$J98Z24{3=Wova;N#clz0;T%UVkTxlu`F#|M4+gt)Q?E@M3~B zvh;xw>HYfYMoxcdS^3`g29Ie8Xgsv+#*L)oPxMYo=#_D8kk{#kW=+Gn^xEbROcFj%S;cqw_EyvamFdRl8D*J2!mu zK2$xG$2Set7^KEjm4h{i)AvSEom7Mo+F6?4+DqfEXl6aLtc3+$XW&{em2(n=-`WYn zO^RmkLzT(+?V@@csoY7<;caUt4er`t)_k}%91pmWxH#AXxfMcjxkqSM<+#Q2PE*?z zzM}Hjd!@X0RC`QsbyA@~&USFoR5uOoO;y71@Iq7F;Jwv|vCYK~a62#waq4^V(;2u^ zxo4cn;6hDzjW5pshE&?qjg#$zIA1vuv4wC3GF+mZ&%_in?V|a}PDJiddJ($<9NL5! zeC>#*WAov|C$9*rHLk!#QvteTW8I|Cb?Zs*_$jJBUD`H60ax1)qi-QYgZc@xHa!osoGJ{2Ez{|LESTGb>5jKZr^O=sb4)>@t z(r>Ov?rL1`4ad{zts{DCHm18Br$v{#^`=JSp2@<+!6wd!x6sbIAp$pnlXAG23J={Z z*mACr8@t1!W;^GC;2H={EemVE-5QzOYnTWM;C3#egIZSEfe&M(;XdJD6MxC^t6lTj zF#>Boo@Ho+ADlx?RJ~S$_?hh0kVSEQm}o~~ZBX$5MO8jPv8D&WWQq}aG;z-3I5UJ_ zn2C_#8l62Pmm3^P{d2L;EU2)4eQ1=AgD;Vgu>dIx@b z7e7S_Run+B$&g?*>3u0W8_-b0hL*s=OezlHgGN?D3qu+qPbDX(YErduJUt&CIQxVg z!o3pG(*=qTnTgMu^mLtGuSXgok5fF%^x%YZIwE%uc@eMr(q>!1YnJ>FAWI!RvsPF zLXQQ)&nz3UJriOdMi^dC+rO8g~T`?nEG1f zSc$`)K~Pa28Frh<5qz+hwh9MX2-xufb$caVvx^QaiS)ox1HA4S0zDbj(%AAwCcI>} z0Z!iG4i;~qS%&#H&L$vk`~(DH;H3mtHguvS3w} zd!s0;z*vS-4^t&{e4wGCa_5;ICX=6#)2mma&M5HSRk|WCAiANYpJ*bq^DWTXV*%CJ ziwUi_x(bIhSZ5A1@uu&Wu~FBxhpRWWe?Os&z>Hq6nc{f)+}Qh%jMN?It!cQMjqOB6Eb>T2AORO}gtnFnf* z<*6a^(9Q7uCZQp}qE#c&f2e&BLCu7sBK>4pcR31&#`ISbl0^Z=@xir#aV85<9%2Y5 zD~0CVnXGb4I4^_^c^mV1CyF?xk-O52O~D~hfp^Pg*v~QqTdakyArA^ZTtx3_1+DT& z4m8ORUZhAP53792AEFR<681EqlH>i+PytKiKn{A;A8s?ap;7o%s9x-%A#!OPnb4+x z_LNZ@7T8RGJ}wxc4^oZg&eEvJG!9$4aRiCKHo~;ZKh_lI&;AdPKnj;h@`cz~z2(@8 zz+k{hq|3RW(@=ipS)_Z2Et_~u8Dtn-_%aG*@OLJm_=c#r95DkBQ-O_&07S&B|BHwv zK)w{5QNZ-$ee^QuO-H(%3t(vFiD>|k4*VB11okm+N~HFE62lmlLtf%R5Ixl8Uy9(zXhvDz^pZ>>@wcLtVK;|M!X z?4K`Sl-LZhDPs`R5g&pi09^5rK4uglWU`#gpHWWbHzi+`f%VQRR}@<}PBf=IiDz8& zpG7#HfjC$@8}XNU8*%#K)h70shJ_Gl;!3e*?p%Q^j?_3GE{YSth$ZTBZ+Kw&WJ2eZNB^MN;H%ow!?VVcV=+uto;%4B*{PwYtiT(E&Ca{*W zXQKiDqcI0-2$!oJDMeA=KD6xU&p5z1qr%0(8p`mP_r;-jt3q)LGeU5%b{c}e?KyC( zIniDmV0PO9apca%w`eK;AY6_Hd*zD8qs8uOR#ZH&5Q0?TZWvzCa29E46gD4a<&_n( zrkT$QbgJ87Ty1;4L4mh-7Z$@f0XvUdl3kBlu3s^}!q=4;u8KmY9KR>!!Pyc|Hdnhc zsx3<%JajOQ4j9@mJ$&;zMpPzx~`vkh&oxVNgX;wr_(;7VLJV^wKKP47O%&a zsV2a&X>kz`RL?pExKw2N4o?D_;9W>@ulQXPijI%Lkm zSr;ETiM0EV^?+W8OXl}&(^K+wunD+|Nn;F4NuR@F2mHi?j8 zVHiW5=~-pYjM_<$y)>S5ih;O$u_$FH2V!dQ-o-`fjfZsc1t#-AC#XoqMPh87FP_{q|U_Km!Qz7nOKJU z3)*k``|rQ;vr!Dq&CML!vwbF|p zl6-T-AGdBI9J(<(UshdR-PYE|DcbY!US@dwnpM20OyU6I4q}SW!K%o@-}WKTjnBF& zag2M?s}b&SN)fIozl6`-a5LZV93UeB<%`QX!tFH8bDm-tu^V|}1?igyjV~l!uK0fe zgmw#Y8Ib1%t`rBWAE(GP$ZhGXed=TWf#)p_)?kL@nz%taRDgKN344wn2Jg5$<|yoc z1$7nI6X!Wqra>MnT3ldpBcCVEGc14dfb}f$EgH>j*^5Zrv*$^tIAtGPj+HJ(mG;0b z!T7?R%fTvVXn$O8OEzMUd9T^sU?;#Jz`@I`NszP=IK^JLyI34fk-PBLYdRdqd*$5L zW**UMMZtt8Rvrr+tUjDL<6-+6%k2@zV@bu)z1~sG1?lQt?}*^O4APE`DwK)4frC}_ z`ge;J6MVmQ_1jlG{@ciD2XqzId$rsaINHnVedM@7dZHo6bJ1w7U(@O&Fcro1C>2=-BP~CH7cTz_Zx99Wj;1zH23c;T(a> z(UHP(TTRYmk%m`n0+(*yyycN`KdpSE(aPW9VG?&Pv*)}#3Si>A3~?1+ zY0B*LvL~)H45QhQ{4&vE7+i2W>GniOhUDpCM447StfY)Nz6A@4^4l3D&c83dvpmPa z+J$3qFO4X(@B1nnI{)E0*f7N+U|x|kfmydI7B|U=vI#{jJFuM(EJH<#;)zk5Njs?s zzypp2b+>!&2+jCsKMgaxz%Ejii4qQ1ARgbCAL3w*;Iw%-Pna`rVG%H8LjKI+`LoJK z=gnpYN(>ySV~dI;YtFoU_=#~q_A)Z0C%GJr6qsB(1q+7o>}-bM;)a82w{crfJ5S)53 zgmdK##zL9ez9oQ7i@E$Fx~uTxzrgeK+z#(a=s10@iAVb49Mm46WAVii;$EP8O4^}2 zVgffBJo>R$^ZAP9prYlkKzD2xTK%}j-rE^#>!Q%jZ6!9NC-2Dx7iTlkAD7s#Vsm(s zIA^EXn~rVAIm3=+CVw)-ie6_wV)I`EF6g=ZCbW{`%CENZJapMA8u_9)(9>(XXlFM zK}^aE3PiiGj&03jog;aGR0D{vI>fhfw}zklz3ls2jfP%4VW#yFXx5ewpoF^*&G^oX%Dieks}>o>$ieKxYi zIt(VHzNNfS6V(&@wnf)JQck~T9HqbU#%nL|8h2DLf$H9958N85C~hk*4mN+TfY+H; zpobUwz)cnCYAu`)`-}S~*k(a&1y-UB=M)ewhjJo}aUCaMSgB!Rk}}HSOeGFn1fD~T z{D5GSaqOF>WDo34#`kv_6yX;JW?E~Xno-D1SjNDeh6IBQULIk25#@s_v%L)V=i)Fc z&MyrSKETDnCgmhNr*0$@;fH+zSSZU;$o%|#kqR82)%kJ|V{t0|P?rKn&s&wwf{3cR zAOJD#5S?QVTUb=&A4-{X!0(2^)gGMw;WI10F{A-`H_5RJhmRnI2djxReje5Z77QcU z!6@K?J3@}b^{}NemW*&xn?H@@o%k7OC_hBXu+QKSyLf?k%r?)US@55SQ#wV6zo;JP z-7Vk(Sb0Z&m_;02ODLm^76&>t28!z8kv5~b!m z$z!p9sY-weL5|oU+<1Laj!$uMu!$t<7JLl)A{HltxKX$NA*!9F=@>N;xqT+)iClxY z%WlQpbd1{v&>hE#2WP~LPREFez!Nwx5refI+uC^^#0Z6vOC5VKT2_v08AyIK)6yZ! zmM&cyNE)CSf7fE$KN8uz+4((T^JZ9SB*EPgxQi|Lv}KEwWVuW+`)=71%I&)pmH|k3 zDU~mOpN)n5n%Fu(xw(n*rXe-07D{C2TOkP+QAre8zm=En|AQ1$QU>wo;3gig*^$Cb zxG!g~sg%b|NrayQ158S9FGGf`NXwA~;oj6DjX#!uA&6a;_v-vIGBqmt;x&m>5LREIVc3nf3!*99$#S#rz5Myo-$V1W=|3 z3Sc?+?oBKpH#Pe>VIt(BTc3+hh!Vn4xMtpYy^cK_h=eXWdsZZ!Oo~Ldk7rZtelF(? zMN)c(crOe7qXc!ls|A~j@G26rMS+&^A6@L$yYQ`t-e<2tm`nO{7k5^szyf`meb*^> zvwSq;u522qE2yHDzQHD$M=EG}MLBMdG!c+R-o&0^YP9%SKm`TB6wq9rA`K~&G7T0K z5*i&Yna-y-k_3I@OUZE7E_(b?{_ab|(GM@d3^gW#)OYZnRlqN_O77V2GXPB|E}5J{ zu@g4aa5UKf)GK0QLPEkFvm8Cgo$(1S4mLk-S#Lb9NB`BMDNg{oIatMMfSZ%)sMurb z@L=FTaS6OQtFR98FisNSGq%g3*bB9hs+sZvnNVK=c4Hx-zyWx2nG0v=pmjwH=R&lD z{Y5f(WgM%aFD?bSof(8zV~f|(Z-nO_%$VWOpqV&6Jb*6yz`ZvODHc6Yt7bqipjuF@ zDm#L)j57lZ^HuY)TnUqCIDRgB9DA6`l2j85=fF=jilM?CRD4PPEY+O(_VXw4d1&6u z!XWxprh=RIS!Jp`K8{m`b=+CS^RlQ_g&*)OU6Q0yjVP#~aY#2m(U0mDvGdq6HrJla z+pOw~if7DN!oIOf^W$j4%)I&VDvTYGFOssfk$MytU}&wU!qPI;g3=`)Qf2`Ta8}VQ zcBi^vNfO$10dGG=CaS^tsuIXhU~GdaEE9Z8D@oT;E3X#AS2NaZ;E(tvK?&#Ji_ryq z^e3>f8@2JEa-FjtMiZEF56KiRcTzcKl#ILZW+>7rgb(|<`8`xBcq~>yol!PtR(_1| zB$oMb7BGC{TS%D~B|N{N6bG`y7^n=EU2KD9^W#yNJ-=uP4&lbBvF$70Wzksq>mpe+ zbYW@n-NlQ*$%AH1MmOOsLpiojd|3Oc=1&$(MGi~%&m^^(r85h~ zBj(#6kK@euIc0?^=zqmS-=|BTfOmF2Bz{(YcfrVV!dE!e+* ze|7b8CI%Jw|42C!)POF$O5i9%%aPIY<;xc@9>*!bGn1l;dgG{JrpM#QjT_gV!+5vv zIGdNh>&A~C-^Ba!rPw9f#AbL(FsjKr88RYYN|F+xci!jrq;~GynU~j>B6f-e4orSS z1j0PVKr_CSP#wg%f&y@&GiGqpv22`)i^H{c+RbC%DQDskaWIbkVZ=rf7tOB&yi?S% zioCoMZ^U>Wk|#(m!QV0nT7_sCD-q&pH%Ktym=my@y+{J?IQi9AUxlS0Xygn#rwd;f z*jSkS+H0@Diu6flvF}R$>8GEj@vks>l6XtLbm@})g{q=rtq@WoM1t;$0QQ>+1rh_- zb1{B7Wsl1dOcrk=^70%aB^B>cMcOiM@lZ%0slXnrdmKB383Nl=!dIH%ZalX3U@Xh&x~d zLbcon+TIj^DT-Sv6cbY~0;2#C#MLd#qYdV?5q=NgsJkSN$#@*I^gumyQ6O8y+h=q}B=6DPWpi;ZXQ_g@0Z~lvgLs2*akwnu67y`( zE~W$fkQF*M5=;fRWP8MPfW424gG(-V3h&5BE0IAA*`N%TD1(D#%3usuA2eQFFbA%K zD3e4XdJi!XqJNLY51#w%CK%{z55S7NFG$CdwRs^f`{m!70w*C9sxS2y=4< zSAkm&#LDd_<6$Dc+=+{WwJRqSglocrg|o_X@=GV;?Bjc6COD0$e1*tl0&^mADE21) z?{Oz_TrpaBIO4()q7&~%BcTPH8p3Z9&eyGApo1_41_phObd1Id$w7Dh3Ld!u1;4Mc6u5e3g#q#A!aMN&;vw5?yb?a7qT}GR=c*eCg zWeXRrCsK6cm^F+u<${jMn~#%b#AO6grONXz29v!uqi`R=4+z$-&T@)v#4RwqG(Ug- zU>qO|*_7LCeEuw0rxoRgcEc`rmPO}}S;FkslHoWPhTDM+0kN5cOT)Z9cL4`$ASWG+ zYdlW0nFCfJ3+xc<#~kg&II|ZQ2b-FKLAIT^4I|?J32E5SH%*hqhQ819P7ghN1gQE^ z=w%^Q2bv1l1KTxKa0J0Y89MQa0OKb_nGjncL(xk+B@>ifsFW+tgmfMSOQ=>cg2b@piL+acnL+CGJDQ z{t{5&EEP$hK>&M(htM#&NhZVWFUMRB_8gv#pkj=G8gvFx9*-S}qQVk3<6=8>aYIKp z37lw3s80^>SP>~Alc)AQHUV4=rDri5i@#iV1e|BVf!mm;ka5lmC^#nLs@)#ue`q(( z__on+*>d+G=6GkuzML^rRS!cPZ*5m1m!QtL#KsF)Z*RB(u7*RyBuIwySB>2bPL>Yvj7sC^%VQ?22P2a-??euK!2U)k&9r@)Ca$u z20;=@6whaoaX?7p75MP>Wl1*cPk1ekpy`oxPX71d7&68Wz25+85y!Z%!9xZKDl(px z|2-%Y>Pqa1@6PVY!p{z6WkvXv!6X|=z9rN{rRquH*NmJd#A3Lnj0nWm5KM>g>=H^+ z5Hsv~IM4bI85-|Sz^>qj9>Kvw8HW)KdpJ09J_PTG2$WQX%O3>}j*Nrqq9sxigcqTx zKxEt`L4!?OzBsKr&LW#B&+DtD!~|CuSu;EHnh9~ z5@#}yNl7^t!jp>kRca9HB(;p*kY4>an$#-)yDE{Y@F>HhK?!z@dQ%4W>|>BA0{Cw) zqz^Vhh>MfRsU%JU-Zl=38dRqbg~XCVNk^#VRLu3nshgC0Wg}zWR8q?W18141Y*HrU zt_Q0ZPf_(tqQ2}$ulVjg{@uSu(z~bcoYnOA%f89D>qb(&soTYV^?#kNH%+=8PYp$1 ztufdAby|aaF}3`%^q0gP@2ss4nrnR{gIWr6ziz;z2KO{22^*>Y;JFKl@c>xfcsZUd zRm)9Hz3?6PV(Rw7?;l-Aw7k8x{wjPFG(>cp*L3*pwHn-!>AkW06GP%2s(*9&C-`=5 zPNCT^?ja4|ss4{gzDO)8Syw+~CY`2+r4K!2o?Ws|gL^#H56k=^u^LIP-uK5yYIsuP zW3ED)xWfhfgyK$bTrcy zN4(cY;$ZraQX#Cx5D}0REK}^AbtY&R3iPk?olOBUMKbOq>4pB%Gl{)XNkv$Kp!rAA z@1;T-{vyYvEqA<`)c@sOUFO}<55@6Mtu&j|FDK!Cn(CMTC{0Sf?6WuLVSl6;_~|fn z;$@#?+)<6uD^K@3u`;&a=j7QjLc^TEJI#kz#%gd!aV(Os`Wa7rn%FgJU43%Ke@cZ{ zkIt+#M@6mE9G!_4-%-~;>9j3l@9te`8>!*a$}Z+FY#GV8qq|m*u4xQB(?x@O`e|zE zHRbHyrZ2kG>!+MeMt5zIyzp3AO=GR{WzAz{@pR;l`Ny@&n3wCj%s;*_p6Ek)%hUI@ z>UuxCtNDkp6HSrS((UhR^XP@UGQJI|(W?k%UG=p=2Ho6-s;1Gw2Grt-B3)zehAQ1Z z7V9bqVps@{AOpUIg}f~lsg%vu$LcSEM`}0;M=(`Xtylp@6h6W6Zbdjf06*dENBqt+ zCU|D9sWH`5SL5$UiVUj+`&UJ@np&#iG`yw;e@xXi81Unnl3=4ipyTekd%ABInkpjxG}7ykFs>ExuwPd~EgbaAH367E6A% zfLdy!-Mi~{@7axDH12NEwY2TlO`FzsrVI5@t~$d+BgaNPd)mO!NI;lvqARV$*cnFZ z5u2V$0n#lr!NwD<=)^I>77$z#5)QZLHuTwbn;@}ureK{-ipl&BBq=;bp#mI?<7mal zYOF-R;^?$r1pED=nuf;k1b`hzVVzPj=Ne#a=FmjO(ceR9=HGN30cWj? zThw~k0%GfT_PBAQ|BZP!ZoGM;|Ct+0o?kNMhT-S8qyv$sN~o@u`8*+mM{LN{6*VhY zR##WA6yTV4w@gm|Vy}QeM_>+B8b-zm0F9na>v8D1I z&3!@l1zmpEkFJf!1O6+O`x^Ewdvyc;|B;{n>WK~cujXfOSeBigy$t)I^*s@S5Pm^; z2jLlnxd;Y?a0GZwKi<%=Z(l>hD}IXS`rY%2;<-rS#gA}Be&kEld77aM^E3;G`ofrU z;YS}uF8rwb`6r*e8sG1cLkDHl- zG`;UT*!#W}2YY{W-{o%(UeFjU78SCUa-ZXKA!u_EAjCh?uc4 zV^hYi`PcW~qxqkldkl6P1&}td1=SDk!G}m)S_TVveOiTfoN%Tep6!!{3i}$B%7=r}<;YKTb~{_aI}sHd|;b+>(OD z;B8wrZQ7Qy1-^(`vu-?gETsVc>7Yr7#THr_jTL&-6`-hFQVO?hK~dq!8_q@TSTl{0 zMKxm!N{eq>TDQEmC51~15R~>Dw2D+ng@x9_xVZ1XN7G7EwjA4(g8#TSZP|o`HhoH= zo1#b|q-1ePZtddQ>A9;)R?VKh$G}Ka zThHy8X`}M;hy2kFvGl25f83Q|uFwPBV}H@Wa{)vb5XImCaFbXYmw}t~_m}ww`3L(4 z+H49N5|XTjirsI6a6_o9ydelTKxc(NF8fJToJ#LZNL?U2vVpt}H#BT$F$MM|9A$*P z!ak8)T=J>#j}v_E?+#tDkVwK_f5^)~dZ{hIXl!Y#wYJro+DdS`ft9RvwZ_)gpMPHU zFOZ`gzKdcJNF2>TLL6MeB$OC1&nbdt9>TVV{Fnqd$hBgyg|jphjqBFN_hM`jnk5DA z5{8=@{w<`>zDQvVhB*h9fZT4C4^t2byx1YY0x!lYgcH&K5ogH-?kKpr?C(WCLAMl_ z!8_bG_ARA8kS{OtqNg!Gm)GVlFfS5i z4Z5Mc_d5|@;Pz$V*0CRfL|ntOUB{roy(5~sb|#1jDk^g9WWtsb^0U;Yb4lPkk-%Km zOCZ=pT|v9{QOq@O7A!gZNqC++d}8UsvNAurqT>XG_++EkVA&BF65=yA~%U`j&1R` zhqT#t;IMn@D4!U zI_@po_FmbJG|RIqEVc<_0y4&X(NIH}uov1>;OHXZV|*;aWr@4L?4 zY1iJmwv9Lt-`O!Xn_Ji1iAo)D#QlW}&f~odM!)Q!|K0)?Z%rl{1wx}^s$36itSWJB zE3MOtk(7gPD^`f&5!f&lD}3+8ims8UuFjvOD8vd`M`58xM;wU53+n2q&QxcD^A%C5 zL&Q#Eeb(kwL71-8$ih~9$VQ0tmCOjqx)Rb`AQ>z15pI1zMMK#-7tTcxNyeM(=fHMH zsx&D`hLYnQ+7FsA2uuCRh{9LlBq5wdjr0Z+6;qCBMU|;)Enz0ZqM5Q9g_lqXMD6P8 zDm;K=55?(S5(tEB(OZheClY3mw7*=n!j#U;W}K;oT1+OR(RfW7X@rHDK&qA&&_<+Y z+AYgrE)FaZSD=isAg-mQ9|2!V5JQC!%^9j#IjE+V7BpF!{HB7drkkdaWGRg^nvAA8 zfs87n32j?vG7;z9VrrR9P+Q9`vPY&c6Ha`Y&FX7H;=asU2cqQ2eFBX`6w`E==n=KB z)vCxW_YfO`d3vQ^_QcXJrq;@@Zx)np^zImZvbz^ zh$~%KHvxH$bmBZQ>hJ?jOJ{>Z5#>%X%kYb|JX8Wh(PzL(MvI=K*l1NkUEmi6!|5J^ zOBgI6(|r^aNp(m81w{~fLsseP#aGOAjmIx2Xx;YYB3W@V6M+x$C*TwZYj+0bhfMZz zjinf#f4#5Y_0Q``zu3Kq!H;!{1|Ff4==oy!zSgQ!n<%n46+cqcN$|d$u2HA!)S77& zwjRd;Yjiq&dWjG&B#}X{)+SN30WVflbbq~iHFXOaEQCv&;Ga4@Lg?H-H93i*vaz<4 zf;*PuZMF|XTI9BX@V*j7Y?)Ny4=-QoX=g;s8IyVDsV3pijSfY2{HDd_2CIMQ9W*fZ>&%@a^Qz zEfUW@2b_@<9EmC2&C4HN>(u+dMfF;%IK*ne#lhyw8A7!5T!~;jbt@uslm~Hfu!{8x z!>?PcUDUYR1G*Y-ZSJvbF(h1?OFvG&uc$+fsZI(D*4eKxX(whqRNLe$Lec8 zE-*hhRxuO^KDbC$U48h8F53>Ru6)?QkS}U03|ZT@53~+jWI2`n>VSb=*nuyEX${`s z+(aT11`XZ>W4)JE=;7AL!VjtsA6Qd2@WY~q4fPxrUMzpk!^G#gf51<645iB@#XTVwROek}y<|jS>9fX=?z=whd)Fo*-;| z5#`B1dEoFDYn+ntgmbx#NSe!l^FL|jZOiaI%210ktV$4SFQE+kP=@X~63!WAxP+eY zEQ4QySb!`P;B^$>C<^c_3J{3`WV#ms>7oE(Xkq~?7saHI_P`+_{kSm{9U4O(PSszN zX>Ti5MI^Af;MMI+ynqrLeKC1Lke{ClPK?8$6O@K(I?rz#%_vQBO+v_e%gzli4!s$zw{9yWXiO+Vl9Xpo$ z1A=Y1UjFh^7lo&udg{l6+HdB-Ss;co_(Tr?IvHk?za(P(euyvKm!~-dgaRGPjqW`e4+c|8Q|6m;ksOV{P;7- z^2;=^7!MAe^@)<;g|sf1}xr|RdpvcDAm|)G5Y%U?UQ(5G5uiUKMpoO9#~9F-Bb+x z0c6zIWdC8`zC8*L;~m4%D&ttpwBB7fr)buYyajneFDR=bCJY}nD@8L)H*=O=SD;qU zfLpG7oG75y>vj1v3v?;T>G=tE0mES$dxrJQW`|&kM`~b(~9Ji|9B)%2hsbTQrz4*J*L> zv$ea9B!X2W16V;4;?j@s%-nJIxk*3bbzZ>my=_dd(?SnK>NpSGtQT>c6&QOuc9wet zZ_`~2q=sv_INXTf&f+Q1R(e(^vKk*PX<`T}(#2DfQ*kp!!A+27jHz@5jBp@7SB; zf*pxH%v+t9tIPWNh34Z&t%<&5a=cp0*y)|!Y1ie5Dl)Gq;2o{oBYMRE6)M{i;oMX) zF1!|p4x?E|cE=6gTmQ2S5%UEcYy$T`lMatRfFXGl3FcUO!Vd)GQC}+Xj6o9yTV<}SOPs(K2!(vI(kKPT*5TZiv zgyaz=gk%dcSXTMpg}r*1(C(SPuq=O;{hT27xK_j!P$7+uJ>%GE@1+hy-QcgbGp_DR zAD99&mn@UT;z)3i9avgK;0@Np{ic#aQv8FhSg=A`zQbl+oDQ?y_^} zwNI2D`Wm;6VCUEu9nd#|xVk)0MHLM@B!&@!YYMsU=a^Nh__#uoudmxQVsgwZ=?S3s zy?VLLB|-vSmw{)&l0}9rH`i@8x#5RV!81&oiS2IrVCwcc<+?BCF1)HT9ShXryW7li z-H))EYUGtSthS=GZj%c(oL^@$vXPD-OYsQ|bemsRQc3|&IT>{{?-3+e;cb!`f@FJn z%rHn1?9wfOd9#fs|90|b| z!10v0+zcbz$w9Fz5=-OH;^JTvTf>_)?zL`Ae{LJqYwbA0=QuY6n=hBrt28dwFBY?% zEC+pQw=U;l_9Dkau!?P20>@L?t0Wj=E!ji69@uEjZ~AFS*Hk3*W9*rI zc+@QoK7*Z&r$yL}_m;Po`tO3+uF0W#!~6@WYQ@N= z&r2_?r6V(x84djvBXuW2Gt!`^PNw=k{r4YuV$8F;-Rk}Eq`v=XjFOB^BR;{+8f&30 zz1mX#ajZ|XXaM+ZpJq0&eE(RV3|JjnBJdo%{nQ??KqvS0`{y5xWVAf@#H&C! zDoFY$H7zlzBmFyN;cl5}Ld0 z(2_01H46Gw-ulb8-{eV{N?}?t0MdvHcN4rSM3M_?Dn1*YOU=z4i zn4-G`F*i))X77kq?t+*&&j(|%+RaZyf45lHc4UWp>e!m@ zLJ%@^oBCP4@dDrO81UA8?R^m3B;VXTRJ{)ZcX8zwz3qJvxJUHX-Or(4_ZEx4xAlF-Xmvf{5`mS8)NEfu$`Boz+ zpL4w32B|&9jZ(tKlb*)K!G<+E`y$$e1^M})W&@H18`3+W}F;h#iZUFtiYw-0z z{Eig*X0gz%2tyFT*+ADsHdbudg{AP`pU(~s5tuo^%_L?yk@YiN2;A&%WZk(CyS9O5 z^=JG1_~V;rd-QNbS<;?Z_^|dU;mz%DHLb^5Z$jQhDDuky;9#GHnRbbiDTKvJ6Np_V ze-p*3kvXFG3Gmi1TZEK~-Mi=!xb;$M?e8F-!aSGX!R9p%4qMbfExOncMK#yk<9j_`)Ti4Fg0Y^GgUeImhWJ**WYbPBFoD z*-nVRJ{EVibx4&F^fsxANXkmZE}{=hs)_jD0IfV>3)J43l^pLe6BUp zN24|T%*W+OL{k7MHU`4^5QTIne{5TpNo9QmNum%Y)d<)fEcK^woQvXH!>xTpI45pV zDifqIk`V1F6#l%XGgGovz$qT|x*$c$SmS9Hginx!*riHYXB?O1Pb!&IbXo6f)mQ0u7ASwaY#KLIN zq@ycI`iOjJ5l4{5kpu=ALA-r0WEp%O%oUS)j5!@X^m++F1IZ`R>?Q$Ltp0?ZPVh*D zH5DOKG(bk_qS!|hTZ_by@D+6h*#b7=IS=K)ZmAgRfmJd_OBS+WXX3}r5(W)~61q(& zJtgUml%OspA1HdJ5UnR4s6bJM85}XB20MX%6f=pVcVLHJpKQ66(A7)9r? z8pS^XAeOh6FV3@k(Gp}Y;Mie%Y4A5mM1B0wu}M2U%v`uk^syq9j9@q!##J_zMfeM3 z0xpSxsqql}I^;yN07f%Z&#MmMCLFu@(ao|b3n`eLX(~8PZz={y0{<6-jLUl4bpIcQ z*(LOIv$L$eTvo5ziJNQdcs{{)F0D~=9%n0uawo&foJ8_2$#;|N1o?L%w~>ZH6PeAb z4LLJyIS$5D)0#(P1+p_m3GQcC|22RbZeL}EQ#_5lM$bp}3SOAGr@@V|#7Rual3 zh~+a*@bPE7!*)Y(KN6utA`>wKV<7}PM;Ki}t9{wdMxh~}06vx);20!>e9sC#uqOgU zH^NXAV3ZFe>?{qH;XzKZu&0u%8FW{6o3jB&o=o>5R zM!o>T+P0K-vZl&61fvWJ)R5^U0`@=Vj{Tx)a5!pV zarC}b#QxhTm~Mds&euC!wEG?;>t#0Z&_6k&IqqK>uoK_9|kUVPIpLCJ?e(-D!JMiO#5LG(9$NjH#DBFcj7 zEn@!ERcOV_!<2M-^xi!KpYA=Fe1S9Ae5%Epb737micj&H^Vltr)DX7Dazj552Bm(>pmX75Kom@Hq8qhwW=QH@4iRXew*vi9ts z8z?!RGMDb$egOL|+ceLmE5jFRT5+FAE${vmmDX9ZSo7XbQ4QD>4D%bSa6wy@HYZr8 zTOO=y`fzi<#?z!ekzRFxE{9nH@d!d;GK7v9ctADV*l3(>Ot1c`Tk2oPXyfRCsEB{! z*WFUl-xY=n$G`3GllghW0ORLr#_BZ(fJDD1p6x%EGSl#M8dKAsvk$asck~A_{F+)$ zOHQRu{AxclDibHMHQV%bjnej-G2$smY5G`@0{(zlcn|>b3%?QbgFi`rGf@Iq z5>9YoWcGCM7IXuh{jEeu=A>jaN8l;RnGN_ZoOr_Z!@Rjhv@x4NfzV&VW@#+``e-m@ z!3l!QW3b*Y12I7Aez4j`RzW0B_n{s#loE4<46y(+o@6sHru$&P_AMr3UyOLX{T=(I zI8kfoxY*b@X{0nd(kI#{Hb|)qlE(VPNqyp!K|#vMNNHqrWHg9KY;+=gZ^;K+Kq0%K zGA8Zo;49@|66<2)Vtr!c;-aJBS;qtyJHbk6ur!cb@hgHi`76OPC#8;_L$-!YBe-zAJD63DfBxsCZLZ< zvq4h~S@`zeeJ_~l9{l(_Xo}_OfHk_i0o1b`l+5oSKvv?*oihO9*Js;-fSn4<%Fa_Z zVh!K&!`wg8et2nW!@vLKla6I3T9Z#3L7+!0&H9Wm_YQuqAzs5D4 zr&#dCLeWUC7mAa%e~s?rm~G~d-a3oq!rGA4NPKD@iL5?bqp-Z)cZ%iUtRUUFe6zXp zI|KDk$*f@q`%W=@fp4F$_{2;vo>v&Yxt42*`FD~&+UIrs$2p(sKT}*$p2oZF=M|R3 zk?@lH9e@ttMb5<}{T})2`VYp7qbuhe05+nE^2EIg!-?=Imb;crZIXQQzJ7hQUVnyN zD_!>MyH{Zuzx-=GJ+x9`xT|TGKBoT^OP}3u)xyz&?;N$c6CUq>dxm+@N>uBkAqqqN z%fT7Gxl=5g9y!;i?#WG;@KK&VV!%Hs= zGQBw2&A_pUGpe1)~BgHRIwnos@v+a{AQ zs%8zrC&R9*FX}NV#>TQ2S{nY^#IzwmnZrOUnP8PHN_{}TWu`)Zqq@p`2=9hGB&mHd zXMNfrz`Ro+v3AG2^5(h+^%H<@Kfbs|e*`cFe4~ehrx@O9R#;vFS{>-V&Ae#*Io(0& z6(!yo7UA1+&6+04#*e=M^43EOMZ4EEpKeZuT`Pu>QJbXY4Ae+O;W;2lL zdh9myp#8u#Bi=cPr+8J+Bu^71jyCgID17u1lVPix_3y`tXixO+tQ~=<;;q(On z1Vl`+d|a=v%mYS!0z^ydq}SImqFw116fwncq;jf`t|v{g7=TgBfKd^<-_rkxf?O|D zo2TJ9scDzFdw*2wZeUcvnq+ecFzTVzr#T@{e41DSVe9{4*W&+PTmrJe&^u!B%usm{aU=ytZ za^(S={{9jTUM?}--)P6MKlT00kNt&(%$I>(vw=!40+s#=4C@OF%f+r4tg*lHXRf7j z+tXbvgQfqmD0b`#giL$v!b(T=jYL z1&eQ6h2_Du)AYVy95)|7Gt~^-*uUoUW_19l&fXD2n@?}c(y4yTYMOoeU0qkHF@MC+ zjN!6O%jI{QKz7I&Fr@j@Em^u(zt3u#F1!aT=qvt1Fw`ZRBHnAFAI`62&nT8BSFdem zQ>01Xuhjp#eQo3HE03qoU%fWt_edY((iNh97M!&8E7wjk_;D-Z+2T z+GY@t7Xr^2`VMWrx+_a}@z1QLO~#EBclAytW0xkp+eGgo{pHI}G_R$vbgOE=YI>=q zzut;>cdk8=5hdg#U+izDZV=$!d;jak%r13JZ^YK=4o83Vu3$6_UiEcVfZ8JIjFHSN z;?s)#joUicHHF61={9tUq;V!g*ilUP$`6!uS;mX3M@x#Ee_H5g{`Ofv{V(6&Ig;9@ z6c_XIt0h{|S5NPKrMMh$?+>~;{Z2Pq_kXXugbx>I4Knx5INf|KdC*o2b!tX3J5r7M zyWSaaut%Ulzg1{meeMHu;Xei({C4XHdUJwsnSKFG{(DDscc&a_ZcaQhUudn^HOhP% zPqxQK=`W&D>IAE>f6dg4eGR^5=@nn|?9r>uW>V)rHuV`H(-1aw^=WFgJacfO?$s&N z^nW%?Y}zWc_&@l1`XxNxG2!)e4GHKa>il}9KKa9mO|johY-+mWXdlWn9NU@sJ=Gma zJgSpQB4Q&{CP@oS;nbVtdez{tX4@({iEz*27 zHmvzZrKIJNi23?uha=71Z1c?D3RZtrTv#))^O~&8SMWCXF1XTM(HnN?Ljf=Z0KeA&o!)zDM?B>j$N$*WO>qZZp;6;r(Xa0Eto}sg zv*vC8xG`rxSf$h$}N$VR*+jFYyl3;LFD2@4%oeP49({Z4>+|~aV=gw2sXRZ7+AMQN95H83xY&ID zOpE?J7^;(s?W6bWAG-RPdC=Wh{;v<{o?+hp*Joz)Z+bXnsq?c6=bu|>?y>l&c}($9 zb5!3a&3aPTA6%F%SbYp(u}|vh4-|OBn&8=qxo;Y2 z*jMYC)Ca$VEPdFge!2d*{)MmB=}h|L6_OUeKIc+tqHmb4;@~k1#*r9nzJCPiula{H zHR1kUXyvrd#}3fEU$hvL-w{CdP(eqYkCV{rF+Si3=Y#j{4NRlaiv0(Q@9TF?IAJoR4GB&);`xuegAY(;>3#hg z=-{5nQi*zVfNut!H^dx>+;>JHOUKo?F@jp?jc0nm6;Xwu>rrHA6)Y8a&iU$m<565k zboFDY(f~1{=f0<&A0fb!?TF#1@{|TIP=`}ys(kACms07smm~ViG)E3R1BsOW^Kyj# zoAD>pYsQ~!OiA7}lAf|q?bJhQ+g|mDd!>}(wW+oFhtiA>u1%%N)jRytsQItZ-g5PZ zfHP@mVnfqkq55^RPc{b6KAHY`4R(-Ff@y1Csd~&?n4nO;UZ$;Db;}RQgbVM+QjURY zPKA#I<;|VIz7S=uGjtc zb$YeD*qmh6R;@VM7JWcQL$8amdR*r2U3T9gn8>y? zscAvX!q+6i2UM?;RW%JG1c&tkrbvv_8w{PJU45m+|^&uEc<#-XUKYq-orTF}%19Zw3+VqdSb>d)BT0WFM zltN)m)<1%hB$W@epsNmU)nO=QWz6m_1qq(>f-Wr=L+Ncrj6Uo{0r%34&(0M1#Q8t! zC%r;{es-qm)%T>j)wo9gxn>4wUU`D3mrAxF2GEL(PT-%IOzrjV)2JDplBb=f8@J-pP?a97jvF#@Q?5sUi1 zwW;%#TGGmd%97{a>@SGH)r)j10)D7hP2G!)Dj7Xkums~u)(lrR=+gTY*b&9 z7`NO}l2S${)zj*IA4p{BG74J}!GuD)p+|+#W9WN_QGZMNh92g^ug^FB{`L9v#cAJ5 zq0z|7*G_Cy$T5Zu^&9ThP;Nd((7k(P8!XcrUphcht0OK6>Zj}eUV#p@M6Zs}3wbBg zd*kxieSHO*VD_t)hG~0VgPM`cuaA8^b?U2@G=0qDr%5@d8{E)e4!r~v`}Oh2K1_+0 zUk=sxnSZjeV&2Kdh+`2Tkkonop?w4rlCxyqRUS#I^@p@%yqt_{@7N{tFp?~^$?M*O18M?-ZVO) zBcKFCL8XKwkOWHtA|fi{TGlR#BDNKXUSH8W2ErA1aXYcaR{nRv@6zL2l$2_R-Mm^d_H%ADD_Gk-;Pgb0m4AH7 zl{snpXo#kd{PFtJ+^vv} z-THMWBZaFRSKz6MK!yQFq8eZEww5@hT+c>R#h*@zBp-=(X7cqwKk)~(xA=oB`EnRb zc-XTypHga#ZYh13@*VN)t@(VjJMi$G?z%Onner7S9Zexh$M>ATGazR7BpsFKWt>*; z+;CbQJ>DeH8=68NXNy+a&B$>)(N1(G2?7&`>mEd4>ztG zgv zZzQdmT8B1Q$PO9>sIqEm`&!ooJTs2&N46=*ieRI9&Vw2_>cU)O4r9$~6Qz;#!#$xG zA5!f0Os^r~@vZeUCSHSL_AFI7d83fkE;4()30I(I^+3f zJj^mCQXceV;W*<#tso#Qs8A0;z^px0bx9n4*ie;mI$JoQZQrm@j}jF*bxrW*_0bvW zv*aWS98^zS^idHEizo(X26Xn?Nsh&NH zHEI8!$*6B;<5rVV#Sm(`X~%~!mSs^tV6`npxpDvfQ~@+;cnXK2o~I}`?N}_vgQHt!IXX9Qu=@ZQu9 z_-rLnf_t%oVHvb2Y%B9hrgT{D5T(+>iA>2rY||@9 z<*bCS^?MH**G*0M8pExKHjEFHlo{7e>K-rVkiV%Wl_Goqx9ZsZ*g!IX>u0P}lp6Ml z%IC+{?KbRlVxwa||GPBstJ4N^;$KC*2Hjciw803}X+tG!%%CtlMWO$YT6QT53SmI8l|mzXn&In184~^mFhsBJ^3^3TtKQ$z&Wr z=kgn~>lSl8ZW8}Pe?q--1JFZ z`5mi`Q%%8}SOA6KJ64u?aGZ9`regM={WZ6Zcgeo~(SHlCK{3j=Qo7f4mzuJ#ggLht zWdqzDTnAu1ChGyKD!?l6DMbotES3(yv{6~$5L(;+&?xB~hfpqEF<{bG2~zc+CT!)> z04Gbzk;hzm3vdRlfe%t)>2Ghpaig@+N!$QI558UcZFtSvX@}KS?}z&kVRFq|KJk~W z1i3*28Gp5x)V2tIljhh)CO*GQLoFH(81Fw?*DSX21(iV&G#c1U|zN~(S$cNqkM0i&HE9z zi}egNLmkbT;w>Zl7xxaWr53W}p3VTKX8KkM5*m+j04ClK>|v9aNV(5;KnEU}NI8CH zG2EY3gVyY@r$%nHURG7+8AaF0?M_PBChOG~4JV=)rA%=BY==-F@`01K*0eL)5;~7j zasZ-!I)&9J&#FzOIe{hNo(EYCid4f@5t4OrhO4(Q5p3}IC2-XA9Vl-qxdwPzP2Yh* zrkzZ#G0mSyHE4fNiLBDh3{<k{_DcLrIw;3DPE2ixoA-=zCv-HE>5pcGq zIMNM&D#7)s1{~0ueHF|a_`TTI?IgAfb~1TAoid894E7JK3QQ=fJ1vA`RbiarAv$H? z80H|*k~hTdW7v1hlIzGdJL0dHKN7E1>>}4pDGL4m@X>`;=llI5i!WICom4CCbeV~f zR2z3{Kte(5shD{{Qk6CKt8Cc)U`QewI{y&uV0EZ3eS1|^+?N>`kKr{Hkgd`h&|QBG z*&!?VvxHq{>rp9P9J)hoXI8>y;99pg-19NS`$W6eI`jhz6*{?F7s6wT0)_RPFI@u4{|VZ-D1r zgG2Sc2ej1EAjK=vi1e>t>$H!h7{dAF5qjOoCrq!aA&-~>XvqHPX!L=+FEZ)GrSt(S zydMd5_CE-b*ve?Stp5uRR42W{e$}C>weKvX0V@wpq8b!zL%0~p`ro_5+ZidGifbix zfA^_U4JbF0v0@oA<3EoQA+6m;dW$(%{|Y2UROS1!F=C@%W~fImg)+0sm36Lq=CHZ4 z2=<*bOjy8ugD-iD?JgEe125OIl?r}$IJmC*HjG4Q*3ezhC2TM^xZVX{1SoLHK2mw< z1gpBQ+uZsGTODo^T~7Dj>Rh*UDZjf8Fi;V1&))TE#`WJxur`RA4j}wu!T=$Wnl1(q zqUilow;rmZ))-_>Dh$26&Tugj>h5p$D%Rq<9 zZdDCZvJnPVu@QiyQ_OfR5#2n%l{tKugpg8&E53lFdfYN}{R?Q6i#f{bqZ1EGi+Ycb zAUcP&ZQ|6e)%6i6olI~0&+yZ8EA`Tg)t`qBP}_!lE0kD2tx4q_luX@>uw7eSB9#d2lJ)`o)jSJQ9pLwY*uU;4n3|6tI1}WL(lZyt^ zC0e4L{jh%Rid6AFB2=F1#Z>-Y+fRIwqgZ>+Qu4b0jVRhMw4K~)yexGWy%9YF#NRiV z4WgCKNB*q3!%`Wa<4IyFbkad|gLdD(+mgFK|EB)&;BBbz2dyiqK}yD1Us6WV#w?U& z3T&_{f3}y>j$q`&*Lby!$bNU0VZ6y zis{z%A$^$sf~j{6+lCp!X6IOz=&eHN$o6}*!&*`0#XHNcdh1sN!ik6(5wbO?gEseg z`1K%H+782d+=^D#f3lNyQPsB$#p27GEG0J$#Q~s< z6o0XkAoBoTC%W|kjI)Z7Oi(BCjm;>lmym6q_^1~14za|4aBL{0v9qz;6*~(wnmUz=PSF!+wYoJo#t$ZbxLsC zRuOl3b`_bRK3O7Y&<=WctZD#h5#bon!)Q%ZpRBYc^GQRxq?%$;bBUM1puqCCc$MNe zWDz5Ky@~zqU&T0{3yU&Pr|JUD#<2*CNH|#Gjyj=5@`+^ZvEu!T~$sh~K~_ zjaML1$Dph?*16?px*ck<2TUiKB~HTAfnXe>v`7Sk7>BV#oe_8l8x_{Z!`|W|KTTE5 zg-HUJJBX+j8lDe?Xd7q4aE{TaVBPaiSl&n zcBo-RgPDY$+P`7FsM5ozrozKW!YAdmV%ooJ!}`%QB)sL2Oe><&KJOTFc)uI=eMjtp ze3jwIi6GYWPYx|Ah4NAHcCvSZ0DDPaX5xZvE%zZQQ7NXp-C|QBm+xak8r&0I0R|mD zZ0fok*YrbNZE|^cOJI4{p9HiFaYawICAT3c9zz;-5y5Ye zVqd`Z@Z0PVObT{mh#(yL5eNi7HXN^BIiB`HP$-~o-C>sSL&I?+SRnC93%HN3p}Rbs zT`u$$Jh6G`OwD2q-{U#(z-eM7g1Os;9(%^^6b&OC7YN4L?X*e}_M*HR|hCzvxUXS`%u#O32Qf2;PQGliHEq=Axb-X?MC5td#oz)W3dtmxHC^`7ey8_{I(k( zqYi6F!8$|XK|N!$YzaApF+PX#RUx=54{w8qsaM-Z1PArm3{ zZs|9=$7pl}ac?>3f*wHHo%yO*E+gqxF{Xd~?#$kF5^Pj^2|2Tm%mQ`nR&%Ew?5dPi zb4SgBpJUyaIY;VN8HDv@^71khmQMSVCcFNX!M8q2lTEXUJ>8^uu%aw*D{{zKi$@dj ziuYaf1NRu_*WK@$55{2|X{oVzRJ-0VKTtqIex4`GB+Bou!(rUm zoD;O0Xvb|-tN-%W$j9yr)tux6Xr;IY_V~+WH>I)ipcJEwD$n^M`(tB3P$hOsc?c7@ ze_Xz2p{qZpfKJH%SLAuhGe`Jp@Sv|ffUrzG;?dz-lktjqc*>PXJdGTKS@q z2-u0y=gj4Hv2SHL7tO(w)aISHxhC z*Q>s#A5ohqJL{*TlCbmBigtvY>ip%1Y}$?xl`quhMEAX({CvnqHpVJIo8KXM3>l4} zAneq;snS!w8D|A;?~rK2a0zP~UIm5`-R~E*n&ss)oi&N>Y={1n|1thT>-SHo_)tJ(W#zve3Or&Ph;s9e`4uv{V~ z64@zl-K*}or(W4-s84mz4Jz>?f71=!T8Zo#ouMX_>c~%2<;riynn7ze%5Q!&1{oKL zVUv4Aty{ejEd;@$A+=HVv(<9>RMX}1&A-An#-FGfA)2LE<*k&Hk{{jW-#7t^f3X6z z!%(82VfW>?Uxmp-ZvQ2J!wP_H40Xt^-H0yfuVxL}cWTn0eL?C$Yc$~Av|XwFvWVz6 z*_y+C9|$GzQy*x1BU}9TjjZ^Eu$vMH{1T}q#nYEU^uQhK)!nxq1QNc&msRDoNqVYn z$$ItCjnWs0=+G<+W22behVOybf?i1F*kevRgb<;@@Vy`Vwqn3(2N_u!Ijy#9b{J?0 zHCwkVwplZRKdJVo*k<`v)HXUyMjpEg5Q;_HD({jghRKYh14D2WaBBOEfMsG`*{FZQJM#y=WdYaSf+3;N@z->J>|`?4;y zn5;Xs#)Q_bLXs4Y5JStDyBw>8sB_vkrXMxbP_cZn$;X{2#Wn;ehs#69q3h4L;1ycB&x*`SY?ahlyWk=5cC0CvQ3xfR> zZ&*|!j4QenY4uBMZ^=HComIf=8|I9N*Cup~|TjMJz-%Waeq^00z5k=!3W z<^S*k6mO{jMzBmBFs+vlPom^u;*)aZG2I6JoBWhiCp|GYLB^YtAd8-`^9PXW-m1Et zPR>VIDL19tcFeaAScGg>xRk$-$&Jw^#X z1xlSof6;;c{$40M`Zv8DWFoEFl*+Fkhzv*J9T;G;_%J~oZdu2foo+(%x*O7FY(;1~JGW9OuPHx6nlfzl9%Y-`B|)nPo_aCw)TcL2rwXdFPEG5QC{(yaEO37^?jMXdHK1Of@Sdop z=cL&;4$5Nykd?Sb9#m(Y8rvyRY&8#%vOaQC+UA||LfxYi#>=;v2WThZ5|;w)%LO!F z3|L+PMrqiN>pu4wYNF!(#D!8l_UMZDuv_*g@mww_T}Kw%nE%1jELXw%B}4pZ&3HAS z0BZ{nD6g|Jy^&GQ7R)QRBGq@dW{5wEL^2%vnnlB$qS@yd7Qdth>Zw8Amo+vAS*KQ) zvV!`%T$YBgl;?de%k`9KRrH#=cgyQA;`@_q!Q5UT~JXN@hUKrxSL z>7}W=f-Vw~C@b_mf6u-GPlkx@tI~Qhh?mq7dKTQU5G!*l9wBdR2ng-D0VJ_EdBH5f zAde(5o)8i`3vdsd^h5ZN2Qz*~TSc~*d6=0b6ZR`74#pU+Z@}6q;$CKTiTMHvr6_nl zEACkhMS2C3zV3bd5`UN!k2klWiix$MnAm6`Bi>_SWzpb-sLEgsZ9MTN5cV&6L1jE1 zdM2%d+Ml4L4us`NSoj!Clqv;>TWxEMWs}4008dzOQD+GC$=?Pp25hiqfqjqo+d9~; zWTL%zsLJ4Y`y!$K0#`=4DLChu@=%@3>x?rAb)LA{ISin!>CuG02jAXEthz@M3K(V_ z8i3}|JX>2c8xl>v0B7lkTg4MBOJndkAreCMW(@bqXggFJ1)J~zxUL-#f(6(Im=zW> zYt*+#A@c=99U6wv15%~&4M#XJZF1B42C znzpbN2rO)A3jzMD1Qvba!&lH3Cj!A{n!Ki~pbLb22>W5GLcp3#+*JT9BA}AaNkmD3 zdLfAcR4&Ev-gbnXucgyseMzWUSm5VO1Nbtm6Ch+40TpDKOPLyp znOa(Z&Y-~jQbm;Or(DWT$;1qdiZn7JLY%a-C@Ac(qys_g=h!o1Q=+tChcVANf046@ zfCyaq8wmNCIM`B56|qu+Z|g|nvA`AUqa2Qa<7XC;VIdvH2=jI89^)P84+k=9a=|h3 zZ4t-$0JDt5xr0yAJ3(*p&H3iwndN8!f~BXHb`Xqk*`es1#4_B78N~0%pGHjz%g@7V ze|s}Zqa8ITKx9-A?dcn&dOJ!U2>JPy@5VzdcW9J#Ad(vIaO=fRKy6KmXF~Vd7STveiEU_r zx2rBA&^PFuXrw$V(D&4J9`0z+Mt{8TV-l0*U#j^d%UNZ7^rVavlU9iym&1tEbPrYA zj~n}MuKai=|M(7LRcxb7PWx~6N55iT-&TEBG&#sl6jpgxWJjt;=JMs?qwGXDx;Z_? zY|`@Ktb8ahY_`?QZ5c%ULDjHOVYLo&r3e>#bNj{Mqr#VMbM-`nE;Dip2Clh57=L zJ-}#Cr2X`_&j+z<<(r!?ACrpMU7ysgVpo404NjC7^}$lR^zP<>n7TpovZR6lD?rEW zyl;@AZjiFJvS zto|4%Z+w#%V276sz33a%-aJq<7DwoqZ!3m}%?e=e^3|LRnN@qE&jp7ERs3DPax&+! z$Y>`5iBIgaJHY<3kG$=DX@Ciyk2&QV)ON{7vkXTJ?FQ}Hz*zaVedX#JQEWL?;gYG4 zJJy%WLKw47;N=Fz*VewZ3lQ}1eEkStmab9k8#MAxnEaO5_tY&KiaMRbZ1?+s*MCh> zH|=>3^@-x}y{UC=e@%ggY^pJ9n}UQKPYCq#D>>BLKhmUQDCK4@lA*x<8f(VBRmx-lJbb}&BIYqraqpE(jatgY@4zJWe&x|VR(!r@u`{a^- zC1%1q#-686v6PD}w@Qu>LX*Rz-pzH${}n-GZyGVfES>R;z98TL6nGDBDN2!?#%mL6n!@B+Qm{L z$kQ=M1HUkUGAHqaEc#t+AE47t{36qMkMmH6*GQ^ZIt7o@w~marl)dwP)K1aRa5(L# zJVOc7jnZFHX3Gdbe|6>bz*_HrUGFWNIeE)a%3Xng)aeSB$y?Nqzf6Y`e75g24fTDp zEaL5?&2+WGOC~|nP~=C4WY$#|Z>T>OlF29AwPfHlmN;MWC5jg43Z`=06&TtO4;kqSjt{~W5_ydh z?sZ_a!G`IuU2y-^;a67Tgc;oG(R(|LSrz%bjrAhctNP@AR#!MWMbY2;W&cDUkP3&x zxxAH@MX}CM$^gJPgX~ZM$n^kn?HMXpL4sm~qyt*U-v?{%aqI`^w01lJy+SbhE>=$*h!6yj9I&E4gulDT(FErN&O5yR&IY52zi<*pj^g+FX1<>2NI0N)6ar%K& zo%IXg;{pk4(aSVjcM|{C=QemzZW<_NumC6e$zVw&u8@|}<#kKepJHqY?B6GbvE3D$ zdf>P0ePY0$xJI7;*r9GMFLb2*3#P@~wf?vL%K~~1YL-T}kJGC?(tYxbl__?=i>`1O za!W{kAbkU-i?`t#vD)!bRo!*Zq^*2vR z4shHxIM>t8WSb-dSIC85_3BiWPtZ(jWuvkLLiK->bIKU*DzN}weCQ_a!%5z?Db``~ z=X#Uco#aq?sdvyW>oCpH(iz+a#qbBx+ROLDG@EOto}tP<%=Zl{y&oq3G=Da)^8PMK zt*ymK&78F`DmXM|k#Eok^O5q%Ma)Q8?scxV>!$;<9G`PgfF@g$I;7Nbwj_?Gd|3@z zrHp)H{`c%2-<2Z%R($vU zgMJXW+R}(QAlk5DgE7%%Wo5xzQCgY`-dtJ4Dh)&-mQkd`TVh7W+O&1Jw3dzGiW|~X z;kgh$IP!syB`j1mPE{cSP^u~ez82T3GS(wV4}R-a>2ML@hUhwGLk0?M0 zy1Ond9dUOv;M)=YQD`DqzaFGKoL{U5ahrkfFiWN3$_3xB>fw#-n8}Ca655xL5_l}? zVHCg`SQ9~J#%)y95+<>PnoSti33G3cr-cxHx-sJr)+#NPqM_6XguNnDXrOAMq9|i# z#v(mrJm_v#7(rlpJWl&l)M3gMOt=x48Zc(OP{u6=Z3JQ(BsuyZ7&a_L5fJm}jEu~+ z>odUJ*wWN>V!aML3|N2)3d{(xp@68`$bY!Xbi)mUmCx?X+H{n7mx(xab z8rh!3Xr~HUsJRl|QFV<7(LbJ1{Pd+nkWLPdSvPKE~E*0UTj?y{#m;Wq)1}xz<~o>tp}Q8#0?y%cPeozX(dtm)`2hy zO_uPJOIlizv1olLKUq=|4b&E`BD!XQN}w8IcktDs_eP#`EsU<0>vrnQbwp)i(j*)x z*}Y)z5#`#GBd)AHDO=_-^uS1+V4y_E9_%U@{?%3Rap<628c!DTJ?*3>;`u z{`~Ugx22b_?D>fO)0N9tL?J){bXa+-%UhSQ@{q9B*0A#OuvVHxFKI0=FK@LbdY7=Y zzBY4)@T$j*sm`{oZ>n#y-Li*$H~((_9(Mhf`Ykp#w{9H{EiDZ#4Gl#nhmk1GLzR{c z>nX+=SlZH17tVhdkYGr`lt~HuS}Y*>EcToI1b?&rmOb&j<#}t_lP7*p{GzehHf5{T zP1&|;b#}I`ZBtWzKAXL#=-xd$bJVg#S)6(tq9C9+(ZUhm;ibmdAB zVkoO^)#bLW<*j|NwO}lNbe`C8dB>J5TU1L{EMK9@NJ+`aNU^iBvNEH&9FD1liHU`| ziM=(_6o*fCS(xn1-jc0ayj)01kZWxQ*HK(EA(7xh6tPal_*D{Du7Ggcdp~F%W@xtE zC~Fc5Nc1>;cwU<`BESxE@phgfn<6vo=rBu8&d+adR;z`&cQn8GXG##-3JhvO1kEn! zgsrWu&n-xNXlUq9KRG$E$$TbIOS4e%^T!EFadXpz34MA`bm(JgZf@Jhk;k(zw|x5s zn-M~(sIOc;bNS4h%e=!CZ%&`NQh2!j@|yyqH}fI~g3phGk;frre*S?2N`(=tq@+Zp zii_KrJY$9)=OyT+EqbNE(hS~7alSFWXfn$nM-ZEtvfT|kwrHz2ZasahdLzQ=9$8mjqsp$Y%GjA* zKV`~{8B-=s`Eeo+ZEdZsFWLuG2SegJ$ElST%$*)OORj63RAgWLy zk)QuCB|m;lzbQ2fQqIIZ91|^xiR-$)>Suq+2{c)kfxP>x+wc1qCsyqzV*_Q+Oe7y@%JBX*Y!}A9 zdTQ|eWHI2CGvZ;x`<21w+RmLm_r zBi+rS5f|$_Mi7Kj?0>t;^EZXClpzoJu-5r#PQq5VwAi$i<9|yzUaQ&Q>iX7o0{**B z7)m&?6e6qw7>?saB2l9sVa+xWL+m=|9+!WZ?ODhF<6O*y8bB=E2|w0`2(w5Qj|s1h zuKF*glj^NZjJZYzODn<{3>pjAeO%a%eVh#Du59?I=XAN=31J&t;3me{w2LwrcmM7T z@{`=`ri_e?vv+J0`!(bUTzijo-7t>kvS}8FjeaVC+Rs#PsZx>H#zw?UZ^ZnKKZ?46 zKkEIPH!nZGUsyuhP@lNgOp^fnn-IN#vM_u5T)(Y&d{A(;RY&jTnM18Ueg6EZy`8#p z<@48%@85s?__^it$Io9|+$qYE0*c%)oDN}T4)g=KQ3E^yY8FVj)eKmyKs1plgaTg; z&o-br>E8+ro}UT>bq=u&9sBshydRxa7WkKD4y z=YHddPDu_P)obeC##?sT3|+Ws>88cs4sO#}jhjPJfA#hsdzbJaZ?|M(n~<{%VP?V` z%zTx69Fo-a?dfNVvidf_&DeaLF~|5xv$XE=w0^m7)~%V4mw5s;lX<|I&d{ukXo3&@Jow<&|w(*ZcUx)QlQ zTLol%Cn0Cd85Oh@A#ISS!_OB*?W3q|c0FC|A}o;r|F>L*cxMe@wPU&=tZp{db$s7< z%IJ#hQNGc={EfCHDRCuDQPEM#h??F89zTG?~~D-n~dU6b|Vq zzA4a3|8Uk%lzIya-d*{!>qu-fWYQ=fd#Q(&e9eTw8BzqDYyiCVuVnn znQ(b9nfU}WP7O+>j6{vA9BZ)r&1&}0ZEF)cnuPk62FDghtEM>ux3&hicB@Bfw<%s! zuvNQ}zCjh&pnn@2Z{-;GH0`$AoTpUUZU22&=R8d)su+^Z9#VmEO05A}B3tL*y8i2p zf*aHy&QTjSfYIxjC0H*V+%q!r9pO3(K6N?yF64p1Eyc-IAuqO0fro$Nf zFpjDySHcrBo!gGW5;)w!bt1+K7zWQQfbg7|8`(hds~PuElp~XmX!RDb&YM9IM~3yH zz!_dt-U?XD`1U}47SR0E5o&u{qRLF80L6jo)Fz`lH9P=_`M~3UdmneAMN+afF zGz+1#QC0S6=51^@#_z5PFx^kY+`6Ynjb!d-+Y=K%CLgSh5lIvfdp0M}-C+VIlm4pg z)GeD;8(tnc(wmikP+Rr!j~9*OrJ0NG7B5~bm9mP9S<9C%Pr8wml(ZcCjiloT%F2$x zwQP;C%>#@TuT{%etvaAR@Y}=8uUU&9F8-V~cAQx3ptZ~T`t|g5ZmiF|4Ox(+}sRovYYc3|NrLekM3+aQ_oGj*PtE;OQ;F1Rk##s`)@0uPzUby}E z@y+|w)7Ndso|uRWHoWR;o(=lZP`t?=TCQp>Frc3e4@xqU%8Z&4ZIV1`&;Y9>xz*1^ zAeVE=#H6IJNpe$SwTdFjZ`f|Yhb*yK22atJ6lvOe=+JKbcJBr~9hyhwuE4exKF8QE ze$e|MJdOmR2q$i3=*F!Kop%J=CTvU$&#Tx5U^B+Hb?ZWGqp;n@wgcNwJk2I0p-K)`)i^2xx@ra8-w z-AY=Pnw67RTz0Zvd->LbC$~I3F*jKC$Tr$BG0Np@jvagWFze;Z_wT=Qh~D$7!N5v= z|MmULmtPHE4J?Dhmc4wLx2O8!$Lc+%Wh?Y^ zxO~$iS7G*imHTSprcp;marv7Ty1wEMU=J|m8uML^`KJ84clkSZ%sYGToVWKpZ|^)q zjF*>C_~6#E>dW=obLW_ZPUqnT&pUgo z=!7==Aw^1FzAP>-cJ=dfEv87kD^8YWEoeH{KJ8ZBJR=p31VkO7o$;eawg2_x9m(9f(^bx*o`b61T`m`#oiqm1S;_ zJd7vGsZ$dYSY&r(Xk=mGn&)etr!bv^%3ucn6P^R@%yOWC-lxZJ&DomMr%xoVu}FKr z997QNt($UGrdz5{wQ19q>guYT>P^*IC#pA@vZ`{ns&epXj%q6m z3V?;i_BcS*(=G9W?8c0ZjV%kZ=5I)kOIh&P5(q*AF5Qs&qR~)L(1`9c(^*e3PPxVS ziG2$E#S(*$ISDT47K;(IyFkRC_XOM!D~^o?c?|r6B?%#fHf3-lL)M}b!-;GRfj9@a z-l~At)AfJ;58^ldKxb`8O3unkUb1@m@)hfruUNS^B5G(r+)0gxR^)Sdr2=*BC*5%$+#fDupoc;?p;D} zp}(6@8tCgQ7W?}84x9vO8#B28)dFJwo?P@c;&*Sw3kVA?*6boZxZ9xq|3Kd63p-2W1hHGCt`nTR@0%lwWvClJe5xLG3g);IW)*{RX(GA^FaY0&PD z(ajz(V1~ah@uClq*jTZ+3$OljH4((dqG2HIL^qD*GL2!=)eP3Ji?(1}(}>080$HTM z(F+5JQ-r1547sNIgPe%mB#t#eo{I|b8wU{Hf5%QqqgdRy{@E-10(+Wv6NN6p%yuCx z7cs2Zds;+^c4VRh0@jUK3k;WyM+xATt{R+tWpP;>q|%@{W2MlR*o6dRueh8a%|+7(QP%AV?pq+ zmT*XaHg%rni_MtgXey?y`sJ61Lst$L-b5I;LW+FgN+gAt1?F!56li7^^5>G03wK() z7daEVLJ=dfLLDc>N#f#mW1&{z?!tVD9kD9x84-GRexamrcRunYyYYtn{N4Gx|2s1N zLlOPYz-YN?of|YH{K}9Ywr~EjKd?d{LE1Tz!opKWzx-@#FWD~&Tes+KzU}s=7%(XJ zXN)S%$iVrVO>Asz zTwGlDl4uXfD*KdavS{|>N6EJLo4Dn&8po8Vb%BrnKLh2HTjDJH^0|_tsApGd9QBPK zN@cD5#PFRFf4zTD}KjpSd-z7%_3k|Jq~jh$GycR%SxwVSa)aC=~8m&Fg;dq);3Yi{1V_uSsS zdkc$71%zZlbV1w;i-d#=@24dK;=C8fLomIGB8dp=E>lWG*TCgPN+gj%O2B_-VSY(r zAw+`=6!`i3=yq#~Brs4SVkR8XKYZJPIOa=aGFgyJ7VaKah_lo5`MrgOMfk&iiD)Wu zlSoX7-aY!lTgg#n$lMpvV@glx%S|314OG`%h+q%X73nvGMeXLcRTbVm+q@#aXkyCS zlyi|CuXuXyym@5aJc&~WAy@iH*pgQCiX}_TiQAPvQ<-@?7-_Gbp}_w%J=Va+=f7A? zaf-L-9}!Vbr&wIs*@1ByIz%>P2%9Jqmn=zyE91EMctirBh)PX+$5%;WJ9RyyHvFbU zG6cdO`0_5n>CKGR*ZB2}S2Y{B9ybD`A2cT&?+K@;++c^MgL&}@w$N@zyXxkCl%>7}TFvX@)> z`c}*^6g{4hd;y7Yp}ei`W)^HVWv(ZY=N>l}y@ ziotaQh+9U+Z^{Wt>FZamyav@!(yx%oBqgUOr>7^cTE7O*t%8AD6*6$KeC|oI>sUUxlvG`W~5;r&SsJOY-&4~9!%&V z=BjDa7TJw$<9_;ddj09R2M^ZAE$=8UDPG=D^0j1n$@1djuY&AZ0+_IKOS#^qrQY7T z++1wl++1#{H@CSNpi1jAXCmfq$Hqawv=4yWV+#vmQ+Qjxj0mEA?Op8kQMS#pz>Q&H zVUdwa5Y>UhaEdMp63k^rdKcKopY@W3yX^jOHLl*Ra5Q!Tq1G#{_xR9NlSQSm~U8M zSeS)HxGXtouxCvTE{c0Dil0QHG))`h^!ef8Z7##c%o_vdP=7@q4J97Q6%v7fM3e0B zQjex4p)6a5<%DY0&e^m1d`HLT=37kyL3DI(?$-{9E6A2PWPCD zlM_@q_k7KnF$vXkbUBj+l^4W3G;mB`LSTN&CxY@O(ADmYg!_}^aM|6v{re3bJZhAW z&xP|_w)7u-uk7&PyZsK|JAAia{~<%}_A47)Hn`ut3qIKq*`qG_C|g>TP*$|utGQ4! zq=ny7Glb7*zAkinceY(<^X_v&k}v6VA>W96IMhF+CM2bQN{ukU#H(V8utY%ObQ2Br z*Prh&JkgqeM;Pbc14?E~?AqF9#Ee-Mnh~>XbZF@E>xTGXUM=vj#Ea!bRkDnX;p2v%dS{9$1OSHsQM+{n5*VI(Vzeur;D5HuE zI;GOm^2w8uVlTb2Db7=&Z)zGjQY!WG%8RR*(wuiPZpxJU`m(b8yy*Orc`SxGXR%2t zi_Mx0H}Vt~A`ZlBq6tw&P4xC=vz1St5zCoJ2&^3n75_JN{<~2fm+VZ?N|sfQ2XrU@Nmamz1}NY zsU)eXmoFFRv z3oPN%o>VG@xjQ$e2m}K39Dx%0FO^EAQwag!;mP;PjVg@dY@0XAf|A?J!TA&3E1nlpdfQ47C$Q5diY-hZB$Vr#Lp;b zgb6q7!Gq-FO!5_2ZIwZ}FLC*S{QTS~{7uQ9G9_x#gh@*$UplaMaoD&aiI;wwEtkuM z`Y`XP2+gIi#i46{8m@V-Sh`r_z1Y_~Jba#a_`FNq-OkS4m*(!+F+675T!vbx<6$zi z8bgr@u`r(|qZQkxlbh86%Gc?Gz=nZ5P%R;(fW#IQ#M>$j1>o*jRtEJDJk-|!WH=jr zbV=ZF!osbizEEQ>`1~?$w2w;Z7vAgFm_J{g3;aOOsXVFqab3>);XAVC=8+vQk7ki) zm>SH#8NO3&p5ZU+Z?+6&WFYKr1DLYTug0I)oiFGwV|rwomR8+9k|-9{$u+$qCdcH( z?C-{%bhioHWEg_}(WHO0p&Lq^?u``LOX+bI8a(&(0+0ohgp|cZa4JZX|L-WaI;29c5G6IT{ z(?W2#`_a%$+;+x}1_Dn^rO?V_HicH-sf+F+bZ1xR_wWC7e}?Ld2SUWq%`>y?#)jGf zl;{QUDc+9d$g~RLP$!N#ImbKmfP;hJL*79UqqsPV9Nz15~7w6iVPuPDSG)%D4?MZa!55iC^P!>3T$)v;H zJ~HO^G$g`+8OY0*PEOBVUOhE;adi6h>Ae{Sl~D;Ho0yTy!80DO88>+#udWyc~Y)2k7)jFvE;5XP8|uGUx_Tu?1kh9GPl!sf7x> z2qbe0nf9L&GHk9v`SWlqYZGHLQ!^8Da})g6+q`c-v)E4mI@UmxbEg(UoIu;e!cb_} z0^}4-G3+&bFEA9cUX#?HSFc{Xc1_!#50@@`_H2xxPal^J;~2sIT!t920%_6Coljn% zE>4Uz9%n;l9lg2JfW8ak8|acKbR_^^*|urPwD!9DB3j62>nM`O?APL7TUhwK!R zz;Dpne&c=XV)44D@6`8i-@1s4Wq1$-2lNC+d_V>g>SqQjj0~s;JpU$q@t*?ij9CwN zLOI7}bZYZ{irb$1ODI=zzvWI-+`G1tOFaY#{cS7jRf5~hgYz?`y$y3>76eZsdKR%r z&YfH0+Z5(8Z|}8ecE|SpFBzDApf~RfgEC@;{@NGe60=`2Tm(&o+Q+C7*9@Y0|J6wUtLc6m*Q!^0ZhXv^ltKga^uv1U559s zZvEx+>b7Q2L*6FK-}1EPp1qIH9F;Jr-g)>9-kjf8ek-7;ez)zu-6!N6p{kjuo%IEz zeG_%KRbBPA#QoC7sgFZW^-0^ey2a)G#I@aTscpoCqM|#UuJtFKxzB>8y?bZYK{^|Y zy!H->3hXF3_kx|hLh13%(7T$V2LGS#-a9_3YU>|f`;_UEGcCPLNh2gM2?-EtCV@ag z??{sbNC?tGlV*|$MG!$jL;+DF_Fk?c79`k}Vnsz%g5XuW7VLmX-tRgIDC+av`?=5i z*KhccIdjfFyR5zT>T7S~(!t%j6?7BgyPNHsgvfmG+SCOLPV|Crt+09wREokwuVq(P zH@;ARPxwW!?Xr{M>hYI+w1}D%M}mp=<;OT4&&qo4dTip+RzxA%D$#Xdy5zQI6$F!J&u-X0`k|$zLms%k zVfXG^`?0XT0ozyrQ^|b|P}=mIYD9b4lTzqNJJ+3f7svu`+yQa6kuoDq22ZMRLx?$ z9U7-j#djyOyZW0`co$T_1xmS{sBy5D)zAZuC&q!GYXy`D1n-CN1lV?YrAP4vbUKU)7kDPYDBE%c=?{SDXTiO#44+d87T02f2BhTO73G9zl)T&|6V zWu?A#)nvj8jG`CcLpgv*TuK(*1QU(gAt$s$Wqba3uARO%iZOG~ou5k^&m}nU-yb7> zeg^-C@B4mVaD7n4Ul$x7!u@~2${lDDWL-=xvL?Z;5D%Wm2BBE6Lm;~y@fvt{CI>WV zb4gW}kkv;rtUmbthTz3vphfJ9x+YUqZzt^Ti0ck&CHZB!OiYmx4j{=8!YV}wSd6Su z0W+YFjBx14*tQ3#jWxv9z-&e#oO*@VRq6=pg?IRn$MI<2yiU?AN;{__^JAMjOBSoa zYyMhi)NcZ9N#?F)w0gt&weyd3o3;6#&9gRo05Pnq;Jm;{_-@^8|*8Vnko3b?jt zo$&pq>pW0+n4^I+`saT>YxEBjbKzL;{{b1#-~Izq22lH{^K1*c1&0;<@sRh{SN^~^ z4&nJ-T=BLgWHQ81?)B+^q;o(n47V`B5?ae4vKfdc90~nWvQsfD>>9 z`4pvsv^q>UW*o=AYAMn(JU$@JM3x`Lh^M1nAy7(vL33+&o_`%viqml&LlVh71n3N* z0APldRtu2ug+fsmRoctYJcU+B%+W(FADsx?jDa@tqQ$4#&Y)57Uq4`;c~H^p`QWyr zE2d0^baY)Is33w^G&6YEj)xhB!{?Vzn>)`!%`a+qE4Zn>BDDhKPhY)hLDFE50BkGV z`ed8-UE-e#wf^j_6-NF3q-2QRJmUtO>lYU7FBkaapU$#(UGe)QbavE~N;x%D15ytI zFU)4pQo*qxfHCjB=)zbu&Otblva(vn!_t3zf~hZ7%53NP(%TWkc7(gYyhJdYtV>d z!!IZWuUt?HoCu0cl>e+2Xrr-wu=2FQ!eCp%3Pk~yXMfRK(w?ByfJ6iMo{9}&^8D!PvFo|NnIwi1Irj`AR1G?NUrMKEE3&{zO&RFItR$ixw?j41Nf> zI%xdGG`3m1eUZC;GhW?)7xsHpt-_uu(w&x&JZ-{Il0?@msb zkWCfG%JFNmgQ8YAXyT>bq$5WzqMFTfB8P8!>a)oDy_-tQ%Oj6Yt4TjvcdvQxs+(i? zj@-Lt;nH8fyXvziKa=Hk3yU{yJX|T#~-g8T5)3dg#HJocj@2v#Alx!ymQQ$G4<0j4<7pU ziOCOtHlf#@W8S)m-!zK_ixw_gbooO3S-5E7Mj^z{lJ5DL(9* zmiBVi`f%^1f#CbugC<9GUDf|k;m+{HrT%REuCR5-@8V~|6Kj0A?`4-xF?YSP-v_;) zUUq3+e3$*%{mPp2>Utk6d}77KCGi~(WS5RR*D;LWk1sD<5#MotcCS&QV{Pwu3m#uS z>Y_n3&v~iK$(+?wR%EPPev9kf9f7r1ZOXs)`dOyL8zXz~JXvz-*w|Y?7UhShF`mSq zZk=^*-(7+AqxWupW#`Fl(|-9b@0*{e1RipJn>~Ez`cpIC`8sdg<|%=ci@@$)TvPzk z4Vg;}E`W&zhLiypL%mt#BqdE)bKe_pq!#we&+pd{`5=G7+aKeKjvh^D`)qB^nX8`} zJNB7p#ugnp64P#Xc=4%KyC#f(_L*@-N1Ni?K3h|B+DF+(n-VZh*-V3Db~&i>2%gkl z;Ug>d-D(;_DYZ*6pBKUGWa@}ZOjT<}^!q4O{oKih=XQM2J#GG_bGsk-e&?x}qKE<4 zzde4@(GKrd#1tRAlqzS>o!O^+^8DFzhm|k< z-)wYV`9QR>A6OTxb6OUu%%02b>quQmS{$rru*ZRpYl$G2NV6Eorma$@>{{=ZoIJUl zNpqBO5@~rzA%JTPa_VP%&!~CHhVQ}3ef)E@=qn`n)pX+164jXv^B`1A1H@{uz$=lc z#e~VK>2_nZ2y-}Q9lME5XA2-6wY&!A+Zz=&H(#q=rVPf_BGWqgcVc+bO?0}I7=F(1 zU=4TPv?Uc0%LGN%W3Nsd8NK9O7Dc@fXH|#CSfz-NcP|Gh`;*A!?#B4SVeEBU4;dvK zHtHAPM=-ENpvn~T)UP6xC`OtO!kq?@BRmM3inFrdSQd%W7DAq@Z&?_bb~$8%<(nTs zB)EnTlkwGuo00gAZ4glViaH|=!*yL9Eagji547BHIP4Pf%iD^`x;(ZP**`LCxP+p@qnPlF@vT^)uno#l_Z2HU;&YLQ zSSlY!E=yh6;|BG^)P-ZhaFJbCx1uLvBhe+~?PLE2M9oGiw1kQU^tXl(6)VMuTpV$91P z2K=xkL_M}R)1!zZ>)VjJOm@_NCa2WbFA@G_%l1mZOi#T=t%lW=^d;S|J61b$*wm=( z`nvj!91i8EdzG_s&=KB#0qP*;bSpu*!UQ<#z7-sxmc}kp=Q2#HPY*LMW$eToJn&?e zSEhJY!2t1)p)UYeCMfr=F?U@ll0zXgWrRb5MgkwHL7`AX116e*pxbjiyoLFOPy=q` zPgw~$%An#Q#;q(AYH*RW0qZ0b0d%Cxxk32vfdfFuZsBkf5ErkvL$VtUBSdC2DiEz3 zZ_@LsKs4gWV9h3FDnw72tZ+D&a>v(~QJK%@3!U`s#z?RXt3#ns86gmi{AHmHJS5pA zoI`XI;xHhc9kkbIe3CJ3hw)bSnra_m0r&~;giasD3_>WZKpD@58HR*;xcq~D|+>gesjyda$W@;F57(B z!D!q;eO2jOw=R)e?8bknPWp(dH*ba;mNwfdezP9*Z-zrgH-|@RCyX<^`dttz8aMeYFk~P$aCqWuU%*i#Af= zb;RmS*R4uQA4$~c9QFW}T>*%Pmwil*T9w%u3RzlLjw02-T zEJGGUcnO0=G)NuL?gVxldth>Pgpo}0bh5Z78ITIq*4NjZRI+Pp>)C_G-4f*_`VxET z@DmYewx+uy9J47i992PLZcdNj{26R)BH&0jXG`my>yEW5J~omI+9-$;^u% zOJfODrHI@VN8No!dYw%7QyDTv_JwnAi4j{l%$r__1F>^MX>{V~Kh)v~JsVf(3;7zo z2|V|(d(VxZvjw3&4NYYuy}6;L1{Cv9QA1Nxna;n;8k$0Qnt&+1P$bxQioBGT!NOH6V45TV1{iro^@Lv(P7`dM&0K# zwJ!ogvl2PTIXbII0;!=yo+25i5y)|ry*{*FrJe3@sRiVZPd>TRA;vJQr z#-~taOhSMvKZuvd05>Z^j6LLTI4B|boUlBvV{?ul8BmPpu7*7lYL5_z0$)m#xw)?q z=bDIUYg!CCp{%D+WiEwtX`exKsSJhA=NdVEBfRJ%t>B(22=ve)#Qew4q#bpdm>YVj zBZR5-l60?}gUBcdhKm&k#VKgok^4#v0;sWETaXhh(HRDIw&nP8R4VJcV_0Cr0c8e) zeu@}6P_ro=280KUXOVaafH+{lHBvd{VjekMAH)bmq)9k)fu>8n>j&i4g$IPgxdR|R z)|tsSAdG7J@wkDtOUr1;`jDyY=|CZ;)SdESA`2OD4|DHT;glU){vm_z0AaPZWY&;a zjR$XIVkHprZ)tC2H9}UfUg1~D#)}0W(K|9_-#!y>7*MH&#YB0QkrrPhIcHZ=C2UW+ zyodRKfX(JM$WWL7sraIztwJ{T>{4Kc}LG1(Js+Ndq1rtWxYgqBbJY; zf@KgHP8cu1RL&slhepWrXu<**{s;h$lCM*+9G$sC{0KZRM0j8`$SsJ&t2~MDkv7o2 z+-8nK%H0RJH3Oos{k_btF<$G&8wtFIDi0jUJ3x6UydvDNtT^-Zm2FSfi96CCtlZ`? zQ1roDk&yC__-g#@S9A|{-QftoJm5$+9XNmuz3732lmiEJI#j7OQ$LiGv{}X~7BO&b zdt~e84j@96c|>^~Rrv%`UC9*Bduve^x6wTp}i#Opaw5aU9F~_0iO5K5wbLzr%kfOtvB~Z^;#^4FDxSIn``c@33#M4cQVpu*c zNT5s>A?S1*%#9d;Ltd#f!pUUnpeJcM$+iWlf0PZTvNDEN#n7Iv5Tod^cxU*Fe3o9@ zx$Q8gP9__I(hqlsxP#VMs*GiJLmMGfaZm(O5g?A@5oWWtPE#)O=cj|O3 znH;!hrMtMGGkmrOcqu{rQ}j#_oW8S6>nU(%)^}b`x9y5e%Ql4IOQBRL8+r*=$BoQ= zpyN!SPr75NpaV*b7o1r>PDVXsPZHj4^e#j#qRW_M8D{pN=M%LIZ=~~zLU2I9toDlI ziFAioK!>zbWbGwA>HZ{EJJA&iAlL+bVswyua9h?(5E2H4N4}b6Qxy7&7bsoVQ-E-t z#|*8p6v}GW~M-s7;J_hR($TUGoKp#jIBMrk*fHYI5W)9eZ3;p5RQ-~x; zbJVZ$GF?idq2bzaeH|3Zwmc64IjexV@Il$azG*Oy4~B$LoIPJ)52jt*$p=mWm?}VaHZHZSEQuT;1I{pvk2sHF z^rn|EGfxQ|J%M*<3Pzgkf zXOBMBrL{@C{Q(NKa71L2xd?b%6tgbyXLid_LcY zKKjA0jn-nN-#R$9tkqCf=`0)ss;rw>%s0XlD78dEfk0Dav;tH^_jE;Cc_tc2*&WS9 ztW5-`%h?jz@*bRgU}XD3V3c69@N|Gq<@&L*R$axf`W%K)vRD9(}@e-9^*ZC>&dI5EMmQr}6-r-w+l>y3{D?kZG|G ziKz-GIJ0)l2aPmf1%pj!<0S*2`1iIXN1HA5ypa-%ji-z))Eyj-DU;i9E%qPu)1^Gi zhVJ@48o;M6Fz8=^3M7$rW-K63Tks|)@^>lSAO`VNDahi1)PX1(JX=XG0eu0b;V5Q^ zgg(Y%3&{WLMmlZ;j^Z{0Vy<$jz@?aSAp5|XeP;vuYSk8dqv^IJtw;|mc#k0Srg;vi) zg04dV3-vC;);9nKL^+Al%gQtl$d#iC;EyI(nZB<<4waQb?Sdkt!=$LJs_fi193RA3 z@=GfSqVuki#Z7Xk3icHRMhikJ^~VOfmc3yPI+O&12de!NT0o@{q4AWLS2aYY=e>X> z=!vfqhB_=t9a@`_^LazwsSao0AcR*Hs}IDk<#SSFV+%+P70#G3d*O(xX>+G=RLbJv zZV4rn3unKom7 z#oTGLrnWZL(!^hf1Iq{voIRytM(L~}bEnNLpS#$BHT3)E?*Yb*>oG)F%QSlS-0AQP zPOjjxkQ>O~`ua&14+3sn8q#-oOGNLyiy+X_DIPPw#-EcOeg!r-`fCI*cN17hg4brTh}Vxk6jYQK=pn4y`>?~sZn_UwGrdxQXwJgbDBC?EXfiFOQTWk3RZB8%C=jyh zgSBU=*noSo{b?5Q`02IUJEr%wZBlash+vx4s>iJ{@IDBd%_o%RJGClPGgrSLXf&>& z1^iC)!JxtLh15LAHiFqpbF)!vBQ-m;SX=Ym_}xv*kk@N-{PV0=lJ+lS^ANqvF6}p8 z^V|9*S6>r!IMy1PP1^Sn>sxQm3EFJS5VzL6Mtj%aY|##zxgdYawT5;-X(mypeVEex zQ)}@DgLeCKT)g=~zVn0jf`Naud}J*prVh6!>u+UYJ2ZT**B&3i-^cM_o3>pKS83i9 z+<$0th%-z=AfgBj9SV`r?l2NWkq+2PERtLX1SP=| z8J(c-F%^!ElR9@tOi>#;st9M40ohm*#Nu7ghp5OTX`T$`bLqi6Hw{7MvPmX`hYF(; zgsF(=X2RAp=)=S5TW)!g%mW2Cml)7%mhTjh46aR1liFpY{xYG2659&HQ=&|g?J)fe zWfuv^E)9qJY4}Qj20m=U87i_t5gFOh6z8A1`6S{|WrOKgaZ)ooU>i1CP`^PKgla)S z=F+n4K#w8#fsK^M`|y+pZ55Nnq8mtb!~TtwtU!V9h4K-IVO=gQGCPwbDY?z#Y$bRZ z=c3`ulwI(G0rWxPY69*kJ*vZ^1(9h4{-zCui8u~wGp>>3jax=7A11A6{Kvb&#kGkD z#|BIb`{?;wCM`hG0lRA;b5HF7(OWZ!D2;bD`TI)1Lo?>g*T^UNn^~C8%vio!W5t}> z_9$A-!il7v6P%tGp{>!=^c=zEt5bDZ!W^tyfg@e;tSsnFSwLlmb*$E=rQ=*xXe`;q zuSIn>NuQnPKTtrGS4+)^=cGcHbnhcb121ExpL-4QM;XRfU6uK| z&YnYRx8xm|XtH=~X%4IBIL1LEr>cdz7+)cEN&|JTfR1e!U8QaQK z&pa9x`Xb}n$jWfmeqh`N7P7dsmWCrp?;lU=(u_1;&?wk&tkF_WGTh1DG3y?79AIZX z*jZTh@CLdIYA1|v$W`=AbS~^8(+XS|XAgroL?PmB-5N6na zP&d&n&$yFe^4T4zjKl73-n2~sz#?+z$!MFwGZJYiCMw3dkEfOwkEvN!}>sxZ>P3?SAwVNxgVqq0IV z_7kdZ=Ql~4$S_T@yez~X)??BVeLG3R#&l>gH9jee1U9?>O1CM+qgB?M&BZozA=@QT z6>nMrbCiV~5lN)%MSpo=snY}~y}F$DByrj5xZd>mBvgv7Y$rokHV(D___%JJoPxX@ zc`01zLLhr!zY4Pg`f8T3iJgR<_=k{jJzr%6_q^DXjOuqhT>Dy2r1zG18@h&G=5*3S z$x<@1RHcKWx%Nt!5PwGYwee2zn9JCX1U8+Lgvck`Vv4wff;D;-OM_KJuZK^$*>}A}8tem_T zd8Ygs?Tt+9eHraP71%9Q`_dvuW_HF#v?xPTo&@K())6ECUMilTocwO&woa0O2h7Gg zW!}864W*47ugg#ag9ksHM0Tyw$^2%i7;XsR)Go|ZKq$x9*QdA@lONxRUB*0+a=8;f zMyG!J;|wz1u1Z!)?bw~g;Yh3q5F7JPvKd|gn7}AKRyo6SVFo>vsEzl85@R06m*#A0 zEu&pY9?{8!!F7zExJ>U*gn#5%_*>%*8V1SjY5`gE6_#8rAx2qB&h7L$f+bYjJmikx zXbN(8d-tV|+B$%>ccLnGo21im%2H-6X8JY~lZYG&O`8<$kO%Pm8o;U@%6)Ol)xz`v z6CKG{*k=l}bt{&NL&K>hj^1?wY}cx;C7L2BZy0=<=UT6nm==&zWh41`1lnfMu@1u8 zkG!#$sS-|M5XsDwP3Z+iP+8$DHYMR_Y-YK=$%ko?ZWeXs2*@$xCVfj0OeFilps%-@ z3Oh=_bNWzO=))&Ac&I7eIDp=b@LJw;cS5PL!H!*LLoR!g+c2wb(*kzKZYS0SeUl&+ zX~4t8F$WyYRvC>m7KBzvLY@Kw zVbc`N0GQH?5;b%{J1%*W&M04W!;XyFSp2~XQ+38+l#{V`1z2IS=CY93)E=G4O3!jJ zmD0L{TeXYOXcLmLNxqr~YP7DFu+KGX@QU>+<}?XfPv9sBBd(u;nH@`Bdk-{wX}Ase z21Mo4(l|*u=CQPk#IFkJdhUcbH5w}xc4g%hN$&z# z^C7nnUI2Y}TIHI26pBbBM_RPLbg_v28+LRh`6r#+ysIT=wx8ZbJg-Uj+Xg5iF~v#i z(;#u#@ZSXSLE*Q|Rv&7CN`sk533jkBVA4HuY*)Zt?ww{aFy6{k(@R=fh}DMNWRN`c z#`ng%TMKavK+qk7(B)vSv9~zbL8Dogk@8FiuGE|^BJ?C2(b%w+9Em4V#a#k zck`*HQ%T}!j*N06H`Zxdn`l|U1~HM!^Pu`VckL<}UU5z|2(kOscDjpby%>`MQey~p zLA>!1c?lbijjDFErPtAL0y3BHgC z;K0QJu4a<7z+mXig04HF8wV4Y0wJgnr78#_F35~%K{5f2^kLvflG2$)ZKj4T*%?^SLW`7nt!mfN zSQP1Qf0pQbl8d=}k_!19jp)uTNzEiokfJ>vRMmXuc^BXZ002Dd3lfr`)F20hMS$h& zd;hk;%<#Y;0G1|DUd3kN0H>Rbz;KvcbJ1wSbeco_|eusE{72 zXZj;W0tQC(b5?e&NWz>VCm=1e+yvd&BW95}(@h1LjvY-m&J@Ek{V%-^uhnoWlvH;D z;1Yi)ccz)ij(+j~=%0nr;^D)|oUsWFKb6Tt%l7_{r3?8Lih(+XKx12rZ#z$4Kv?l9 z6yYE<&N-5mj*N7i9vv?sd=HsP_Wq2WQSv-$qpBS!PSqWi$COiycj{mPglcg>Ut+kM zmj+PWfSu)Z5{E9}0_B{B_IwpXR$#G+bW2P5ZKG)7FH5ZQB!3I#bqPq1tNDiR;@?!I z?GPUOWZ^V*;}_awAGe8ktyPksQj5co z%C8p%4aU(_gsTMXtJ7aVae2iMYl6oK*=E=fMhB50Xfne)i*@BS2Phkb(}HG8H?l)` z21UdDSc{!3dKRt}v{>P^gdpd&1}JAV1Uq}I9yPT}nad>GNC8F#TxseK{e~H?*y~K# z-VOKM2*A;&b(;zD7RHKuHm%6y*7mC!s58{TNbNaL2tcc)5_1|u+^Ah?mJRR3g?UxJJ zLGA2?>&#$s<`PQB8{NbTnT|==^Os7k@H>Fsv$lsMUiR;{Bc%%ybW0@3*O(xRAvOeC z5P)|ivV~=h%o5kzr+tzH{VmA3-pD_KNl%+0tDLOIq0InWhR&2#2vCHx6wa7Z6lIOc zt^CY_j~Ut+tEKR`pf0fQdt@LUFp3kiC2*`3Ez7M;mz}C!Bib}wBU|^H5Q%0MU`jBg z=-5bZb&%{dV2eS$S&RlY7EBcI8_10dobv$b1-;MA%+U?AQ{~Ih2vIr~0IlE6?Xk*e75ZtrI^w3V?|nQ?ZOF?Y%xGJP5kz6uE$U=m}2;4+q*SS160@n)sP z#Ygx-V@ejYJPrUTL>jE3?6*nj*#A2eM9Cfzh zy~X~9%2VHqY?t$ey@~&7pQubzX)2e(2q7@A3L`eMB4$>eGA!q)7%fOktm-f;Kq&#JEo1;Qgwdfj z)0;+m$A~lqlr#HUBSB+gjDxv#NwS*6abvKsUqBajX3(oV#da+Mt80R-1p_SFw?3Ek zD}K<*I@<>Ojm4>pAw{ zB)8|=CQ~o6;_6bH1`HBaT!vw`(x%E&Xt0WHHkM~cI}JLC@W{{FAY^A63{J*gZM#io znr67f1Hh5I)T3;*;RFpC&|BfrwGh^D9t?JD8nX{Ie4D^o25xbZo3h-SQCz-AuR-B{EF*fjK_=X3{M#@^rS^& zcs+Ps!;k7cfA^r_!5`I~+G~bkEegbK!3Uo_rYuyabu!c!T~Gs%cqpD_6%jNEYQRNO zt$3+O%V9E;1ZsokTQq?0p!Kq%*&l9~IqlIMPz#%zO#z;Zg@5sBJH!!yK?3bA(f}YY z=o&yf-VqXl#3dsuV3fRso{_k}FgobKOUCmHb(9|&TL09pdzLy56-1eRJnD*@~ z5XaG&n)C7he(Nar4%$_{-93FAZX9~js^ zIjYeSNRNq!chD2i_dY74VZhGA-?aF? zzV^9kmA5N(2~j~GH}xtmn^?IiDt+?h`nGxxr7v*3K#pO*8`Dput@4K#O>8?Y+(m{U8!vy2h*lgi&W=1%~?NT7ULnhDpE8Z6m zlkJiha;PiiR~V15?rn^$LcG|n9(jgWDr{kj>^U7LKM64I$R$pST-+kAM}C<~ktZxv zh<0NzPKg}Rx|-|=cG-c$WP(qe31GvT)5p0LCC~#YFOK^AGqfzB^Aotsypj7#C~~h} zofMfAMUjcRZr~bb)N37TU<`=7Mx)4et!WRnWeX>Ex*+0*npFKfGRCMwZUTb zsk6B6i zM0qOqk|^lWNjv3U`JL%wXtQBngvvTncAJwY&h?UKj?^)E`3)`_x(R0CM{F?4uWav( zdz+ypVfW+_!(sQvbvw5ti!_(BAGxy-iXu^22K6cKSE`FsesTFdrlS#dmoq9dE_MO- zt)r3@^7kF33*aWtNQ7eE*P@Jg@7-%*X`tiRlxHK1J$I0PY=eK`3@b%VZ#I}Y^FVT1 zN{uJY=z9WIO-gc`bZXzOLk?0ey7cT(RQMZp95fIcr2Je|S#jAks-8W6-lBz9aN^mO zE7x3g%{sb%a0Lto+aVZufpccTr& z$79VZ-$`@uBs)l*Kw%*-cid=mUZTe}r;Mh95@YlnozRga=09*he%?O?=C5yESkJem zrBYTV-o-9GObcT=XG&uPuN~3M56^54~%yCu zqIn-r!&0SxTyJ41r{FYE7^G=F*s> zDXH|zY2i8?A{RFN<0ibnmX2|GN>8(nXAN#T?jtMU<2`nLgqzM)xUbZ+B(1@f@3uTh zekY(~sWrx*!UB&eIHwWZ9jno~`!qB8h@c(O_uNJQga`B{?B4qkA}XC`VqzQI7g;#T zkj>G?jY$@Eh{T;J<;ESs&fDNX2XJqKM)AGg>4@NWp=9VaFj*ArV~CigFYKO-WEPFa zQml#YcDdoB#8*oscxL3k3Mle1odnsvkNP2fqGKaWk+jlM4dh6O_aVGa6q!48>PSVr zSGsO+@kkCI{c}Vs1t>c{QT1yOh|KAw-1=@#>~(iR_7H!b0oudwQUIa(^A`JAovXm zWq07S^(5ucu%V-9fZoJc zU%_w(k#N1?@_qaz#IrtQdIQn%YxU|p|1BkwI!jw(#s!&iJx9Vss zJItpTrRT|zWbiLTD+5`kP=PMH*$1z^di}M?X+Vis5vE|Lj=8$`!(bfjg1TfYvqk-y z6^*J5OWcO6Xvi$yp-on)XeG9hQ58x|G-WtInS6WClt@0Cb*&T8^{`?zo2oI5xxla{ zwjkquC-#2>MM%i3iAWsyvO}~dTaCqe(>f*-op;fvFc^Sd98F_l;gR!_P$}5R9uBb% z_Gcuv)!2QTcH-z%iTXZC*u#upNc`AW?Gq__(wQUq8X4IsoQ7SB7o6821r-f$sL{&) z@!r916thC4Q8bQuXRbul2hp^}(UeY?*_g??rk!LXgZEY#V;rZ>2=Ssh!3H}oMt&@8 zxYAu-Miarl_NdN9IBEn_BQ|oFm=tI?WwsP72X7WJb2hrrV%p6MY}A=f^w!m?0UptT zNrWNc&;v|9*E%NMY3zWIk7d>%O?(&|uHLUAS<*vYU7OiiP78j?zlc@RhNE zdvIdmlR^0Y$C>S2>>!Hco3{dDy8Y z#g9B}0cB0tazKCe01C=QAsokwW)V<>!}nr+D_&;!zp^R9@T2a$n$uIGJz;w^E}a>*I%PI zE7$;cokP^L!?z`_%cne2v;igASO7|{q zhv<_>=wT!%`kRhKQ|>ok!@`QEPG`S~jG`Xun#il``8_YcguD`<+$kM}MVnu!D_asI ze-BD>xR=Ao|AyOh^Uq1%M{6CzyQelLBKcq0Lm5a0Z!j!rN_Vn7?L;@Nu?dN7{EQ^= z>H7S_+>(J}>2z%d9=97mPWSrk3PB^Iu0A|*JAc(vR+^g=q&96_6$OfSUN>o;)+Uua z>kee0f8HlPc9RzipS|L95l_;#1s^;=1t%j(Z^#TKaD(`oTHoHX0xyi@p1@1y@}&vxG= zsiqSqBllr(KF0y;9I}8fUf*iqi(9@=J5LdY?Kc`Gw_!_z>cdB3ES0 z@wP!~LN?Cg&F)OchLYiRwy3(=<@-^YTr!pJ5}oCV&x_r`pEDs$V0lPCw5M~Kn&jqR z&1Vwdwo6HG)p$I=B=|v{vJ!{rTXeVwpDDs9Q|hLB-QDO=uw?#S}SR8fiPTh*Au!Q;!qJbl@EfYD3R=E~u3Asm-awnS(M?dR@1eUNq6Z(Re>_c3HPY^v>7_3UPrBav01dqVDINWS zKL3Uw(EM_Q^T>&|p zfp*^KeJXzGG|nN}df`S;ta-xFE9Q~W=bhiPy{qPQQf#}kr2JvDQ!xknKpI_EPpem% zDFlJ|#-B?d(=f;0c~w^6#TRtOOb@t0589ml6=wk>@~dsesPXhz0c%PF`Wva!*fDgh zB$+Nh(9?NkdcKP;FU9-fSP5T1K*V}~_nqy<=$Dsf6(e*>@~v17b!7eBU2)IoJ9iE$NNzY)%Tr}KDqJn&9D7Q#*Pwz(?PjoBAJ_rp)g5P&F4{x3e)W%@vN*+kmj zhY9igiZvmuB$?Lz|K)9a%X1O zE>9zZaG2659vZs@7C<}`#>BDaFz*ABIIzSIkev5kUlG{w-gPPlbm2yqgOT)0 zduPrSX>_ckNBumD-Pk@Vi5_8%8)2>=5Q1Vo`c~^B8>m6tdGTD mXPX9&N)g4_2Hy>dwB=JgsJDIrJyHL356+!EX~yhDJ^w$cW@>-{ diff --git a/assets/ugc/itemfile-0.rbxm b/assets/ugc/itemfile-0.rbxm deleted file mode 100644 index 8224eb4..0000000 --- a/assets/ugc/itemfile-0.rbxm +++ /dev/null @@ -1,140 +0,0 @@ - - null - nil - - - - 0 - -0.899999976 - 0 - 1 - 0 - 0 - -0 - 0.980580688 - 0.196116135 - 0 - -0.196116135 - 0.980580688 - - TrafficCone - - - - false - -0.5 - 0.5 - 0 - 0 - -0.5 - 0.5 - 0 - 0 - 194 - - -3.73503828 - 6.53157806 - -29.3164387 - -0.916252911 - -0.0785642341 - -0.392821193 - -3.90117441e-021 - 0.980580688 - -0.196116135 - 0.400600582 - -0.179691985 - -0.898459911 - - true - - false - - 0.5 - 0.300000012 - -0.5 - 0.5 - 0 - 0 - -0.5 - 0.5 - 0 - 0 - true - 256 - Handle - 0 - -0.5 - 0.5 - 0 - 0 - - -2.42862883e-023 - 3.62439101e-022 - -1.39473558e-023 - - -0.5 - 0.5 - 0 - 0 - 0 - - 3.64650682e-020 - 0.0075033661 - 3.64295609e-020 - - 2 - 1 - - 1 - 2 - 1 - - - - - 2 - 2 - http://www.roblox.com/asset/?id=1082802 - 5 - Mesh - - 0 - 0 - 0 - - - 1 - 1 - 1 - - http://www.roblox.com/asset/?id=1082804 - - 1 - 1 - 1 - - - - - - - 8.65838956e-009 - -0.801995277 - -0.0198786259 - 1 - 7.8713791e-009 - -5.01820807e-014 - -7.71851205e-009 - 0.980580688 - 0.196116135 - 1.54375357e-009 - -0.196116135 - 0.980580688 - - HatAttachment - false - - - - - \ No newline at end of file diff --git a/assets/ugc/itemfile-1.rbxm b/assets/ugc/itemfile-1.rbxm deleted file mode 100644 index db89c3becf8075b74d170828485e04e89a78f167..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 4238 zcmb7HO>Y}T7+$+h(v+l4TPU=&)JZ=PqEU&6plX^pX+nbXVPY$41((h4xL&&6v36(c z7`07AREZuyy|zc7s%A>hb=Ktc-_j_^LSU9ZRM#N?G`zvh{Do_W7!_Oi=Y zZN4^m|KI+7$M$Jjmligu0R-r!2-v-cp1?1!yA6G5z+R(|APWil0Rh`Wl^K?9FEFnh zDb3`Um-5MF^%J_WtYW>&U>gnCX}Zthg(TRI>j7%yV329)Fi)64=A3dz-_RYF$u~}wU0MF7l*aQ-Qu!a>DxbGS)=Xp%bnUSwjz+-yJ zgYE&`AInB)Ch-0tUS!Gg1`DPGXzLU-zResi5p^-R6r$og&HL2g;FHh zjKyqoskCCTTIL>gV|q0mfkX^8As4tArNDoae?(W~SwuKodwv&;t|-7f=O5w^?SL-k@!W?pbP(;2>~~hyvqc z*{`fRx@Cvfz=$k;jx!4*b`w+43`$I4IkMi+J=lX9x0hPZG0NPf1+^gxOsAky-HH(~ z)TD0Qr0S_xa+$kr{ht6%0w_7C{s$2LhsJ{MmUJWbs9LRnM7}p6=bWl98Z{QB2y`LA zKEP4aCbo+ddAabms$~x%Cd1BKM7Qh*47{p3M`5vTpKPh-&X6NyxLf z^PbE7>YRzu()r17g7XQ^-4UO*z;}*)_2px%^)!7(T0w%t7>{I}@;x}ST=y(Wz`V<= z%oP^%j_wdyGcI>Ti~rllV2q62-#$_#veo-pA_#{Jey8=Vf9I#!cd_WbRo|vG)GFh z@hp8rgZ$Nt$zXs8wxZLa#u0^n?E#%^OzfT8L{_5)gX^sBm^MRXouW4+DkL}r^$5Yd zb&HFoQi%>V11PTz!I1WLU1lYlc0k=R7^d1G1edKF9%U$;@sxyZW~cP&weedNlJj9I*p1P3FtEpxHLY)(i2x;)i}{o#l#y{Ke%v&Ufu zm{r;1)D0OBY{*4kZOQMQaj|LJXBO#eH7wQ<{~2Inxv@8Z|HrIFS9iRs?lQ-yHv%S^ zh{%a;ZQ6b}Dsi_mqZ@*|%X$sDDz}SdO5#A|mG$tyM4oVx0RUzmW!C<6dbs=W;UnCU z1Zn^P*6Hkk@)!LMOkhApdoaIr^;(1BHh}95z-1bAi5et$11gZq_!FBmQ|IWhEJXFv z@NlhGyAb}oUNCrNn5qsF!{e4Yc5!6%?a_Bf!C$RD&?T!6>57i0U4Y>?G5S?}PWm_b zgM<;786fqn8Sx6sMMSQiF`q%2V2hne?9So+Da5 UO)shG#jCOpv>=y