/*
 * Waz bagienny - by Tanis
 * Projekt bagna - Tanis & Mithandir
 */

inherit "/d/Imperium/std/zwierze";
#include "bagno.h"

string *losowy_przymiotnik()
{
    string *lp;
    string *lm;

    int n;
 
    lp=({"wielki","grozny","potezny","szybki"});
    lm=({"wielcy","grozni","potezni","szybcy"});

    n=random(4);

    return ({lp[n],lm[n]});

}


create_zwierze()
{
    string *przymiotnik = losowy_przymiotnik();

    ustaw_odmiane_rasy(({"jaszczur","jaszczura","jaszczurowi","jaszczura",
          "jaszczurem","jaszczurze"}),({"jaszczury","jaszczurow","jaszczurom",
          "jaszczury","jaszczurami","jaszczurach"}),PL_MESKI_NOS_ZYW);

    add_prop(LIVE_I_NEVERKNOWN, 1);

    set_gender(G_MALE);

    dodaj_przym(przymiotnik[0],przymiotnik[1]);

    set_long(" Jest to olbrzymi bagienny jaszczur. Jego dlugosc wynosi okolo "
        +"metra. Wielki leb kolysze sie ponad pol metra nad ziemia. Ogromne, "
        +"grube lapy pewnie stoja na podmoklym gruncie. Potwor otwiera "
        +"szczeke, ukazujac wielkie zebiska.\n");

    set_stats(({20,5,20,1,1,50}));

    set_act_time(15+random(10));
    add_act("emote klapie zebami.");
    add_act("emote patrzy na ciebie.");

    set_attack_unarmed(1, 10, 12,W_IMPALE, 40,"zebami");

    set_hitloc_unarmed(1, ({4,4,5}), 30,"leb");
    set_hitloc_unarmed(2, ({2,3,4}), 20,"prawa lape");
    set_hitloc_unarmed(4, ({2,3,4}), 20,"lewa lape");
    set_hitloc_unarmed(8, ({3,4,4}), 30,"tulow");

    set_whimpy(50);
    set_aggressive(1);
    set_random_move(100);
    set_restrain_path(BAGNO_DIR);

    add_leftover(BAGNO_DIR+"skora.c",({"skora","skory","skorze","skore","skora","skorze"}),
               ({"skory","skor","skorom","skory","skorami","skorach"}),
               PL_ZENSKI,1,0,1,1);

}

void
jakie_resztki()
{
    if (!random(5))
	add_leftover("/std/leftover", ({ "zab", "zeba", "zebowi", "zab",
	    "zebem", "zebie" }), ({ "zeby", "zebow", "zebom", "zeby", "zebami",
	    "zebach" }), PL_MESKI_NOS_NZYW, random(5) + 1, 0, 1, 0);	  
    if (!random(5))
	add_leftover("/std/leftover", ({ "czaszka", "czaszki", "czaszce", 
	    "czaszke", "czaszka", "czaszce" }), ({ "czaszki", "czaszek",
	    "czaszkom", "czaszki", "czaszkami", "czaszkach" }), PL_ZENSKI,
	    1, 0, 1, 1);
    if (!random(5))
	add_leftover("/std/leftover", ({ "serce", "serca", "sercu", "serce",
	    "sercem", "sercu" }), ({ "serca", "serc", "sercom", "serca",
	    "sercami", "sercach" }), PL_NIJAKI_NOS, 1, 0, 0, 1);
    add_leftover("/std/leftover", ({ "oko", "oka", "oku", "oko", "okiem",
        "oku" }), ({ "oczy", "oczu", "oczom", "oczy", "oczami", "oczach" }),
        PL_NIJAKI_OS, 2, 0, 0, 0);
}