/*
 * Cmentarz poludniowo-wschodni
 */

#include "mith.h"
inherit "/d/Imperium/std/room";
inherit STDPATH+"pogoda.c";

#include "/d/Imperium/sys/alarm.h"

create_imperium_room()
{
    set_short("Cmentarz");
        set_long("@@dlugi");
        add_item(({"grob","groby"})," Oprocz dzielacych kwatery aleji caly "
           +"cmentarz zapelniony jest gesto grobami. Miedzy nimi biegna "
           +"tylko male, waskie sciezki. Groby te naleza do bylych "
           +"mieszkancow miasta. Wieksze, murowane grobowce ozdobione "
           +"plaskozezbami do najbogatszych, male pokryte ziemia groby z "
           +"drewnianymi krzyzami do najbiedniejszych. Zebrakow i wloczegow "
           +"chowa sie we wspolnych dolach, kopanych na granicach "
           +"cmentarza.\n");

        add_event("Mija cie wysoki mezczyzna, niosacy w reku lopate.\n",1);
        add_event("Dobiega cie mrozacy krew w zylach krzyk.\n",2);
        add_event("Miedzy grobowcami przemyka cos na ksztalt cienia.\n",2);
        add_event("Slyszysz skrzypienie, jakby ktos przesuwal cos ciezkiego. "
           +"Moze to drzwi grobowca?\n",2);
        set_event_time(10.0, 60.0);
        set_events_on(1);
        add_exit(NPATH+"cmene","polnoc",0,go());
        add_exit(NPATH+"cmentarz.c","polnocny-zachod",0,go());
        add_exit(NPATH+"cmensw.c","zachod",0,go());
     add_exit(NPATH + "krypta1.c","dol");

    if(random(2)) dodaj_npca(NPCPATH + "szkielet.c",NOCE);
    if(random(2)) dodaj_npca(NPCPATH + "szkielet.c",NOCE);    

}

string
dlugi()
{
    return("Jest to poludniowo-wschodnia kwatera cmentarza. Stoja tu "
           +"glownie kosztowne, bogato rzezbione grobowce. Aleje prowadza "
           +"stad do poludniowo zachodniej i wschodniej aleji, jak rowniez "
           +"do bramy cmentarza. "+opis_pory_roku()+"\n");
}