inherit "/d/Imperium/std/monster";
inherit "/std/combat/unarmed";
#include <money.h>
#include <ss_types.h>
#include <wa_types.h>
#include <macros.h>
#include <stdproperties.h>
#include <pl.h>

#define A_BITE  0
#define A_LCLAW 1
#define A_RCLAW 2

#define H_HEAD 0
#define H_BODY 1

#define PRZYMIOTNIKI ({({"bialy","biali"}), ({"lodowy","lodowi"}),\
({"paskudny","paskudni"}), ({"niebezpieczny","niebezpieczni"}), ({"zimny","zimni"}),\
({"nieduzy","nieduzi"}),({"glodny","glodni"})})
#define LICZBA_PRZYMIOTNIKOW 7

void
create_monster()
{        
int i, j;
        i = random(LICZBA_PRZYMIOTNIKOW);
        j = random(LICZBA_PRZYMIOTNIKOW - 1);

        if(j >= i)
           ++j;
        dodaj_przym(PRZYMIOTNIKI[i][0], PRZYMIOTNIKI[i][1]);
        dodaj_przym(PRZYMIOTNIKI[j][0], PRZYMIOTNIKI[j][1]);

  ustaw_odmiane_rasy( ({"wiverna","wiverny","wivernie","wiverne","wiverna","wivernie"}), ({"wiverny","wivern","wivernom","wiverny","wivernami","wivernach"}), PL_ZENSKI); 
    
set_long("Lodowa, bezlitosna kreatura, na ktora spogladasz jest w jakims stopniu "+
"odpychajaca, w innym dziwnie piekna i harmoniczna. Gdy spoglada na ciebie jestes "+
"w stanie instynktownie wyczuc, ze jest ona glodna. Jest ona duza, co ciekawe "+
"nie dotyka podloza zadna konczyna a lekko unosi sie nad ziemia.\n");
    
  set_alignment(-40);
  set_aggressive(1);
  set_gender(G_FEMALE);

  add_prop(CONT_I_HEIGHT, 300);
  add_prop(CONT_I_WEIGHT, 3000);
  add_prop(NPC_M_NO_ACCEPT_GIVE, 1);
  add_prop(LIVE_I_NEVERKNOWN, 1);

  set_attack_unarmed(A_BITE,  40, 40, W_IMPALE, 55, "ostrymi zebiskami");
  set_attack_unarmed(A_LCLAW, 40, 40, W_SLASH,  55, "pazurami lewej konczyny");
  set_attack_unarmed(A_RCLAW, 40, 40, W_SLASH,  55, "pazurami prawej konczyny");

  set_hitloc_unarmed(H_HEAD, ({ 15, 25, 30, 20 }), 25, "leb");
  set_hitloc_unarmed(H_BODY, ({ 10, 15, 40, 50 }), 40, "lodowe cialo");

  set_skill(SS_DEFENCE, 70);
  set_skill(SS_UNARM_COMBAT, 80);
  set_skill(SS_BLIND_COMBAT, 100);

  set_stats(({130, 140, 90, 30, 30, 250, 60, 0, 0}));

  set_act_time(5);
  add_act("emote wydaje z siebie niewiarygodnie glosny pisk.");
  add_act("emote spoglada na ciebie glodnym wzrokiem.");
  add_act("emote pokazuje cala game bialych, ostrych zebow.");
}