[Pawn] Генератор математических примеров

В теме 1 сообщение

Sleash
Завсегдатый

Всем доброго времени суток, сегодня я хочу Вам представить неоптимизированный из-за моей лени генератор математических примеров с ответами.
Без лишних слов перейдём к коду
Для начала нам надо добавить define для удобства использования:

#define skip:%0; {++%0;continue;}

Куда вы его поместите - дело Ваше, но желательно в начало мода. Тоже самое с функцией, преобразующей число в строку:

stock intToStr(a) {new asd[8]; format(asd, 8"%d", a); return asd;}

Теперь же давайте рассмотрим код самого генератора. Он умещён в одну функцию, очень длинную функцию:

Спойлер

stock CreateCase(strCase[], actions = 3, max_ints = 350, strSize = 128) {
    new answer = 0; ++actions;
    for(new i = actions; i > 0; i--) {
        new plussing = 1, rnd_act = random(101);
        if(60 <= rnd_act <= 80) {
            new Fint = random(max_ints/15);
            if(!Fint) skip:i;
            if(i != actions) {
                if(i < 2) skip:i; else i--;
                if(random(2)) strcat(strCase, "+", strSize);
                else strcat(strCase, "-", strSize), plussing = -1;
            }
            new Sint = max_ints/Fint;
            if(random(2)) strcat(strCase, intToStr(Fint), strSize), strcat(strCase, "*", strSize), answer += Fint*Sint*plussing;
            else strcat(strCase, intToStr(Fint*Sint), strSize), strcat(strCase, "/", strSize), answer += (Fint*Sint/Sint)*plussing;
            strcat(strCase, intToStr(Sint), strSize);
        } else if (80 < rnd_act <= 100) {
            if(i != actions) {
                if(i < 4) skip:i; else i--;
                if(random(2)) strcat(strCase, "+", strSize);
                else strcat(strCase, "-", strSize), plussing = -1;
            } if(i < 3) skip:i;
            new rnd_brac = random(i-2)+1;
            i -= rnd_brac;
            new strCaseBrackets[64]; new BrackAns = CreateCase(strCaseBrackets, rnd_brac, max_ints, 64);
            answer += BrackAns*plussing;
            strcat(strCase, "(", strSize); strcat(strCase, strCaseBrackets, strSize); strcat(strCase, ")", strSize);
        } else if(0 <= rnd_act <= 15) {
                new Fint = random(4)+1;
                if(i != actions) {
                    if(i < 2) skip:i; else i--;
                    if(random(2)) strcat(strCase, "+", strSize);
                    else strcat(strCase, "-", strSize), plussing = -1;
                }
                new Float:fSint = floatlog(max_ints*1.0, Fint*1.0);
                new Sint = floatround(fSint, floatround_ceil);
                strcat(strCase, intToStr(Sint), strSize);
                strcat(strCase, "^", strSize), answer += floatround(floatpower(Sint, Fint))*plussing;
                strcat(strCase, intToStr(Fint), strSize);
        } else {
            if(i != actions) {
                if(random(2)) strcat(strCase, "+", strSize);
                else strcat(strCase, "-", strSize), plussing = -1;
            }
            new intt = random(max_ints/2);
            strcat(strCase, intToStr(intt), strSize);
            answer += intt*plussing;
        }
    }
    return answer;
}

 

Чуть позже рассмотрим пример использования генератора, а сейчас разберёмся с параметрами:
strCase - строка, в которую запишется пример;
actions - количество действий в примере (Иногда генератор может вписывать на 1 действие больше)
max_ints - число, которое будет использоваться как максимум в отдельных действиях

Т. е. вычитаемое, слогамое, делимое, произведение и результат возведения в степень не будет больше max_ints

strSize - размер строки strCase. Так как в функциях невозможно определить размер через sizeof, а при strlen нельзя будет добавить числа, то я решил использовать эту пеерменную

Теперь само использование функции:

Спойлер

 


...(...) {  
    for(new i = 0; i < 10; i++) {                       // Цикл генерации 10-и примеров
        printf("-------------№%d------------", i+1);    // разделение примеров для удобного обозрения
        new strr[128];                                  // переменная для хранения примера
        new ans;                                        // переменная для хранения ответа
        ans = CreateCase(strr, 5350);                 // генерация примера и запись ответа
        printf("Case: %s", strr);                       // вывод примера
        printf("Answer: %d", ans);                      // вывод ответа
        printf("Real actions: %d", ChechActs(strr));    // вывод реального количества действий
    }
    ...
}
stock ChechActs(const str[]) {
    new acts = 0;
    for(new i = 0; i < strlen(str); i++) {
        switch(str[i]) {
            case '-','/','*','+','^': ++acts;
        }
    }
    return acts;
}

