Scripting Helpers is winding down operations and is now read-only. More info→

I am trying to make this give out a badge when youwin the mega jackpot but it wont give it out?

Asked by

2 years ago

01`machine.SuperJPSensor.Touched:Connect(function(hit) -- Registers the ball reaching the Mega Jackpot hole
02    if hit.Name == "Neptune_Ball" then
03        muteMusic()
04        local BadgeService = game:GetService("BadgeService")
05 
06        local function awardBadge(player, badgeId)
07            -- Fetch badge information
08            local success, badgeInfo = pcall(function()
09                return BadgeService:GetBadgeInfoAsync(badgeId)
10            end)
11 
12            if success then
13                -- Confirm that badge can be awarded
14                if badgeInfo.IsEnabled then
15                    -- Award badge
16                    local success, result = pcall(function()
17                        return AwardBadge(game.Players:FindFirstChild(machine.CardReader.GameInfo.Player.Value), 2126911393)
18                    end)
19 
20                    if not success then
21                        -- the AwardBadge function threw an error
22                        warn("Error while awarding badge:", result)
23                    elseif not result then
24                        -- the AwardBadge function did not award a badge
25                        warn("Failed to award badge.")
26                    end
27                end
28            else
29 
30        warn("Error while fetching badge info: " .. badgeInfo)
31            end
32        end
33        machine.Particle.ParticleEmitter.Enabled = true
34        sounds.MonsterJackpot2:Play()
35        wait(2)
36        sounds.MonsterDropMonsterJackpotSong:Play()
37        ticketOut(machine.MegaJackpotScreen.Value.Value)
38        for i = 1, 200 do
39            machine.MegaJackpotScreen.SurfaceGui.Enabled = true
40            for _,a in pairs(SideLights:GetChildren()) do a.SurfaceLight.Enabled = true; a.Material = Enum.Material.Neon end
41            wait(0.1)
42            for _,a in pairs(SideLights:GetChildren()) do a.SurfaceLight.Enabled = false; a.Material = Enum.Material.SmoothPlastic end
43            machine.MegaJackpotScreen.SurfaceGui.Enabled = false
44            wait(0.1)
45        end
46        machine.MegaJackpotScreen.Value.Value = MegaJPDefault
47        for _,a in pairs(SideLights:GetChildren()) do a.SurfaceLight.Enabled = true; a.Material = Enum.Material.Neon end
48        for i = 2, 0, -0.2 do
49            sounds.MonsterJackpot2.Volume = i
50            wait(0.1)
51        end
52        sounds.MonsterDropMonsterJackpotSong:Stop()
53        machine.Particle.ParticleEmitter.Enabled = false
54    end
55end)`
 View all 55 lines...

game.Players:FindFirstChild(machine.CardReader.GameInfo.Player.Value is the player playing the game

You could just use a teleport script to teleport them to a part that gives badge on touch. That would make it easier probably VipDanT 10 — 2y

That would be stupid because you get 5 plays per swipe cbeebiespoo -5 — 2y

I have fixed my answer sleazel 1287 — 2y

1 answer

Answered by

sleazel 1287

2 years ago

Edited 2 years ago

So You are declaring the awardBadge function (with the lowercase a), but You never call it. On top of that it is rather unfeasible to declare it inside the anonymous touched function. Do not nest function declarations, unless You really really know what You are doing.

The second problem is at the AwardBadge call (with the upppercase A). AwardBadge is the function of BadgeService and should be called like this BadgeService:AwardBadge(...)

Here is Your script:

01local BadgeService = game:GetService("BadgeService")
02 
03local function awardBadge(player, badgeId)
04            -- Fetch badge information
05            local success, badgeInfo = pcall(function()
06                return BadgeService:GetBadgeInfoAsync(badgeId)
07            end)
08 
09            if success then
10                -- Confirm that badge can be awarded
11                if badgeInfo.IsEnabled then
12                    -- Award badge
13                    local success, result = pcall(function()
14                        return BadgeService:AwardBadge(player,badgeId) --use passed arguments
15                    end)
16 
17                    if not success then
18                        -- the AwardBadge function threw an error
19                        warn("Error while awarding badge:", result)
20                    elseif not result then
21                        -- the AwardBadge function did not award a badge
22                        warn("Failed to award badge.")
23                    end
24                end
25            else
26 
27        warn("Error while fetching badge info: " .. badgeInfo)
28            end
29end
30 
31 
32machine.SuperJPSensor.Touched:Connect(function(hit) -- Registers the ball reaching the Mega Jackpot hole
33    if hit.Name == "Neptune_Ball" then
34        muteMusic()
35    --add this line, and pass arguments here
36--error fixed
37    awardBadge(game.Players:FindFirstChild(machine.CardReader.GameInfo.Player.Value), 2126911393) 
38       machine.Particle.ParticleEmitter.Enabled = true
39        sounds.MonsterJackpot2:Play()
40        wait(2)
41        sounds.MonsterDropMonsterJackpotSong:Play()
42        ticketOut(machine.MegaJackpotScreen.Value.Value)
43        for i = 1, 200 do
44            machine.MegaJackpotScreen.SurfaceGui.Enabled = true
45            for _,a in pairs(SideLights:GetChildren()) do a.SurfaceLight.Enabled = true; a.Material = Enum.Material.Neon end
46            wait(0.1)
47            for _,a in pairs(SideLights:GetChildren()) do a.SurfaceLight.Enabled = false; a.Material = Enum.Material.SmoothPlastic end
48            machine.MegaJackpotScreen.SurfaceGui.Enabled = false
49            wait(0.1)
50        end
51        machine.MegaJackpotScreen.Value.Value = MegaJPDefault
52        for _,a in pairs(SideLights:GetChildren()) do a.SurfaceLight.Enabled = true; a.Material = Enum.Material.Neon end
53        for i = 2, 0, -0.2 do
54            sounds.MonsterJackpot2.Volume = i
55            wait(0.1)
56        end
57        sounds.MonsterDropMonsterJackpotSong:Stop()
58        machine.Particle.ParticleEmitter.Enabled = false
59    end
60end)
 View all 60 lines...

This code is a bit messy, so idk it it will work. And Ceebeebies is not poo, I LOVE it :)

the celebration works just wont hand the badge out cbeebiespoo -5 — 2y

I am trying to make this give out a badge when youwin the mega jackpot but it wont give it out?

1 answer

Answer this question