Пробелы между цифрами

[Daniel_Cortez]

Не обращал на это внимание. Учту.

Справедливости ради, стоит также отметить, что и функция strins игнорирует передаваемый ей размер массива и может записать лишние символы за его пределы. Наверное, именно это vvw и имел в виду изначально.

А точки или запятые можно ли так поставить

Да, для этого в приведённых в этой теме функциях есть параметр delimiter.

---

Немного поэкспериментировал и, кажется, нашёл оптимальный вариант реализации функции:

stock bool:FormatIntWithDelimiters(value, outstr[], delimiter = '.', size = sizeof(outstr)){    static delimiter_string[2] = { '\0', '\0' };    static len;    delimiter_string[0] = delimiter;    if (value != cellmin)        format(outstr, size, "%d", value);    else        outstr[0] = '\0', strcat(outstr, "-2147483648", size);    len = strlen(outstr);    switch (len - _:(value < 0))    {        case 10:        {            if (len + 3 >= size)                return false;            strins(outstr, delimiter_string, len - 3, 1);            strins(outstr, delimiter_string, len - 6, 1);            strins(outstr, delimiter_string, len - 9, 1);        }        case 7..9:        {            if (len + 2 >= size)                return false;            strins(outstr, delimiter_string, len - 3, 1);            strins(outstr, delimiter_string, len - 6, 1);        }        case 4..6:        {            if (len + 1 >= size)                return false;            strins(outstr, delimiter_string, len - 3, 1);        }    }    return true;}

Отличается от других представленных в этой теме вариантов тем, что не подвержена багу с возвратом строки (сформатированная строка возвращается косвенно) и не производит лишних манипуляций с отдельной вставкой знака "-" и возвратом строки через стек.

[vvw]

Приведи пример

Только сейчас заметил, что space, он же delimiter, имеет неявный размер, что также может привести к ошибке OOB.

- - - Добавлено - - -

Вообще, ИМХО, вариант DeimoS'а выглядит почти идеальным, не считая перестановки всех элементов массива при вставке "-" (наверняка можно реализовать это как-то получше) и ещё пары уже упомянутых нюансов. Также настораживает в том варианте повторяющийся код внутри switch, но это такая особенность Pawn, что нельзя сделать, чтобы из одного case нельзя было "провалиться" в следующий, как в C/C++. Впрочем, это не ещё значит, что такую возможность нельзя добавить в компилятор :)

В последнее время очень много добавляют в компилятор. Это, с одной стороны, хорошо, а с другой стороны - уже другой язык без документации. Хотя сделать fallthrough (__fallthrough) нужно.

[tnc]

Если подключен Pawn.Regex, то можно паттерном это решить (это просто альтернативное решение)

[Kovshevoy]

Вставлю и свои 5 копеек.

FormatNumber(number, prefix[] = "$"){    new value[15],        length;     format(value, sizeof(value), "%d", (number < 0) ? (-number) : (number));     if ((length = strlen(value)) > 3)    {        for (new i = length, l = 0; --i >= 0; l ++)         {            if ((l > 0) && (l % 3 == 0)) strins(value, ",", i + 1);        }    }    if (prefix[0] != 0)        strins(value, prefix, 0);     if (number < 0)        strins(value, "-", 0);     return value;}

Выглядит вот так:

  Открыть/закрыть

Если не работает скриншот под спойлером - Клик-клик-клик

Команда для теста (зависимость от sscanf, zcmd/DC_CMD/Pawn.CMD/izcmd и прочих обработчиков синтаксиса zcmd):

CMD:test(playerid, params[]){    new const fmt_str[] = "{FF9900}[debug]{F6F6F6}: %s";    new arr_sizeof[sizeof fmt_str + (-2 + 15)];     extract params -> new value; else        return SendClientMessage(playerid, -1, "/test [value]");     format(arr_sizeof, sizeof(arr_sizeof), fmt_str, FormatNumber(value));    SendClientMessage(playerid, -1, arr_sizeof);    return 1;}

[DeimoS]

Вставлю и свои 5 копеек.

FormatNumber(number, prefix[] = "$"){    new value[15],        length;     format(value, sizeof(value), "%d", (number < 0) ? (-number) : (number));     if ((length = strlen(value)) > 3)    {        for (new i = length, l = 0; --i >= 0; l ++)         {            if ((l > 0) && (l % 3 == 0)) strins(value, ",", i + 1);        }    }    if (prefix[0] != 0)        strins(value, prefix, 0);     if (number < 0)        strins(value, "-", 0);     return value;}

Выглядит вот так:

  Открыть/закрыть

