inherit "/d/Imperium/std/monster";

#include "szturmix.h"
#include <stdproperties.h>
#include <macros.h>
#include <ss_types.h>
#include <wa_types.h>

#define PRZYMIOTNIKI ({({"ogromny", "ogromni"}), ({"niski", "niscy"}), ({"chudy", "chudzi"}), ({"krepy", "krepi"}), \
        ({"ciemnozielony", "ciemnozeleni"}), ({"ciemnoskory", "ciemnoskorzy"}), ({"dwunosy", "dwunosi"})})
#define PRZYMIOTNIKI2 ({({"zdenerwowany", "zdenerwowani"}), ({"zadowolony", "zadowoleni"}), ({"ciezarny", "ciezarni"}), ({"bezzebny", "bezzebni"}), \
        ({"glupkowaty", "glupkowaci"}), ({"ociezaly", "ociezali"}), ({"znudzony", "znudzeni"})})

#define IBRONIE ({"sntopor.c", "snmiecz.c", "snsztylet.c", "snmiecyk.c", "snwlocznia.c", "snmlot.c"})

#define LICZBA_KOMBINACJI_BRONI 6
#define LICZBA_PRZYMIOTNIKOW 7
#define HALAS "_halas_jebany_z_midd_kurwa_jego_mac"
#define PAUENCJA "_wrog_swiatyn_middenheim"
#define PEN_SPECJALA 2000
#include "/d/Imperium/funkcje/specjal1.c"

void
create_monster()
{
     int i, j, x, y, bracia;
     string opis1, opis2, bron;

     string *bro = IBRONIE;
     
         i = random(LICZBA_PRZYMIOTNIKOW);
         j = random(LICZBA_PRZYMIOTNIKOW);
         x = random(LICZBA_KOMBINACJI_BRONI);

     bracia = 100 + random(100);
     
       bron = SPPATH + bro[x];


     opis1 = PRZYMIOTNIKI2[i][0];
     opis2 = PRZYMIOTNIKI[j][0];

         dodaj_przym(PRZYMIOTNIKI2[i][0], PRZYMIOTNIKI2[i][1]);
         dodaj_przym(PRZYMIOTNIKI[j][0], PRZYMIOTNIKI[j][1]);
  //  set_random_move(25);

         set_long("Przed toba stoi " + opis1 + " " + opis2 + " snotling." +
	" Stworki te zazwyczaj sluza swym wiekszym kuzynom - orkom i"+
	" goblinom. Zielona skora, niewielki wzrost, rozbieganeoczy" +
	" i niepowstrzymany entuzjazm - oto cechy charakteryzujacete" +
	" bestyjki. Snotlingi zazwyczaj chodza w parach ale poniewaz" +
	" niezbyt dobrze licza pary te czesto licza kilkanascie sztuk." +
	" Pojedynczy snotling nie stanowi wiekszego zagrozenia dla nikogo" +
	", jednak w 'parach' potrafia byc wyzwaniem nawet dla najbardziej" +
	" doswiadczonych podroznikow.\n");

         ustaw_odmiane_rasy(({"snotling", "snotlinga", "snotlingowi", "snotlinga",
                "snotlingiem", "snotlingu"}), ({"snotlingi", "snotlingow",
                "snotlingom", "snotlingi", "snotlingami", "snotlingach"}), PL_MESKI_NOS_ZYW); 
         set_gender(G_MALE);
          
     set_skill(SS_DEFENCE, 90);
     set_skill(W_KNIFE, 100);    
     set_skill(W_SWORD, 90);
     set_skill(W_AXE, 90);
     set_skill(W_WARHAMMER, 100);
     set_skill(W_POLEARM, 100);
     set_skill(SS_PARRY, 70+random(20));
     add_prop(HALAS,1); 
     add_prop(PAUENCJA,1); 
     set_all_hitloc_unarmed(5); /* skora */     
     set_alignment(-290);    
     add_prop(CONT_I_HEIGHT, 50 + random(30));
     add_prop(CONT_I_WEIGHT, 5000 + random(1000));
     add_prop(LIVE_I_NEVERKNOWN,1);
     
       add_armour(SPPATH+"snnapiersnik.c");
       add_weapon(bron);    
     
      set_default_answer(VBFC_ME("odpowiedz_zazwyczaj"));
      add_prop(LIVE_I_NEVERKNOWN, 1);   

    set_stats(({200, 200 + random(5), 200 + random(50), 1, 1, 125 }));
        
        set_chat_time(30 + random(15));
        set_act_time(20 + random(10));
        set_cchat_time(6);
        

        add_chat("Co tu robisz.");
        add_chat("To napad.");
        add_chat("TAAAAAAKI DUZY TAAAAAAAKI MALY MOZE SWIETYM BYYYYYC!");
        add_chat("PIERDOLEEEEE CIEEEEE GDY CIEEEEEEMNO JEST!");

        add_act("emote imituje przez moment twoje ruchy z wielka dokladnoscia.");
        add_act("emote stara sie zajrzec do twoich kieszeni.");
        add_act("emote uczepil sie paska w twoich spodniach i wisial na nim przez chwile.");
        add_act("emote przyglada ci sie z nieukrywanym zachwytem.");
        add_act("emote placze ci sie pod nogami, starajac sie wywrocic cie za wszelka cene.");
        add_act("emote dlubie sobie w nosie, starajac sie cos z niego wydobyc. Pomaga w tym sobie " +
              "sporej wielkosci drewniana lyzka.");

        add_cchat("Wheeeee! Czy ty jestes jadalny czy nie?");
        add_cchat("Bo zaraz zawolam moich " + bracia + " braci!!!");
        add_cchat("Ty byc zly! Ja i inni bic zlych! Czyli ja bic ciebie!");
        add_cchat("Hyhyhy... uwielbiam jesc swieze loczy!");


    set_aggressive(1);
}

/* ta funkcja zostanie przebudowana i bedzie oddawac charakter snotlinga */



public void
wesprzyj(object ob)
{
    if (query_attack())
    {
/*
        switch(random(3))
        {
            case 0: command("krzyknij Lojejku"); break;
            case 1: command("krzyknij Rany!"); break;
            case 2: command("krzyknij Yyyyyyy!"); break;
        }
*/        
        return ;
    }
    
    command("wesprzyj " + OB_NAME(ob));
    
    if (query_attack())
    {
        switch(random(5))
        {
            case 0: command("krzyknij Do boju!"); break;
            case 1: command("krzyknij Waaaaaa!"); break;
            case 2: command("krzyknij Iiiiiiiii!"); break;
            case 3: command("krzyknij Hurrrrrra!"); break;
            case 4: command("krzyknij Lubu dubu!!"); break;
        }
        return ;
    }

    switch(random(5))
    {
        case 0: command("powiedz do "+OB_NAME(ob)+" Ze niby ja??"); break;
        case 1: command("powiedz do "+OB_NAME(ob)+" Ciii...my sie nie znamy.");
break;
        case 2: command("powiedz do "+OB_NAME(ob)+" No no no!"); break;
        case 3: command("powiedz do "+OB_NAME(ob)+" A idz sie powies.");
                                        break;
        case 4: command("powiedz do "+OB_NAME(ob)+" UOOOO! Wpierdol predzej tobie bym spuscil!");
    }
}

public void
pomocy()
{
    (all_inventory(environment(this_object())) - ({ this_object() }))->wesprzyj(this_object());
}


void
attacked_by(object wrog)
{
    command("krzyknij DUPA. LEJOM MNIE HUJE!");
    set_alarm(0.1, 0.0, "pomocy");
    return ::attacked_by(wrog);
}