inherit "/d/Imperium/std/room";
#include "defs.h"

void
create_imperium_room()
{
    set_short("Stajnia Klanu Tygrysa");
    set_long("Wchodzisz do pomieszczenia, ktore z zewnatrz wyglada " +
             "jakby bylo stworzone do noszenia okreslenia: stajnia. " +
             "Jakie jest twoje zdziwienie, kiedy zamiast " +
             "spodziewanego widoku boksow z konmi wpadasz na " +
             "horde wielkich bialych tygrysow! Najwyrazniej nikt " +
             "sie nie przejmuje, ze chodza sobie swobodnie po calym " +
             "pomieszczeniu, tylko kilku opiekunow pilnuje, zeby nie wyszly " +
             "na zewnatrz.\n");
 
    add_prop(ROOM_I_LIGHT, 2);
    add_prop(ROOM_I_INSIDE, 1);

    add_item("tabliczke",
             "Mala, drewniana tabliczka. Moze warto by je przeczytac.\n");


    add_cmd_item("tabliczke", ({"czytaj", "przeczytaj"}),
                 "  +--------------------------------------------------+ \n" +
                 "  |                                                  | \n" +
                 "  | Krotka instrukcja obslugi tygrysa:               | \n" +
                 "  |                                                  | \n" +
                 "  | Tygrys jest narzedziem wielostronnym, dla Ciebie | \n" +
                 "  | najwazniejsza jest strona grzbietowa, gdzie to   | \n" +
                 "  | tygrysa 'dosiadasz'  oraz przednia, ktora to     | \n" +
                 "  | czasem wesprze cie w walce.  Nigdy nie korzystaj | \n" +
                 "  | z czesci tylnej                                  | \n" +
                 "  |                                                  | \n" +
                 "  | Tygrysa mozna  'prowadzic' albowiem 'dosiasc' go | \n" +
                 "  | mozna tylko na otwartej przestrzeni.  Jezeli za  | \n" +
                 "  | potrzeba udac sie musisz mozesz 'przestac        | \n" +
                 "  | prowadzic wilka' coby cie nie podgladal.         | \n" +
                 "  |                                                  | \n" +
                 "  +--------------------------------------------------+ \n");

    add_exit(PATH + "room/4","polnoc"); 
}

int
zamow( string str )
{
    object ob;

    setuid();
    seteuid(getuid());
    if (str == "tygrysa")
    {
        write("Stary samuraj przyprowadza ci tygrysa.\n");
        ob=clone_object("/d/Imperium/Konie/tygrys.c");
        ob->move(environment(TP));
        return 1;
    }


    write("Zamow co?\n");
    return 1;
}

void
init()
{
    ::init();
    add_action("zamow","zamow");
}