inherit "/d/Imperium/std/zol_imp.c";
#include "lakshmi.h"

int wita=0;
object *powitani=({});

public void
wesprzyj(object ob)
{
    if (query_attack())
    {
        return ;
    }

    command("wesprzyj " + OB_NAME(ob));
    command("zmiazdz");

    if (query_attack())
    {
        switch(random(5))
        {
            case 0: command("krzyknij Do boju!"); break;
            case 1: command("krzyknij W imie Sigmara!"); break;
            case 3: command("krzyknij Sigmar!"); break;
            case 4: command("krzyknij Za Zakon!"); break;
        }
        return ;
    }
}

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

void
attacked_by(object wrog)
{
    command("krzyknij Bracia! Wspomozcie mnie!");
    command("zmiazdz");
    wrog->add_prop(IMPERIUM_I_ROZRABIA_W_ZAMKU, 1);
    set_alarm(0.1, 0.0, "pomocy");
    ::attacked_by(wrog);
}

void
attack_object(object wrog)
{
    wrog->add_prop(IMPERIUM_I_ROZRABIA_W_ZAMKU, 1);
    ::attack_object(wrog);
}

void
encounter(object kogo)
{
  if(kogo->query_prop(IMPERIUM_I_ROZRABIA_W_ZAMKU))
  {
    ATAK->zostalem_zaatakowany(this_object());
    command("zabij "+OB_NAME(kogo));
    command("zmiazdz");
  }
  ::encounter(kogo);
}

void
ochrona_zamku()
{
}

set_wita(int czy)
{
   wita=czy;
}

pozdrow(object kogo)
{
   if (!present(kogo,environment(TO))||!CAN_SEE(TO,kogo)) return;
   command("uklon " + OB_NAME(kogo) + " z szacunkiem");
   powitani+=({kogo});
}

init_living()
{
   if (wita&&PRAWA->sprawdz_prawa(PRAWA_RYCERZA,TP)&&member_array(TP,powitani)<0)
   set_alarm(1.0,0.0,&pozdrow(TP));
   ::init_living();
}