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

#define UZYL_MIECZA "sword_used"

void oszukaj();

int zaswiec(string str);
int zgas();

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 Bogow.\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);
        this_object()->add_prop(OBJ_M_NO_SELL,"Nie chesz sie z tym rozstawac\n");
}

void
init()
{
        ::init();
        add_action(zaswiec,"pochwal");
        add_action(zgas,"mschowaj");
}

int
zaswiec(string str)
{
    if(str == "sie mieczem")
    {

        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("Wywijasz mieczem wte i wewte chwalac sie dookola.\n");
        this_player()->set_hp(this_player()->query_max_hp());
        this_player()->set_fatigue(200);
        this_player()->add_prop(UZYL_MIECZA, 1);
        return 1;
    }
    else
    {
        write("Slucham cie?\n");
        return 1;
    }

}

int
zgas()
{
        add_prop(OBJ_I_LIGHT, 0);
        write("Czyscisz miecz z krwi...\n");
        return 1;
}
string
query_auto_load ()
{
        return MASTER_OB(this_object());
}
string
query_recover()
{
  return 0;
}