
#pragma strict_types

inherit "/std/armour";

#include <stdproperties.h>
#include <wa_types.h>
#include <formulas.h>
#include <macros.h>

#define LESNICZY_PIERSCIEN_SUBLOC "_rangar_subloc"

void
create_armour()
{
    ustaw_nazwe(({"pierscien","pierscienia","pierscieniowi","pierscien","pierscieniem","pierscieniu"}),
                ({"pierscienie","pierscieni","pierscieniom","pierscienie","pierscieniami","pierscieniami"}),
                PL_MESKI_NOS_NZYW);
    dodaj_przym("stalowy","stalowi");
    dodaj_przym("prosty","prosty");

    add_name("pierscien_lasu");

    add_prop(OBJ_M_NO_SELL, "Nie mozesz sprzedac stalowego pierscienia.\n");
    add_prop(OBJ_M_NO_DROP, "Nie mozesz pozbyc sie stalowego pierscienia.\n");
    add_prop(OBJ_M_NO_GIVE, "Nie mozesz oddac stalowego pierscienia.\n");
    
    set_long("@@piersciendesc");
    set_ac(A_ANY_FINGER,0,0,0);
    this_object()->set_af(this_object());	/* Aby byly wywolywane wear(), remove(). */
    
    add_prop(OBJ_I_VALUE, 10);
    add_prop(OBJ_I_WEIGHT, 2);
    add_prop(OBJ_I_VOLUME, 2);

    set_alarm(5.0,0.0,"dodawanie_soula");
}

void
leave_env(object from, object to)
{
    this_player()->remove_subloc(LESNICZY_PIERSCIEN_SUBLOC);

    ::leave_env(from, to);
}

string
show_subloc(string subloc, object on_obj, object for_obj)
{
    if (subloc == LESNICZY_PIERSCIEN_SUBLOC)
    {
        if (for_obj == on_obj)
            return "Twoj stalowy pierscien swiadczy o czlonkostwie w Lesnym Kregu.\n";
        return "Je"+on_obj->koncowka("go","j")+" stalowy pierscien to symbol przynaleznosci do Lesnego Kregu.\n";
    }
}

mixed
wear()
{
    this_player()->add_subloc(LESNICZY_PIERSCIEN_SUBLOC, this_object());

    return 0;
}

mixed
remove()
{
    this_player()->remove_subloc(LESNICZY_PIERSCIEN_SUBLOC);

    return 0;
}


string
query_recover()
{
    return 0;
}

string
query_auto_load()
{
    return MASTER;
}

string
piersciendesc()
{
    return "Prosty, stalowy pierscien, pokryty delikatnymi wyobrazeniami drzew. Po wewnetrznej stronie jest napisane:"+
           " Jesli chcesz " +
           /* dowiedziec sie czegos o Lesnym Kregu, napisz 'lkkrag', jesli chcesz */
           "dowiedziec sie, jakich nowych komend mozesz uzywac, napisz 'lkpomoc'."+
           " Pierscien ten jest symbolem czlonkostwa w Lesnym Kregu, nos go z duma.\n";
}

void
dodawanie_soula()
{
    environment(this_object())->add_cmdsoul("/d/Imperium/Lesnykrag/lesniczy_soul");
    environment(this_object())->update_hooks();
}
   