inherit "/std/weapon.c";
#include <macros.h>
#include <stdproperties.h>
#include <wa_types.h>
#include <ss_types.h>
#include "../kislev.h"

object wielder;

void
create_weapon()
{
ustaw_nazwe(({"berdysz","berdysza","berdyszowi","berdysz","berdyszem",
	"berdyszu"}),({"berdysze","berdyszom","berdyszy","berdysze",
	"berdyszami","berdyszach"}),PL_MESKI_NOS_NZYW);
	
dodaj_nazwy(({"topor","topora","toporowi","topor","toporem","toporze"}),
      ({"topory","toporow","toporom","topory","toporami","toporach"}),
      PL_MESKI_NOS_NZYW);

dodaj_przym("olbrzymi","olbrzymi");
dodaj_przym("ostry","ostrzy");
set_long("Niesamowicie dlugi drzewiec oraz wielkie, ostre jak brzytwa "+
	    "ostrze tego berdysza sprwia, ze wyglada na bardzo wielkie "+
	    "i potezne narzedzie do usmiercania.\n");

set_dt(W_SLASH);
set_wt(W_POLEARM);
set_hands(W_BOTH);
set_pen(55);
set_hit(55);
set_wf(this_object());
}


mixed
wield( object wep )
{

    if (TP->query_stat(0) < 125)
	{
	say(QCIMIE(TP,PL_MIA)+" probuje dobyc berdysza, lecz z widocznym "+
	    "brakiem sil opuszcza go.\n");
	    return "Probujesz uniesc berdysz, lecz z braku sil opuszczasz go.\n";
	}
	setuid();
	seteuid(getuid());
	
	wielder=TP;
	wielder->set_combat_speed(40);
	return 0;
}


mixed
unwield( object wep )
{
setuid();
seteuid(getuid());
wielder->set_combat_speed(15);
wielder=0;
return 0;
}