/*   Poczta miasta Kreutzhofen by Tanis 
 *    Przerobka poczty z Nuln
 */

inherit "/d/Imperium/std/poczta";

#include "tanis.h"

void
create_poczta()
{
  object pocztowiec;
  
  set_short("Poczta miasta Kreutzhofen");
  set_long("@@dlugi_opis");
  
  pocztowiec=clone_object(NPCPATH + "pocztowy.c");
  pocztowiec->move(TO);
  
  add_item(({"lade", "debowa lade", "dluga lade"}), "Jest to mocna, debowa " +
      "lada, spelniajaca nie tylko role stolu, ale i wyjatkowo skutecznie oddziela " +
      "czesc dla interesantow od czesci dla personelu.\n");
  add_item(({"szafy", "szafe"}), "Wielkie szafy stojace ze debowa lada z tylu sali " +
      "zaslaniaja praktycznie cala sciane. Na polkach szaf umocowane sa specjalne " +
      "przegrodki na listy, w wiekszosci wypelnione.\n");
  add_item("przegrodki", "Wiekszosc przegrodek jest calkowicie wypelnionych listami.\n");
  add_item(({"list","listy"}), "Listy sa biale i plaskie. Jak to listy !\n");

  add_exit(NPATH + "ulica6.c", "polnoc", 0, 1);
}

string
dlugi_opis()
{
  object pocztowiec;
  string tekst;
  string tekst1;
  string tekst2;

  pocztowiec = find_living("_pocztowiec_");

  tekst = "Znajdujesz sie na poczcie miasta Kreutzhofen. " +
      "Pomieszczenie jest dosyc duze, czyste i utrzymane " +
      "we wzorowym porzadku. ";
  tekst1 = (present(pocztowiec, environment(TP)) ? 
      "Za dluga, debowa lada przedzielajaca sale siedzi " +
      "pocztowiec. Sciana za jego plecami jest w prawie w calosci " +
      "zaslonieta szafami na listy. " : 
      "Po drugiej stronie sali, odzielone od ciebie dluga, debowa lada, " +
      "stoja calkowicie zaslaniajace sciane szafy na listy.");
  tekst2 = "\n";
  tekst = tekst + tekst1 + tekst2;
  return tekst;
}