[YCMD] and [MySQL] /ap - админ панель - Форум Cheat-Master.ru
  • Страница 1 из 1
  • 1
Модератор форума: [CM]OlegEhtler, Getbackthere, Phoenixxx_Czar  
[YCMD] and [MySQL] /ap - админ панель
1Grant1 Дата: Вторник, 31.03.2015, 11:57 | Сообщение # 1
Batka
Сообщений: 73
Статус: Offline
К командам:
Код
YCMD:ap(playerid, params[], help)
{
  if(!PlayerInfo[playerid][pLogin]) return SendClientMessage(playerid,COLOR_WHITE,"Вы не авторизованы!");
  if(PlayerInfo[playerid][pAdmin] < 3 || dostup[playerid] == 0) return true;
  new listitems[] = "[1]> Админ команды\n[2]> Все удобства Инвентов\n[3]> Изменить погоду\n[4]> Игроки с одинаковым IP-адресом\n[5]> Информация о игроках с варном\n[6]> Информация о игроках с баном чата\n[7]> Информация о VIP игроках\n[8]> Информация о банках орг.\n[9]> Снять админа {ff091c}[Offline]\n{FFFFFF}[10]> Снять хелпера {ff091c}[Offline]";
  ShowPlayerDialog(playerid, 20012, DIALOG_STYLE_LIST, "Админ панель", listitems, "Выбрать", "Отмена");
  return true;
}

В OnDialogResponse:
Код
case 20012:
   {
    if(response)
    {
     switch(listitem)
     {
     case 0:
      {
       CallLocalFunction("OnPlayerCommandText", "is", playerid, "/ahelp");
      }
     case 1:
      {
       CallLocalFunction("OnPlayerCommandText", "is", playerid, "/im");
      }
     case 2:
      {
       ShowPlayerDialog(playerid,4385,DIALOG_STYLE_LIST, "{FFFFFF}Список погоды", "{FFFFFF}[1]- Солнечная погода\n[2]- Очень солнечная погода\n[3]- Гроза\n[4]- Пасмурно и туман\n[5]- Хмурая и дождливая\n[6]- Песчаная буря \n[7]- Туманный и зеленоватый\n[8]- В красках бледного Апельсина\n[9]- Свежая в синих красках \n[10]- Туманно и серо \n[11]- Темный неясный коричневый \n[12]- Розовое небо", "Выбрать", "Отмена");
      }
     case 3:
      {
       new playersip[32];
       new s[128];
       new stringus[128];
       new countmute = 0;
       foreach(new i : Player)
       {
        GetPlayerIp(i,playersip,sizeof(playersip));
        if(!strcmp(playersip, playersip))
        {
         new num_players_on_ip = GetNumberThisIP(playersip);
         if(num_players_on_ip > 1)
         {
          format(stringus, 256, "[%i] %s | IP %s", i,Name(i),playersip);
          SendClientMessage(playerid, COLOR_WHITE, stringus);
          countmute++;
         }
               if(countmute == 0) ShowPlayerDialog(playerid, 2963, DIALOG_STYLE_MSGBOX, "{FFFFFF}Одинаковый IP-адрес", "{FFFFFF}В данный момент, нету игроков с одинаковым IP адресом.", "Назад", "");
        }
       }
       format(string, sizeof(string), "{FFA500}[IP MANS]{FFFFFF} В данный момент с одинаковым IP игроков: {FFA500}%i!", countmute);
       SendClientMessage(playerid, COLOR_LIGHTBLUE, string);
       return ShowPlayerDialog(playerid, 1331, DIALOG_STYLE_MSGBOX, "{FFFFFF}Игроки с IP адресами:",s,"OK","");
      }
     case 4:
      {
       CallLocalFunction("OnPlayerCommandText", "is", playerid, "/warnmans");
      }
     case 5:
      {
       CallLocalFunction("OnPlayerCommandText", "is", playerid, "/mutelist");
      }
     case 6:
      {
       CallLocalFunction("OnPlayerCommandText", "is", playerid, "/vipmans");
      }
     case 7:
      {
       CallLocalFunction("OnPlayerCommandText", "is", playerid, "/abalance");
      }
     case 8:
                     {
             if(PlayerInfo[playerid][pAdmin] == 10) ShowPlayerDialog(playerid, 9080, 1, "Снять админа [Offline]"," Введите имя игрока в поле ввода", "Готово", "Отмена");
         }
        case 9:
                     {
                   if(PlayerInfo[playerid][pAdmin] == 10) return ShowPlayerDialog(playerid, 9081, 1, "Снять хелпера [Offline]"," Введите имя игрока в поле ввода", "Готово", "Отмена");
                     }
     }
    }
   }
  case 6245:
   {
    if(response)
    {
     if(listitem == 0)
     {
      CallLocalFunction("OnPlayerCommandText", "is", playerid, "/hpgro");
     }
     if(listitem == 1)
     {
      CallLocalFunction("OnPlayerCommandText", "is", playerid, "/armorgro");
     }
     if(listitem == 2)
     {
      CallLocalFunction("OnPlayerCommandText", "is", playerid, "/weapoffgro");
     }
     if(listitem == 3)
     {
      CallLocalFunction("OnPlayerCommandText", "is", playerid, "/givegungro 24 500");
     }
     if(listitem == 4)
     {
      CallLocalFunction("OnPlayerCommandText", "is", playerid, "/givegungro 29 500");
     }
     if(listitem == 5)
     {
      CallLocalFunction("OnPlayerCommandText", "is", playerid, "/givegungro 30 500");
     }
     if(listitem == 6)
     {
      CallLocalFunction("OnPlayerCommandText", "is", playerid, "/givegungro 31 500");
     }
     if(listitem == 7)
     {
      CallLocalFunction("OnPlayerCommandText", "is", playerid, "/givegungro 34 500");
     }
    }
   }
  case 9080:
      {
          if(!response) return true;
          format(YCMDstr, sizeof(YCMDstr), "Admin: %s снял с админки %s",Name(playerid),inputtext);
    ABroadCast(COLOR_YELLOW,YCMDstr,1);
    format(YCMDstr, sizeof(YCMDstr), "DELETE FROM `admin` WHERE `name`='%s'", inputtext);
    mysql_function_query(mMysql, YCMDstr, false, "", "");
    format(YCMDstr, sizeof(YCMDstr), "UPDATE `accounts` SET `pAdmin` = '0' WHERE `Name` = '%s'",inputtext);
    mysql_function_query(mMysql, YCMDstr, false, "", "");
      }
    case 9081:
      {
          if(!response) return true;
          format(YCMDstr, sizeof(YCMDstr), "Admin: %s снял с хелперки %s",Name(playerid),inputtext);
    ABroadCast(COLOR_YELLOW, YCMDstr, 1);
    format(YCMDstr, sizeof(YCMDstr), "UPDATE `accounts` SET `pHelper` = '0' WHERE `Name` = '%s'",inputtext);
    mysql_function_query(mMysql, YCMDstr, false, "", "");
      }
  case 4385:// ID диалога
   {
    if(response)
    {
     if(listitem == 0)
     {
      SetWeather(10);// в скобках ID погоды ( при желании заменить на свой)
      SendClientMessage(playerid, COLOR_NEWS, "Погода изменена!");
     }
     else if(listitem == 1)
     {
      SetWeather(11);
      SendClientMessage(playerid, COLOR_NEWS, "Погода изменена!");
     }
     else if(listitem == 2)
     {
      SetWeather(8);
      SendClientMessage(playerid, COLOR_NEWS, "Погода изменена!");
     }
     else if(listitem == 3)
     {
      SetWeather(9);
      SendClientMessage(playerid, COLOR_NEWS, "Погода изменена!");
     }
     else if(listitem == 4)
     {
      SetWeather(14);
      SendClientMessage(playerid, COLOR_NEWS, "Погода изменена!");
     }
     else if(listitem == 5)
     {
      SetWeather(19);
      SendClientMessage(playerid, COLOR_NEWS, "Погода изменена!");
     }
     else if(listitem == 6)
     {
      SetWeather(20);
      SendClientMessage(playerid, COLOR_NEWS, "Погода изменена!");
     }
     else if(listitem == 7)
     {
      SetWeather(23);
      SendClientMessage(playerid, COLOR_NEWS, "Погода изменена!");
     }
     else if(listitem == 8)
     {
      SetWeather(27);
      SendClientMessage(playerid, COLOR_NEWS, "Погода изменена!");
     }
     else if(listitem == 9)
     {
      SetWeather(30);
      SendClientMessage(playerid, COLOR_NEWS, "Погода изменена!");
     }
     else if(listitem == 10)
     {
      SetWeather(33);
      SendClientMessage(playerid, COLOR_NEWS, "Погода изменена!");
     }
     else if(listitem == 11)
     {
      SetWeather(-1337);
      SendClientMessage(playerid, COLOR_NEWS, "Погода изменена!");
     }
    }
    else
    {
     return true;
    }
   }


