Помогите с переводом команд. - Форум - 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 разработчик
Страница 1 из 11
Модератор форума: Artem_Buero 
Форум » Pawno программирование » Вопросы | Проблемы » Помогите с переводом команд. (Помогите перевести команды на new.pwn)
Помогите с переводом команд.
Danil_KotДата: Четверг, 20.04.2017, 14:21 | Сообщение # 1
Новичок
Группа: Пользователи
Сообщений: 2
Статус: 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
Новичок
Группа: Заблокированные
Сообщений: 29
Статус: Offline
Войдите на сайт или зарегистрируйтесь для просмотра полного содержимого темы.

Обратись в ЛС
Последние товары с игрового магазина:
Найти еще что-нибудь в магазине:
Форум » Pawno программирование » Вопросы | Проблемы » Помогите с переводом команд. (Помогите перевести команды на new.pwn)
Страница 1 из 11
Поиск:
Статистика Форума
Последнии темы Читаемые темы Лучшие пользователи Новые пользователи
[Arizona RP] Баг на любой... [narkk3]

Продаю акк с CS GO, Sourc... [TIkonama]

[CLEO] Вопрос - Ответ [-D1zex-]

Вопросы и ответы [-D1zex-]

RakBot 0.7 - прокачка акк... [-D1zex-]

Часто задаваемые вопросы.... [-D1zex-]

S0beit - pr9n project for... [-D1zex-]

[Samp-Rp.Ru]Обновлен спис... [-D1zex-]

[1640047] [CM]AndreN не ... [[CM]AndreN]

Портим жизнь игрокам evol... [-D1zex-]

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

[2]>RakBot 0.7 - прокачка аккаунтов без GTA [9218]

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

[4]>Скуплю и Продам все Ваши вирты! [7597]

[5]>Вопросы и ответы [6279]

[6]>[0.3.7][RUS] Sobeit modified by MishaN [6162]

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

[8]>SAMP-Bot 0.5.9.1 by Jamely [4678]

[9]>Бесконечное слово [4577]

[10]>[Samp-Rp.Ru]Обновлен список Админов (27.01.2016) [4125]

[11]>[CLEO] Вопрос - Ответ [4071]

[12]>Курилка [3165]

[1]>АК_47 [24179]

[2]>GеNius [6456]

[3]>romka619 [5380]

[4]>[CM]AGRESSOR [4608]

[5]>Сэс [4422]

[6]>[CM]Russel [4401]

[7]>Snake_Firm [4141]

[8]>Artem_Buero [4009]

[9]>[CM]Durman [3136]

[10]>sky_Woker [3008]

[11]>iMaddy [2863]

[12]>Sa1nteD [2664]

[13]>Logan™ [2510]

[14]>Ch0c0Cube [2417]

[15]>[CM]ProKeyar [2226]

xop [30.04.2017|08:13]

AMG955 [30.04.2017|07:39]

Dante33345 [30.04.2017|07:36]

inscreezkek123 [30.04.2017|07:26]

vladostrovershenko [30.04.2017|06:45]

AfeT [30.04.2017|06:43]

pilotkabobra [30.04.2017|06:07]

onopko [30.04.2017|05:52]

mex [30.04.2017|05:40]

frozzenn [30.04.2017|05:23]

castellanoyuriy [30.04.2017|05:14]

MHE5JET [30.04.2017|04:32]

ferdinand212 [30.04.2017|04:05]

Buzoni [30.04.2017|03:57]

AlexanderForks [30.04.2017|03:54]


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

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