Making special islands more attractive

This commit is contained in:
Enno Rehling 2004-10-14 07:10:03 +00:00
parent cad9a8b86d
commit 419442d887
1 changed files with 8 additions and 4 deletions

View File

@ -398,6 +398,10 @@ mkisland(int nsize)
special = 1;
}
terraform(rn, terrain);
/* the new region has an extra 15% chance to have laen */
if (rand() % 100 < 15) rsetlaen(r, 5 + rand() % 5);
/* the new region has an extra 20% chance to have mallorn */
if (rand() % 100 < 20) fset(r, RF_MALLORN);
add_regionlist(rend, rn);
}
}