/*
 * Przyklad najprostszego sklepu.
 */

inherit "/d/Imperium/std/room"; /* ten obiekt jest pokojem */
inherit "/lib/shop"; /* ten obiekt jest sklepem */

#include "silvy.h" /* standardowe wlasciwosci */

object kartograf;  //10
void
create_imperium_room()
{
    set_short("Sklep kartografa");
    set_long("Jest to to mala, ale jasno oswietlona izba. Waskie okna i "
       +"drewniane drzwi prowadza na ulice. Pod przeciwlegla sciana stoi "
       +"male biureczko. Jest tu duszno, wkolo unosza sie "+
       "majestatyczne obloki kurzu. Za biurkiem na przymocowanej do sciany polce "
       +"lezy stosik map. Przy wyjsciu wisi przybita tabliczka z "
       +"instrukcjami.\n");

    add_exit(NPATH + "lokacje/do_most1.c","polnoc");

    config_default_trade(); /* ustawia standardowe wartosci */

    add_item( ({ "instrukcje", "tabliczke" }), "Tabliczka ze wskazowkami "+
        "dla klientow.\n");
    add_item( ({"polke","poleczke","mapy","stosik"})," Na poleczce pod sciana lezy "
       +"kilka zapisanych "
       +"pergaminow. Sa zwiniete, nie jestes w stanie zobaczyc, co na nich "
       +"jest, ale zapewne sa to mapy.\n");
    add_item( "drzwi","Niskie, drewniane drzwi prowadza na ulice. Nie "
       +"wygladaja na bardzo wytrzymale, ale i tak sa caly czas otwarte.\n");

    add_item(({"biurko","biureczko","ogarek","kleksy"})," Pod jedna ze scian stoi biureczko "
       +"kartografa. Tutaj kopiuje on mapy na sprzedarz. Na biurku stoi "
       +"ogarek swiecy, blata zas poplamiony jest licznymi kleksami "
       +"atramentu.\n");

    add_cmd_item( ({ "instrukcje", "tabliczke" }), "przeczytaj"," W naszym "
       +"sklepie mozesz kupic doskonala mape naszego pieknego miasta, "
       +"narysowana przez samego nadwornego kartografa, za jedyne 16 "
       +"srebrnych i 8 miedzianych monet. UWAGA: Nie prowadzimy skupu.\n");
//30
    set_store_room(NPATH+"sklepy/mag_karto.c");

    add_prop(ROOM_I_INSIDE, 1); /* to jest pokoj, a nie lokacja na zewnatrz*/
    reset_imperium_room();
}

void
init()
{
    ::init(); /* MUSI byc wywolane w kazdym inicie */ // 40
    init_shop();
}

int
shop_hook_allow_sell(object ob)
{
        kartograf->powiedz("Nie, ja nic nie kupuje, ja tylko sprzedaje mapy.\n");
        return 0;
}
//50
int
shop_hook_allow_buy(object ob)
{
    if(kartograf) 
	return ::shop_hook_allow_buy(ob);
	notify_fail("Nie ma kartografa.\n");
    return 0;
}

int
query_buy_price(object ob)
{
	return ob->query_prop(OBJ_I_VALUE);
}

void
reset_imperium_room()
{
    if(!kartograf)
    {
        kartograf = clone_object(NPATH + "npc/kartograf.c");
        kartograf->move(this_object());
    }
}