/*
 * Cmentarz
 */

#include "mith.h"
inherit "/d/Imperium/std/room";
inherit STDPATH+"pogoda.c";

#include "/d/Imperium/sys/alarm.h"

create_imperium_room()
{
        set_long("@@dlugi");
        set_short("Cmentarz");
        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 presuwal cos ciezkiego. "
           +"Moze to drzwi grobowca?\n",2);
        set_event_time(10.0, 60.0);
        set_events_on(1);

        add_exit(LOKPATH+"ulica18.c","polnoc",0,go());
        add_exit(NPATH+"cmense.c","poludniowy-wschod",0,go());
        add_exit(NPATH+"cmensw.c","poludniowy-zachod",0,go());
        add_exit(NPATH+"cmene.c","wschod",0,go());
        add_exit(NPATH+"cmenw.c","zachod",0,go());

    if(random(2)) dodaj_npca(NPCPATH + "szkielet.c",NOCE);
    if(random(2)) dodaj_npca(NPCPATH + "szkielet.c",NOCE);    
}

string
dlugi()
{
    return("Jestes na cmentarzu publicznym miasta Kreutzhofen. "
           +"Grzebani sa na nim wszyscy mieszkancy miasta, od najbogatszych, "
           +"posiadajacych wlasne grobowce zaczynajac, na najbiedniejszych, "
           +"grzebanych we wspolnym grobie konczac. Caly cmentarz podzielony "
           +"jest na cztery czesci, do ktorych prowadza szerokie aleje. W "
           +"poszczegolnych kwaterach poruszac sie trzeba po waskich "
           +"sciezkach, biegnacych tuz przy grobach. Z tego miejsca wychodza "
           +"aleje do wszystkich kwater. "+opis_pory_roku()+"\n");
}