#pragma save_binary
#pragma strict_types

inherit "/d/Imperium/std/room.c";

#include <macros.h>
#include <stdproperties.h>
#include <def.h>

#define RODZ 12
mapping odm = ([]);

void
create_imperium_room()
{
  set_short("Slownik kurwa");
  set_long("Jebany slownik. 'slownik dupa,dupy,dupie...'.\n");
  setuid();seteuid(getuid());
  restore_object(PATH+"slownik_save");
}

int 
slownik( string str )
{
  mixed *odmiana;

  if (!str)
    return notify_fail("Slownik dupa,dupy,dupie...,PL_MESKI_OS.\n");

  odmiana = explode(str, ",");
    
  if (sizeof(odmiana) != 13)
    return notify_fail("Nieprawidlowa ilosc parametrow.\n");
	
	
  switch(odmiana[RODZ])  {
  case "PL_MESKI_OS":
    odmiana[RODZ]=PL_MESKI_OS;
    break;
  case "PL_MESKI_NOS_ZYW":
    odmiana[RODZ]=PL_MESKI_NOS_ZYW;
    break;
  case "PL_MESKI_NOS_NZYW":
    odmiana[RODZ]=PL_MESKI_NOS_NZYW;
    break;
  case "PL_MESKI_NZYW":
    odmiana[RODZ]=PL_MESKI_NZYW;
    break;
  case "PL_ZENSKI":
    odmiana[RODZ]=PL_MESKI_NZYW;
    break;
  case "PL_NIJAKI_OS":
    odmiana[RODZ]=PL_NIJAKI_OS;
    break;
  case "PL_NIJAKI_NOS":
    odmiana[RODZ]=PL_NIJAKI_NOS;
    break;
	    
  default:
    write("Podales zly rodzaj, mlocie.\n");
    return 1;
  }
	
	    
    setuid();
    seteuid(getuid());
    
    odm[odmiana[0]] = odmiana;
    save_object(PATH+"slownik_save");
    
    write("Odmiana dodana.\n");
    
    return 1;
}

mixed
query_odmiana( string what, int p=-1 )
{
  mixed *tab;
  if (!odm[what])
    if (p!=-1)
      return 0;

  if ( p > -1 && p <= PL_MIE )
    return odm[what][p];
    
  tab=odm[what];
  
  return tab;
}

mixed
query_r(string what)
{
  if (!odm[what])
    return -1;
  
  return odm[what][12];
}

mixed
query_od( string what, int p )
{
  int i;
  string *t=({});
  mixed tab = odm[what];

  if (sizeof(tab) != 13)
    return 0;

  if (!p)
    {
      for ( i = 0; i < 6; i++ )
	t += ({tab[i]});
      return t;
    }
    
    for ( i = 6; i < 12; i++ )
	t += ({tab[i]});
	return t;	    
}    

void
init()
{
    ::init();
    add_action("slownik","slownik");
}