[trevius]

I just started adding in a simple check to NPCs that take money like this:

sub EVENT_ITEM {

	if($platinum == 10)
	{
		quest::summonitem(1001);
		$platinum = undef;
	}
	else
	{
		if($platinum) {
			$client->AddMoneyToPP(0, 0, 0, $platinum, updateclient);
			quest::say ("That is not the required amount!");
			$platinum = undef;
		}
	}

}

Works well and is simple enough.