В теме 6 сообщений

Гость
Новичок

Система написана на MySQL R7, динамическое создание группировок.
Функционал:

- создание банды из игры.
- смена спавна банды
- смена имени банды
- смена скина


 

Спойлер

enum // Dialog's
{
        d_creategangname,
        d_gangname,
        d_ganginfo,
        d_gangskin,
        d_gangstats
};
#define MAX_CLAN 200
enum cInfo
{
        id,
        Name[MAX_PLAYER_NAME],
        Level,
        Driftscore,
        Money,
        Maxplayer,
        Skin,
        Float:  SpawnX,
        Float:  SpawnY,
        Float:  SpawnZ,
        Float:  SpawnA,
};
new CInfo[MAX_CLAN][cInfo];
new TOTALCLAN;

 

Спойлер

#define PlayerName(%0)  PlayerInfo[%0][Name]
#define TABLE_CLAN              "clan"
#define f(%1,                   format(%1,sizeof(%1),
#define publics:%0(%1)  forward %0(%1); public %0(%1)

 

Спойлер

    if(GetPVarInt(playerid, "ClanMember") == 0) SetPlayerSkin(playerid, GetPVarInt(playerid, "Skin"));
    else SetPlayerSkin(playerid, CInfo[GetPVarInt(playerid, "ClanMember")][Skin]);
    if(GetPVarInt(playerid, "ClanMember") != 0)
    {
                SetPlayerPos(playerid,CInfo[GetPVarInt(playerid, "ClanMember")][SpawnX],CInfo[GetPVarInt(playerid, "ClanMember")][SpawnY],CInfo[GetPVarInt(playerid, "ClanMember")][SpawnZ]);
                SetPlayerFacingAngle(playerid, CInfo[GetPVarInt(playerid, "ClanMember")][SpawnA]);
                SetPlayerInterior(playerid,0);
                SetPlayerVirtualWorld(playerid, 0);
                return 1;
    }

 

