bug 2625 samen werden direkt zu schoesslingen

This commit is contained in:
Enno Rehling 2020-01-02 12:10:38 +01:00
parent dcf9b9df26
commit 4f88bf137e
1 changed files with 5 additions and 5 deletions

View File

@ -1775,12 +1775,12 @@ static void breedtrees(unit * u, int raw)
}
if (n > raw) n = raw;
/* Fuer jeden Samen Talent*5% Erfolgschance. */
for (i = n; i > 0; i--) {
if (rng_int() % 100 < skill * 5)
planted++;
/* Talent * 5% der Samen setzen an (max 100%) */
planted = n;
if (skill < 20) {
planted = planted * skill / 20;
}
rsettrees(r, 1, rtrees(r, 1) + planted);
rsettrees(r, 0, rtrees(r, 0) + planted);
/* Alles ok. Abziehen. */
produceexp(u, SK_HERBALISM, u->number);