inherit "/d/Faerun/std/room";

#include <stdproperties.h>
#include <mail.h>	// Dla #define READER_ID
#include "definicje.h"
#define MAILCHECKER "/secure/mail_checker"
#define MAILREADER "/secure/mail_reader"

create_room()
{
    set_short("Poczta");
    set_long("W tym miejscu panuje okropny, zaduch. Wszedzie leza listy i "+
    "paczki. Sufit jest pomalowany na bialo, tak samo jak sciany. Podloge "+
    "wykonano z drewnianych desek, ktore jak sie po nich chodzi skrzypia. "+
    "Jest tutaj malenkie okienko przez ktore moze wpadac swiatlo. Na ladzie "+
    "stoi olejna lampa, ktora daje slabe swiatlo.\n");
    add_item( ({"tabliczke", "mala tabliczke" }), "Jesli nie wiesz, jak "+
      "cos zrobic, wpisz '?poczta'.\n");
    add_exit("droga13","wschod");
    add_prop(ROOM_I_INSIDE, 1);
    clone_object(NPC_PATH+"urzednikp")->move(this_object());
}

init() 
{
  object obj;

  ::init();

  if (present(READER_ID, this_player()))
    return 1;
  if ((obj = clone_object(MAILREADER)) != 0)
    {
	obj->move(this_player());
    }
}

leave_inv(object who, object where) 
{
  object obj;

  if (who && 
      where && 
      where != this_object() &&
      (obj = present(READER_ID, who)) != 0)
    obj->remove_object();
  ::leave_inv(who, where);
}

query_mail(silent) 
{
  int mail;
  string tekst;

  seteuid(getuid());
  mail = MAILCHECKER->query_mail();
  if (!mail)
    return 0;
  if (silent)
    return 1;
  tekst = "";
  if (mail == 2)
    tekst += "\n-------------------------------------------------------------";
    
  tekst += "\nCzeka na ciebie";
  
  if (mail == 2)
    tekst += " NOWA";
  
  if (mail == 3)
    tekst += " nieprzeczytana";
  
  tekst += " poczta w najblizszym urzedzie pocztowym.\n";
  
  if (mail == 2)
    tekst += "-------------------------------------------------------------\n";
    
  tekst += "\n\n";

  write(tekst);    
  return 1;
}