diff --git a/Libraries/Load.luau b/Libraries/Load.luau new file mode 100644 index 0000000..90aaf35 --- /dev/null +++ b/Libraries/Load.luau @@ -0,0 +1,11 @@ +local Load = {} + +function Load.Help() + print "Call Load.Start with a ticket to start a game server!" +end + +function Load.Start(ticket: string) + dofile("http://banland.xyz/game/host?ticket=" .. ticket) +end + +return Load diff --git a/compile.luau b/compile.luau index 70bc252..bc41683 100644 --- a/compile.luau +++ b/compile.luau @@ -17,6 +17,7 @@ local normalCores = {} local libraryCores = { "Fusion/init.luau", "Red/init.luau", + "Load.luau", } local otherCores = {} local plugins = {} diff --git a/defs.d.lua b/defs.d.lua index 48f99dd..c6e47d6 100644 --- a/defs.d.lua +++ b/defs.d.lua @@ -8612,6 +8612,7 @@ declare TeleportService: TeleportService declare plugin: Plugin declare script: LuaSourceContainer declare function loadfile(file: string): any +declare function dofile(file: string): any -- fusion diff --git a/luau/45284430.luau b/luau/45284430.luau index b635db5..9670fb2 100644 --- a/luau/45284430.luau +++ b/luau/45284430.luau @@ -1,3 +1,4 @@ +--!strict -- RbxGui print "[Mercury]: Loaded corescript 45284430" @@ -143,7 +144,7 @@ local function cancelSlide(areaSoak) end end -RbxGui.CreateMessageDialog = function(title, message, buttons) +function RbxGui.CreateMessageDialog(title, message, buttons) local frame = New "Frame" { Size = UDim2.new(0.5, 0, 0.5, 0), Position = UDim2.new(0.25, 0, 0.25, 0), @@ -182,7 +183,7 @@ RbxGui.CreateMessageDialog = function(title, message, buttons) return frame end -RbxGui.CreateStyledMessageDialog = function(title, message, style, buttons) +function RbxGui.CreateStyledMessageDialog(title, message, style, buttons) local frame = New "Frame" { Size = UDim2.new(0.5, 0, 0, 165), Position = UDim2.new(0.25, 0, 0.5, -72.5), @@ -244,7 +245,7 @@ RbxGui.CreateStyledMessageDialog = function(title, message, style, buttons) end local scrollMouseCount -RbxGui.CreateDropDownMenu = function(items, onSelect, forRoblox) +function RbxGui.CreateDropDownMenu(items, onSelect, forRoblox) local width = UDim.new(0, 100) local height = UDim.new(0, 32) @@ -601,7 +602,7 @@ RbxGui.CreateDropDownMenu = function(items, onSelect, forRoblox) return frame, updateSelection end -RbxGui.CreatePropertyDropDownMenu = function(instance, property, enum) +function RbxGui.CreatePropertyDropDownMenu(instance, property, enum) local items = enum:GetEnumItems() local names = {} local nameToItem = {} @@ -627,7 +628,7 @@ RbxGui.CreatePropertyDropDownMenu = function(instance, property, enum) return frame end -RbxGui.GetFontHeight = function(font, fontSize) +function RbxGui.GetFontHeight(font, fontSize) if font == nil or fontSize == nil then error "Font and FontSize must be non-nil" end @@ -764,7 +765,7 @@ local function layoutGuiObjectsHelper(frame, guiObjects, settingsTable) end end -RbxGui.LayoutGuiObjects = function(frame, guiObjects, settingsTable) +function RbxGui.LayoutGuiObjects(frame, guiObjects, settingsTable) if not frame:IsA "GuiObject" then error "Frame must be a GuiObject" end @@ -818,7 +819,7 @@ RbxGui.LayoutGuiObjects = function(frame, guiObjects, settingsTable) layoutGuiObjectsHelper(wrapperFrame, guiObjects, settingsTable) end -RbxGui.CreateSlider = function(steps, width, position) +function RbxGui.CreateSlider(steps, width, position) local sliderGui = New "Frame" { Size = UDim2.new(1, 0, 1, 0), BackgroundTransparency = 1, @@ -878,7 +879,7 @@ RbxGui.CreateSlider = function(steps, width, position) bar.Position = position end - local slider = New "TextButton" { + local slider = New "ImageButton" { Name = "Slider", BackgroundTransparency = 1, Image = "rbxasset://textures/ui/Slider.png", @@ -932,7 +933,7 @@ RbxGui.CreateSlider = function(steps, width, position) return sliderGui, sliderPosition, sliderSteps end -RbxGui.CreateTrueScrollingFrame = function() +function RbxGui.CreateTrueScrollingFrame() local lowY local highY @@ -1536,7 +1537,7 @@ RbxGui.CreateTrueScrollingFrame = function() return scrollingFrame, controlFrame end -RbxGui.CreateScrollingFrame = function(orderList, scrollStyle) +function RbxGui.CreateScrollingFrame(orderList, scrollStyle) local frame = New "Frame" { Name = "ScrollingFrame", BackgroundTransparency = 1, @@ -2134,6 +2135,7 @@ RbxGui.CreateScrollingFrame = function(orderList, scrollStyle) return frame, scrollUpButton, scrollDownButton, recalculate, scrollbar end + local function binaryGrow(min, max, fits) if min > max then return min @@ -2186,7 +2188,7 @@ local function getGuiOwner(instance) return nil end -RbxGui.AutoTruncateTextObject = function(textLabel) +function RbxGui.AutoTruncateTextObject(textLabel) local text = textLabel.Text local fullLabel = Hydrate(textLabel:Clone()) { @@ -2288,10 +2290,10 @@ RbxGui.AutoTruncateTextObject = function(textLabel) end local function TransitionTutorialPages( - fromPage, - toPage, - transitionFrame, - currentPageValue + fromPage: Instance?, + toPage: Instance?, + transitionFrame: Frame, + currentPageValue: ObjectValue ) if fromPage then fromPage.Visible = false @@ -2340,7 +2342,7 @@ local function TransitionTutorialPages( ) end -RbxGui.CreateTutorial = function(name, tutorialKey, createButtons) +function RbxGui.CreateTutorial(name, tutorialKey, createButtons: boolean) local frame = New "Frame" { Name = "Tutorial-" .. name, BackgroundTransparency = 1, @@ -4385,7 +4387,7 @@ RbxGui.CreatePluginFrame = function(name, size, position, scrollable, parent) return dragBar, widgetContainer, helpFrame, closeEvent end -RbxGui.Help = function(funcNameOrFunc) +function RbxGui.Help(funcNameOrFunc) --input argument can be a string or a function. Should return a description (of arguments and expected side effects) if funcNameOrFunc == "CreatePropertyDropDownMenu" diff --git a/luau/48488235.luau b/luau/48488235.luau index fffb59e..1194595 100644 --- a/luau/48488235.luau +++ b/luau/48488235.luau @@ -829,13 +829,13 @@ local PrivilegeLevel = { Banned = 0, } -local IsPersonalServer = not not game.Workspace:FindFirstChild "PSVariable" +-- 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) +-- game.Workspace.ChildAdded:connect(function(nchild) +-- if nchild.Name == "PSVariable" and nchild:IsA "BoolValue" then +-- IsPersonalServer = true +-- end +-- end) ------------------------------- -- Static Functions ------------------------------- @@ -914,8 +914,8 @@ local function WaitForClick(frameParent, polledFunction, exitFunction) end WaitForClickLock = true local connection, connection2 - connection = BigButton.MouseButton1Up:connect(function(nx, ny) - exitFunction(nx, ny) + connection = BigButton.MouseButton1Up:connect(function() + exitFunction() BigButton.Visible = false connection:disconnect() if connection2 then @@ -933,7 +933,7 @@ local function WaitForClick(frameParent, polledFunction, exitFunction) BigButton.Parent = frameParent frameParent.AncestryChanged:connect(function(child, nparent) if child == frameParent and nparent == nil then - exitFunction(nx, ny) + exitFunction() BigButton.Visible = false connection:disconnect() connection2:disconnect() @@ -2287,10 +2287,11 @@ local function InitMovingPanel(entry, player) local nextIndex = 2 local friendStatus = GetFriendStatus(player) debugprint(tostring(friendStatus)) - local showRankMenu = IsPersonalServer - and LocalPlayer.PersonalServerRank >= PrivilegeLevel.Admin - and LocalPlayer.PersonalServerRank - > SelectedPlayer.PersonalServerRank + local showRankMenu = false + -- IsPersonalServer + -- and LocalPlayer.PersonalServerRank >= PrivilegeLevel.Admin + -- and LocalPlayer.PersonalServerRank + -- > SelectedPlayer.PersonalServerRank local ReportPlayerButton = MakePopupButton(PopUpPanel, "Report Player", 0) ReportPlayerButton.MouseButton1Click:connect(function() @@ -2300,8 +2301,8 @@ local function InitMovingPanel(entry, player) PopUpPanel, "Friend", 1, - not showRankMenu - and friendStatus ~= Enum.FriendStatus.FriendRequestReceived + -- not showRankMenu and + friendStatus ~= Enum.FriendStatus.FriendRequestReceived ) FriendPlayerButton.MouseButton1Click:connect(OnFriendButtonSelect) @@ -2433,7 +2434,6 @@ local function StartDrag(entry, startx, starty) WaitForChild(entry.Frame, "ClickListener") local function dragExit() -- stopDrag = true - if entry.Player and SelectedPlayer @@ -3431,5 +3431,5 @@ AreNamesExpanded.Value = true BaseUpdate() --UGGGLY,find a better way later -wait(2) -IsPersonalServer = not not game.Workspace:FindFirstChild "PSVariable" +-- wait(2) +-- IsPersonalServer = not not game.Workspace:FindFirstChild "PSVariable" diff --git a/luau/60595695.luau b/luau/60595695.luau index d66b2e0..9444e8e 100644 --- a/luau/60595695.luau +++ b/luau/60595695.luau @@ -19,11 +19,12 @@ if ScriptContext then for name, id in pairs { Fusion = 10000001, Red = 10000002, + Load = 10000003, Gui = 45284430, Utility = 60595411, Stamper = 73157242, } do - ScriptContext:RegisterLibrary(`Libraries/Rbx{name}`, tostring(id)) + ScriptContext:RegisterLibrary("Libraries/Rbx" .. name, tostring(id)) end ScriptContext:LibraryRegistrationComplete() else