/*
 *  Slepa kobieta by Kaes 98 do doliny slepych
*/

inherit "/d/Imperium/std/monster.c";
#include <stdproperties.h>
#include <ss_types.h>
#include <macros.h>
#include "kaes.h"

#define PRZYMIOTNIKI ({({"ladny", "ladni"}), ({"szczuply", "szczupli"}), \
                       ({"czarnowlosy", "czarnowlosi"}), ({"wysoki","wysocy"}), \
                       ({"energiczny","energiczni"}), ({"usmiechniety","usmiechnieci"})})
#define LICZBA_PRZYMIOTNIKOW 6


void
create_monster()
{

    int i, j;
        ustaw_odmiane_rasy(PL_CZLOWIEK);
    set_gender(G_FEMALE);

    add_prop(LIVE_I_NEVERKNOWN,1);
    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]);

    set_random_move(6);

    set_long("Ladna, opalona kobieta, rodowita mieszkanka doliny. Jej dlugie, "+
      "kruczoczarne wlosy opadaja lagodnie na odsloniete ramiona. Ubrana jest "+
      "w rodzaj krotkiej tuniki siegajacej jej troche ponizej kolan. Na nogach "+
      "ma drewniane sandaly. Na jej twarzy widnieje usmiech, a jej oczy sa niewidzace.\n");

        set_stats(({40,40,35,37,40,35}));

        set_skill(SS_PARRY,5);
        set_skill(SS_HIDE,25);
        set_skill(SS_DEFENCE, 5 + random(5));
        set_skill(SS_UNARM_COMBAT, 10 + random(5));
        add_prop(CONT_I_WEIGHT, 75000);
        add_prop(CONT_I_HEIGHT, 175);

        set_cchat_time(4);
        add_cchat("Czy ktos mi pomoze?");
        add_cchat("Prosze, nie zabijaj mnie.");
        add_cchat("Nie jestes wart naszego zaufania!");
set_default_answer(QCIMIE(this_object(), PL_MIA)+" mowi z usmiechem: Przykro mi, "+
  "jestem zajeta.\n");
        set_act_time(21 + random(20));
        add_act("emote schyla sie po cos na ziemi.");
        add_act("emote zatrzymuje sie na chwile i z usmiechem na twarzy "+
          "wciaga gleboko powietrze.");
        add_act("emote mowi: Hej, kim jestes? Nie jestes stad.");
        add_act("emote mowi: Oh! Opowiesz mi o dalekich krajach?");

    ustaw_whimpy(90,3,1);
}