/*
    * Jest to  bron
    * sporzadzona przez Elve
    */
inherit "/d/Imperium/std/weapon";
#include <stdproperties.h>
#include <macros.h>
#include <wa_types.h>
#include <ss_types.h>
#include <formulas.h>
#include <cmdparse.h>
#include "emoty.h"
void
create_weapon()
{
    ustaw_nazwe(({"kij", "kija", "kijowi",
                  "kij", "kijem", "kiju"}),
                ({"kije", "kijow", "kijom",
                  "kije", "kijami", "kijach"}),
                PL_MESKI_NZYW);
    dodaj_nazwy(({"palka", "palke", "palce", "palke", "palka",
                  "palce"}),
                ({"palki", "palek", "palkom", "palki",
                  "palkami", "palkach"}), PL_ZENSKI);
    dodaj_przym("sekaty", "sekate");
    dodaj_przym("dlugi", "dlugie");
                  
    set_long("Dlugi i sekaty kij, uzywany zarowno do pomocy przy wedrowce, " +
        "jak i do walki. Przypuszczasz, ze z uwagi na jego dlugosc, dosc trudno sie nim poslugiwac.\n");
    set_hit(22);  /* Wspolczynnik okreslajacy prawdopodobienstwo trafienia. */
    set_pen(8);   /* Wspolczynnik okreslajacy zadawane uszkodzenia. */
    set_wt(W_POLEARM); 
    set_dt(W_BLUDGEON);  /* Bron obuchowa. */
    set_hands(W_BOTH);  
    add_prop(OBJ_I_VALUE, 30);
    add_prop(OBJ_I_WEIGHT, 2000);
    set_likely_break(10);
}
void
init()
{
  ::init();
  add_action("uspokoj", "uspokoj");
  add_action("tlist", "tlista");
}
int
uspokoj(string str)
{
    object *oblist;
    object *targets;
    int     index = -1;
    int size;
        oblist = ({ this_player() });
        say(QCIMIE(this_player(), PL_MIA) + " usmiecha sie bardzo ladnie dajac znac, "+
            "iz dalsza walka nie jest konieczna.\n");
        write("Udalo ci sie uspokoic swych przeciwnikow.\n");
    size = sizeof(oblist);
    while(++index < size)
    {
        targets = oblist[index]->query_enemy(-1);
        oblist[index]->stop_fight(targets);
        targets->stop_fight(oblist[index]);
    }
    return 1;
}