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; if (n > raw) n = raw;
/* Fuer jeden Samen Talent*5% Erfolgschance. */ /* Talent * 5% der Samen setzen an (max 100%) */
for (i = n; i > 0; i--) { planted = n;
if (rng_int() % 100 < skill * 5) if (skill < 20) {
planted++; planted = planted * skill / 20;
} }
rsettrees(r, 1, rtrees(r, 1) + planted); rsettrees(r, 0, rtrees(r, 0) + planted);
/* Alles ok. Abziehen. */ /* Alles ok. Abziehen. */
produceexp(u, SK_HERBALISM, u->number); produceexp(u, SK_HERBALISM, u->number);