Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- if game:GetService("CoreGui"):FindFirstChild("DI") then
- game:GetService("CoreGui"):FindFirstChild("DI"):Destroy()
- end
- DI = Instance.new("ScreenGui")
- DinamicIsland = Instance.new("ImageButton")
- DinamicIsland2 = Instance.new("TextLabel")
- DinamicIslandUICorner = Instance.new("UICorner")
- FullScreenCloseButon = Instance.new("ImageButton")
- MainFrame = Instance.new("Frame")
- SearchBox = Instance.new("TextBox")
- UICorner_3 = Instance.new("UICorner")
- ScriptListFrame = Instance.new("ScrollingFrame")
- UIPadding = Instance.new("UIPadding")
- Scripts = Instance.new("Folder")
- UIGridLayout = Instance.new("UIGridLayout")
- ScriptFrame = Instance.new("Frame")
- ScriptTitle = Instance.new("TextLabel")
- ScriptGame = Instance.new("TextLabel")
- VerifiedScriptFrame = Instance.new("Frame")
- ScriptTitle_2 = Instance.new("TextLabel")
- VerifiedIcon = Instance.new("ImageLabel")
- ScriptGame_2 = Instance.new("TextLabel")
- Info = Instance.new("Frame")
- PreviewImage = Instance.new("ImageLabel")
- UICorner_14 = Instance.new("UICorner")
- Author = Instance.new("Frame")
- InfoBoxAuthor = Instance.new("TextLabel")
- ProfilePicture = Instance.new("ImageLabel")
- UICorner_15 = Instance.new("UICorner")
- Title_2 = Instance.new("Frame")
- InfoBoxTitle = Instance.new("TextLabel")
- Game = Instance.new("TextLabel")
- Comments = Instance.new("Frame")
- Inner = Instance.new("Frame")
- UICorner_21 = Instance.new("UICorner")
- Line = Instance.new("Frame")
- CommentsText = Instance.new("TextLabel")
- Comments_2 = Instance.new("ScrollingFrame")
- Comment = Instance.new("Frame")
- Content = Instance.new("TextLabel")
- Author_2 = Instance.new("TextLabel")
- ProfilePicture_2 = Instance.new("ImageLabel")
- UICorner_22 = Instance.new("UICorner")
- UIListLayout_3 = Instance.new("UIListLayout")
- PreviewImage_2 = Instance.new("ImageLabel")
- PreviewImageUICorner_2 = Instance.new("UICorner")
- KeySystem = Instance.new("TextLabel")
- KeySystemUICorner = Instance.new("UICorner")
- KeySystem_2 = Instance.new("TextLabel")
- KeySystemUICorner_2 = Instance.new("UICorner")
- InfoBox = Instance.new("Frame")
- ExecuteButton = Instance.new("TextButton")
- ExecuteButtonUICorner = Instance.new("UICorner")
- ExecuteButton_2 = Instance.new("TextButton")
- ExecuteButtonUICorner_2 = Instance.new("UICorner")
- CopyScriptButton = Instance.new("TextButton")
- CopyScriptButtonUICorner = Instance.new("UICorner")
- CopyScriptButton_2 = Instance.new("TextButton")
- CopyScriptButtonUICorner_2 = Instance.new("UICorner")
- DinamicIsland2TextTransparency = 1
- HeadFont = Enum.Font.SourceSans
- DI.Name = "DI"
- DI.Parent = game.CoreGui
- DI.ZIndexBehavior = Enum.ZIndexBehavior.Sibling
- game.CoreGui.DI.Enabled = true
- FullScreenCloseButon.Visible = false
- FullScreenCloseButon.Parent = DI
- FullScreenCloseButon.Size = UDim2.new(1,0,1,100)
- FullScreenCloseButon.Position = UDim2.new(0,0,0,-100)
- FullScreenCloseButon.BackgroundTransparency = 1
- DinamicIsland.Name = "DinamicIsland"
- DinamicIsland.Parent = DI
- DinamicIsland.AnchorPoint = Vector2.new(0, 0)
- DinamicIsland.Size = UDim2.new(0, 100, 0, 30)
- DinamicIsland.Position = UDim2.new(0.45, 0, -0.05, 0)
- DinamicIsland.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
- DinamicIsland.ZIndex = 2
- DinamicIsland.AutoButtonColor = false
- DinamicIsland.BorderSizePixel = 0
- DinamicIslandUICorner.CornerRadius = UDim.new(0, 20)
- DinamicIslandUICorner.Parent = DinamicIsland
- DinamicIsland2.Name = "DinamicIsland2"
- DinamicIsland2.Parent = DinamicIsland
- DinamicIsland2.Position = UDim2.new(0.25, 0, 0, 0)
- DinamicIsland2.Size = UDim2.new(0, 50, 0, 30)
- DinamicIsland2.Text = "ERROR"
- DinamicIsland2.BackgroundTransparency = 1
- DinamicIsland2.Font = HeadFont
- DinamicIsland2.TextSize = 28
- DinamicIsland2.TextColor3 = Color3.fromRGB(255, 255, 255)
- DinamicIsland2.TextTransparency = DinamicIsland2TextTransparency
- MainFrame.Visible = false
- SearchBox.Visible = false
- spawn(function()
- while wait() do
- if DinamicIsland.Size == UDim2.new(0, 100, 0, 30) then
- DinamicIsland2.Visible = true
- MainFrame.Visible = false
- SearchBox.Visible = false
- else
- DinamicIsland2.Visible = false
- if DinamicIsland.Size == UDim2.new(0, 500, 0, 100) then
- MainFrame.Visible = true
- SearchBox.Visible = true
- end
- if DinamicIsland.Size ~= UDim2.new(0, 500, 0, 100) then
- MainFrame.Visible = false
- SearchBox.Visible = false
- end
- end
- end
- end)
- spawn(function()
- while wait() do
- local ping = tonumber(game:GetService("Stats"):FindFirstChild("PerformanceStats").Ping:GetValue())
- DinamicIsland2.Text = os.date("%H:%M")
- wait()
- for i = 1,10 do
- wait()
- DinamicIsland2TextTransparency = DinamicIsland2TextTransparency - 0.1
- DinamicIsland2.TextTransparency = DinamicIsland2TextTransparency
- end
- wait(5)
- for i = 1,10 do
- wait()
- DinamicIsland2TextTransparency = DinamicIsland2TextTransparency + 0.1
- DinamicIsland2.TextTransparency = DinamicIsland2TextTransparency
- end
- if DinamicIsland2TextTransparency <= 1 then
- for i = 1,10 do
- wait()
- DinamicIsland2TextTransparency = DinamicIsland2TextTransparency - 0.1
- DinamicIsland2.TextTransparency = DinamicIsland2TextTransparency
- ping = math.floor(ping)
- DinamicIsland2.Text = ping.."-Ping"
- end
- end
- wait(5)
- for i = 1,10 do
- wait()
- DinamicIsland2TextTransparency = DinamicIsland2TextTransparency + 0.1
- DinamicIsland2.TextTransparency = DinamicIsland2TextTransparency
- end
- end
- end)
- DinamicIsland.MouseButton1Click:Connect(function()
- MainFrame.Visible = false
- SearchBox.Visible = false
- if DinamicIsland.Size == UDim2.new(0, 100, 0, 30) then
- FullScreenCloseButon.Visible = true
- DinamicIsland:TweenSize(UDim2.new(0, 500, 0, 100),"InOut","Sine",0.2)
- DinamicIsland:TweenPosition(UDim2.new(0.25, 0, -0.05, 0),"InOut","Sine",0.2)
- end
- if DinamicIsland.Size == UDim2.new(0, 500, 0, 100) then
- MainFrame.Visible = false
- SearchBox.Visible = false
- FullScreenCloseButon.Visible = false
- DinamicIsland:TweenSize(UDim2.new(0, 100, 0, 30),"InOut","Sine",0.2)
- DinamicIsland:TweenPosition(UDim2.new(0.45, 0, -0.05, 0),"InOut","Sine",0.2)
- MainFrame.Visible = false
- SearchBox.Visible = false
- end
- end)
- DinamicIsland.MouseEnter:Connect(function()
- FullScreenCloseButon.Visible = true
- DinamicIsland:TweenSize(UDim2.new(0, 500, 0, 100),"InOut","Sine",0.2)
- DinamicIsland:TweenPosition(UDim2.new(0.25, 0, -0.05, 0),"InOut","Sine",0.2)
- end)
- FullScreenCloseButon.MouseButton1Click:Connect(function()
- MainFrame.Visible = false
- SearchBox.Visible = false
- FullScreenCloseButon.Visible = false
- if DinamicIsland.Size == UDim2.new(0, 500, 0, 100) then
- MainFrame.Visible = false
- SearchBox.Visible = false
- DinamicIsland:TweenSize(UDim2.new(0, 100, 0, 30),"InOut","Sine",0.2)
- DinamicIsland:TweenPosition(UDim2.new(0.45, 0, -0.05, 0),"InOut","Sine",0.2)
- MainFrame.Visible = false
- SearchBox.Visible = false
- end
- end)
- MainFrame.Name = "MainFrame"
- MainFrame.Parent = DinamicIsland
- MainFrame.AnchorPoint = Vector2.new(0.5, 0.5)
- MainFrame.BackgroundTransparency = 1
- MainFrame.Position = UDim2.new(0.265, 0, 0.58, 0)
- MainFrame.Size = UDim2.new(0, 250, 0, 85.5)
- MainFrame.ZIndex = 2
- MainFrame.BorderSizePixel = 0
- InfoBox.Name = "InfoBox"
- InfoBox.Parent = MainFrame
- InfoBox.BackgroundTransparency = 1
- InfoBox.BorderSizePixel = 0
- InfoBox.Position = UDim2.new(0, 250, 0, 0)
- InfoBox.Size = UDim2.new(0, 240, 0, 82)
- InfoBox.ZIndex = 3
- SearchBox.Name = "SearchBox"
- SearchBox.Parent = DinamicIsland
- SearchBox.BackgroundColor3 = Color3.fromRGB(25, 23, 22)
- SearchBox.Position = UDim2.new(0, 8, 0, 1)
- SearchBox.Size = UDim2.new(0, 485, 0, 15)
- SearchBox.ClearTextOnFocus = false
- SearchBox.Font = HeadFont
- SearchBox.PlaceholderText = "S e a r c h"
- SearchBox.PlaceholderColor3 = Color3.fromRGB(255, 255, 255)
- SearchBox.Text = ""
- SearchBox.TextColor3 = Color3.fromRGB(255, 255, 255)
- SearchBox.TextScaled = true
- SearchBox.TextSize = 14.000
- SearchBox.TextWrapped = true
- UICorner_3.CornerRadius = UDim.new(0, 20)
- UICorner_3.Parent = SearchBox
- ScriptListFrame.Name = "ScriptListFrame"
- ScriptListFrame.Parent = MainFrame
- ScriptListFrame.Active = true
- ScriptListFrame.BackgroundTransparency = 1
- ScriptListFrame.BorderSizePixel = 0
- ScriptListFrame.Position = UDim2.new(0.012, 0, 0, 0)
- ScriptListFrame.Size = UDim2.new(0, 259.5, 0, 82)
- ScriptListFrame.ZIndex = 2
- ScriptListFrame.CanvasSize = UDim2.new(0, 0, 0, 0)
- UIPadding.Parent = ScriptListFrame
- UIPadding.PaddingBottom = UDim.new(0, 0)
- UIPadding.PaddingLeft = UDim.new(0, 0)
- UIPadding.PaddingRight = UDim.new(0, 0)
- UIPadding.PaddingTop = UDim.new(0, 0)
- Scripts.Name = "Scripts"
- Scripts.Parent = ScriptListFrame
- UIGridLayout.Parent = Scripts
- UIGridLayout.SortOrder = Enum.SortOrder.LayoutOrder
- UIGridLayout.CellPadding = UDim2.new(0, 0, 0, 1)
- UIGridLayout.CellSize = UDim2.new(0, 250, 0, 85.5)
- ScriptFrame.Name = "ScriptFrame"
- ScriptFrame.Parent = Scripts
- ScriptFrame.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
- ScriptFrame.Size = UDim2.new(0, 370, 0, 700)
- ScriptFrame.BorderSizePixel = 0
- ScriptTitle.Name = "ScriptTitle"
- ScriptTitle.Parent = ScriptFrame
- ScriptTitle.BackgroundTransparency = 1
- ScriptTitle.Position = UDim2.new(0, 85, 0, 0)
- ScriptTitle.Size = UDim2.new(0, 160, 0, 25)
- ScriptTitle.Font = HeadFont
- ScriptTitle.Text = "Script Title"
- ScriptTitle.TextColor3 = Color3.fromRGB(255, 255, 255)
- ScriptTitle.TextScaled = true
- ScriptTitle.TextSize = 14.000
- ScriptTitle.TextWrapped = true
- ScriptTitle.TextXAlignment = Enum.TextXAlignment.Left
- ExecuteButton.Name = "ExecuteButton"
- ExecuteButton.Parent = ScriptFrame
- ExecuteButton.Position = UDim2.new(0, 85, 0, 28)
- ExecuteButton.Size = UDim2.new(0, 100, 0, 20)
- ExecuteButton.Font = HeadFont
- ExecuteButton.Text = "Execute"
- ExecuteButton.TextColor3 = Color3.fromRGB(255, 255, 255)
- ExecuteButton.AutoButtonColor = false
- ExecuteButton.TextSize = 15
- ExecuteButton.BackgroundColor3 = Color3.fromRGB(80, 200, 120)
- ExecuteButtonUICorner.CornerRadius = UDim.new(0, 20)
- ExecuteButtonUICorner.Parent = ExecuteButton
- CopyScriptButton.Name = "CopyScriptButton"
- CopyScriptButton.Parent = ScriptFrame
- CopyScriptButton.Position = UDim2.new(0, 145, 0, 62)
- CopyScriptButton.Size = UDim2.new(0, 100, 0, 20)
- CopyScriptButton.Font = HeadFont
- CopyScriptButton.Text = "Copy"
- CopyScriptButton.TextColor3 = Color3.fromRGB(255, 255, 255)
- CopyScriptButton.AutoButtonColor = false
- CopyScriptButton.TextSize = 15
- CopyScriptButton.BackgroundColor3 = Color3.fromRGB(218, 223, 247)
- CopyScriptButtonUICorner.CornerRadius = UDim.new(0, 20)
- CopyScriptButtonUICorner.Parent = CopyScriptButton
- KeySystem.Name = "KeySystem"
- KeySystem.Parent = ScriptFrame
- KeySystem.BackgroundColor3 = Color3.fromRGB(242, 191, 33)
- KeySystem.Position = UDim2.new(0, 190, 0, 28)
- KeySystem.Size = UDim2.new(0, 50, 0, 20)
- KeySystem.Font = HeadFont
- KeySystem.Text = "Key System"
- KeySystem.TextColor3 = Color3.fromRGB(0, 0, 0)
- KeySystemUICorner.CornerRadius = UDim.new(0, 10)
- KeySystemUICorner.Parent = KeySystem
- ScriptGame.Name = "ScriptGame"
- ScriptGame.Parent = ScriptFrame
- ScriptGame.BackgroundTransparency = 1
- ScriptGame.Position = UDim2.new(0, 0, 0, 375)
- ScriptGame.Size = UDim2.new(0, 280, 0, 25)
- ScriptGame.Font = HeadFont
- ScriptGame.Text = "Game"
- ScriptGame.TextColor3 = Color3.fromRGB(255, 255, 255)
- ScriptGame.TextSize = 14.000
- ScriptGame.TextWrapped = true
- ScriptGame.TextXAlignment = Enum.TextXAlignment.Left
- VerifiedScriptFrame.Name = "VerifiedScriptFrame"
- VerifiedScriptFrame.Parent = Scripts
- VerifiedScriptFrame.BackgroundColor3 = ScriptFrame.BackgroundColor3
- VerifiedScriptFrame.Size = UDim2.new(0, 300, 0, 150)
- VerifiedScriptFrame.BorderSizePixel = 0
- ScriptTitle_2.Name = "ScriptTitle"
- ScriptTitle_2.Parent = VerifiedScriptFrame
- ScriptTitle_2.BackgroundTransparency = 1
- ScriptTitle_2.Position = ScriptTitle.Position
- ScriptTitle_2.Size = ScriptTitle.Size
- ScriptTitle_2.Font = HeadFont
- ScriptTitle_2.Text = "Script Title"
- ScriptTitle_2.TextColor3 = Color3.fromRGB(255, 255, 255)
- ScriptTitle_2.TextScaled = true
- ScriptTitle_2.TextSize = 14.000
- ScriptTitle_2.TextWrapped = true
- ScriptTitle_2.TextXAlignment = Enum.TextXAlignment.Left
- ExecuteButton_2.Name = "ExecuteButton"
- ExecuteButton_2.Parent = VerifiedScriptFrame
- ExecuteButton_2.Position = ExecuteButton.Position
- ExecuteButton_2.Size = ExecuteButton.Size
- ExecuteButton_2.Font = HeadFont
- ExecuteButton_2.Text = "Execute"
- ExecuteButton_2.TextColor3 = Color3.fromRGB(255, 255, 255)
- ExecuteButton_2.AutoButtonColor = false
- ExecuteButton_2.TextSize = 15
- ExecuteButton_2.BackgroundColor3 = ExecuteButton.BackgroundColor3
- ExecuteButtonUICorner_2.CornerRadius = UDim.new(0, 20)
- ExecuteButtonUICorner_2.Parent = ExecuteButton_2
- CopyScriptButton_2.Name = "CopyScriptButton"
- CopyScriptButton_2.Parent = VerifiedScriptFrame
- CopyScriptButton_2.Position = CopyScriptButton.Position
- CopyScriptButton_2.Size = CopyScriptButton.Size
- CopyScriptButton_2.Font = HeadFont
- CopyScriptButton_2.Text = "Copy"
- CopyScriptButton_2.TextColor3 = Color3.fromRGB(255, 255, 255)
- CopyScriptButton_2.AutoButtonColor = false
- CopyScriptButton_2.TextSize = 15
- CopyScriptButton_2.BackgroundColor3 = CopyScriptButton.BackgroundColor3
- CopyScriptButtonUICorner_2.CornerRadius = UDim.new(0, 20)
- CopyScriptButtonUICorner_2.Parent = CopyScriptButton_2
- KeySystem_2.Name = "KeySystem"
- KeySystem_2.Parent = VerifiedScriptFrame
- KeySystem_2.BackgroundColor3 = Color3.fromRGB(242, 191, 33)
- KeySystem_2.Position = KeySystem.Position
- KeySystem_2.Size = KeySystem.Size
- KeySystem_2.Font = HeadFont
- KeySystem_2.Text = "Key System"
- KeySystem_2.TextColor3 = Color3.fromRGB(0, 0, 0)
- KeySystemUICorner_2.CornerRadius = UDim.new(0, 10)
- KeySystemUICorner_2.Parent = KeySystem_2
- KeySystem.Visible = false
- KeySystem_2.Visible = false
- ScriptGame_2.Name = "ScriptGame"
- ScriptGame_2.Parent = VerifiedScriptFrame
- ScriptGame_2.BackgroundTransparency = 1
- ScriptGame_2.Position = ScriptGame.Position
- ScriptGame_2.Size = ScriptGame.Size
- ScriptGame_2.Font = HeadFont
- ScriptGame_2.Text = "Game"
- ScriptGame_2.TextColor3 = Color3.fromRGB(255, 255, 255)
- ScriptGame_2.TextSize = 14.000
- ScriptGame_2.TextWrapped = true
- ScriptGame_2.TextXAlignment = Enum.TextXAlignment.Left
- Info.Name = "Info"
- Info.Parent = InfoBox
- Info.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
- Info.BackgroundTransparency = 1
- Info.Size = UDim2.new(0, 995, 0, 100)
- PreviewImage.Name = "PreviewImage"
- PreviewImage.Parent = ScriptFrame
- PreviewImage.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
- PreviewImage.BackgroundTransparency = 1
- PreviewImage.Position = UDim2.new(0, 1, 0, 2)
- PreviewImage.Size = UDim2.new(0, 80, 0, 80)
- PreviewImage.Image = "rbxassetid://17093295752"
- UICorner_14.CornerRadius = UDim.new(0, 5)
- UICorner_14.Parent = PreviewImage
- PreviewImage_2.Name = "PreviewImage"
- PreviewImage_2.Parent = VerifiedScriptFrame
- PreviewImage_2.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
- PreviewImage_2.BackgroundTransparency = 1
- PreviewImage_2.Position = PreviewImage.Position
- PreviewImage_2.Size = PreviewImage.Size
- PreviewImage_2.Image = "rbxassetid://17093295752"
- PreviewImageUICorner_2.CornerRadius = UDim.new(0, 5)
- PreviewImageUICorner_2.Parent = PreviewImage_2
- VerifiedIcon.Name = "VerifiedIcon"
- VerifiedIcon.Parent = VerifiedScriptFrame
- VerifiedIcon.BackgroundTransparency = 1
- VerifiedIcon.Position = UDim2.new(0, 85, 0, 50)
- VerifiedIcon.Size = UDim2.new(0, 40, 0, 30)
- VerifiedIcon.Image = "rbxassetid://15621211889"
- Comments.Name = "Comments"
- Comments.Parent = InfoBox
- Comments.BackgroundTransparency = 1
- Comments.Size = UDim2.new(0, 400, 0, 414)
- Inner.Name = "Inner"
- Inner.Parent = Comments
- Inner.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
- Inner.Position = UDim2.new(0, 0, 0, 10)
- Inner.BackgroundTransparency = 1
- Inner.Size = UDim2.new(0, 400, 0, 414)
- UICorner_21.CornerRadius = UDim.new(0, 12)
- UICorner_21.Parent = Inner
- CommentsText.Name = "CommentsText"
- CommentsText.Parent = Inner
- CommentsText.BackgroundTransparency = 1
- CommentsText.Size = UDim2.new(0, 240, 0, 20)
- CommentsText.Position = UDim2.new(0, 0, 0, -15)
- CommentsText.Font = HeadFont
- CommentsText.Text = "Comments"
- CommentsText.TextColor3 = Color3.fromRGB(255, 255, 255)
- CommentsText.TextSize = 14.000
- Comments_2.Name = "Comments"
- Comments_2.Parent = Inner
- Comments_2.Active = true
- Comments_2.BackgroundTransparency = 1
- Comments_2.BorderSizePixel = 0
- Comments_2.Position = UDim2.new(0, 0, 0, 10)
- Comments_2.Size = UDim2.new(0, 240, 0, 60)
- Comments_2.CanvasSize = UDim2.new(0, 0, 0, 0)
- Comment.Name = "Comment"
- Comment.Parent = Comments_2
- Comment.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
- Comment.BackgroundTransparency = 1
- Comment.Size = UDim2.new(0, 400, 0, 50)
- Content.Name = "Content"
- Content.Parent = Comment
- Content.BackgroundTransparency = 1
- Content.Position = UDim2.new(0, 50, 0, 30)
- Content.Size = UDim2.new(0, 190, 0, 20)
- Content.Font = HeadFont
- Content.Text = "Comment"
- Content.TextColor3 = Color3.fromRGB(255, 255, 255)
- Content.TextSize = 14
- Content.TextWrapped = true
- Content.TextXAlignment = Enum.TextXAlignment.Left
- Content.TextYAlignment = Enum.TextYAlignment.Top
- Content.TextScaled = true
- Author_2.Name = "Author"
- Author_2.Parent = Comment
- Author_2.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
- Author_2.BackgroundTransparency = 1.000
- Author_2.BorderSizePixel = 0
- Author_2.Position = UDim2.new(0, 50, 0, 5)
- Author_2.Size = UDim2.new(0, 200, 0, 25)
- Author_2.Font = HeadFont
- Author_2.Text = "Author"
- Author_2.TextColor3 = Color3.fromRGB(255, 255, 255)
- Author_2.TextSize = 20.000
- Author_2.TextWrapped = true
- Author_2.TextXAlignment = Enum.TextXAlignment.Left
- ProfilePicture_2.Name = "ProfilePicture"
- ProfilePicture_2.Parent = Comment
- ProfilePicture_2.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
- ProfilePicture_2.BackgroundTransparency = 1.000
- ProfilePicture_2.Position = UDim2.new(0, 5, 0, 5)
- ProfilePicture_2.Size = UDim2.new(0, 40, 0, 40)
- ProfilePicture_2.Image = "rbxassetid://17093333262"
- UICorner_22.CornerRadius = UDim.new(1, 0)
- UICorner_22.Parent = ProfilePicture_2
- UIListLayout_3.Parent = Comments_2
- UIListLayout_3.SortOrder = Enum.SortOrder.LayoutOrder
- UIListLayout_3.Padding = UDim.new(0, 5)
- getfakeasset = getcustomasset or getsynasset
- HttpService = game:GetService("HttpService")
- page = 1
- gquery = ""
- function tableConcat(t1,t2)
- for i, v in pairs(t2) do
- table.insert(t1, v)
- end
- return t1
- end
- MainFrame.ScriptListFrame.AutomaticCanvasSize = Enum.AutomaticSize.Y
- MainFrame.ScriptListFrame.ScrollBarImageTransparency = 1
- MainFrame.ScriptListFrame.ScrollBarImageColor3 = Color3.fromRGB(0, 0, 0)
- MainFrame.InfoBox.Comments.Inner.Comments.AutomaticCanvasSize = Enum.AutomaticSize.Y
- MainFrame.InfoBox.Comments.Inner.Comments.ScrollBarImageColor3 = Color3.new(0, 0, 0)
- MainFrame.InfoBox.Comments.Inner.Comments.ScrollBarImageTransparency = 1
- VerifiedScript = MainFrame.ScriptListFrame.Scripts.VerifiedScriptFrame:Clone()
- Script = MainFrame.ScriptListFrame.Scripts.ScriptFrame:Clone()
- MainFrame.ScriptListFrame.Scripts.ScriptFrame:Destroy()
- MainFrame.ScriptListFrame.Scripts.VerifiedScriptFrame:Destroy()
- Comment = MainFrame.InfoBox.Comments.Inner.Comments.Comment:Clone()
- MainFrame.InfoBox.Comments.Inner.Comments.Comment:Destroy()
- function _if(a, b, c)
- if a then return b else return c end
- end
- function fastmodeExec(func)
- if getgenv().fastmode == true then
- task.spawn(func)
- else
- func()
- end
- end
- function fetchScripts(query, page)
- page = page or 1
- query = HttpService:UrlEncode(query)
- url = _if(query == "", "https://www.scriptblox.com/api/script/fetch?page="..tostring(page), "https://scriptblox.com/api/script/search?q="..query.."&max=100&mode=free&page=".. tostring(page))
- req = HttpService:JSONDecode(game:HttpGetAsync(url)).result
- return req.scripts
- end
- function fetchComments(scriptId, page)
- page = page or 1
- url = "https://scriptblox.com/api/comment/" ..scriptId.. "?page=" ..tostring(page).. "&max=100"
- req = HttpService:JSONDecode(game:HttpGetAsync(url)).result
- return req.comments
- end
- function fixScript(scriptObj)
- req = HttpService:JSONDecode(game:HttpGetAsync("https://www.scriptblox.com/api/script/"..scriptObj.slug)).script
- scriptObj["script"] = _if(scriptObj["script"], scriptObj["script"], req.script)
- scriptObj["features"] = _if(scriptObj["features"], scriptObj["features"], req.features)
- scriptObj["owner"] = _if(scriptObj["owner"], scriptObj["owner"], req.owner)
- return scriptObj
- end
- function updateInfoBox(scriptObj)
- scriptObj = fixScript(scriptObj)
- commentsUIListLayout = MainFrame.InfoBox.Comments.Inner.Comments.UIListLayout:Clone()
- MainFrame.InfoBox.Comments.Inner.Comments:ClearAllChildren()
- commentsUIListLayout.Parent = MainFrame.InfoBox.Comments.Inner.Comments
- task.spawn(function()
- for _, v in pairs(fetchComments(scriptObj["_id"])) do
- newComment = Comment:Clone()
- newComment.Parent = MainFrame.InfoBox.Comments.Inner.Comments
- newComment.Content.Text = v.text
- newComment.Author.Text = v.commentBy.username
- end
- end)
- end
- function refreshScripts(scriptTbl)
- if #scriptTbl <= 0 then
- end
- UIGridLayoutCopy = Scripts.UIGridLayout:Clone()
- Scripts:ClearAllChildren()
- UIGridLayoutCopy.Parent = Scripts
- addScripts(scriptTbl)
- end
- function addScripts(scriptTbl)
- for i, v in pairs(scriptTbl) do
- fastmodeExec(function()
- local newScript
- v = fixScript(v)
- if v.verified == true then
- newScript = VerifiedScript:Clone()
- newScript.ScriptTitle.Text = v.title
- newScript.ScriptGame.Text = v.game.name
- newScript.Parent = Scripts
- else
- newScript = Script:Clone()
- newScript.ScriptTitle.Text = v.title
- newScript.ScriptGame.Text = v.game.name
- newScript.Parent = Scripts
- end
- if v.game.name == "Universal Script 📌" then
- newScript.PreviewImage.Image = "rbxassetid://17899810755"
- else
- newScript.PreviewImage.Image = "https://assetgame.roblox.com/Game/Tools/ThumbnailAsset.ashx?aid="..v.game.gameId.."&fmt=png&wd=420&ht=420"
- end
- if v.key == true then
- newScript.KeySystem.Visible = true
- end
- newScript.ExecuteButton.MouseButton1Click:Connect(function()
- loadstring(v.script)()
- end)
- newScript.CopyScriptButton.MouseButton1Click:Connect(function()
- setclipboard(v.script)
- end)
- newScript.PreviewImage.MouseEnter:Connect(function()
- updateInfoBox(v)
- end)
- end)
- end
- pagefetchrunning = false
- end
- SearchBox.FocusLost:Connect(function(enterPressed)
- if enterPressed then
- gquery = SearchBox.Text
- page = 1
- local scriptsTbl = fetchScripts(SearchBox.Text, 1)
- refreshScripts(scriptsTbl)
- end
- end)
- refreshScripts(fetchScripts(gquery, 1))
- ScriptListFrame:GetPropertyChangedSignal("CanvasPosition"):Connect(function()
- if (ScriptListFrame.CanvasPosition.Y + ScriptListFrame.AbsoluteSize.Y) >= ScriptListFrame.AbsoluteCanvasSize.Y -200 and not pagefetchrunning then
- page = page + 1
- pagefetchrunning = true
- addScripts(fetchScripts(gquery, page))
- end
- end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement