Why wont these dev products work?
I am trying to make a GUI that sells dev products. In this case, i am trying to make it give you a certain amount of Credits (250) after purchasing a dev product. I can't seem to find the problem here... Can anyone help?
01 | -- setup local variables |
02 | local MarketplaceService = Game:GetService("MarketplaceService") |
03 | local ds = game:GetService("DataStoreService"):GetDataStore("PurchaseHistory") |
04 | local productId = 20768662 |
05 |
06 | -- define function that will be called when purchase finished |
07 | MarketplaceService.ProcessReceipt = function(receiptInfo) |
08 |
09 | -- find the player based on the PlayerId in receiptInfo |
10 | for i, player in ipairs(game.Players:GetChildren()) do |
11 | if player.userId == receiptInfo.PlayerId then |
12 |
13 | -- check which product was purchased |
14 | if receiptInfo.ProductId == productId then |
15 | --handle purchase. In this case we are highering the player's Credits value |
0
0
3 answers
You didn't define player.
Whenever you see that kind of error, remember that it means you have to define it. It doesn't know what plr is
Here put this code in a script then put the script in StarterPack:
01 | local MarketplaceService = Game:GetService("MarketplaceService") |
02 | local ds = game:GetService("DataStoreService"):GetDataStore("PurchaseHistory") |
03 |
04 | CASHID = 00000000 -- Put the Developer Product ID here and erase the 0's |
05 |
06 | MarketplaceService.ProcessReceipt = function(receiptInfo) |
07 | local playerProductKey = "player_" .. receiptInfo.PlayerId .. "_product_" .. receiptInfo.ProductId |
08 | local numberBought = ds:IncrementAsync(playerProductKey, 1) |
09 | for i,v in pairs (game.Players:GetChildren()) do |
10 | if v.userId == receiptInfo.PlayerId then |
11 | if receiptInfo.ProductId == CASHID then |
12 |
13 |
14 | lds = v:FindFirstChild("leaderstats") |
15 | if lds ~= nil then |
Don't forget to say this answered you and give it a thumbs up because I am working for a good reputation!
On line 16 change plr to player. Plr is nil to the script since it was never defined.
And add to line 19 or else the player will get credits on entry. return Enum.ProductPurchaseDecision.PurchaseGranted
Please refrain from reposting this question.
Any errors, just comment on this answer.
01 | -- setup local variables |
02 | local MarketplaceService = Game:GetService("MarketplaceService") |
03 | local ds = game:GetService("DataStoreService"):GetDataStore("PurchaseHistory") |
04 | local productId = 20768662 |
05 |
06 | -- define function that will be called when purchase finished |
07 | MarketplaceService.ProcessReceipt = function(receiptInfo) |
08 |
09 | -- find the player based on the PlayerId in receiptInfo |
10 | for i, player in ipairs(game.Players:GetChildren()) do |
11 | if player.userId == receiptInfo.PlayerId then |
12 |
13 | -- check which product was purchased |
14 | if receiptInfo.ProductId == productId then |
15 | --handle purchase. In this case we are highering the player's Credits value |
0
0
0
0
0