Sign in to follow this  
Followers 0
Mafin

[закрыто] Помогите сделать вип чат

12 posts in this topic

Я хочу сделать вип чат на свой сервер в сампе 

пробую переделать команду /a в /v типо /vipchat 

и не получается помогите пж

Заметка от Cawfee , создано

3.1. Заголовок темы должен отражать основную суть темы. Темы без информативного заголовка будут переименовываться, а автор может быть предупрежден (на усмотрение члена администрации). 

Устное предупреждение.

Share this post


Link to post
Share on other sites
Спойлер

}
CMD:v(playerid, params[])
{

    new     AntiSpamV
    if(PI[playerid][pVIP] < 5)
        return SCM(playerid, COLOR_RED, !"[Ошибка]{FFFFFF} Вип чат доступен только для Titan-Vip игроков!");

    if(PI[playerid][pVipChat])
        return SCM(playerid, COLOR_RED, !"[Ошибка]{FFFFFF} Вы выключили Vip чат!");

    if AntiSpamVR > Global_Time *then
        return SCM(playerid, COLOR_RED, !"[Ошибка]{FFFFFF}Не флудите подождите 1 секунду.");
        
    if(PI[playerid][pMuteTime])
        return SendMuteMessage(playerid);

    new text[145];
    if(sscanf(params, "s[145]", text))
        return SCM(playerid, COLOR_OLDRED, !"Используйте: /v [text]");

    if(IsADomen(text) && PI[playerid][pAdmin] < 6)
    {
        SCM(playerid, COLOR_RED, !"[Îøèáêà] {FFFFFF}Запрещается в таких сообщениях использование англ языка!");
        SCM(playerid, -1, !"Не выполняйте это действия во избежание наказания .");
        return 1;
    }

    if(IsAIP(text))
    {
        f(global_str, sizeof(global_str), "[Подозрение на рекламу] %s[%d]: [%s]", PN(playerid), playerid, text);
        SendAdminsMessage(COLOR_RED, global_str);
        return 0;
    }

    if(GetPVarInt(playerid, !"v") > Global_Time && !IsAFD(playerid))
    {
        f(global_str, 150, "[Ошибка]{FFFFFF} Для повторной отправки сообщения осталось 0:%d",GetPVarInt(playerid, !"v")-Global_Time);
        return SCM(playerid, COLOR_RED, global_str);
    }
    else if(!IsAFD(playerid)) if(PI[playerid][pVIP] == 6) SetPVarInt(playerid, !"v", Global_Time + 15); else SetPVarInt(playerid, !"v", Global_Time + 15);
    switch(PI[playerid][pVIP])
    {
        case 5: global_str = "{6495ED}[VIP]";
        case 6: global_str = "{F345FC}[PREMIUM]";
        case 8: f(global_str, 50, "%s",VipName[playerid]);
    }
    if !PI[playerid][pAdmin] *then f(global_str, 300, "%s{FFFFFF} %s[%d]{FFFFFF}: %s", global_str, PN(playerid), playerid, text);
    else if(PI[playerid][pAdmin]) f(global_str, 300, "{FCC645}[ADMIN]{FFFFFF} %s[%d]{FFFFFF}: %s", PN(playerid), playerid, text);
    SendVIPMessage(-1, global_str);
    AntiSpamV = Global_Time+1;
    return 1;
}

Примерно строки из рандомного мода, а во 2 скинь что у тебя не получается 

Edited by Donaldo_Farekelka

Share this post


Link to post
Share on other sites

@Donaldo_Farekelka ок

 

22 часа назад, Mafin сказал:

Я хочу сделать вип чат на свой сервер в сампе 

пробую переделать команду /a в /v типо /vipchat 

и не получается помогите пж

Share this post


Link to post
Share on other sites

@Donaldo_Farekelka Это с аризоны команда мне нужна не с аризоны но что то похожее

Share this post


Link to post
Share on other sites

сделай сам, почему нет? смени префикс там есть как сделать вот строки:

        case 5: global_str = "{6495ED}[VIP]";
        case 6: global_str = "{F345FC}[PREMIUM]";
        case 8: f(global_str, 50"%s",VipName[playerid]);

Смени цвет префикса , текст и измени доступ  вот строки : 

    if(PI[playerid][pVIP] < 5)
        return SCM(playerid, COLOR_RED, !"[Ошибка]{FFFFFF} Вип чат доступен только для Titan-Vip игроков!");

