From: cmj1@jaguar.uofs.edu
Newsgroups: rec.games.mud.lp
Subject: RANDOM MOVING AND CHASING
Date: 22 Jul 92 21:58:02 GMT
Organization: University of Scranton

This is an addenum to my previous message.  Please take a look at the following
code, and tell me why this creature STILL doesn't follow people out of rooms?
Thanks.
P.S. sorry I don't exacxtly code beautifully. :)

+++++++++CODE++++++++++++++++++++

inherit "obj/monster";
string function, type;

object weapon,skin;

string chats;

reset(arg) {
	if(arg) return 1;
     ::reset(arg);
	enable_commands();
     set_name("hobbes");
     set_alias("tiger");
set_whimpy(1);
	msgin = "comes pouncing in with a flying leap!  Look out!";
More: (line 17) 
	msgout ="thinks he can sneak up on you by going ";
set_al(5000);
     set_level(19);
	set_ep(1000000);
	set_long("This is Calvin's best friend in the entire world.  And he's a pretty\n"+
	"decent watchtiger.  He'll eat you up!\n");
     set_wc(30);
     set_ac(22);
	set_spell_mess1("Hobbes is slicing up someone like they were a stick of butter!\n");
	set_spell_mess2("Hobbes rips his claws through you.  You can feel them hit your ribcage!\n");
	set_spell_dam(26);
	set_chance(37);
	set_move_at_reset(1);

	set_aggressive(1);
	if(!weapon) { 
	weapon=clone_object("/players/macgyver/weapons/claw");
	move_object(weapon, this_object());
	}
	if(!skin) {
	skin=clone_object("/players/macgyver/armours/tiger");
	move_object(skin, this_object());
}
	set_hp(800);
	init_command("wield claws");
init_command("wear skin");
	/* call_out("random_move",5); */
	call_out("kill",2);
	call_out("catch_tell",0);
}
query_msgin() { return "comes pouncing in with a flying leap!  Look out!.";}
query_msgout() { return"thinks he can sneak up on you by going "; }

short() {
	return "Hobbes - Tiger and Calvin's best friend";
}


catch_tell() {
	string who;
if(!this_player() || query_verb() || this_player() ==
	this_object() || !(who=this_player()->query_name())) return;
call_out("perform",0,query_verb() +" "+lower_case(who));
}

perform(cmd) {
	command(cmd);
}

kill() {
	set_random_pick(20);
	set_aggressive(1);
	return 1;
}

/* random_move() {
	int n;
tell_room(environment(), "Hobbes growls and arches his back!\n");
n=random(6);
if(n==0)
	command("north");
else if(n==1)
	command("south");
else if(n==2)
More: (line 81) 
	command("west");
else if(n==3)
	command("east");
else if(n==4)
	command("up");
else if(n==5)
	command("down");
	call_out("random_move", 6);
} */

-- 
+++++++++++++++++++++++++++++ Quantum Leap me baby +++++++++++++++++++++++++++
+ Colin M. Joyce                       | Cmj1@Jaguar.Ucs.Uofs.Edu (Internet) +
+ (717-961-1842) Rock 107 (Work Number)| Cmj1@Scranton (Bitnet)              +
+ (717-346-6275) House (Humble Abode)  | GagGoona@Baloopi (World in my head) +
+                                      |                                     +
+                                      | All opinons are, of course, mine,   +
+           "Life Happens"             | and do not reflect the ideas of the +
+                    -Colin M. Joyce   | people around me (Mainly because    +
+                                      | my opinons are not normally placed  +
+                                      | upon reflective surfaces).          +
+++++++++++++++++++++++++++++ Happy Happy Joy Joy! +++++++++++++++++++++++++++