/* To jest glowna lokacja gildii Elfow
 * napisane przez Alfena
 */
 
#include "local.h"

inherit GPATH + "std/room";


void
create_hall()
{
  set_short("Holl glowny Stowarzyszenia Lesnych Elfow");
  set_long("na razie brak opisu.\n");
  
  
}

void
init()
{
  ::init();
  add_action("join", "dolacz");
  add_action("leave","opusc");
  add_action("list","sprawdz");
}

int
obiekcje(object gr)
{
  string rasa;
  
  rasa = gr->query_rasa(PL_MIA);
  
  if ((rasa!="elf")||(rasa!="elfka"))
  {
    notify_fail("Niestety czlonkiem spoleczenstwa moze zostac tylko "+
      "elf.\n");
    return 1;
  }
  
  if (gr->query_guild_member(GNAME))
  {
    notify_fail("Alez juz jestes czlonkiem spoleczenstwa lesnych elfow.\n");
    return 1;
  }

  if (gr->query_guild_member(GTYPE))
  {
    notify_fail("Niestety nalezysz juz do innego spoleczenstwa "+
      "zrzeszajacego elfy.\n");
    return 1;
  }
  return 0;
}



int
join(string s)
{
  object temp;
  
  if (!s || (s!="sie")||(s!="sie do gildii")||(s!="sie do gildii elfow))
  {
    notify_fail("Do czego sie chcesz zapisac?\n");
    return 0;
  }
  
  if (obiekcje(this_player()))
    return 0;
  
  temp = clone_object(GPATH + "gwiazda");
  if (!temp)
  {
    notify_fail("Zglos blad opiekunowi gildii.\n");
    return 0;
  }
  temp->move(this_player(), 1);
}