Если не работает скриншот под спойлером - Клик-клик-клик

Команда для теста (зависимость от sscanf, zcmd/DC_CMD/Pawn.CMD/izcmd и прочих обработчиков синтаксиса zcmd):

CMD:test(playerid, params[]){    new const fmt_str[] = "{FF9900}[debug]{F6F6F6}: %s";    new arr_sizeof[sizeof fmt_str + (-2 + 15)];     extract params -> new value; else        return SendClientMessage(playerid, -1, "/test [value]");     format(arr_sizeof, sizeof(arr_sizeof), fmt_str, FormatNumber(value));    SendClientMessage(playerid, -1, arr_sizeof);    return 1;}

Эмм, и смысл перебирать каждый символ, при этом, тратя время на деление, если можно сразу узнать количество символов в числе и расставить разделители? Собственно, как в моём варианте функции сделано.

[$continue$]

Справедливости ради, стоит также отметить, что и функция strins игнорирует передаваемый ей размер массива и может записать лишние символы за его пределы. Наверное, именно это vvw и имел в виду изначально.


Да, для этого в приведённых в этой теме функциях есть параметр delimiter.

---

Немного поэкспериментировал и, кажется, нашёл оптимальный вариант реализации функции:

stock bool:FormatIntWithDelimiters(value, outstr[], delimiter = '.', size = sizeof(outstr)){    static delimiter_string[2] = { '\0', '\0' };    static len;    delimiter_string[0] = delimiter;    if (value != cellmin)        format(outstr, size, "%d", value);    else        outstr[0] = '\0', strcat(outstr, "-2147483648", size);    len = strlen(outstr);    switch (len - _:(value < 0))    {        case 10:        {            if (len + 3 >= size)                return false;            strins(outstr, delimiter_string, len - 3, 1);            strins(outstr, delimiter_string, len - 6, 1);            strins(outstr, delimiter_string, len - 9, 1);        }        case 7..9:        {            if (len + 2 >= size)                return false;            strins(outstr, delimiter_string, len - 3, 1);            strins(outstr, delimiter_string, len - 6, 1);        }        case 4..6:        {            if (len + 1 >= size)                return false;            strins(outstr, delimiter_string, len - 3, 1);        }    }    return true;}

Отличается от других представленных в этой теме вариантов тем, что не подвержена багу с возвратом строки (сформатированная строка возвращается косвенно) и не производит лишних манипуляций с отдельной вставкой знака "-" и возвратом строки через стек.

С fixes вызывает выходы за пределы массива. (Не знаю почему, не было времени разобраться. Скорее всего что-то связанное с фиксом размера maxlength, но я не уверен. Нужно дебагать). Банальный фикс выглядит примерно так:

#include <a_samp>#include <fixes> forward bool:FormatIntWithDelimiters(value, outstr[], delimiter = '.', size = sizeof(outstr)); main(){    static const nums[] =     {        500,        1_000,        10_000,        100_000,        1_000_000,        cellmax    };     new str_num[64];     for (new i = 0; i < sizeof(nums); i++)    {        FormatIntWithDelimiters(nums[i], str_num);        printf("str_num: %s", str_num);        str_num[0] = '\0';    }} stock bool:FormatIntWithDelimiters(value, outstr[], delimiter = '.', size = sizeof(outstr)){    static delimiter_string[2] = { '\0', '\0' };    static len;    delimiter_string[0] = delimiter;    if (value != cellmin)        format(outstr, size, "%d", value);    else        outstr[0] = '\0', strcat(outstr, "-2147483648", size);    len = strlen(outstr);    switch (len - _:(value < 0))    {        case 10:        {            if (len + 3 >= size)                return false;             format(outstr, size, "%.*s%s%s", len - 3, outstr, delimiter_string, outstr[len - 3]);            format(outstr, size, "%.*s%s%s", len - 6, outstr, delimiter_string, outstr[len - 6]);            format(outstr, size, "%.*s%s%s", len - 9, outstr, delimiter_string, outstr[len - 9]);        }        case 7..9:        {            if (len + 2 >= size)                return false;             format(outstr, size, "%.*s%s%s", len - 3, outstr, delimiter_string, outstr[len - 3]);            format(outstr, size, "%.*s%s%s", len - 6, outstr, delimiter_string, outstr[len - 6]);        }        case 4..6:        {            if (len + 1 >= size)                return false;             format(outstr, size, "%.*s%s%s", len - 3, outstr, delimiter_string, outstr[len - 3]);        }    }    return true;}

P.S: Не знаю насколько оправдан тут format, но мне нужен был быстрый фикс