#include <lib.h>

inherit "/domains/cave/etc/cave_orc";

int throwing;

static void create() {
    ::create();
    SetKeyName("orc");
    SetId(({"orc", "guard"}));
    SetAdjectives(({"armored","professional","orc","guard"}));
    SetShort("an orc guard");
    SetLong("This is an adult orc. He seems to have a professional "
            "bearing, and a sense of purpose.");
    SetInventory(([
                "/domains/cave/weap/sword" : "wield sword",
                "/domains/cave/weap/javelin" : 2,
                "/domains/cave/armor/leather_armor" : "wear leather armor",
                "/domains/cave/armor/orc_boot_l" : "wear left boot",
                "/domains/cave/armor/orc_boot_r" : "wear right boot",
                ]));
    SetLevel(1);
    SetRace("orc");
    SetClass("fighter");
    SetSkill("projectile attack", 20);
    SetSkill("projectile defense", 10);
    SetGender("male");
    SetEncounter(  (: CheckOrc :) );
}

void init(){
    ::init();
}

void heart_beat(){
    object env = room_environment(this_object());
    if(throwing) throwing--;
    //tc("beating for "+identify(this_object()));
    if(GetInCombat()){
        object targ;
        object jav = present("javelin",this_object());
        object *targs = filter(get_livings(env), 
                (: member_array($1, GetEnemies()) != -1 :) );
        //tc("env: "+identify(env));
        if(sizeof(targs)) targ = targs[random(sizeof(targs)-1)];
        if(present("javelin", env)){
            eventForce("get a javelin");
            jav = present("javelin",this_object());
        }
        if(jav && targ && !throwing){
            //eventForce("say trying to throw at "+targ->GetKeyName());
            eventForce("throw a javelin at "+targ->GetKeyName());
            throwing = 10;
        }
    }
    ::heart_beat();
}