customCheck = function(ply) return table.HasValue({"vip", "goldvip", "vadmin", "superadmin"}, ply:GetNWString("usergroup")) end,
        CustomCheckFailMsg = "You need to be VIP to become a F.B.I Director."