Помогите с переводом команд. - Форум - Cheat-Master.Ru | Читерский Форум | Читы для SAMP,CS,Minecraft,CoD,Warface | Продажа аккаунтов SAMP,WoT,Steam,Origin,Warface | Баги,статьи SAMP-RP,Advance-RP,Diamond-RP | Магазин аккаунтов SAMP-RP,Advance-RP,Diamond-RP,Steam,WoT,Warface

Новый качественный SAMP сервер,зайди оцени,только открылся,онлайн 1000
Страница 1 из 11
Модератор форума: Artem_Buero, PasqualeQQ 
Форум » Pawno программирование » Вопросы | Проблемы » Помогите с переводом команд. (Помогите перевести команды на new.pwn)
Помогите с переводом команд.
Danil_KotДата: Четверг, 20.04.2017, 14:21 | Сообщение # 1
Новичок
Сообщений: 3
Статус: Offline
Войдите на сайт или зарегистрируйтесь для просмотра полного содержимого темы.

Помогите перевести команды на new.pwn
Буду очень благодарен


Код
enum RepGB {
    Reptex[130],// Текст который пишет игрок 130 символов
}
new RepInfo[100][RepGB]; // Максимум 100 репортов.  

Код
ALTX:report("/rep");
CMD:report(playerid, params[])
{
    if(GetPVarInt(playerid,"RepUn") > 0) return SendClientMessage(playerid,0xAA3333AA,"Ошибка: Ваша прошлая жалоба ещё не рассмотрена");
    if(sscanf(params, "s[130]",params[0])) return SendClientMessage(playerid, -1,"Введите: (/rep)ort [текст]");
    SetPVarInt(playerid,"RepUn",1);
    strmid(RepInfo[playerid][Reptex], params[0],0,strlen(params[0]),130);
    SendAdmin("Рассматривайте жалобы игроков. Посмотреть жалобы - /otrep | Ответить - /pm",0x27C400FF);
    return SendClientMessage(playerid, 0x27C400FF, "Ваша жалоба была отправлена на рассмотрение");
}  

Код
CMD:otrep(playerid, params[])
{
    if(User[playerid][Login] == 1001) return true;
    if(GetPVarInt(playerid,"Admins") < 1 || !GetPVarInt(playerid,"AdminLogin")) return true;
    if(GetPVarInt(playerid,"AntiFlood") > gettime()) return SendClientMessage(playerid, 0xAA3333AA,"Ошибка: Подождите немного...");
    SetPVarInt(playerid,"AntiFlood",gettime() + 1);
    new str[200];
    new string[1500];
    new null = 0;
    tforeach(i)
    {
        if(GetPVarInt(i,"RepUn") > 0)
        {
            null++;
            format(str,sizeof(str),"%i. %s[%d] | Жалоба: %s\n\n",null,User[i][Name],i,RepInfo[i][Reptex]);
            strcat(string,str);
        }
    }
    if(null == 0) return SendClientMessage(playerid, 0xAA3333AA,"Ошибка: Список жалоб пуст...");
    return ShowPlayerDialog(playerid, 126, 0, "Репорт",string, "Обновить", "Закрыть");
}  

Код
CMD:pm(playerid, params[])
{
    if(GetPVarInt(playerid,"Admins") < 1 || !GetPVarInt(playerid,"AdminLogin")) return true;
    if(sscanf(params, "us[128]",params[0],params[1])) return SendClientMessage(playerid, -1,"Введите: /pm [playerid] [текст]");
    if(!IsPlayerConnected(params[0])) return true;
    new string[144];
    User[playerid][Astat][0] += 1;// Статистика админа
    format(string, 144, "Администратор {E6E627}%s[%d] {61BF22}отвечает:{E6E627} %s",User[playerid][Name],playerid,params[1]);
    SendClientMessage(params[0], 0x61BF22FF, string);
    format(string, 144, "Ответ от {E6E627}%s[%d] {61BF22}к {E6E627}%s[%d]{61BF22}:{E6E627} %s",User[playerid][Name],playerid,User[params[0]][Name],params[0],params[1]);
    SendAdmin(string,0x61BF22FF);
    DeletePVar(params[0],"RepUn");
    return true;
}  

