server/src/common/triggers/shock.c
Enno Rehling f1b26f0234 Mehrere Bugfixes die aus der vorangegangenen Aenderung resultierten.
Ausserdem: Bei falsch geschriebenen Befehlen (ZCHTE) wird der falsche Befehl
in der Meldung ausgegeben.
2006-08-13 00:36:42 +00:00

138 lines
3 KiB
C

/* vi: set ts=2:
*
*
* Eressea PB(E)M host Copyright (C) 1998-2003
* Christian Schlittchen (corwin@amber.kn-bremen.de)
* Katja Zedel (katze@felidae.kn-bremen.de)
* Henning Peters (faroul@beyond.kn-bremen.de)
* Enno Rehling (enno@eressea-pbem.de)
* Ingo Wilken (Ingo.Wilken@informatik.uni-oldenburg.de)
*
* This program may not be used, modified or distributed without
* prior permission by the authors of Eressea.
*/
#include <config.h>
#include <eressea.h>
#include "shock.h"
/* kernel includes */
#include <kernel/curse.h>
#include <kernel/faction.h>
#include <kernel/magic.h>
#include <kernel/message.h>
#include <kernel/skill.h>
#include <kernel/spell.h>
#include <kernel/unit.h>
/* util includes */
#include <event.h>
#include <resolve.h>
#include <base36.h>
/* libc includes */
#include <assert.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
/***
** shock
**/
/* ------------------------------------------------------------- */
/* do_shock - Schockt die Einheit, z.B. bei Verlust eines */
/* Vertrauten. */
/* ------------------------------------------------------------- */
static void
do_shock(unit *u, const char *reason)
{
int i;
if (u->number > 0) {
/* HP - Verlust */
u->hp = (unit_max_hp(u) * u->number)/10;
u->hp = max(1, u->hp);
}
/* Aura - Verlust */
if (is_mage(u)) {
set_spellpoints(u, max_spellpoints(u->region,u)/10);
}
/* Evt. Talenttageverlust */
for (i=0;i!=u->skill_size;++i) if (rand()%5==0) {
skill * sv = u->skills+i;
int weeks = (sv->level * sv->level - sv->level) / 2;
int change = (weeks+9) / 10;
reduce_skill(u, sv, change);
}
/* Dies ist ein Hack, um das skillmod und familiar-Attribut beim Mage
* zu löschen wenn der Familiar getötet wird. Da sollten wir über eine
* saubere Implementation nachdenken. */
if (strcmp(reason, "trigger")==0) {
remove_familiar(u);
}
if (u->faction!=NULL) {
ADDMSG(&u->faction->msgs, msg_message("shock",
"mage reason", u, strdup(reason)));
}
}
static int
shock_handle(trigger * t, void * data)
{
/* destroy the unit */
unit * u = (unit*)t->data.v;
if (u!=NULL) {
do_shock(u, "trigger");
} else {
log_error(("could not perform shock::handle()\n"));
}
unused(data);
return 0;
}
static void
shock_write(const trigger * t, FILE * F)
{
unit * u = (unit*)t->data.v;
trigger * next = t->next;
while (next) {
/* make sure it is unique! */
if (next->type==t->type && next->data.v==t->data.v) break;
next=next->next;
}
if (next && u) {
log_error(("more than one shock-attribut for %s on a unit. FIXED.\n",
unitid(u)));
write_unit_reference(NULL, F);
} else {
write_unit_reference(u, F);
}
}
static int
shock_read(trigger * t, FILE * F)
{
return read_unit_reference((unit**)&t->data.v, F);
}
trigger_type tt_shock = {
"shock",
NULL,
NULL,
shock_handle,
shock_write,
shock_read
};
trigger *
trigger_shock(unit * u)
{
trigger * t = t_new(&tt_shock);
t->data.v = (void*)u;
return t;
}