
//Podstawowy zolnierz Nuln.
//Napisane przez Alfena. (wykorzystany gward_cz.c Galena)

#include "local.h"

inherit GPATH + "std/monster";

#include "ialfen.h"
#include "atrybuty.h"
#include "zol.h"

#define WYBOR ({({"niski","niscy"}),\
                ({"krepy","krepi"}),({"wysoki","wysocy"}),\
                ({"barczysty","barczysci"}),({"umiesniony","umiesnieni"}),\
                ({"dobrze zbudowany","dobrze zbudowani"}),\
                ({"potezny","potezni"})})


#define L_PRZYM 7



#define G ({ ({"zolnierz", "zolnierza", "zolnierzowi", "zolnierza",\
	      "zolnierzem", "zolnierzu"}),\
	    ({"zolnierzami", "zolnierzy", "zolnierzom", "zolnierzy",\
	      "zolnierzami", "zolnierzach"}) })

void
create_zolnierz()
{
}


/*funkcja losuje liczbe rzucajac kos iloscia kosci scia - sciennych*/
int 
los(int kos, int scia = 6)
{
  int i, wyn=0;
  for (i=0; i < kos; i++)
    wyn += random (scia);
  return wyn;
}

void 
create_monster()
{

  int i;
  int s,skil;

  s = random(L_PRZYM);

  if (random(3)){
      i = random (LPOCZY);
      dodaj_przym(OCZY[i][0], OCZY[i][1]);
  }
  else {
      i = random (LPWLOSY, 0);
      dodaj_przym(WLOSY[i][0], WLOSY[i][1]);
  }


  dodaj_przym(WYBOR[s][0],WYBOR[s][1]);
  
  add_prop(CONT_I_WEIGHT, 76000);
  add_prop(CONT_I_HEIGHT, 172);
  add_prop(IMPERIUM_LIVE_I_NULN_CITIZEN, 1);
  add_prop(LIVE_I_NEVERKNOWN, 1);
  add_prop(NPC_I_NO_FEAR, 1);
  
  
  s = los(3, 3);
  set_stats(({265 - los(11,2),165-los(11,2),265-los(11,2),165-los(11,2),
    165-los(11,2),365 - los(11,2)}));
  switch (s)
  {
        case 0 : 
                 skil = 5;
                 break;
        case 1 : 
                 skil = 10;
                 break;
        case 2 : 
                 skil = 15;
                break;
        case 3 : 
                 skil = 20;
                 break;
        case 4 : 
                 skil = 25;
                 break;
        case 5 : 
                 skil = 30;
                 break;
        case 6 : 
                 skil = 35;
                 break;
        default:  set_stats (({1,1,1,1,1,1}));
          command ("powiedz Cos mam zjebane! Zglos BUGA!");
          skil = 1;
  }
  skil += 30;
  set_skill(SS_WEP_SWORD, skil + 2 - los(2, 3)+260);
  set_skill(SS_WEP_POLEARM, skil + 2 - los(2, 3)+260);
  set_skill(SS_2H_COMBAT, skil + 2 - los(2,3)+260);
  set_skill(SS_DEFENCE, skil + 5 - los(2)+260);
  set_skill(SS_PARRY, skil+ 5 - los(2)+260);
  set_skill(SS_AWARENESS, skil + 5 - los(2)+260);


  set_gender(G_MALE);
  ustaw_odmiane_rasy(PL_CZLOWIEK);
  
  enable_reset();
  create_zolnierz();
}

