inherit "/d/Imperium/std/room";
#include "defs.h"
void
create_imperium_room()
{
   set_short("Sypialna samurajow Bialego Tygrysa");
   set_long("Znajdujesz sie w prostokatnym pomieszczeniu bez okien z drzwiami na poludniu. "+
            "Wewnatrz na marmurowej posadzce, rozlozone sa slomiane maty, na ktorych spia samuraje. "+
            "Nie jest to wygodne loze, ale uczy zawzietosci i wyrabia charakter.\n");
   add_prop(ROOM_I_INSIDE,1);
   add_prop(ROOM_I_LIGHT,1);
   add_item("maty", "Slomiane maty na ktorych z pewnoscia mozesz przenocowac.\n");
   add_exit(PATH + "room/3", "poludnie");
}
int
startuj( string str )
{
notify_fail("Nocuj tutaj?\n");
if ( str == "tutaj" )
{
  if (TP->query_guild_name_occ() != GUILD_NAZWA)
   {
     write("Nie jestes samurajem! Jesli polozysz sie na macie i ktos to zauwazy to juz sie nie obudzisz!\n");
     return 1;
   }
  if (TP->set_default_start_location(PATH + "room/1"))
   {
      write("Wybierasz sobie mate na ktorej od teraz bedziesz odpoczywal.\n");
      return 1;
   }
   notify_fail("Cos sie nieudalo!\n");
   return 0;
}
return 0;
}
void
check_start(object player)
{
    set_this_player(player);
    if((TP->query_guild_name_occ() != GUILD_NAZWA) && (TP->query_default_start_location() == MASTER_OB(this_object()) ))
    {
      TP->set_default_start_location("/d/Standard/start/church");
      TP->catch_msg("Jeden z samurajow podchodzi do ciebie i nie kryjac wrogosci atakuje cie swa lsniaca katana. "+
                    "Nie dajesz rady sie obronic a ostrze ucina ci glowe, nastaje ciemnosc.\n");
      TP->set_hp(0);
      TP->do_die();
    }
}
void
enter_inv(object ob, object from)
{
   set_alarm(0.5, 0.0, &check_start(TP));
   ::enter_inv(ob, from);
}
void
init()
{
        ::init();
        add_action("startuj", "startuj");
        add_action("startuj", "nocuj");
}