Marc
/
server
forked from github/server
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

- Vulkane und Nachbarregionen unattraktiver für Bauern gemacht.

This commit is contained in:
Christian Schlittchen 2002-02-18 22:09:46 +00:00
parent d5236f1ca1
commit 024c24e39b
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/common/gamecode/laws.c
View File

@ -446,15 +446,15 @@ calculate_emigration(region *r)
/* This calculates the influence of volcanos on peasant /* This calculates the influence of volcanos on peasant
* migration. */ * migration. */
if(rterrain(c) != T_VOLCANO) { if(rterrain(c) == T_VOLCANO || rterrain(c) == T_VOLCANO_SMOKING) {
vfactor = 0.25; vfactor = 0.10;
} else { } else {
vfactor = 1.00; vfactor = 1.00;
} }
for(j=0; j != MAXDIRECTIONS; j++) { for(j=0; j != MAXDIRECTIONS; j++) {
region *rv = rconnect(c, j); region *rv = rconnect(c, j);
if(rv && rterrain(rv) == T_VOLCANO) { if(rv && (rterrain(rv) == T_VOLCANO || rterrain(rv) == T_VOLCANO_SMOKING)) {
vfactor *= 0.5; vfactor *= 0.5;
break; break;
} }