[sotonin]

arg. the cluttered code hurts my head. =D

sub EVENT_SAY { 
	if ($text=~ /Hail/i){
		quest::say("Say [ready] if you want me to move you somewhere");
	}
	if ($text=~ /ready/i){
		quest::say("Very well, off you go then.");
		quest::movepc(219,-7,5,189);
	}
}

might wanna get in the habit of formatting it so it's more readable and doesn't run together so much.