[AdrianD]

$client->SetTarget($client);

That's all that was needed in the .pl file.

# global\a_dungeon_necromancer.pl NPCID


sub EVENT_SAY  {
	if ($text=~/hail/i) {
		quest::say("I know the reason you come to see me, $name. Don't be afraid, the living do not concern me... You require my [services], you must ask for them. Only the willing are allowed when living.");
	}
	if ($text=~/services/i) {
	    quest::say("$name, to perform the necessary incantation, you must hand me one platinum, three gold, three silver and seven copper pieces.");

	}
}

sub EVENT_ITEM {
	if (plugin::takeCoin(1000)) {
		quest::say("Believe me when I say this exact amount represents the services offered and becomes transmuted into the much larger pile of where, I only know. HAHA!");
		$client->SetTarget($client);
		quest::selfcast(3);
	}
	plugin::returnUnusedItems();
}

Thanks

PS. Could use a writer.