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

#define TP this_player()
#define TO this_object()

object w;

void
create_weapon()
{
        ustaw_nazwe(({"miecz", "miecza", "mieczowi", "miecz", "mieczem", "mieczach"}),
                    ({"miecze", "mieczy", "mieczom", "miecze", "mieczami", "mieczach"}),
                    PL_NIJAKI_NOS);
    
    dodaj_przym("ognisty","ognisci");
    dodaj_przym("zebaty","zebaci");
    
    set_long("Jest to miecz wykonany z krysztalu kamieni dusz, otoczony "+
	"ognista aura dajaca duzo swiatla. Z jednej ze stron jest pokryty "+
	"wieloma ostrymi zabkami dzieki czemu moze zadawac jeszcze wiekszy "+
	"bol podczasz ciecia. Rekojesc jest pokryta licznymi runami, zakonczona "+
	"czarnym diamentem. Caly miecz wyglada przerazajaco, jak by byl wykuty "+
	"w piekielnej kuzni gdzies w najskrytszych zakamarkach piekla.\n");
	
    set_hit(70);
    set_pen(70);
    set_hands(W_ANYH);
    set_dt(W_SLASH);
    set_wt(W_SWORD);
    
    set_wf(TO);
}

mixed
wield( object ob )   {

    w = TP;
    w->catch_msg("Miecz bucha ogniem, kiedy zaciskasz na jego rekojesci "+
	"swoja dlon.\n");
    saybb("Kiedy "+QIMIE(w,PL_MIA)+" zaciska na rekojesci zebatego miecza swa "+
	"dlon, jego ostrze bucha piekielnym ogniem.\n",({w}));

    add_prop(OBJ_I_LIGHT,10);

    return 1;
}

mixed
unwield( object ob )
{
    w->catch_msg("Ostrze gasnie.\n");
    w=0;
    remove_prop(OBJ_I_LIGHT);
    return 0;    
}