[jkennedy]

#A conversation to Teleport Player to a new zone (POK)
sub EVENT_SAY
{
if ($text =~/Hail/i)
{
quest::say ("Good day to you, $name. Do you want to [go] to the Plane of Knowledge?");
}

if ($text =~/go/i)
{
quest::say ("$name , stand close to me while I cast..");
quest::emote ("moves his hands as if chanting...");
quest::MovePC(202,-118,-193,-156);
}

}