Loading...
Loading...
Compare original and translation side by side
MarketplaceService:UserOwnsGamePassAsync()MarketplaceService:UserOwnsGamePassAsync()-- ServerStorage/Modules/PassManager.lua
local MarketplaceService = game:GetService("MarketplaceService")
local Players = game:GetService("Players")
local PassManager = {}
-- Centralized pass ID registry — change here, not scattered across codebase
local PASS_IDS = {
VIP = 123456789,
DoubleXP = 987654321,
ExtraLives = 111222333,
}
-- Cache ownership to avoid excessive API calls
local ownershipCache: {[number]: {[string]: boolean}} = {}
function PassManager.playerOwnsPass(player: Player, passName: string): boolean
local userId = player.UserId
if not ownershipCache[userId] then
ownershipCache[userId] = {}
end
if ownershipCache[userId][passName] == nil then
local passId = PASS_IDS[passName]
if not passId then
warn("[PassManager] Unknown pass:", passName)
return false
end
local success, owns = pcall(MarketplaceService.UserOwnsGamePassAsync,
MarketplaceService, userId, passId)
ownershipCache[userId][passName] = success and owns or false
end
return ownershipCache[userId][passName]
end
-- Prompt purchase from client via RemoteEvent
function PassManager.promptPass(player: Player, passName: string): ()
local passId = PASS_IDS[passName]
if passId then
MarketplaceService:PromptGamePassPurchase(player, passId)
end
end
-- Wire purchase completion — update cache and apply benefits
function PassManager.init(): ()
MarketplaceService.PromptGamePassPurchaseFinished:Connect(
function(player: Player, passId: number, wasPurchased: boolean)
if not wasPurchased then return end
-- Invalidate cache so next check re-fetches
if ownershipCache[player.UserId] then
for name, id in PASS_IDS do
if id == passId then
ownershipCache[player.UserId][name] = true
end
end
end
-- Apply immediate benefit
applyPassBenefit(player, passId)
end
)
end
return PassManager-- ServerStorage/Modules/PassManager.lua
local MarketplaceService = game:GetService("MarketplaceService")
local Players = game:GetService("Players")
local PassManager = {}
-- 集中式通行证ID注册表——在此处修改,不要分散在代码库中
local PASS_IDS = {
VIP = 123456789,
DoubleXP = 987654321,
ExtraLives = 111222333,
}
-- 缓存所有权以避免过多API调用
local ownershipCache: {[number]: {[string]: boolean}} = {}
function PassManager.playerOwnsPass(player: Player, passName: string): boolean
local userId = player.UserId
if not ownershipCache[userId] then
ownershipCache[userId] = {}
end
if ownershipCache[userId][passName] == nil then
local passId = PASS_IDS[passName]
if not passId then
warn("[PassManager] Unknown pass:", passName)
return false
end
local success, owns = pcall(MarketplaceService.UserOwnsGamePassAsync,
MarketplaceService, userId, passId)
ownershipCache[userId][passName] = success and owns or false
end
return ownershipCache[userId][passName]
end
-- 通过RemoteEvent从客户端触发购买提示
function PassManager.promptPass(player: Player, passName: string): ()
local passId = PASS_IDS[passName]
if passId then
MarketplaceService:PromptGamePassPurchase(player, passId)
end
end
-- 绑定购买完成事件——更新缓存并应用权益
function PassManager.init(): ()
MarketplaceService.PromptGamePassPurchaseFinished:Connect(
function(player: Player, passId: number, wasPurchased: boolean)
if not wasPurchased then return end
-- 使缓存失效,以便下次检查重新获取
if ownershipCache[player.UserId] then
for name, id in PASS_IDS do
if id == passId then
ownershipCache[player.UserId][name] = true
end
end
end
-- 立即应用权益
applyPassBenefit(player, passId)
end
)
end
return PassManager-- ServerStorage/Modules/DailyRewardSystem.lua
local DataStoreService = game:GetService("DataStoreService")
local DailyRewardSystem = {}
local rewardStore = DataStoreService:GetDataStore("DailyRewards_v1")
-- Reward ladder — index = day streak
local REWARD_LADDER = {
{coins = 50, item = nil}, -- Day 1
{coins = 75, item = nil}, -- Day 2
{coins = 100, item = nil}, -- Day 3
{coins = 150, item = nil}, -- Day 4
{coins = 200, item = nil}, -- Day 5
{coins = 300, item = nil}, -- Day 6
{coins = 500, item = "badge_7day"}, -- Day 7 — week streak bonus
}
local SECONDS_IN_DAY = 86400
function DailyRewardSystem.claimReward(player: Player): (boolean, any)
local key = "daily_" .. player.UserId
local success, data = pcall(rewardStore.GetAsync, rewardStore, key)
if not success then return false, "datastore_error" end
data = data or {lastClaim = 0, streak = 0}
local now = os.time()
local elapsed = now - data.lastClaim
-- Already claimed today
if elapsed < SECONDS_IN_DAY then
return false, "already_claimed"
end
-- Streak broken if > 48 hours since last claim
if elapsed > SECONDS_IN_DAY * 2 then
data.streak = 0
end
data.streak = (data.streak % #REWARD_LADDER) + 1
data.lastClaim = now
local reward = REWARD_LADDER[data.streak]
-- Save updated streak
local saveSuccess = pcall(rewardStore.SetAsync, rewardStore, key, data)
if not saveSuccess then return false, "save_error" end
return true, reward
end
return DailyRewardSystem-- ServerStorage/Modules/DailyRewardSystem.lua
local DataStoreService = game:GetService("DataStoreService")
local DailyRewardSystem = {}
local rewardStore = DataStoreService:GetDataStore("DailyRewards_v1")
-- 奖励阶梯——索引 = 连续登录天数
local REWARD_LADDER = {
{coins = 50, item = nil}, -- 第1天
{coins = 75, item = nil}, -- 第2天
{coins = 100, item = nil}, -- 第3天
{coins = 150, item = nil}, -- 第4天
{coins = 200, item = nil}, -- 第5天
{coins = 300, item = nil}, -- 第6天
{coins = 500, item = "badge_7day"}, -- 第7天——连续一周奖励
}
local SECONDS_IN_DAY = 86400
function DailyRewardSystem.claimReward(player: Player): (boolean, any)
local key = "daily_" .. player.UserId
local success, data = pcall(rewardStore.GetAsync, rewardStore, key)
if not success then return false, "datastore_error" end
data = data or {lastClaim = 0, streak = 0}
local now = os.time()
local elapsed = now - data.lastClaim
-- 今日已领取奖励
if elapsed < SECONDS_IN_DAY then
return false, "already_claimed"
end
-- 若距离上次领取超过48小时,连续登录 streak 中断
if elapsed > SECONDS_IN_DAY * 2 then
data.streak = 0
end
data.streak = (data.streak % #REWARD_LADDER) + 1
data.lastClaim = now
local reward = REWARD_LADDER[data.streak]
-- 保存更新后的连续登录 streak
local saveSuccess = pcall(rewardStore.SetAsync, rewardStore, key, data)
if not saveSuccess then return false, "save_error" end
return true, reward
end
return DailyRewardSystemundefinedundefinedundefinedundefined-- Log key player events for retention analysis
-- Use AnalyticsService (Roblox's built-in, no third-party required)
local AnalyticsService = game:GetService("AnalyticsService")
local function trackEvent(player: Player, eventName: string, params: {[string]: any}?)
-- Roblox's built-in analytics — visible in Creator Dashboard
AnalyticsService:LogCustomEvent(player, eventName, params or {})
end
-- Track onboarding completion
trackEvent(player, "OnboardingCompleted", {time_seconds = elapsedTime})
-- Track first purchase
trackEvent(player, "FirstPurchase", {pass_name = passName, price_robux = price})
-- Track session length on leave
Players.PlayerRemoving:Connect(function(player)
local sessionLength = os.time() - sessionStartTimes[player.UserId]
trackEvent(player, "SessionEnd", {duration_seconds = sessionLength})
end)-- 记录关键玩家事件用于留存分析
-- 使用AnalyticsService(Roblox内置工具,无需第三方服务)
local AnalyticsService = game:GetService("AnalyticsService")
local function trackEvent(player: Player, eventName: string, params: {[string]: any}?)
-- Roblox内置分析工具——可在创作者控制台查看
AnalyticsService:LogCustomEvent(player, eventName, params or {})
end
-- 追踪新手引导完成情况
trackEvent(player, "OnboardingCompleted", {time_seconds = elapsedTime})
-- 追踪首次购买
trackEvent(player, "FirstPurchase", {pass_name = passName, price_robux = price})
-- 追踪玩家离开时的会话时长
Players.PlayerRemoving:Connect(function(player)
local sessionLength = os.time() - sessionStartTimes[player.UserId]
trackEvent(player, "SessionEnd", {duration_seconds = sessionLength})
end)ReplicatedStoragemath.random()ReplicatedStoragemath.random()AnalyticsService:LogCustomEvent()math.random()HttpService:PostAsync()AnalyticsService:LogCustomEvent()math.random()HttpService:PostAsync()Players:GetFriendsAsync()Players:GetRankInGroup()VoiceChatServicePlayers:GetFriendsAsync()Players:GetRankInGroup()VoiceChatService