Доступ к архиву

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

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

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

/glevel команда для выдачи lvl

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

_Rommah_

Новичок
Всем привет! представляю вашему вниманию команду /glevel --- команда выдачи lvl
PHP:
if(strcmp(cmd,"/glevel",true) == 0)
   {
       new pn[MAX_PLAYER_NAME];
       new gn;
       new level;
       
       tmp = strtok(cmdtext, idx);
       if(!strlen(tmp))return SendClientMessage(playerid,COLOR_WHITE,"Используйте /glevel [id] [lvl]");
       gn = ReturnUser(tmp);
       tmp = strtok(cmdtext, idx);  
       if(!strlen(tmp))return SendClientMessage(playerid,COLOR_WHITE,"Используйте /glevel [id] [lvl]");
       level = strval(tmp);

       if(IsAPlayerConnected(playerid))
           {
               if(PlayerInfo[playerid][pAdmin] >= 4)
               {
                    if(IsAPlayerConnected(gn))
                    {
                         if(gn != INVALID_PLAYER_ID)
                         {
                             GetPlayerName(playerid, pn,sizeof(pn));
                             format(string,sizeof(string),"Администратор: %s выдал вам [%d] lvl",pn,level);
                             SendClientMessage(gn,COLOR_RED,string);
                             //Сюда можно вставить вывод текста тому кто выдал левел
                             PlayerInfo[gn][pLevel] = level;
                         }
                   }
                    else
                         {
                          SendClientMessage(playerid,COLOR_WHITE,"Игрок офф");
                          return 1;
                          }
               }
               else
                    {
                        SendClientMessage(playerid,COLOR_GREY,"У вас нет прав на использование программы!");
                        return 1;
                    }
           }
           return 1;
    }
Внимание команду не проверял любые ошибки пишем я исправлю!
Если не трудно ставьте +


---------- Post added at 00:41 ---------- Previous post was at 00:39 ----------

сори что написанно: У вас нет прав на использование программы. Если не трудно исправьте сами я запутался так как щас учу pascal
 
Статус
В этой теме нельзя размещать новые ответы.
Сверху Снизу