#include <lib.h>
#include <damage_types.h>
inherit LIB_NPC;
void SetStuff(int level);
void SetType(string what);
int count;
static void create(int level) {
string type;
npc::create();
SetId(({"blob"}));
if(level < 40) type = "rodent";
if(level > 39 && level < 50) type = "bear";
if(level > 49 && level < 70) type = "golem";
if(level > 69 && level < 90) type = "unicorn";
else type = "dragon";
count = level;
SetType(type);
}
void SetType(string what) {
SetRace(what);
if(!SetClass("monk")) SetClass("fighter");
SetLevel(to_int(count/12));
SetGender(({"female","male"})[random(2)]);
switch(what) {
case "rodent":
SetLong("A cute little chipmunk.");
SetShort("a chipmunk");
SetKeyName("chipmunk");
SetId(({"chipmunk"}));
break;
case "bear":
SetLong("A big black bear.");
SetShort("a bear");
SetId(({"bear"}));
SetKeyName("bear");
break;
case "golem":
SetLong("A threatening looking golem.");
SetShort("a golem");
SetId(({"golem"}));
SetKeyName("golem");
break;
case "unicorn":
SetLong("A noble unicorn.");
SetShort("a unicorn");
SetId(({"unicorn"}));
SetKeyName("unicorn");
break;
case "dragon":
SetLong("A huge dragon with a threatening visage.");
SetShort("a dragon");
SetId(({"dragon"}));
SetKeyName("dragon");
break;
}
}
void heart_beat() {
::heart_beat();
count--;
if(count <= 10) send_messages("flicker","$agent_name $agent_verb.",
this_object(),0,environment());
if(count <= 0) {
send_messages("flicker","$agent_name slowly $agent_verb out"
" of existence...",this_object(),0,environment());
eventDestruct();
}
}
