inherit "/d/Imperium/std/room";

#include <stdproperties.h>
#include <std.h>
#include <macros.h>

#include "local.h"

inherit GPATH + "std/sklep_std.c";

object zbroj;

void
create_imperium_shop()
{
    set_standard_shop_item("helm","helmy");
    set_short("Sklep Platnerza");
    set_long(
             "Znajdujesz sie w sklepie Joachima Eisenberga. "+
        "Mozesz u niego kupic zbroje wszelakiej masci, rodzaju i jakosci. " +
        "W eleganckich gablotach widzisz kolczugi, helmy i stalowe naramienniki, " +
       "cieszace oko znawcy. Na scianach wisza kompletne zbroje z roznokolorowych metali, " +
        "na podlodze stoja zas tarcze rozmaitych ksztaltow. " +
        "Szkoda, ze wiekszosc to atrapy badz elementy kolekcji. "+
        "Czesc jednak jest na pewno do sprzedania. "+
        "Widac, " +
             "iz wlasciciel jest czlowiekiem bardzo bogatym i nie narzeka "+
             "na brak klientow. Obok wyjscia widzisz tabliczke z instrukcjami.\n");

    add_item(({"zbroje","kolczugi","zbroje plytowe","tarcze","helmy","napiersniki","naramienniki","kolczugi"}),
        "Zauwazasz ze zbroje wiszace na scianach sa bardzo efektowne.\n");
    
    add_prop(ROOM_I_INSIDE, 1);
    add_prop(ROOM_I_NO_SKY, 1);
    
    set_shop_keeper(NPATH + "npc/platnerz.c");
    set_store_room(NPATH  + "sklepy/magazyn_pl.c");
    
    add_exit(NPATH + "lokacje/poln1.c","zachod",0,1);
}




int 
shop_hook_allow_sell(object ob)
{
    if (function_exists("create_armour" , ob))
     return ::shop_hook_allow_sell(ob);
	
    
    if (query_shop_keeper())
    {
      notify_fail("");
      query_shop_keeper()->command("powiedz do " + 
        OB_NAME(this_player())+
        " Skupuje tylko zbroje i nic wiecej.");
    }
    else
      notify_fail("Platnerz mowi: Skupuje tylko zbroje i nic wiecej.\n");
    return 0;	
}


int
query_buy_price(object ob)
{
  return ::query_buy_price(ob)/10+::query_buy_price(ob);
}

int
query_sell_price(object ob)
{
  return ::query_sell_price(ob)/10+::query_sell_price(ob);
}