Спойлер

                case d_gangstats:
        {
            switch(listitem)
            {
                case 0:
                                {
                                        if(GetPVarInt(playerid, "ClanLeader") != 0) return SendMes(playerid, color_red, "Ты и так управляющий %s",CInfo[GetPVarInt(playerid, "ClanLeader")][Name]);
                                        if(GetPVarInt(playerid, "ClanMember") != 0) return SendMes(playerid, color_red, "Ты и так уже в %s",CInfo[GetPVarInt(playerid, "ClanMember")][Name]);
                                        if(GetPVarInt(playerid, "Money") < 200000) return SendClientMessage(playerid, color_grey, "У тебя нету денег для создания банды, нужно $200.000");
                                        if(GetPVarInt(playerid, "Level") < 50) return SendClientMessage(playerid, color_grey, "У тебя не достаточно опыта для реководства бандой, нужен 50лвл.");
                                        ShowPlayerDialog(playerid,d_creategangname,DIALOG_STYLE_INPUT,"{FF0000}Создание банды",
                                        ""W"Тебе доступна функция создания своей группировки.\n\
                                        Для создания группировки необходимо иметь на руках "L"$"R"200"L" 000 и 50 уровень\n\
                                        "W"Если вы не передумали в создании группировки, введите имя вашей будущей банды в поле ниже:\n\n\
                                        "L"Возможности:\n"R"-"W" Смена названия банды, транспорта, места появления, одежды\n\
                                         "R"-"W" Война за территории между кланами и многое другое..","Создать","Отмена");
                                }
                case 1:
                {
                    if(GetPVarInt(playerid, "ClanLeader") != 0)
                                        {
                                                new listitems[] = "Смена spawn'a\nСмена названия\nСмена одежды";
                                                f(stringj,"{FF0000}Редактор %s", CInfo[GetPVarInt(playerid, "ClanLeader")][Name]);
                                                ShowPlayerDialog(playerid, d_ganginfo, DIALOG_STYLE_LIST, stringj, listitems, "Принять", "Отмена");
                                        }
                                        else SendClientMessage(playerid, color_grey, "У тебя нет доступа к этому меню");
                }
                case 2: return 1;
            }
            return 1;
        }
                case d_ganginfo:
                {
                    if(response == 1)
                    {
                            if(listitem == 0)
                            {
                                new str[250];
                                new leader = GetPVarInt(playerid, "ClanLeader");
                                        if(GetPlayerInterior(playerid) != 0) return SendClientMessage(playerid, color_white,"Тут невозможно создать спавн!");
                                        GetPlayerPos(playerid,CInfo[leader][SpawnX],CInfo[leader]
[SpawnY],CInfo[leader][SpawnZ]);
                                        GetPlayerFacingAngle(playerid,CInfo[leader][SpawnA]);
                                        f(str, "UPDATE `"TABLE_CLAN"` SET `SpawnX` = %f, `SpawnY` = %f, `SpawnZ` = %f, `SpawnA` = %f WHERE `id` = '%i'",
                                        CInfo[leader][SpawnX], CInfo[leader][SpawnY], CInfo[leader][SpawnZ], CInfo[leader][SpawnA], leader), mysql_query(str, -1, -1, PAWNO_CODER);
                                        SendMes(playerid, color_red, "Спавн банды %s был изменён",CInfo[leader][Name]);
                                }
                                if(listitem == 1)
                                {
                                ShowPlayerDialog(playerid,d_gangname,DIALOG_STYLE_INPUT,"{FF0000}Смена имени банды","{FFFFFF}Введите имя банды!","Сменить","Отмена");
                                }
                                if(listitem == 2)
                                {
                                ShowPlayerDialog(playerid,d_gangskin,DIALOG_STYLE_INPUT,"{FF0000}Смена скина банды","{FFFFFF}Введите id cкина для банды","Сменить","Отмена");
                                }
                        }
                        return 1;
                }
                case d_gangname:
                {
                    if(response == 1)
                    {
                        strmid(CInfo[GetPVarInt(playerid, "ClanLeader")][Name], inputtext, 0, strlen(inputtext), MAX_PLAYER_NAME);
                        CInfo[GetPVarInt(playerid, "ClanLeader")][Name] = strval(inputtext);
                        format(CInfo[GetPVarInt(playerid, "ClanLeader")][Name],32,inputtext);
                                SetClanStr(GetPVarInt(playerid, "ClanLeader"), "Name", inputtext);
                                SendMes(playerid, color_red, "Новое имя банды : (ID:%d) %s",GetPVarInt(playerid, "ClanLeader"),inputtext);
                        }
                        return 1;
                }
                case d_gangskin:
                {
                    if(response == 1)
                    {
                                new str[250];
                            CInfo[GetPVarInt(playerid, "ClanLeader")][Skin] = strval(inputtext);
                                f(str, "UPDATE `"TABLE_CLAN"` SET `Skin` = %i WHERE `id` = '%i'",
                                CInfo[GetPVarInt(playerid, "ClanLeader")][Skin], GetPVarInt(playerid, "ClanLeader")), mysql_query(str, -1, -1, PAWNO_CODER);
                            SetPlayerSkin(playerid, CInfo[GetPVarInt(playerid, "ClanLeader")][Skin]);
                            SendMes(playerid, color_red, "Вы сменили скин банды на: %i",CInfo[GetPVarInt(playerid, "ClanLeader")][Skin]);
                        }
                        return 1;
                }
                case d_creategangname:
                {
                    if(response == 1)
                    {
                        TOTALCLAN++;
                                static query_mysql[350];
                                CInfo[TOTALCLAN][id] = TOTALCLAN;
                                CInfo[TOTALCLAN][Level] = 0;
                                CInfo[TOTALCLAN][Driftscore] = 0;
                                CInfo[TOTALCLAN][Money] = 0;
                                CInfo[TOTALCLAN][Maxplayer] = 10;
                                CInfo[TOTALCLAN][SpawnX] = 1672.4862;
                                CInfo[TOTALCLAN][SpawnY] = -2275.4907;
                                CInfo[TOTALCLAN][SpawnZ] = -1.2467;
                                CInfo[TOTALCLAN][SpawnA] = 259.1288;
                                SetPVarInt(playerid, "ClanLeader", TOTALCLAN);
                                SetPVarInt(playerid, "ClanMember", TOTALCLAN);
                                strmid(CInfo[TOTALCLAN][Name], inputtext, 0, strlen(inputtext), MAX_PLAYER_NAME);
                                f(query_mysql, "INSERT INTO `"TABLE_CLAN"` (`id`, `Name`, `Level`, `Driftscore`, `Money`, `Maxplayer`, `Skin`, `SpawnX`, `SpawnY`, `SpawnZ`, `SpawnA`) VALUES ('%i', '%s', '0', '0', '0', '10', '%i', '1672.4862', '-2275.4907', '-1.2467', '259.1288')",
                                TOTALCLAN, inputtext, GetPlayerSkin(playerid)), mysql_function_query(PAWNO_CODER, query_mysql, false, "","");
                        SendMes(playerid, color_red, "Ты успешно создал свою группировку! Её номер: "A"%i",TOTALCLAN);
                        SendMes(playerid, color_red, "Название твоей группировки: "A"%s",inputtext);
                        SendMes(playerid, color_red, "Для управления ею используй "A"'Главное меню "L">> "A"Разное "L">> "A"Группировка'");
                        }
                        return 1;
                }

 

