/quest/global/global_npc.pl
Code:
sub EVENT_SPAWN {
if ($npc->GetNPCTypeID() == <put pet NPC Type ID here>) {
my $petowner = $entity_list->GetClientByID($npc->GetOwnerID());
$petowner->Message(15, "You are my owner!");
}
}
Seems I was dismissed entirely. It would be extremely helpful to just know what you're wanting to achieve, precisely.