/* 
 * Korytarz
 * Korytarz w twierdzy krasnoludow
 * Copyright (C): Julian 1999
 */

inherit "/d/Imperium/std/room";

#include <macros.h>
#include <stdproperties.h>

void
create_twierdza()
{
    set_short ("Korytarz");

    set_long(query_long()+ "Jest to ciemny i wilgotny korytarz. Przenikliwa cisze maci tylko "
	       + "odglos spadajacych kropel. Sciany korytarza zrobione dosc solidnie "
		   + "pod wplywem czasu zaczely sie juz kruszyc. Na twarzy czujesz lekki "
		   + "powiew nieswierzego powietrza.\n");

	add_item(({"krople","kropelki"}),"Dokola rozchodzi sie monotonny odglos uderzania kropli "
	       + "o kamienna posadzke.\n");
    add_item(({"sciany","sciane")},"Kamienne sciany od panujacej wilgoci pokryly sie calkowiecie mchem. "
	       + "W wielu miejscach zaczynaja sie kruszyc, lecz nadal sa solidne.\n");
	add_item("powiew","Na twarzy czujesz delikatny powiew nieswierzego powietrza.\n");

	switch (random(1))
	{
	  case 0 :
	  	set_long(query_long()+"W tej czesci korytarza panuje wilgoc. "
		  + "Na posadzce znajduje sie ogromna kaluza cuchnacej "
	  	  +	"wody, ktora zbierajac sie tu juz od dawna zgnila.\n");
	add_item("kaluze","Struzki wody sciekajac po scianach utworzyly na "
	      + "posadzce kaluze wody.\n");
	  
	  	break;
	  case 1 :
	  	set_long(query_long()+"Na obu scianach korytrza znajduja sie "+
	  		"niewielkie nisze, w kazdej z nich blyszcza biela "+
	  		"kosci krasnoludzkich szkieletow ubranych w zetlale "+
	  		"stroje.\n");
	  	add_item(({"nisze","niewielkie nisze"}),"Prawdopodobnie "+
	  		"zostly recznie wykute w skale i wylozone pozniej "+
	  		"czarnym kamieniem, z ktorego zostala wykonana wieksza "+
	  		"czesc twierdzy.\n");
	  	add_item(({"szkielety","krasnoludzkie szkielety"}),
	  		"Szkielety ubrane sa w stroje wojownikow, czasem nawet "+
	  		"mozna dostrzec fragmenty godla lub herbu klanu. "+
	  		"Niektore szkielety posiadja dodatkowe pary rak, inne "+
	  		"kly i szpony.\n");
	  	add_item(({"stroje","zetlale stroje"}),"Sa to chyba stroje "+
	  		"wojownikow, jednakze nie mozna tego stwierdzic "+
	  		"z cala pewnoscia.\n");
	  	break;

	  }
	}