Спойлер

forward LoadClanInfo();
public LoadClanInfo()
{
    new time = GetTickCount();
    new temp[32],rows,fields;
    cache_get_data(rows,fields,PAWNO_CODER);
    if(rows)
    {
        for(new idx = 1; idx <= rows; idx++)
        {
            cache_get_field_content(0,"id",temp,PAWNO_CODER), CInfo[idx][id] = strval(temp);
            cache_get_field_content(0,"Name",CInfo[idx][Name],PAWNO_CODER);

                cache_get_field_content(0,"Level",temp,PAWNO_CODER), CInfo[idx][Level] = strval(temp);
            cache_get_field_content(0,"Driftscore",temp,PAWNO_CODER), CInfo[idx][Driftscore] = strval(temp);
            cache_get_field_content(0,"Money",temp,PAWNO_CODER), CInfo[idx][Money] = strval(temp);
            cache_get_field_content(0,"Maxplayer",temp,PAWNO_CODER), CInfo[idx][Maxplayer] = strval(temp);
            cache_get_field_content(0,"Skin",temp,PAWNO_CODER), CInfo[idx][Skin] = strval(temp);
            cache_get_field_content(0,"SpawnX",temp,PAWNO_CODER), CInfo[idx][SpawnX] = floatstr(temp);
            cache_get_field_content(0,"SpawnY",temp,PAWNO_CODER), CInfo[idx][SpawnY] = floatstr(temp);
            cache_get_field_content(0,"SpawnZ",temp,PAWNO_CODER), CInfo[idx][SpawnZ] = floatstr(temp);
                cache_get_field_content(0,"SpawnA",temp,PAWNO_CODER), CInfo[idx][SpawnA] = floatstr(temp);
            TOTALCLAN++;
                }
    }
    printf(" [SMSG]: Успешная загрузка 'LoadClan' - загружено %d за %d м.с", TOTALCLAN,GetTickCount() - time);
}

stock SetClanInt(idx, stolb[], znach)
{
        new query[128];
        f(query, "UPDATE "TABLE_CLAN" SET  %s = '%i' WHERE id = '%i' LIMIT 1", stolb, znach, idx);
        return mysql_query(query, -1, -1, PAWNO_CODER);
}
stock SetClanStr(idx, stolb[], znach[])
{
        new query[128];
        f(query, "UPDATE "TABLE_CLAN" SET  %s = '%s' WHERE id = '%i' LIMIT 1", stolb, znach, idx);
        return mysql_query(query, -1, -1, PAWNO_CODER);
}

 

Спойлер

CREATE TABLE `clan` (
  `id` int(20) NOT NULL auto_increment,
  `Name` varchar(32) character set utf8 NOT NULL default 'None',
  `Level` int(11) NOT NULL default '0',
  `Driftscore` int(11) NOT NULL default '0',
  `Money` int(11) NOT NULL default '0',
  `Maxplayer` int(11) NOT NULL default '10',
  `Skin` int(11) NOT NULL default '0',
  `SpawnX` varchar(32) character set utf8 NOT NULL default '0.0',
  `SpawnY` varchar(32) character set utf8 NOT NULL default '0.0',
  `SpawnZ` varchar(32) character set utf8 NOT NULL default '0.0',
  `SpawnA` varchar(32) character set utf8 NOT NULL default '0.0',
  PRIMARY KEY  (`id`)
) ENGINE=MyISAM AUTO_INCREMENT=16 DEFAULT CHARSET=cp1251 COLLATE=cp1251_bin AUTO_INCREMENT=16 ;

 


Автор: JoinT

Поделиться сообщением


Ссылка на сообщение
Поделиться на другие сайты
LilPokemon
Гуру форума
В 22.11.2017 в 23:58, SCRIPTMAN сказал:

Неплохо, но использовать формат в дефайне - лишнее.

Кому как удобней ) 

Поделиться сообщением


Ссылка на сообщение
Поделиться на другие сайты

Для публикации сообщений создайте учётную запись или авторизуйтесь

Вы должны быть пользователем, чтобы оставить комментарий

Создать учетную запись

Зарегистрируйте новую учётную запись в нашем сообществе. Это очень просто!


Регистрация нового пользователя

Войти

Уже есть аккаунт? Войти в систему.


