| … | |
… | |
| 89 | |
89 | |
| 90 | if ($r <= $ch or $pl->flag (cf::FLAG_WIZ)) { |
90 | if ($r <= $ch or $pl->flag (cf::FLAG_WIZ)) { |
| 91 | $exp = $ring->projected_exp ($input_level); |
91 | $exp = $ring->projected_exp ($input_level); |
| 92 | |
92 | |
| 93 | $pl->change_exp ($exp, "jeweler", cf::SK_EXP_SKILL_ONLY); |
93 | $pl->change_exp ($exp, "jeweler", cf::SK_EXP_SKILL_ONLY); |
|
|
94 | $pl->message ( |
| 94 | $pl->message ("You succeed and get $exp experience points."); |
95 | "You succeed and get " . int ($exp) . " experience points."); |
| 95 | $make_status = "succeeded"; |
96 | $make_status = "succeeded"; |
| 96 | |
97 | |
| 97 | $ring->set_value ($value * 0.8); # 20% of the input values will vanish |
98 | $ring->set_value ($value * 0.8); # 20% of the input values will vanish |
| 98 | |
99 | |
| 99 | } else { |
100 | } else { |
