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_NZYW);
                
    dodaj_przym("potezny","potezne");
    dodaj_przym("zlocony","zlocone");
    set_long("Ta zaiste przepiekna bron przytlacza cie swymi rozmiarami. " +
             "Ogromne polkoliste ostrze mieni sie dziwnym zlowrogim blaskiem, " +
             "dodatkowo zdobione pozlacanymi pedami winorosli. Tajemnicze " +
             "runy pokrywajace je, polyskuja przy kazdym zalamaniu swiatla. " +
             "Trzonek tegoz topora wykonany jest z bardzo solidnego drewna " +
             "a mocne rzemienie przymocowane do jego konca ulatwiaja " +
             "operowanie bronia i uniemozliwiaja wytracenie jej. " +
             "W rekach dobrego wojownika, bron ta jest z pewnoscia " +
             "smiertelnym narzedziem i rozpedzona ciezko zatrzymac czymkolwiek.\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(95);
    set_pen(55);
    set_wt(W_AXE);
    set_dt(W_BLUDGEON);
    set_hands(W_ANYH);
    add_prop(OBJ_I_WEIGHT, 1500);
    add_prop(OBJ_I_VOLUME, 6000);
    add_prop(OBJ_I_VALUE, 8500);
}
mixed
wield(object what)

{
   set_alarm(0.1,0.0,"add_wielder");
   TP->set_skill_extra(5, 30);
   TP->set_skill_extra(24, 30);
   write("Kiedy dobywasz swej broni runy umieszczone na ostrzu " +
         "rozpalaja sie niemal do bialosci a ty czujesz jak wstepuje w  " +
         "ciebie moc zatajona w tej poteznej broni.\n");
    say(QCIMIE(this_player(),PL_MIA) + " dobywa poteznego " +
        "zloconego topora. Nagle dostrzegasz jak runy umieszczone na ostrzu broni " +
        "rozpalaja sie do bialosci.\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(5, 0);
   TP->set_skill_extra(24, 0);
   write("Z wielkim zalem opuszczasz swa bron czujac sie znacznie slabszym.\n");
   say(QCIMIE(this_player(),PL_MIA)+" opuszcza z zalem swoj potezny zlocony topor.\n");     
   return 1;
}
