/* Plik:     brat1.c
 * Autor:    Kaes i Karraluch
 * Data:     98
*/

inherit "/d/Imperium/std/monster.c";
#include "kaes.h"
object gracz;

create_monster()
{
 ustaw_nazwe(({"vin","vina","vinowi","vina","vinem","vinie"}),
            ({"","","","","",""}), PL_MESKI_OS);
 set_gender(G_MALE);
 ustaw_odmiane_rasy(PL_MEZCZYZNA);
 dodaj_przym("stary","starzy");
 dodaj_przym("przygarbiony","przygarbieni");
 set_alignment(50);
 add_prop(CONT_I_WEIGHT,75000);
 add_prop(CONT_I_HEIGHT,160);
 set_long("@@dlugi_opis");
 set_stats(({45+random(10),50+random(10),40+random(10),25,30,25}));
 
 add_ask(({"pierscien","zagadke","przejscie"}),VBFC_ME("brat1"));
 set_skill(SS_BLIND_COMBAT,35);
 set_skill(SS_WEP_SWORD, 20+random(10));
 set_skill(SS_DEFENCE, 15+random(15));
 set_default_answer(QCIMIE(this_object(),PL_MIA)+" mowi: Ja tu jestem od czego innego.\n");
 set_act_time(10+random(12));
 add_act("emote patrzy na ciebie badawczo.");
 add_act("emote usmiecha sie przyjaznie.");
 set_act_time(5);
 add_cact("emote krzyczy: Zginiesz!");
 add_cact("emote mowi: Nie masz zadnych szans!");
}

string dlugi_opis()
{
   return("Stary, przygarbiony czlowiek. Opiera sie na grubym, krzywym kiju. "+
     "Jest juz prawie lysy, nieliczne tylko biale wlosy pojawiaja sie na jego "+
     "glowie. Rece drza mu co pewien czas. Ubrany jest w dluga, powloczysta szate, "+
     "a na nogach ma drewniane sandaly.\n");
}

void add_introduced(string imie)
{
 set_alarm(2.0,0.0,"return_info",imie);
}

varargs void return_info(string kto)
{
  command("przedstaw sie "+find_player(kto)->query_real_name(PL_CEL));
}

string query_presentation()
{
  return"Vin, Jeden z Braci Straznikow, czlowiek";
}
 
varargs string
brat1(int faza)
{
  gracz=this_player();
  switch(faza)
  {
  case 0:
    if(gracz->test_bit("imperium",0,7))
    {
      command("emote patrzy na ciebie z ironicznym usmiechem.");
      command("emote mowi: Pamietam cie. Odejdz stad.");
      return "";
    }
    if(gracz->query_prop("_07_kaes_odpowiada_na_zagadke_"))
    {
      command("powiedz No? Juz wiesz?");
      return "";
    }
     command("emote patrzy na ciebie przez chwile.");
     command("emote mowi: A wiec chcesz przejsc dalej?");
     set_alarm(4.0,0.0,"brat1",(faza + 1));
     break;
    case 1:
     command("emote mowi: Mam dla ciebie zagadke. Jak wypowiesz "+
        "slowo-haslo, bedziesz mogl przejsc.");
     set_alarm(3.0,0.0,"brat1",(faza + 1));
     break;
    case 2:
     command("emote mowi: Sluchaj uwaznie!");
     command("emote mowi: Wznosi sie o swicie z popiolow. "+
        "Swym blaskiem rozpala okolice cala. Wieczny, niesmiertelny, piekny. ");
     command("emote mowi: O kim mowa?");
     gracz->add_prop("_07_kaes_odpowiada_na_zagadke_",1);
     break;
  }
  return"";
}

void init_living()
{
  ::init_living();
  add_action("przejsc","powiedz");
  add_action("przejsc","wypowiedz");
  add_action("przejsc","zgadnij");
}

int 
przejsc(string zagadka)
{
   if(zagadka=="feniks")
   {
    if (this_player()->query_prop("_07_kaes_odpowiada_na_zagadke_"))
    {
     command("emote usmiecha sie radosnie.");
     this_player()->move_living("wschod",PATH+"lokacje/salabr2.c");
     return 1;
    }
   }
   notify_fail("Co chcesz wypowiedziec?\n");
   return 0;
}