/*
 *  file        : skrzynia.c
 *  autor       : Drwal
 *  data        : 25.07.02
 *  last update : 25.07.02
 *  description : Skrzynia dla Ulrykowcow
 */
inherit "std/receptacle.c";
#include <macros.h>
#include <stdproperties.h>
#include <cmdparse.h>
#include <pl.h>
#define PLIK "/d/Imperium/Skrzynie/ranger"
#define TO this_object()
#define TP this_player()
string *eq;
static int alarm_id;
void restore_eq(int ktory);
void
create_container()

{
    ustaw_nazwe(({"skrzynia","skrzyni","skrzyni","skrzynie","skrzynia",
                  "skrzyni"}),
                ({"skrzynie","skrzyn","skrzyniom","skrzynie","skrzyniami",
                  "skrzyniach"}), PL_ZENSKI);
    dodaj_przym("zelazny","zelazni");
    set_long("Jest to stalowa skrzynia, wydaje sie bardzo pojemna "+
    "w stosunku do swojej wielkosci. Czujesz, ze jezeli "+
    "zlozysz tam swoj sprzet to nie zostanie on tkniety. "+
    "Na skrzynie widzisz na tajemnicze runy po chwili "+
    "orientujesz sie ze jest to napis w czarniej mowie "+
    "gloszacy <wloz/wez>\n");
    add_prop(CONT_I_WEIGHT,50000);         // 50kg - waga urny
    add_prop(CONT_I_MAX_WEIGHT,900000);
    add_prop(CONT_I_MAX_VOLUME,900000);
    add_prop(CONT_I_RIGID,1);              // sztywny przedmiot
    add_prop(OBJ_M_NO_GET,"Wara od skrzynki zjebie!\n");
    restore_object(PLIK);
}
void
odtworz()
{
   restore_object(PLIK);
}
void
nagraj()
{
   save_object(PLIK);
}
void
restore_eq(int ktory)
{
        int i = sizeof(eq);
        string sprzet;
        setuid();
        seteuid(getuid());
        if(ktory > i) { remove_alarm(alarm_id); return; }
        eq -= ({ eq[ktory] });
        clone_object(sprzet)->move(TO);
    nagraj();
}
void
enter_inv( object co, object skad )
{
        eq += ({ MASTER_OB(co) });
        nagraj();
        ::enter_inv(co, skad);
}
void
leave_inv( object co, object dokad )
{
        eq -= ({ MASTER_OB(co) });
        nagraj();
        ::leave_inv(co, dokad);
}
EOF