
Keyless

local cloneref = cloneref or function(v) return v end
local MarketplaceService = cloneref(game:GetService("MarketplaceService"))
local Players = cloneref(game:GetService("Players"))
local CoreGui = cloneref(game:GetService("CoreGui"))
local player = Players.LocalPlayer
local screenGui = Instance.new("ScreenGui", CoreGui)
screenGui.ResetOnSpawn = false
screenGui.IgnoreGuiInset = true
local frame = Instance.new("Frame", screenGui)
frame.Size = UDim2.new(0, 400, 0, 350)
frame.Position = UDim2.new(0.5, -200, 0.5, -175)
frame.BackgroundColor3 = Color3.fromRGB(25, 25, 25)
frame.BackgroundTransparency = 0.15
frame.Active = true
frame.Draggable = true
local title = Instance.new("TextLabel", frame)
title.Size = UDim2.new(1, 0, 0, 30)
title.BackgroundColor3 = Color3.fromRGB(35, 35, 35)
title.Text = "Products Fetcher"
title.TextColor3 = Color3.new(1, 1, 1)
title.Font = Enum.Font.GothamBold
title.TextScaled = true
local scroll = Instance.new("ScrollingFrame", frame)
scroll.Size = UDim2.new(1, 0, 1, -30)
scroll.Position = UDim2.new(0, 0, 0, 30)
scroll.CanvasSize = UDim2.new(0, 0, 0, 0)
scroll.ScrollBarThickness = 6
scroll.BackgroundTransparency = 1
local uiList = Instance.new("UIListLayout", scroll)
uiList.Padding = UDim.new(0, 6)
uiList.FillDirection = Enum.FillDirection.Vertical
uiList.SortOrder = Enum.SortOrder.LayoutOrder
uiList:GetPropertyChangedSignal("AbsoluteContentSize"):Connect(function()
scroll.CanvasSize = UDim2.new(0, 0, 0, uiList.AbsoluteContentSize.Y + 10)
end)
local function addProduct(info)
local button = Instance.new("TextButton", scroll)
button.Size = UDim2.new(1, -10, 0, 60)
button.BackgroundColor3 = Color3.fromRGB(50, 50, 50)
button.Text = ""
button.AutoButtonColor = true
local icon = Instance.new("ImageLabel", button)
icon.Size = UDim2.new(0, 60, 1, 0)
icon.Image = "rbxassetid://" .. (info.IconImageAssetId or 0)
icon.BackgroundTransparency = 1
local nameLabel = Instance.new("TextLabel", button)
nameLabel.Size = UDim2.new(1, -70, 0.5, 0)
nameLabel.Position = UDim2.new(0, 70, 0, 0)
nameLabel.BackgroundTransparency = 1
nameLabel.Text = info.Name
nameLabel.TextColor3 = Color3.fromRGB(255, 255, 255)
nameLabel.TextXAlignment = Enum.TextXAlignment.Left
nameLabel.Font = Enum.Font.GothamBold
nameLabel.TextScaled = true
local priceLabel = Instance.new("TextLabel", button)
priceLabel.Size = UDim2.new(1, -70, 0.5, 0)
priceLabel.Position = UDim2.new(0, 70, 0.5, 0)
priceLabel.BackgroundTransparency = 1
priceLabel.Text = info.PriceInRobux and (tostring(info.PriceInRobux) .. " R$") or "Not On Sale"
priceLabel.TextColor3 = Color3.fromRGB(0, 255, 0)
priceLabel.TextXAlignment = Enum.TextXAlignment.Left
priceLabel.Font = Enum.Font.Gotham
priceLabel.TextScaled = true
button.MouseButton1Click:Connect(function()
if info.PriceInRobux then
local success = pcall(function()
MarketplaceService:PromptProductPurchase(player, info.ProductId)
end)
if not success then
setclipboard("https://www.roblox.com/library/" .. tostring(info.ProductId))
end
else
setclipboard("https://www.roblox.com/library/" .. tostring(info.ProductId))
end
end)
end
local function loadProducts()
local pages
local ok = pcall(function()
pages = MarketplaceService:GetDeveloperProductsAsync()
end)
if not ok or not pages then
local lbl = Instance.new("TextLabel", scroll)
lbl.Size = UDim2.new(1, -10, 0, 40)
lbl.BackgroundTransparency = 1
lbl.Text = "Failed to fetch products."
lbl.TextColor3 = Color3.fromRGB(255, 0, 0)
lbl.Font = Enum.Font.GothamBold
lbl.TextScaled = true
return
end
local foundAny = false
while true do
local currentPage = pages:GetCurrentPage()
if currentPage and #currentPage > 0 then
for _, prod in ipairs(currentPage) do
local info = MarketplaceService:GetProductInfo(prod.ProductId, Enum.InfoType.Product)
addProduct(info)
foundAny = true
end
end
if pages.IsFinished then break end
local success = pcall(function()
pages:AdvanceToNextPage()
end)
if not success then break end
end
if not foundAny then
local lbl = Instance.new("TextLabel", scroll)
lbl.Size = UDim2.new(1, -10, 0, 40)
lbl.BackgroundTransparency = 1
lbl.Text = "No products found."
lbl.TextColor3 = Color3.fromRGB(255, 255, 255)
lbl.Font = Enum.Font.GothamBold
lbl.TextScaled = true
end
end
loadProducts()



Not working
doesn't work
Never make script again brother🤣✌️