GTA-ONE | Все для Grand Theft Auto

[FS] Система Доната

Kronos — Thu, 03 Jul 2014 17:36:05 GMT

Название Скрипта: Система Доната
Автор Скрипта: iBublik

Описание:
Данный скрипт был написан мной давно. Он построен на mxINI. Включает в себя 2 команды.
Скрипт позволяет добавлять и использовать внутреигровую валюту (DonatePoints).
Для добавления DP нужно ввести зарегистрированный код при помощи специальной команды.

Команды:
- /donate- Открывает меню системы.
- /setdonatecode - Позволяет Зарегистрировать в Базе Данных (DonateCodes.ini) новый код.
Для этого нужно ввести код, который будет работать, и количество DP.

Скачать:
Яндекс.Диск

Для тех, кто желает вшить скрипт себе в мод:

Ко всем new добавить:

Код

new DonatePoints[MAX_PLAYERS];
new bool:RegCode = false;
new RegCodes[32];

В GameModeInit() добавить:

Код

new DonateFile = ini_openFile("DonateCodes.ini"); // Пытаемся обнаружить файл DonateCodes.ini
if(DonateFile < 0) { // Не обнаруженно
print("\nБаза данных с Donate кодами не обнаружен!");
DonateFile = ini_createFile("DonateCodes.ini"); // создаем файл
print("База данных с Donate кодами создан!\n");
} else { // Обнаруженно
print("\nБаза данных с Donate кодами обнаруженна!\n");
}
ini_closeFile(DonateFile); // Закрываем файл

В OnPlayerCommandText(playerid, cmdtext[]) добавить:

Код

if (strcmp("/donate", cmdtext, true, 10) == 0)
     {
         new string[256],plname[MAX_PLAYER_NAME];
         GetPlayerName(playerid,plname,sizeof(plname));
         format(string,sizeof(string),"Меню Доната | Аккаунт: %s | Баланс: %i DP",plname,DonatePoints[playerid]);
         ShowPlayerDialog(playerid,50,DIALOG_STYLE_LIST,string,"[*] Услуги\n[*] Активировать Код\n[*] Запросить Код","Выбор","Отмена");
         return 1;
     }
     if (strcmp("/setdonatecode", cmdtext, true, 10) == 0)
     {
         if(IsPlayerAdmin(playerid)) {
         if(!RegCode) {
         ShowPlayerDialog(playerid,60,DIALOG_STYLE_INPUT,"Создание Кода","Введите Код, который будет использоваться при                    активации","Далее","Отмена");
         } else {
         SendClientMessage(playerid,-1,"Кто-то уже активирует код...");
         }
         }
         return 1;
     }

В OnDialogResponse(playerid, dialogid, response, listitem, inputtext[]):

Код

case 50: {
         if(response) {
             switch(listitem) {
                 case 0: ShowPlayerDialog(playerid,51,DIALOG_STYLE_LIST,"Услуги","Услуга1\nУслуга2\nУслуга3","Выбор","Назад"); // Вводить сюда свои услуги
                 case 1: ShowPlayerDialog(playerid,52,DIALOG_STYLE_INPUT,"Активация Кода","Введите выданный Вам код в окно снизу:","Ввод","Назад");
                 case 3: SendClientMessage(playerid,-1,"Измените код, чтобы написать свои условия");
                 }
         }
     }
     case 52: {//1
         if(response) {//2
             if(strlen(inputtext)) {//3
                 new DonCod = ini_openFile("DonateCodes.ini");
                 new donpoints;
                 ini_getInteger(DonCod,inputtext,donpoints);
                 if(donpoints <= 0) {//4
                     ShowPlayerDialog(playerid,2,DIALOG_STYLE_MSGBOX,"Ошибка Активации","Данный Код не зарегистрирован в системе!\nПопробуйте ввести свой код заного\n\nЕсли эта проблема повторяется - свяжитесь с администрацией.","OK","");
                     }//4
                 else {//4
                     new string[256];
                     format(string,sizeof(string),"Активация прошла успешно! На Ваш счет зачисленно +%i DonatePoints!",donpoints);
                     ShowPlayerDialog(playerid,2,DIALOG_STYLE_MSGBOX,"Активация Прошла Успешно!",string,"OK","");
                     DonatePoints[playerid] += donpoints;
                     ini_removeKey(DonCod,inputtext);
                     }//4
                 ini_closeFile(DonCod);
                 }//3
    }//2
  }//1
     case 60: {
         if(response) {
             if(strlen(inputtext)) {
                 RegCode = true;
                 format(RegCodes,sizeof(RegCodes),"%s",inputtext);
                 ShowPlayerDialog(playerid,61,DIALOG_STYLE_INPUT,"Регистрация Кода","Введите количество DP:","Регистрация","Отмена");
                 }
             }
  }
     case 61: {
         if(response) {
             if(strlen(inputtext)) {
                 RegCode = false;
                 new iniFile = ini_openFile("DonateCodes.ini");
                 ini_setInteger(iniFile,RegCodes,strval(inputtext));
                 ini_closeFile(iniFile);
                 SendClientMessage(playerid,-1,"Код создан!");
                 }
             }
  }

