Доступ к готовым решениям

Переход в группу "Пользователь"

300.00
Одноразовый платёж
Быстрый переход в группу "Пользователи", без надобности написания постов и ожидания.

Покупка дает возможность:
Быть полноправным участником форума
Нормальное копирование кода
Создавать темы
Скачивать файлы
Доступ к архиву Pawno-Info

Мануал VIP-Система.

Статус
В этой теме нельзя размещать новые ответы.

#ValutionShow

Начинающий
Регистрация
17 Ноя 2016
Сообщения
89
Лучшие ответы
0
Репутация
8
Добрый день пользователи и гости форума Pawno-Info
Хочу предоставить вам систему VIP-Игроков.
На понадобится командный процессор: DC_CMD
Первым делом добавляем член Перечисления'

enum PDATA
{
pVip,
}
Далее добавляем VIP-Чат.


CMD:vipchat(playerid, params[])
{
if(!pData[playerid][pVip]) SendClientMessage(playerid, CRED, "[Ошибка]"{"#cWHITE"} Вы не VIP игрок");
new mes[128];
if(sscanf(params, "s[128]", params[0])) return SendClientMessage(playerid, CYELLOW, "[Подсказка]{"#cWHITE"} /vipchat [текст]");
format(mes,sizeof(mes),"%s[%i]: {FFFFFF}%s", vip, pData[playerid][pNickname], playerid, params[0]);
AdminChat(0x0xCC3300,mes);
return true;
}

В команду CMD:pAY(playerid, params[])
Добавляем:

switch(pData[playerid][pVip])
{
case 1:
{
if(params[1] < 1 || params[1] > 50000) return SendClientMessage(playerid, CRED, "x {AC0000}[Ошибка] "W"Можно передавать от 1 до 50.000$");
}
case 2:
{
if(params[1] < 1 || params[1] > 100000) return SendClientMessage(playerid, CRED, "x {AC0000}[Ошибка] "W"Можно передавать от 1 до 100.000$");
}
case 3:
{
if(params[1] < 1 || params[1] > 150000) return SendClientMessage(playerid, CRED, "x {AC0000}[Ошибка] "W"Можно передавать от 1 до 150.000$");
}

Сам [AdminChat]​
stock AdminChat(color,mes[])
{
for(new i;i<MAX_PLAYERS;i++)
{
if(!IsPlayerConnected(i) || !pData[pVip]) continue;
SendClientMessage(i,color,mes);
}
}

В принципе все! Если помог поставьте +, если что-то нужно будет доработать пишите комментарии.​
 
Последнее редактирование:
Статус
В этой теме нельзя размещать новые ответы.
Сверху Снизу