KlasterK

Диалоговые хуки

В теме 3 сообщения

Привет, форумчане. Не знаю, мб кто-то это уже придумал, но я вам представляю систему хукования диалогов.

Хукование может уменьшить производительность во время ответа на диалог, но зато предоставляет удобство для скриптера.

// Макрос-хук. Аргумент после двоеточия: dialogid.
// Аргументы в скобках: playerid, response, listitem, inputtext[]
#define DIA:%0(%1,%2,%3,%4) forward dia@%0(%1,%2,%3,%4); public dia@%0(%1,%2,%3,%4)

public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[]
{
    new callback[10]; // Строка для вызова хука. Размер: dia@ (4 символа) + ID диалога (максимум 32767, 5 символов) + \0
    format(callback, 10"dia@%d", dialogid); // Форматирование строки
    CallLocalFunction(callback, "ddds", playerid, response, listitem, inputtext); // Сам вызов хука
}

// Пример со списком
CMD:choice(playerid, params[]) // Команда на DC_CMD/ZCMD
    return ShowPlayerDialog(playerid, 100, DIALOG_STYLE_LIST, "Опрос""Партия За Правду\n\
    Партия Справедливый Сан Андреас""Выбрать""Отмена"); // Диалог 100 с двумя пунктами

DIA:100(playerid, resp, item, text[]) // Хук на диалог 100
{
    if(resp) // Если нажата первая кнопка
    {
        if(item == 0) SendClientMessage(playerid, 0x00FF00AA"Хороший выбор!"); // Ответ на 1 пункт
        else          SendClientMessage(playerid, 0xFF0000AA"Плохой выбор!" ); // Ответ на 2 пункт
    }
}

// Пример с вводом
CMD:input(playerid, params[])
{
    return ShowPlayerDialog(playerid, 200, DIALOG_STYLE_INPUT, "Ввод""Введите ваш отзыв о сервере!",
    "Отправить""Отмена"); // Диалог 100 с вводом строки
}

DIA:200(playerid, response, listitem, inputtext[]) // Хук на диалог 200
{
    if(response) // Если нажата первая кнопка
    {
        new query[100], name[24], ret; // Строка для запроса, имени игрока и 
        GetPlayerName(playerid, name, 24); // Получение имени
        format(query, 100"INSERT INTO comments ( name, review ) VALUES ( %s, %s )", name, inputtext); // Форматирование запроса
        ret = db_query(mainDB, query); // Отправка запроса a_sampdb
        db_free_result(ret); // Очистка запроса
    }
}

 

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


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

@KlasterK, а чем библиотека mdialog вам не угодила (были еще некоторые, вроде edialog)?

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


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

@Cawfee 

  В 10/15/2023 в 07:06, KlasterK сказал:

мб кто-то это уже придумал

Читать далее...  

 

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


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

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

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

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

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


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

Войти

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


Войти

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

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

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

    • Dev_Persona
      От Dev_Persona
      Приветствую всех, у меня возник такой вопрос:
       
      - хочу изменить базовую регистрацию в админке в крмп, на Болле сложную то-есть, сейчас изначально пароль от админки может быть только из цифр, хотелось бы узнать как можно было бы сделать что бы можно было использовать и цифры и буквы, вот код:
       
      case DIALOG_ADMIN_REG:
         {
          if(!response) return FixKick(playerid);
       
          if(strval(inputtext) < 100000 || strval(inputtext) > 999999) return ShowPlayerDialog(playerid, DIALOG_ADMIN_REG, DIALOG_STYLE_INPUT, "{FF6347}"PROJECT_NAME" {ffffff}| Придумайте пароль", "{FFFFFF}Для того, чтобы продолжить дальше - придумайте и введите\n{FFFFFF}пароль от панели администратора в диалоговое поле ниже.\n\n{FFFFFF}Пароль должен быть из 6 цифр.\n", "Готово", "");
                   SetPlayerData(playerid, P_APASS, strval(inputtext));
       
                   UpdatePlayerDatabaseInt(playerid, "AdminPassword", GetPlayerData(playerid, P_APASS));
       
                   AdminAuthorization(playerid);
         }
    • MetaLife Online
      От MetaLife Online
      Приветствую! Код мода не отпровляет данные на БД все правильно подключенно и написанно(копировал с phpmyadmin) но данные не отпровляет. но с БД на сервер приходит сообщение 
       
      new MySQL:dbHandle; new MySQL:dbHandle; #define Host "127.0.0.1" #define User "root" #define DataBase "metalife" #define Password_SQL "" dbHandle = mysql_connect(Host,User,Password_SQL, DataBase);     if(mysql_errno())     {         printf("Подключение к базе данных %s не удалось.",DataBase); // %s означает строку. То есть будет выводить название базы данных которое указано в #define DataBase     }     else     {         printf("Подключение к базе данных %s успешно",DataBase);     }     format(query, sizeof(query), "INSERT INTO `Users`(`Nick`, `Password`, `Gender`, `Skin`) VALUES ('%s','%s','%d','%d')",player_name, player_info[playerid][P_PASS], player_info[playerid][P_GENDER], player_info[playerid][P_SKIN]);     mysql_tquery(dbHandle, query); SA-MP Dedicated Server ---------------------- v0.3.7-R2, (C)2005-2015 SA-MP Team [15:34:54] weburl = "www.sa-mp.com"  (string) [15:34:54]  [15:34:54] Server Plugins [15:34:54] -------------- [15:34:54]  Loading plugin: mysql [15:34:55]  >> plugin.mysql: R41-4 successfully loaded. [15:34:55]   Loaded. [15:34:55]  Loaded 1 plugins. [15:34:55]  [15:34:55] Filterscripts [15:34:55] --------------- [15:34:55]   Loaded 0 filterscripts. [15:34:55] Подключение к базе данных metalife успешно [15:34:55]  ---------------------------------- [15:34:55]  MetaLife Online [15:34:55] ---------------------------------- [15:34:55] Number of vehicle models: 1 При Регестрации не опровляються данные (фото)
      Но если записать рукой данные (фото 2)  
      выполняеться эта эта функция(фото 3(чат) и код )
      forward CheckAccountFromMySql(playerid); public CheckAccountFromMySql(playerid) {     new str[256];     if(cache_num_rows() == 0)     {         new player_name[MAX_PLAYER_NAME + 1];         GetPlayerName(playerid, player_name, MAX_PLAYER_NAME);         format(str, sizeof(str), " {ffffff}Добро пожаловать!\n Аккаунта с таким ником %s нет\nДля Регестрации придумайте и введите пароль в поле ниже!", player_name);         SPD(playerid, DLG_REG, DSP, "Регестрация", str, "Войти", "Выйти");     }     else     {         SCM(playerid, color_green, "Вы  зарегестрырованы!");     }     return 1; } // выполняеться else  ошибу и варнинги mysql
      [15:47:39] [WARNING] mysql_connect: no password specified (C:\Project\Metalife\gamemodes\MetaLife.pwn:92) dbHandle = mysql_connect(Host,User,Password_SQL, DataBase); // 92 строка