10:23
ОбновитьСмайлыУправление мини-чатом
МИНИ-ЧАТ
Главная страница!

 



 
          





Рекомендуем:





Последние Файлы GTA 4 Последние Файлы GTA-MP Реклама
Скрипт GTA 4 элементы Watch... 07.09.2014
Ferrari 360 Spider [EPM con... 13.12.2013
Porsche Cayenne Turbo 2012 ... 13.12.2013
Shelby Terlingua Mustang v1... 13.12.2013
Hamann Lamborghini Gallardo... 27.10.2013
[GM] The Big PEN1:LS v2.00 ... 04.12.2017
Dgun (AvnanceRP,SampRP,Dimo... 19.03.2016
SAMP скрипт SX Events (MySQ... 03.03.2016
Карта ASL мэрия для SAMP се... 03.03.2016
AIM для SA-MP 0.3.7 22.02.2016
  • Страница 1 из 3
  • 1
  • 2
  • 3
  • »
Модератор форума: Alcoholik  
Форум SAMP о мультиплеерах для GTA. » Популярные моды » The Godfather » [FAQ]По созданию системы матов
[FAQ]По созданию системы матов
LatronДата: Суббота, 02.04.2011, 23:22 | Сообщение # 1
Группа: I'm V.I.P.
Сообщений: 2115
Награды: 22
Город: Орел
Репутация: 1604
Замечания: 0%
Статус:
Ко всем new
[off]//============================[Склады для законников]===========================
new armmatbi = 50000;// Склад армии Сф
new lspdmatbi = 50000;// Склад ЛСПД
//=========================[Склады банд]========================================
new rifamatbi = 50000;// Склад Рифа
new ballasmatbi = 50000;// Склад Баллас
new groovmatbi = 50000;// Склад Грув
new vagosmatbi = 50000;// Склад Вагос
new aztekmatbi = 50000;// Склад Ацтеков
//==================[Кол-во матов в машинах для перевозки матов]================
new gruzmatbi = 0;// Маты в грузовике
new vertmatbi = 0;// Маты в вертолёте[/off]

В public OnPlayerCommandText

Code
    if(strcmp(cmd, "/LSPD", true) == 0) // для разгрузки матов
  {
      if(IsPlayerConnected(playerid))
      {
        SetPlayerCheckpoint(playerid,1529.6000,-1691.2000,13.3828,3.0);
             MatsArmyCar[playerid]=1;
   }
   return 1;
  }
  if(strcmp(cmd, "/carm", true) == 0) // для загрузки.. матов
  {
      if(IsPlayerConnected(playerid))
      {
              SetPlayerCheckpoint(playerid,-1245.8601,474.0676,7.1809,3.0);
     MatsArmyCar[playerid]=0;
   }
   return 1;
  }
      if(strcmp(cmd, "/warehouse", true) == 0)
  {
      if(IsPlayerConnected(playerid))
      {
             if (PlayerInfo[playerid][pMember] == 1 || PlayerInfo[playerid][pLeader] == 1)//New Cops Spawn
    {
        format(string, sizeof(string), "На складе LSPD %d/50000 матов", lspdmatbi);
     SendClientMessage(playerid, COLOR_GREY, string);
        return 1;
    }
       if (PlayerInfo[playerid][pMember] == 3 || PlayerInfo[playerid][pLeader] == 3)//New FBI Spawn
    {
        format(string, sizeof(string), "На складе Army %d/50000 матов", armmatbi);
     SendClientMessage(playerid, COLOR_GREY, string);
        return 1;
    }
             if (PlayerInfo[playerid][pMember] == 12 || PlayerInfo[playerid][pLeader] == 12)//New Cops Spawn
    {
        format(string, sizeof(string), "На складе Ballas %d/50000 матов", ballasmatbi);
     SendClientMessage(playerid, COLOR_GREY, string);
        return 1;
    }
       if (PlayerInfo[playerid][pMember] == 13 || PlayerInfo[playerid][pLeader] == 13)//New FBI Spawn
    {
        format(string, sizeof(string), "На складе VAGOS %d/50000 матов", vagosmatbi);
     SendClientMessage(playerid, COLOR_GREY, string);
        return 1;
    }
             if (PlayerInfo[playerid][pMember] == 15 || PlayerInfo[playerid][pLeader] == 15)//New Cops Spawn
    {
        format(string, sizeof(string), "На складе GROOV %d/50000 матов", groovmatbi);
     SendClientMessage(playerid, COLOR_GREY, string);
        return 1;
    }
       if (PlayerInfo[playerid][pMember] == 17 || PlayerInfo[playerid][pLeader] == 17)//New FBI Spawn
    {
        format(string, sizeof(string), "На складе AZTEK %d/50000 матов", aztekmatbi);
     SendClientMessage(playerid, COLOR_GREY, string);
        return 1;
    }
             if (PlayerInfo[playerid][pMember] == 18 || PlayerInfo[playerid][pLeader] == 18)//New FBI Spawn
    {
        format(string, sizeof(string), "На складе RIFA %d/50000 матов", rifamatbi);
     SendClientMessage(playerid, COLOR_GREY, string);
        return 1;
    }
   }
   return 1;
  }

В public OnPlayerEnterCheckpoint(playerid)

Code
    new string[128];
  new name[MAX_PLAYER_NAME];
     if(VertMats[playerid]==1)
     {
   vertmatbi += 10000; //Загрузились, прибовляем 10000 матов в вертолёт.
   format(string, sizeof(string), " Маты успешно загружены! Компоненты материалов: %d/10000", vertmatbi);
   SendClientMessage(playerid, TEAM_GROVE_COLOR, string);
         VertMats[playerid]=2;
   DisablePlayerCheckpoint(playerid);
   SetPlayerCheckpoint(playerid,-1230.4061,467.4771,7.1875,10); // ставим чекпоинт..
  }
  else if(VertMats[playerid]==2)
     {
   if(armmatbi >= 100000)//если на складе 100к то
   {
    format(string, sizeof(string), "Склад полон");
    SendClientMessage(playerid, COLOR_GREY, string);
    return 1;
   }
   vertmatbi -= 10000; // РАзгрузились онуляем маты в вертолёте
   armmatbi += 10000; // добовляем к складу 10000
   format(string, sizeof(string), " Маты успешно Доставлены!! Компоненты материалов: %d/10000", vertmatbi);
   SendClientMessage(playerid, TEAM_GROVE_COLOR, string);
         format(string, sizeof(string), " Склад ARMY: %d/100000", armmatbi);
   SendClientMessage(playerid, TEAM_GROVE_COLOR, string);
   DisablePlayerCheckpoint(playerid);
  }
  else if(MatsArmyCar[playerid]==0)
  {
    if(gruzmatbi >= 5000 || armmatbi <= 5000)
   {
             format(string, sizeof(string), "Склад пуст/грузовик полон");
    SendClientMessage(playerid, COLOR_GREY, string);
    return 1;
   }
   gruzmatbi += 5000;// Згрузили грузовик..
   format(string, sizeof(string), " Маты успешно загружены! Компоненты материалов: %d/5000", gruzmatbi);
   SendClientMessage(playerid, TEAM_GROVE_COLOR, string);
   armmatbi -= 5000;// отнимаем со склада загруженные маты
   DisablePlayerCheckpoint(playerid);
         format(string, sizeof(string), " Склад ARMY: %d/50000", armmatbi);
   SendClientMessage(playerid, TEAM_GROVE_COLOR, string);
         SaveMaterials();
  }
  else if(MatsArmyCar[playerid]==1)
  {
   if(lspdmatbi >= 50000)
   {
             format(string, sizeof(string), "Склад полон");
    SendClientMessage(playerid, COLOR_GREY, string);
    return 1;
   }
   gruzmatbi -= 5000;//Рзагрузились
   lspdmatbi += 5000;// прибовляем на склад ЛСПД 5к матов
     DisablePlayerCheckpoint(playerid);
      format(string, sizeof(string), " Маты успешно доставлееы! Компоненты материалов: %d/5000", gruzmatbi);
   SendClientMessage(playerid, TEAM_GROVE_COLOR, string);
   format(string, sizeof(string), " Склад ЛСПД: %d/50000", lspdmatbi);
   SendClientMessage(playerid, TEAM_GROVE_COLOR, string);
  }

В конце мода создаем 2 паблик:

Code
public LoadMaterials()
{
       new arrCoords[7][64];
       new strFromFile2[256];
       new File: file = fopen("materials.ini", io_read);
       if (file)
       {
        fread(file, strFromFile2);
        split(strFromFile2, arrCoords, '|');
        armmatbi = strval(arrCoords[0]);
        lspdmatbi = strval(arrCoords[1]);
        rifamatbi = strval(arrCoords[2]);
        ballasmatbi = strval(arrCoords[3]);
        aztekmatbi = strval(arrCoords[4]);
        vagosmatbi = strval(arrCoords[5]);
        groovmatbi = strval(arrCoords[6]);
     fclose(file);
       }
       return 1;
}

public SaveMaterials()
{
       new coordsstring[256];
       format(coordsstring, sizeof(coordsstring), "%d|%d|%d|%d|%d|%d|%d", armmatbi, lspdmatbi, rifamatbi, ballasmatbi, aztekmatbi, vagosmatbi, groovmatbi);
       new File: file2 = fopen("materials.ini", io_write);
       fwrite(file2, coordsstring);
       fclose(file2);
       return 1;
}



Моё портфолио

Мои работы:
[ Lesson ] Операторы в PAWN.
[ Lesson ] Переменная.
[ GM ] RegSys. ( Last update: 21.04.2012 )


Sh1FTДата: Воскресенье, 03.04.2011, 01:03 | Сообщение # 2
Постоялец
Группа: Продвинутые
Сообщений: 470
Награды: 4
Город: Курск
Репутация: 62
Замечания: 40%
Статус:
Что это? Зачем это? О_о


-Записался на бокс, а Брат на борьбу.
-И что теперь?
-Не ссоримся, очкуем оба.

[B]контакте правильно воспитывает детей: сначала п?здили помидоры на ферме, теперь сидят в тюряге.

Что делает современная девушка расставшись с парнем? Она судорожно размышляет какой статус написать в контакте, чтоб ему было обидно.

Одноклассники стали платными... А одноклассницы еще дороже! :D

В лифте не хватает кнопки ''Быстрее,я ссать хочу'' :D :D
LatronДата: Воскресенье, 03.04.2011, 02:53 | Сообщение # 3
Группа: I'm V.I.P.
Сообщений: 2115
Награды: 22
Город: Орел
Репутация: 1604
Замечания: 0%
Статус:
Sh1FT, это система перевозки материалов


Моё портфолио

Мои работы:
[ Lesson ] Операторы в PAWN.
[ Lesson ] Переменная.
[ GM ] RegSys. ( Last update: 21.04.2012 )


F_1NДата: Воскресенье, 03.04.2011, 10:32 | Сообщение # 4
Постоялец
Группа: Продвинутые
Сообщений: 476
Награды: 1
Город: Москва
Репутация: 55
Замечания: 0%
Статус:
Latron, а куда они будут тратится?)
Kw33ckДата: Воскресенье, 03.04.2011, 10:55 | Сообщение # 5
Местный
Группа: Продвинутые
Сообщений: 620
Награды: 8
Город: Empire Bay
Репутация: 1405
Замечания: 60%
Статус:
Слегка глуповатая система. Бессмысленная немного.


>>> Внимание: GTA 5 Online на пиратке! <<<

>>> Внимание: Mafia 2 Multiplayer ВКонтакте! <<<

Мои завистники:
1 место - Eakwarp (постоянная зависть в сторону моих успехов и уровня развития) - Стаж > 4х лет!
2 место - PeRaN (подлиза, признавшая моё превосходство, но не желающая что-либо исправлять по моим советам) - Стаж > 3х лет!
3 место - Тут можешь оказаться ты!
Sh1FTДата: Воскресенье, 03.04.2011, 12:11 | Сообщение # 6
Постоялец
Группа: Продвинутые
Сообщений: 470
Награды: 4
Город: Курск
Репутация: 62
Замечания: 40%
Статус:
Latron, можно было наверно, хоть чуточку описать твой фак в начале темы... :D


-Записался на бокс, а Брат на борьбу.
-И что теперь?
-Не ссоримся, очкуем оба.

[B]контакте правильно воспитывает детей: сначала п?здили помидоры на ферме, теперь сидят в тюряге.

Что делает современная девушка расставшись с парнем? Она судорожно размышляет какой статус написать в контакте, чтоб ему было обидно.

Одноклассники стали платными... А одноклассницы еще дороже! :D

В лифте не хватает кнопки ''Быстрее,я ссать хочу'' :D :D
Arty_StoryДата: Воскресенье, 03.04.2011, 12:20 | Сообщение # 7
Новенький
Группа: Пользователи
Сообщений: 28
Награды: 0
Город: Кишинев
Репутация: -10
Замечания: 0%
Статус:
У меня 6 ERORS sorry
LatronДата: Воскресенье, 03.04.2011, 21:23 | Сообщение # 8
Группа: I'm V.I.P.
Сообщений: 2115
Награды: 22
Город: Орел
Репутация: 1604
Замечания: 0%
Статус:
Arty_Story, ну кинь их сюда я скажу как исправить..


Моё портфолио

Мои работы:
[ Lesson ] Операторы в PAWN.
[ Lesson ] Переменная.
[ GM ] RegSys. ( Last update: 21.04.2012 )


dima111Дата: Понедельник, 04.04.2011, 21:32 | Сообщение # 9
Уверенный в себе
Группа: Продвинутые
Сообщений: 246
Награды: 0
Город: кострома
Репутация: -44
Замечания: 100%
Статус:
Слушайте а кто нибудь может зделать так чтоб эти маты могли воровать банды! Ну напримен пикап где нибудь какой нибудь банд подходит и ворует 500 матов и может зделать себе пушку!
SatelliteДата: Понедельник, 04.04.2011, 22:21 | Сообщение # 10
Местный
Группа: Продвинутые
Сообщений: 622
Награды: 10
Город: Хмельницкий
Замечания: 20%
Статус:
Сис-ма не логическая, материалы есть, но они нигде не используются.
BarniДата: Вторник, 05.04.2011, 16:01 | Сообщение # 11
Новенький
Группа: Пользователи
Сообщений: 17
Награды: 0
Город: Северодвинск
Репутация: -4
Замечания: 20%
Статус:
Эм.. мб автора напишеш? Автор:Fresh_Light
LatronДата: Вторник, 05.04.2011, 17:42 | Сообщение # 12
Группа: I'm V.I.P.
Сообщений: 2115
Награды: 22
Город: Орел
Репутация: 1604
Замечания: 0%
Статус:
Quote
Эм.. мб автора напишеш? Автор:Fresh_Light

Я это может из мода вырезал....
Из гф какого то не помню...


Моё портфолио

Мои работы:
[ Lesson ] Операторы в PAWN.
[ Lesson ] Переменная.
[ GM ] RegSys. ( Last update: 21.04.2012 )


Will_SmithДата: Вторник, 05.04.2011, 18:09 | Сообщение # 13
Новенький
Группа: Пользователи
Сообщений: 23
Награды: 0
Город: 3938
Репутация: 7
Замечания: 0%
Статус:
Не работает... :( bad wall
Arty_StoryДата: Вторник, 05.04.2011, 19:11 | Сообщение # 14
Новенький
Группа: Пользователи
Сообщений: 28
Награды: 0
Город: Кишинев
Репутация: -10
Замечания: 0%
Статус:
[off]Вот 6 ошибок вышло как их исправить[/off]
Code
D:\SampRp-Life\gamemodes\GM.pwn(9814) : error 021: symbol already defined: "string"
D:\SampRp-Life\gamemodes\GM.pwn(9815) : error 021: symbol already defined: "name"
D:\SampRp-Life\gamemodes\GM.pwn(9816) : error 017: undefined symbol "VertMats"
D:\SampRp-Life\gamemodes\GM.pwn(9816) : warning 215: expression has no effect
D:\SampRp-Life\gamemodes\GM.pwn(9816) : error 001: expected token: ";", but found "]"
D:\SampRp-Life\gamemodes\GM.pwn(9816) : error 029: invalid expression, assumed zero
D:\SampRp-Life\gamemodes\GM.pwn(9816) : fatal error 107: too many error messages on one line

Compilation aborted.Pawn compiler 3.2.3664     Copyright (c) 1997-2006, ITB CompuPhase

6 Errors.

3DmasterДата: Вторник, 05.04.2011, 21:47 | Сообщение # 15
Новенький
Группа: Пользователи
Сообщений: 7
Награды: 0
Город: Garkalne
Репутация: 0
Замечания: 0%
Статус:
Я в пятницу скину как это делать правильно. У меня получилось создать систему матов. Я даже думаю прмимерно по такой системе содать завод по производству машин.
Форум SAMP о мультиплеерах для GTA. » Популярные моды » The Godfather » [FAQ]По созданию системы матов
  • Страница 1 из 3
  • 1
  • 2
  • 3
  • »
Поиск:





 


 


 
Хостинг от uCoz samp.at.ua