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

#include <wa_types.h>
#include <macros.h>
#include <stdproperties.h>

void
create_weapon()
{
   ustaw_nazwe( ({ "sztylet", "sztyletu", "sztyletowi", "sztylet", "sztyletem",
                   "sztylecie" }), ({ "sztylety", "sztyletow", "sztyletom",
                   "sztylety", "sztyletami", "sztyletach" }), PL_MESKI_NOS_NZYW);

    dodaj_przym("trojkatny","trojkatni");
    dodaj_przym("dlugi","dludzy");

   set_long("Jest to dlugi sztylet o trojkatnym ostrzu i rzezbionej w wezowe "+
            "wzory rekojesci. Jest chyba niesamowicie skuteczny. U spodu rekojesci ma dziwny, pulsujacy rubin.\n");

            set_hit(50);
            set_pen(50);
            
            set_wt(W_KNIFE);
            set_dt(W_IMPALE);
            set_hands(W_ANYH);             
            add_prop(OBJ_I_WEIGHT, 800);
            add_prop(OBJ_I_VOLUME, 500);
            add_prop(OBJ_I_VALUE, 601);
            add_prop(MAGIC_AM_MAGIC, ({33, "enchantment"}));
            add_prop(OBJ_I_IS_MAGIC_WEAPON, 1);  
                                 
}
  
  
mixed
wield(object ob)
{
      
      write("W momencie dobycia przez ciebie tej wspanialej broni, waz z rekojesci"+
            " ozywa oplotujac ci reke i zatapiajac swe kly w twej dloni. Czujesz sie bardzo pobudzony.\n");
	    say(""+QCIMIE(this_player(),PL_MIA)+" dobywa swego sztyletu, i ku zdziwieniu waz z rekojesci ozywa"
	        +" zatapiajac swe kly w rece "+QCIMIE(this_player(),PL_MIA)+", poczym jego oczy wydaja sie palac energia.\n");
    
this_player()->set_combat_speed(this_player()->query_combat_speed()+45);
	
	   return 0;
}

mixed
unwield(object weapon)
{
      write("Przez pewien moment skupiasz swoj wzrok na rubinie a waz z rekojesci "+
            "uwalnia cie z eswego uscisku. Czujesz pewien niedostatek...\n");
	    say(""+QCIMIE(this_player(),PL_MIA)+" koncentruje wzrok na rubinie jego broni do momentu gdy"
	        +" waz uwalnia "+this_player()->koncowka("go","ja")+" ze swego chwytu.W "+this_player()->koncowka("jego","jej")+" oczach maluje sie niedosyt.\n");
    
this_player()->set_combat_speed(this_player()->query_combat_speed()-45);
	
	   return 0;


}