Naming System Help?!

So Im trying to set up a naming system but I want the people with the Gamepass to have a VIP Above their name! Please help

local passId = 180687284 -- change this to your game pass ID.
function isAuthenticated(player) -- checks to see if the player owns your pass
    return game:GetService("GamePassService"):PlayerHasPass(player, passId)
end


 -- game pass
local groupID = 1178831;
local before_name = false;
local ts = tostring
game.Players.PlayerAdded:connect(function(player)
repeat wait() until player.Character
    local char = player.Character
    getRole(player)
    player.Changed:connect(function()
        repeat wait() until player.Character
            wait()
            getRole(player)
    end)
end)
--VIP
--VIP
--VIP
game.Players.PlayerAdded:connect(function(plr, s)
    local gui = script.Title
    local clone = gui:Clone()
    clone.Parent = p.Character.Head


if isAuthenticated(plr) then
        print(plr.Name .. " has bought the game pass with id " .. passId)
        clone.F.T.Text = plr.Name..", VIP "..s 

    end
end)
--VIP
--VIP
--VIP
function createTitle(p, s)
    local gui = script.Title
    local clone = gui:Clone()
    clone.Parent = p.Character.Head
    if before_name then
        clone.F.T.Text = s.." "..p.Name
    else
        clone.F.T.Text = p.Name..", "..s
    end
end

function getRole(player)
    player.Character.Humanoid.NameOcclusion = "OccludeAll"
    if player.Character.Head:findFirstChild("Title") then
        return false
    elseif not player.Character.Head:findFirstChild("Title") and player:IsInGroup(groupID) then
        local rankString = player:GetRoleInGroup(groupID)
        createTitle(player, rankString)
    elseif not player:IsInGroup(groupID) then
        createTitle(player, "Guest")
    end
end