Примечание! В моде желательно изменить ID диалогов для того, чтобы избежать ошибок!

Известные проблемы и баги:

[Урок] Онлайн радио в машине

Kronos — Thu, 03 Jul 2014 17:24:46 GMT

Показываю свою версию радио в машине
Врубается автоматически
Работает на основе стримера PlayAudioStreamerForPlayer

1. ко всем new

Код

new Radiostation[MAX_VEHICLES];//радио в машине

2. в public OnGameModInit

Код

for(new v; v < MAX_VEHICLES; v++)Radiostation[v] = random(14);//Радиостанции

3. в public OnPlayerStateChange

Код

if(newstate == PLAYER_STATE_DRIVER || newstate == PLAYER_STATE_PASSENGER)
     {
        new veh = GetPlayerVehicleID(playerid);
        switch(Radiostation[veh])
        {
           case 0: return 1;
           case 1: {GameTextForPlayer(playerid,"Europa plus",3000,5);PlayAudioStreamForPlayer(playerid,"http://webcast.emg.fm:55655/europaplus128.mp3");}
           case 2: {GameTextForPlayer(playerid,"Maks FM",3000,5);PlayAudioStreamForPlayer(playerid,"http://radio.maks-fm.ru:8000/maksfm128.m3u");}
           case 3: {GameTextForPlayer(playerid,"ICE FM",3000,5);PlayAudioStreamForPlayer(playerid,"http://icefm.ru/etc/live.m3u");}
           case 4: {GameTextForPlayer(playerid,"Vesti FM",3000,5);PlayAudioStreamForPlayer(playerid,"http://audio.rambler.ru/play.html?id=2537099");}
           case 5: {GameTextForPlayer(playerid,"Russian Radio",3000,5);PlayAudioStreamForPlayer(playerid,"http://radio01-cn03.akadostream.ru:8000/russianradio128.mp3");}
           case 6: {GameTextForPlayer(playerid,"Mayak Radio",3000,5);PlayAudioStreamForPlayer(playerid,"http://radio01-cn03.akadostream.ru:8000/mayak128.mp3");}
           case 7: {GameTextForPlayer(playerid,"Nashe Radio",3000,5);PlayAudioStreamForPlayer(playerid,"http://188.127.243.169:80/nashe-192");}
           case 8: {GameTextForPlayer(playerid,"Retro FM",3000,5);PlayAudioStreamForPlayer(playerid,"http://radio01-cn03.akadostream.ru:8000/radioretro128.mp3");}
           case 9: {GameTextForPlayer(playerid,"Radio Shanson",3000,5);PlayAudioStreamForPlayer(playerid,"http://radio02-cn03.akadostream.ru:8108/shanson128.mp3");}
           case 10: {GameTextForPlayer(playerid,"Nashi Pesni",3000,5);PlayAudioStreamForPlayer(playerid,"http://online.nashipesni.ru:8000/nashipesni");}
           case 11: {GameTextForPlayer(playerid,"D-fm",3000,5);PlayAudioStreamForPlayer(playerid,"http://santa-rossa.ru/Vse_dly_samp/dfm.m3u");}
           case 12: {GameTextForPlayer(playerid,"Ultra",3000,5);PlayAudioStreamForPlayer(playerid,"http://santa-rossa.ru/Vse_dly_samp/radio_ultra_192.m3u");}
           case 13: {GameTextForPlayer(playerid,"Nashe Radio",3000,5);PlayAudioStreamForPlayer(playerid,"http://santa-rossa.ru/Vse_dly_samp/nashe-192.m3u");}
           case 14: {GameTextForPlayer(playerid,"Full-On",3000,5);PlayAudioStreamForPlayer(playerid,"http://santa-rossa.ru/Vse_dly_samp/full-on.m3u");}
        }
     }
