/*
 * Magazyn sklepu elfiego w Athel
 * Przedmiotom wchodzacym - zmniejsza wartosc ( w tym sklepie tansze sa 
 * elfie przedmioty, a tylko takie tu wlaza ), a wychodzacym - 
 * przywraca oryginalna wartosc.
 *
 *   by Tanis
 */

inherit "/d/Imperium/std/magazyn_std.c";


#include "ogolne.h"
#include "elfie_przedmioty.h"

create_imperium_magazyn()
{
   set_short("Magazyn sklepu w Athel Loren.\n");
   set_long("Stoisz w malym, dosyc ciemnym pomieszczeniu. Nie widac nic specjalnego poza tym, "
           + "ze wyglada ono na magazyn sklepowy.\n");

   (clone_object(PATH + "obiekty/woreczek.c"))->move(this_object());
   (clone_object(PATH + "bronie/enoz.c"))->move(this_object());
   (clone_object(PATH + "bronie/e_miecz.c"))->move(this_object());
   (clone_object(PATH + "bronie/e_wlocznia.c"))->move(this_object());
   (clone_object(PATH + "zbroje/e_kurtka.c"))->move(this_object());
   (clone_object(PATH + "zbroje/e_kurtka2.c"))->move(this_object());
}

void
enter_inv(object ob, object from)
{
    int a;

    ob->add_prop(OBJ_I_VALUE, ob->query_prop(ELFIA_WARTOSC_PRZEDMIOTU_W_ATHEL));

    ::enter_inv(ob,from);
}

void
leave_inv (object ob, object dest)
{

        object *rzeczy;
	int i;
	int jestnoz = 0;
	int jestmiecz = 0;
        int jestwlocznia = 0;
        int jestkurtka1 = 0;
        int jestkurtka2 = 0;
        int jestworek = 0;

        ob->add_prop(OBJ_I_VALUE, ob->query_prop(ORYGINALNA_WARTOSC_PRZEDMIOTU_W_ATHEL));
	
	::leave_inv(ob, dest);
	
	rzeczy = all_inventory(this_object());
	
	for (i = 0; i < sizeof(rzeczy); i++)
	{
                if(rzeczy[i]->id("_elfi_miecz_z_athel_"))
		{
			jestmiecz = 1;
		}
                if(rzeczy[i]->id("_elfi_noz_z_athel_"))
		{
			jestnoz = 1;
		}
                if(rzeczy[i]->id("_elfia_wlocznia_z_athel_"))
		{
			jestwlocznia = 1;
		}
                if(rzeczy[i]->id("_elfia_kurtka1_z_athel_"))
		{
			jestkurtka1 = 1;
		}
                if(rzeczy[i]->id("_elfia_kurtka2_z_athel_"))
		{
			jestkurtka2 = 1;
		}
                if(rzeczy[i]->id("_elfi_worek_na_ziola_z_athel_"))
		{
			jestworek = 1;
		}
	
	}
	
	if (!jestnoz)
           (clone_object(PATH + "bronie/enoz.c"))->move(this_object());
	if (!jestmiecz)
           (clone_object(PATH + "bronie/e_miecz.c"))->move(this_object());
        if(!jestwlocznia)
          (clone_object(PATH + "bronie/e_wlocznia.c"))->move(this_object());
        if(!jestkurtka1)
          (clone_object(PATH + "zbroje/e_kurtka.c"))->move(this_object());
        if(!jestkurtka2)
          (clone_object(PATH + "zbroje/e_kurtka2.c"))->move(this_object());
        if(!jestworek)
          (clone_object(PATH + "obiekty/woreczek.c"))->move(this_object());

        return;
}