Documentation

local HttpService = game:GetService("HttpService")
local MarketplaceService = game:GetService("MarketplaceService")

local API_URL: string = "https://your-app.vercel.app/api/make-buy"
local API_KEY: string = "rdb_your_key_here"

export type ItemType = "Gamepass" | "DeveloperProduct"

type PurchaseData = {
    userId: string,
    productId: string,
    gamepassId: string?,
    isAGift: boolean,
    gifterId: string?,
    amount: number,
    universeId: string,
    placeId: string,
    transactionId: string,
    timestamp: string,
    itemType: ItemType,
}

local function recordPurchase(
    player: Player,
    productId: string,
    amount: number,
    itemType: ItemType,
    gamepassId: string?
)
    local data: PurchaseData = {
        userId = tostring(player.UserId),
        productId = productId,
        gamepassId = gamepassId,
        isAGift = false,
        gifterId = nil,
        amount = amount,
        universeId = tostring(game.GameId),
        placeId = tostring(game.PlaceId),
        transactionId = HttpService:GenerateGUID(false),
        timestamp = os.date("!%Y-%m-%dT%H:%M:%SZ"),
        itemType = itemType,
    }

    local success: boolean, response = pcall(function()
        return HttpService:RequestAsync({
            Url = API_URL,
            Method = "POST",
            Headers = {
                ["Content-Type"] = "application/json",
                ["X-API-KEY"] = API_KEY
            },
            Body = HttpService:JSONEncode(data)
        })
    end)

    if success then
        print("[Hoorks] Purchase recorded:", response.StatusCode)
    else
        warn("[Hoorks] Failed to record purchase:", response)
    end
end

-- Gamepass purchase callback
MarketplaceService.PromptGamePassPurchaseFinished:Connect(
    function(player: Player, gamepassId: number, wasPurchased: boolean)
        if not wasPurchased then return end
        local info = MarketplaceService:GetProductInfo(gamepassId, Enum.InfoType.GamePass)
        recordPurchase(
            player,
            info.Name or tostring(gamepassId),
            info.PriceInRobux or 0,
            "Gamepass",
            tostring(gamepassId)
        )
    end
)

-- Developer Product purchase callback
MarketplaceService.ProcessReceipt = function(receiptInfo: {
    PlayerId: number,
    ProductId: number,
    PurchaseId: string,
})
    local player: Player? = game:GetService("Players"):GetPlayerByUserId(receiptInfo.PlayerId)
    if not player then return Enum.ProductPurchaseDecision.NotProcessedYet end

    local info = MarketplaceService:GetProductInfo(receiptInfo.ProductId, Enum.InfoType.Product)
    recordPurchase(
        player,
        info.Name or tostring(receiptInfo.ProductId),
        info.PriceInRobux or 0,
        "DeveloperProduct",
        nil
    )

    return Enum.ProductPurchaseDecision.PurchaseGranted
end