// EMOTY DLA ADWOKATOW
//by Kasan

inherit "/cmd/std/command_driver";
#include <filter_funs.h>
#include <composite.h>
#define TP  this_player()
#define ADWOKAT "_adwokat_"

init_emoty()
{
    add_action("przedstaw", "sprzedstaw");
    add_action("tytul", "sujawnij");
    add_action("pomoc", "spomoc");

}

int
przedstaw(string str)
{
   object *komu=0,*inni=0;
   int wszyscy=0,i;
   string pres=TP->query_name() + " " + "Teczowiec z Doliny" + " "+ TP->query_title()   
   	      + ", "+TP->query_rasa();
   
   notify_fail(capitalize(query_verb()) + " sie [<komu>]?\n");
   if (!stringp(str)) return 0;
   
   if (str!="sie"&&!sscanf(str,"sie %s",str)) return 0;
   
   if (strlen(str)&&str!="sie")
      {
       komu=parse_this(str,"%l:" + PL_CEL);
      }
   else
      {komu=FILTER_LIVE(all_inventory(environment(TP)))-({TP});
       wszyscy=1;}
   
   if (!sizeof(komu)&&!wszyscy) return 0;
   
   TP->reveal_me();
   
   write("Przedstawiasz sie " + (wszyscy?"wszystkim":COMPOSITE_LIVE(komu,PL_CEL)) +
   	".\n");
   
   if (wszyscy&&!sizeof(komu)) 
      {
         write("Nie widzisz w tym co prawda najmniejszego sensu, gdyz " +
   	  "nie ma nikogo, kto moglby cie uslyszec.\n");
   	 return 1;
      }
   
   for (i=0;i<sizeof(komu);i++)
       {
          tell_object(komu[i],capitalize(TP->short(komu[i],PL_MIA)) + 
          	" przedstawia sie jako:\n" + pres + ".\n");
       }

   inni=FILTER_LIVE(all_inventory(environment(TP)))-komu-({TP});
   
   for (i=0;i<sizeof(inni);i++)
       {
          tell_object(inni[i],capitalize(TP->short(inni[i],PL_MIA)) + 
          	" przedstawia sie " + FO_COMPOSITE_LIVE(komu,inni[i],PL_CEL) +
          	".\n");
       }
   
   komu->add_introduced(TP->query_real_name(PL_MIA),
   			TP->query_real_name(PL_BIE));
   
   return 1;
}

int
tytul(string str)
{
    if (!str) notify_fail("Co chcesz ujawnic, moze swoj 'tytul'??\n");
   
    if (str=="+")
  {
    write("Ujawniasz, to iz jestes adwokatem.\n");
    TP->set_title("Poczatkujacy Adwokat");
    TP->add_prop(ADWOKAT, 1);    
    return 1;
  }

   if (str=="-")
  {
   write("Chowasz, to iz jestes adwokatem.\n");
   TP->set_title("");
   TP->add_prop(ADWOKAT, 0);
   return 1;
  }
}

int 
pomoc(string str)
{
    if(!str)
    {
    	write("Narazie sa dostepny takie komendy:\n "+
    	      "sujawnij [+/-] - sluzy do ujawniania, tego iz jest sie adwokatem. "+ 
    	      "Adwokaci sa wpuszczani na teren sadu.\n \n "+
    	      "rprzedstaw [sie] - sluzy do przedstawiania sie \n \n"+
    	      "spomoc - komenda pomocy \n \n");
    	return 1;
    }
}