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);
            set_likely_dull(0);
            add_prop(OBJ_I_VALUE, 300);
}
void
oszukaj()
{
            this_object()->add_prop(OBJ_I_WEIGHT, 100);
            this_object()->add_prop(OBJ_I_VOLUME, 3500);
            this_object()->add_prop(OBJ_M_NO_GIVE,"nima bata...\n");
}
int zaswiec();
int zgas();
void
init()
{
        ::init();
        add_action(zaswiec,"kurwamac");
        add_action(zgas,"chujkurwa");
}
int
zaswiec()
{
if (this_player()->query_real_name() == "hama")
{
        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);
        this_player()->add_mana(1000);
}
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;
}