Внимание: В некоторых случаях может возникать следующе предупреждение в консоли:

[debug] Long callback execution detected (hang or performance issue)

Данное сообщение свидетельствует о том, что код долго выполняется, скорее всего из-за плохой оптимизации)

Назовём это ложкой дёгтя в бочке мёда)
После генерации 10-и примеров в консоли мы увидим следующее:

Спойлер

657dc736e04d5__2023-12-16_185014521.png.0619f19542c88a2436281538f3568c0e.png

Любой из примеров вы можете вбить в калькулятор и он выдаст тот же ответ, что и написан в консоли.
Этот генератор можно использовать в качестве проверки на бота или интерактива. Пример:

Спойлер

 


new tempAnswer;
forward CreateICCase();
public CreateICCase() {
    new tempCase[128];
    tempAnswer = CreateCase(tempCase, 3150);
    SendClientMessageToAll(-1"Введите ответ на следующий пример в /cans и получите приз:");
    SendClientMessageToAll(-1, tempCase);
}
public OnGameModeInit() {
    SetTimer("CreateICCase"1000*60*30true);
}
CMD:cans(playerid, params[]) {
    if(sscanf(params, "d", params[0])) return false;
    if(params[0] == tempAnswer) GivePlayerMoney(playerid, 5000);
    else SendClientMessage(playerid, -1"Неверный ответ");
    return 1;
}

Код выше далёк от того, который можно было бы использовать, как минимум потому, что нет ограничение на то, сколько раз давать ответ, но именно поэтому это и является всего лишь вводным примером.
А на этом я бы хотел закончить представление генератора примеров, всем спасибо за чтение!
UPDATE:
Забыл упомянуть, не стоит привязывать к такому интерактиву большие призы, так как написать Lua-скрипт, который решит такой пример довольно просто (знаю по себе, ибо сам такой же и писал)

Отредактировано пользователем Sleash

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


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

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

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

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

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


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

Войти

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


Войти

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

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

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

    • Daf
      От Daf


      Скачать файл FLIN RP [ФИКС БАГОВ]
      Мы провели значительную работу над миром игры:
       
      Исправлен баг с аксессуарами: раньше их не было, теперь они доступны.
      Устранён баг с правительством: не работали скины, мы их добавили.
      Решена проблема с дюпом в инвентаре.
      Теперь работает батллпас, и много исправлено мелких багов.
       
      Новое:
            1. Федеральная тюрьма — LS
            2. ФБР — на гору SF.
      Тюрьма (/jail/). 
      Административная зона. 
      Карта теперь включает маппинг.
      Здание мэрии было переработано.
      Для национальной гвардии добавлены новые скины.
      В организацию «Национальная гвардия» включены новые транспортные средства: лодки и танк.
      Мини баги: 
      7. У национальной гварди новый спавн.
      Исправлен баг с пикапами домв, я сам понять не могу с чего он мгли пропасть
      Кроме того, были перемещены следующие организации
      2. Рестарт каждый день в 5:01
      4. Еще были баги какторые исправлины, точно уже не помню 
       
      Почему такая цена, я уважаю свой труд, и поэтому.








       


      Добавил Daf Добавлено 08.01.2025 Категория Моды Автор Родион  
    • Daf
      От Daf
      Мы провели значительную работу над миром игры:
       
      Исправлен баг с аксессуарами: раньше их не было, теперь они доступны.
      Устранён баг с правительством: не работали скины, мы их добавили.
      Решена проблема с дюпом в инвентаре.
      Теперь работает батллпас, и много исправлено мелких багов.
       
      Новое:
            1. Федеральная тюрьма — LS
            2. ФБР — на гору SF.
      Тюрьма (/jail/). 
      Административная зона. 
      Карта теперь включает маппинг.
      Здание мэрии было переработано.
      Для национальной гвардии добавлены новые скины.
      В организацию «Национальная гвардия» включены новые транспортные средства: лодки и танк.
      Мини баги: 
      7. У национальной гварди новый спавн.
      Исправлен баг с пикапами домв, я сам понять не могу с чего он мгли пропасть
      Кроме того, были перемещены следующие организации
      2. Рестарт каждый день в 5:01
      4. Еще были баги какторые исправлины, точно уже не помню 
       
      Почему такая цена, я уважаю свой труд, и поэтому.








       


    • CRYSTAL_#pawno
      От CRYSTAL_#pawno
      Данная команда делает ник администратора красным и в карте тоже будет виден красным цветом.
       
      Сделал ещё в этой команде рядом с ником админа [ADM] выглядеть будет как то так: [ADM]Nick_Name все это будет выглядеть красным цветом.
      onadm.pwn