else if(oldstate == PLAYER_STATE_DRIVER || oldstate == PLAYER_STATE_PASSENGER)StopAudioStreamForPlayer(playerid);

4. в public OnPlayerCommandText

Код

    if (strcmp("/nextradio", cmdtext, true, 10) == 0)
     {
        if(GetPlayerState(playerid) == PLAYER_STATE_DRIVER)
        {
           new veh = GetPlayerVehicleID(playerid);
           if(Radiostation[veh] != 10)Radiostation[veh] ++;
           else Radiostation[veh] = 0;
           for(new i; i < GetMaxPlayers(); i++)
           {
              if(GetPlayerVehicleID(i) == veh)
              {
                  switch(Radiostation[veh])
                  {
                      case 0: {GameTextForPlayer(i,"Radio Off",3000,5);StopAudioStreamForPlayer(i);}
                      case 1: {GameTextForPlayer(i,"Europa plus",3000,5);PlayAudioStreamForPlayer(i,"http://webcast.emg.fm:55655/europaplus128.mp3");}
                      case 2: {GameTextForPlayer(i,"Maks FM",3000,5);PlayAudioStreamForPlayer(i,"http://radio.maks-fm.ru:8000/maksfm128.m3u");}
                      case 3: {GameTextForPlayer(i,"ICE FM",3000,5);PlayAudioStreamForPlayer(i,"http://icefm.ru/etc/live.m3u");}
                      case 4: {GameTextForPlayer(i,"Vesti FM",3000,5);PlayAudioStreamForPlayer(i,"http://audio.rambler.ru/play.html?id=2537099");}
                      case 5: {GameTextForPlayer(i,"Russian Radio",3000,5);PlayAudioStreamForPlayer(i,"http://radio01-cn03.akadostream.ru:8000/russianradio128.mp3");}
                      case 6: {GameTextForPlayer(i,"Mayak Radio",3000,5);PlayAudioStreamForPlayer(i,"http://radio01-cn03.akadostream.ru:8000/mayak128.mp3");}
                      case 7: {GameTextForPlayer(i,"Nashe Radio",3000,5);PlayAudioStreamForPlayer(i,"http://188.127.243.169:80/nashe-192");}
                      case 8: {GameTextForPlayer(i,"Retro FM",3000,5);PlayAudioStreamForPlayer(i,"http://radio01-cn03.akadostream.ru:8000/radioretro128.mp3");}
                      case 9: {GameTextForPlayer(i,"Radio Shanson",3000,5);PlayAudioStreamForPlayer(i,"http://radio02-cn03.akadostream.ru:8108/shanson128.mp3");}
                      case 10: {GameTextForPlayer(i,"Nashi Pesni",3000,5);PlayAudioStreamForPlayer(i,"http://online.nashipesni.ru:8000/nashipesni");}
                      case 11: {GameTextForPlayer(i,"D-fm",3000,5);PlayAudioStreamForPlayer(i,"http://santa-rossa.ru/Vse_dly_samp/dfm.m3u");}
                      case 12: {GameTextForPlayer(i,"Ultra",3000,5);PlayAudioStreamForPlayer(i,"http://santa-rossa.ru/Vse_dly_samp/radio_ultra_192.m3u");}
                      case 13: {GameTextForPlayer(i,"Nashe Radio",3000,5);PlayAudioStreamForPlayer(i,"http://santa-rossa.ru/Vse_dly_samp/nashe-192.m3u");}
                      case 14: {GameTextForPlayer(i,"Full-On",3000,5);PlayAudioStreamForPlayer(i,"http://santa-rossa.ru/Vse_dly_samp/full-on.m3u");}
                  }
              }

5. dpublic OnPlayerKeyStateChange

Код

if(newkeys == 8192)OnPlayerCommandText(playerid,"/back");// Num 4
if(newkeys == 16384)OnPlayerCommandText(playerid,"/nextradio");// Num 6

[FS] Скрипт для закрытия открытия ворот (шлагбаунов)

Kronos — Thu, 03 Jul 2014 17:17:28 GMT

Всем привет!Выкладываю вам скрипт для открытия закрытия ворот по команде, вот ссылка на сам скрипт Пароль Pawno-info.ruhttp://rghost.ru/39251505 а теперь я объясню как его настроить, что бы ворота которые вы поставили открывались по команде.

Код

#include
#pragma tabsize 0
#define COLOR_YELLOW 0xFFFF00AA
#define FILTERSCRIPT
forward GateCloseLS();
#if defined FILTERSCRIPT
new pdgateLS;
public OnFilterScriptInit()
{
pdgateLS = CreateObject(980,2286.9184,-2302.830,15,0.00000000,0.00000000,45);
print("\n--------------------------------------");
  print(" PDGate FS BY Splitx provided by www.samp-rus.com");
  print("--------------------------------------\n");
  return 1;
}
public OnFilterScriptExit()
{
  return 1;
}
#endif
public OnPlayerCommandText(playerid, cmdtext[])
{
if (strcmp(cmdtext, "/11", true)==0)
        {
        MoveObject(pdgateLS,2286.91840,-2302.83000000,0.0000000000,4.5);

       SetTimer("GateCloseLS", 10000, 0);
       SendClientMessage(playerid, COLOR_YELLOW,"");
       return 1;
        }

  return 0;
}
public GateCloseLS()
{
        MoveObject(pdgateLS,2286.9184,-2302.830,15,4.5);
    }

Это сам код скрипта.

Код

pdgateLS = CreateObject(980,2286.9184,-2302.830,15,0.00000000,0.00000000,45);

-координаты закрытых ворот
для новичков объясняю специально
980-это id ворот (объекта)
2286.9184,-2302.830,15-это идет как x,y,z

Код

public OnPlayerCommandText(playerid, cmdtext[])

-сюда ставим id той фракции/банды только для которой будут открываться ворота

Пример:

Код

public OnPlayerCommandText(playerid, cmdtext[15])

Код

if (strcmp(cmdtext, "/11", true)==0)

-тут прописываем команду по которой будут открываться ворота вместо 11 можете свою

Код

MoveObject(pdgateLS,2286.91840,-2302.83000000,0.0000000000,4.5);

-это координаты открытых ворот
только теперь тут идет без id а просто x,y,z

Код

SetTimer("GateCloseLS", 10000, 0);

-это время на которое будут открыты ворота (указано в миле секундах) если хотите сделать время открытия ворот до 15-20 секунд и т.д то пишите вместо 10000 15000 или 20000 миле секунд то будут ворота открыты 15-20 секунд

Код

SendClientMessage(playerid, COLOR_YELLOW,"");

тут пишем текст

(пример)

Код

SendClientMessage(playerid, COLOR_YELLOW,"ворота открыта на 10 секунд");

Код

MoveObject(pdgateLS,2286.9184,-2302.830,15,4.5);

-сюда вставляем x,y,z закрытых ворот

Ну и все ставим +++ если понравилось