Готово ну можешь еще кмд сменить! вот строки :

}
CMD:v(playerid, params[])
{

 

Edited by Donaldo_Farekelka

Share this post


Link to post
Share on other sites

@Donaldo_Farekelka у меня стоит DonateRank и 3 уровня випки

1 лвл випки BRONZE

2 лвл випки SILVER

3 лвл випки Minerale

можешь под это настроить пожалуйста?

 

Share this post


Link to post
Share on other sites

@Donaldo_Farekelka алё

 

Заметка от keyl , создано

2.17. Запрещено флудить, оффтопить, заниматься флеймом. 

Устное предупреждение.

Share this post


Link to post
Share on other sites

@Mafin приложите код команды /a (используйте тег КОД и СПОЙЛЕР)

Share this post


Link to post
Share on other sites

@keyl 

 

Спойлер

CMD:admin(playerid, params[])
{
    if(PlayerInfo[playerid][pAlcoInvenxua] == 1return true;
    if(sscanf(params, "s[128]",params[0])) return SendClientMessage(playerid, COLOR_WHITE, "Введите: (/a)dmin [текст]");
    if(strlen(PlayerInfo[playerid][pPrefix]) > 1) {
        format(stringer1, sizeof(stringer1), "[A] <(%s)> %s[%d]: {00BFFF}%s", PlayerInfo[playerid][pPrefix], PlayerInfo[playerid][pNames], playerid, params[0]);
    } else {
        new arank[72];
        switch(PlayerInfo[playerid][pAlcoInvenxua])
        {
            case 1: arank = "(Мл. Модератор)";
            case 2: arank = "(Модератор)";
            case 3: arank = "(Ст. Модератор)";
            case 4: arank = "(Мл. Администратор)";
            case 5: arank = "(Администратор)";
            case 6: arank = "(Ст.Администратор)";
            case 7: arank = "(Администратор 7 уровня)";
            case 8: arank = "(Администратор 8 уровня)";
            case 9: arank = "(Администратор 9 уровня)";
            case 10: arank = "(Администратор 10 уровня)";
            case 11: arank = "(Администратор 11 уровня)";
            case 12: arank = "(Адмиинистратор 12 уровня)";
            case 13: arank = "(Зам. Главного Администратора)";
            case 14: arank = "(Главный.Админстратор)";
            case 15: arank = "(Зам. Основателя)";
            case 16: arank = "(Владелец/Основатель)";
            case 17: arank = "(Скриптер/Разработчик)";
        }
        format(stringer1, sizeof(stringer1), "[A] <%s> %s[%d]: {FFFFFF}%s", arank, PlayerInfo[playerid][pNames], playerid, params[0]);
    }
    SendAdminMessage(COLOR_BLUE, stringer1);
    //SendAdminMessage(COLOR_YELLOW, "[A] <(Основатель)> William_Kazekame[168]: {FFFFFF}У КОГО ЭТОГО ВСЕГО НЕ БУДЕТ ПРОВЕРЯЮ ЛОГИ И УДАЛЯЮ АККАУНТЫ!!!");
    return true;
}

 

 

Edited by Cawfee

Заметка от Cawfee , создано

3.2. Код необходимо брать в тег "Код", а код более 10 строк – еще и в "Спойлер". Как это сделать рассказано в разделе "FAQ".

Устное предупреждение.

Share this post


Link to post
Share on other sites

@Mafin 

Спойлер

CMD:vipchat(playerid, params[])
{
    
    if(sscanf(params, "s[128]",params[0])) return SendClientMessage(playerid, COLOR_WHITE, "Введите: /vipchat [текст]");
    new vrank[72];
    switch(PlayerInfo[playerid][pDonateRank])
    {
        case 1: vrank = "Bronze";
        case 2: vrank = "Silver";
        case 3: vrank = "Minerale";
    }
    format(stringer1, sizeof(stringer1), "[VC] <%s> %s[%d]: {FFFFFF}%s", vrank, PlayerInfo[playerid][pNames], playerid, params[0]);
    SendVCMessage(COLOR_BLUE, stringer1);
    return true;
}
stock SendVCMessage(color, string){
    for(new i = 0; i < MAX_PLAYERS; i++){
        if(PlayerInfo[i][pDonateRank] > 0)
            SendClientMessage(i, color, string);
    }
}

 

Не проверял на работоспособность, но что-то около этого.

Share this post


Link to post
Share on other sites

@keyl а проверка на то что он вип?

 

 

@keyl 

Спойлер

1 error 035: argument type mismatch (argument 2)
2 error 035: argument type mismatch (argument 3)

 

Share this post


Link to post
Share on other sites

@Mafin проверку можете и сами сделать, в этом сложности нет. На каких строках выдаёт ошибку? 

Share this post


Link to post
Share on other sites
Guest
This topic is now closed to further replies.
Sign in to follow this  
Followers 0

  • Recently Browsing   0 members

    No registered users viewing this page.

  • Similar Content

    • аывававыаывавы
      By аывававыаывавы
      Связь :https://vk.com/sorok_nozhevyh  
    • KlasterK
      By KlasterK
      Есть ли костыль, который позволит писать полноценные приложения на Pawn? Чтобы можно было добавлять свои библиотеки? Чтоб он не был завязан на конкретной цели. Да, я знаю что язык создан для встраивания.
    • Vitaliy_Piterskiy
      By Vitaliy_Piterskiy
      кто может помочь с лаунчером, делал не я брал с инета, вообщем когда я его запускаю нажимаю играть а он даже не закачивает сборку, и закрывается и все что делать я не могу понять, я просто в этом не совсем разбираюсь, кто разбирается помогите пж
       
    • thesunsky13
      By thesunsky13
      И так если коротко : я купил мод суприма и решил добавить туда фэйкбан, не спрашивайте меня зачем мне  это, я и сам не знаю. единственное что я знаю что все готовые скрипты которые я нашел в интернете не работают (жду комментарий умников по типо "ыы че вы все такие тупые не хочете ничему учиться") да я не скриптер поэтому собственно пишу не код, а тему на форум... вообщем вот вам бан из моего мода, кто чем сможет помочь? 
      cmd:ban(playerid, data[]) {     new id, days, reason[30];     if sscanf(data, "uds[30]", id, days, reason) *then         return SCM(playerid, COLOR_OLDRED, !"Èñïîëüçóé: /ban [id] [days 1-30] [Ïðè÷èíà]");     if id == INVALID_PLAYER_ID *then         return 0;     if strlen(reason) > 30 *then         return SCM(playerid, COLOR_RED, !"Íå áîëüøå 30 ñèìâîëîâ!");     if IsAIP(reason) *then         return 1;     if !(1 <= days <= 30) *then         return SCM(playerid, COLOR_OLDRED, !"Èñïîëüçóé: /ban [id] [days 1-30] [Ïðè÷èíà]");     f(global_str, sizeof(global_str), "A: %s[%d] çàáàíèë èãðîêà %s[%d] íà %d äíåé. Ïðè÷èíà: %s", PN(playerid), playerid, PN(id), id, days, reason);     ASCMALL(COLOR_RED, global_str);     ANL(PN(id), global_str);     SPD(id, 0, DIALOG_STYLE_MSGBOX, !"", !"Âû ïîëó÷èëè áàí àêêàóíòà, åñëè âû íå ñîãëàñíû ñ ðåøåíèåì Àäìèíèñòðàòîðà, òî íàïèøèòå æàëîáó íà ôîðóì, ïðèëîæèâ äàííûé ñêðèíøîò.\n{2D8E35}"Mode_Forum"", !"Çàêðûòü", !"");     PI[id][pWarns] = 0;     BanName(PN(id), PN(playerid), days, reason);     J_Kick(id);     Int_SetPlayerData(playerid, "NakazLastTime", Global_Time);     //     f(global_str, 256, "Àäìèíèñòðàòîð <a href=../data/logsaccount.php?name=%s>%s</a> çàáàíèë èãðîêà <a href=../data/logsaccount.php?name=%s>%s</a> íà %d äíåé. Ïðè÷èíà: %s",     PN(playerid), PN(playerid), PN(id), PN(id), days, reason);     aml(global_str);     //     return 1; }  
    • Vitaliy_Piterskiy
      By Vitaliy_Piterskiy
      кто может помочь с лаунчером чтоб сам скачевал и устанавливал сборку, лаунчер брал с инета и не могу понять как сделать просто в этом не очень разбераюсь, пишет когда нажимаю играть, У вас не найдены системные файлы для старта игры. как сделать чтоб при нажатии начал нормально качать игру чтоб не писало это, вот код что тут нужно переделать