Gammon Forum

/*                                                                  -Thoric
 * Fancy dice expression parsing complete with order of operations,
 * simple exponent support, dice support as well as a few extra
 * variables: L = level, H = hp, M = mana, V = move, S = str, X = dex
 *            I = int, W = wis, C = con, A = cha, U = luck, A = age
 *
 * Used for spell dice parsing, ie: 3d8+L-6
 *
 */
i

   switch(operation)
    {
        case '-':               total -= rd_parse(ch, level, sexp[1]);  break;
        case '+':               total += rd_parse(ch, level, sexp[1]);  break;
        case '*':               total *= rd_parse(ch, level, sexp[1]);  break;
        case '/':               total /= rd_parse(ch, level, sexp[1]);  break;
        case '%':               total %= rd_parse(ch, level, sexp[1]);  break;
        case 'd': case 'D':     total = dice( total, rd_parse(ch, level, sexp[1]
) );    break;
        case '<':               total = (total < rd_parse(ch, level, sexp[1]));
        break;
        case '>':               total = (total > rd_parse(ch, level, sexp[1]));
        break;
        case '=':               total = (total == rd_parse(ch, level, sexp[1]));
        break;
        case '{':               total = UMIN( total, rd_parse(ch, level, sexp[1]
) );    break;
        case '}':               total = UMAX( total, rd_parse(ch, level, sexp[1]
) );    break;

        case '^':
        {
            int y = rd_parse(ch, level, sexp[1]), z = total;

            for (x = 1; x < y; ++x, z *= total);
            total = z;
            break;
        }
    }
    return total;

To make the special SMAUG spells possible, special dice formula handling
had to be coded in.  (At least to make it nice).  This dice formula code
supports full BEDMAS expressions ( ) ^^ / * + -, plus extra mud related
operators and variables:

D dice         L level          H hit points      M mana
V movement     S strength       I intelligence    W wisdom
X dexterity    C consitution    A charisma        U luck
Y age