Войти

  • Последние посетители   0 пользователей онлайн

    Ни одного зарегистрированного пользователя не просматривает данную страницу

  • Похожий контент

    • Helados
      От Helados
      Короче, мы протестировали наш GTA на другом хостинге — голосовой чат там работает, всё включается нормально. Также проверили на другом хостинге с нашим игровым модом — voice chat тоже работает.
      Но на нашем личном хостинге, который мы купили на OVH и установили панель, не получается запустить голосовой чат. Похоже, проблема связана с портами. После перезапуска сервер почему-то случайным образом выбирает порты сам и мы не можем это исправить.
      Если кто-то знает человека, который может помочь разобраться с этой проблемой, буду благодарен.
    • тимормо
      От тимормо
      Копия Diamond RP (основа State 99)
      Скачать файл Мод DIAMOND RP (ver. 1.0)
      Основа: State 99
      Автор мода: #TomSnow
      Вопросы/Баги: https://vk.com/etalon_dev
       
      Приветствую всех! На связи #TomSnow
       
      Я принял решение начать поэтапную разработку и восстановление легендарного мода Diamond RolePlay образца 2015–2017 годов, взяв за основу мод State 99 (оригинальная основа DRP).
       
      Каждая новая версия разрабатываемого мода будет публиковаться в открытом доступе для всех участников и подписчиков сообщества (https://vk.com/etalon_dev). Это позволит вам не только следить за процессом разработки, но и принимать непосредственное участие в развитии проекта: тестировать обновления, находить баги, сообщать о недоработках и помогать делать мод максимально качественным и стабильным.
       
      Если вам интересна данная тематика и вы хотите наблюдать за ходом разработки, подписывайтесь на нашу группу ВКонтакте (https://vk.com/etalon_dev) и ожидайте публикацию версий проекта.
       
      Спасибо всем за поддержку! Впереди нас ждёт много интересной работы и возвращение атмосферы классического Diamond RolePlay. 
       
      Информация о моде:
       
      Версия MySQL R 39-6
      Античит Nex-AC (Доработанный)
      Стример Streamer Plugin v2.9.4
      Командный процессор Pawn CMD
       
      Список обновлений мода
       
       
      Добавил тимормо Добавлено 07/15/26 Категория Моды Автор #TomSnow  
    • тимормо
      От тимормо
      Мод DIAMOND RP (ver. 1.0)
      Основа: State 99
      Автор мода: #TomSnow
      Вопросы/Баги: https://vk.com/etalon_dev
       
      Приветствую всех! На связи #TomSnow
       
      Я принял решение начать поэтапную разработку и восстановление легендарного мода Diamond RolePlay образца 2015–2017 годов, взяв за основу мод State 99 (оригинальная основа DRP).
       
      Каждая новая версия разрабатываемого мода будет публиковаться в открытом доступе для всех участников и подписчиков сообщества (https://vk.com/etalon_dev). Это позволит вам не только следить за процессом разработки, но и принимать непосредственное участие в развитии проекта: тестировать обновления, находить баги, сообщать о недоработках и помогать делать мод максимально качественным и стабильным.
       
      Если вам интересна данная тематика и вы хотите наблюдать за ходом разработки, подписывайтесь на нашу группу ВКонтакте (https://vk.com/etalon_dev) и ожидайте публикацию версий проекта.
       
      Спасибо всем за поддержку! Впереди нас ждёт много интересной работы и возвращение атмосферы классического Diamond RolePlay. 
       
      Информация о моде:
       
      Версия MySQL R 39-6
      Античит Nex-AC (Доработанный)
      Стример Streamer Plugin v2.9.4
      Командный процессор Pawn CMD
       
      Список обновлений мода
       
       
    • x4reo
      От x4reo
      EPOCH ROLE PLAY | ВОЗВРАЩЕНИЕ В 90-Е Создаем атмосферный Full RP проект без «фарма» и лишней «дичи»     О ПРОЕКТЕ Epoch Role Play — это площадка для тех, кто ценит качество, а не статистику. Мы строим живой мир, где каждое действие имеет последствия, а экономика строится на социальном взаимодействии.   КОГО МЫ ИЩЕМ? • Lead Developer (Pawn/C#/JS): Создание ядра мода, БД, оптимизация. • Mapper/Level Designer: Создание аутентичных интерьеров 90-х. • Game Designer: Проработка ролевых правил и сценариев. • SMM-менеджер: Ведение соцсетей, создание контента. • Дизайнер: Оформление медиа и UI проекта. • Discord-архитектор: Настройка каналов и безопасности. • Web-разработчик: Сайт и форум проекта. • Bot-developer (VK/TG): Безопасность: 2FA, привязка аккаунтов.   НАШИ УСЛОВИЯ 1. Энтузиазм: Проект стартует без бюджета. Мы ищем единомышленников. 2. Соавторство: Каждый участник — полноценный совладелец проекта. 3. Партнерство: Вся прибыль от монетизации распределяется пропорционально вкладу.     КОНТАКТЫ ДЛЯ СВЯЗИ Telegram: x4reoo