Код
case 126:
        {
            if(response)
            {
                return CallLocalFunction("OnPlayerCommandText", "is", playerid, "/otrep");
            }
            else
            {
                return true;
            }
        }  

Добавлено (20.04.2017, 14:21)
---------------------------------------------
UPD!

Последние товары с игрового магазина:
Найти еще что-нибудь в магазине:
[CM]KookiДата: Пятница, 21.04.2017, 17:23 | Сообщение # 2
Новичок
Сообщений: 24
Статус: Offline
Войдите на сайт или зарегистрируйтесь для просмотра полного содержимого темы.

Обратись в ЛС
Последние товары с игрового магазина:
Найти еще что-нибудь в магазине:
Форум » Pawno программирование » Вопросы | Проблемы » Помогите с переводом команд. (Помогите перевести команды на new.pwn)
Страница 1 из 11
Поиск:
Статистика Форума
Последнии темы Читаемые темы Лучшие пользователи Новые пользователи
X-Hack GTA V слив by F0re... [Sanek2281488]

SKYLINE ELITE EDITION [[CM]Riddle]

SA-MP ADDON 2.1 [[CM]Riddle]

Приватный колокольчик &qu... [getter911]

Revent | Важная инфо... [[CM]Riddle]

Жалоба на TOP_SELLER_STEA... [Nichita20]

Способ с формой крупье [VladimirMa]

Откат пожалуйста [★ApostaL★]

[АКТУАЛЬНО] Получаем выпл... [Fladderman]

Продам аккаунт на Evolve ... [Flon(cm)]

[1]>S0beit - pr9n project for samp 0.3.7 [9476]

[2]>RakBot 0.7.3 - Качай аккаунты не напрягаясь! [9337]

[3]>Часто задаваемые вопросы... [8183]

[4]>Вопросы и ответы [6357]

[5]>[0.3.7][RUS] Sobeit modified by MishaN [6194]

[6]>Продажа вирт 1кк АРП~400р ДРП~400р.СРП~150р. [6127]

[7]>Бесконечное слово [4653]

[8]>[Samp-Rp.Ru]Обновлен список Админов [4141]

[9]>[CLEO] Вопрос - Ответ [4101]

[10]>Курилка [3205]

[11]>У кого что дома есть ??? [2700]

[12]>Вопросы и ответы [2680]

[1]>АК_47 [26421]

[2]>GеNius [6624]

[3]>romka619 [5381]

[4]>[CM]Russel [4754]

[5]>[CM]AGRESSOR [4655]

[6]>Сэс [4424]

[7]>Snake_Firm [4261]

[8]>Artem_Buero [4060]

[9]>[CM]Durman [3241]

[10]>sky_Woker [3007]

[11]>iMaddy [2868]

[12]>Sa1nteD [2682]

[13]>Logan™ [2533]

[14]>Ch0c0Cube [2425]

[15]>[CM]Рафаэль [2214]

The_Bathorananan [17.08.2017|12:45]

SAMSA_228 [17.08.2017|12:41]

Jantex12 [17.08.2017|12:39]

Sanek2281488 [17.08.2017|12:35]

Ezhevsky [17.08.2017|12:33]

user2283221337 [17.08.2017|12:32]

Gogio[CМ] [17.08.2017|12:30]

yunirmeister [17.08.2017|12:29]

DAR1A [17.08.2017|12:16]

gogo3601 [17.08.2017|12:11]

vigill [17.08.2017|11:53]

BekaBSter [17.08.2017|11:52]

Denis337 [17.08.2017|11:50]

bayazit556 [17.08.2017|11:48]

SashaBogomolov [17.08.2017|11:44]


CM Team © 2009-2017 Администрация не несёт ответственности за размещённые материалы. Условия пользования
Все материалы предоставлены в ознакомительных целях и администрация предлагает удалить их после ознакомления.

Положение о защите персональных данных на сайте, Пользовательское соглашение, Договор оказания услуг.