inherit "/d/Imperium/std/weapon";
object wielder;
#include <wa_types.h>
#include <stdproperties.h>
#include <macros.h>
#include <formulas.h>
#include <filter_funs.h>
#include <options.h>
#define TP              this_player()
#define TO              this_object()
void
create_weapon()
{
        
       ustaw_nazwe(({"topor","topora","toporowi","topor","toporem",
"toporze"}), 
    ({"topory","toporow","toporom","topory","toporami","toporach"}),
PL_MESKI_NOS_NZYW);
       dodaj_przym("ogromny","ogromni");
       dodaj_przym("szeroki","szerocy");
        set_long("Ogromny topor z dlugim debowym trzonem. Mozna go rowniez zaliczyc do " +
"berdyszow jednak waga sprawia ze topor ten jest grozny w wprawnych rekach. Szerokie " +
"lsniace ostrze jest zdobione mithrylem i zlotem. Na trzonie i ostrzu zostaly wyryte " +
"delikatne runy w jakims zapomnianym jezyku.\n");
        set_likely_dull(0);
    add_prop(OBJ_M_NO_BUY, 1);
    
    add_prop(OBJ_I_IS_MAGIC_WEAPON, 1);
    
    add_prop(MAGIC_AM_MAGIC, ({ 90, "enchantment"}));
    set_hit(50);
    set_pen(60);
    set_wt(W_AXE);
    set_dt(W_SLASH);
    set_hands(W_BOTH);
    add_prop(OBJ_I_WEIGHT, 8000);
    add_prop(OBJ_I_VOLUME, 10000);
    add_prop(OBJ_I_VALUE, 10500);
}
mixed
wield(object what)
{
   set_alarm(0.1,0.0,"add_wielder");
   TP->set_skill_extra(24, 30);
   TP->set_skill_extra(23, 30);
   write("Dobywasz szybkim ruchem topora, ten zaczyna szybko wibrowac " +
"a jego ostrze rozblyska lekkim swiatlem. Czujesz iz teraz mogolbys " +
"uniknac kazdego ciosu.\n");
   say( "Szybkim ruchem "+ QCIMIE(this_player(),PL_MIA) +" dobywa ogromnego " +
"szerokiego topora. Nagle topor zaczyna wibrowac, ostrze rozblyska lekkim swiatlem, a " + QCIMIE(this_player(),PL_MIA)
+ " zaczyna poruszac sie nieco zwinniej.\n");
   return 1;
}
void
add_wielder()
{
    wielder = environment(this_object());
}
object
query_wielder()
{
   return wielder;
}    
mixed
unwield(object what)
{
   set_this_player(wielder);
   if(environment(this_object())!=wielder) 
       return 1;
   TP->set_skill_extra(24, 0);
   TP->set_skill_extra(23, 0);
   write("Opuszczasz powolnie swoj topor, czujesz ogromna pustke w glowie " +
"po tak poteznym artefakcie.\n");
   say(QCIMIE(this_player(),PL_MIA)+" opuszcza swoj ogromny szeroki topor i ku " +
"twojemu zaskoczeniu na twrazy osoby, ktora byla tak potezna pojawia sie smutek " +
"oraZ zmartwienie.\n");     
   return 1;
}