EricW ПРЕВОСХОДИТ БОГОВ,убейте же его наконец!!
Maler[CM] Дата: Вторник, 31.03.2015, 14:11 | Сообщение # 2
MOSKVASTAN
Сообщений: 440
Статус: Offline
Вырезка из Pavel-KZ

ВК: https://vk.com/vdovkinn
Skype: nikita24682
CM One Love:*
1Grant1 Дата: Вторник, 31.03.2015, 14:52 | Сообщение # 3
Batka
Сообщений: 73
Статус: Offline
Цитата Maler[CM] ()
Вырезка из Pavel-KZ

И че теперь,сдохнуть ?


EricW ПРЕВОСХОДИТ БОГОВ,убейте же его наконец!!
Maler[CM] Дата: Вторник, 31.03.2015, 15:23 | Сообщение # 4
MOSKVASTAN
Сообщений: 440
Статус: Offline
Цитата 1Grant1 ()
И че теперь,сдохнуть ?

Автора указать.


ВК: https://vk.com/vdovkinn
Skype: nikita24682
CM One Love:*
1Grant1 Дата: Вторник, 31.03.2015, 15:39 | Сообщение # 5
Batka
Сообщений: 73
Статус: Offline
Цитата Maler[CM] ()
Автора указать.

Ты за меня указал,красава


EricW ПРЕВОСХОДИТ БОГОВ,убейте же его наконец!!
  • Страница 1 из 1
  • 1
Поиск: