| … | |
… | |
| 756 | roll_stat (void) |
756 | roll_stat (void) |
| 757 | { |
757 | { |
| 758 | int a[4], i, j, k; |
758 | int a[4], i, j, k; |
| 759 | |
759 | |
| 760 | for (i = 0; i < 4; i++) |
760 | for (i = 0; i < 4; i++) |
| 761 | a[i] = (int) RANDOM () % 6 + 1; |
761 | a[i] = (int) rndm (6) + 1; |
| 762 | |
762 | |
| 763 | for (i = 0, j = 0, k = 7; i < 4; i++) |
763 | for (i = 0, j = 0, k = 7; i < 4; i++) |
| 764 | if (a[i] < k) |
764 | if (a[i] < k) |
| 765 | k = a[i], j = i; |
765 | k = a[i], j = i; |
| 766 | |
766 | |
| … | |
… | |
| 2211 | return 0; |
2211 | return 0; |
| 2212 | } |
2212 | } |
| 2213 | |
2213 | |
| 2214 | /* peterm: added following line */ |
2214 | /* peterm: added following line */ |
| 2215 | if (QUERY_FLAG (op, FLAG_CONFUSED) && dir) |
2215 | if (QUERY_FLAG (op, FLAG_CONFUSED) && dir) |
| 2216 | dir = absdir (dir + RANDOM () % 3 + RANDOM () % 3 - 2); |
2216 | dir = absdir (dir + rndm (3) + rndm (3) - 2); |
| 2217 | |
2217 | |
| 2218 | op->facing = dir; |
2218 | op->facing = dir; |
| 2219 | |
2219 | |
| 2220 | if (op->hide) |
2220 | if (op->hide) |
| 2221 | do_hidden_move (op); |
2221 | do_hidden_move (op); |
| … | |
… | |
| 2982 | tmp->x = op->x, tmp->y = op->y; |
2982 | tmp->x = op->x, tmp->y = op->y; |
| 2983 | if (tmp->type == CONTAINER) |
2983 | if (tmp->type == CONTAINER) |
| 2984 | { /* empty container to ground */ |
2984 | { /* empty container to ground */ |
| 2985 | loot_object (tmp); |
2985 | loot_object (tmp); |
| 2986 | } |
2986 | } |
| 2987 | if (!QUERY_FLAG (tmp, FLAG_UNIQUE) && (QUERY_FLAG (tmp, FLAG_STARTEQUIP) || QUERY_FLAG (tmp, FLAG_NO_DROP) || !(RANDOM () % 3))) |
2987 | if (!QUERY_FLAG (tmp, FLAG_UNIQUE) && (QUERY_FLAG (tmp, FLAG_STARTEQUIP) || QUERY_FLAG (tmp, FLAG_NO_DROP) || !(rndm (3)))) |
| 2988 | { |
2988 | { |
| 2989 | if (tmp->nrof > 1) |
2989 | if (tmp->nrof > 1) |
| 2990 | { |
2990 | { |
| 2991 | tmp2 = get_split_ob (tmp, 1 + RANDOM () % (tmp->nrof - 1)); |
2991 | tmp2 = get_split_ob (tmp, 1 + RANDOM () % (tmp->nrof - 1)); |
| 2992 | tmp2->destroy (); |
2992 | tmp2->destroy (); |
