inherit "std/receptacle.c";

#include <macros.h>
#include <stdproperties.h>
#include <cmdparse.h> 
#include <pl.h>

#define PLIK "/d/Imperium/Skrzynie/sskrzynia"
#define TO this_object()
#define TP this_player()

string *olist = ({});


void
create_container()
{
    ustaw_nazwe(({"szafka","szafki","szafki","szafke","szafka",
                  "szafki"}),
                ({"skrzynie","skrzyn","skrzyniom","skrzynie","skrzyniami",
                  "skrzyniach"}), PL_ZENSKI);

    dodaj_przym("komunistyczny","komunistyczni");
    dodaj_przym("bialy","biali");

    set_long("Widzisz dziwnie niepokojacy element kazdego kibla. "+
                    "Szafka ta jednakze rozni sie od wyzej wspomnianych..\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,"Na chuja ci taka paskudna szafka?!\n");
    
    
    setuid();
    seteuid(getuid());
    restore_object(PLIK);
}

void
save_me()
{
setuid();
seteuid(getuid());
save_object(PLIK);
}


void
enter_inv( object co, object skad )
{
olist += ({MASTER_OB(co)});
save_me();
}

void
leave_inv( object co, object dokad )
{
olist -= ({MASTER_OB(co)});
save_me();
}


void
load()
{
int i;
object *items=({});

    for ( i = 0; i < sizeof(olist); i++ )
        items += ({clone_object(olist[i])});

        olist->remove_object();
        save_me();

        for ( i = 0; i < sizeof(items); i++ )
            items[i]->move(TO); 

}

void
enter_env( object ob, object gdzie )
{
set_alarm(1.0,0.0,"load");
}