soldier.c - example for course 03

---

/* Filename      : soldier.c
 * Description   : a guard with equipment
 *
 * written       : 01-10-1996 - Gunner
 * last modified : 01-10-1996 - Gunner
 * HTML-Version  : 28-01-2000 - Ghorwin
 */

#include <mudlib.h>
inherit I_MONSTER;      // inherit "/std/monster.c"

create()
{
    ::create();
    set_name("soldier");
    add_id(({"strong soldier","man"}));
    set_short("A strong soldier");
    set_long("This is one strong soldier. He must work out.\n");
    set_race("human");  // Not really necessary since the default race
    set_level(20);      // for a monster is human, but just for kicks.. :-)
    set_str(30);
    set_hp(500);
    set_sp(500);
    set_gender(1);
    set_al(500);
    set_wc(30);
    set_ac(20);
    add_eq("../course02/longsword",2);    // 2 longswords to wield
    add_eq("../course02/ringmail");       // 1 ringmail to wear
    add_eq("../course02/pizza");          // 1 pizza to eat
    add_eq("../course02/dragonbreath",3); // 3 dragonbreaths to drink
    add_skill("two_weapon",100);          // Fully skilled in twoweapon
    add_skill("prot_magic",10);           // 10% protected against magic
    load_a_chat(20,({"*drink dragonbreath",
                     "*eat pizza"}));
    add_property(({"guardian","no_disarm","no_disease"}));
    replace_program(I_MONSTER);
}