/* 
 * Kompania Krogulca
 *
 * Copyright(C):    Khazzar (jedrekz@pascom.pl)
 * Data:            26.08.2003
 * 
 */

#include "def.h"
inherit N_STD + "room";
               
void
create_room_w_obozie()
{
    set_short("Stajnia");
    set_long("Znajdujesz sie w przestronnej stajni. To tutaj " +
             "trzymane sa rumaki bojowe Kompanii. Budynek wykonano niemal " +
             "w calosci z drewna, jedynie podmurowka jest kamienna. " +
             "Pierwszym co zauwazasz to zapach, a wlasciwie calkiem mocny " +
             "smrod konskiego potu, konskich odchodow, zmiesznaego z ledwo " +
             "zauwazalnym zapachem siana. Po stajni krzata sie kilku " +
             "rekrutow dogladajacych koni. W miejscu tym zolnierze Kompanii " +
             "moga pobierac rumaki a ich obiazkiem jest odstawic wierzchowce " +
             "spowrotem do boksow.\n");
  
    add_prop(ROOM_I_INSIDE,0);
    add_prop(ROOM_I_LIGHT,10);

    add_exit(N_LOCATIONS + "4x2","polnoc");
    add_exit(N_LOCATIONS + "3x1","zachod");

    clone_object(N_OBJ + "rumak")->move(TO);
    clone_object(N_OBJ + "rumak")->move(TO);
    clone_object(N_OBJ + "rumak")->move(TO);
    clone_object(N_OBJ + "rumak")->move(TO);
}

int
pobierz( string str )
{

    notify_fail("Slucham?\n");
    if ( !ENGINE->query_member(TP) ) return 0;

    notify_fail("Slucham?\n");
    if ( ENGINE->query_data(TP, RANGA)<=ZOLNIERZ ) return 0;

    notify_fail("Pobierz co? Moze rumaka?\n");
    if (str != "rumaka") return 0;

    tell_room(environment(TP),"Stajenny niknie na chwile ci z oczu, a " +
             "po chwili wraca prowadzac ze soba rumaka.\n");

    setuid();
    seteuid(getuid());

    clone_object(N_ITEMS + "rumak")->move(TO);
    return 1;
}

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