forked from github/server
Merge remote-tracking branch 'upstream/master'
Conflicts: src/buildno.h
This commit is contained in:
commit
4649a0861d
|
@ -9,3 +9,6 @@ before_install:
|
|||
os:
|
||||
- linux
|
||||
- osx
|
||||
notifications:
|
||||
slack:
|
||||
secure: F89aXLWaE125PaJIlETv12jT4EfH6wLXJmGCPZzrN3OcLn2ahDWqjwuzR7lOEDf2nAISmeMPyDZMhEHXLNHAE5qP6lg9yliYQw5hzGmDK9m1xUq/pPEne/b2Y7K3my1mkRZ6n3asbHgSmBWAfCIk1JN8R5Rv+rmbLuWLc+zofts=
|
||||
|
|
|
@ -33,10 +33,13 @@
|
|||
<xi:include href="config:///default/adamantium.xml"/>
|
||||
<equipment>
|
||||
<set name="first_unit">
|
||||
<item name="conquesttoken" amount="1"/>
|
||||
<item name="log" amount="30"/>
|
||||
<item name="stone" amount="30"/>
|
||||
<item name="money" amount="4200"/>
|
||||
<item name="log" amount="50"/>
|
||||
<item name="stone" amount="50"/>
|
||||
<item name="iron" amount="50"/>
|
||||
<item name="laen" amount="10"/>
|
||||
<item name="mallorn" amount="10"/>
|
||||
<item name="skillpotion" amount="5"/>
|
||||
<item name="money" amount="20000"/>
|
||||
</set>
|
||||
<set name="new_faction">
|
||||
<item name="adamantium" amount="1"/>
|
||||
|
@ -89,7 +92,7 @@
|
|||
<param name="entertain.base" value="0"/>
|
||||
<param name="entertain.perlevel" value="20"/>
|
||||
<param name="nmr.timeout" value="5"/>
|
||||
<param name="nmr.removenewbie" value="10"/>
|
||||
<param name="nmr.removenewbie" value="0"/>
|
||||
<param name="GiveRestriction" value="3"/>
|
||||
<param name="hunger.long" value="1"/>
|
||||
<param name="init_spells" value="0"/>
|
||||
|
|
|
@ -32,7 +32,6 @@
|
|||
|
||||
<equipment>
|
||||
<set name="first_unit">
|
||||
<item name="conquesttoken" amount="1"/>
|
||||
<item name="log" amount="10"/>
|
||||
<item name="stone" amount="10"/>
|
||||
<item name="money" amount="5000"/>
|
||||
|
|
|
@ -32,7 +32,6 @@
|
|||
|
||||
<equipment>
|
||||
<set name="first_unit">
|
||||
<item name="conquesttoken" amount="1"/>
|
||||
<item name="log" amount="10"/>
|
||||
<item name="stone" amount="10"/>
|
||||
<item name="money" amount="5000"/>
|
||||
|
|
2
s/build
2
s/build
|
@ -6,6 +6,7 @@ done
|
|||
|
||||
[ -z $BUILD ] && BUILD=Debug
|
||||
MACHINE=`uname -m`
|
||||
[ -z "$CC" ] && [ ! -z `which clang` ] && CC="clang"
|
||||
[ -z "$CC" ] && [ ! -z `which gcc` ] && CC="gcc"
|
||||
[ -z "$CC" ] && [ ! -z `which tcc` ] && CC="tcc"
|
||||
[ -z "$CC" ] && [ ! -z `which cc` ] && CC="cc"
|
||||
|
@ -29,6 +30,7 @@ if [ ! -d $ROOT/$BIN_DIR ]; then
|
|||
exit
|
||||
fi
|
||||
|
||||
git submodule update
|
||||
cd $ROOT/$BIN_DIR
|
||||
make $MAKEOPTS && make test
|
||||
cd $OLDPWD
|
||||
|
|
|
@ -10,6 +10,7 @@ done
|
|||
|
||||
[ -z $BUILD ] && BUILD=Debug
|
||||
MACHINE=`uname -m`
|
||||
[ -z "$CC" ] && [ ! -z `which clang` ] && CC="clang"
|
||||
[ -z "$CC" ] && [ ! -z `which gcc` ] && CC="gcc"
|
||||
[ -z "$CC" ] && [ ! -z `which tcc` ] && CC="tcc"
|
||||
[ -z "$CC" ] && [ ! -z `which cc` ] && CC="cc"
|
||||
|
|
|
@ -24,6 +24,7 @@ assert_dir $SOURCE
|
|||
cd $SOURCE
|
||||
git fetch || abort "failed to update source. do you have local changes?"
|
||||
[ -z $1 ] || git checkout $1
|
||||
git pull
|
||||
git submodule update
|
||||
s/build || abort "build failed."
|
||||
}
|
||||
|
|
|
@ -7,6 +7,7 @@ while [ ! -d $ROOT/.git ]; do
|
|||
done
|
||||
|
||||
MACHINE=`uname -m`
|
||||
[ -z "$CC" ] && [ ! -z `which clang` ] && CC="clang"
|
||||
[ -z "$CC" ] && [ ! -z `which gcc` ] && CC="gcc"
|
||||
[ -z "$CC" ] && [ ! -z `which tcc` ] && CC="tcc"
|
||||
[ -z "$CC" ] && [ ! -z `which cc` ] && CC="cc"
|
||||
|
|
|
@ -26,7 +26,6 @@ module("tests.eressea.common", package.seeall, lunit.testcase)
|
|||
|
||||
function setup()
|
||||
eressea.free_game()
|
||||
eressea.settings.set("nmr.removenewbie", "0")
|
||||
eressea.settings.set("nmr.timeout", "0")
|
||||
eressea.settings.set("NewbieImmunity", "0")
|
||||
eressea.settings.set("rules.economy.food", "4")
|
||||
|
@ -981,7 +980,6 @@ module("tests.report", package.seeall, lunit.testcase)
|
|||
|
||||
function setup()
|
||||
eressea.free_game()
|
||||
eressea.settings.set("nmr.removenewbie", "0")
|
||||
eressea.settings.set("nmr.timeout", "0")
|
||||
eressea.settings.set("rules.economy.food", "4")
|
||||
end
|
||||
|
|
|
@ -16,7 +16,6 @@ function setup()
|
|||
u = _G.unit.create(f, r, 1)
|
||||
u:clear_orders()
|
||||
eressea.settings.set("rules.economy.food", "4")
|
||||
eressea.settings.set("nmr.removenewbie", "0")
|
||||
eressea.settings.set("nmr.timeout", "0")
|
||||
eressea.settings.set("NewbieImmunity", "0")
|
||||
end
|
||||
|
|
|
@ -17,51 +17,12 @@ end
|
|||
local function seed(r, email, race, lang)
|
||||
local f = faction.create(email, race, lang)
|
||||
local u = unit.create(f, r)
|
||||
equip_unit(u, "new_faction")
|
||||
equip_unit(u, "first_unit")
|
||||
equip_unit(u, "first_" .. race, 7) -- disable old callbacks
|
||||
u:set_skill("perception", 30)
|
||||
u:add_item("money", 20000)
|
||||
items = {
|
||||
log = 50,
|
||||
stone = 50,
|
||||
iron = 50,
|
||||
laen = 10,
|
||||
mallorn = 10,
|
||||
skillpotion = 5
|
||||
}
|
||||
for it, num in pairs(items) do
|
||||
u:add_item(it, num)
|
||||
end
|
||||
u = nil
|
||||
skills ={
|
||||
"crossbow",
|
||||
"bow",
|
||||
"building",
|
||||
"trade",
|
||||
"forestry",
|
||||
"catapult",
|
||||
"herbalism",
|
||||
"training",
|
||||
"riding",
|
||||
"armorer",
|
||||
"shipcraft",
|
||||
"melee",
|
||||
"sailing",
|
||||
"polearm",
|
||||
"espionage",
|
||||
"roadwork",
|
||||
"tactics",
|
||||
"stealth",
|
||||
"weaponsmithing",
|
||||
"cartmaking",
|
||||
"taxation",
|
||||
"stamina"
|
||||
}
|
||||
unit.create(f, r, 50):set_skill("entertainment", 15)
|
||||
unit.create(f, r, 5):set_skill("mining", 30)
|
||||
unit.create(f, r, 5):set_skill("quarrying", 30)
|
||||
for _, sk in ipairs(skills) do
|
||||
u = u or unit.create(f, r, 5)
|
||||
if u:set_skill(sk, 15)>0 then u=nil end
|
||||
end
|
||||
return f
|
||||
end
|
||||
|
||||
|
@ -94,11 +55,17 @@ end
|
|||
math.randomseed(os.time())
|
||||
|
||||
local newbs = {}
|
||||
local per_region = 2
|
||||
local num_seeded = 2
|
||||
local start = nil
|
||||
for _, p in ipairs(players) do
|
||||
local index = math.random(#sel)
|
||||
local start = nil
|
||||
while not start or start.units() do
|
||||
start = sel[index]
|
||||
if num_seeded == per_region then
|
||||
while not start or start.units() do
|
||||
local index = math.random(#sel)
|
||||
start = sel[index]
|
||||
end
|
||||
create_curse(nil, r, 'holyground', 1, 52)
|
||||
num_seeded = 0
|
||||
end
|
||||
local dupe = false
|
||||
for f in factions() do
|
||||
|
@ -109,6 +76,7 @@ for _, p in ipairs(players) do
|
|||
end
|
||||
end
|
||||
if not dupe then
|
||||
num_seeded = num_seeded + 1
|
||||
f = seed(start, p.email, p.race or "human", p.lang or "de")
|
||||
print("new faction ".. tostring(f) .. " starts in ".. tostring(start))
|
||||
table.insert(newbs, f)
|
||||
|
|
|
@ -6,7 +6,7 @@ local function score(r, res)
|
|||
local x, y, rn
|
||||
local peas = r:get_resource(res)
|
||||
for _, rn in pairs(r.adj) do
|
||||
if rn then
|
||||
if rn and not rn.units() then
|
||||
peas = peas + rn:get_resource(res)
|
||||
end
|
||||
end
|
||||
|
@ -16,7 +16,7 @@ end
|
|||
local function select(regions, limit)
|
||||
local sel = {}
|
||||
for r in regions do
|
||||
if r.terrain~="ocean" and r.units()==nil then
|
||||
if not r.plane and r.terrain~="ocean" and not r.units() then
|
||||
s = score(r)
|
||||
if s >= limit then
|
||||
table.insert(sel, r)
|
||||
|
|
|
@ -4,7 +4,6 @@ module("tests.e2.guard", package.seeall, lunit.testcase)
|
|||
|
||||
function setup()
|
||||
eressea.free_game()
|
||||
eressea.settings.set("nmr.removenewbie", "0")
|
||||
eressea.settings.set("nmr.timeout", "0")
|
||||
eressea.settings.set("NewbieImmunity", "0")
|
||||
eressea.settings.set("rules.economy.food", "4")
|
||||
|
|
|
@ -4,7 +4,6 @@ module("tests.e2.movement", package.seeall, lunit.testcase)
|
|||
|
||||
function setup()
|
||||
eressea.free_game()
|
||||
eressea.settings.set("nmr.removenewbie", "0")
|
||||
eressea.settings.set("nmr.timeout", "0")
|
||||
eressea.settings.set("NewbieImmunity", "0")
|
||||
end
|
||||
|
|
|
@ -4,7 +4,6 @@ module("tests.e2.shiplanding", package.seeall, lunit.testcase)
|
|||
|
||||
function setup()
|
||||
eressea.free_game()
|
||||
eressea.settings.set("nmr.removenewbie", "0")
|
||||
eressea.settings.set("nmr.timeout", "0")
|
||||
eressea.settings.set("NewbieImmunity", "0")
|
||||
end
|
||||
|
|
|
@ -5,7 +5,6 @@ module("tests.e3.spells", package.seeall, lunit.testcase)
|
|||
function setup()
|
||||
eressea.game.reset()
|
||||
eressea.settings.set("magic.fumble.enable", "0")
|
||||
eressea.settings.set("nmr.removenewbie", "0")
|
||||
eressea.settings.set("nmr.timeout", "0")
|
||||
eressea.settings.set("rules.peasants.growth", "0")
|
||||
end
|
||||
|
|
|
@ -4,7 +4,6 @@ module("tests.movement", package.seeall, lunit.testcase)
|
|||
|
||||
function setup()
|
||||
eressea.free_game()
|
||||
eressea.settings.set("nmr.removenewbie", "0")
|
||||
eressea.settings.set("nmr.timeout", "0")
|
||||
eressea.settings.set("rules.ships.storms", "0")
|
||||
conf = [[{
|
||||
|
|
|
@ -6,7 +6,6 @@ function setup()
|
|||
eressea.game.reset()
|
||||
eressea.config.reset()
|
||||
eressea.settings.set("rules.economy.food", "0")
|
||||
eressea.settings.set("nmr.removenewbie", "0")
|
||||
eressea.settings.set("nmr.timeout", "0")
|
||||
eressea.settings.set("rules.magic.playerschools", "")
|
||||
conf = [[{
|
||||
|
|
|
@ -434,7 +434,9 @@ static int tolua_equipunit(lua_State * L)
|
|||
{
|
||||
unit *u = (unit *)tolua_tousertype(L, 1, 0);
|
||||
const char *eqname = tolua_tostring(L, 2, 0);
|
||||
equip_unit(u, get_equipment(eqname));
|
||||
int mask = (int)tolua_tonumber(L, 3, EQUIP_ALL);
|
||||
assert(mask > 0);
|
||||
equip_unit_mask(u, get_equipment(eqname), mask);
|
||||
return 0;
|
||||
}
|
||||
|
||||
|
|
|
@ -1,3 +1,3 @@
|
|||
#define VERSION_MAJOR 3
|
||||
#define VERSION_MINOR 5
|
||||
#define VERSION_BUILD 3
|
||||
#define VERSION_BUILD 4
|
||||
|
|
|
@ -530,6 +530,8 @@ int alliedunit(const unit * u, const faction * f2, int mode)
|
|||
ally *sf;
|
||||
int automode;
|
||||
|
||||
assert(u);
|
||||
assert(f2);
|
||||
assert(u->region); /* the unit should be in a region, but it's possible that u->number==0 (TEMP units) */
|
||||
if (u->faction == f2)
|
||||
return mode;
|
||||
|
|
|
@ -1,4 +1,4 @@
|
|||
/*
|
||||
/*
|
||||
Copyright (c) 1998-2015, Enno Rehling <enno@eressea.de>
|
||||
Katja Zedel <katze@felidae.kn-bremen.de
|
||||
Christian Schlittchen <corwin@amber.kn-bremen.de>
|
||||
|
@ -200,7 +200,7 @@ static unit *unitorders(FILE * F, int enc, struct faction *f)
|
|||
}
|
||||
}
|
||||
}
|
||||
/* Nun wird der Befehl erzeut und eingehängt */
|
||||
/* Nun wird der Befehl erzeut und eingehängt */
|
||||
*ordp = parse_order(s, u->faction->locale);
|
||||
if (*ordp) {
|
||||
ordp = &(*ordp)->next;
|
||||
|
@ -233,8 +233,8 @@ static faction *factionorders(void)
|
|||
f->no, pass));
|
||||
return 0;
|
||||
}
|
||||
/* Die Partei hat sich zumindest gemeldet, so daß sie noch
|
||||
* nicht als untätig gilt */
|
||||
/* Die Partei hat sich zumindest gemeldet, so dass sie noch
|
||||
* nicht als untätig gilt */
|
||||
|
||||
/* TODO: +1 ist ein Workaround, weil cturn erst in process_orders
|
||||
* incrementiert wird. */
|
||||
|
@ -308,9 +308,9 @@ int readorders(const char *filename)
|
|||
/* Falls in unitorders() abgebrochen wird, steht dort entweder eine neue
|
||||
* Partei, eine neue Einheit oder das File-Ende. Das switch() wird erneut
|
||||
* durchlaufen, und die entsprechende Funktion aufgerufen. Man darf buf
|
||||
* auf alle Fälle nicht überschreiben! Bei allen anderen Einträgen hier
|
||||
* muß buf erneut gefüllt werden, da die betreffende Information in nur
|
||||
* einer Zeile steht, und nun die nächste gelesen werden muß. */
|
||||
* auf alle Fälle nicht überschreiben! Bei allen anderen Einträgen hier
|
||||
* muss buf erneut gefüllt werden, da die betreffende Information in nur
|
||||
* einer Zeile steht, und nun die nächste gelesen werden muss. */
|
||||
|
||||
case P_NEXT:
|
||||
f = NULL;
|
||||
|
@ -331,7 +331,7 @@ int readorders(const char *filename)
|
|||
/* ------------------------------------------------------------- */
|
||||
|
||||
/* #define INNER_WORLD */
|
||||
/* fürs debuggen nur den inneren Teil der Welt laden */
|
||||
/* fürs debuggen nur den inneren Teil der Welt laden */
|
||||
/* -9;-27;-1;-19;Sumpfloch */
|
||||
int inner_world(region * r)
|
||||
{
|
||||
|
@ -1600,7 +1600,6 @@ int readgame(const char *filename, int backup)
|
|||
|
||||
while (--p >= 0) {
|
||||
unit *u = read_unit(&gdata);
|
||||
sc_mage *mage;
|
||||
|
||||
if (gdata.version < JSON_REPORT_VERSION) {
|
||||
if (u->_name && fval(u->faction, FFL_NPC)) {
|
||||
|
@ -1615,21 +1614,6 @@ int readgame(const char *filename, int backup)
|
|||
up = &u->next;
|
||||
|
||||
update_interval(u->faction, u->region);
|
||||
mage = get_mage(u);
|
||||
if (mage) {
|
||||
faction *f = u->faction;
|
||||
int skl = effskill(u, SK_MAGIC);
|
||||
if (!fval(f, FFL_NPC) && f->magiegebiet == M_GRAY) {
|
||||
log_error("faction %s had magic=gray, fixing (%s)\n", factionname(f), magic_school[mage->magietyp]);
|
||||
f->magiegebiet = mage->magietyp;
|
||||
}
|
||||
if (f->max_spelllevel < skl) {
|
||||
f->max_spelllevel = skl;
|
||||
}
|
||||
if (mage->spellcount < 0) {
|
||||
mage->spellcount = 0;
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
log_printf(stdout, "\n");
|
||||
|
@ -1653,6 +1637,7 @@ int readgame(const char *filename, int backup)
|
|||
for (f = factions; f; f = f->next) {
|
||||
if (f->flags & FFL_NPC) {
|
||||
f->alive = 1;
|
||||
f->magiegebiet = M_GRAY;
|
||||
if (f->no == 0) {
|
||||
int no = 666;
|
||||
while (findfaction(no))
|
||||
|
@ -1663,8 +1648,23 @@ int readgame(const char *filename, int backup)
|
|||
}
|
||||
else {
|
||||
for (u = f->units; u; u = u->nextF) {
|
||||
sc_mage *mage = get_mage(u);
|
||||
if (mage) {
|
||||
faction *f = u->faction;
|
||||
int skl = effskill(u, SK_MAGIC);
|
||||
if (f->magiegebiet == M_GRAY) {
|
||||
log_error("faction %s had magic=gray, fixing (%s)\n", factionname(f), magic_school[mage->magietyp]);
|
||||
f->magiegebiet = mage->magietyp;
|
||||
}
|
||||
if (f->max_spelllevel < skl) {
|
||||
f->max_spelllevel = skl;
|
||||
}
|
||||
if (mage->spellcount < 0) {
|
||||
mage->spellcount = 0;
|
||||
}
|
||||
}
|
||||
if (u->number > 0) {
|
||||
f->alive = 1;
|
||||
f->alive = true;
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
|
|
@ -1274,25 +1274,10 @@ static int item_modification(const unit * u, skill_t sk, int val)
|
|||
return val;
|
||||
}
|
||||
|
||||
static int update_gbdream(const unit * u, int bonus, curse *c, const curse_type *gbdream_ct, int sign){
|
||||
if (curse_active(c) && c->type == gbdream_ct) {
|
||||
double effect = curse_geteffect(c);
|
||||
unit *mage = c->magician;
|
||||
/* wir suchen jeweils den groessten Bonus und den groestsen Malus */
|
||||
if (sign * effect > sign * bonus) {
|
||||
if (mage == NULL || mage->number == 0
|
||||
|| sign>0?alliedunit(mage, u->faction, HELP_GUARD):!alliedunit(mage, u->faction, HELP_GUARD)) {
|
||||
bonus = (int)effect;
|
||||
}
|
||||
}
|
||||
}
|
||||
return bonus;
|
||||
}
|
||||
|
||||
int att_modification(const unit * u, skill_t sk)
|
||||
static int att_modification(const unit * u, skill_t sk)
|
||||
{
|
||||
double result = 0;
|
||||
static bool init = false;
|
||||
static bool init = false; // TODO: static variables are bad global state
|
||||
static const curse_type *skillmod_ct, *gbdream_ct, *worse_ct;
|
||||
curse *c;
|
||||
|
||||
|
@ -1321,15 +1306,21 @@ int att_modification(const unit * u, skill_t sk)
|
|||
/* TODO hier kann nicht mit get/iscursed gearbeitet werden, da nur der
|
||||
* jeweils erste vom Typ C_GBDREAM zurueckgegen wird, wir aber alle
|
||||
* durchsuchen und aufaddieren muessen */
|
||||
if (u->region) {
|
||||
if (gbdream_ct && u->region) {
|
||||
int bonus = 0, malus = 0;
|
||||
attrib *a = a_find(u->region->attribs, &at_curse);
|
||||
while (a && a->type == &at_curse) {
|
||||
curse *c = (curse *)a->data.v;
|
||||
|
||||
bonus = update_gbdream(u, bonus, c, gbdream_ct, 1);
|
||||
malus = update_gbdream(u, malus, c, gbdream_ct, -1);
|
||||
|
||||
if (curse_active(c) && c->type == gbdream_ct) {
|
||||
int effect = curse_geteffect_int(c);
|
||||
bool allied = alliedunit(c->magician, u->faction, HELP_GUARD);
|
||||
if (allied) {
|
||||
if (effect > bonus) bonus = effect;
|
||||
} else {
|
||||
if (effect < malus) malus = effect;
|
||||
}
|
||||
}
|
||||
a = a->next;
|
||||
}
|
||||
result = result + bonus + malus;
|
||||
|
|
134
src/laws.c
134
src/laws.c
|
@ -1,4 +1,4 @@
|
|||
/*
|
||||
/*
|
||||
Copyright (c) 1998-2014,
|
||||
Enno Rehling <enno@eressea.de>
|
||||
Katja Zedel <katze@felidae.kn-bremen.de
|
||||
|
@ -113,7 +113,7 @@ OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
|
|||
|
||||
/* - exported global symbols ----------------------------------- */
|
||||
|
||||
static int RemoveNMRNewbie(void)
|
||||
static bool RemoveNMRNewbie(void)
|
||||
{
|
||||
static int value = -1;
|
||||
static int gamecookie = -1;
|
||||
|
@ -122,7 +122,7 @@ static int RemoveNMRNewbie(void)
|
|||
value = get_param_int(global.parameters, "nmr.removenewbie", 0);
|
||||
gamecookie = global.cookie;
|
||||
}
|
||||
return value;
|
||||
return value!=0;
|
||||
}
|
||||
|
||||
static void checkorders(void)
|
||||
|
@ -175,7 +175,7 @@ static void live(region * r)
|
|||
while (*up) {
|
||||
unit *u = *up;
|
||||
/* IUW: age_unit() kann u loeschen, u->next ist dann
|
||||
* undefiniert, also muessen wir hier schon das nächste
|
||||
* undefiniert, also muessen wir hier schon das nächste
|
||||
* Element bestimmen */
|
||||
|
||||
int effect = get_effect(u, oldpotiontype[P_FOOL]);
|
||||
|
@ -193,7 +193,7 @@ static void live(region * r)
|
|||
reduce_skill(u, sb, weeks);
|
||||
ADDMSG(&u->faction->msgs, msg_message("dumbeffect",
|
||||
"unit weeks skill", u, weeks, (skill_t)sb->id));
|
||||
} /* sonst Glück gehabt: wer nix weiß, kann nix vergessen... */
|
||||
} /* sonst Glück gehabt: wer nix weiss, kann nix vergessen... */
|
||||
change_effect(u, oldpotiontype[P_FOOL], -effect);
|
||||
}
|
||||
age_unit(r, u);
|
||||
|
@ -337,16 +337,16 @@ static void peasants(region * r)
|
|||
peasants += births + luck;
|
||||
}
|
||||
|
||||
/* Alle werden satt, oder halt soviele für die es auch Geld gibt */
|
||||
/* Alle werden satt, oder halt soviele für die es auch Geld gibt */
|
||||
|
||||
satiated = _min(peasants, money / maintenance_cost(NULL));
|
||||
rsetmoney(r, money - satiated * maintenance_cost(NULL));
|
||||
|
||||
/* Von denjenigen, die nicht satt geworden sind, verhungert der
|
||||
* Großteil. dead kann nie größer als rpeasants(r) - satiated werden,
|
||||
* so dass rpeasants(r) >= 0 bleiben muß. */
|
||||
* Großteil. dead kann nie größer als rpeasants(r) - satiated werden,
|
||||
* so dass rpeasants(r) >= 0 bleiben muß. */
|
||||
|
||||
/* Es verhungert maximal die unterernährten Bevölkerung. */
|
||||
/* Es verhungert maximal die unterernährten Bevölkerung. */
|
||||
|
||||
n = _min(peasants - satiated, rpeasants(r));
|
||||
dead += (int)(0.5F + n * PEASANT_STARVATION_CHANCE);
|
||||
|
@ -411,10 +411,10 @@ static void migrate(region * r)
|
|||
rsethorses(r, rhorses(r) + m->horses);
|
||||
/* Was macht das denn hier?
|
||||
* Baumwanderung wird in trees() gemacht.
|
||||
* wer fragt das? Die Baumwanderung war abhängig von der
|
||||
* wer fragt das? Die Baumwanderung war abhängig von der
|
||||
* Auswertungsreihenfolge der regionen,
|
||||
* das hatte ich geändert. jemand hat es wieder gelöscht, toll.
|
||||
* ich habe es wieder aktiviert, muß getestet werden.
|
||||
* das hatte ich geändert. jemand hat es wieder gelöscht, toll.
|
||||
* ich habe es wieder aktiviert, muss getestet werden.
|
||||
*/
|
||||
*hp = m->next;
|
||||
m->next = free_migrants;
|
||||
|
@ -454,8 +454,8 @@ static void horses(region * r)
|
|||
|
||||
/* Pferde wandern in Nachbarregionen.
|
||||
* Falls die Nachbarregion noch berechnet
|
||||
* werden muß, wird eine migration-Struktur gebildet,
|
||||
* die dann erst in die Berechnung der Nachbarstruktur einfließt.
|
||||
* werden muss, wird eine migration-Struktur gebildet,
|
||||
* die dann erst in die Berechnung der Nachbarstruktur einfließt.
|
||||
*/
|
||||
|
||||
for (n = 0; n != MAXDIRECTIONS; n++) {
|
||||
|
@ -469,7 +469,7 @@ static void horses(region * r)
|
|||
else {
|
||||
migration *nb;
|
||||
/* haben wir die Migration schonmal benutzt?
|
||||
* wenn nicht, müssen wir sie suchen.
|
||||
* wenn nicht, müssen wir sie suchen.
|
||||
* Wandernde Pferde vermehren sich nicht.
|
||||
*/
|
||||
nb = get_migrants(r2);
|
||||
|
@ -565,11 +565,11 @@ growing_trees(region * r, const int current_season, const int last_weeks_season)
|
|||
|
||||
a = a_find(r->attribs, &at_germs);
|
||||
if (a && last_weeks_season == SEASON_SPRING) {
|
||||
/* ungekeimte Samen bleiben erhalten, Sprößlinge wachsen */
|
||||
/* ungekeimte Samen bleiben erhalten, Sprößlinge wachsen */
|
||||
sprout = _min(a->data.sa[1], rtrees(r, 1));
|
||||
/* aus dem gesamt Sprößlingepool abziehen */
|
||||
/* aus dem gesamt Sprößlingepool abziehen */
|
||||
rsettrees(r, 1, rtrees(r, 1) - sprout);
|
||||
/* zu den Bäumen hinzufügen */
|
||||
/* zu den Bäumen hinzufügen */
|
||||
rsettrees(r, 2, rtrees(r, 2) + sprout);
|
||||
|
||||
a_removeall(&r->attribs, &at_germs);
|
||||
|
@ -585,7 +585,7 @@ growing_trees(region * r, const int current_season, const int last_weeks_season)
|
|||
return;
|
||||
|
||||
/* Grundchance 1.0% */
|
||||
/* Jeder Elf in der Region erhöht die Chance marginal */
|
||||
/* Jeder Elf in der Region erhöht die Chance marginal */
|
||||
elves = _min(elves, production(r) / 8);
|
||||
if (elves) {
|
||||
seedchance += 1.0 - pow(0.99999, elves * RESOURCE_QUANTITY);
|
||||
|
@ -606,19 +606,19 @@ growing_trees(region * r, const int current_season, const int last_weeks_season)
|
|||
}
|
||||
}
|
||||
|
||||
/* Bäume breiten sich in Nachbarregionen aus. */
|
||||
/* Bäume breiten sich in Nachbarregionen aus. */
|
||||
|
||||
/* Gesamtzahl der Samen:
|
||||
* bis zu 6% (FORESTGROWTH*3) der Bäume samen in die Nachbarregionen */
|
||||
* bis zu 6% (FORESTGROWTH*3) der Bäume samen in die Nachbarregionen */
|
||||
seeds = (rtrees(r, 2) * FORESTGROWTH * 3) / 1000000;
|
||||
for (d = 0; d != MAXDIRECTIONS; ++d) {
|
||||
region *r2 = rconnect(r, d);
|
||||
if (r2 && fval(r2->terrain, LAND_REGION) && r2->terrain->size) {
|
||||
/* Eine Landregion, wir versuchen Samen zu verteilen:
|
||||
* Die Chance, das Samen ein Stück Boden finden, in dem sie
|
||||
* keimen können, hängt von der Bewuchsdichte und der
|
||||
* verfügbaren Fläche ab. In Gletschern gibt es weniger
|
||||
* Möglichkeiten als in Ebenen. */
|
||||
* Die Chance, das Samen ein Stück Boden finden, in dem sie
|
||||
* keimen können, hängt von der Bewuchsdichte und der
|
||||
* verfügbaren Fläche ab. In Gletschern gibt es weniger
|
||||
* Möglichkeiten als in Ebenen. */
|
||||
sprout = 0;
|
||||
seedchance = (1000 * maxworkingpeasants(r2)) / r2->terrain->size;
|
||||
for (i = 0; i < seeds / MAXDIRECTIONS; i++) {
|
||||
|
@ -635,8 +635,8 @@ growing_trees(region * r, const int current_season, const int last_weeks_season)
|
|||
if (is_cursed(r->attribs, C_CURSED_BY_THE_GODS, 0))
|
||||
return;
|
||||
|
||||
/* in at_germs merken uns die Zahl der Samen und Sprößlinge, die
|
||||
* dieses Jahr älter werden dürfen, damit nicht ein Same im selben
|
||||
/* in at_germs merken uns die Zahl der Samen und Sprößlinge, die
|
||||
* dieses Jahr älter werden dürfen, damit nicht ein Same im selben
|
||||
* Zyklus zum Baum werden kann */
|
||||
a = a_find(r->attribs, &at_germs);
|
||||
if (!a) {
|
||||
|
@ -644,13 +644,13 @@ growing_trees(region * r, const int current_season, const int last_weeks_season)
|
|||
a->data.sa[0] = (short)rtrees(r, 0);
|
||||
a->data.sa[1] = (short)rtrees(r, 1);
|
||||
}
|
||||
/* wir haben 6 Wochen zum wachsen, jeder Same/Sproß hat 18% Chance
|
||||
/* wir haben 6 Wochen zum wachsen, jeder Same/Spross hat 18% Chance
|
||||
* zu wachsen, damit sollten nach 5-6 Wochen alle gewachsen sein */
|
||||
growth = 1800;
|
||||
|
||||
/* Samenwachstum */
|
||||
|
||||
/* Raubbau abfangen, es dürfen nie mehr Samen wachsen, als aktuell
|
||||
/* Raubbau abfangen, es dürfen nie mehr Samen wachsen, als aktuell
|
||||
* in der Region sind */
|
||||
seeds = _min(a->data.sa[0], rtrees(r, 0));
|
||||
sprout = 0;
|
||||
|
@ -663,15 +663,15 @@ growing_trees(region * r, const int current_season, const int last_weeks_season)
|
|||
a->data.sa[0] = (short)(seeds - sprout);
|
||||
/* aus dem gesamt Samenpool abziehen */
|
||||
rsettrees(r, 0, rtrees(r, 0) - sprout);
|
||||
/* zu den Sprößlinge hinzufügen */
|
||||
/* zu den Sprößlinge hinzufügen */
|
||||
rsettrees(r, 1, rtrees(r, 1) + sprout);
|
||||
|
||||
/* Baumwachstum */
|
||||
|
||||
/* hier gehen wir davon aus, das Jungbäume nicht ohne weiteres aus
|
||||
* der Region entfernt werden können, da Jungbäume in der gleichen
|
||||
* Runde nachwachsen, wir also nicht mehr zwischen diesjährigen und
|
||||
* 'alten' Jungbäumen unterscheiden könnten */
|
||||
/* hier gehen wir davon aus, das Jungbäume nicht ohne weiteres aus
|
||||
* der Region entfernt werden können, da Jungbäume in der gleichen
|
||||
* Runde nachwachsen, wir also nicht mehr zwischen diesjährigen und
|
||||
* 'alten' Jungbäumen unterscheiden könnten */
|
||||
sprout = _min(a->data.sa[1], rtrees(r, 1));
|
||||
grownup_trees = 0;
|
||||
|
||||
|
@ -679,11 +679,11 @@ growing_trees(region * r, const int current_season, const int last_weeks_season)
|
|||
if (rng_int() % 10000 < growth)
|
||||
grownup_trees++;
|
||||
}
|
||||
/* aus dem Sprößlingepool dieses Jahres abziehen */
|
||||
/* aus dem Sprößlingepool dieses Jahres abziehen */
|
||||
a->data.sa[1] = (short)(sprout - grownup_trees);
|
||||
/* aus dem gesamt Sprößlingepool abziehen */
|
||||
/* aus dem gesamt Sprößlingepool abziehen */
|
||||
rsettrees(r, 1, rtrees(r, 1) - grownup_trees);
|
||||
/* zu den Bäumen hinzufügen */
|
||||
/* zu den bäumen hinzufügen */
|
||||
rsettrees(r, 2, rtrees(r, 2) + grownup_trees);
|
||||
}
|
||||
}
|
||||
|
@ -691,10 +691,10 @@ growing_trees(region * r, const int current_season, const int last_weeks_season)
|
|||
static void
|
||||
growing_herbs(region * r, const int current_season, const int last_weeks_season)
|
||||
{
|
||||
/* Jetzt die Kräutervermehrung. Vermehrt wird logistisch:
|
||||
/* Jetzt die Kräutervermehrung. Vermehrt wird logistisch:
|
||||
*
|
||||
* Jedes Kraut hat eine Wahrscheinlichkeit von (100-(vorhandene
|
||||
* Kräuter))% sich zu vermehren. */
|
||||
* Kräuter))% sich zu vermehren. */
|
||||
if (current_season != SEASON_WINTER) {
|
||||
int i;
|
||||
for (i = rherbs(r); i > 0; i--) {
|
||||
|
@ -1072,7 +1072,7 @@ int enter_building(unit * u, order * ord, int id, bool report)
|
|||
region *r = u->region;
|
||||
building *b;
|
||||
|
||||
/* Schwimmer können keine Gebäude betreten, außer diese sind
|
||||
/* Schwimmer können keine Gebäude betreten, außer diese sind
|
||||
* auf dem Ozean */
|
||||
if (!fval(u_race(u), RCF_WALK) && !fval(u_race(u), RCF_FLY)) {
|
||||
if (!fval(r->terrain, SEA_REGION)) {
|
||||
|
@ -1188,8 +1188,8 @@ void do_enter(struct region *r, bool is_final_attempt)
|
|||
}
|
||||
if (ulast != NULL) {
|
||||
/* Wenn wir hier angekommen sind, war der Befehl
|
||||
* erfolgreich und wir löschen ihn, damit er im
|
||||
* zweiten Versuch nicht nochmal ausgeführt wird. */
|
||||
* erfolgreich und wir löschen ihn, damit er im
|
||||
* zweiten Versuch nicht nochmal ausgeführt wird. */
|
||||
*ordp = ord->next;
|
||||
ord->next = NULL;
|
||||
free_order(ord);
|
||||
|
@ -1963,13 +1963,13 @@ int mail_cmd(unit * u, struct order *ord)
|
|||
s = gettoken(token, sizeof(token));
|
||||
|
||||
/* Falls kein Parameter, ist das eine Einheitsnummer;
|
||||
* das Füllwort "AN" muß wegfallen, da gültige Nummer! */
|
||||
* das Füllwort "AN" muss wegfallen, da gültige Nummer! */
|
||||
|
||||
do {
|
||||
cont = 0;
|
||||
switch (findparam_ex(s, u->faction->locale)) {
|
||||
case P_REGION:
|
||||
/* können alle Einheiten in der Region sehen */
|
||||
/* können alle Einheiten in der Region sehen */
|
||||
s = getstrtoken();
|
||||
if (!s || !s[0]) {
|
||||
cmistake(u, ord, 30, MSG_MESSAGE);
|
||||
|
@ -2322,7 +2322,7 @@ static bool display_race(faction * f, unit * u, const race * rc)
|
|||
if (wrptr(&bufp, &size, bytes) != 0)
|
||||
WARN_STATIC_BUFFER();
|
||||
|
||||
/* b_armor : Rüstung */
|
||||
/* b_armor : Rüstung */
|
||||
if (rc->armor > 0) {
|
||||
bytes =
|
||||
slprintf(bufp, size, ", %s: %d", LOC(f->locale, "stat_armor"), rc->armor);
|
||||
|
@ -2633,7 +2633,7 @@ int combatspell_cmd(unit * u, struct order *ord)
|
|||
init_order(ord);
|
||||
s = gettoken(token, sizeof(token));
|
||||
|
||||
/* KAMPFZAUBER [NICHT] löscht alle gesetzten Kampfzauber */
|
||||
/* KAMPFZAUBER [NICHT] löscht alle gesetzten Kampfzauber */
|
||||
if (!s || *s == 0 || findparam(s, u->faction->locale) == P_NOT) {
|
||||
unset_combatspell(u, 0);
|
||||
return 0;
|
||||
|
@ -2641,7 +2641,7 @@ int combatspell_cmd(unit * u, struct order *ord)
|
|||
|
||||
/* Optional: STUFE n */
|
||||
if (findparam(s, u->faction->locale) == P_LEVEL) {
|
||||
/* Merken, setzen kommt erst später */
|
||||
/* Merken, setzen kommt erst später */
|
||||
level = getint();
|
||||
level = _max(0, level);
|
||||
s = gettoken(token, sizeof(token));
|
||||
|
@ -2656,7 +2656,7 @@ int combatspell_cmd(unit * u, struct order *ord)
|
|||
s = gettoken(token, sizeof(token));
|
||||
|
||||
if (findparam(s, u->faction->locale) == P_NOT) {
|
||||
/* KAMPFZAUBER "<Spruchname>" NICHT löscht diesen speziellen
|
||||
/* KAMPFZAUBER "<Spruchname>" NICHT löscht diesen speziellen
|
||||
* Kampfzauber */
|
||||
unset_combatspell(u, sp);
|
||||
return 0;
|
||||
|
@ -2671,7 +2671,7 @@ int combatspell_cmd(unit * u, struct order *ord)
|
|||
|
||||
/* ------------------------------------------------------------- */
|
||||
/* Beachten: einige Monster sollen auch unbewaffent die Region bewachen
|
||||
* können */
|
||||
* können */
|
||||
|
||||
enum { E_GUARD_OK, E_GUARD_UNARMED, E_GUARD_NEWBIE, E_GUARD_FLEEING };
|
||||
|
||||
|
@ -2733,7 +2733,7 @@ int guard_on_cmd(unit * u, struct order *ord)
|
|||
cmistake(u, ord, 95, MSG_EVENT);
|
||||
}
|
||||
else {
|
||||
/* Monster der Monsterpartei dürfen immer bewachen */
|
||||
/* Monster der Monsterpartei dürfen immer bewachen */
|
||||
if (is_monsters(u->faction)) {
|
||||
guard(u, GUARD_ALL);
|
||||
}
|
||||
|
@ -2767,7 +2767,7 @@ void sinkships(struct region * r)
|
|||
if (!sh->type->construction || sh->size >= sh->type->construction->maxsize) {
|
||||
if (fval(r->terrain, SEA_REGION) && (!enoughsailors(sh, r)
|
||||
|| get_captain(sh) == NULL)) {
|
||||
/* Schiff nicht seetüchtig */
|
||||
/* Schiff nicht seetüchtig */
|
||||
float dmg = get_param_flt(global.parameters,
|
||||
"rules.ship.damage.nocrewocean",
|
||||
0.30F);
|
||||
|
@ -3224,7 +3224,7 @@ static void ageing(void)
|
|||
sp = &(*sp)->next;
|
||||
}
|
||||
|
||||
/* Gebäude */
|
||||
/* Gebäude */
|
||||
for (bp = &r->buildings; *bp;) {
|
||||
building *b = *bp;
|
||||
age_building(b);
|
||||
|
@ -3430,7 +3430,7 @@ void update_long_order(unit * u)
|
|||
freset(u, UFL_MOVED);
|
||||
freset(u, UFL_LONGACTION);
|
||||
if (hunger) {
|
||||
/* Hungernde Einheiten führen NUR den default-Befehl aus */
|
||||
/* Hungernde Einheiten führen NUR den default-Befehl aus */
|
||||
set_order(&u->thisorder, default_order(u->faction->locale));
|
||||
}
|
||||
else {
|
||||
|
@ -3451,7 +3451,7 @@ void update_long_order(unit * u)
|
|||
continue;
|
||||
|
||||
if (is_exclusive(ord)) {
|
||||
/* Über dieser Zeile nur Befehle, die auch eine idle Faction machen darf */
|
||||
/* über dieser Zeile nur Befehle, die auch eine idle Faction machen darf */
|
||||
if (idle(u->faction)) {
|
||||
set_order(&u->thisorder, default_order(u->faction->locale));
|
||||
}
|
||||
|
@ -3463,13 +3463,13 @@ void update_long_order(unit * u)
|
|||
else {
|
||||
keyword_t keyword = getkeyword(ord);
|
||||
switch (keyword) {
|
||||
/* Wenn gehandelt wird, darf kein langer Befehl ausgeführt
|
||||
/* Wenn gehandelt wird, darf kein langer Befehl ausgeführt
|
||||
* werden. Da Handel erst nach anderen langen Befehlen kommt,
|
||||
* muß das vorher abgefangen werden. Wir merken uns also
|
||||
* muss das vorher abgefangen werden. Wir merken uns also
|
||||
* hier, ob die Einheit handelt. */
|
||||
case K_BUY:
|
||||
case K_SELL:
|
||||
/* Wenn die Einheit handelt, muß der Default-Befehl gelöscht
|
||||
/* Wenn die Einheit handelt, muss der Default-Befehl gelöscht
|
||||
* werden.
|
||||
* Wird je diese Ausschliesslichkeit aufgehoben, muss man aufpassen
|
||||
* mit der Reihenfolge von Kaufen, Verkaufen etc., damit es Spielern
|
||||
|
@ -3479,7 +3479,7 @@ void update_long_order(unit * u)
|
|||
|
||||
case K_CAST:
|
||||
/* dient dazu, das neben Zaubern kein weiterer Befehl
|
||||
* ausgeführt werden kann, Zaubern ist ein kurzer Befehl */
|
||||
* ausgeführt werden kann, Zaubern ist ein kurzer Befehl */
|
||||
set_order(&u->thisorder, copy_order(ord));
|
||||
break;
|
||||
|
||||
|
@ -3492,7 +3492,7 @@ void update_long_order(unit * u)
|
|||
if (hunger) {
|
||||
return;
|
||||
}
|
||||
/* Wenn die Einheit handelt, muß der Default-Befehl gelöscht
|
||||
/* Wenn die Einheit handelt, muss der Default-Befehl gelöscht
|
||||
* werden. */
|
||||
|
||||
if (trade) {
|
||||
|
@ -3568,7 +3568,7 @@ void monthly_healing(void)
|
|||
double healingcurse = 0;
|
||||
|
||||
if (heal_ct != NULL) {
|
||||
/* bonus zurücksetzen */
|
||||
/* bonus zurücksetzen */
|
||||
curse *c = get_curse(r->attribs, heal_ct);
|
||||
if (c != NULL) {
|
||||
healingcurse = curse_geteffect(c);
|
||||
|
@ -3578,8 +3578,8 @@ void monthly_healing(void)
|
|||
int umhp = unit_max_hp(u) * u->number;
|
||||
double p = 1.0;
|
||||
|
||||
/* hp über Maximum bauen sich ab. Wird zb durch Elixier der Macht
|
||||
* oder verändertes Ausdauertalent verursacht */
|
||||
/* hp über Maximum bauen sich ab. Wird zb durch Elixier der Macht
|
||||
* oder verändertes Ausdauertalent verursacht */
|
||||
if (u->hp > umhp) {
|
||||
u->hp -= (int)ceil((u->hp - umhp) / 2.0);
|
||||
if (u->hp < umhp)
|
||||
|
@ -3606,7 +3606,7 @@ void monthly_healing(void)
|
|||
if (btype == bt_find("inn")) {
|
||||
p *= 1.5;
|
||||
}
|
||||
/* pro punkt 5% höher */
|
||||
/* pro punkt 5% höher */
|
||||
p *= (1.0 + healingcurse * 0.05);
|
||||
|
||||
maxheal = p * maxheal;
|
||||
|
@ -3618,7 +3618,7 @@ void monthly_healing(void)
|
|||
/* Aufaddieren der geheilten HP. */
|
||||
u->hp = _min(u->hp + addhp, umhp);
|
||||
|
||||
/* soll man an negativer regeneration sterben können? */
|
||||
/* soll man an negativer regeneration sterben können? */
|
||||
assert(u->hp > 0);
|
||||
}
|
||||
}
|
||||
|
@ -3665,7 +3665,7 @@ void defaultorders(void)
|
|||
ord->next = NULL;
|
||||
free_order(ord);
|
||||
if (!neworders) {
|
||||
/* lange Befehle aus orders und old_orders löschen zu gunsten des neuen */
|
||||
/* lange Befehle aus orders und old_orders löschen zu gunsten des neuen */
|
||||
remove_exclusive(&u->orders);
|
||||
remove_exclusive(&u->old_orders);
|
||||
neworders = true;
|
||||
|
@ -4548,8 +4548,8 @@ void processorders(void)
|
|||
wormholes_update();
|
||||
}
|
||||
|
||||
/* immer ausführen, wenn neue Sprüche dazugekommen sind, oder sich
|
||||
* Beschreibungen geändert haben */
|
||||
/* immer ausführen, wenn neue Sprüche dazugekommen sind, oder sich
|
||||
* Beschreibungen geändert haben */
|
||||
update_spells();
|
||||
warn_password();
|
||||
}
|
||||
|
|
80
src/move.c
80
src/move.c
|
@ -1,4 +1,4 @@
|
|||
/*
|
||||
/*
|
||||
Copyright (c) 1998-2014,
|
||||
Enno Rehling <enno@eressea.de>
|
||||
Katja Zedel <katze@felidae.kn-bremen.de
|
||||
|
@ -90,7 +90,7 @@ static attrib_type at_traveldir = {
|
|||
"traveldir",
|
||||
DEFAULT_INIT,
|
||||
DEFAULT_FINALIZE,
|
||||
DEFAULT_AGE, /* Weil normales Aging an ungünstiger Stelle */
|
||||
DEFAULT_AGE, /* Weil normales Aging an ungünstiger Stelle */
|
||||
a_writechars,
|
||||
a_readchars
|
||||
};
|
||||
|
@ -245,15 +245,15 @@ static int ridingcapacity(unit * u)
|
|||
|
||||
get_transporters(u->items, &animals, &acap, &vehicles, &vcap);
|
||||
|
||||
/* Man trägt sein eigenes Gewicht plus seine Kapazität! Die Menschen
|
||||
** tragen nichts (siehe walkingcapacity). Ein Wagen zählt nur, wenn er
|
||||
/* Man tr<EFBFBD>gt sein eigenes Gewicht plus seine Kapazit<69>t! Die Menschen
|
||||
** tragen nichts (siehe walkingcapacity). Ein Wagen z<EFBFBD>hlt nur, wenn er
|
||||
** von zwei Pferden gezogen wird */
|
||||
|
||||
animals = _min(animals, effskill(u, SK_RIDING) * u->number * 2);
|
||||
if (fval(u_race(u), RCF_HORSE))
|
||||
animals += u->number;
|
||||
|
||||
/* maximal diese Pferde können zum Ziehen benutzt werden */
|
||||
/* maximal diese Pferde k<EFBFBD>nnen zum Ziehen benutzt werden */
|
||||
vehicles = _min(animals / HORSESNEEDED, vehicles);
|
||||
|
||||
return vehicles * vcap + animals * acap;
|
||||
|
@ -282,7 +282,7 @@ int walkingcapacity(const struct unit *u)
|
|||
people = u->number;
|
||||
}
|
||||
|
||||
/* maximal diese Pferde können zum Ziehen benutzt werden */
|
||||
/* maximal diese Pferde k<EFBFBD>nnen zum Ziehen benutzt werden */
|
||||
wagen_mit_pferden = _min(vehicles, pferde_fuer_wagen / HORSESNEEDED);
|
||||
|
||||
n = wagen_mit_pferden * vcap;
|
||||
|
@ -295,7 +295,7 @@ int walkingcapacity(const struct unit *u)
|
|||
/* Genug Trolle, um die Restwagen zu ziehen? */
|
||||
wagen_mit_trollen = _min(u->number / 4, wagen_ohne_pferde);
|
||||
|
||||
/* Wagenkapazität hinzuzählen */
|
||||
/* Wagenkapazit<EFBFBD>t hinzuz<75>hlen */
|
||||
n += wagen_mit_trollen * vcap;
|
||||
wagen_ohne_pferde -= wagen_mit_trollen;
|
||||
}
|
||||
|
@ -357,16 +357,16 @@ static int canwalk(unit * u)
|
|||
if (walkingcapacity(u) - eff_weight(u) >= 0)
|
||||
return E_CANWALK_OK;
|
||||
|
||||
/* Stimmt das Gewicht, impliziert dies hier, daß alle Wagen ohne
|
||||
/* Stimmt das Gewicht, impliziert dies hier, da<EFBFBD> alle Wagen ohne
|
||||
* Zugpferde/-trolle als Fracht aufgeladen wurden: zu viele Pferde hat
|
||||
* die Einheit nicht zum Ziehen benutzt, also nicht mehr Wagen gezogen
|
||||
* als erlaubt. */
|
||||
|
||||
if (vehicles > maxwagen)
|
||||
return E_CANWALK_TOOMANYCARTS;
|
||||
/* Es muß nicht zwingend an den Wagen liegen, aber egal... (man
|
||||
* könnte z.B. auch 8 Eisen abladen, damit ein weiterer Wagen als
|
||||
* Fracht draufpaßt) */
|
||||
/* Es mu<EFBFBD> nicht zwingend an den Wagen liegen, aber egal... (man
|
||||
* k<EFBFBD>nnte z.B. auch 8 Eisen abladen, damit ein weiterer Wagen als
|
||||
* Fracht draufpa<EFBFBD>t) */
|
||||
|
||||
return E_CANWALK_TOOHEAVY;
|
||||
}
|
||||
|
@ -663,7 +663,7 @@ int check_ship_allowed(struct ship *sh, const region * r)
|
|||
bt_harbour = bt_find("harbour");
|
||||
|
||||
if (sh->region && r_insectstalled(r)) {
|
||||
/* insekten dürfen nicht hier rein. haben wir welche? */
|
||||
/* insekten d<EFBFBD>rfen nicht hier rein. haben wir welche? */
|
||||
unit *u;
|
||||
|
||||
for (u = sh->region->units; u != NULL; u = u->next) {
|
||||
|
@ -757,13 +757,13 @@ static void drifting_ships(region * r)
|
|||
sh->flags |= SF_FISHING;
|
||||
}
|
||||
|
||||
/* Schiff schon abgetrieben oder durch Zauber geschützt? */
|
||||
/* Schiff schon abgetrieben oder durch Zauber gesch<EFBFBD>tzt? */
|
||||
if (!drift || fval(sh, SF_DRIFTED) || is_cursed(sh->attribs, C_SHIP_NODRIFT, 0)) {
|
||||
shp = &sh->next;
|
||||
continue;
|
||||
}
|
||||
|
||||
/* Kapitän bestimmen */
|
||||
/* Kapit<EFBFBD>n bestimmen */
|
||||
for (captain = r->units; captain; captain = captain->next) {
|
||||
if (captain->ship != sh)
|
||||
continue;
|
||||
|
@ -773,8 +773,8 @@ static void drifting_ships(region * r)
|
|||
break;
|
||||
}
|
||||
}
|
||||
/* Kapitän da? Beschädigt? Genügend Matrosen?
|
||||
* Genügend leicht? Dann ist alles OK. */
|
||||
/* Kapit<EFBFBD>n da? Besch<63>digt? Gen<65>gend Matrosen?
|
||||
* Gen<EFBFBD>gend leicht? Dann ist alles OK. */
|
||||
|
||||
assert(sh->type->construction->improvement == NULL); /* sonst ist construction::size nicht ship_type::maxsize */
|
||||
if (captain && sh->size == sh->type->construction->maxsize
|
||||
|
@ -784,7 +784,7 @@ static void drifting_ships(region * r)
|
|||
}
|
||||
|
||||
/* Auswahl einer Richtung: Zuerst auf Land, dann
|
||||
* zufällig. Falls unmögliches Resultat: vergiß es. */
|
||||
* zuf<EFBFBD>llig. Falls unm<EFBFBD>gliches Resultat: vergi<EFBFBD> es. */
|
||||
d_offset = rng_int() % MAXDIRECTIONS;
|
||||
for (d = 0; d != MAXDIRECTIONS; ++d) {
|
||||
region *rn;
|
||||
|
@ -1475,12 +1475,12 @@ static void make_route(unit * u, order * ord, region_list ** routep)
|
|||
|
||||
/** calculate the speed of a unit
|
||||
*
|
||||
* zu Fuß reist man 1 Region, zu Pferd 2 Regionen. Mit Straßen reist
|
||||
* man zu Fuß 2, mit Pferden 3 weit.
|
||||
* zu Fu<EFBFBD> reist man 1 Region, zu Pferd 2 Regionen. Mit Stra<EFBFBD>en reist
|
||||
* man zu Fu<EFBFBD> 2, mit Pferden 3 weit.
|
||||
*
|
||||
* Berechnet wird das mit BPs. Zu Fuß hat man 4 BPs, zu Pferd 6.
|
||||
* Normalerweise verliert man 3 BP pro Region, bei Straßen nur 2 BP.
|
||||
* Außerdem: Wenn Einheit transportiert, nur halbe BP
|
||||
* Berechnet wird das mit BPs. Zu Fu<EFBFBD> hat man 4 BPs, zu Pferd 6.
|
||||
* Normalerweise verliert man 3 BP pro Region, bei Stra<EFBFBD>en nur 2 BP.
|
||||
* Au<EFBFBD>erdem: Wenn Einheit transportiert, nur halbe BP
|
||||
*/
|
||||
static int movement_speed(unit * u)
|
||||
{
|
||||
|
@ -1620,7 +1620,7 @@ static const region_list *travel_route(unit * u,
|
|||
landing = true;
|
||||
}
|
||||
else if ((u_race(u)->flags & RCF_WALK) == 0) {
|
||||
/* Spezialeinheiten, die nicht laufen können. */
|
||||
/* Spezialeinheiten, die nicht laufen k<EFBFBD>nnen. */
|
||||
ADDMSG(&u->faction->msgs, msg_message("detectocean",
|
||||
"unit region", u, next));
|
||||
break;
|
||||
|
@ -1633,7 +1633,7 @@ static const region_list *travel_route(unit * u,
|
|||
}
|
||||
}
|
||||
else {
|
||||
/* Ozeanfelder können nur von Einheiten mit Schwimmen und ohne
|
||||
/* Ozeanfelder k<EFBFBD>nnen nur von Einheiten mit Schwimmen und ohne
|
||||
* Pferde betreten werden. */
|
||||
if (!(canswim(u) || canfly(u))) {
|
||||
ADDMSG(&u->faction->msgs, msg_message("detectocean",
|
||||
|
@ -1728,7 +1728,7 @@ static const region_list *travel_route(unit * u,
|
|||
walkmode = 2;
|
||||
}
|
||||
|
||||
/* Berichte über Durchreiseregionen */
|
||||
/* Berichte <EFBFBD>ber Durchreiseregionen */
|
||||
|
||||
if (mode != TRAVEL_TRANSPORTED) {
|
||||
arg_regions *ar = var_copy_regions(route_begin, steps - 1);
|
||||
|
@ -1807,7 +1807,7 @@ buildingtype_exists(const region * r, const building_type * bt, bool working)
|
|||
return false;
|
||||
}
|
||||
|
||||
/* Prüft, ob Ablegen von einer Küste in eine der erlaubten Richtungen erfolgt. */
|
||||
/* Pr<EFBFBD>ft, ob Ablegen von einer K<>ste in eine der erlaubten Richtungen erfolgt. */
|
||||
|
||||
static bool check_takeoff(ship * sh, region * from, region * to)
|
||||
{
|
||||
|
@ -1857,18 +1857,18 @@ sail(unit * u, order * ord, bool move_on_land, region_list ** routep)
|
|||
return;
|
||||
|
||||
/* Wir suchen so lange nach neuen Richtungen, wie es geht. Diese werden
|
||||
* dann nacheinander ausgeführt. */
|
||||
* dann nacheinander ausgef<EFBFBD>hrt. */
|
||||
|
||||
k = shipspeed(sh, u);
|
||||
|
||||
last_point = starting_point;
|
||||
current_point = starting_point;
|
||||
|
||||
/* die nächste Region, in die man segelt, wird durch movewhere () aus der
|
||||
/* die n<EFBFBD>chste Region, in die man segelt, wird durch movewhere () aus der
|
||||
* letzten Region bestimmt.
|
||||
*
|
||||
* Anfangen tun wir bei starting_point. next_point ist beim ersten
|
||||
* Durchlauf schon gesetzt (Parameter!). current_point ist die letzte gültige,
|
||||
* Durchlauf schon gesetzt (Parameter!). current_point ist die letzte g<EFBFBD>ltige,
|
||||
* befahrene Region. */
|
||||
|
||||
while (next_point && current_point != next_point && step < k) {
|
||||
|
@ -1920,7 +1920,7 @@ sail(unit * u, order * ord, bool move_on_land, region_list ** routep)
|
|||
bool storm = true;
|
||||
int d_offset = rng_int() % MAXDIRECTIONS;
|
||||
direction_t d;
|
||||
/* Sturm nur, wenn nächste Region Hochsee ist. */
|
||||
/* Sturm nur, wenn n<EFBFBD>chste Region Hochsee ist. */
|
||||
for (d = 0; d != MAXDIRECTIONS; ++d) {
|
||||
direction_t dnext = (direction_t)((d + d_offset) % MAXDIRECTIONS);
|
||||
region *rn = rconnect(current_point, dnext);
|
||||
|
@ -2056,16 +2056,16 @@ sail(unit * u, order * ord, bool move_on_land, region_list ** routep)
|
|||
sh = NULL;
|
||||
}
|
||||
|
||||
/* Nun enthält current_point die Region, in der das Schiff seine Runde
|
||||
* beendet hat. Wir generieren hier ein Ereignis für den Spieler, das
|
||||
* ihm sagt, bis wohin er gesegelt ist, falls er überhaupt vom Fleck
|
||||
* gekommen ist. Das ist nicht der Fall, wenn er von der Küste ins
|
||||
/* Nun enth<EFBFBD>lt current_point die Region, in der das Schiff seine Runde
|
||||
* beendet hat. Wir generieren hier ein Ereignis f<EFBFBD>r den Spieler, das
|
||||
* ihm sagt, bis wohin er gesegelt ist, falls er <EFBFBD>berhaupt vom Fleck
|
||||
* gekommen ist. Das ist nicht der Fall, wenn er von der K<EFBFBD>ste ins
|
||||
* Inland zu segeln versuchte */
|
||||
|
||||
if (sh != NULL && fval(sh, SF_MOVED)) {
|
||||
unit *harbourmaster;
|
||||
/* nachdem alle Richtungen abgearbeitet wurden, und alle Einheiten
|
||||
* transferiert wurden, kann der aktuelle Befehl gelöscht werden. */
|
||||
* transferiert wurden, kann der aktuelle Befehl gel<EFBFBD>scht werden. */
|
||||
cycle_route(ord, u, step);
|
||||
set_order(&u->thisorder, NULL);
|
||||
if (!move_on_land) {
|
||||
|
@ -2090,7 +2090,7 @@ sail(unit * u, order * ord, bool move_on_land, region_list ** routep)
|
|||
|
||||
sh = move_ship(sh, starting_point, current_point, *routep);
|
||||
|
||||
/* Hafengebühren ? */
|
||||
/* Hafengeb<EFBFBD>hren ? */
|
||||
|
||||
harbourmaster = owner_buildingtyp(current_point, bt_find("harbour"));
|
||||
if (sh && harbourmaster != NULL) {
|
||||
|
@ -2438,7 +2438,7 @@ static void piracy_cmd(unit * u, struct order *ord)
|
|||
/* Wenn nicht, sehen wir, ob wir ein Ziel finden. */
|
||||
|
||||
if (target_dir == NODIRECTION) {
|
||||
/* Einheit ist also Kapitän. Jetzt gucken, in wievielen
|
||||
/* Einheit ist also Kapit<EFBFBD>n. Jetzt gucken, in wievielen
|
||||
* Nachbarregionen potentielle Opfer sind. */
|
||||
|
||||
for (dir = 0; dir < MAXDIRECTIONS; dir++) {
|
||||
|
@ -2497,7 +2497,7 @@ static void piracy_cmd(unit * u, struct order *ord)
|
|||
set_order(&u->thisorder, create_order(K_MOVE, u->faction->locale, "%s",
|
||||
LOC(u->faction->locale, directions[target_dir])));
|
||||
|
||||
/* Bewegung ausführen */
|
||||
/* Bewegung ausf<EFBFBD>hren */
|
||||
init_order(u->thisorder);
|
||||
move(u, true);
|
||||
}
|
||||
|
@ -2607,7 +2607,7 @@ static int hunt(unit * u, order * ord)
|
|||
/* NACH ignorieren und Parsing initialisieren. */
|
||||
init_tokens_str(command);
|
||||
getstrtoken();
|
||||
/* NACH ausführen */
|
||||
/* NACH ausf<EFBFBD>hren */
|
||||
move(u, false);
|
||||
return 1; /* true -> Einheitenliste von vorne durchgehen */
|
||||
}
|
||||
|
@ -2806,7 +2806,7 @@ void movement(void)
|
|||
if (repeat)
|
||||
continue;
|
||||
if (ships == 0) {
|
||||
/* Abtreiben von beschädigten, unterbemannten, überladenen Schiffen */
|
||||
/* Abtreiben von besch<EFBFBD>digten, unterbemannten, <20>berladenen Schiffen */
|
||||
drifting_ships(r);
|
||||
}
|
||||
r = r->next;
|
||||
|
|
|
@ -20,13 +20,10 @@
|
|||
#include <assert.h>
|
||||
|
||||
|
||||
static struct castorder *test_create_castorder(castorder *order, unit *u, const char *name, int level, float force, int range) {
|
||||
static void test_create_castorder(castorder *order, unit *u, int level, float force, int range) {
|
||||
struct locale * lang;
|
||||
spell *sp;
|
||||
|
||||
lang = get_or_create_locale("en");
|
||||
sp = create_spell(name, 0);
|
||||
return order = create_castorder(order, u, NULL, sp, u->region, level, force, range, create_order(K_CAST, lang, ""), NULL);
|
||||
create_castorder(order, u, NULL, NULL, u->region, level, force, range, create_order(K_CAST, lang, ""), NULL);
|
||||
}
|
||||
|
||||
static void test_dreams(CuTest *tc) {
|
||||
|
@ -39,12 +36,12 @@ static void test_dreams(CuTest *tc) {
|
|||
test_cleanup();
|
||||
test_create_world();
|
||||
r=findregion(0, 0);
|
||||
f1 = test_create_faction(test_create_race("human"));
|
||||
f2 = test_create_faction(test_create_race("human"));
|
||||
f1 = test_create_faction(0);
|
||||
f2 = test_create_faction(0);
|
||||
u1 = test_create_unit(f1, r);
|
||||
u2 = test_create_unit(f2, r);
|
||||
|
||||
test_create_castorder(&order, u1, "goodreams", 10, 10., 0);
|
||||
test_create_castorder(&order, u1, 10, 10., 0);
|
||||
level = sp_gooddreams(&order);
|
||||
CuAssertIntEquals(tc, 10, level);
|
||||
|
||||
|
@ -57,7 +54,7 @@ static void test_dreams(CuTest *tc) {
|
|||
CuAssertIntEquals(tc, 1, get_modifier(u1, SK_MELEE, 11, r, false));
|
||||
CuAssertIntEquals(tc, 0, get_modifier(u2, SK_MELEE, 11, r, false));
|
||||
|
||||
test_create_castorder(&order, u1, "baddreams", 10, 10., 0);
|
||||
test_create_castorder(&order, u1, 10, 10., 0);
|
||||
level = sp_baddreams(&order);
|
||||
CuAssertIntEquals(tc, 10, level);
|
||||
|
||||
|
|
Loading…
Reference in New Issue