// plik zawiera sciezke dostepu do mojego katalogu
#include <stdproperties.h>
#include <ss_types.h>
#include <pl.h>
#include <macros.h>


object* query_team_oth(){
  object *grupa;
  object leader;

  leader = query_leader();

  if (!leader){
    grupa = query_team();
  }
  else {
      grupa = leader->query_team();
      grupa = grupa + ({ leader });
      grupa = grupa - ({ this_object() });
  }
  return grupa;
}



string polacz_przym(int l, int p){
  int i;
  string pom;
  string *tpom;
  
  pom="";
  if (l)
    tpom=query_pprzym(1,p);
  else
    tpom=query_przym(1,p);
    
  for (i=0; i < sizeof(tpom); i++){
    pom=pom+tpom[i];
    if ((i+1)<sizeof(tpom))
      pom+=" ";
  }
  return pom;
}


void ustaw_krotki_opis(string *o_lp, string *o_lm, int rodzaj){
  int i, j;
  mixed *pom;
  string prz;

  

  if (!sizeof(query_przym(1,0))) {
    ustaw_shorty(o_lp, o_lm, rodzaj);
    return;
  }
  
  pom=allocate(2);
  pom[0]=allocate(6);
  pom[1]=allocate(6);
  
//  ustaw_rodzaj(rodzaj, 1);
  
  for (j=0; j < 6; j++)
      pom[0][j]=polacz_przym(0,j)+" "+o_lp[j];

  for (j=0; j < 6; j++)
    pom[1][j]=polacz_przym(1,j)+" "+o_lm[j];
  ustaw_shorty(pom[0], pom[1], rodzaj);
}