| … | … | ||
|---|---|---|---|
| 80 | $ingred->remove ('ammys'); | 80 | $ingred->remove ('ammys'); |
| 81 | } | 81 | } |
| 82 | 82 | ||
| 83 | my $ch = $ring->get_chance_perc ($sk); | 83 | my $ch = $ring->get_chance_perc ($sk); |
| 84 | my $succ = 0; | 84 | my $succ = 0; |
| 85 | my $r = cf::random_roll (0, 100, $pl, cf::PREFER_HIGH); | 85 | my $r = cf::random_roll (0, 100, $pl, cf::PREFER_LOW); |
| 86 | 86 | ||
| 87 | my $make_status; | 87 | my $make_status; |
| 88 | my $exp; | 88 | my $exp; |
| 89 | 89 | ||
| 90 | if ($r <= $ch or $pl->flag (cf::FLAG_WIZ)) { | 90 | if ($r <= $ch or $pl->flag (cf::FLAG_WIZ)) { |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |