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

How do I let players w/ higher tiered VIPs go into VIP rooms for lower tiered VIPs?

Asked by

7 years ago

I'm having trouble making a system where a player w/ a high tier VIP game pass is able to go into a room that's accessible to lower tiered VIPs.

Example: Let's say a player bought a VIP game pass that's called Mega VIP. That player who bought Mega VIP should also get access to the VIP tier below Mega VIP, called Normal VIP.

How would I let the player that bought Mega VIP also get access to Normal VIP which is a "lower tier" than Mega VIP? (Hope I didn't sound too redundant with this question.)

Here's my script: (Does not work)

01local Config = script.Parent.Configuration
02local Gamepass = Config.GamepassId.Value
03local Group = Config.GroupId.Value
04local Gamepass2 = Config.GamepassId2.Value
05local Kill = Config.KillOnTouch.Value
06 
07local Door = script.Parent.Door
08 
09Door.Transparency = 0
10Door.CanCollide = true
11 
12function AllowedIn(Player)
13    if Player.userId == 0 then
14        return false
15    elseif Gamepass or Gamepass2 > 0 then
16        if game.MarketplaceService:PlayerOwnsAsset(Player,Gamepass or Gamepass2) then
17            return true
18        end
19    elseif Group > 0 then
20        if Player:IsInGroup(Group) then
21            return true
22        end
23    end
24    return false
25end
26 
27local Debounce = true
28 
29Door.Touched:connect(function(hit)
30    if hit.Parent:FindFirstChild("Humanoid") then
31        local Player = game.Players:GetPlayerFromCharacter(hit.Parent)
32        if Player and Debounce then
33            Debounce = false
34            if AllowedIn(Player) then
35                Door.CanCollide = false
36                Door.Transparency = 0.5
37                spawn(function()
38                    wait(1.5)
39                    Door.CanCollide = true
40                    Door.Transparency = 0
41                end)
42            else
43                if Gamepass or Gamepass2 > 0 then
44                    game.MarketplaceService:PromptPurchase(Player,Gamepass)
45                end
46                if Kill then
47                    hit.Parent.Humanoid.Health = 0
48                    local Explosion = Instance.new("Explosion",workspace)
49                    Explosion.BlastPressure = 0
50                    Explosion.Position = hit.Position
51                else
52                    if hit.Parent:FindFirstChild("Torso") then
53                        hit.Parent.Torso.Velocity = Door.CFrame.lookVector * 150
54                    end
55                end
56            end
57            wait(0.3)
58            Debounce = true
59        end
60    end
61end)
 View all 61 lines...

1 answer

Answered by

TheDeadlyPanther 2460

7 years ago

Edited 7 years ago

I cleaned up your code and made it a bit easier to understand with comments and general style. I changed it from more of a manual system to a bit more automatic in terms of creating the AllowedIn function.

The general way my changes work is that they check if the VIP level of a player is bigger than or equal to the level of a door. The majority of the changed code is simply setting it up, as the actual checking of the level is very simple!

01local Pass1 = 0000 -- VIP
02local Pass2 = 0000 -- Mega VIP
03local Group = 0000
04 
05local Marketplace = game:GetService("MarketplaceService")
06local PlayerLevels = {} -- easy to access table of VIP levels
07 
08game.Players.PlayerAdded:connect(function(Player) -- this function assigns the VIP level of a player
09    local Level = 0
10 
11    if Player:IsInGroup(Group) then
12        Level = 3 -- make sure the levels descend
13    elseif Marketplace:PlayerOwnsAsset(Player,Pass2) then -- do these in descending order of tier
14        Level = 2
15    elseif Marketplace:PlayerOwnsAsset(Player,Pass1) then
16        Level = 1
17    end
18 
19    PlayerLevels[Player.UserId] = Level -- Sets the value
20end)
21 
22local function AllowedIn(Player,MinLevel) -- MinLevel is the minimum VIP level required to enter
23    if PlayerLevels[Player.UserId] >= MinLevel then -- the `Table[Index]` is a way of getting a value in a table similar to searching a library for a book with a specific name
24        return true
25    else
26        return false
27    end
28end
29 
30local Debounce = true
31Door.Touched:connect(function(Hit)
32    local Player = game.Players:GetPlayerFromCharacter(Hit.Parent) or game.Players:GetPlayerFromCharacter(Hit.Parent.Parent) -- R15 compatible
33    if not Player or not Debounce then return end -- Finish if player wasn't found or debounce is happening
34 
35    if AllowedIn(Player,1) then -- Assuming this is a VIP door
36        Debounce = false
37        Door.CanCollide = false
38        Door.Transparency = 0.5
39    else
40        Marketplace:PromptPurchase(Player,Gamepasses1) -- assuming this is a VIP door
41        -- Kill stuff
42    end
43 
44    wait(1.5)
45    Door.CanCollide = true
46    Door.Transparency = 0
47    Debounce = true
48end)
 View all 48 lines...

Anything you don't understand? Please tell me :) Hope I could help!

~TDP

How do I let players w/ higher tiered VIPs go into VIP rooms for lower tiered VIPs?

1 answer

Answer this question