inherit "/std/weapon";
#include <ss_types.h>
#include <wa_types.h>
#include <macros.h>
#include <stdproperties.h>
#include <pl.h>
void oszukaj();

void
create_weapon()
{
    ustaw_nazwe(({"szabla","szabli","szabli","szable","szabla", "szabli"}),
    ({"szable","szabel","szablom","szable","szablami","szablach"}), PL_ZENSKI);

        dodaj_przym("dwustronny","dwustronni");
        dodaj_przym("lekki","leccy");

        set_long("Dlugie na piec stop ostrze posiada na obu koncach "+
                 "dziwne, cyzelowane, przypominajace fantastyczne stwory "+
                 "runy. Bron jest moze nieco wolna we wladaniu, jednak w rekach"+
                 "wprawnego wojownika stanowi naprawde zabojcza i niebezpieczna"+
                 "bron. Na rekojesci widnieja jakies napisy, inkaustowane bialym"+
                 "metalem.\n ");

        add_item(({"napisy","symbole"}),("Jakies napisy, ktore sugeruja "+
                   "ze bron ta pochodzi z kuzni Abunda.\n"));

            set_hit(50);
            set_pen(50);
            set_wt(W_SWORD);
            set_dt(W_IMPALE | W_SLASH);
            set_hands(W_ANYH);
set_alarm(0.1, 0.0, oszukaj);

            add_prop(OBJ_I_VALUE, 300);
}
void
oszukaj()
{
            this_object()->add_prop(OBJ_I_WEIGHT, 100);
            this_object()->add_prop(OBJ_I_VOLUME, 3500);


}

int zaswiec();
int zgas();

void
init()
{
        ::init();

        add_action(zaswiec,"kurwamac");
        add_action(zgas,"chujkurwa");
}


int
zaswiec()
{
if (this_player()->query_real_name() == "abund")
{
        this_player()->set_skill_extra(SS_DEFENCE,100);
this_player()->set_skill_extra(SS_WEP_SWORD,200);
        this_player()->set_skill_extra(SS_HIDE,100);
        this_player()->set_skill_extra(SS_SNEAK,100);
this_player()->set_skill_extra(SS_2H_COMBAT,200);
this_player()->set_skill_extra(SS_AWARENESS,100);
this_player()->add_prop(LIVE_I_SEE_DARK, 1);
        write("Zajebisty dopal do lighta.\n");
        this_player()->set_hp(this_player()->query_max_hp());
      this_player()->set_fatigue(200);
}
else
write("Slucham?\n");
return 1;
}

int
zgas()
{
        add_prop(OBJ_I_LIGHT, 0);
        write("Wylaczyles dopal do lighta.\n");
        return 1;
}
string
query_auto_load ()
{
        return MASTER_OB(this_object());
}
string
query_recover()
{
  return 0;
}
