inherit "/d/Imperium/std/weapon";

#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()
object wielder;

create_weapon()
{
ustaw_nazwe(({"kij", "kija", "kijowi", "kija", "kijem", "kiju"}),
({"kije", "kijow", "kijom", "kije", "kijami", "kijach"}),
PL_MESKI_NOS_ZYW);
    dodaj_przym("pulsujacy","pulsujace");


    dodaj_przym("jaskrawy","jaskrawe");

set_long("Jest to legendarny kij songa bije od niego swiatlosc i groza. "+
         "Wydaje ci sie ze jest on niezniszczalny i smiertelnie skuteczny w walce "+
         "Jest to wymazony kij dla wojownika.\n");


             
    set_likely_dull(0);
    add_prop(OBJ_M_NO_BUY, 1);
    
    add_prop(OBJ_I_IS_MAGIC_WEAPON, 1);
    
    add_prop(OBJ_I_LIGHT, 100);
    
    add_prop(MAGIC_AM_MAGIC, ({ 70, "enchantment"}));
set_hit(73);
set_pen(43);
set_wt(W_POLEARM);
set_dt(MAGIC_DT);

set_hands(W_BOTH);
add_prop(OBJ_I_WEIGHT, 300);
add_prop(OBJ_I_VOLUME, 300);
add_prop(OBJ_I_VALUE, 850);
}
mixed
wield(object what)
{
   set_alarm(0.1,0.0,"add_wielder");
   TP->set_skill_extra(0, 30);
   TP->set_skill_extra(23, 30);
   write("Dobywasz pulsujacego kija czujac potezna moc wdzierajaca sie w twoje "+
         "cialo. Po chwili przed oczami ujawnia ci sie wizerunek legendarnego "+
         "saiyanina ktory po chwili znika.\n");
   say(QCIMIE(this_player(),PL_MIA)+" dobywa kija i po chwili na jego ustach pojawia sie"+
        " demoniczny usmiech mowiacy zeby lepiej z nim nie zadzierac.\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(300, 300);
   TP->set_skill_extra(230, 120);
write("Opuszczajac kij czuje dziwny niedobur i na moment padasz na ziemie"+
         " czujac jak opuszcza cie sila kija po chwili wstajesz zniechecia.\n");
   say(QCIMIE(this_player(),PL_MIA)+" opuszcza kij upadajac na ziemie"+
       " jednak po chwili niechetnie wstaje z niej\n");
          
   return 1;
}